summaryrefslogtreecommitdiff
path: root/scheme
diff options
context:
space:
mode:
Diffstat (limited to 'scheme')
-rw-r--r--scheme/aps/record-syntax.sls3
1 files changed, 2 insertions, 1 deletions
diff --git a/scheme/aps/record-syntax.sls b/scheme/aps/record-syntax.sls
index fa7612d..9ade13c 100644
--- a/scheme/aps/record-syntax.sls
+++ b/scheme/aps/record-syntax.sls
@@ -7,5 +7,6 @@
(def-syntax (record-syntax field-name ...)
(with-syntax (((i ...) (range (length #'(field-name ...)))))
#'(syntax-match (field-name ...)
- (sub (ctx v field-name) #'(vector-ref v i)) ...)))
+ (sub (ctx v field-name)
+ #'(vector-ref v i)) ...)))
)