summaryrefslogtreecommitdiff
path: root/module/system/vm/assembler.scm
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2015-11-19 22:12:04 +0100
committerAndy Wingo <wingo@pobox.com>2015-12-01 11:30:54 +0100
commit8464cc576c0fb9cf70a51450795338996cc785ce (patch)
tree34e6f783a54ba0a7c1e37e552f3461a1e1a0b535 /module/system/vm/assembler.scm
parent870ac91a4e6a8f75a6d0e246f034c9b4dcc70317 (diff)
downloadguile-8464cc576c0fb9cf70a51450795338996cc785ce.tar.gz
Add bv-length instruction
* libguile/vm-engine.c (bv-length): New instruction. * module/language/cps/compile-bytecode.scm (compile-function): * module/language/cps/effects-analysis.scm (bv-length): * module/language/cps/primitives.scm (*instruction-aliases*): * module/language/cps/slot-allocation.scm (compute-var-representations): * module/language/cps/types.scm (bv-length): * module/language/tree-il/compile-cps.scm (convert): Add support for bv-length. * module/system/vm/assembler.scm: Export emit-bv-length.
Diffstat (limited to 'module/system/vm/assembler.scm')
-rw-r--r--module/system/vm/assembler.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/module/system/vm/assembler.scm b/module/system/vm/assembler.scm
index 21f4353c8..8155ebe3a 100644
--- a/module/system/vm/assembler.scm
+++ b/module/system/vm/assembler.scm
@@ -160,6 +160,7 @@
emit-make-array
(emit-scm->f64* . emit-scm->f64)
(emit-f64->scm* . emit-f64->scm)
+ (emit-bv-length* . emit-bv-length)
(emit-bv-u8-ref* . emit-bv-u8-ref)
(emit-bv-s8-ref* . emit-bv-s8-ref)
(emit-bv-u16-ref* . emit-bv-u16-ref)