diff options
author | Paulo Cesar Pereira de Andrade <pcpa@mandriva.com.br> | 2008-03-11 21:48:58 -0300 |
---|---|---|
committer | Paulo Cesar Pereira de Andrade <pcpa@mandriva.com.br> | 2008-07-02 19:05:34 -0300 |
commit | cb30367f10f2e38065d336d331afdc50900de76d (patch) | |
tree | 9b78cc1191b3e14cdbe325d47185d42e82c93788 /lisp/bytecode.c | |
parent | 953664369cc66ba17c7b9c1939fd9d7f6c6137ad (diff) |
Generic lisp interface bug fixes including:
o Allow calling disassemble in all function types
o Don't limit amount of bytes to generate a hash table
o Allow "unreadable" symbol names to be keywords
Diffstat (limited to 'lisp/bytecode.c')
-rw-r--r-- | lisp/bytecode.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/bytecode.c b/lisp/bytecode.c index 8353a13..cc7d1c5 100644 --- a/lisp/bytecode.c +++ b/lisp/bytecode.c @@ -551,6 +551,8 @@ Lisp_Disassemble(LispBuiltin *builtin) name = bytecode = NULL; switch (OBJECT_TYPE(function)) { + case LispFunction_t: + function = function->data.atom->object; case LispAtom_t: name = function; atom = function->data.atom; |