1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-28 05:50:30 +02:00
guile/module/system/vm
Ludovic Courtes 23b587b0a1 Encode the length of constant lists/vectors on 2 octets instead of 1.
* module/system/vm/assemble.scm (dump-object!): New sub-procedure
  `too-long'.  For `list' and `vector', encode the length on 2 octets
  instead of 1 and report an error if a list/vector is longer than 65535.

* module/system/vm/disasm.scm (original-value): New sub-procedure
  `list-or-vector?'; when true, return the number of elements for that
  list/vector.

* src/vm_system.c (list): Fetch the length as a two-octet integer.
  (vector): Likewise.

* testsuite/t-basic-contructs.scm: New.

* testsuite/Makefile.am (vm_test_files): Added the above file.

* module/system/vm/core.scm (load-compiled): Added a bit of
  documentation.

git-archimport-id: lcourtes@laas.fr--2005-mobile/guile-vm--mobile--0.6--patch-11
2008-04-25 19:09:30 +02:00
..
.cvsignore *** empty log message *** 2001-04-22 02:13:48 +00:00
assemble.scm Encode the length of constant lists/vectors on 2 octets instead of 1. 2008-04-25 19:09:30 +02:00
conv.scm Fixed an "unbound variable" in `(system vm conv)'. 2008-04-25 19:09:30 +02:00
core.scm Encode the length of constant lists/vectors on 2 octets instead of 1. 2008-04-25 19:09:30 +02:00
debug.scm Tried compiling more code; augmented the doc. 2008-04-25 19:09:30 +02:00
disasm.scm Encode the length of constant lists/vectors on 2 octets instead of 1. 2008-04-25 19:09:30 +02:00
frame.scm Tried compiling more code; augmented the doc. 2008-04-25 19:09:30 +02:00
Makefile.am Tried compiling more code; augmented the doc. 2008-04-25 19:09:30 +02:00
profile.scm *** empty log message *** 2001-04-23 04:28:13 +00:00
trace.scm *** empty log message *** 2001-04-23 06:17:52 +00:00