~ chicken-core (chicken-5) 82c7c06067ad02f7e9914b3e42983c79ff6b1d3e
commit 82c7c06067ad02f7e9914b3e42983c79ff6b1d3e 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:46:43 2017 +1200 Relax syntax check on `define-foreign-type` 7079f685 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 c9970713..788ba112 100644 --- a/chicken-ffi-syntax.scm +++ b/chicken-ffi-syntax.scm @@ -195,7 +195,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