1 files changed, 22 insertions, 0 deletions
diff --git a/sly/mode.scm b/sly/mode.scm
new file mode 100644
index 0000000..eea3068
--- /dev/null
+++ b/sly/mode.scm
@@ -0,0 +1,22 @@
+(define-module (sly mode)
+  #:use-module (srfi srfi-9))
+
+(define-record-type <mode>
+  (make-mode module vars)
+  mode?
+  (module mode-module)
+  (vars mode-vars))
+
+(define foo-mode
+  (make-mode
+   (current-module)
+   (variables
+    ((foo 100)))))
+
+(define-mode foo-mode
+  )
+
+(module-define! (current-module) 'foo 10)
+foo
+
+(make-variable)