diff options
Diffstat (limited to 'module/system/base')
| -rw-r--r-- | module/system/base/syntax.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/system/base/syntax.scm b/module/system/base/syntax.scm index 1cabbbcb7..0bc16e584 100644 --- a/module/system/base/syntax.scm +++ b/module/system/base/syntax.scm @@ -80,7 +80,7 @@ (set! ,tail (cdr ,tail)) _x))))) opts) - (make-struct ,name 0 ,@slot-names)))) + (make-struct/no-tail ,name ,@slot-names)))) (define ,(symbol-append stem '?) (record-predicate ,name)) ,@(map (lambda (sname) `(define ,(symbol-append stem '- sname) |