From e6547a9aa21402646814f562da6ba99b16a585a0 Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@cs.wpi.edu>
Date: Sun, 14 Aug 2011 19:37:20 -0400
Subject: [PATCH] kludge: copying the resource structure, because for some
 reason, something bad is happening with regards to
 dynamic-require-for-syntax.

---
 js-assembler/package.rkt | 2 +-
 resource/record.rkt      | 9 +++++++--
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/js-assembler/package.rkt b/js-assembler/package.rkt
index 6bbf4b1..8fb6896 100644
--- a/js-assembler/package.rkt
+++ b/js-assembler/package.rkt
@@ -99,7 +99,7 @@
      (source-resources
       (MainModuleSource-source src))]
     [(ModuleSource? src)
-     empty #;(resource-query:query
+     (resource-query:query
       `(file ,(path->string (ModuleSource-path src))))]
     [(SexpSource? src)
      empty]
diff --git a/resource/record.rkt b/resource/record.rkt
index fa9e3e4..17877a5 100644
--- a/resource/record.rkt
+++ b/resource/record.rkt
@@ -1,9 +1,14 @@
 #lang racket/base
-(require racket/port
-         "structs.rkt")
+(require racket/port)
+
 (provide record-resource
          get-records)
 
+
+;; Needs to be prefabricated
+(struct resource (path key) #:prefab)
+
+
 (define records '())
 
 (define (get-records)