[Guile-commits] GNU Guile branch, master, updated. release_1-9-7-33-g2aba415

[Andy Wingo]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=2aba4151ac8f6705f270e617ebd54e89cea48b35

The branch, master has been updated
       via  2aba4151ac8f6705f270e617ebd54e89cea48b35 (commit)
      from  1bf78495e90d65911c9e012764deab589640f883 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 2aba4151ac8f6705f270e617ebd54e89cea48b35
Author: Andy Wingo <address@hidden>
Date:   Sun Jan 31 10:44:44 2010 +0100

    add return/nvalues
    
    * libguile/vm-i-system.c (return/nvalues): New instruction, like
      call/nargs.

-----------------------------------------------------------------------

Summary of changes:
 libguile/vm-i-system.c |    9 +++++++++
 1 files changed, 9 insertions(+), 0 deletions(-)

diff --git a/libguile/vm-i-system.c b/libguile/vm-i-system.c
index 258aa52..0d54fa5 100644
--- a/libguile/vm-i-system.c
+++ b/libguile/vm-i-system.c
@@ -1264,6 +1264,15 @@ VM_DEFINE_INSTRUCTION (68, return_values_star, 
"return/values*", 1, -1, -1)
   goto vm_return_values;
 }
 
+VM_DEFINE_INSTRUCTION (88, return_nvalues, "return/nvalues", 0, 1, -1)
+{
+  SCM n;
+  POP (n);
+  nvalues = scm_to_int (n);
+  ASSERT (nvalues >= 0);
+  goto vm_return_values;
+}
+
 VM_DEFINE_INSTRUCTION (69, truncate_values, "truncate-values", 2, -1, -1)
 {
   SCM x;


hooks/post-receive
-- 
GNU Guile