github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-03-10 12:48:25 +00:00
Code Issues Releases Wiki Activity

Fix DEFDEF in Maclisp 6502 assembler.

Browse Source 
It seems necessary to quote the list for the macro to work.
This commit is contained in:
Lars Brinkhoff
2021-04-29 12:41:13 +02:00
parent bf3a9807df
commit a08ad6d103
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/klotz/defdef.9 → src/klotz/defdef.10
View File

@@ -106,7 +106,7 @@
`(progn 'compile
(declare (special ,name))
(putprop ',name ,nbytes 'INSTRUCTION-LENGTH)
(putprop ',name ,(process-pattern pattern) 'ADDRESS-MODE-PATTERN)
(putprop ',name ',(process-pattern pattern) 'ADDRESS-MODE-PATTERN)
(putprop ',name
#'(lambda (OP ,@(variables-in-pattern pattern))
,@forms)