mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-29 08:20:20 +02:00
Code Activity

Fix more vm-engine comments

Browse source 
* libguile/vm-engine.c: Fix more comments.
This commit is contained in:
Andy Wingo 2013-11-30 18:00:26 +01:00
parent 2b6659e438
commit ddf0d7bb2e
1 changed files with 6 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

14
libguile/vm-engine.c
View file

@ -537,7 +537,7 @@ VM_NAME (scm_i_thread *current_thread, struct scm_vm *vp,
/* call proc:24 _:8 nlocals:24 /* call proc:24 _:8 nlocals:24
* *
* Call a procedure. PROC is the local corresponding to a procedure. * Call a procedure. PROC is the local corresponding to a procedure.
* The three values below PROC will be overwritten by the saved call * The two values below PROC will be overwritten by the saved call
* frame data. The new frame will have space for NLOCALS locals: one * frame data. The new frame will have space for NLOCALS locals: one
* for the procedure, and the rest for the arguments which should * for the procedure, and the rest for the arguments which should
* already have been pushed on. * already have been pushed on.
@ -2039,9 +2039,7 @@ VM_NAME (scm_i_thread *current_thread, struct scm_vm *vp,
/* push-fluid fluid:12 value:12 /* push-fluid fluid:12 value:12
* *
* Dynamically bind N fluids to values. The fluids are expected to be * Dynamically bind VALUE to FLUID.
* allocated in a continguous range on the stack, starting from
* FLUID-BASE. The values do not have this restriction.
*/ */
VM_DEFINE_OP (65, push_fluid, "push-fluid", OP1 (U8_U12_U12)) VM_DEFINE_OP (65, push_fluid, "push-fluid", OP1 (U8_U12_U12))
{ {
@ -2057,8 +2055,8 @@ VM_NAME (scm_i_thread *current_thread, struct scm_vm *vp,
/* pop-fluid _:24 /* pop-fluid _:24
* *
* Leave the dynamic extent of a with-fluids expression, restoring the * Leave the dynamic extent of a with-fluid* expression, restoring the
* fluids to their previous values. * fluid to its previous value.
*/ */
VM_DEFINE_OP (66, pop_fluid, "pop-fluid", OP1 (U8_X24)) VM_DEFINE_OP (66, pop_fluid, "pop-fluid", OP1 (U8_X24))
{ {
@ -2173,7 +2171,7 @@ VM_NAME (scm_i_thread *current_thread, struct scm_vm *vp,
/* No string-set! instruction, as there is no good fast path there. */ /* No string-set! instruction, as there is no good fast path there. */
/* string-to-number dst:12 src:12 /* string->number dst:12 src:12
* *
* Parse a string in SRC to a number, and store in DST. * Parse a string in SRC to a number, and store in DST.
*/ */
@ -2189,7 +2187,7 @@ VM_NAME (scm_i_thread *current_thread, struct scm_vm *vp,
NEXT (1); NEXT (1);
} }
/* string-to-symbol dst:12 src:12 /* string->symbol dst:12 src:12
* *
* Parse a string in SRC to a symbol, and store in DST. * Parse a string in SRC to a symbol, and store in DST.
*/ */