diff options
author | Andy Wingo <wingo@pobox.com> | 2009-02-21 20:07:57 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-02-21 20:28:29 +0100 |
commit | aec8febc4621e87d9c3c1a10341ead00f784ff7f (patch) | |
tree | 3e414df090af0515c9a642b08503f62253e7c34b /module/language/scheme/compile-ghil.scm | |
parent | 594d9d4c482d91ccfbc474ec193baadde6ab11f7 (diff) | |
download | guile-aec8febc4621e87d9c3c1a10341ead00f784ff7f.tar.gz |
compile ecmascript's parser. yay! instant load-time!
* module/language/ghil/compile-glil.scm (codegen): If there are more than
255 arguments, make a list and use apply instead of calling directly.
* module/language/Makefile.am: Now we can compile parse.scm. Yay!
* module/language/scheme/compile-ghil.scm: Add a note.
* module/language/ecmascript/compile-ghil.scm: Add a note.
Diffstat (limited to 'module/language/scheme/compile-ghil.scm')
-rw-r--r-- | module/language/scheme/compile-ghil.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/module/language/scheme/compile-ghil.scm b/module/language/scheme/compile-ghil.scm index 475d50423..e4f1292bf 100644 --- a/module/language/scheme/compile-ghil.scm +++ b/module/language/scheme/compile-ghil.scm @@ -381,6 +381,8 @@ ;; FIXME: not hygienic, relies on @apply not being shadowed (,args (retrans `(@apply ,@args)))) +;; FIXME: we could add inliners for `list' and `vector' + (define-scheme-translator @apply ((,proc ,arg1 . ,args) (let ((args (cons (retrans arg1) (map retrans args)))) |