~ chicken-core (chicken-5) a6b9105f77a1f34fbeb1997a778ccd6afa797121
commit a6b9105f77a1f34fbeb1997a778ccd6afa797121 Author: Evan Hanson <evhan@foldling.org> AuthorDate: Fri Jun 2 15:35:08 2017 +1200 Commit: Evan Hanson <evhan@foldling.org> CommitDate: Fri Jun 2 15:35:11 2017 +1200 Relax syntax check on `define-foreign-type` d17df1bf was overly strict when checking the "type" part of the `define-foreign-type` form, which might be a complex foreign type and not just a symbol. diff --git a/chicken-ffi-syntax.scm b/chicken-ffi-syntax.scm index 1bb05407..a825a221 100644 --- a/chicken-ffi-syntax.scm +++ b/chicken-ffi-syntax.scm @@ -203,7 +203,7 @@ '() (##sys#er-transformer (lambda (form r c) - (##sys#check-syntax 'define-foreign-type form '(_ symbol symbol . #(_ 0 2))) + (##sys#check-syntax 'define-foreign-type form '(_ symbol _ . #(_ 0 2))) `(##core#define-foreign-type ,@(cdr form))))) (##sys#extend-macro-environmentTrap