diff options
author | Andy Wingo <wingo@pobox.com> | 2009-08-05 11:55:42 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-08-05 11:55:42 +0200 |
commit | 7382f23e58725eef2f7a374ec101a42c0192527e (patch) | |
tree | e89dacc9c0918950aa9f67bcfccbcb338a3055e8 /libguile/vm-i-system.c | |
parent | f4863880f5ef539cb545999c19b6b5c0eec9382d (diff) | |
download | guile-7382f23e58725eef2f7a374ec101a42c0192527e.tar.gz |
add1 and sub1 instructions
* libguile/vm-i-scheme.c: Add add1 and sub1 instructions.
* module/language/tree-il/compile-glil.scm: Compile 1+ and 1- to add1
and sub1.
* module/language/tree-il/primitives.scm (define-primitive-expander):
Add support for `if' statements in the consequent.
(+, -): Compile (- x 1), (+ x 1), and (+ 1 x) to 1- or 1+ as
appropriate.
(1-): Remove this one. Seems we forgot 1+ before, but we weren't
compiling it nicely anyway.
* test-suite/tests/tree-il.test ("void"): Fix expected compilation of (+
(void) 1) to allow for add1.
Diffstat (limited to 'libguile/vm-i-system.c')
0 files changed, 0 insertions, 0 deletions