summaryrefslogtreecommitdiff
path: root/module/system/base/syntax.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/system/base/syntax.scm')
-rw-r--r--module/system/base/syntax.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/system/base/syntax.scm b/module/system/base/syntax.scm
index 4382a8e66..35748bb79 100644
--- a/module/system/base/syntax.scm
+++ b/module/system/base/syntax.scm
@@ -50,7 +50,7 @@
`(define (,(symbol-append (trim-brackets name)
'- common-slot)
x)
- (struct-ref x i)))
+ (struct-ref x ,i)))
common-slots (iota (length common-slots)))))))