~bouncepaw/agidel-syntrans

3e26dfb9456e3d69fc5e09ba56ce859ec418d23d — Timur Ismagilov 5 years ago d654518
Fix `normal-signature`
1 files changed, 2 insertions(+), 2 deletions(-)

M prepare.scm
M prepare.scm => prepare.scm +2 -2
@@ 1,6 1,6 @@
(module
 agidel-syntrans.prepare
 (main)
 *
 (import scheme
         (chicken base)
         (prefix (agidel core) core/)


@@ 42,7 42,7 @@
   ;; Signature parser for macros with signatures that are proper lists:
   ;; (a a a a).
   (define normal-signature
     (lambda (args)
     (lambda args
       (let* ((signature-λ (map q/e->λ signature))
              (expected-length (length signature))
              (args-length (length args)))