aboutsummaryrefslogtreecommitdiff
path: root/assets.scm
diff options
context:
space:
mode:
Diffstat (limited to 'assets.scm')
-rw-r--r--assets.scm16
1 files changed, 16 insertions, 0 deletions
diff --git a/assets.scm b/assets.scm
new file mode 100644
index 0000000..9bbbf92
--- /dev/null
+++ b/assets.scm
@@ -0,0 +1,16 @@
+(module downstroke/assets *
+
+(import scheme
+ (chicken base)
+ (srfi 69))
+
+(define (make-asset-registry)
+ (make-hash-table))
+
+(define (asset-set! registry key value)
+ (hash-table-set! registry key value))
+
+(define (asset-ref registry key)
+ (hash-table-ref/default registry key #f))
+
+) ;; end module