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

fix program disassembly for meta-in-a-thunk

Browse source 
* module/system/vm/disasm.scm (disassemble-program): Fix for recent
  meta-in-a-thunk change.
This commit is contained in:
Andy Wingo 2008-09-09 08:27:49 +02:00
parent 6a01fabfd0
commit 624e533f4f
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/system/vm/disasm.scm
View file

@ -60,7 +60,7 @@
(if (pair? exts)
(disassemble-externals exts))
(if meta
(disassemble-meta meta))
(disassemble-meta (meta)))
;; Disassemble other bytecode in it
(for-each
(lambda (x)