=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== picolisp-20.6/lib/map-58-caadar (314 . "@src64/subr.l") picolisp-20.6/lib/map:59:caaddr (337 . "@src64/subr.l") picolisp-20.6/lib/map-60-caadr (116 . "@src64/subr.l") ############################################## picolisp-20.6/lib/map-66-cadddr (438 . "@src64/subr.l") picolisp-20.6/lib/map:67:caddr (156 . "@src64/subr.l") picolisp-20.6/lib/map-68-cadr (45 . "@src64/subr.l") ############################################## picolisp-20.6/lib/map-78-cdadar (516 . "@src64/subr.l") picolisp-20.6/lib/map:79:cdaddr (542 . "@src64/subr.l") picolisp-20.6/lib/map-80-cdadr (199 . "@src64/subr.l") ############################################## picolisp-20.6/lib/xmlrpc.l-63- (cons picolisp-20.6/lib/xmlrpc.l:64: (xmlrpcKey (caddr (assoc 'name L))) picolisp-20.6/lib/xmlrpc.l:65: (xmlrpcValue (caddr (assoc 'value L))) ) ) ) picolisp-20.6/lib/xmlrpc.l-66- (cddr Lst) ) ) ) ) ) ############################################## picolisp-20.6/doc/ChangeLog-3311-10oct15 picolisp-20.6/doc/ChangeLog:3312: Changed asm syntax 'push/pop F' to 'push/pop zsc' and 'push/pop x' picolisp-20.6/doc/ChangeLog-3313- src64/arch/x86-64.l ############################################## picolisp-20.6/src/pico.h-181-#define cadar(x) (car(cdr(car(x)))) picolisp-20.6/src/pico.h:182:#define caddr(x) (car(cdr(cdr(x)))) picolisp-20.6/src/pico.h-183-#define cdaar(x) (cdr(car(car(x)))) ############################################## picolisp-20.6/src/pico.h-189-#define caadar(x) (car(car(cdr(car(x))))) picolisp-20.6/src/pico.h:190:#define caaddr(x) (car(car(cdr(cdr(x))))) picolisp-20.6/src/pico.h-191-#define cadaar(x) (car(cdr(car(car(x))))) ############################################## picolisp-20.6/src/pico.h-197-#define cdadar(x) (cdr(car(cdr(car(x))))) picolisp-20.6/src/pico.h:198:#define cdaddr(x) (cdr(car(cdr(cdr(x))))) picolisp-20.6/src/pico.h-199-#define cddaar(x) (cdr(cdr(car(car(x))))) ############################################## picolisp-20.6/src/pico.h-446-any doCaadar(any); picolisp-20.6/src/pico.h:447:any doCaaddr(any); picolisp-20.6/src/pico.h-448-any doCaadr(any); ############################################## picolisp-20.6/src/pico.h-454-any doCadddr(any); picolisp-20.6/src/pico.h:455:any doCaddr(any); picolisp-20.6/src/pico.h-456-any doCadr(any); ############################################## picolisp-20.6/src/pico.h-465-any doCdadar(any); picolisp-20.6/src/pico.h:466:any doCdaddr(any); picolisp-20.6/src/pico.h-467-any doCdadr(any); ############################################## picolisp-20.6/src/main.c-1013- if (isCell(z)) picolisp-20.6/src/main.c:1014: return mkDat(xCnt(ex, car(z)), xCnt(ex, cadr(z)), xCnt(ex, caddr(z))); picolisp-20.6/src/main.c-1015- if (!isCell(x = cdr(x))) { ############################################## picolisp-20.6/src/main.c-1063- if (isCell(z)) picolisp-20.6/src/main.c:1064: return mkTime(xCnt(ex, car(z)), xCnt(ex, cadr(z)), isCell(cddr(z))? xCnt(ex, caddr(z)) : 0); picolisp-20.6/src/main.c-1065- if (!isCell(x = cdr(x))) { ############################################## picolisp-20.6/src/subr.c-71- picolisp-20.6/src/subr.c:72:any doCaddr(any ex) { picolisp-20.6/src/subr.c-73- any x = cdr(ex); ############################################## picolisp-20.6/src/subr.c-75- NeedLst(ex,x); picolisp-20.6/src/subr.c:76: return caddr(x); picolisp-20.6/src/subr.c-77-} ############################################## picolisp-20.6/src/subr.c-127- picolisp-20.6/src/subr.c:128:any doCaaddr(any ex) { picolisp-20.6/src/subr.c-129- any x = cdr(ex); ############################################## picolisp-20.6/src/subr.c-131- NeedLst(ex,x); picolisp-20.6/src/subr.c:132: return caaddr(x); picolisp-20.6/src/subr.c-133-} ############################################## picolisp-20.6/src/subr.c-183- picolisp-20.6/src/subr.c:184:any doCdaddr(any ex) { picolisp-20.6/src/subr.c-185- any x = cdr(ex); ############################################## picolisp-20.6/src/subr.c-187- NeedLst(ex,x); picolisp-20.6/src/subr.c:188: return cdaddr(x); picolisp-20.6/src/subr.c-189-} ############################################## picolisp-20.6/src/subr.c-1712- picolisp-20.6/src/subr.c:1713: if (!isNum(caddr(x))) picolisp-20.6/src/subr.c-1714- return lookup(car(data(*Pnl)), cadr(x)); picolisp-20.6/src/subr.c:1715: for (i = unDig(caddr(x)), y = data(*Pnl); (i -= 2) > 0;) picolisp-20.6/src/subr.c-1716- y = cdr(y); ############################################## picolisp-20.6/src/io.c-2298- pathString(x, nm); picolisp-20.6/src/io.c:2299: x = caddr(ex), x = EVAL(x); picolisp-20.6/src/io.c-2300- while ((fd = open(nm, isNil(x)? O_CREAT|O_RDWR : O_RDONLY, 0666)) < 0) { ############################################## picolisp-20.6/src64/lib/fmt.c.l-22- picolisp-20.6/src64/lib/fmt.c.l:23:(asm word (X) picolisp-20.6/src64/lib/fmt.c.l-24- (conc (cdar *AsmData) ############################################## picolisp-20.6/src64/lib/fmt.c.l-26- picolisp-20.6/src64/lib/fmt.c.l:27:(asm byte (N) picolisp-20.6/src64/lib/fmt.c.l-28- (conc (cdar *AsmData) (cons N)) ) picolisp-20.6/src64/lib/fmt.c.l-29- picolisp-20.6/src64/lib/fmt.c.l:30:(asm bytes (Lst) picolisp-20.6/src64/lib/fmt.c.l-31- (conc (cdar *AsmData) (copy Lst)) ) picolisp-20.6/src64/lib/fmt.c.l-32- picolisp-20.6/src64/lib/fmt.c.l:33:(asm hx2 (Lst) picolisp-20.6/src64/lib/fmt.c.l-34- (conc (cdar *AsmData) ############################################## picolisp-20.6/src64/lib/fmt.c.l-56- picolisp-20.6/src64/lib/fmt.c.l:57:(asm ascii (Str) picolisp-20.6/src64/lib/fmt.c.l-58- (conc (cdar *AsmData) (escCstr Str)) ) picolisp-20.6/src64/lib/fmt.c.l-59- picolisp-20.6/src64/lib/fmt.c.l:60:(asm asciz (Str) picolisp-20.6/src64/lib/fmt.c.l-61- (conc (cdar *AsmData) (escCstr Str) (cons 0)) ) ############################################## picolisp-20.6/src64/lib/fmt.s.l-20- picolisp-20.6/src64/lib/fmt.s.l:21:(asm word (N) picolisp-20.6/src64/lib/fmt.s.l-22- (prinst ".quad" N) ) picolisp-20.6/src64/lib/fmt.s.l-23- picolisp-20.6/src64/lib/fmt.s.l:24:(asm byte (N) picolisp-20.6/src64/lib/fmt.s.l-25- (prinst ".byte" N) ) picolisp-20.6/src64/lib/fmt.s.l-26- picolisp-20.6/src64/lib/fmt.s.l:27:(asm bytes (Lst) picolisp-20.6/src64/lib/fmt.s.l-28- (prinst ".byte" (glue ", " Lst)) ) picolisp-20.6/src64/lib/fmt.s.l-29- picolisp-20.6/src64/lib/fmt.s.l:30:(asm hx2 (Lst) picolisp-20.6/src64/lib/fmt.s.l-31- (prinst ".short" (glue ", " (mapcar hex Lst))) ) picolisp-20.6/src64/lib/fmt.s.l-32- picolisp-20.6/src64/lib/fmt.s.l:33:(asm ascii (Str) picolisp-20.6/src64/lib/fmt.s.l-34- (prinst ".ascii" (pack "\"" Str "\"")) ) picolisp-20.6/src64/lib/fmt.s.l-35- picolisp-20.6/src64/lib/fmt.s.l:36:(asm asciz (Str) picolisp-20.6/src64/lib/fmt.s.l-37- (prinst ".asciz" (pack "\"" Str "\"")) ) ############################################## picolisp-20.6/src64/lib/asm.l-93- picolisp-20.6/src64/lib/asm.l:94:(de asm Args picolisp-20.6/src64/lib/asm.l-95- (cond picolisp-20.6/src64/lib/asm.l-96- ((=T (car Args)) picolisp-20.6/src64/lib/asm.l:97: (put (car (setq Args (cdr Args))) 'asm NIL) ) picolisp-20.6/src64/lib/asm.l-98- ((== 'TOS (car Args)) picolisp-20.6/src64/lib/asm.l-99- (put (car (setq Args (cdr Args))) 'TOS T) ) ) picolisp-20.6/src64/lib/asm.l:100: (def (car Args) 'asm (cdr Args)) ) picolisp-20.6/src64/lib/asm.l-101- picolisp-20.6/src64/lib/asm.l:102:(asm asm (Val) picolisp-20.6/src64/lib/asm.l-103- (prinl " " Val) ) ############################################## picolisp-20.6/src64/lib/asm.l-509- picolisp-20.6/src64/lib/asm.l:510:(asm if (Sym) picolisp-20.6/src64/lib/asm.l-511- (flowCondition Sym (push '*IfStack (flowLabel)) T) ) picolisp-20.6/src64/lib/asm.l-512- picolisp-20.6/src64/lib/asm.l:513:(asm else () picolisp-20.6/src64/lib/asm.l-514- (let Lbl (car *IfStack) ############################################## picolisp-20.6/src64/lib/asm.l-518- picolisp-20.6/src64/lib/asm.l:519:(asm end () picolisp-20.6/src64/lib/asm.l-520- (link (cons ': (pop '*IfStack))) ) picolisp-20.6/src64/lib/asm.l-521- picolisp-20.6/src64/lib/asm.l:522:(asm do () picolisp-20.6/src64/lib/asm.l-523- (link (cons ': (push '*DoStack (flowLabel)))) ) picolisp-20.6/src64/lib/asm.l-524- picolisp-20.6/src64/lib/asm.l:525:(asm while (Sym) picolisp-20.6/src64/lib/asm.l-526- (flowCondition Sym ############################################## picolisp-20.6/src64/lib/asm.l-531- picolisp-20.6/src64/lib/asm.l:532:(asm until (Sym) picolisp-20.6/src64/lib/asm.l-533- (let X (pop '*DoStack) ############################################## picolisp-20.6/src64/lib/asm.l-536- picolisp-20.6/src64/lib/asm.l:537:(asm break (Sym) picolisp-20.6/src64/lib/asm.l-538- (flowCondition Sym ############################################## picolisp-20.6/src64/lib/asm.l-542- picolisp-20.6/src64/lib/asm.l:543:(asm continue (Sym) picolisp-20.6/src64/lib/asm.l-544- (flowCondition Sym (fin (car *DoStack))) ) picolisp-20.6/src64/lib/asm.l-545- picolisp-20.6/src64/lib/asm.l:546:(asm loop () picolisp-20.6/src64/lib/asm.l-547- (let X (pop '*DoStack) ############################################## picolisp-20.6/src64/lib/asm.l-557- (addc (destination) "*Mode" (source) "*Mode") picolisp-20.6/src64/lib/asm.l:558: (asm (read)) picolisp-20.6/src64/lib/asm.l-559- (align (operand (read))) ############################################## picolisp-20.6/src64/lib/asm.l-675- picolisp-20.6/src64/lib/asm.l:676:(asm :: (Src Lbl) picolisp-20.6/src64/lib/asm.l-677- (idxTags Lbl Src) ############################################## picolisp-20.6/src64/lib/asm.l-679- picolisp-20.6/src64/lib/asm.l:680:(asm initFun (Src Lbl Name Val) picolisp-20.6/src64/lib/asm.l-681- (initSym Src Lbl Name Val (pack Val (and *AlignedCode "+2"))) ) picolisp-20.6/src64/lib/asm.l-682- picolisp-20.6/src64/lib/asm.l:683:(asm initSym (Src Lbl Name Val) picolisp-20.6/src64/lib/asm.l-684- (initSym Src Lbl Name Val Val) ) ############################################## picolisp-20.6/src64/lib/asm.l-721- (put (car Args) 'noCC Sym) picolisp-20.6/src64/lib/asm.l:722: (def Sym 'asm (cdr Args)) ) ) picolisp-20.6/src64/lib/asm.l-723- ############################################## picolisp-20.6/src64/arch/arm64.l-294- picolisp-20.6/src64/arch/arm64.l:295:(asm nop () picolisp-20.6/src64/arch/arm64.l-296- (comment 'nop) ############################################## picolisp-20.6/src64/arch/arm64.l-298- picolisp-20.6/src64/arch/arm64.l:299:(asm align (N) picolisp-20.6/src64/arch/arm64.l-300- (prinst ".balign" N) ) picolisp-20.6/src64/arch/arm64.l-301- picolisp-20.6/src64/arch/arm64.l:302:(asm skip (N) picolisp-20.6/src64/arch/arm64.l-303- (if (== 'data *Section) ############################################## picolisp-20.6/src64/arch/arm64.l-307-# Move data picolisp-20.6/src64/arch/arm64.l:308:(asm ld (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-309- (comment 'ld Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-321- picolisp-20.6/src64/arch/arm64.l:322:(asm ld2 (Src S) picolisp-20.6/src64/arch/arm64.l-323- (comment 'ld2 Src) ############################################## picolisp-20.6/src64/arch/arm64.l-325- picolisp-20.6/src64/arch/arm64.l:326:(asm ld4 (Src S) picolisp-20.6/src64/arch/arm64.l-327- (comment 'ld4 Src) ############################################## picolisp-20.6/src64/arch/arm64.l-329- picolisp-20.6/src64/arch/arm64.l:330:(asm ldz (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-331- (comment 'ldz Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-338- picolisp-20.6/src64/arch/arm64.l:339:(asm ldnz (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-340- (comment 'ldnz Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-347- picolisp-20.6/src64/arch/arm64.l:348:(asm lea (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-349- (comment 'lea Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-353- picolisp-20.6/src64/arch/arm64.l:354:(asm st2 (Dst D) picolisp-20.6/src64/arch/arm64.l-355- (comment 'st2 Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-357- picolisp-20.6/src64/arch/arm64.l:358:(asm st4 (Dst D) picolisp-20.6/src64/arch/arm64.l-359- (comment 'st4 Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-361- picolisp-20.6/src64/arch/arm64.l:362:(asm xchg (Dst D Dst2 D2) picolisp-20.6/src64/arch/arm64.l-363- (comment 'xchg Dst Dst2) ############################################## picolisp-20.6/src64/arch/arm64.l-372- picolisp-20.6/src64/arch/arm64.l:373:(asm movn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/arm64.l-374- (comment 'movn Dst Src Cnt) ############################################## picolisp-20.6/src64/arch/arm64.l-383- picolisp-20.6/src64/arch/arm64.l:384:(asm mset (Dst D Cnt C) picolisp-20.6/src64/arch/arm64.l-385- (comment 'mset Dst Cnt) ############################################## picolisp-20.6/src64/arch/arm64.l-392- picolisp-20.6/src64/arch/arm64.l:393:(asm save (Src S End E Dst D) picolisp-20.6/src64/arch/arm64.l-394- (comment 'save Src End Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-403- picolisp-20.6/src64/arch/arm64.l:404:(asm load (Dst D End E Src S) picolisp-20.6/src64/arch/arm64.l-405- (comment 'load Dst End Src) ############################################## picolisp-20.6/src64/arch/arm64.l-416-# add picolisp-20.6/src64/arch/arm64.l:417:(de addAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-418- (comment 'add Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-433- picolisp-20.6/src64/arch/arm64.l:434:(asm add (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:435: (addAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-436- picolisp-20.6/src64/arch/arm64.l-437-(asmNoCC add (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:438: (addAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-439- picolisp-20.6/src64/arch/arm64.l-440-# addc picolisp-20.6/src64/arch/arm64.l:441:(de addcAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-442- (comment 'addc Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-457- picolisp-20.6/src64/arch/arm64.l:458:(asm addc (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:459: (addcAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-460- picolisp-20.6/src64/arch/arm64.l-461-(asmNoCC addc (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:462: (addcAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-463- picolisp-20.6/src64/arch/arm64.l-464-# sub picolisp-20.6/src64/arch/arm64.l:465:(de subAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-466- (comment 'sub Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-471- picolisp-20.6/src64/arch/arm64.l:472:(asm sub (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:473: (subAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-474- picolisp-20.6/src64/arch/arm64.l-475-(asmNoCC sub (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:476: (subAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-477- picolisp-20.6/src64/arch/arm64.l-478-# subb picolisp-20.6/src64/arch/arm64.l:479:(de subbAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-480- (comment 'subb Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-485- picolisp-20.6/src64/arch/arm64.l:486:(asm subb (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:487: (subbAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-488- picolisp-20.6/src64/arch/arm64.l-489-(asmNoCC subb (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:490: (subbAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-491- picolisp-20.6/src64/arch/arm64.l-492-# inc picolisp-20.6/src64/arch/arm64.l:493:(de incAsm (CC Dst D) picolisp-20.6/src64/arch/arm64.l-494- (comment 'inc Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-499- picolisp-20.6/src64/arch/arm64.l:500:(asm inc (Dst D) picolisp-20.6/src64/arch/arm64.l:501: (incAsm T Dst D) ) picolisp-20.6/src64/arch/arm64.l-502- picolisp-20.6/src64/arch/arm64.l-503-(asmNoCC inc (Dst D) picolisp-20.6/src64/arch/arm64.l:504: (incAsm NIL Dst D) ) picolisp-20.6/src64/arch/arm64.l-505- picolisp-20.6/src64/arch/arm64.l-506-# dec picolisp-20.6/src64/arch/arm64.l:507:(de decAsm (CC Dst D) picolisp-20.6/src64/arch/arm64.l-508- (comment 'dec Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-513- picolisp-20.6/src64/arch/arm64.l:514:(asm dec (Dst D) picolisp-20.6/src64/arch/arm64.l:515: (decAsm T Dst D) ) picolisp-20.6/src64/arch/arm64.l-516- picolisp-20.6/src64/arch/arm64.l-517-(asmNoCC dec (Dst D) picolisp-20.6/src64/arch/arm64.l:518: (decAsm NIL Dst D) ) picolisp-20.6/src64/arch/arm64.l-519- picolisp-20.6/src64/arch/arm64.l-520-# not picolisp-20.6/src64/arch/arm64.l:521:(asm not (Dst D) picolisp-20.6/src64/arch/arm64.l-522- (comment 'not Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-530-# neg picolisp-20.6/src64/arch/arm64.l:531:(de negAsm (CC Dst D) picolisp-20.6/src64/arch/arm64.l-532- (comment 'neg Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-537- picolisp-20.6/src64/arch/arm64.l:538:(asm neg (Dst D) picolisp-20.6/src64/arch/arm64.l:539: (negAsm T Dst D) ) picolisp-20.6/src64/arch/arm64.l-540- picolisp-20.6/src64/arch/arm64.l-541-(asmNoCC neg (Dst D) picolisp-20.6/src64/arch/arm64.l:542: (negAsm NIL Dst D) ) picolisp-20.6/src64/arch/arm64.l-543- picolisp-20.6/src64/arch/arm64.l-544-# and picolisp-20.6/src64/arch/arm64.l:545:(de andAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-546- (comment 'and Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-559- picolisp-20.6/src64/arch/arm64.l:560:(asm and (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:561: (andAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-562- picolisp-20.6/src64/arch/arm64.l-563-(asmNoCC and (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:564: (andAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-565- picolisp-20.6/src64/arch/arm64.l-566-# or picolisp-20.6/src64/arch/arm64.l:567:(de orAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-568- (comment 'or Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-587- picolisp-20.6/src64/arch/arm64.l:588:(asm or (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:589: (orAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-590- picolisp-20.6/src64/arch/arm64.l-591-(asmNoCC or (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:592: (orAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-593- picolisp-20.6/src64/arch/arm64.l-594-# xor picolisp-20.6/src64/arch/arm64.l:595:(de xorAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-596- (comment 'xor Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-604- picolisp-20.6/src64/arch/arm64.l:605:(asm xor (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:606: (xorAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-607- picolisp-20.6/src64/arch/arm64.l-608-(asmNoCC xor (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:609: (xorAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-610- picolisp-20.6/src64/arch/arm64.l-611-# off picolisp-20.6/src64/arch/arm64.l:612:(de offAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-613- (comment 'off Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-620- picolisp-20.6/src64/arch/arm64.l:621:(asm off (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:622: (offAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-623- picolisp-20.6/src64/arch/arm64.l-624-(asmNoCC off (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:625: (offAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-626- picolisp-20.6/src64/arch/arm64.l-627-# test picolisp-20.6/src64/arch/arm64.l:628:(asm test (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-629- (comment 'test Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-642-# shl picolisp-20.6/src64/arch/arm64.l:643:(de shlAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-644- (comment 'shl Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-661- picolisp-20.6/src64/arch/arm64.l:662:(asm shl (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:663: (shlAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-664- picolisp-20.6/src64/arch/arm64.l-665-(asmNoCC shl (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:666: (shlAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-667- picolisp-20.6/src64/arch/arm64.l-668-# shr picolisp-20.6/src64/arch/arm64.l:669:(de shrAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-670- (comment 'shr Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-687- picolisp-20.6/src64/arch/arm64.l:688:(asm shr (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:689: (shrAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-690- picolisp-20.6/src64/arch/arm64.l-691-(asmNoCC shr (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:692: (shrAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-693- picolisp-20.6/src64/arch/arm64.l-694-# rol picolisp-20.6/src64/arch/arm64.l:695:(asm rol (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-696- (comment 'rol Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-704-# ror picolisp-20.6/src64/arch/arm64.l:705:(asm ror (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-706- (comment 'ror Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-712-# rxl picolisp-20.6/src64/arch/arm64.l:713:(de rxlAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-714- (comment 'rxl Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-724- picolisp-20.6/src64/arch/arm64.l:725:(asm rxl (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:726: (rxlAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-727- picolisp-20.6/src64/arch/arm64.l-728-(asmNoCC rxl (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:729: (rxlAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-730- picolisp-20.6/src64/arch/arm64.l-731-# rxr picolisp-20.6/src64/arch/arm64.l:732:(de rxrAsm (CC Dst D Src S) picolisp-20.6/src64/arch/arm64.l-733- (comment 'rxr Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-743- picolisp-20.6/src64/arch/arm64.l:744:(asm rxr (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:745: (rxrAsm T Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-746- picolisp-20.6/src64/arch/arm64.l-747-(asmNoCC rxr (Dst D Src S) picolisp-20.6/src64/arch/arm64.l:748: (rxrAsm NIL Dst D Src S) ) picolisp-20.6/src64/arch/arm64.l-749- picolisp-20.6/src64/arch/arm64.l-750-# mul picolisp-20.6/src64/arch/arm64.l:751:(asm mul (Src S) picolisp-20.6/src64/arch/arm64.l-752- (comment 'mul Src) ############################################## picolisp-20.6/src64/arch/arm64.l-759-# div picolisp-20.6/src64/arch/arm64.l:760:(asm TOS div (Src S) picolisp-20.6/src64/arch/arm64.l-761- (comment 'div Src) ############################################## picolisp-20.6/src64/arch/arm64.l-765-# zxt picolisp-20.6/src64/arch/arm64.l:766:(asm zxt () # 8 bit -> 64 bit picolisp-20.6/src64/arch/arm64.l-767- (comment 'zxt) ############################################## picolisp-20.6/src64/arch/arm64.l-770-# eq picolisp-20.6/src64/arch/arm64.l:771:(asm eq () picolisp-20.6/src64/arch/arm64.l-772- (comment 'eq) ############################################## picolisp-20.6/src64/arch/arm64.l-775-# gt picolisp-20.6/src64/arch/arm64.l:776:(asm gt () picolisp-20.6/src64/arch/arm64.l-777- (comment 'gt) ############################################## picolisp-20.6/src64/arch/arm64.l-780-# lt picolisp-20.6/src64/arch/arm64.l:781:(asm lt () picolisp-20.6/src64/arch/arm64.l-782- (comment 'lt) ############################################## picolisp-20.6/src64/arch/arm64.l-785-# setx picolisp-20.6/src64/arch/arm64.l:786:(asm setx () picolisp-20.6/src64/arch/arm64.l-787- (comment 'setx) ############################################## picolisp-20.6/src64/arch/arm64.l-790-# clrx picolisp-20.6/src64/arch/arm64.l:791:(asm clrx () picolisp-20.6/src64/arch/arm64.l-792- (comment 'clrx) ############################################## picolisp-20.6/src64/arch/arm64.l-795-# Comparisons picolisp-20.6/src64/arch/arm64.l:796:(asm cmp (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-797- (comment 'cmp Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-819- picolisp-20.6/src64/arch/arm64.l:820:(asm cmpn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/arm64.l-821- (comment 'cmpn Dst Src Cnt) ############################################## picolisp-20.6/src64/arch/arm64.l-833- picolisp-20.6/src64/arch/arm64.l:834:(asm slen (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-835- (comment 'slen Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-845- picolisp-20.6/src64/arch/arm64.l:846:(asm memb (Src S Cnt C) picolisp-20.6/src64/arch/arm64.l-847- (comment 'memb Src Cnt) ############################################## picolisp-20.6/src64/arch/arm64.l-861- picolisp-20.6/src64/arch/arm64.l:862:(asm null (Src S) picolisp-20.6/src64/arch/arm64.l-863- (comment 'null Src) ############################################## picolisp-20.6/src64/arch/arm64.l-865- picolisp-20.6/src64/arch/arm64.l:866:(asm null/jz (Src S Adr A) # optimize picolisp-20.6/src64/arch/arm64.l-867- (comment 'null Src "--" "jz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-869- picolisp-20.6/src64/arch/arm64.l:870:(asm null/ldz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-871- (comment 'null Src "--" "ldz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-876- picolisp-20.6/src64/arch/arm64.l:877:(asm null/jnz (Src S Adr A) picolisp-20.6/src64/arch/arm64.l-878- (comment 'null Src "--" "jnz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-880- picolisp-20.6/src64/arch/arm64.l:881:(asm null/ldnz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-882- (comment 'null Src "--" "ldnz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-888- picolisp-20.6/src64/arch/arm64.l:889:(asm nul4 () picolisp-20.6/src64/arch/arm64.l-890- (comment 'nul4) ############################################## picolisp-20.6/src64/arch/arm64.l-892- picolisp-20.6/src64/arch/arm64.l:893:(asm nul4/jz (Adr A) # optimize picolisp-20.6/src64/arch/arm64.l-894- (comment 'nul4 "--" "jz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-896- picolisp-20.6/src64/arch/arm64.l:897:(asm nul4/ldz (Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-898- (comment 'nul4 "--" "ldz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-903- picolisp-20.6/src64/arch/arm64.l:904:(asm nul4/jnz (Adr A) picolisp-20.6/src64/arch/arm64.l-905- (comment 'nul4 "--" "jnz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-907- picolisp-20.6/src64/arch/arm64.l:908:(asm nul4/ldnz (Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-909- (comment 'nul4 "--" "ldnz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-916-# Byte addressing picolisp-20.6/src64/arch/arm64.l:917:(asm set (Dst D Src S) picolisp-20.6/src64/arch/arm64.l-918- (comment 'set Dst Src) ############################################## picolisp-20.6/src64/arch/arm64.l-922- picolisp-20.6/src64/arch/arm64.l:923:(asm nul (Src S) picolisp-20.6/src64/arch/arm64.l-924- (comment 'nul Src) ############################################## picolisp-20.6/src64/arch/arm64.l-928- picolisp-20.6/src64/arch/arm64.l:929:(asm nul/jz (Src S Adr A) # optimize picolisp-20.6/src64/arch/arm64.l-930- (comment 'nul Src "--" "jz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-934- picolisp-20.6/src64/arch/arm64.l:935:(asm nul/jnz (Src S Adr A) picolisp-20.6/src64/arch/arm64.l-936- (comment 'nul Src "--" "jnz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-942-# Types picolisp-20.6/src64/arch/arm64.l:943:(asm cnt (Src S) picolisp-20.6/src64/arch/arm64.l-944- (comment 'cnt Src) ############################################## picolisp-20.6/src64/arch/arm64.l-946- picolisp-20.6/src64/arch/arm64.l:947:(asm cnt/jz (Src S Adr A) # optimize picolisp-20.6/src64/arch/arm64.l-948- (comment 'cnt Src "--" "jz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-950- picolisp-20.6/src64/arch/arm64.l:951:(asm cnt/ldz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-952- (comment 'cnt Src "--" "ldz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-957- picolisp-20.6/src64/arch/arm64.l:958:(asm cnt/jnz (Src S Adr A) picolisp-20.6/src64/arch/arm64.l-959- (comment 'cnt Src "--" "jnz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-961- picolisp-20.6/src64/arch/arm64.l:962:(asm cnt/ldnz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-963- (comment 'cnt Src "--" "ldnz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-969- picolisp-20.6/src64/arch/arm64.l:970:(asm big (Src S) picolisp-20.6/src64/arch/arm64.l-971- (comment 'big Src) ############################################## picolisp-20.6/src64/arch/arm64.l-973- picolisp-20.6/src64/arch/arm64.l:974:(asm big/jz (Src S Adr A) # optimize picolisp-20.6/src64/arch/arm64.l-975- (comment 'big Src "--" "jz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-977- picolisp-20.6/src64/arch/arm64.l:978:(asm big/ldz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-979- (comment 'big Src "--" "ldz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-984- picolisp-20.6/src64/arch/arm64.l:985:(asm big/jnz (Src S Adr A) picolisp-20.6/src64/arch/arm64.l-986- (comment 'big Src "--" "jnz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-988- picolisp-20.6/src64/arch/arm64.l:989:(asm big/ldnz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-990- (comment 'big Src "--" "ldnz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-996- picolisp-20.6/src64/arch/arm64.l:997:(asm num (Src S) picolisp-20.6/src64/arch/arm64.l-998- (comment 'num Src) ############################################## picolisp-20.6/src64/arch/arm64.l-1001- picolisp-20.6/src64/arch/arm64.l:1002:(asm sym (Src S) picolisp-20.6/src64/arch/arm64.l-1003- (comment 'sym Src) ############################################## picolisp-20.6/src64/arch/arm64.l-1005- picolisp-20.6/src64/arch/arm64.l:1006:(asm sym/jz (Src S Adr A) # optimize picolisp-20.6/src64/arch/arm64.l-1007- (comment 'sym Src "--" "jz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1009- picolisp-20.6/src64/arch/arm64.l:1010:(asm sym/ldz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-1011- (comment 'sym Src "--" "ldz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-1016- picolisp-20.6/src64/arch/arm64.l:1017:(asm sym/jnz (Src S Adr A) picolisp-20.6/src64/arch/arm64.l-1018- (comment 'sym Src "--" "jnz" Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1020- picolisp-20.6/src64/arch/arm64.l:1021:(asm sym/ldnz (Src S Dst D Src2 S2) # optimize picolisp-20.6/src64/arch/arm64.l-1022- (comment 'sym Src "--" "ldnz" Dst Src2) ############################################## picolisp-20.6/src64/arch/arm64.l-1028- picolisp-20.6/src64/arch/arm64.l:1029:(asm atom (Src S) picolisp-20.6/src64/arch/arm64.l-1030- (comment 'atom Src) ############################################## picolisp-20.6/src64/arch/arm64.l-1033-# Flow control picolisp-20.6/src64/arch/arm64.l:1034:(asm ++tos () picolisp-20.6/src64/arch/arm64.l-1035- (comment '++tos) ############################################## picolisp-20.6/src64/arch/arm64.l-1037- picolisp-20.6/src64/arch/arm64.l:1038:(asm tos-- () picolisp-20.6/src64/arch/arm64.l-1039- (comment 'tos--) ############################################## picolisp-20.6/src64/arch/arm64.l-1041- picolisp-20.6/src64/arch/arm64.l:1042:(asm TOS call (Adr A) picolisp-20.6/src64/arch/arm64.l-1043- (comment 'call Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1055- picolisp-20.6/src64/arch/arm64.l:1056:(asm jmp (Adr A) picolisp-20.6/src64/arch/arm64.l-1057- (comment 'jmp Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1069- picolisp-20.6/src64/arch/arm64.l:1070:(asm tos (Dst D) picolisp-20.6/src64/arch/arm64.l-1071- (comment 'tos Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-1091- picolisp-20.6/src64/arch/arm64.l:1092:(asm jz (Adr A) picolisp-20.6/src64/arch/arm64.l-1093- (comment 'jz Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1095- picolisp-20.6/src64/arch/arm64.l:1096:(asm jeq (Adr A) picolisp-20.6/src64/arch/arm64.l-1097- (comment 'jeq Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1099- picolisp-20.6/src64/arch/arm64.l:1100:(asm jnz (Adr A) picolisp-20.6/src64/arch/arm64.l-1101- (comment 'jnz Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1103- picolisp-20.6/src64/arch/arm64.l:1104:(asm jne (Adr A) picolisp-20.6/src64/arch/arm64.l-1105- (comment 'jne Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1107- picolisp-20.6/src64/arch/arm64.l:1108:(asm js (Adr A) picolisp-20.6/src64/arch/arm64.l-1109- (comment 'js Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1111- picolisp-20.6/src64/arch/arm64.l:1112:(asm jns (Adr A) picolisp-20.6/src64/arch/arm64.l-1113- (comment 'jns Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1115- picolisp-20.6/src64/arch/arm64.l:1116:(asm jsz (Adr A) picolisp-20.6/src64/arch/arm64.l-1117- (comment 'jsz Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1119- picolisp-20.6/src64/arch/arm64.l:1120:(asm jnsz (Adr A) picolisp-20.6/src64/arch/arm64.l-1121- (comment 'jnsz Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1123- picolisp-20.6/src64/arch/arm64.l:1124:(asm jc (Adr A) picolisp-20.6/src64/arch/arm64.l-1125- (comment 'jc Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1127- picolisp-20.6/src64/arch/arm64.l:1128:(asm jb (Adr A) picolisp-20.6/src64/arch/arm64.l-1129- (comment 'jb Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1131- picolisp-20.6/src64/arch/arm64.l:1132:(asm jx (Adr A) picolisp-20.6/src64/arch/arm64.l-1133- (comment 'jx Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1135- picolisp-20.6/src64/arch/arm64.l:1136:(asm jlt (Adr A) picolisp-20.6/src64/arch/arm64.l-1137- (comment 'jlt Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1139- picolisp-20.6/src64/arch/arm64.l:1140:(asm jnc (Adr A) picolisp-20.6/src64/arch/arm64.l-1141- (comment 'jnc Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1143- picolisp-20.6/src64/arch/arm64.l:1144:(asm jnb (Adr A) picolisp-20.6/src64/arch/arm64.l-1145- (comment 'jnb Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1147- picolisp-20.6/src64/arch/arm64.l:1148:(asm jnx (Adr A) picolisp-20.6/src64/arch/arm64.l-1149- (comment 'jnx Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1151- picolisp-20.6/src64/arch/arm64.l:1152:(asm jge (Adr A) picolisp-20.6/src64/arch/arm64.l-1153- (comment 'jge Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1155- picolisp-20.6/src64/arch/arm64.l:1156:(asm jle (Adr A) picolisp-20.6/src64/arch/arm64.l-1157- (comment 'jle Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1159- picolisp-20.6/src64/arch/arm64.l:1160:(asm jgt (Adr A) picolisp-20.6/src64/arch/arm64.l-1161- (comment 'jgt Adr) ############################################## picolisp-20.6/src64/arch/arm64.l-1163- picolisp-20.6/src64/arch/arm64.l:1164:(asm ret () picolisp-20.6/src64/arch/arm64.l-1165- (comment 'ret) ############################################## picolisp-20.6/src64/arch/arm64.l-1167- picolisp-20.6/src64/arch/arm64.l:1168:(asm catch () picolisp-20.6/src64/arch/arm64.l-1169- (comment 'catch) ############################################## picolisp-20.6/src64/arch/arm64.l-1171- picolisp-20.6/src64/arch/arm64.l:1172:(asm throw () picolisp-20.6/src64/arch/arm64.l-1173- (comment 'throw) ############################################## picolisp-20.6/src64/arch/arm64.l-1177-# Floating point picolisp-20.6/src64/arch/arm64.l:1178:(asm ldd () picolisp-20.6/src64/arch/arm64.l-1179- (comment 'ldd) ############################################## picolisp-20.6/src64/arch/arm64.l-1181- picolisp-20.6/src64/arch/arm64.l:1182:(asm ldf () picolisp-20.6/src64/arch/arm64.l-1183- (comment 'ldf) ############################################## picolisp-20.6/src64/arch/arm64.l-1185- picolisp-20.6/src64/arch/arm64.l:1186:(asm fixnum () picolisp-20.6/src64/arch/arm64.l-1187- (comment 'fixnum) ############################################## picolisp-20.6/src64/arch/arm64.l-1213- picolisp-20.6/src64/arch/arm64.l:1214:(asm float () picolisp-20.6/src64/arch/arm64.l-1215- (comment 'float) ############################################## picolisp-20.6/src64/arch/arm64.l-1252- picolisp-20.6/src64/arch/arm64.l:1253:(asm std () picolisp-20.6/src64/arch/arm64.l-1254- (comment 'std) ############################################## picolisp-20.6/src64/arch/arm64.l-1256- picolisp-20.6/src64/arch/arm64.l:1257:(asm stf () picolisp-20.6/src64/arch/arm64.l-1258- (comment 'stf) ############################################## picolisp-20.6/src64/arch/arm64.l-1261-# C-Calls picolisp-20.6/src64/arch/arm64.l:1262:(asm TOS cc (Adr A Arg M) picolisp-20.6/src64/arch/arm64.l-1263- (comment 'cc Adr Arg) ############################################## picolisp-20.6/src64/arch/arm64.l-1363- picolisp-20.6/src64/arch/arm64.l:1364:(asm func ()) picolisp-20.6/src64/arch/arm64.l-1365- picolisp-20.6/src64/arch/arm64.l:1366:(asm begin () picolisp-20.6/src64/arch/arm64.l-1367- (comment 'begin) ############################################## picolisp-20.6/src64/arch/arm64.l-1370- picolisp-20.6/src64/arch/arm64.l:1371:(asm return () picolisp-20.6/src64/arch/arm64.l-1372- (comment 'return) ############################################## picolisp-20.6/src64/arch/arm64.l-1375-# Stack Manipulations picolisp-20.6/src64/arch/arm64.l:1376:(asm push (Src S) picolisp-20.6/src64/arch/arm64.l-1377- (comment 'push Src) ############################################## picolisp-20.6/src64/arch/arm64.l-1389- picolisp-20.6/src64/arch/arm64.l:1390:(asm push/2 (Reg1 Reg2) picolisp-20.6/src64/arch/arm64.l-1391- (comment 'push/2 Reg1 Reg2) ############################################## picolisp-20.6/src64/arch/arm64.l-1393- picolisp-20.6/src64/arch/arm64.l:1394:(asm pop (Dst D) picolisp-20.6/src64/arch/arm64.l-1395- (comment 'pop Dst) ############################################## picolisp-20.6/src64/arch/arm64.l-1407- picolisp-20.6/src64/arch/arm64.l:1408:(asm pop/2 (Reg1 Reg2) picolisp-20.6/src64/arch/arm64.l-1409- (comment 'pop/2 Reg1 Reg2) ############################################## picolisp-20.6/src64/arch/arm64.l-1411- picolisp-20.6/src64/arch/arm64.l:1412:(asm link () picolisp-20.6/src64/arch/arm64.l-1413- (comment 'link) ############################################## picolisp-20.6/src64/arch/arm64.l-1416- picolisp-20.6/src64/arch/arm64.l:1417:(asm push/link (Reg) picolisp-20.6/src64/arch/arm64.l-1418- (comment 'push/link) ############################################## picolisp-20.6/src64/arch/arm64.l-1421- picolisp-20.6/src64/arch/arm64.l:1422:(asm tuck (Src S) picolisp-20.6/src64/arch/arm64.l-1423- (comment 'tuck Src) ############################################## picolisp-20.6/src64/arch/arm64.l-1427- picolisp-20.6/src64/arch/arm64.l:1428:(asm drop () picolisp-20.6/src64/arch/arm64.l-1429- (comment 'drop) ############################################## picolisp-20.6/src64/arch/arm64.l-1432- picolisp-20.6/src64/arch/arm64.l:1433:(asm drop/pop (Reg) picolisp-20.6/src64/arch/arm64.l-1434- (comment 'drop/pop) ############################################## picolisp-20.6/src64/arch/arm64.l-1438-# Evaluation picolisp-20.6/src64/arch/arm64.l:1439:(asm TOS eval () picolisp-20.6/src64/arch/arm64.l-1440- (comment 'eval) ############################################## picolisp-20.6/src64/arch/arm64.l-1449- picolisp-20.6/src64/arch/arm64.l:1450:(asm TOS eval+ () picolisp-20.6/src64/arch/arm64.l-1451- (comment 'eval+) ############################################## picolisp-20.6/src64/arch/arm64.l-1463- picolisp-20.6/src64/arch/arm64.l:1464:(asm eval/ret () picolisp-20.6/src64/arch/arm64.l-1465- (comment 'eval/ret) ############################################## picolisp-20.6/src64/arch/arm64.l-1473- picolisp-20.6/src64/arch/arm64.l:1474:(asm TOS exec (Reg) picolisp-20.6/src64/arch/arm64.l-1475- (comment 'exec Reg) ############################################## picolisp-20.6/src64/arch/arm64.l-1487- picolisp-20.6/src64/arch/arm64.l:1488:(asm TOS prog (Reg) picolisp-20.6/src64/arch/arm64.l-1489- (comment 'prog Reg) ############################################## picolisp-20.6/src64/arch/arm64.l-1507-# System picolisp-20.6/src64/arch/arm64.l:1508:(asm initData ()) picolisp-20.6/src64/arch/arm64.l-1509- picolisp-20.6/src64/arch/arm64.l:1510:(asm initCode () picolisp-20.6/src64/arch/arm64.l-1511- (unless *FPic ############################################## picolisp-20.6/src64/arch/arm64.l-1698- picolisp-20.6/src64/arch/arm64.l:1699:(asm initMain () picolisp-20.6/src64/arch/arm64.l-1700- (prinst "ldr" "x21" "[x1]") # Get command in X ############################################## picolisp-20.6/src64/arch/arm64.l-1712- picolisp-20.6/src64/arch/arm64.l:1713:(asm initLib ()) picolisp-20.6/src64/arch/arm64.l-1714- picolisp-20.6/src64/arch/arm64.l:1715:(asm stop () picolisp-20.6/src64/arch/arm64.l-1716- (comment 'stop) ############################################## picolisp-20.6/src64/arch/emu.l-241- picolisp-20.6/src64/arch/emu.l:242:(asm nop () picolisp-20.6/src64/arch/emu.l-243- (addCode '(NIL '(nop))) ) picolisp-20.6/src64/arch/emu.l-244- picolisp-20.6/src64/arch/emu.l:245:(asm align (N) picolisp-20.6/src64/arch/emu.l-246- (if (== 'data *Section) ############################################## picolisp-20.6/src64/arch/emu.l-252- picolisp-20.6/src64/arch/emu.l:253:(asm skip (N) picolisp-20.6/src64/arch/emu.l-254- (if (== 'data *Section) ############################################## picolisp-20.6/src64/arch/emu.l-258-# Move data picolisp-20.6/src64/arch/emu.l:259:(asm ld (Dst D Src S) picolisp-20.6/src64/arch/emu.l-260- (cond ############################################## picolisp-20.6/src64/arch/emu.l-276- picolisp-20.6/src64/arch/emu.l:277:(asm ld2 (Src S) picolisp-20.6/src64/arch/emu.l-278- (genCode (Src S) (list 'ld2 Src) ((op.a Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-280- picolisp-20.6/src64/arch/emu.l:281:(asm ld4 (Src S) picolisp-20.6/src64/arch/emu.l-282- (genCode (Src S) (list 'ld4 Src) ((op.a Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-284- picolisp-20.6/src64/arch/emu.l:285:(asm ldz (Dst D Src S) picolisp-20.6/src64/arch/emu.l-286- (genCode (Dst D Src S) (list 'ldz Dst Src) ((op.n Dst D) (op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-289- picolisp-20.6/src64/arch/emu.l:290:(asm ldnz (Dst D Src S) picolisp-20.6/src64/arch/emu.l-291- (genCode (Dst D Src S) (list 'ldnz Dst Src) ((op.n Dst D) (op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-294- picolisp-20.6/src64/arch/emu.l:295:(asm lea (Dst D Src S) picolisp-20.6/src64/arch/emu.l-296- (genCode (Dst D Src S) (list 'lea Dst Src) ((op.n Dst D) (op.a Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-298- picolisp-20.6/src64/arch/emu.l:299:(asm st2 (Dst D) picolisp-20.6/src64/arch/emu.l-300- (genCode (Dst D) (list 'st2 Dst) ((op.a Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-302- picolisp-20.6/src64/arch/emu.l:303:(asm st4 (Dst D) picolisp-20.6/src64/arch/emu.l-304- (genCode (Dst D) (list 'st4 Dst) ((op.a Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-306- picolisp-20.6/src64/arch/emu.l:307:(asm xchg (Dst D Dst2 D2) picolisp-20.6/src64/arch/emu.l-308- (genCode (Dst D Dst2 D2) (list 'xchg Dst Dst2) ((op.n Dst D) (op.n Dst2 D2)) ############################################## picolisp-20.6/src64/arch/emu.l-310- picolisp-20.6/src64/arch/emu.l:311:(asm movn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/emu.l-312- (genCode (Dst D Src S Cnt C) (list 'movn Dst Src Cnt) ((op.a Dst D) (op.a Src S) (op.i Cnt C)) ############################################## picolisp-20.6/src64/arch/emu.l-314- picolisp-20.6/src64/arch/emu.l:315:(asm mset (Dst D Cnt C) picolisp-20.6/src64/arch/emu.l-316- (genCode (Dst D Cnt C) (list 'mset Dst Cnt) ((op.a Dst D) (op.i Cnt C)) ############################################## picolisp-20.6/src64/arch/emu.l-318- picolisp-20.6/src64/arch/emu.l:319:(asm save (Src S End E Dst D) picolisp-20.6/src64/arch/emu.l-320- (genCode (Dst D Src S End E) (list 'save Dst Src End) ((op.a Dst D) (op.a Src S) (op.a End E)) ############################################## picolisp-20.6/src64/arch/emu.l-322- picolisp-20.6/src64/arch/emu.l:323:(asm load (Dst D End E Src S) picolisp-20.6/src64/arch/emu.l-324- (genCode (Dst D Src S End E) (list 'load Dst Src End) ((op.a Dst D) (op.a Src S) (op.a End E)) ############################################## picolisp-20.6/src64/arch/emu.l-327-# Arithmetics picolisp-20.6/src64/arch/emu.l:328:(asm add (Dst D Src S) picolisp-20.6/src64/arch/emu.l-329- (cond ############################################## picolisp-20.6/src64/arch/emu.l-340- picolisp-20.6/src64/arch/emu.l:341:(asm addc (Dst D Src S) picolisp-20.6/src64/arch/emu.l-342- (if (or D (atom Dst)) ############################################## picolisp-20.6/src64/arch/emu.l-356- picolisp-20.6/src64/arch/emu.l:357:(asm sub (Dst D Src S) picolisp-20.6/src64/arch/emu.l-358- (if (= Dst "S") ############################################## picolisp-20.6/src64/arch/emu.l-363- picolisp-20.6/src64/arch/emu.l:364:(asm subb (Dst D Src S) picolisp-20.6/src64/arch/emu.l-365- (genCode (Dst D Src S) (list 'subb Dst Src) ((op.n Dst D) (op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-370- picolisp-20.6/src64/arch/emu.l:371:(asm inc (Dst D) picolisp-20.6/src64/arch/emu.l-372- (genCode (Dst D) (list 'inc Dst) ((op.n Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-374- picolisp-20.6/src64/arch/emu.l:375:(asm dec (Dst D) picolisp-20.6/src64/arch/emu.l-376- (genCode (Dst D) (list 'dec Dst) ((op.n Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-378- picolisp-20.6/src64/arch/emu.l:379:(asm not (Dst D) picolisp-20.6/src64/arch/emu.l-380- (genCode (Dst D) (list 'not Dst) ((op.n Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-382- picolisp-20.6/src64/arch/emu.l:383:(asm neg (Dst D) picolisp-20.6/src64/arch/emu.l-384- (genCode (Dst D) (list 'neg Dst) ((op.n Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-386- picolisp-20.6/src64/arch/emu.l:387:(asm and (Dst D Src S) picolisp-20.6/src64/arch/emu.l-388- (if (or (= Dst "A.b[0]") (= Src "A.b[0]")) ############################################## picolisp-20.6/src64/arch/emu.l-393- picolisp-20.6/src64/arch/emu.l:394:(asm or (Dst D Src S) picolisp-20.6/src64/arch/emu.l-395- (if (or (= Dst "A.b[0]") (= Src "A.b[0]")) ############################################## picolisp-20.6/src64/arch/emu.l-400- picolisp-20.6/src64/arch/emu.l:401:(asm xor (Dst D Src S) picolisp-20.6/src64/arch/emu.l-402- (if (or (= Dst "A.b[0]") (= Src "A.b[0]")) ############################################## picolisp-20.6/src64/arch/emu.l-407- picolisp-20.6/src64/arch/emu.l:408:(asm off (Dst D Src S) picolisp-20.6/src64/arch/emu.l-409- (genCode (Dst D Src S) (list 'off Dst (pack (cdr (chop Src)))) ((op.n Dst D) (op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-411- picolisp-20.6/src64/arch/emu.l:412:(asm test (Dst D Src S) picolisp-20.6/src64/arch/emu.l-413- (if (or (= Dst "A.b[0]") (= Src "A.b[0]")) ############################################## picolisp-20.6/src64/arch/emu.l-418- picolisp-20.6/src64/arch/emu.l:419:(asm shl (Dst D Src S) picolisp-20.6/src64/arch/emu.l-420- (genCode (Dst D Src S) (list 'shl Dst Src) ((op.n Dst D) (op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-423- picolisp-20.6/src64/arch/emu.l:424:(asm shr (Dst D Src S) picolisp-20.6/src64/arch/emu.l-425- (genCode (Dst D Src S) (list 'shr Dst Src) ((op.n Dst D) (op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-428- picolisp-20.6/src64/arch/emu.l:429:(asm rol (Dst D Src S) picolisp-20.6/src64/arch/emu.l-430- (if (=0 S) ############################################## picolisp-20.6/src64/arch/emu.l-435- picolisp-20.6/src64/arch/emu.l:436:(asm ror (Dst D Src S) picolisp-20.6/src64/arch/emu.l-437- (if (=0 S) ############################################## picolisp-20.6/src64/arch/emu.l-442- picolisp-20.6/src64/arch/emu.l:443:(asm rxl (Dst D Src S) picolisp-20.6/src64/arch/emu.l-444- (genCode (Dst D Src S) (list 'rxl Dst Src) ((op.n Dst D) (op.i Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-447- picolisp-20.6/src64/arch/emu.l:448:(asm rxr (Dst D Src S) picolisp-20.6/src64/arch/emu.l-449- (genCode (Dst D Src S) (list 'rxr Dst Src) ((op.n Dst D) (op.i Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-452- picolisp-20.6/src64/arch/emu.l:453:(asm mul (Src S) picolisp-20.6/src64/arch/emu.l-454- (genCode (Src S) (list 'mul Src) ((op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-456- picolisp-20.6/src64/arch/emu.l:457:(asm div (Src S) picolisp-20.6/src64/arch/emu.l-458- (genCode (Src S) (list 'div Src) ((op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-460- picolisp-20.6/src64/arch/emu.l:461:(asm zxt () # 8 bit -> 64 bit picolisp-20.6/src64/arch/emu.l-462- (genCode NIL '(zxt) NIL ############################################## picolisp-20.6/src64/arch/emu.l-464- picolisp-20.6/src64/arch/emu.l:465:(asm eq () picolisp-20.6/src64/arch/emu.l-466- (genCode NIL '(eq) NIL ############################################## picolisp-20.6/src64/arch/emu.l-468- picolisp-20.6/src64/arch/emu.l:469:(asm gt () picolisp-20.6/src64/arch/emu.l-470- (genCode NIL '(gt) NIL ############################################## picolisp-20.6/src64/arch/emu.l-472- picolisp-20.6/src64/arch/emu.l:473:(asm lt () picolisp-20.6/src64/arch/emu.l-474- (genCode NIL '(lt) NIL ############################################## picolisp-20.6/src64/arch/emu.l-476- picolisp-20.6/src64/arch/emu.l:477:(asm setx () picolisp-20.6/src64/arch/emu.l-478- (genCode NIL '(setx) NIL ############################################## picolisp-20.6/src64/arch/emu.l-480- picolisp-20.6/src64/arch/emu.l:481:(asm clrx () picolisp-20.6/src64/arch/emu.l-482- (genCode NIL '(clrx) NIL ############################################## picolisp-20.6/src64/arch/emu.l-485-# Comparisons picolisp-20.6/src64/arch/emu.l:486:(asm cmp (Dst D Src S) picolisp-20.6/src64/arch/emu.l-487- (cond ############################################## picolisp-20.6/src64/arch/emu.l-499- picolisp-20.6/src64/arch/emu.l:500:(asm cmpn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/emu.l-501- (genCode (Dst D Src S Cnt C) (list 'cmpn Dst Src Cnt) ((op.a Dst D) (op.a Src S) (op.i Cnt C)) ############################################## picolisp-20.6/src64/arch/emu.l-503- picolisp-20.6/src64/arch/emu.l:504:(asm slen (Dst D Src S) picolisp-20.6/src64/arch/emu.l-505- (genCode (Dst D Src S) (list 'slen Dst Src) ((op.n Dst D) (op.a Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-507- picolisp-20.6/src64/arch/emu.l:508:(asm memb (Src S Cnt C) picolisp-20.6/src64/arch/emu.l-509- (cond ############################################## picolisp-20.6/src64/arch/emu.l-521- picolisp-20.6/src64/arch/emu.l:522:(asm null (Src S) picolisp-20.6/src64/arch/emu.l-523- (genCode (Src S) (list 'null Src) ((op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-525- picolisp-20.6/src64/arch/emu.l:526:(asm nul4 () picolisp-20.6/src64/arch/emu.l-527- (genCode NIL '(nul4) NIL ############################################## picolisp-20.6/src64/arch/emu.l-530-# Byte addressing picolisp-20.6/src64/arch/emu.l:531:(asm set (Dst D Src S) picolisp-20.6/src64/arch/emu.l-532- (genCode (Dst D Src S) (list 'set Dst Src) ((op.b Dst D) (op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-534- picolisp-20.6/src64/arch/emu.l:535:(asm nul (Src S) picolisp-20.6/src64/arch/emu.l-536- (genCode (Src S) (list 'nul Src) ((op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-539-# Types picolisp-20.6/src64/arch/emu.l:540:(asm cnt (Src S) picolisp-20.6/src64/arch/emu.l-541- (genCode (Src S) (list 'cnt Src) ((op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-543- picolisp-20.6/src64/arch/emu.l:544:(asm big (Src S) picolisp-20.6/src64/arch/emu.l-545- (genCode (Src S) (list 'big Src) ((op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-547- picolisp-20.6/src64/arch/emu.l:548:(asm num (Src S) picolisp-20.6/src64/arch/emu.l-549- (genCode (Src S) (list 'num Src) ((op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-551- picolisp-20.6/src64/arch/emu.l:552:(asm sym (Src S) picolisp-20.6/src64/arch/emu.l-553- (genCode (Src S) (list 'sym Src) ((op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-555- picolisp-20.6/src64/arch/emu.l:556:(asm atom (Src S) picolisp-20.6/src64/arch/emu.l-557- (genCode (Src S) (list 'atom Src) ((op.b Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-560-# Flow control picolisp-20.6/src64/arch/emu.l:561:(de localAddr (Adr) picolisp-20.6/src64/arch/emu.l-562- (or ############################################## picolisp-20.6/src64/arch/emu.l-568- picolisp-20.6/src64/arch/emu.l:569:(asm call (Adr A) picolisp-20.6/src64/arch/emu.l-570- (nond ############################################## picolisp-20.6/src64/arch/emu.l-593- picolisp-20.6/src64/arch/emu.l:594:(asm jmp (Adr A) picolisp-20.6/src64/arch/emu.l-595- (nond ############################################## picolisp-20.6/src64/arch/emu.l-616- picolisp-20.6/src64/arch/emu.l:617:(asm tos (Dst D) picolisp-20.6/src64/arch/emu.l-618- (genCode (Dst D) (list 'pop Dst) ((op.n Dst D)) ############################################## picolisp-20.6/src64/arch/emu.l-649- picolisp-20.6/src64/arch/emu.l:650:(asm jz (Adr A) picolisp-20.6/src64/arch/emu.l-651- (_jmp "jz" "!Result") ) picolisp-20.6/src64/arch/emu.l-652- picolisp-20.6/src64/arch/emu.l:653:(asm jeq (Adr A) picolisp-20.6/src64/arch/emu.l-654- (_jmp "jeq" "!Result") ) picolisp-20.6/src64/arch/emu.l-655- picolisp-20.6/src64/arch/emu.l:656:(asm jnz (Adr A) picolisp-20.6/src64/arch/emu.l-657- (_jmp "jnz" "Result") ) picolisp-20.6/src64/arch/emu.l-658- picolisp-20.6/src64/arch/emu.l:659:(asm jne (Adr A) picolisp-20.6/src64/arch/emu.l-660- (_jmp "jne" "Result") ) picolisp-20.6/src64/arch/emu.l-661- picolisp-20.6/src64/arch/emu.l:662:(asm js (Adr A) picolisp-20.6/src64/arch/emu.l-663- (_jmp "js" "(int64_t)Result < 0") ) picolisp-20.6/src64/arch/emu.l-664- picolisp-20.6/src64/arch/emu.l:665:(asm jns (Adr A) picolisp-20.6/src64/arch/emu.l-666- (_jmp "jns" "(int64_t)Result >= 0") ) picolisp-20.6/src64/arch/emu.l-667- picolisp-20.6/src64/arch/emu.l:668:(asm jsz (Adr A) picolisp-20.6/src64/arch/emu.l-669- (_jmp "jsz" "(int64_t)Result <= 0") ) picolisp-20.6/src64/arch/emu.l-670- picolisp-20.6/src64/arch/emu.l:671:(asm jnsz (Adr A) picolisp-20.6/src64/arch/emu.l-672- (_jmp "jnsz" "(int64_t)Result > 0") ) picolisp-20.6/src64/arch/emu.l-673- picolisp-20.6/src64/arch/emu.l:674:(asm jc (Adr A) picolisp-20.6/src64/arch/emu.l-675- (_jmp "jc" "Carry") ) picolisp-20.6/src64/arch/emu.l-676- picolisp-20.6/src64/arch/emu.l:677:(asm jb (Adr A) picolisp-20.6/src64/arch/emu.l-678- (_jmp "jb" "Carry") ) picolisp-20.6/src64/arch/emu.l-679- picolisp-20.6/src64/arch/emu.l:680:(asm jx (Adr A) picolisp-20.6/src64/arch/emu.l-681- (_jmp "jx" "Carry") ) picolisp-20.6/src64/arch/emu.l-682- picolisp-20.6/src64/arch/emu.l:683:(asm jlt (Adr A) picolisp-20.6/src64/arch/emu.l-684- (_jmp "jlt" "Carry") ) picolisp-20.6/src64/arch/emu.l-685- picolisp-20.6/src64/arch/emu.l:686:(asm jnc (Adr A) picolisp-20.6/src64/arch/emu.l-687- (_jmp "jnc" "!Carry") ) picolisp-20.6/src64/arch/emu.l-688- picolisp-20.6/src64/arch/emu.l:689:(asm jnb (Adr A) picolisp-20.6/src64/arch/emu.l-690- (_jmp "jnb" "!Carry") ) picolisp-20.6/src64/arch/emu.l-691- picolisp-20.6/src64/arch/emu.l:692:(asm jnx (Adr A) picolisp-20.6/src64/arch/emu.l-693- (_jmp "jnx" "!Carry") ) picolisp-20.6/src64/arch/emu.l-694- picolisp-20.6/src64/arch/emu.l:695:(asm jge (Adr A) picolisp-20.6/src64/arch/emu.l-696- (_jmp "jge" "!Carry") ) picolisp-20.6/src64/arch/emu.l-697- picolisp-20.6/src64/arch/emu.l:698:(asm jle (Adr A) picolisp-20.6/src64/arch/emu.l-699- (_jmp "jle" "!Result || Carry") ) picolisp-20.6/src64/arch/emu.l-700- picolisp-20.6/src64/arch/emu.l:701:(asm jgt (Adr A) picolisp-20.6/src64/arch/emu.l-702- (_jmp "jgt" "Result && !Carry") ) picolisp-20.6/src64/arch/emu.l-703- picolisp-20.6/src64/arch/emu.l:704:(asm ret () picolisp-20.6/src64/arch/emu.l-705- (genCode NIL '(ret) NIL ############################################## picolisp-20.6/src64/arch/emu.l-707- picolisp-20.6/src64/arch/emu.l:708:(asm catch ()) picolisp-20.6/src64/arch/emu.l-709- picolisp-20.6/src64/arch/emu.l:710:(asm throw () picolisp-20.6/src64/arch/emu.l-711- ((get 'ret 'asm)) ) ############################################## picolisp-20.6/src64/arch/emu.l-713-# Floating point picolisp-20.6/src64/arch/emu.l:714:(asm ldd () picolisp-20.6/src64/arch/emu.l-715- (genCode NIL '(ldd) NIL ############################################## picolisp-20.6/src64/arch/emu.l-717- picolisp-20.6/src64/arch/emu.l:718:(asm ldf () picolisp-20.6/src64/arch/emu.l-719- (genCode NIL '(ldf) NIL ############################################## picolisp-20.6/src64/arch/emu.l-721- picolisp-20.6/src64/arch/emu.l:722:(asm fixnum () picolisp-20.6/src64/arch/emu.l-723- (genCode NIL '(fixnum) ((directExpr "TSym") (directExpr "Nil")) ############################################## picolisp-20.6/src64/arch/emu.l-736- picolisp-20.6/src64/arch/emu.l:737:(asm float () picolisp-20.6/src64/arch/emu.l-738- (genCode NIL '(float) ((directExpr "Nil")) ############################################## picolisp-20.6/src64/arch/emu.l-757- picolisp-20.6/src64/arch/emu.l:758:(asm std () picolisp-20.6/src64/arch/emu.l-759- (genCode NIL '(std) NIL ############################################## picolisp-20.6/src64/arch/emu.l-761- picolisp-20.6/src64/arch/emu.l:762:(asm stf () picolisp-20.6/src64/arch/emu.l-763- (genCode NIL '(stf) NIL ############################################## picolisp-20.6/src64/arch/emu.l-950- picolisp-20.6/src64/arch/emu.l:951:(asm cc (Adr A Arg M) picolisp-20.6/src64/arch/emu.l-952- (if (lst? Arg) ############################################## picolisp-20.6/src64/arch/emu.l-994- picolisp-20.6/src64/arch/emu.l:995:(asm func () picolisp-20.6/src64/arch/emu.l-996- (genCode NIL '(func) ((directExpr "cbl1")) ############################################## picolisp-20.6/src64/arch/emu.l-998- picolisp-20.6/src64/arch/emu.l:999:(asm begin ()) picolisp-20.6/src64/arch/emu.l-1000- picolisp-20.6/src64/arch/emu.l:1001:(asm return () picolisp-20.6/src64/arch/emu.l-1002- (genCode NIL '(return) NIL ############################################## picolisp-20.6/src64/arch/emu.l-1005-# Stack Manipulations picolisp-20.6/src64/arch/emu.l:1006:(asm push (Src S) picolisp-20.6/src64/arch/emu.l-1007- (case Src ############################################## picolisp-20.6/src64/arch/emu.l-1020- picolisp-20.6/src64/arch/emu.l:1021:(asm pop (Dst D) picolisp-20.6/src64/arch/emu.l-1022- (casq Dst ############################################## picolisp-20.6/src64/arch/emu.l-1032- picolisp-20.6/src64/arch/emu.l:1033:(asm link () picolisp-20.6/src64/arch/emu.l-1034- (genCode NIL '(link) NIL ############################################## picolisp-20.6/src64/arch/emu.l-1036- picolisp-20.6/src64/arch/emu.l:1037:(asm tuck (Src S) picolisp-20.6/src64/arch/emu.l-1038- (genCode (Src S) (list 'tuck Src) ((op.n Src S)) ############################################## picolisp-20.6/src64/arch/emu.l-1040- picolisp-20.6/src64/arch/emu.l:1041:(asm drop () picolisp-20.6/src64/arch/emu.l-1042- (genCode NIL '(drop) NIL ############################################## picolisp-20.6/src64/arch/emu.l-1045-# Evaluation picolisp-20.6/src64/arch/emu.l:1046:(asm eval () picolisp-20.6/src64/arch/emu.l-1047- (genCode NIL '(eval) ((absCode "evListE_E")) ############################################## picolisp-20.6/src64/arch/emu.l-1055- picolisp-20.6/src64/arch/emu.l:1056:(asm eval+ () picolisp-20.6/src64/arch/emu.l-1057- (genCode NIL '(eval+) ((absCode "evListE_E")) ############################################## picolisp-20.6/src64/arch/emu.l-1071- picolisp-20.6/src64/arch/emu.l:1072:(asm eval/ret () picolisp-20.6/src64/arch/emu.l-1073- (genCode NIL '(eval/ret) ((absCode "evListE_E")) ############################################## picolisp-20.6/src64/arch/emu.l-1081- picolisp-20.6/src64/arch/emu.l:1082:(asm exec (Reg) picolisp-20.6/src64/arch/emu.l-1083- (genCode (Reg) (list 'exec Reg) ((absCode "evListE_E") Reg) ############################################## picolisp-20.6/src64/arch/emu.l-1092- picolisp-20.6/src64/arch/emu.l:1093:(asm prog (Reg) picolisp-20.6/src64/arch/emu.l-1094- (genCode (Reg) (list 'prog Reg) ((absCode "evListE_E") Reg) ############################################## picolisp-20.6/src64/arch/emu.l-1108-# System picolisp-20.6/src64/arch/emu.l:1109:(asm initData ()) picolisp-20.6/src64/arch/emu.l-1110- picolisp-20.6/src64/arch/emu.l:1111:(asm initCode ()) picolisp-20.6/src64/arch/emu.l-1112- picolisp-20.6/src64/arch/emu.l:1113:(asm initMain ()) # Done explicitly in 'main' picolisp-20.6/src64/arch/emu.l-1114- picolisp-20.6/src64/arch/emu.l:1115:(asm initLib () picolisp-20.6/src64/arch/emu.l-1116- (genCode NIL '(initLib) NIL ############################################## picolisp-20.6/src64/arch/emu.l-1118- picolisp-20.6/src64/arch/emu.l:1119:(asm stop () picolisp-20.6/src64/arch/emu.l-1120- (genCode NIL '(stop) NIL ############################################## picolisp-20.6/src64/arch/ppc64.l-369- picolisp-20.6/src64/arch/ppc64.l:370:(asm nop () picolisp-20.6/src64/arch/ppc64.l-371- (prinst "nop") ) picolisp-20.6/src64/arch/ppc64.l-372- picolisp-20.6/src64/arch/ppc64.l:373:(asm align (N) picolisp-20.6/src64/arch/ppc64.l-374- (prinst ".balign" N) ) picolisp-20.6/src64/arch/ppc64.l-375- picolisp-20.6/src64/arch/ppc64.l:376:(asm skip (N) picolisp-20.6/src64/arch/ppc64.l-377- (if (== 'data *Section) ############################################## picolisp-20.6/src64/arch/ppc64.l-381-# Move data picolisp-20.6/src64/arch/ppc64.l:382:(asm ld (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-383- (cond ############################################## picolisp-20.6/src64/arch/ppc64.l-401- picolisp-20.6/src64/arch/ppc64.l:402:(asm ld2 (Src S) picolisp-20.6/src64/arch/ppc64.l-403- (memory Src S 3 "lhz") ) picolisp-20.6/src64/arch/ppc64.l-404- picolisp-20.6/src64/arch/ppc64.l:405:(asm ld4 (Src S) picolisp-20.6/src64/arch/ppc64.l-406- (memory Src S 3 "lwz") ) picolisp-20.6/src64/arch/ppc64.l-407- picolisp-20.6/src64/arch/ppc64.l:408:(asm ldz (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-409- (prinst "bne-" "1f") ############################################## picolisp-20.6/src64/arch/ppc64.l-412- picolisp-20.6/src64/arch/ppc64.l:413:(asm ldnz (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-414- (prinst "beq-" "1f") ############################################## picolisp-20.6/src64/arch/ppc64.l-417- picolisp-20.6/src64/arch/ppc64.l:418:(asm lea (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-419- (ifn D ############################################## picolisp-20.6/src64/arch/ppc64.l-424- picolisp-20.6/src64/arch/ppc64.l:425:(asm st2 (Dst D) picolisp-20.6/src64/arch/ppc64.l-426- (memory Dst D 3 "sth") ) picolisp-20.6/src64/arch/ppc64.l-427- picolisp-20.6/src64/arch/ppc64.l:428:(asm st4 (Dst D) picolisp-20.6/src64/arch/ppc64.l-429- (memory Dst D 3 "stw") ) picolisp-20.6/src64/arch/ppc64.l-430- picolisp-20.6/src64/arch/ppc64.l:431:(asm xchg (Dst D Dst2 D2) picolisp-20.6/src64/arch/ppc64.l-432- (let (Tmp (tmpReg Dst Dst2) A (memory Dst D Tmp 0)) # Tmp = Dst ############################################## picolisp-20.6/src64/arch/ppc64.l-445- picolisp-20.6/src64/arch/ppc64.l:446:(asm movn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/ppc64.l-447- (memory Dst D 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-451- picolisp-20.6/src64/arch/ppc64.l:452:(asm mset (Dst D Cnt C) picolisp-20.6/src64/arch/ppc64.l-453- (memory Dst D 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-456- picolisp-20.6/src64/arch/ppc64.l:457:(asm save (Src S End E Dst D) picolisp-20.6/src64/arch/ppc64.l-458- (memory Src S 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-462- picolisp-20.6/src64/arch/ppc64.l:463:(asm load (Dst D End E Src S) picolisp-20.6/src64/arch/ppc64.l-464- (memory Dst D 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-469-# Arithmetics picolisp-20.6/src64/arch/ppc64.l:470:(asm add (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-471- (ifn (= (3 . 14) Dst) ############################################## picolisp-20.6/src64/arch/ppc64.l-498- picolisp-20.6/src64/arch/ppc64.l:499:(asm addc (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-500- (prinst "sradi" 0 31 1) # Get carry ############################################## picolisp-20.6/src64/arch/ppc64.l-517- picolisp-20.6/src64/arch/ppc64.l:518:(asm sub (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-519- (ifn (= (3 . 14) Dst) ############################################## picolisp-20.6/src64/arch/ppc64.l-546- picolisp-20.6/src64/arch/ppc64.l:547:(asm subb (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-548- (prinst "xori" 0 31 1) # Get inverted carry ############################################## picolisp-20.6/src64/arch/ppc64.l-567- picolisp-20.6/src64/arch/ppc64.l:568:(asm inc (Dst D) picolisp-20.6/src64/arch/ppc64.l-569- (let A (dstReg Dst D) ############################################## picolisp-20.6/src64/arch/ppc64.l-577- picolisp-20.6/src64/arch/ppc64.l:578:(asm dec (Dst D) picolisp-20.6/src64/arch/ppc64.l-579- (let A (dstReg Dst D) ############################################## picolisp-20.6/src64/arch/ppc64.l-587- picolisp-20.6/src64/arch/ppc64.l:588:(asm not (Dst D) picolisp-20.6/src64/arch/ppc64.l-589- (let A (dstReg Dst D) ############################################## picolisp-20.6/src64/arch/ppc64.l-597- picolisp-20.6/src64/arch/ppc64.l:598:(asm neg (Dst D) picolisp-20.6/src64/arch/ppc64.l-599- (let A (dstReg Dst D) ############################################## picolisp-20.6/src64/arch/ppc64.l-607- picolisp-20.6/src64/arch/ppc64.l:608:(asm and (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-609- (if (and (=0 S) (>= 65535 (format Src) 0)) ############################################## picolisp-20.6/src64/arch/ppc64.l-625- picolisp-20.6/src64/arch/ppc64.l:626:(asm or (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-627- (let A (dstSrcReg Dst D Src S) ############################################## picolisp-20.6/src64/arch/ppc64.l-639- picolisp-20.6/src64/arch/ppc64.l:640:(asm xor (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-641- (let A (dstSrcReg Dst D Src S) ############################################## picolisp-20.6/src64/arch/ppc64.l-653- picolisp-20.6/src64/arch/ppc64.l:654:(asm off (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-655- (let (A (dstReg Dst D) R (tmpReg)) ############################################## picolisp-20.6/src64/arch/ppc64.l-659- picolisp-20.6/src64/arch/ppc64.l:660:(asm test (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-661- (prinst "li" 31 -2) # Clear carry ############################################## picolisp-20.6/src64/arch/ppc64.l-667- picolisp-20.6/src64/arch/ppc64.l:668:(asm shl (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-669- (if (=0 S) ############################################## picolisp-20.6/src64/arch/ppc64.l-688- picolisp-20.6/src64/arch/ppc64.l:689:(asm shr (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-690- (if (=0 S) ############################################## picolisp-20.6/src64/arch/ppc64.l-710- picolisp-20.6/src64/arch/ppc64.l:711:(asm rol (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-712- (if (=0 S) ############################################## picolisp-20.6/src64/arch/ppc64.l-719- picolisp-20.6/src64/arch/ppc64.l:720:(asm ror (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-721- (if (=0 S) ############################################## picolisp-20.6/src64/arch/ppc64.l-726- picolisp-20.6/src64/arch/ppc64.l:727:(asm rxl (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-728- (if (=0 S) ############################################## picolisp-20.6/src64/arch/ppc64.l-745- picolisp-20.6/src64/arch/ppc64.l:746:(asm rxr (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-747- (if (=0 S) ############################################## picolisp-20.6/src64/arch/ppc64.l-756- picolisp-20.6/src64/arch/ppc64.l:757:(asm mul (Src S) picolisp-20.6/src64/arch/ppc64.l-758- (let R (srcReg Src S) ############################################## picolisp-20.6/src64/arch/ppc64.l-761- picolisp-20.6/src64/arch/ppc64.l:762:(asm div (Src S) picolisp-20.6/src64/arch/ppc64.l-763- (srcReg Src S 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-765- picolisp-20.6/src64/arch/ppc64.l:766:(asm zxt () # 8 bit -> 64 bit picolisp-20.6/src64/arch/ppc64.l-767- (prinst "andi." 3 3 255) ) # 'and' doesn't exist picolisp-20.6/src64/arch/ppc64.l-768- picolisp-20.6/src64/arch/ppc64.l:769:(asm eq () picolisp-20.6/src64/arch/ppc64.l-770- (prinst "li" 31 -2) # Clear carry ############################################## picolisp-20.6/src64/arch/ppc64.l-772- picolisp-20.6/src64/arch/ppc64.l:773:(asm gt () #! (prinst "cmpd" 20 1) # Compare zero to stack pointer picolisp-20.6/src64/arch/ppc64.l-774- (prinst "li" 31 -2) # Clear carry ############################################## picolisp-20.6/src64/arch/ppc64.l-776- picolisp-20.6/src64/arch/ppc64.l:777:(asm lt () #! (prinst "cmpdi" 1 0) # Compare stack pointer to zero picolisp-20.6/src64/arch/ppc64.l-778- (prinst "li" 31 -1) # Set carry ############################################## picolisp-20.6/src64/arch/ppc64.l-780- picolisp-20.6/src64/arch/ppc64.l:781:(asm setx () picolisp-20.6/src64/arch/ppc64.l-782- (prinst "li" 31 -1) ) picolisp-20.6/src64/arch/ppc64.l-783- picolisp-20.6/src64/arch/ppc64.l:784:(asm clrx () picolisp-20.6/src64/arch/ppc64.l-785- (prinst "li" 31 -2) ) ############################################## picolisp-20.6/src64/arch/ppc64.l-787-# Comparisons picolisp-20.6/src64/arch/ppc64.l:788:(asm cmp (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-789- (if (and (=0 S) (>= 32767 (format Src) -32768)) ############################################## picolisp-20.6/src64/arch/ppc64.l-795- picolisp-20.6/src64/arch/ppc64.l:796:(asm cmpn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/ppc64.l-797- (memory Dst D 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-801- picolisp-20.6/src64/arch/ppc64.l:802:(asm slen (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-803- (memory Src S 5) ############################################## picolisp-20.6/src64/arch/ppc64.l-806- picolisp-20.6/src64/arch/ppc64.l:807:(asm memb (Src S Cnt C) picolisp-20.6/src64/arch/ppc64.l-808- (memory Src S 4) ############################################## picolisp-20.6/src64/arch/ppc64.l-813- picolisp-20.6/src64/arch/ppc64.l:814:(asm null (Src S) picolisp-20.6/src64/arch/ppc64.l-815- (prinst "li" 31 -2) # Clear carry ############################################## picolisp-20.6/src64/arch/ppc64.l-817- picolisp-20.6/src64/arch/ppc64.l:818:(asm nul4 () picolisp-20.6/src64/arch/ppc64.l-819- (prinst "li" 31 -2) # Clear carry ############################################## picolisp-20.6/src64/arch/ppc64.l-823-# Byte addressing picolisp-20.6/src64/arch/ppc64.l:824:(asm set (Dst D Src S) picolisp-20.6/src64/arch/ppc64.l-825- (memory Dst D (srcByteReg Src S) "stb") ) picolisp-20.6/src64/arch/ppc64.l-826- picolisp-20.6/src64/arch/ppc64.l:827:(asm nul (Src S) picolisp-20.6/src64/arch/ppc64.l-828- (prinst "li" 31 -2) # Clear carry ############################################## picolisp-20.6/src64/arch/ppc64.l-831-# Types picolisp-20.6/src64/arch/ppc64.l:832:(asm cnt (Src S) picolisp-20.6/src64/arch/ppc64.l-833- (prinst "andi." 0 (srcReg Src S) "0x02") ) picolisp-20.6/src64/arch/ppc64.l-834- picolisp-20.6/src64/arch/ppc64.l:835:(asm big (Src S) picolisp-20.6/src64/arch/ppc64.l-836- (prinst "andi." 0 (srcReg Src S) "0x04") ) picolisp-20.6/src64/arch/ppc64.l-837- picolisp-20.6/src64/arch/ppc64.l:838:(asm num (Src S) picolisp-20.6/src64/arch/ppc64.l-839- (prinst "andi." 0 (srcReg Src S) "0x06") ) picolisp-20.6/src64/arch/ppc64.l-840- picolisp-20.6/src64/arch/ppc64.l:841:(asm sym (Src S) picolisp-20.6/src64/arch/ppc64.l-842- (prinst "andi." 0 (srcReg Src S) "0x08") ) picolisp-20.6/src64/arch/ppc64.l-843- picolisp-20.6/src64/arch/ppc64.l:844:(asm atom (Src S) picolisp-20.6/src64/arch/ppc64.l-845- (prinst "andi." 0 (srcReg Src S) "0x0E") ) ############################################## picolisp-20.6/src64/arch/ppc64.l-847-# Flow control picolisp-20.6/src64/arch/ppc64.l:848:(asm call (Adr A) picolisp-20.6/src64/arch/ppc64.l-849- (nond ############################################## picolisp-20.6/src64/arch/ppc64.l-911- picolisp-20.6/src64/arch/ppc64.l:912:(asm jmp (Adr A) picolisp-20.6/src64/arch/ppc64.l-913- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-917- picolisp-20.6/src64/arch/ppc64.l:918:(asm tos (Dst D) picolisp-20.6/src64/arch/ppc64.l-919- (if D ############################################## picolisp-20.6/src64/arch/ppc64.l-925- picolisp-20.6/src64/arch/ppc64.l:926:(asm jz (Adr A) picolisp-20.6/src64/arch/ppc64.l-927- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-931- picolisp-20.6/src64/arch/ppc64.l:932:(asm jeq (Adr A) picolisp-20.6/src64/arch/ppc64.l-933- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-937- picolisp-20.6/src64/arch/ppc64.l:938:(asm jnz (Adr A) picolisp-20.6/src64/arch/ppc64.l-939- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-943- picolisp-20.6/src64/arch/ppc64.l:944:(asm jne (Adr A) picolisp-20.6/src64/arch/ppc64.l-945- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-949- picolisp-20.6/src64/arch/ppc64.l:950:(asm js (Adr A) picolisp-20.6/src64/arch/ppc64.l-951- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-955- picolisp-20.6/src64/arch/ppc64.l:956:(asm jns (Adr A) picolisp-20.6/src64/arch/ppc64.l-957- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-961- picolisp-20.6/src64/arch/ppc64.l:962:(asm jsz (Adr A) picolisp-20.6/src64/arch/ppc64.l-963- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-967- picolisp-20.6/src64/arch/ppc64.l:968:(asm jnsz (Adr A) picolisp-20.6/src64/arch/ppc64.l-969- (_jmp ############################################## picolisp-20.6/src64/arch/ppc64.l-973- picolisp-20.6/src64/arch/ppc64.l:974:(asm jc (Adr A) picolisp-20.6/src64/arch/ppc64.l-975- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-980- picolisp-20.6/src64/arch/ppc64.l:981:(asm jb (Adr A) picolisp-20.6/src64/arch/ppc64.l-982- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-987- picolisp-20.6/src64/arch/ppc64.l:988:(asm jx (Adr A) picolisp-20.6/src64/arch/ppc64.l-989- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-994- picolisp-20.6/src64/arch/ppc64.l:995:(asm jlt (Adr A) picolisp-20.6/src64/arch/ppc64.l-996- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1001- picolisp-20.6/src64/arch/ppc64.l:1002:(asm jnc (Adr A) picolisp-20.6/src64/arch/ppc64.l-1003- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1008- picolisp-20.6/src64/arch/ppc64.l:1009:(asm jnb (Adr A) picolisp-20.6/src64/arch/ppc64.l-1010- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1015- picolisp-20.6/src64/arch/ppc64.l:1016:(asm jnx (Adr A) picolisp-20.6/src64/arch/ppc64.l-1017- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1022- picolisp-20.6/src64/arch/ppc64.l:1023:(asm jge (Adr A) picolisp-20.6/src64/arch/ppc64.l-1024- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1029- picolisp-20.6/src64/arch/ppc64.l:1030:(asm jle (Adr A) picolisp-20.6/src64/arch/ppc64.l-1031- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1036- picolisp-20.6/src64/arch/ppc64.l:1037:(asm jgt (Adr A) picolisp-20.6/src64/arch/ppc64.l-1038- (prinst "cmpdi" "cr1" 31 -2) ############################################## picolisp-20.6/src64/arch/ppc64.l-1043- picolisp-20.6/src64/arch/ppc64.l:1044:(asm ret () picolisp-20.6/src64/arch/ppc64.l-1045- (prinst "blr") ) picolisp-20.6/src64/arch/ppc64.l-1046- picolisp-20.6/src64/arch/ppc64.l:1047:(asm catch ()) picolisp-20.6/src64/arch/ppc64.l-1048- picolisp-20.6/src64/arch/ppc64.l:1049:(asm throw () picolisp-20.6/src64/arch/ppc64.l-1050- (prinst "blr") ) ############################################## picolisp-20.6/src64/arch/ppc64.l-1052-# Floating point picolisp-20.6/src64/arch/ppc64.l:1053:(asm ldd () picolisp-20.6/src64/arch/ppc64.l-1054- (prinst "lfd" 1 "0(14)") ) picolisp-20.6/src64/arch/ppc64.l-1055- picolisp-20.6/src64/arch/ppc64.l:1056:(asm ldf () picolisp-20.6/src64/arch/ppc64.l-1057- (prinst "lfs" 1 "0(14)") ) picolisp-20.6/src64/arch/ppc64.l-1058- picolisp-20.6/src64/arch/ppc64.l:1059:(asm fixnum () picolisp-20.6/src64/arch/ppc64.l-1060- (prinst "srdi" 0 15 4) # Normalize scale (ignore sign) ############################################## picolisp-20.6/src64/arch/ppc64.l-1089- picolisp-20.6/src64/arch/ppc64.l:1090:(asm float () picolisp-20.6/src64/arch/ppc64.l-1091- (prinst "mr" 0 3) # Get scale in A ############################################## picolisp-20.6/src64/arch/ppc64.l-1118- picolisp-20.6/src64/arch/ppc64.l:1119:(asm std () picolisp-20.6/src64/arch/ppc64.l-1120- (prinst "stfd" 1 "0(18)") ) picolisp-20.6/src64/arch/ppc64.l-1121- picolisp-20.6/src64/arch/ppc64.l:1122:(asm stf () picolisp-20.6/src64/arch/ppc64.l-1123- (prinst "stfs" 1 "0(18)") ) ############################################## picolisp-20.6/src64/arch/ppc64.l-1125-# C-Calls picolisp-20.6/src64/arch/ppc64.l:1126:(asm cc (Adr A Arg M) picolisp-20.6/src64/arch/ppc64.l-1127- (let Reg (3 4 5 6 7 8 9 10) # Support only max. 8 parameters ############################################## picolisp-20.6/src64/arch/ppc64.l-1192- picolisp-20.6/src64/arch/ppc64.l:1193:(asm func ()) picolisp-20.6/src64/arch/ppc64.l-1194- picolisp-20.6/src64/arch/ppc64.l:1195:(asm begin () picolisp-20.6/src64/arch/ppc64.l-1196- (prinst "addis" 2 12 (pack ".TOC.-" *Label "@ha")) ############################################## picolisp-20.6/src64/arch/ppc64.l-1200- picolisp-20.6/src64/arch/ppc64.l:1201:(asm return () picolisp-20.6/src64/arch/ppc64.l-1202- (prinst "b" "return") ) ############################################## picolisp-20.6/src64/arch/ppc64.l-1204-# Stack Manipulations picolisp-20.6/src64/arch/ppc64.l:1205:(asm push (Src S) picolisp-20.6/src64/arch/ppc64.l-1206- (casq Src ############################################## picolisp-20.6/src64/arch/ppc64.l-1214- picolisp-20.6/src64/arch/ppc64.l:1215:(asm pop (Dst D) picolisp-20.6/src64/arch/ppc64.l-1216- (cond ############################################## picolisp-20.6/src64/arch/ppc64.l-1230- picolisp-20.6/src64/arch/ppc64.l:1231:(asm link () picolisp-20.6/src64/arch/ppc64.l-1232- (prinst "stdu" 19 "-8(1)") # Push L ############################################## picolisp-20.6/src64/arch/ppc64.l-1234- picolisp-20.6/src64/arch/ppc64.l:1235:(asm tuck (Src S) picolisp-20.6/src64/arch/ppc64.l-1236- (prinst "ld" 19 "0(1)") # Get L ############################################## picolisp-20.6/src64/arch/ppc64.l-1238- picolisp-20.6/src64/arch/ppc64.l:1239:(asm drop () picolisp-20.6/src64/arch/ppc64.l-1240- (prinst "ld" 1 "0(19)") # Restore S ############################################## picolisp-20.6/src64/arch/ppc64.l-1244-# Evaluation picolisp-20.6/src64/arch/ppc64.l:1245:(asm eval () picolisp-20.6/src64/arch/ppc64.l-1246- (prinst "andi." 0 15 "0x06") # Number? ############################################## picolisp-20.6/src64/arch/ppc64.l-1255- picolisp-20.6/src64/arch/ppc64.l:1256:(asm eval+ () picolisp-20.6/src64/arch/ppc64.l-1257- (prinst "andi." 0 15 "0x06") # Number? ############################################## picolisp-20.6/src64/arch/ppc64.l-1270- picolisp-20.6/src64/arch/ppc64.l:1271:(asm eval/ret () picolisp-20.6/src64/arch/ppc64.l-1272- (prinst "andi." 0 15 "0x06") # Number? ############################################## picolisp-20.6/src64/arch/ppc64.l-1280- picolisp-20.6/src64/arch/ppc64.l:1281:(asm exec (Reg) picolisp-20.6/src64/arch/ppc64.l-1282- (prinl "1:") # do ############################################## picolisp-20.6/src64/arch/ppc64.l-1291- picolisp-20.6/src64/arch/ppc64.l:1292:(asm prog (Reg) picolisp-20.6/src64/arch/ppc64.l-1293- (prinl "1:") # do ############################################## picolisp-20.6/src64/arch/ppc64.l-1308-# System picolisp-20.6/src64/arch/ppc64.l:1309:(asm initData ()) picolisp-20.6/src64/arch/ppc64.l-1310- picolisp-20.6/src64/arch/ppc64.l:1311:(asm initCode () picolisp-20.6/src64/arch/ppc64.l-1312- (unless *FPic ############################################## picolisp-20.6/src64/arch/ppc64.l-1592- picolisp-20.6/src64/arch/ppc64.l:1593:(asm initMain () picolisp-20.6/src64/arch/ppc64.l-1594- (prinst "addis" 2 12 ".TOC.-main@ha") ############################################## picolisp-20.6/src64/arch/ppc64.l-1606- picolisp-20.6/src64/arch/ppc64.l:1607:(asm initLib ()) picolisp-20.6/src64/arch/ppc64.l-1608- picolisp-20.6/src64/arch/ppc64.l:1609:(asm stop () picolisp-20.6/src64/arch/ppc64.l-1610- (prinst "mr" 3 15) ############################################## picolisp-20.6/src64/arch/x86-64.l-204- picolisp-20.6/src64/arch/x86-64.l:205:(asm nop () picolisp-20.6/src64/arch/x86-64.l-206- (prinst "nop") ) picolisp-20.6/src64/arch/x86-64.l-207- picolisp-20.6/src64/arch/x86-64.l:208:(asm align (N) picolisp-20.6/src64/arch/x86-64.l-209- (prinst ".balign" N) ) picolisp-20.6/src64/arch/x86-64.l-210- picolisp-20.6/src64/arch/x86-64.l:211:(asm skip (N) picolisp-20.6/src64/arch/x86-64.l-212- (if (== 'data *Section) ############################################## picolisp-20.6/src64/arch/x86-64.l-216-# Move data picolisp-20.6/src64/arch/x86-64.l:217:(asm ld (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-218- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-240- picolisp-20.6/src64/arch/x86-64.l:241:(asm ld2 (Src S) picolisp-20.6/src64/arch/x86-64.l-242- (prinst "movzwq" (src Src S) "%rax") ) picolisp-20.6/src64/arch/x86-64.l-243- picolisp-20.6/src64/arch/x86-64.l:244:(asm ld4 (Src S) picolisp-20.6/src64/arch/x86-64.l-245- (prinst "mov" (src Src S) "%eax") ) # Clears upper word of %rax ############################################## picolisp-20.6/src64/arch/x86-64.l-261- picolisp-20.6/src64/arch/x86-64.l:262:(asm ldz (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-263- (_cmov "cmovzq" "jnz") ) picolisp-20.6/src64/arch/x86-64.l-264- picolisp-20.6/src64/arch/x86-64.l:265:(asm ldnz (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-266- (_cmov "cmovnzq" "jz") ) picolisp-20.6/src64/arch/x86-64.l-267- picolisp-20.6/src64/arch/x86-64.l:268:(asm lea (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-269- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-274- picolisp-20.6/src64/arch/x86-64.l:275:(asm st2 (Dst D) picolisp-20.6/src64/arch/x86-64.l-276- (prinst "mov" "%ax" (dst Dst D)) ) picolisp-20.6/src64/arch/x86-64.l-277- picolisp-20.6/src64/arch/x86-64.l:278:(asm st4 (Dst D) picolisp-20.6/src64/arch/x86-64.l-279- (prinst "mov" "%eax" (dst Dst D)) ) picolisp-20.6/src64/arch/x86-64.l-280- picolisp-20.6/src64/arch/x86-64.l:281:(asm xchg (Dst D Dst2 D2) picolisp-20.6/src64/arch/x86-64.l-282- (dstDst "xchg" (dst Dst D) (src Dst2 D2)) ) picolisp-20.6/src64/arch/x86-64.l-283- picolisp-20.6/src64/arch/x86-64.l:284:(asm movn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/x86-64.l-285- (lea Dst D "%rdi") ############################################## picolisp-20.6/src64/arch/x86-64.l-290- picolisp-20.6/src64/arch/x86-64.l:291:(asm mset (Dst D Cnt C) picolisp-20.6/src64/arch/x86-64.l-292- (setq Dst (dst Dst D)) ############################################## picolisp-20.6/src64/arch/x86-64.l-297- picolisp-20.6/src64/arch/x86-64.l:298:(asm save (Src S End E Dst D) picolisp-20.6/src64/arch/x86-64.l-299- (lea Src S "%rsi") ############################################## picolisp-20.6/src64/arch/x86-64.l-306- picolisp-20.6/src64/arch/x86-64.l:307:(asm load (Dst D End E Src S) picolisp-20.6/src64/arch/x86-64.l-308- (lea Dst D "%rdi") ############################################## picolisp-20.6/src64/arch/x86-64.l-316-# Arithmetics picolisp-20.6/src64/arch/x86-64.l:317:(asm add (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-318- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-323- picolisp-20.6/src64/arch/x86-64.l:324:(asm addc (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-325- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-330- picolisp-20.6/src64/arch/x86-64.l:331:(asm sub (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-332- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-337- picolisp-20.6/src64/arch/x86-64.l:338:(asm subb (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-339- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-344- picolisp-20.6/src64/arch/x86-64.l:345:(asm inc (Dst D) picolisp-20.6/src64/arch/x86-64.l-346- (if (pre? "%" (setq Dst (dst Dst D))) ############################################## picolisp-20.6/src64/arch/x86-64.l-349- picolisp-20.6/src64/arch/x86-64.l:350:(asm dec (Dst D) picolisp-20.6/src64/arch/x86-64.l-351- (if (pre? "%" (setq Dst (dst Dst D))) ############################################## picolisp-20.6/src64/arch/x86-64.l-354- picolisp-20.6/src64/arch/x86-64.l:355:(asm not (Dst D) picolisp-20.6/src64/arch/x86-64.l-356- (if (pre? "%" (setq Dst (dst Dst D))) ############################################## picolisp-20.6/src64/arch/x86-64.l-359- picolisp-20.6/src64/arch/x86-64.l:360:(asm neg (Dst D) picolisp-20.6/src64/arch/x86-64.l-361- (if (pre? "%" (setq Dst (dst Dst D))) ############################################## picolisp-20.6/src64/arch/x86-64.l-364- picolisp-20.6/src64/arch/x86-64.l:365:(asm and (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-366- (dstSrc "and" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-367- picolisp-20.6/src64/arch/x86-64.l:368:(asm or (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-369- (dstSrcByte "or" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-370- picolisp-20.6/src64/arch/x86-64.l:371:(asm xor (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-372- (dstSrcByte "xor" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-373- picolisp-20.6/src64/arch/x86-64.l:374:(asm off (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-375- (dstSrcByte "and" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-376- picolisp-20.6/src64/arch/x86-64.l:377:(asm test (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-378- (dstSrcByte "test" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-379- picolisp-20.6/src64/arch/x86-64.l:380:(asm shl (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-381- (dstShift "shl" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-382- picolisp-20.6/src64/arch/x86-64.l:383:(asm shr (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-384- (dstShift "shr" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-385- picolisp-20.6/src64/arch/x86-64.l:386:(asm rol (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-387- (dstShift "rol" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-388- picolisp-20.6/src64/arch/x86-64.l:389:(asm ror (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-390- (dstShift "ror" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-391- picolisp-20.6/src64/arch/x86-64.l:392:(asm rxl (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-393- (dstShift "rcl" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-394- picolisp-20.6/src64/arch/x86-64.l:395:(asm rxr (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-396- (dstShift "rcr" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-397- picolisp-20.6/src64/arch/x86-64.l:398:(asm mul (Src S) picolisp-20.6/src64/arch/x86-64.l-399- (ifn (pre? "$" (setq Src (src Src S))) ############################################## picolisp-20.6/src64/arch/x86-64.l-403- picolisp-20.6/src64/arch/x86-64.l:404:(asm div (Src S) picolisp-20.6/src64/arch/x86-64.l-405- (ifn (pre? "$" (setq Src (src Src S))) ############################################## picolisp-20.6/src64/arch/x86-64.l-409- picolisp-20.6/src64/arch/x86-64.l:410:(asm zxt () # 8 bit -> 64 bit picolisp-20.6/src64/arch/x86-64.l-411- (prinst "movzx" "%al" "%rax") ) picolisp-20.6/src64/arch/x86-64.l-412- picolisp-20.6/src64/arch/x86-64.l:413:(asm eq () picolisp-20.6/src64/arch/x86-64.l-414- (prinst "or" "%r12" "%r12") ) picolisp-20.6/src64/arch/x86-64.l-415- picolisp-20.6/src64/arch/x86-64.l:416:(asm gt () picolisp-20.6/src64/arch/x86-64.l-417- (prinst "cmp" "%r12" "%rsp") ) picolisp-20.6/src64/arch/x86-64.l-418- picolisp-20.6/src64/arch/x86-64.l:419:(asm lt () picolisp-20.6/src64/arch/x86-64.l-420- (prinst "cmp" "%rsp" "%r12") ) picolisp-20.6/src64/arch/x86-64.l-421- picolisp-20.6/src64/arch/x86-64.l:422:(asm setx () picolisp-20.6/src64/arch/x86-64.l-423- (prinst "stc") ) picolisp-20.6/src64/arch/x86-64.l-424- picolisp-20.6/src64/arch/x86-64.l:425:(asm clrx () picolisp-20.6/src64/arch/x86-64.l-426- (prinst "clc") ) ############################################## picolisp-20.6/src64/arch/x86-64.l-428-# Comparisons picolisp-20.6/src64/arch/x86-64.l:429:(asm cmp (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-430- (dstSrc "cmp" (dst Dst D) (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-431- picolisp-20.6/src64/arch/x86-64.l:432:(asm cmpn (Dst D Src S Cnt C) picolisp-20.6/src64/arch/x86-64.l-433- (setq Dst (dst Dst D)) ############################################## picolisp-20.6/src64/arch/x86-64.l-439- picolisp-20.6/src64/arch/x86-64.l:440:(asm slen (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-441- (setq Dst (dst Dst D)) ############################################## picolisp-20.6/src64/arch/x86-64.l-452- picolisp-20.6/src64/arch/x86-64.l:453:(asm memb (Src S Cnt C) picolisp-20.6/src64/arch/x86-64.l-454- (prinst "cld") ############################################## picolisp-20.6/src64/arch/x86-64.l-461- picolisp-20.6/src64/arch/x86-64.l:462:(asm null (Src S) picolisp-20.6/src64/arch/x86-64.l-463- (prinst "cmp" "%r12" (src Src S)) ) picolisp-20.6/src64/arch/x86-64.l-464- picolisp-20.6/src64/arch/x86-64.l:465:(asm nul4 () picolisp-20.6/src64/arch/x86-64.l-466- (prinst "cmp" "%r12d" "%eax") ) ############################################## picolisp-20.6/src64/arch/x86-64.l-468-# Byte addressing picolisp-20.6/src64/arch/x86-64.l:469:(asm set (Dst D Src S) picolisp-20.6/src64/arch/x86-64.l-470- (setq Dst (dst Dst D) Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-479- picolisp-20.6/src64/arch/x86-64.l:480:(asm nul (Src S) picolisp-20.6/src64/arch/x86-64.l-481- (prinst "cmp" "%r12b" (src Src S)) ) ############################################## picolisp-20.6/src64/arch/x86-64.l-483-# Types picolisp-20.6/src64/arch/x86-64.l:484:(asm cnt (Src S) picolisp-20.6/src64/arch/x86-64.l-485- (prinst "testb" "$0x02" (lowByte (src Src S))) ) picolisp-20.6/src64/arch/x86-64.l-486- picolisp-20.6/src64/arch/x86-64.l:487:(asm big (Src S) picolisp-20.6/src64/arch/x86-64.l-488- (prinst "testb" "$0x04" (lowByte (src Src S))) ) picolisp-20.6/src64/arch/x86-64.l-489- picolisp-20.6/src64/arch/x86-64.l:490:(asm num (Src S) picolisp-20.6/src64/arch/x86-64.l-491- (prinst "testb" "$0x06" (lowByte (src Src S))) ) picolisp-20.6/src64/arch/x86-64.l-492- picolisp-20.6/src64/arch/x86-64.l:493:(asm sym (Src S) picolisp-20.6/src64/arch/x86-64.l-494- (prinst "testb" "$0x08" (lowByte (src Src S))) ) picolisp-20.6/src64/arch/x86-64.l-495- picolisp-20.6/src64/arch/x86-64.l:496:(asm atom (Src S) picolisp-20.6/src64/arch/x86-64.l-497- (prinst "testb" "$0x0E" (lowByte (src Src S))) ) ############################################## picolisp-20.6/src64/arch/x86-64.l-499-# Flow control picolisp-20.6/src64/arch/x86-64.l:500:(asm call (Adr A) picolisp-20.6/src64/arch/x86-64.l-501- (nond ############################################## picolisp-20.6/src64/arch/x86-64.l-509- picolisp-20.6/src64/arch/x86-64.l:510:(asm jmp (Adr A) picolisp-20.6/src64/arch/x86-64.l-511- (nond ############################################## picolisp-20.6/src64/arch/x86-64.l-518- picolisp-20.6/src64/arch/x86-64.l:519:(asm tos (Dst D) picolisp-20.6/src64/arch/x86-64.l-520- (setq Dst (dst Dst D)) ############################################## picolisp-20.6/src64/arch/x86-64.l-534- picolisp-20.6/src64/arch/x86-64.l:535:(asm jz (Adr A) picolisp-20.6/src64/arch/x86-64.l-536- (_jmp "jz" "jnz") ) picolisp-20.6/src64/arch/x86-64.l-537- picolisp-20.6/src64/arch/x86-64.l:538:(asm jeq (Adr A) picolisp-20.6/src64/arch/x86-64.l-539- (_jmp "jz" "jnz") ) picolisp-20.6/src64/arch/x86-64.l-540- picolisp-20.6/src64/arch/x86-64.l:541:(asm jnz (Adr A) picolisp-20.6/src64/arch/x86-64.l-542- (_jmp "jnz" "jz") ) picolisp-20.6/src64/arch/x86-64.l-543- picolisp-20.6/src64/arch/x86-64.l:544:(asm jne (Adr A) picolisp-20.6/src64/arch/x86-64.l-545- (_jmp "jnz" "jz") ) picolisp-20.6/src64/arch/x86-64.l-546- picolisp-20.6/src64/arch/x86-64.l:547:(asm js (Adr A) picolisp-20.6/src64/arch/x86-64.l-548- (_jmp "js" "jns") ) picolisp-20.6/src64/arch/x86-64.l-549- picolisp-20.6/src64/arch/x86-64.l:550:(asm jns (Adr A) picolisp-20.6/src64/arch/x86-64.l-551- (_jmp "jns" "js") ) picolisp-20.6/src64/arch/x86-64.l-552- picolisp-20.6/src64/arch/x86-64.l:553:(asm jsz (Adr A) picolisp-20.6/src64/arch/x86-64.l-554- (_jmp "jle" "jg") ) picolisp-20.6/src64/arch/x86-64.l-555- picolisp-20.6/src64/arch/x86-64.l:556:(asm jnsz (Adr A) picolisp-20.6/src64/arch/x86-64.l-557- (_jmp "jg" "jle") ) picolisp-20.6/src64/arch/x86-64.l-558- picolisp-20.6/src64/arch/x86-64.l:559:(asm jc (Adr A) picolisp-20.6/src64/arch/x86-64.l-560- (_jmp "jc" "jnc") ) picolisp-20.6/src64/arch/x86-64.l-561- picolisp-20.6/src64/arch/x86-64.l:562:(asm jb (Adr A) picolisp-20.6/src64/arch/x86-64.l-563- (_jmp "jc" "jnc") ) picolisp-20.6/src64/arch/x86-64.l-564- picolisp-20.6/src64/arch/x86-64.l:565:(asm jx (Adr A) picolisp-20.6/src64/arch/x86-64.l-566- (_jmp "jc" "jnc") ) picolisp-20.6/src64/arch/x86-64.l-567- picolisp-20.6/src64/arch/x86-64.l:568:(asm jlt (Adr A) picolisp-20.6/src64/arch/x86-64.l-569- (_jmp "jc" "jnc") ) picolisp-20.6/src64/arch/x86-64.l-570- picolisp-20.6/src64/arch/x86-64.l:571:(asm jnc (Adr A) picolisp-20.6/src64/arch/x86-64.l-572- (_jmp "jnc" "jc") ) picolisp-20.6/src64/arch/x86-64.l-573- picolisp-20.6/src64/arch/x86-64.l:574:(asm jnb (Adr A) picolisp-20.6/src64/arch/x86-64.l-575- (_jmp "jnc" "jc") ) picolisp-20.6/src64/arch/x86-64.l-576- picolisp-20.6/src64/arch/x86-64.l:577:(asm jnx (Adr A) picolisp-20.6/src64/arch/x86-64.l-578- (_jmp "jnc" "jc") ) picolisp-20.6/src64/arch/x86-64.l-579- picolisp-20.6/src64/arch/x86-64.l:580:(asm jge (Adr A) picolisp-20.6/src64/arch/x86-64.l-581- (_jmp "jnc" "jc") ) picolisp-20.6/src64/arch/x86-64.l-582- picolisp-20.6/src64/arch/x86-64.l:583:(asm jle (Adr A) picolisp-20.6/src64/arch/x86-64.l-584- (_jmp "jbe" "ja") ) picolisp-20.6/src64/arch/x86-64.l-585- picolisp-20.6/src64/arch/x86-64.l:586:(asm jgt (Adr A) picolisp-20.6/src64/arch/x86-64.l-587- (_jmp "ja" "jbe") ) picolisp-20.6/src64/arch/x86-64.l-588- picolisp-20.6/src64/arch/x86-64.l:589:(asm ret () picolisp-20.6/src64/arch/x86-64.l-590- (unless ############################################## picolisp-20.6/src64/arch/x86-64.l-596- picolisp-20.6/src64/arch/x86-64.l:597:(asm catch ()) picolisp-20.6/src64/arch/x86-64.l-598- picolisp-20.6/src64/arch/x86-64.l:599:(asm throw () picolisp-20.6/src64/arch/x86-64.l-600- ((get 'ret 'asm)) ) ############################################## picolisp-20.6/src64/arch/x86-64.l-602-# Floating point picolisp-20.6/src64/arch/x86-64.l:603:(asm ldd () picolisp-20.6/src64/arch/x86-64.l-604- (prinst "movsd" "(%rdx)" "%xmm0") ) picolisp-20.6/src64/arch/x86-64.l-605- picolisp-20.6/src64/arch/x86-64.l:606:(asm ldf () picolisp-20.6/src64/arch/x86-64.l-607- (prinst "movss" "(%rdx)" "%xmm0") ) picolisp-20.6/src64/arch/x86-64.l-608- picolisp-20.6/src64/arch/x86-64.l:609:(asm fixnum () picolisp-20.6/src64/arch/x86-64.l-610- (prinst "shr" "$4" "%rbx") # Normalize scale ############################################## picolisp-20.6/src64/arch/x86-64.l-639- picolisp-20.6/src64/arch/x86-64.l:640:(asm float () picolisp-20.6/src64/arch/x86-64.l-641- (prinst "mov" "%rax" "%r10") # Normalize scale ############################################## picolisp-20.6/src64/arch/x86-64.l-687- picolisp-20.6/src64/arch/x86-64.l:688:(asm std () picolisp-20.6/src64/arch/x86-64.l-689- (prinst "movsd" "%xmm0" "(%r15)") ) picolisp-20.6/src64/arch/x86-64.l-690- picolisp-20.6/src64/arch/x86-64.l:691:(asm stf () picolisp-20.6/src64/arch/x86-64.l-692- (prinst "movss" "%xmm0" "(%r15)") ) ############################################## picolisp-20.6/src64/arch/x86-64.l-694-# C-Calls picolisp-20.6/src64/arch/x86-64.l:695:(asm cc (Adr A Arg M) picolisp-20.6/src64/arch/x86-64.l-696- (unless (== 'cc (caar (seek '((L) (== (cadr L) *Statement)) *Program))) ############################################## picolisp-20.6/src64/arch/x86-64.l-838- picolisp-20.6/src64/arch/x86-64.l:839:(asm func ()) picolisp-20.6/src64/arch/x86-64.l-840- picolisp-20.6/src64/arch/x86-64.l:841:(asm begin () picolisp-20.6/src64/arch/x86-64.l-842- (prinst "call" "begin") ) picolisp-20.6/src64/arch/x86-64.l-843- picolisp-20.6/src64/arch/x86-64.l:844:(asm return () picolisp-20.6/src64/arch/x86-64.l-845- (prinst "jmp" "return") ) ############################################## picolisp-20.6/src64/arch/x86-64.l-847-# Stack Manipulations picolisp-20.6/src64/arch/x86-64.l:848:(asm push (Src S) picolisp-20.6/src64/arch/x86-64.l-849- (setq Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-854- picolisp-20.6/src64/arch/x86-64.l:855:(asm pop (Dst D) picolisp-20.6/src64/arch/x86-64.l-856- (setq Dst (dst Dst D)) ############################################## picolisp-20.6/src64/arch/x86-64.l-861- picolisp-20.6/src64/arch/x86-64.l:862:(asm link () picolisp-20.6/src64/arch/x86-64.l-863- (prinst "push" "%rbp") ############################################## picolisp-20.6/src64/arch/x86-64.l-865- picolisp-20.6/src64/arch/x86-64.l:866:(asm tuck (Src S) picolisp-20.6/src64/arch/x86-64.l-867- (setq Src (src Src S)) ############################################## picolisp-20.6/src64/arch/x86-64.l-873- picolisp-20.6/src64/arch/x86-64.l:874:(asm drop () picolisp-20.6/src64/arch/x86-64.l-875- (prinst "mov" "(%rbp)" "%rsp") ############################################## picolisp-20.6/src64/arch/x86-64.l-878-# Evaluation picolisp-20.6/src64/arch/x86-64.l:879:(asm eval () picolisp-20.6/src64/arch/x86-64.l-880- (prinst "test" "$0x06" "%bl") # Number? ############################################## picolisp-20.6/src64/arch/x86-64.l-887- picolisp-20.6/src64/arch/x86-64.l:888:(asm eval+ () picolisp-20.6/src64/arch/x86-64.l-889- (prinst "test" "$0x06" "%bl") # Number? ############################################## picolisp-20.6/src64/arch/x86-64.l-899- picolisp-20.6/src64/arch/x86-64.l:900:(asm eval/ret () picolisp-20.6/src64/arch/x86-64.l-901- (prinst "test" "$0x06" "%bl") # Number? ############################################## picolisp-20.6/src64/arch/x86-64.l-907- picolisp-20.6/src64/arch/x86-64.l:908:(asm exec (Reg) picolisp-20.6/src64/arch/x86-64.l-909- (prinl "1:") # do ############################################## picolisp-20.6/src64/arch/x86-64.l-924- picolisp-20.6/src64/arch/x86-64.l:925:(asm prog (Reg) picolisp-20.6/src64/arch/x86-64.l-926- (prinl "1:") # do ############################################## picolisp-20.6/src64/arch/x86-64.l-945-# System picolisp-20.6/src64/arch/x86-64.l:946:(asm initData ()) picolisp-20.6/src64/arch/x86-64.l-947- picolisp-20.6/src64/arch/x86-64.l:948:(asm initCode () picolisp-20.6/src64/arch/x86-64.l-949- (unless *FPic ############################################## picolisp-20.6/src64/arch/x86-64.l-973- picolisp-20.6/src64/arch/x86-64.l:974:(asm initMain () picolisp-20.6/src64/arch/x86-64.l-975- (prinst "xor" "%r12" "%r12") # Init NULL register ############################################## picolisp-20.6/src64/arch/x86-64.l-979- picolisp-20.6/src64/arch/x86-64.l:980:(asm initLib ()) picolisp-20.6/src64/arch/x86-64.l-981- picolisp-20.6/src64/arch/x86-64.l:982:(asm stop () picolisp-20.6/src64/arch/x86-64.l-983- (prinst "mov" "%rbx" "%rdi") # Return 'E' ############################################## picolisp-20.6/src64/Makefile-237-$(ARCH)$(SYS).base$(FMT): arch/$(ARCH).l defs.l $(baseFiles) sys/$(ARCH)$(SYS).code.l picolisp-20.6/src64/Makefile:238: ./mkAsm $(ARCH) "$(SYS)" $(FMT) $(OS) base "" $(lib)/map $(baseFiles) sys/$(ARCH)$(SYS).code.l picolisp-20.6/src64/Makefile-239- picolisp-20.6/src64/Makefile-240-$(ARCH)$(SYS).ext$(FMT): arch/$(ARCH).l defs.l ext.l $(ARCH)$(SYS).base$(FMT) picolisp-20.6/src64/Makefile:241: ./mkAsm $(ARCH) "$(SYS)" $(FMT) $(OS) ext T "" ext.l picolisp-20.6/src64/Makefile-242- picolisp-20.6/src64/Makefile-243-$(ARCH)$(SYS).ht$(FMT): arch/$(ARCH).l defs.l ht.l $(ARCH)$(SYS).base$(FMT) picolisp-20.6/src64/Makefile:244: ./mkAsm $(ARCH) "$(SYS)" $(FMT) $(OS) ht T "" ht.l picolisp-20.6/src64/Makefile-245- ############################################## picolisp-20.6/ersatz/lib.l-1396- (cons picolisp-20.6/ersatz/lib.l:1397: (xmlrpcKey (caddr (assoc 'name L))) picolisp-20.6/ersatz/lib.l:1398: (xmlrpcValue (caddr (assoc 'value L))) ) ) ) picolisp-20.6/ersatz/lib.l-1399- (cddr Lst) ) ) ) ) ) ############################################## picolisp-20.6/ersatz/fun.src-2243- picolisp-20.6/ersatz/fun.src:2244:caddr () picolisp-20.6/ersatz/fun.src-2245- return ex.Cdr.Car.eval().Cdr.Cdr.Car; ############################################## picolisp-20.6/ersatz/fun.src-2267- picolisp-20.6/ersatz/fun.src:2268:caaddr () picolisp-20.6/ersatz/fun.src-2269- return ex.Cdr.Car.eval().Cdr.Cdr.Car.Car; ############################################## picolisp-20.6/ersatz/fun.src-2291- picolisp-20.6/ersatz/fun.src:2292:cdaddr () picolisp-20.6/ersatz/fun.src-2293- return ex.Cdr.Car.eval().Cdr.Cdr.Car.Cdr; ############################################## picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile-191-$(ARCH)$(SYS).base$(FMT): arch/$(ARCH).l defs.l $(baseFiles) sys/$(ARCH)$(SYS).code.l picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile:192: ./mkAsm $(ARCH) "$(SYS)" $(FMT) $(OS) base "" $(lib)/map $(baseFiles) sys/$(ARCH)$(SYS).code.l picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile-193- picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile-194-$(ARCH)$(SYS).ext$(FMT): arch/$(ARCH).l defs.l ext.l $(ARCH)$(SYS).base$(FMT) picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile:195: ./mkAsm $(ARCH) "$(SYS)" $(FMT) $(OS) ext T "" ext.l picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile-196- picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile-197-$(ARCH)$(SYS).ht$(FMT): arch/$(ARCH).l defs.l ht.l $(ARCH)$(SYS).base$(FMT) picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile:198: ./mkAsm $(ARCH) "$(SYS)" $(FMT) $(OS) ht T "" ht.l picolisp-20.6/.pc/0001-picolisp_build_on_multi_cpu.patch/src64/Makefile-199- ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-94- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:95:(de asm Args picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-96- (cond picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-97- ((=T (car Args)) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:98: (put (car (setq Args (cdr Args))) 'asm NIL) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-99- ((== 'TOS (car Args)) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-100- (put (car (setq Args (cdr Args))) 'TOS T) ) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:101: (def (car Args) 'asm (cdr Args)) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-102- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:103:(asm asm (Val) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-104- (prinl " " Val) ) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-510- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:511:(asm if (Sym) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-512- (flowCondition Sym (push '*IfStack (flowLabel)) T) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-513- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:514:(asm else () picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-515- (let Lbl (car *IfStack) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-519- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:520:(asm end () picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-521- (link (cons ': (pop '*IfStack))) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-522- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:523:(asm do () picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-524- (link (cons ': (push '*DoStack (flowLabel)))) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-525- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:526:(asm while (Sym) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-527- (flowCondition Sym ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-532- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:533:(asm until (Sym) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-534- (let X (pop '*DoStack) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-537- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:538:(asm break (Sym) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-539- (flowCondition Sym ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-543- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:544:(asm continue (Sym) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-545- (flowCondition Sym (fin (car *DoStack))) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-546- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:547:(asm loop () picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-548- (let X (pop '*DoStack) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-558- (addc (destination) "*Mode" (source) "*Mode") picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:559: (asm (read)) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-560- (align (operand (read))) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-676- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:677:(asm :: (Src Lbl) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-678- (idxTags Lbl Src) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-680- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:681:(asm initFun (Src Lbl Name Val) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-682- (initSym Src Lbl Name Val (pack Val (and *AlignedCode "+2"))) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-683- picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:684:(asm initSym (Src Lbl Name Val) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-685- (initSym Src Lbl Name Val Val) ) ############################################## picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-722- (put (car Args) 'noCC Sym) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l:723: (def Sym 'asm (cdr Args)) ) ) picolisp-20.6/.pc/0003-picolisp_reproducible_build.patch/src64/lib/asm.l-724- ############################################## picolisp-20.6/.pc/0004-picolisp_hurd.patch/src/io.c-2294- pathString(x, nm); picolisp-20.6/.pc/0004-picolisp_hurd.patch/src/io.c:2295: x = caddr(ex), x = EVAL(x); picolisp-20.6/.pc/0004-picolisp_hurd.patch/src/io.c-2296- while ((fd = open(nm, isNil(x)? O_CREAT|O_RDWR : O_RDONLY, 0666)) < 0) {