diff options
author | Andy Wingo <wingo@pobox.com> | 2009-06-24 15:14:00 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-06-24 15:14:00 +0200 |
commit | 60ed31d28bd2d27efd98bf25556b7c785c46da52 (patch) | |
tree | 78944b2a649d8f9d5c89dc8999ff06bcf4779072 /libguile/objcodes.c | |
parent | a84673a68bfdb6f46235fc6aa1d60c418c28a2e5 (diff) | |
download | guile-60ed31d28bd2d27efd98bf25556b7c785c46da52.tar.gz |
allow primcall ops to push 0 values
* libguile/objcodes.c (OBJCODE_COOKIE): Bump the objcode cookie. We'll
be doing this on incompatible changes until 2.0.
* libguile/vm-i-scheme.c (set_car, set_cdr, slot_set): These
instructions don't have natural return values -- so declare them that
way, that they push 0 values.
* module/language/tree-il/compile-glil.scm (flatten): When compiling
primitive calls, check `(instruction-pushes op)' to see how many
values that instruction will push, and do something appropriate,
instead of just assuming that all primcall ops push 1 value.
Diffstat (limited to 'libguile/objcodes.c')
-rw-r--r-- | libguile/objcodes.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/objcodes.c b/libguile/objcodes.c index 6b69fb77f..fc59c09a4 100644 --- a/libguile/objcodes.c +++ b/libguile/objcodes.c @@ -1,4 +1,4 @@ -/* Copyright (C) 2001 Free Software Foundation, Inc. +/* Copyright (C) 2001, 2009 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License @@ -34,7 +34,7 @@ #include "objcodes.h" /* nb, the length of the header should be a multiple of 8 bytes */ -#define OBJCODE_COOKIE "GOOF-0.5" +#define OBJCODE_COOKIE "GOOF-0.6" /* |