diff options
Diffstat (limited to 'module/system/vm/disassembler.scm')
-rw-r--r-- | module/system/vm/disassembler.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/system/vm/disassembler.scm b/module/system/vm/disassembler.scm index b815c1e2a..1c6a0976c 100644 --- a/module/system/vm/disassembler.scm +++ b/module/system/vm/disassembler.scm @@ -181,7 +181,7 @@ (define-syntax define-disassembler (lambda (x) (syntax-case x () - ((_ name opcode arg ...) + ((_ name opcode kind arg ...) (with-syntax ((parse (id-append #'name #'parse- #'name))) #'(let ((parse (disassembler name opcode arg ...))) (vector-set! disassemblers opcode parse))))))) |