===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
chezscheme-9.5.4+dfsg/bintar/Makefile-32-$(TARBALL): $(CONTENTS)
chezscheme-9.5.4+dfsg/bintar/Makefile:33: ( BROKEN=`find -L $R -type l` ; \
chezscheme-9.5.4+dfsg/bintar/Makefile-34- if test -n "$$BROKEN" ; then \
##############################################
chezscheme-9.5.4+dfsg/c/foreign.c-25- * or within foreign segments */
chezscheme-9.5.4+dfsg/c/foreign.c:26:#define ptr_to_addr(p) ((void *)p)
chezscheme-9.5.4+dfsg/c/foreign.c-27-#define addr_to_ptr(a) ((ptr)a)
##############################################
chezscheme-9.5.4+dfsg/c/foreign.c-114- (void *)value = (void *)0; /* assignment to prevent compiler warning */
chezscheme-9.5.4+dfsg/c/foreign.c:115: shl_t handle = (shl_t)ptr_to_addr(Scar(p));
chezscheme-9.5.4+dfsg/c/foreign.c-116-
##############################################
chezscheme-9.5.4+dfsg/c/foreign.c-121-
chezscheme-9.5.4+dfsg/c/foreign.c:122: value = dlsym(ptr_to_addr(Scar(p)), s);
chezscheme-9.5.4+dfsg/c/foreign.c-123- if (value != (void *)0) return addr_to_ptr(value);
##############################################
chezscheme-9.5.4+dfsg/c/foreign.c-173- Svector_ref(S_G.foreign_static, b)));
chezscheme-9.5.4+dfsg/c/foreign.c:174: } else if (ptr_to_addr(x) != v)
chezscheme-9.5.4+dfsg/c/foreign.c-175- S_error1("Sforeign_symbol", "duplicate symbol entry for ~s", Sstring_utf8(s, -1));
##############################################
chezscheme-9.5.4+dfsg/c/foreign.c-273-static void *lookup_foreign_entry(s) const char *s; {
chezscheme-9.5.4+dfsg/c/foreign.c:274: return ptr_to_addr(lookup(s));
chezscheme-9.5.4+dfsg/c/foreign.c-275-}
##############################################
chezscheme-9.5.4+dfsg/c/gc.c-112- unfortunately, the llvm-compiled gc ran much (10-20%) slower on my mac. */
chezscheme-9.5.4+dfsg/c/gc.c:113:#define relocate_return_addr(PCP) do {\
chezscheme-9.5.4+dfsg/c/gc.c-114- ptr *_pcp = PCP;\
##############################################
chezscheme-9.5.4+dfsg/c/gc.c-1613- relocate_pure(&WINDERS(tc));
chezscheme-9.5.4+dfsg/c/gc.c:1614: relocate_return_addr(&FRAME(tc,0));
chezscheme-9.5.4+dfsg/c/gc.c-1615- sweep_stack((uptr)SCHEMESTACK(tc), (uptr)SFP(tc), (uptr)FRAME(tc,0) ACTUAL_CTGS);
##############################################
chezscheme-9.5.4+dfsg/c/gc.c-1668- relocate_pure(&CONTLINK(p));
chezscheme-9.5.4+dfsg/c/gc.c:1669: relocate_return_addr(&CONTRET(p));
chezscheme-9.5.4+dfsg/c/gc.c-1670-
##############################################
chezscheme-9.5.4+dfsg/c/gc.c-1687- ret = (iptr)(*pp);
chezscheme-9.5.4+dfsg/c/gc.c:1688: relocate_return_addr(pp);
chezscheme-9.5.4+dfsg/c/gc.c-1689-
##############################################
chezscheme-9.5.4+dfsg/checkin-119-foreach x ($sdirs)
chezscheme-9.5.4+dfsg/checkin:120: set y = `(cd $W; find $x/* -type f -print -o -type d -prune)`
chezscheme-9.5.4+dfsg/checkin-121- set tmpsfiles = ($tmpsfiles $y)
##############################################
chezscheme-9.5.4+dfsg/checkin-141-foreach x ($bdirs)
chezscheme-9.5.4+dfsg/checkin:142: set y = `(cd $W; find $x/* -type f -print -o -type d -prune)`
chezscheme-9.5.4+dfsg/checkin-143- set tmpbfiles = ($tmpbfiles $y)
##############################################
chezscheme-9.5.4+dfsg/checkin-206- else
chezscheme-9.5.4+dfsg/checkin:207: set seqno = `cat $BACKUPDIR/seqno`
chezscheme-9.5.4+dfsg/checkin-208- endif
##############################################
chezscheme-9.5.4+dfsg/checkin-216- foreach x ($oldsfiles)
chezscheme-9.5.4+dfsg/checkin:217: set i = `echo "$x" | wc -c`
chezscheme-9.5.4+dfsg/checkin-218- @ n = $n + $i + 1
##############################################
chezscheme-9.5.4+dfsg/checkin-244- foreach x ($oldbfiles)
chezscheme-9.5.4+dfsg/checkin:245: set i = `echo "$x" | wc -c`
chezscheme-9.5.4+dfsg/checkin-246- @ n = $n + $i + 1
##############################################
chezscheme-9.5.4+dfsg/checkin-262- foreach x ($sfiles)
chezscheme-9.5.4+dfsg/checkin:263: set i = `echo "$x" | wc -c`
chezscheme-9.5.4+dfsg/checkin-264- @ n = $n + $i + 1
##############################################
chezscheme-9.5.4+dfsg/checkin-280- foreach x ($bfiles)
chezscheme-9.5.4+dfsg/checkin:281: set i = `echo "$x" | wc -c`
chezscheme-9.5.4+dfsg/checkin-282- @ n = $n + $i + 1
##############################################
chezscheme-9.5.4+dfsg/checkin-296-
chezscheme-9.5.4+dfsg/checkin:297:set tmpfiles = `(cd $W; find . -name zlib -prune -o -name lz4 -prune -o -type f -print)`
chezscheme-9.5.4+dfsg/checkin-298-set files = ()
##############################################
chezscheme-9.5.4+dfsg/checkin-318- foreach x ($files)
chezscheme-9.5.4+dfsg/checkin:319: set i = `echo "$x" | wc -c`
chezscheme-9.5.4+dfsg/checkin-320- @ n = $n + $i + 1
##############################################
chezscheme-9.5.4+dfsg/csug/foreign.stex-2377-\schemedisplay
chezscheme-9.5.4+dfsg/csug/foreign.stex:2378:(let ([addr (foreign-entry "strlen")])
chezscheme-9.5.4+dfsg/csug/foreign.stex-2379- (and (integer? addr) (exact? addr))) ;=> #t
##############################################
chezscheme-9.5.4+dfsg/makefiles/installsh-34- stack="$dir $stack"
chezscheme-9.5.4+dfsg/makefiles/installsh:35: dir=`dirname $dir`
chezscheme-9.5.4+dfsg/makefiles/installsh-36- done
##############################################
chezscheme-9.5.4+dfsg/makefiles/installsh-62- destfile=$dest
chezscheme-9.5.4+dfsg/makefiles/installsh:63: if [ -d $destfile ] ; then destfile=$destfile/`basename $file` ; fi
chezscheme-9.5.4+dfsg/makefiles/installsh-64- if [ $ifdiff -eq 1 ] && cmp -s $file $destfile || cp -f -p $file $destfile ; then
##############################################
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in-30-logcheck1: $(x).thirdrun
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in:31: @if [ -n "`grep 'Warning: Label(s) may have changed' $(x).log`" ] ; then\
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in-32- /bin/rm -f $(x).thirdrun ;\
##############################################
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in-38-logcheck2: $(x).thirdrun
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in:39: @if [ -n "`grep Warning $(x).log | grep -v pdftex.map`" ] ; then\
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in:40: echo "`grep Warning $(x).log | grep -v pdftex.map`";\
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in-41- false;\
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in-42- fi
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in:43: @if [ -n "`grep Overfull $(x).log | grep -v pdftex.map`" ] ; then\
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in:44: echo "`grep Overfull $(x).log | grep -v pdftex.map`";\
chezscheme-9.5.4+dfsg/makefiles/Makefile-csug.in-45- false;\
##############################################
chezscheme-9.5.4+dfsg/mats/4.ms-3574- (define g (ftype-guardian A))
chezscheme-9.5.4+dfsg/mats/4.ms:3575: (define addr (foreign-alloc (ftype-sizeof A)))
chezscheme-9.5.4+dfsg/mats/4.ms-3576- (define a1 (make-ftype-pointer A addr))
##############################################
chezscheme-9.5.4+dfsg/mats/4.ms-3608- (define regular-g (make-guardian))
chezscheme-9.5.4+dfsg/mats/4.ms:3609: (define addr (foreign-alloc (ftype-sizeof A)))
chezscheme-9.5.4+dfsg/mats/4.ms-3610- (define a (make-ftype-pointer A addr))
##############################################
chezscheme-9.5.4+dfsg/mats/4.ms-3629- (define regular-g (make-guardian))
chezscheme-9.5.4+dfsg/mats/4.ms:3630: (define addr (foreign-alloc (ftype-sizeof A)))
chezscheme-9.5.4+dfsg/mats/4.ms-3631- (define a (make-ftype-pointer A addr))
##############################################
chezscheme-9.5.4+dfsg/mats/4.ms-3650- (define regular-g (make-guardian))
chezscheme-9.5.4+dfsg/mats/4.ms:3651: (define addr (foreign-alloc (ftype-sizeof A)))
chezscheme-9.5.4+dfsg/mats/4.ms-3652- (define a (make-ftype-pointer A addr))
##############################################
chezscheme-9.5.4+dfsg/mats/4.ms-3693- (box a)))
chezscheme-9.5.4+dfsg/mats/4.ms:3694: (let ([x-addr (foreign-alloc (ftype-sizeof A))] [y-addr (foreign-alloc (ftype-sizeof A))] [z-addr (foreign-alloc (ftype-sizeof A))])
chezscheme-9.5.4+dfsg/mats/4.ms-3695- (let ([x1 (fritter x-addr 6 73)] [x2 (box (make-ftype-pointer A x-addr))] [y (fritter y-addr 2 57)] [z (fritter z-addr 2 91)])
##############################################
chezscheme-9.5.4+dfsg/mats/5_3.ms-6906- [beforefn (cadr (command-line-arguments))]
chezscheme-9.5.4+dfsg/mats/5_3.ms:6907: [afterfn (caddr (command-line-arguments))])
chezscheme-9.5.4+dfsg/mats/5_3.ms-6908- (let-values ([(before-info before) (with-input-from-file beforefn (lambda () (let ([info (read)]) (values info (read)))))]
##############################################
chezscheme-9.5.4+dfsg/mats/foreign.ms-1935- (eqv?
chezscheme-9.5.4+dfsg/mats/foreign.ms:1936: (let ([addr ((foreign-procedure "idiptr_addr" () iptr))])
chezscheme-9.5.4+dfsg/mats/foreign.ms:1937: (define idiptr (foreign-procedure addr (scheme-object) scheme-object))
chezscheme-9.5.4+dfsg/mats/foreign.ms-1938- (idiptr 'friggle))
##############################################
chezscheme-9.5.4+dfsg/mats/foreign1.c-45-
chezscheme-9.5.4+dfsg/mats/foreign1.c:46:EXPORT iptr idiptr_addr(void) {
chezscheme-9.5.4+dfsg/mats/foreign1.c-47- return (iptr)&idiptr;
##############################################
chezscheme-9.5.4+dfsg/mats/ftype.ms-170- (begin
chezscheme-9.5.4+dfsg/mats/ftype.ms:171: (define addr (foreign-alloc (ftype-sizeof Ac)))
chezscheme-9.5.4+dfsg/mats/ftype.ms-172- (define x (make-ftype-pointer Ac addr))
##############################################
chezscheme-9.5.4+dfsg/mats/ftype.ms-608- ...
chezscheme-9.5.4+dfsg/mats/ftype.ms:609: (let ([Scheme-addr (ftype-pointer-address (ftype-&ref idx pathx (make-ftype-pointer idx 0)))]
chezscheme-9.5.4+dfsg/mats/ftype.ms:610: [C-addr (ftype-ref result-type (j) results)])
chezscheme-9.5.4+dfsg/mats/ftype.ms-611- (unless (= Scheme-addr C-addr)
##############################################
chezscheme-9.5.4+dfsg/mats/ftype.ms-1587- (define a (make-ftype-pointer A (foreign-alloc (ftype-sizeof A))))
chezscheme-9.5.4+dfsg/mats/ftype.ms:1588: (define a-addr (ftype-pointer-address a))
chezscheme-9.5.4+dfsg/mats/ftype.ms-1589- (lambda (n)
##############################################
chezscheme-9.5.4+dfsg/mats/ftype.ms-2867- (let ([ftd (record-rtd (make-ftype-pointer fcf-B 0))])
chezscheme-9.5.4+dfsg/mats/ftype.ms:2868: (let ([ftd2 (caddr (cadr ((record-accessor (record-rtd ftd) 0) ftd)))])
chezscheme-9.5.4+dfsg/mats/ftype.ms-2869- (eq? ((record-accessor (record-rtd ftd2) 0) ftd2) ftd)))
chezscheme-9.5.4+dfsg/mats/ftype.ms-2870- ; indirectly check
chezscheme-9.5.4+dfsg/mats/ftype.ms:2871: (let* ([addr (foreign-alloc (ftype-sizeof fcf-B))]
chezscheme-9.5.4+dfsg/mats/ftype.ms-2872- [x (make-ftype-pointer fcf-B addr)])
##############################################
chezscheme-9.5.4+dfsg/mats/m4test.in-26-define(LOADREGS,{moveml {$2},REGMASK({$1},{D0FIRST})})
chezscheme-9.5.4+dfsg/mats/m4test.in:27:define(REGMASK,{{&0x}HEXWORD(eval(REGMASK1({$1}/,0,{$2})))})
chezscheme-9.5.4+dfsg/mats/m4test.in-28-define(REGMASK1,{
##############################################
chezscheme-9.5.4+dfsg/mats/m4test.in-31- {0},
chezscheme-9.5.4+dfsg/mats/m4test.in:32: substr({$1},eval($2+2),1),-,
chezscheme-9.5.4+dfsg/mats/m4test.in-33- {REGRANGE(substr({$1},$2,1),
chezscheme-9.5.4+dfsg/mats/m4test.in:34: substr({$1},eval($2+1),1),
chezscheme-9.5.4+dfsg/mats/m4test.in:35: substr({$1},eval($2+4),1),
chezscheme-9.5.4+dfsg/mats/m4test.in-36- {$3}) +
chezscheme-9.5.4+dfsg/mats/m4test.in:37: REGMASK1({$1},eval($2+6),{$3})},
chezscheme-9.5.4+dfsg/mats/m4test.in:38: {$3(substr({$1},$2,1),substr({$1},eval($2+1),1)) +
chezscheme-9.5.4+dfsg/mats/m4test.in:39: REGMASK1({$1},eval($2+3),{$3})})})
chezscheme-9.5.4+dfsg/mats/m4test.in-40-define(REGRANGE,{$4($1,$2)+ifelse($2,$3,{0},{REGRANGE($1,incr($2),$3,{$4})})})
##############################################
chezscheme-9.5.4+dfsg/mats/m4test.in-47-define(HEXBYTE,{HEXIFY($1,6)})
chezscheme-9.5.4+dfsg/mats/m4test.in:48:define(HEXIFY,{ifelse($1,0,{substr(00000000,$2)},{HEXIFY(eval($1/16),incr($2)){}HEXDIGIT(eval($1%16))})})
chezscheme-9.5.4+dfsg/mats/m4test.in-49-define(HEXDIGIT,{substr({0123456789abcdef},$1,1)})
##############################################
chezscheme-9.5.4+dfsg/mats/misc.ms-2609- (let f ([n 100] [l0 '()] [l1 '()] [l2 '()])
chezscheme-9.5.4+dfsg/mats/misc.ms:2610: (let ([l1addr (map #%$fxaddress l1)] [l2addr (map #%$fxaddress l2)])
chezscheme-9.5.4+dfsg/mats/misc.ms-2611- (chew 15)
##############################################
chezscheme-9.5.4+dfsg/mats/misc.ms-2732- (let f ([n 100] [l0 '()] [l1 '()] [l2 '()])
chezscheme-9.5.4+dfsg/mats/misc.ms:2733: (let ([l1addr (map #%$fxaddress l1)] [l2addr (map #%$fxaddress l2)])
chezscheme-9.5.4+dfsg/mats/misc.ms-2734- (chew 15)
##############################################
chezscheme-9.5.4+dfsg/newrelease-130-/bin/rm -f s/cmacros.ss
chezscheme-9.5.4+dfsg/newrelease:131:set VNUM = `printf "%04x%02x%02x" $MR $mR $bR`
chezscheme-9.5.4+dfsg/newrelease-132-sed -e "s/scheme-version #x......../scheme-version #x$VNUM/" ../s/cmacros.ss > s/cmacros.ss
##############################################
chezscheme-9.5.4+dfsg/release_notes/release_notes.stex-2699-\schemedisplay
chezscheme-9.5.4+dfsg/release_notes/release_notes.stex:2700:(let ([addr (ftype-pointer-address x)]) (= addr 0))
chezscheme-9.5.4+dfsg/release_notes/release_notes.stex-2701-\endschemedisplay
##############################################
chezscheme-9.5.4+dfsg/s/5_2.ss-44-(define cadar (lambda (x) (#2%cadar x)))
chezscheme-9.5.4+dfsg/s/5_2.ss:45:(define caddr (lambda (x) (#2%caddr x)))
chezscheme-9.5.4+dfsg/s/5_2.ss-46-(define cdaar (lambda (x) (#2%cdaar x)))
##############################################
chezscheme-9.5.4+dfsg/s/5_2.ss-52-(define caadar (lambda (x) (#2%caadar x)))
chezscheme-9.5.4+dfsg/s/5_2.ss:53:(define caaddr (lambda (x) (#2%caaddr x)))
chezscheme-9.5.4+dfsg/s/5_2.ss-54-(define cadaar (lambda (x) (#2%cadaar x)))
##############################################
chezscheme-9.5.4+dfsg/s/5_2.ss-60-(define cdadar (lambda (x) (#2%cdadar x)))
chezscheme-9.5.4+dfsg/s/5_2.ss:61:(define cdaddr (lambda (x) (#2%cdaddr x)))
chezscheme-9.5.4+dfsg/s/5_2.ss-62-(define cddaar (lambda (x) (#2%cddaar x)))
##############################################
chezscheme-9.5.4+dfsg/s/compile.ss-1228- (if dl
chezscheme-9.5.4+dfsg/s/compile.ss:1229: `(seq ,(build-primcall '$set-top-level-value! `(quote ,dl)
chezscheme-9.5.4+dfsg/s/compile.ss-1230- `(cte-optimization-loc ,db (ref #f ,dv)))
##############################################
chezscheme-9.5.4+dfsg/s/debug.ss-23-
chezscheme-9.5.4+dfsg/s/debug.ss:24:(disable-unbound-warning compile-with-asm compile-with-setup-closure-counts compile-with-closure-counts)
chezscheme-9.5.4+dfsg/s/debug.ss-25-
##############################################
chezscheme-9.5.4+dfsg/s/fasl.ss-320- (lambda (host-fld)
chezscheme-9.5.4+dfsg/s/fasl.ss:321: (let ([type (fld-type host-fld)] [addr (fld-byte host-fld)])
chezscheme-9.5.4+dfsg/s/fasl.ss-322- ; using $filter-foreign-type to get host filtering
##############################################
chezscheme-9.5.4+dfsg/s/fasl.ss-369- (put-u8 p (fxlogor (fxsll pad 4) (constant fasl-fld-type)))]))
chezscheme-9.5.4+dfsg/s/fasl.ss:370: (let ([type (fld-type target-fld)] [addr (fld-byte target-fld)])
chezscheme-9.5.4+dfsg/s/fasl.ss-371- ; using filter-foreign-type to get target filtering
##############################################
chezscheme-9.5.4+dfsg/s/fasl.ss-413- (check-field target-fld val)
chezscheme-9.5.4+dfsg/s/fasl.ss:414: (let ([target-addr (fld-byte target-fld)])
chezscheme-9.5.4+dfsg/s/fasl.ss:415: (fx+ target-addr (put-field host-fld (fx- target-addr last-target-addr) val)))))
chezscheme-9.5.4+dfsg/s/fasl.ss-416- (constant record-data-disp)
##############################################
chezscheme-9.5.4+dfsg/s/ftype.ss-783- (let ([fptr ?fptr])
chezscheme-9.5.4+dfsg/s/ftype.ss:784: (let ([addr (ftype-pointer-address fptr)])
chezscheme-9.5.4+dfsg/s/ftype.ss-785- (cond
##############################################
chezscheme-9.5.4+dfsg/s/ftype.ss-859- [(ftd-function? ftd)
chezscheme-9.5.4+dfsg/s/ftype.ss:860: (let ([addr (ftype-pointer-address fptr)])
chezscheme-9.5.4+dfsg/s/ftype.ss-861- `(function ,(or (foreign-address-name addr) addr)))]
##############################################
chezscheme-9.5.4+dfsg/s/ftype.ss-909- [(ftd-function? ftd)
chezscheme-9.5.4+dfsg/s/ftype.ss:910: (let ([addr (ftype-pointer-address fptr)])
chezscheme-9.5.4+dfsg/s/ftype.ss-911- `(function ,(foreign-address-name addr)))]
##############################################
chezscheme-9.5.4+dfsg/s/ftype.ss-945- (ftd? x)))
chezscheme-9.5.4+dfsg/s/ftype.ss:946: (set! $ftd-as-box? ; represents `(& <ftype>)` from `$expand-fp-ftype`
chezscheme-9.5.4+dfsg/s/ftype.ss-947- (lambda (x)
##############################################
chezscheme-9.5.4+dfsg/s/ftype.ss-1336- #f
chezscheme-9.5.4+dfsg/s/ftype.ss:1337: (lockable? (caddr (car ls)))))]
chezscheme-9.5.4+dfsg/s/ftype.ss-1338- [(ftd-union? ftd) (ormap lockable? (map cdr (ftd-union-field* ftd)))]
##############################################
chezscheme-9.5.4+dfsg/s/inspect.ss-2529- (if (logtest r (constant reloc-extended-format))
chezscheme-9.5.4+dfsg/s/inspect.ss:2530: (let ([addr (fx+ addr ($get-reloc x (fx+ i 2)))])
chezscheme-9.5.4+dfsg/s/inspect.ss-2531- (loop (fx+ i 3)
##############################################
chezscheme-9.5.4+dfsg/s/inspect.ss-2533- (compute-size
chezscheme-9.5.4+dfsg/s/inspect.ss:2534: ($get-code-obj type x addr ($get-reloc x (fx+ i 1)))))
chezscheme-9.5.4+dfsg/s/inspect.ss-2535- addr))
chezscheme-9.5.4+dfsg/s/inspect.ss:2536: (let ([addr (fx+ addr (logand (bitwise-arithmetic-shift-right r (constant reloc-code-offset-offset)) (constant reloc-code-offset-mask)))])
chezscheme-9.5.4+dfsg/s/inspect.ss-2537- (loop (fx+ i 1)
##############################################
chezscheme-9.5.4+dfsg/s/inspect.ss-2688- (if (logtest r (constant reloc-extended-format))
chezscheme-9.5.4+dfsg/s/inspect.ss:2689: (let ([addr (fx+ addr ($get-reloc x (fx+ i 2)))])
chezscheme-9.5.4+dfsg/s/inspect.ss:2690: (compute-composition! ($get-code-obj type x addr ($get-reloc x (fx+ i 1))))
chezscheme-9.5.4+dfsg/s/inspect.ss-2691- (loop (fx+ i 3) addr))
chezscheme-9.5.4+dfsg/s/inspect.ss:2692: (let ([addr (fx+ addr (logand (bitwise-arithmetic-shift-right r (constant reloc-code-offset-offset)) (constant reloc-code-offset-mask)))])
chezscheme-9.5.4+dfsg/s/inspect.ss-2693- (compute-composition!
##############################################
chezscheme-9.5.4+dfsg/s/inspect.ss-2824- (if (logtest r (constant reloc-extended-format))
chezscheme-9.5.4+dfsg/s/inspect.ss:2825: (let ([addr (fx+ addr ($get-reloc x (fx+ i 2)))])
chezscheme-9.5.4+dfsg/s/inspect.ss:2826: (construct-proc ($get-code-obj type x addr ($get-reloc x (fx+ i 1)))
chezscheme-9.5.4+dfsg/s/inspect.ss-2827- (loop (fx+ i 3) addr)))
chezscheme-9.5.4+dfsg/s/inspect.ss:2828: (let ([addr (fx+ addr (logand (bitwise-arithmetic-shift-right r (constant reloc-code-offset-offset)) (constant reloc-code-offset-mask)))])
chezscheme-9.5.4+dfsg/s/inspect.ss-2829- (construct-proc
##############################################
chezscheme-9.5.4+dfsg/s/interpret.ss-669- [(program ,uid ,body)
chezscheme-9.5.4+dfsg/s/interpret.ss:670: (ibeval ($build-invoke-program uid body))]
chezscheme-9.5.4+dfsg/s/interpret.ss-671- [(library/ct ,uid (,export-id* ...) ,import-code ,visit-code)
chezscheme-9.5.4+dfsg/s/interpret.ss:672: (ibeval ($build-install-library/ct-code uid export-id* import-code visit-code))]
chezscheme-9.5.4+dfsg/s/interpret.ss-673- [(library/rt ,uid (,dl* ...) (,db* ...) (,dv* ...) (,de* ...) ,body)
chezscheme-9.5.4+dfsg/s/interpret.ss:674: (ibeval ($build-install-library/rt-code uid dl* db* dv* de* body))]
chezscheme-9.5.4+dfsg/s/interpret.ss-675- [(library/rt-info ,linfo/rt) ($install-library/rt-desc linfo/rt for-import? importer ofn)]
##############################################
chezscheme-9.5.4+dfsg/s/mkheader.ss-690- [else
chezscheme-9.5.4+dfsg/s/mkheader.ss:691: ($oops who "asm locking code is not yet defined for ~s" (constant architecture))]))))
chezscheme-9.5.4+dfsg/s/mkheader.ss-692-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-194- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:195: (build-set! ,u (asm ,null-info ,asm-add ,u ,x1))
chezscheme-9.5.4+dfsg/s/ppc32.ss-196- (return x0 u 0)))))])))))])))
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-422- [(op (z ur) (x ur) (y negated-integer16 negated-shifted-integer16))
chezscheme-9.5.4+dfsg/s/ppc32.ss:423: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,x ,y))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-424- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:425: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub-from ,y ,x))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-426-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-428- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:429: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub-from/ovfl ,y ,x))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-430-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-432- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:433: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub-from/eq ,y ,x))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-434-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-436- [(op (z ur) (x ur) (y integer16 shifted-integer16))
chezscheme-9.5.4+dfsg/s/ppc32.ss:437: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,x ,y))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-438- [(op (z ur) (x integer16 shifted-integer16) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:439: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,y ,x))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-440- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:441: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-442-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-444- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:445: `(set! ,(make-live-info) ,z (asm ,info ,asm-add/ovfl ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-446-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-448- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:449: `(set! ,(make-live-info) ,z (asm ,info ,asm-add/carry ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-450-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-452- [(op (z ur) (x ur) (y integer16))
chezscheme-9.5.4+dfsg/s/ppc32.ss:453: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,x ,y))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-454- [(op (z ur) (x integer16) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:455: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,y ,x))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-456- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:457: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-458-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-460- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:461: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul/ovfl ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-462-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-464- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:465: `(set! ,(make-live-info) ,z (asm ,info ,asm-div ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-466-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-476- [(op (z ur) (x unsigned16 shifted-unsigned16) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:477: `(set! ,(make-live-info) ,z (asm ,info ,(select-op op) ,y ,x))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-478- [(op (z ur) (x ur) (y unsigned16 shifted-unsigned16))
chezscheme-9.5.4+dfsg/s/ppc32.ss:479: `(set! ,(make-live-info) ,z (asm ,info ,(select-op op) ,x ,y))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-480- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:481: `(set! ,(make-live-info) ,z (asm ,info ,(select-op op) ,x ,y))]))
chezscheme-9.5.4+dfsg/s/ppc32.ss-482-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-484- [(op (z ur) (x ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:485: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-486-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-490- `(set! ,(make-live-info) ,z ,x)
chezscheme-9.5.4+dfsg/s/ppc32.ss:491: `(set! ,(make-live-info) ,z (asm ,info ,asm-srl ,x ,y)))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-492- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:493: `(set! ,(make-live-info) ,z (asm ,info ,asm-srl ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-494-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-502- [(op (z ur) (x ur) (y shift-count ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:503: `(set! ,(make-live-info) ,z (asm ,info ,(select-op op) ,x ,y))]))
chezscheme-9.5.4+dfsg/s/ppc32.ss-504-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-516- (if (or (integer16? offset) (shifted-integer16? offset))
chezscheme-9.5.4+dfsg/s/ppc32.ss:517: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,x (immediate ,offset)))
chezscheme-9.5.4+dfsg/s/ppc32.ss-518- (let ([u (make-tmp 'u)])
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-520- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/s/ppc32.ss:521: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,x ,u))))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-522-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-528- (if (or (integer16? offset) (shifted-integer16? offset))
chezscheme-9.5.4+dfsg/s/ppc32.ss:529: `(set! ,(make-live-info) ,u (asm ,info ,asm-add ,y (immediate ,offset)))
chezscheme-9.5.4+dfsg/s/ppc32.ss-530- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss-531- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/s/ppc32.ss:532: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,u ,y))))
chezscheme-9.5.4+dfsg/s/ppc32.ss:533: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,x ,u))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-534-
chezscheme-9.5.4+dfsg/s/ppc32.ss-535- (define-instruction value (sext8 sext16 zext8 zext16)
chezscheme-9.5.4+dfsg/s/ppc32.ss:536: [(op (z ur) (x mem ur)) `(set! ,(make-live-info) ,z (asm ,info ,(asm-move/extend op) ,x))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-537-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-562- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:563: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,y ,w))
chezscheme-9.5.4+dfsg/s/ppc32.ss-564- (k x u imm-zero))))
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-572- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:573: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,x ,y))
chezscheme-9.5.4+dfsg/s/ppc32.ss-574- (k u %zero w))))]
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-577- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:578: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,x ,w))
chezscheme-9.5.4+dfsg/s/ppc32.ss-579- (k u y imm-zero)))]
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-585- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:586: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,x ,u))
chezscheme-9.5.4+dfsg/s/ppc32.ss-587- (k u y imm-zero)))))]))))))
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-591- (lambda (x y w)
chezscheme-9.5.4+dfsg/s/ppc32.ss:592: `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-load info) ,x ,y ,w))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-593- (define-instruction effect (store)
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-596- (lambda (x y w)
chezscheme-9.5.4+dfsg/s/ppc32.ss:597: `(asm ,null-info ,(asm-store info) ,x ,y ,w ,z)))]))
chezscheme-9.5.4+dfsg/s/ppc32.ss-598-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-600- [(op (x ur) (y ur) (z ur integer16))
chezscheme-9.5.4+dfsg/s/ppc32.ss:601: `(asm ,info ,asm-store-with-update ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-602-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-607- (if (ur? z)
chezscheme-9.5.4+dfsg/s/ppc32.ss:608: `(asm ,info ,(asm-fl-load/store op (info-loadfl-flreg info)) ,x ,z (immediate 0))
chezscheme-9.5.4+dfsg/s/ppc32.ss:609: `(asm ,info ,(asm-fl-load/store op (info-loadfl-flreg info)) ,x ,y ,z))
chezscheme-9.5.4+dfsg/s/ppc32.ss-610- (if (and (not (ur? z)) (fx= (nanopass-case (L15d Triv) z [(immediate ,imm) imm]) 0))
chezscheme-9.5.4+dfsg/s/ppc32.ss:611: `(asm ,info ,(asm-fl-load/store op (info-loadfl-flreg info)) ,x ,y ,z)
chezscheme-9.5.4+dfsg/s/ppc32.ss-612- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-613- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:614: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,y ,z))
chezscheme-9.5.4+dfsg/s/ppc32.ss:615: `(asm ,info ,(asm-fl-load/store op (info-loadfl-flreg info)) ,x ,u (immediate 0))))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-616-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-620- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:621: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:622: `(asm ,info ,asm-flt ,x ,y ,u)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-623-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-625- [(op (x ur) (y ur) (z ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:626: `(asm ,info ,(asm-flop-2 op) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-627-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-629- [(op (z ur) (x ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:630: `(set! ,(make-live-info) ,z (asm ,info ,asm-trunc ,x))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-631-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-634- (let ([info (make-info-condition-code op #f #f)])
chezscheme-9.5.4+dfsg/s/ppc32.ss:635: (values '() `(asm ,info ,(asm-fl-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-636-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-640- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:641: `(set! ,(make-live-info) ,u1 (asm ,null-info ,asm-add ,x ,w))
chezscheme-9.5.4+dfsg/s/ppc32.ss:642: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:643: `(asm ,null-info ,asm-inc-cc-counter ,u1 ,z ,u2)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-644-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-649- `(set! ,(make-live-info) ,u ,x)
chezscheme-9.5.4+dfsg/s/ppc32.ss:650: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,u ,y))
chezscheme-9.5.4+dfsg/s/ppc32.ss-651- `(set! ,(make-live-info) ,x ,u)))])
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-655- (safe-assert (and (info-kill*? info) (memq %real-zero (info-kill*-kill* info))))
chezscheme-9.5.4+dfsg/s/ppc32.ss:656: `(set! ,(make-live-info) ,z (asm ,info ,asm-read-time-base))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-657-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-659- (define-instruction value (read-performance-monitoring-counter)
chezscheme-9.5.4+dfsg/s/ppc32.ss:660: [(op (z ur) (x imm-constant ur)) `(set! ,(make-live-info) ,z (asm ,null-info ,asm-read-counter))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-661-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-667- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:668: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:669: `(set! ,(make-live-info) ,z (asm ,info ,asm-get-tc ,u))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-670-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-676- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:677: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:678: `(set! ,(make-live-info) ,z (asm ,info ,asm-activate-thread ,u))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-679-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-683- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:684: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:685: `(asm ,info ,asm-deactivate-thread ,u)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-686-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-691- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:692: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:693: `(asm ,info ,asm-unactivate-thread ,u)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-694-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-698- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:699: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss-700- `(set! ,(make-live-info) ,z
chezscheme-9.5.4+dfsg/s/ppc32.ss:701: (asm ,info ,(asm-library-call (info-asmlib-libspec info) #t) ,u ,(info-kill*-live*-live* info) ...))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-702-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-706- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:707: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:708: `(asm ,info ,(asm-library-call! (info-asmlib-libspec info) #t) ,u ,(info-kill*-live*-live* info) ...)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-709-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-714- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:715: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:716: `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info) #t) ,u)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-717-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-720- (let ([info (if (eq? op 'eq?) info-cc-eq (make-info-condition-code op #t #t))])
chezscheme-9.5.4+dfsg/s/ppc32.ss:721: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-722- [(op (x ur) (y ur integer16))
chezscheme-9.5.4+dfsg/s/ppc32.ss-723- (let ([info (if (eq? op 'eq?) info-cc-eq (make-info-condition-code op #f #t))])
chezscheme-9.5.4+dfsg/s/ppc32.ss:724: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-725-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-728- (let ([info (make-info-condition-code op #t #t)])
chezscheme-9.5.4+dfsg/s/ppc32.ss:729: (values '() `(asm ,info ,(asm-logrelop info) ,x ,y)))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-730- [(op (x ur) (y ur unsigned16))
chezscheme-9.5.4+dfsg/s/ppc32.ss-731- (let ([info (make-info-condition-code op #f #t)])
chezscheme-9.5.4+dfsg/s/ppc32.ss:732: (values '() `(asm ,info ,(asm-logrelop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-733-
chezscheme-9.5.4+dfsg/s/ppc32.ss-734- (define-instruction pred (condition-code)
chezscheme-9.5.4+dfsg/s/ppc32.ss:735: [(op) (values '() `(asm ,info ,(asm-condition-code info)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-736-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-741- (with-output-language (L15d Effect)
chezscheme-9.5.4+dfsg/s/ppc32.ss:742: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-logand ,x ,mask)))
chezscheme-9.5.4+dfsg/s/ppc32.ss:743: `(asm ,info-cc-eq ,(asm-logrelop info-cc-eq) ,u ,type)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-744-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-746- [(op (x shifted-unsigned16 unsigned16) (y ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:747: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/s/ppc32.ss-748- [(op (x ur) (y ur integer16))
chezscheme-9.5.4+dfsg/s/ppc32.ss:749: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-750-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-765- `(set! ,(make-live-info) ,u ,w)
chezscheme-9.5.4+dfsg/s/ppc32.ss:766: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,y ,w)))
chezscheme-9.5.4+dfsg/s/ppc32.ss-767- (k x u)))]
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-771- `(set! ,(make-live-info) ,u ,w)
chezscheme-9.5.4+dfsg/s/ppc32.ss:772: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,y ,u))
chezscheme-9.5.4+dfsg/s/ppc32.ss-773- (k x u)))])))))
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-780- '()
chezscheme-9.5.4+dfsg/s/ppc32.ss:781: `(asm ,info-cc-eq ,(asm-lock info-cc-eq) ,base ,index))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-782- (define-instruction effect (locked-incr! locked-decr!)
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-787- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:788: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:789: `(asm ,null-info ,(asm-lock+/- op) ,base ,index ,u)))))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-790- (define-instruction effect (cas)
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-795- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:796: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/ppc32.ss:797: `(asm ,info ,asm-cas ,base ,index ,old ,new ,u)))))]))
chezscheme-9.5.4+dfsg/s/ppc32.ss-798-
chezscheme-9.5.4+dfsg/s/ppc32.ss-799- (define-instruction effect (pause)
chezscheme-9.5.4+dfsg/s/ppc32.ss:800: [(op) `(asm ,info ,asm-isync)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-801-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-803- [(op (x ur))
chezscheme-9.5.4+dfsg/s/ppc32.ss:804: `(asm ,info ,asm-indirect-call ,x ,(info-kill*-live*-live* info) ...)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-805-
chezscheme-9.5.4+dfsg/s/ppc32.ss-806- (define-instruction effect save-flrv
chezscheme-9.5.4+dfsg/s/ppc32.ss:807: [(op) `(asm ,info ,asm-save-flrv)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-808-
chezscheme-9.5.4+dfsg/s/ppc32.ss-809- (define-instruction effect restore-flrv
chezscheme-9.5.4+dfsg/s/ppc32.ss:810: [(op) `(asm ,info ,asm-restore-flrv)])
chezscheme-9.5.4+dfsg/s/ppc32.ss-811-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-818- (seq
chezscheme-9.5.4+dfsg/s/ppc32.ss:819: `(set! ,(make-live-info) ,%real-zero (asm ,info ,(asm-get-lr)))
chezscheme-9.5.4+dfsg/s/ppc32.ss-820- `(set! ,(make-live-info) (mref ,%Csp ,%zero ,n) ,%real-zero)))])
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-826- `(set! ,(make-live-info) ,%real-zero (mref ,%Csp ,%zero ,n))
chezscheme-9.5.4+dfsg/s/ppc32.ss:827: `(asm ,info ,(asm-set-lr) ,%real-zero)))])
chezscheme-9.5.4+dfsg/s/ppc32.ss-828-)
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-976- ; Note: actually a reg-reg-uimm-op ori r0, r0,0, written this way to get the
chezscheme-9.5.4+dfsg/s/ppc32.ss:977: ; nop to show up in asm output.
chezscheme-9.5.4+dfsg/s/ppc32.ss-978- (define-op nop nop-op)
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-1322- (build-maybe-cons* #'((build long (byte-fields chunk ...)))
chezscheme-9.5.4+dfsg/s/ppc32.ss:1323: #'(aop-cons* `(asm ,op ,opnd ...) ?code*))])))
chezscheme-9.5.4+dfsg/s/ppc32.ss-1324-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-1402- (case (car x)
chezscheme-9.5.4+dfsg/s/ppc32.ss:1403: [(asm ppc32-abs ppc32-jump ppc32-call) 0]
chezscheme-9.5.4+dfsg/s/ppc32.ss-1404- [else 4])))
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-1834-
chezscheme-9.5.4+dfsg/s/ppc32.ss:1835: ;; ASM INSTRUCTIONS DONE ABOVE HERE
chezscheme-9.5.4+dfsg/s/ppc32.ss-1836-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-2072- (let ([rel (make-funcrel 'abs l offset)])
chezscheme-9.5.4+dfsg/s/ppc32.ss:2073: (cons* rel (aop-cons* `(asm "mrv point:" ,rel) code*)))))
chezscheme-9.5.4+dfsg/s/ppc32.ss-2074-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-2115- (lambda (reloc code*)
chezscheme-9.5.4+dfsg/s/ppc32.ss:2116: (cons* reloc (aop-cons* `(asm "relocation:" ,reloc) code*))))
chezscheme-9.5.4+dfsg/s/ppc32.ss-2117-
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-2125- `(abs 0 (object ,lpm)))
chezscheme-9.5.4+dfsg/s/ppc32.ss:2126: (aop-cons* `(asm livemask: ,(format "~b" lpm))
chezscheme-9.5.4+dfsg/s/ppc32.ss-2127- '(code-top-link)
chezscheme-9.5.4+dfsg/s/ppc32.ss:2128: (aop-cons* `(asm code-top-link)
chezscheme-9.5.4+dfsg/s/ppc32.ss-2129- `(long . ,fs)
chezscheme-9.5.4+dfsg/s/ppc32.ss:2130: (aop-cons* `(asm "frame size:" ,fs)
chezscheme-9.5.4+dfsg/s/ppc32.ss-2131- (if mrvl
##############################################
chezscheme-9.5.4+dfsg/s/ppc32.ss-2134- mrv-error
chezscheme-9.5.4+dfsg/s/ppc32.ss:2135: (aop-cons* `(asm "mrv point:" ,mrv-error)
chezscheme-9.5.4+dfsg/s/ppc32.ss-2136- code*))))))))))
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1606- ($oops 'mutex-acquire "~s is not a mutex" m))
chezscheme-9.5.4+dfsg/s/prims.ss:1607: (let ([addr ($mutex-addr m)])
chezscheme-9.5.4+dfsg/s/prims.ss-1608- (when (eq? addr 0)
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1617- ($oops 'mutex-release "~s is not a mutex" m))
chezscheme-9.5.4+dfsg/s/prims.ss:1618: (let ([addr ($mutex-addr m)])
chezscheme-9.5.4+dfsg/s/prims.ss-1619- (when (eq? addr 0)
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1649- ($oops 'condition-wait "~s is not a time record of type time-duration or time-utc" t))
chezscheme-9.5.4+dfsg/s/prims.ss:1650: (let ([caddr ($condition-addr c)] [maddr ($mutex-addr m)])
chezscheme-9.5.4+dfsg/s/prims.ss-1651- (when (eq? caddr 0)
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1663- ($oops 'condition-broadcast "~s is not a condition" c))
chezscheme-9.5.4+dfsg/s/prims.ss:1664: (let ([addr ($condition-addr c)])
chezscheme-9.5.4+dfsg/s/prims.ss-1665- (when (eq? addr 0)
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1672- ($oops 'condition-signal "~s is not a condition" c))
chezscheme-9.5.4+dfsg/s/prims.ss:1673: (let ([addr ($condition-addr c)])
chezscheme-9.5.4+dfsg/s/prims.ss-1674- (when (eq? addr 0)
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1683- (when m
chezscheme-9.5.4+dfsg/s/prims.ss:1684: (let ([addr ($mutex-addr m)])
chezscheme-9.5.4+dfsg/s/prims.ss-1685- (unless (eq? addr 0)
##############################################
chezscheme-9.5.4+dfsg/s/prims.ss-1691- (when c
chezscheme-9.5.4+dfsg/s/prims.ss:1692: (let ([addr ($condition-addr c)])
chezscheme-9.5.4+dfsg/s/prims.ss-1693- (unless (eq? addr 0)
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-447- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:448: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-449- [(op (z mem) (x zero) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:450: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-451- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:452: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-453- [(op (z ur) (x zero) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-455- `(set! ,(make-live-info) ,z ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:456: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,z)))]
chezscheme-9.5.4+dfsg/s/x86.ss-457- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:458: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub-negate ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-459- [(op (z ur) (x ur) (y negatable-real-imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-461- `(move-related ,z ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:462: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (- (extract-imm y))) ,x)))]
chezscheme-9.5.4+dfsg/s/x86.ss-463- [(op (z ur) (x mem imm32) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-466- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:467: `(set! ,(make-live-info) ,t (asm ,info ,asm-sub-negate ,t ,x))
chezscheme-9.5.4+dfsg/s/x86.ss-468- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-472- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:473: `(set! ,(make-live-info) ,t (asm ,info ,asm-sub ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-474- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-477- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:478: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-479- [(op (z mem) (x zero) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:480: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-481- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:482: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-483- [(op (z ur) (x zero) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-485- `(set! ,(make-live-info) ,z ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:486: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,z)))]
chezscheme-9.5.4+dfsg/s/x86.ss-487- [(op (z ur) (x ur) (y ur mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-490- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:491: `(set! ,(make-live-info) ,t (asm ,info ,asm-sub ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-492- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-495- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:496: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-497- [(op (z mem) (x ur imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:498: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-499- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:500: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-501- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:502: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-503- [(op (z ur) (x ur) (y real-imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-505- `(move-related ,z ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:506: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (extract-imm y)) ,x)))]
chezscheme-9.5.4+dfsg/s/x86.ss-507- [(op (z ur) (x real-imm32) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-509- `(move-related ,z ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:510: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (extract-imm x)) ,y)))]
chezscheme-9.5.4+dfsg/s/x86.ss-511- [(op (z ur) (x ur) (y mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-514- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:515: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-516- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-520- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:521: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,x))
chezscheme-9.5.4+dfsg/s/x86.ss-522- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-526- `(move-related ,z ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:527: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea2 0) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/x86.ss-528-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-530- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:531: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-532- [(op (z mem) (x ur imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:533: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-534- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:535: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-536- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:537: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-538- [(op (z ur) (x ur) (y mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-541- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:542: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-543- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-547- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:548: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,x))
chezscheme-9.5.4+dfsg/s/x86.ss-549- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-553- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:554: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-555- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-558- [(op (z ur) (x z) (y ur mem))
chezscheme-9.5.4+dfsg/s/x86.ss:559: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-560- [(op (z ur) (x ur mem) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:561: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-562- [(op (z ur) (x ur mem) (y imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:563: `(set! ,(make-live-info) ,z (asm ,info ,asm-muli ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-564- [(op (z ur) (x imm32) (y ur mem))
chezscheme-9.5.4+dfsg/s/x86.ss:565: `(set! ,(make-live-info) ,z (asm ,info ,asm-muli ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-566- [(op (z ur) (x ur) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-569- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:570: `(set! ,(make-live-info) ,t (asm ,info ,asm-mul ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-571- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-581- `(set! ,(make-live-info) ,ueax ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:582: `(set! ,(make-live-info) ,uedx (asm ,null-info ,asm-sext-eax->edx ,ueax))
chezscheme-9.5.4+dfsg/s/x86.ss:583: `(set! ,(make-live-info) ,ueax (asm ,null-info ,asm-div ,ueax ,uedx ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-584- `(set! ,(make-live-info) ,z ,ueax)))))))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-589- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:590: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-591- [(op (z mem) (x ur imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:592: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-593- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:594: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-595- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86.ss:596: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-597- [(op (z ur) (x ur) (y mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-600- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:601: `(set! ,(make-live-info) ,t (asm ,info ,(asm-addop op) ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-602- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-606- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:607: `(set! ,(make-live-info) ,t (asm ,info ,(asm-addop op) ,t ,x))
chezscheme-9.5.4+dfsg/s/x86.ss-608- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-611- [(op (z mem) (x z))
chezscheme-9.5.4+dfsg/s/x86.ss:612: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-613- [(op (z ur) (x z))
chezscheme-9.5.4+dfsg/s/x86.ss:614: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-615- [(op (z ur) (x ur mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-617- `(set! ,(make-live-info) ,z ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:618: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,z)))])
chezscheme-9.5.4+dfsg/s/x86.ss-619-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-628- `(set! ,(make-live-info) ,uecx ,y)
chezscheme-9.5.4+dfsg/s/x86.ss:629: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,uecx))))))))
chezscheme-9.5.4+dfsg/s/x86.ss-630- [(op (z mem) (x z) (y imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:631: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-632- ;; NB: need to return in these cases?
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-634- [(op (z ur) (x z) (y imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:635: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-636- [(op (z ur) (x z) (y ur mem imm)) (go info op z x y)]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-640- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:641: `(set! ,(make-live-info) ,t (asm ,info ,(asm-shiftop op) ,t ,y))
chezscheme-9.5.4+dfsg/s/x86.ss-642- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-659- ; TODO: risc arch, x86_64 must handle cases where offset is too lage
chezscheme-9.5.4+dfsg/s/x86.ss:660: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (info-lea-offset info)) ,x))])
chezscheme-9.5.4+dfsg/s/x86.ss-661-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-664- ; TODO: risc arch, x86_64 must handle cases where offset is too lage
chezscheme-9.5.4+dfsg/s/x86.ss:665: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea2 (info-lea-offset info)) ,x ,y))])
chezscheme-9.5.4+dfsg/s/x86.ss-666-
chezscheme-9.5.4+dfsg/s/x86.ss-667- (define-instruction value (sext8 sext16 zext8 zext16)
chezscheme-9.5.4+dfsg/s/x86.ss:668: [(op (z ur) (x ur mem)) `(set! ,(make-live-info) ,z (asm ,info ,(asm-move/extend op) ,x))])
chezscheme-9.5.4+dfsg/s/x86.ss-669-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-677- expr
chezscheme-9.5.4+dfsg/s/x86.ss:678: `(set! ,(make-live-info) ,z (asm ,info ,(asm-swap (info-load-type info)) ,z)))
chezscheme-9.5.4+dfsg/s/x86.ss-679- expr)))))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-681- (maybe-swap info z
chezscheme-9.5.4+dfsg/s/x86.ss:682: `(set! ,(make-live-info) ,z (asm ,info ,(asm-load (info-load-type info)) ,x ,y ,w)))]
chezscheme-9.5.4+dfsg/s/x86.ss-683- [(op (z ur) (x ur) (y ur) (w ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-685- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/s/x86.ss:686: `(set! ,(make-live-info) ,z (asm ,info ,(asm-load (info-load-type info)) ,x ,w (immediate 0)))
chezscheme-9.5.4+dfsg/s/x86.ss-687- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/s/x86.ss-688- (seq
chezscheme-9.5.4+dfsg/s/x86.ss:689: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-lea2 0) ,y ,w))
chezscheme-9.5.4+dfsg/s/x86.ss:690: `(set! ,(make-live-info) ,z (asm ,info ,(asm-load (info-load-type info)) ,x ,u (immediate 0)))))))])
chezscheme-9.5.4+dfsg/s/x86.ss-691-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-700- `(set! ,(make-live-info) ,u ,w)
chezscheme-9.5.4+dfsg/s/x86.ss:701: `(set! ,(make-live-info) ,u (asm ,info ,(asm-swap (info-load-type info)) ,u))
chezscheme-9.5.4+dfsg/s/x86.ss-702- (k u)))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-718- (lambda (w)
chezscheme-9.5.4+dfsg/s/x86.ss:719: `(asm ,info ,(asm-store type) ,x ,y ,z ,w))))))]
chezscheme-9.5.4+dfsg/s/x86.ss-720- [(op (x ur) (y ur) (z ur) (w ur real-imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-726- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/s/x86.ss:727: `(asm ,info ,(asm-store type) ,x ,z (immediate 0) ,w)
chezscheme-9.5.4+dfsg/s/x86.ss-728- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/s/x86.ss-729- (seq
chezscheme-9.5.4+dfsg/s/x86.ss:730: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-lea2 0) ,y ,z))
chezscheme-9.5.4+dfsg/s/x86.ss:731: `(asm ,info ,(asm-store type) ,x ,u (immediate 0) ,w)))))))))])
chezscheme-9.5.4+dfsg/s/x86.ss-732-
chezscheme-9.5.4+dfsg/s/x86.ss-733- (define-instruction value (fstpl)
chezscheme-9.5.4+dfsg/s/x86.ss:734: [(op (z mem)) `(set! ,(make-live-info) ,z (asm ,info ,asm-fstpl))])
chezscheme-9.5.4+dfsg/s/x86.ss-735-
chezscheme-9.5.4+dfsg/s/x86.ss-736- (define-instruction value (fstps)
chezscheme-9.5.4+dfsg/s/x86.ss:737: [(op (z mem)) `(set! ,(make-live-info) ,z (asm ,info ,asm-fstps))])
chezscheme-9.5.4+dfsg/s/x86.ss-738-
chezscheme-9.5.4+dfsg/s/x86.ss-739- (define-instruction effect (fldl)
chezscheme-9.5.4+dfsg/s/x86.ss:740: [(op (z mem)) `(asm ,info ,asm-fldl ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-741-
chezscheme-9.5.4+dfsg/s/x86.ss-742- (define-instruction effect (flds)
chezscheme-9.5.4+dfsg/s/x86.ss:743: [(op (z mem)) `(asm ,info ,asm-flds ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-744-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-746- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:747: `(asm ,info ,(asm-fl-cvt op (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-748-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-750- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:751: `(asm ,info ,(asm-fl-store op (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-752-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-754- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:755: `(asm ,info ,(asm-fl-load op (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-756-
chezscheme-9.5.4+dfsg/s/x86.ss-757- (define-instruction effect (flt)
chezscheme-9.5.4+dfsg/s/x86.ss:758: [(op (x mem ur) (y ur)) `(asm ,info ,asm-flt ,x ,y)])
chezscheme-9.5.4+dfsg/s/x86.ss-759-
chezscheme-9.5.4+dfsg/s/x86.ss-760- (define-instruction effect (fl+ fl- fl/ fl*)
chezscheme-9.5.4+dfsg/s/x86.ss:761: [(op (x ur) (y ur) (z ur)) `(asm ,info ,(asm-flop-2 op) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-762-
chezscheme-9.5.4+dfsg/s/x86.ss-763- (define-instruction effect (flsqrt)
chezscheme-9.5.4+dfsg/s/x86.ss:764: [(op (x ur) (y ur)) `(asm ,info ,asm-flsqrt ,x ,y)])
chezscheme-9.5.4+dfsg/s/x86.ss-765-
chezscheme-9.5.4+dfsg/s/x86.ss-766- (define-instruction effect inc-cc-counter
chezscheme-9.5.4+dfsg/s/x86.ss:767: [(op (x ur) (y imm32 ur) (z imm32 ur)) `(asm ,info ,asm-inc-cc-counter ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86.ss-768-
chezscheme-9.5.4+dfsg/s/x86.ss-769- (define-instruction effect inc-profile-counter
chezscheme-9.5.4+dfsg/s/x86.ss:770: [(op (x ur mem) (y imm32 ur)) `(asm ,info ,asm-inc-profile-counter ,x ,y)])
chezscheme-9.5.4+dfsg/s/x86.ss-771-
chezscheme-9.5.4+dfsg/s/x86.ss-772- (define-instruction value (trunc)
chezscheme-9.5.4+dfsg/s/x86.ss:773: [(op (z ur) (x ur)) `(set! ,(make-live-info) ,z (asm ,info ,asm-trunc ,x))])
chezscheme-9.5.4+dfsg/s/x86.ss-774-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-778- (safe-assert (eq? z %eax))
chezscheme-9.5.4+dfsg/s/x86.ss:779: `(set! ,(make-live-info) ,z (asm ,info ,asm-get-tc))])
chezscheme-9.5.4+dfsg/s/x86.ss-780-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-783- (safe-assert (eq? z %eax)) ; see get-tc
chezscheme-9.5.4+dfsg/s/x86.ss:784: `(set! ,(make-live-info) ,z (asm ,info ,asm-activate-thread))])
chezscheme-9.5.4+dfsg/s/x86.ss-785-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-787- [(op)
chezscheme-9.5.4+dfsg/s/x86.ss:788: `(asm ,info ,asm-deactivate-thread)])
chezscheme-9.5.4+dfsg/s/x86.ss-789-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-791- [(op)
chezscheme-9.5.4+dfsg/s/x86.ss:792: `(asm ,info ,asm-unactivate-thread)])
chezscheme-9.5.4+dfsg/s/x86.ss-793-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-797- [(op (z ur))
chezscheme-9.5.4+dfsg/s/x86.ss:798: `(set! ,(make-live-info) ,z (asm ,info ,(asm-library-call (info-asmlib-libspec info)) ,(info-kill*-live*-live* info) ...))])
chezscheme-9.5.4+dfsg/s/x86.ss-799-
chezscheme-9.5.4+dfsg/s/x86.ss-800- (define-instruction effect asmlibcall!
chezscheme-9.5.4+dfsg/s/x86.ss:801: [(op) `(asm ,info ,(asm-library-call (info-asmlib-libspec info)) ,(info-kill*-live*-live* info) ...)])
chezscheme-9.5.4+dfsg/s/x86.ss-802-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-804- (define-instruction effect (c-simple-call)
chezscheme-9.5.4+dfsg/s/x86.ss:805: [(op) `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info)))])
chezscheme-9.5.4+dfsg/s/x86.ss-806-
chezscheme-9.5.4+dfsg/s/x86.ss-807- (define-instruction value pop
chezscheme-9.5.4+dfsg/s/x86.ss:808: [(op (z ur)) `(set! ,(make-live-info) ,z (asm ,info ,asm-pop))])
chezscheme-9.5.4+dfsg/s/x86.ss-809-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-812- (let ([info (make-info-condition-code op #t #f)]) ; NB: reversed? flag is assumed to be #t
chezscheme-9.5.4+dfsg/s/x86.ss:813: (values '() `(asm ,info ,(asm-fl-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/x86.ss-814-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-826- (let ([info (make-info-condition-code op #f #t)])
chezscheme-9.5.4+dfsg/s/x86.ss:827: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))]
chezscheme-9.5.4+dfsg/s/x86.ss-828- [(op (x ur) (y mem))
chezscheme-9.5.4+dfsg/s/x86.ss-829- (let ([info (make-info-condition-code op #t #t)])
chezscheme-9.5.4+dfsg/s/x86.ss:830: (values '() `(asm ,info ,(asm-relop info) ,y ,x)))]
chezscheme-9.5.4+dfsg/s/x86.ss-831- [(op (x imm32) (y ur mem))
chezscheme-9.5.4+dfsg/s/x86.ss-832- (let ([info (make-info-condition-code op #t #t)])
chezscheme-9.5.4+dfsg/s/x86.ss:833: (values '() `(asm ,info ,(asm-relop info) ,y ,x)))]
chezscheme-9.5.4+dfsg/s/x86.ss-834- [(op (x ur) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss-835- (let ([info (make-info-condition-code op #f #t)])
chezscheme-9.5.4+dfsg/s/x86.ss:836: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/x86.ss-837-
chezscheme-9.5.4+dfsg/s/x86.ss-838- (define-instruction pred (condition-code)
chezscheme-9.5.4+dfsg/s/x86.ss:839: [(op) (values '() `(asm ,info ,(asm-condition-code info)))])
chezscheme-9.5.4+dfsg/s/x86.ss-840-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-849- `(set! ,(make-live-info) ,tmp ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:850: `(set! ,(make-live-info) ,tmp (asm ,null-info ,asm-logand ,tmp ,mask))))
chezscheme-9.5.4+dfsg/s/x86.ss:851: `(asm ,info-cc-eq ,asm-eq ,tmp ,type)))])
chezscheme-9.5.4+dfsg/s/x86.ss-852-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-854- [(op (x mem) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:855: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86.ss-856- [(op (x ur imm32) (y mem))
chezscheme-9.5.4+dfsg/s/x86.ss:857: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-858- [(op (x imm32) (y ur))
chezscheme-9.5.4+dfsg/s/x86.ss:859: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86.ss-860- [(op (x ur) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:861: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))])
chezscheme-9.5.4+dfsg/s/x86.ss-862-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-872- `(set! ,(make-live-info) ,uts
chezscheme-9.5.4+dfsg/s/x86.ss:873: (asm ,info ,asm-exchange ,uts
chezscheme-9.5.4+dfsg/s/x86.ss-874- (mref ,x ,y ,imm)))))])
chezscheme-9.5.4+dfsg/s/x86.ss:875: `(asm ,info-cc-eq ,asm-eq ,uts (immediate 0))))]))
chezscheme-9.5.4+dfsg/s/x86.ss-876-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-878- [(op (x ur) (y ur) (w imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:879: `(asm ,info ,asm-locked-incr ,x ,y ,w)])
chezscheme-9.5.4+dfsg/s/x86.ss-880-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-882- [(op (x ur) (y ur) (w imm32))
chezscheme-9.5.4+dfsg/s/x86.ss:883: `(asm ,info ,asm-locked-decr ,x ,y ,w)])
chezscheme-9.5.4+dfsg/s/x86.ss-884-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-891- ;; NB: may modify %eax:
chezscheme-9.5.4+dfsg/s/x86.ss:892: `(asm ,info ,asm-locked-cmpxchg ,x ,y ,w ,ueax ,new))))])
chezscheme-9.5.4+dfsg/s/x86.ss-893-
chezscheme-9.5.4+dfsg/s/x86.ss-894- (define-instruction effect (pause)
chezscheme-9.5.4+dfsg/s/x86.ss:895: [(op) `(asm ,info ,asm-pause)])
chezscheme-9.5.4+dfsg/s/x86.ss-896-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-903- `(set! ,(make-live-info) ,uecx ,x)
chezscheme-9.5.4+dfsg/s/x86.ss:904: `(set! ,(make-live-info) ,z (asm ,info ,asm-read-performance-monitoring-counter ,uecx))))])
chezscheme-9.5.4+dfsg/s/x86.ss-905-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-909- (safe-assert (and (info-kill*? info) (memq %edx (info-kill*-kill* info))))
chezscheme-9.5.4+dfsg/s/x86.ss:910: `(set! ,(make-live-info) ,z (asm ,info ,asm-read-time-stamp-counter))])
chezscheme-9.5.4+dfsg/s/x86.ss-911-
chezscheme-9.5.4+dfsg/s/x86.ss-912- (define-instruction effect (c-call)
chezscheme-9.5.4+dfsg/s/x86.ss:913: [(op (x ur mem)) `(asm ,info ,asm-indirect-call ,x)])
chezscheme-9.5.4+dfsg/s/x86.ss-914-
chezscheme-9.5.4+dfsg/s/x86.ss-915- (define-instruction effect (push)
chezscheme-9.5.4+dfsg/s/x86.ss:916: [(op (x ur)) `(asm ,info ,asm-push ,x)])
chezscheme-9.5.4+dfsg/s/x86.ss-917-
chezscheme-9.5.4+dfsg/s/x86.ss-918- (define-instruction effect save-flrv
chezscheme-9.5.4+dfsg/s/x86.ss:919: [(op) `(asm ,info ,asm-save-flrv)])
chezscheme-9.5.4+dfsg/s/x86.ss-920-
chezscheme-9.5.4+dfsg/s/x86.ss-921- (define-instruction effect restore-flrv
chezscheme-9.5.4+dfsg/s/x86.ss:922: [(op) `(asm ,info ,asm-restore-flrv)])
chezscheme-9.5.4+dfsg/s/x86.ss-923-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-930- `(set! ,(make-live-info) ,%tc (mref ,%sp ,%zero 4))
chezscheme-9.5.4+dfsg/s/x86.ss:931: `(set! ,(make-live-info) ,%sp (asm ,info ,asm-sub ,%sp (immediate 12))))])])
chezscheme-9.5.4+dfsg/s/x86.ss-932- )
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-1527- (build-maybe-cons* #'(chunk ...)
chezscheme-9.5.4+dfsg/s/x86.ss:1528: #'(aop-cons* `(asm ,op ,opnd ...) ?code*))])))
chezscheme-9.5.4+dfsg/s/x86.ss-1529-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-2231- #`(let ([code* (emit #,bop #,opnd1 code*)])
chezscheme-9.5.4+dfsg/s/x86.ss:2232: (let-values ([(disp #,opnd2) (get-disp-opnd (fx+ next-addr (asm-size* code*)) #,l2)])
chezscheme-9.5.4+dfsg/s/x86.ss-2233- #,body))))
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-2287- (let ([rel (make-funcrel 'abs l offset)])
chezscheme-9.5.4+dfsg/s/x86.ss:2288: (cons* rel (aop-cons* `(asm "mrv point:" ,rel) code*)))))
chezscheme-9.5.4+dfsg/s/x86.ss-2289-
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-2297- `(abs 0 (object ,lpm)))
chezscheme-9.5.4+dfsg/s/x86.ss:2298: (aop-cons* `(asm livemask: ,(format "~b" lpm))
chezscheme-9.5.4+dfsg/s/x86.ss-2299- '(code-top-link)
chezscheme-9.5.4+dfsg/s/x86.ss:2300: (aop-cons* `(asm code-top-link)
chezscheme-9.5.4+dfsg/s/x86.ss-2301- `(long . ,fs)
chezscheme-9.5.4+dfsg/s/x86.ss:2302: (aop-cons* `(asm "frame size:" ,fs)
chezscheme-9.5.4+dfsg/s/x86.ss-2303- (if mrvl
##############################################
chezscheme-9.5.4+dfsg/s/x86.ss-2306- mrv-error
chezscheme-9.5.4+dfsg/s/x86.ss:2307: (aop-cons* `(asm "mrv point:" ,mrv-error)
chezscheme-9.5.4+dfsg/s/x86.ss-2308- code*))))))))))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-145- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:146: (build-set! ,u (asm ,null-info ,asm-add ,u ,x1))
chezscheme-9.5.4+dfsg/s/x86_64.ss-147- (return x0 u 0))))))))))])))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-271- (build-set! ,u2 ,imm)
chezscheme-9.5.4+dfsg/s/x86_64.ss:272: (build-set! ,x1 (asm ,null-info ,asm-add ,x1 ,u2))
chezscheme-9.5.4+dfsg/s/x86_64.ss-273- (build-set! ,u1 (mref ,x0 ,x1 0))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-499- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:500: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-501- [(op (z mem) (x zero) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:502: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-503- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:504: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-505- [(op (z ur) (x zero) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-507- `(set! ,(make-live-info) ,z ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:508: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,z)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-509- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:510: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub-negate ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-511- [(op (z ur) (x ur) (y negatable-real-imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-513- `(move-related ,z ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:514: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (- (extract-imm y))) ,x)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-515- [(op (z ur) (x mem imm32) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-518- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:519: `(set! ,(make-live-info) ,t (asm ,info ,asm-sub-negate ,t ,x))
chezscheme-9.5.4+dfsg/s/x86_64.ss-520- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-524- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:525: `(set! ,(make-live-info) ,t (asm ,info ,asm-sub ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-526- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-529- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:530: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-531- [(op (z mem) (x zero) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:532: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-533- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:534: `(set! ,(make-live-info) ,z (asm ,info ,asm-sub ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-535- [(op (z ur) (x zero) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-537- `(set! ,(make-live-info) ,z ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:538: `(set! ,(make-live-info) ,z (asm ,info ,asm-negate ,z)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-539- [(op (z ur) (x ur) (y ur mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-542- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:543: `(set! ,(make-live-info) ,t (asm ,info ,asm-sub ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-544- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-547- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:548: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-549- [(op (z mem) (x ur imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:550: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-551- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:552: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-553- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:554: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-555- [(op (z ur) (x ur) (y real-imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-557- `(move-related ,z ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:558: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (extract-imm y)) ,x)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-559- [(op (z ur) (x real-imm32) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-561- `(move-related ,z ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:562: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (extract-imm x)) ,y)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-563- [(op (z ur) (x ur) (y mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-566- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:567: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-568- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-572- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:573: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,x))
chezscheme-9.5.4+dfsg/s/x86_64.ss-574- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-578- `(move-related ,z ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:579: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea2 0) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-580-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-582- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:583: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-584- [(op (z mem) (x ur imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:585: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-586- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:587: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-588- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:589: `(set! ,(make-live-info) ,z (asm ,info ,asm-add ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-590- [(op (z ur) (x ur) (y mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-593- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:594: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-595- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-599- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:600: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,x))
chezscheme-9.5.4+dfsg/s/x86_64.ss-601- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-605- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:606: `(set! ,(make-live-info) ,t (asm ,info ,asm-add ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-607- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-610- [(op (z ur) (x z) (y ur mem))
chezscheme-9.5.4+dfsg/s/x86_64.ss:611: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-612- [(op (z ur) (x ur mem) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:613: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-614- [(op (z ur) (x ur mem) (y imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:615: `(set! ,(make-live-info) ,z (asm ,info ,asm-muli ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-616- [(op (z ur) (x imm32) (y ur mem))
chezscheme-9.5.4+dfsg/s/x86_64.ss:617: `(set! ,(make-live-info) ,z (asm ,info ,asm-muli ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-618- [(op (z ur) (x ur) (y ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-621- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:622: `(set! ,(make-live-info) ,t (asm ,info ,asm-mul ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-623- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-633- `(set! ,(make-live-info) ,urax ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:634: `(set! ,(make-live-info) ,urdx (asm ,null-info ,asm-sext-rax->rdx ,urax))
chezscheme-9.5.4+dfsg/s/x86_64.ss:635: `(set! ,(make-live-info) ,urax (asm ,null-info ,asm-div ,urax ,urdx ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-636- `(set! ,(make-live-info) ,z ,urax)))))))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-641- [(op (z mem) (x z) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:642: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-643- [(op (z mem) (x ur imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:644: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-645- [(op (z ur) (x z) (y ur mem imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:646: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-647- [(op (z ur) (x ur mem imm32) (y z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:648: `(set! ,(make-live-info) ,z (asm ,info ,(asm-addop op) ,z ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-649- [(op (z ur) (x ur) (y mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-652- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:653: `(set! ,(make-live-info) ,t (asm ,info ,(asm-addop op) ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-654- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-658- `(set! ,(make-live-info) ,t ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:659: `(set! ,(make-live-info) ,t (asm ,info ,(asm-addop op) ,t ,x))
chezscheme-9.5.4+dfsg/s/x86_64.ss-660- `(set! ,(make-live-info) ,z ,t)))])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-663- [(op (z mem) (x z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:664: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-665- [(op (z ur) (x z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:666: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-667- [(op (z ur) (x ur mem imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-669- `(set! ,(make-live-info) ,z ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:670: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,z)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-671-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-680- `(set! ,(make-live-info) ,urcx ,y)
chezscheme-9.5.4+dfsg/s/x86_64.ss:681: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,urcx))))))))
chezscheme-9.5.4+dfsg/s/x86_64.ss-682- [(op (z mem) (x z) (y imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:683: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-684- ;; NB: need to return in these cases?
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-686- [(op (z ur) (x z) (y imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:687: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-688- [(op (z ur) (x z) (y ur mem imm)) (go info op z x y)]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-692- `(set! ,(make-live-info) ,t ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:693: `(set! ,(make-live-info) ,t (asm ,info ,(asm-shiftop op) ,t ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-694- `(set! ,(make-live-info) ,z ,t)))]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-712- (if (signed-32? offset)
chezscheme-9.5.4+dfsg/s/x86_64.ss:713: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea1 (info-lea-offset info)) ,x))
chezscheme-9.5.4+dfsg/s/x86_64.ss-714- (let ([u (make-tmp 'u)])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-716- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/s/x86_64.ss:717: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea2 0) ,x ,u))))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-718-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-722- (if (signed-32? offset)
chezscheme-9.5.4+dfsg/s/x86_64.ss:723: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea2 (info-lea-offset info)) ,x ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss-724- (let ([u (make-tmp 'u)])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-726- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/s/x86_64.ss:727: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-add ,u ,y))
chezscheme-9.5.4+dfsg/s/x86_64.ss:728: `(set! ,(make-live-info) ,z (asm ,info ,(asm-lea2 0) ,x ,u))))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-729-
chezscheme-9.5.4+dfsg/s/x86_64.ss-730- (define-instruction value (sext8 sext16 sext32 zext8 zext16 zext32)
chezscheme-9.5.4+dfsg/s/x86_64.ss:731: [(op (z ur) (x ur mem)) `(set! ,(make-live-info) ,z (asm ,info ,(asm-move/extend op) ,x))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-732-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-740- expr
chezscheme-9.5.4+dfsg/s/x86_64.ss:741: `(set! ,(make-live-info) ,z (asm ,info ,(asm-swap (info-load-type info)) ,z)))
chezscheme-9.5.4+dfsg/s/x86_64.ss-742- expr)))))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-744- (maybe-swap info z
chezscheme-9.5.4+dfsg/s/x86_64.ss:745: `(set! ,(make-live-info) ,z (asm ,info ,(asm-load (info-load-type info)) ,x ,y ,w)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-746- [(op (z ur) (x ur) (y ur) (w ur))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-748- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/s/x86_64.ss:749: `(set! ,(make-live-info) ,z (asm ,info ,(asm-load (info-load-type info)) ,x ,w (immediate 0)))
chezscheme-9.5.4+dfsg/s/x86_64.ss-750- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-751- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:752: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-lea2 0) ,y ,w))
chezscheme-9.5.4+dfsg/s/x86_64.ss:753: `(set! ,(make-live-info) ,z (asm ,info ,(asm-load (info-load-type info)) ,x ,u (immediate 0)))))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-754-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-763- `(set! ,(make-live-info) ,u ,w)
chezscheme-9.5.4+dfsg/s/x86_64.ss:764: `(set! ,(make-live-info) ,u (asm ,info ,(asm-swap (info-load-type info)) ,u))
chezscheme-9.5.4+dfsg/s/x86_64.ss-765- (k u)))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-769- (lambda (w)
chezscheme-9.5.4+dfsg/s/x86_64.ss:770: `(asm ,info ,(asm-store (info-load-type info)) ,x ,y ,z ,w)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-771- [(op (x ur) (y ur) (z ur) (w ur real-imm32))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-774- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/s/x86_64.ss:775: `(asm ,info ,(asm-store (info-load-type info)) ,x ,z (immediate 0) ,w)
chezscheme-9.5.4+dfsg/s/x86_64.ss-776- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-777- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:778: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-lea2 0) ,y ,z))
chezscheme-9.5.4+dfsg/s/x86_64.ss:779: `(asm ,info ,(asm-store (info-load-type info)) ,x ,u (immediate 0) ,w))))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-780-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-782- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:783: `(asm ,info ,(asm-fl-cvt op (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-784-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-786- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:787: `(asm ,info ,(asm-store-single->double (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-788-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-790- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:791: `(asm ,info ,(asm-fl-store op (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-792-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-794- [(op (x ur) (y ur) (z imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:795: `(asm ,info ,(asm-fl-load op (info-loadfl-flreg info)) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-796-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-799- `(set! ,(make-live-info) ,z
chezscheme-9.5.4+dfsg/s/x86_64.ss:800: (asm ,info ,(asm-get-double (info-loadfl-flreg info))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-801-
chezscheme-9.5.4+dfsg/s/x86_64.ss-802- (define-instruction effect (flt)
chezscheme-9.5.4+dfsg/s/x86_64.ss:803: [(op (x mem ur) (y ur)) `(asm ,info ,asm-flt ,x ,y)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-804-
chezscheme-9.5.4+dfsg/s/x86_64.ss-805- (define-instruction effect (fl+ fl- fl/ fl*)
chezscheme-9.5.4+dfsg/s/x86_64.ss:806: [(op (x ur) (y ur) (z ur)) `(asm ,info ,(asm-flop-2 op) ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-807-
chezscheme-9.5.4+dfsg/s/x86_64.ss-808- (define-instruction effect (flsqrt)
chezscheme-9.5.4+dfsg/s/x86_64.ss:809: [(op (x ur) (y ur)) `(asm ,info ,asm-flsqrt ,x ,y)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-810-
chezscheme-9.5.4+dfsg/s/x86_64.ss-811- (define-instruction effect inc-cc-counter
chezscheme-9.5.4+dfsg/s/x86_64.ss:812: [(op (x ur) (y imm32 ur) (z imm32 ur)) `(asm ,info ,asm-inc-cc-counter ,x ,y ,z)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-813-
chezscheme-9.5.4+dfsg/s/x86_64.ss-814- (define-instruction effect inc-profile-counter
chezscheme-9.5.4+dfsg/s/x86_64.ss:815: [(op (x ur mem) (y imm32 ur)) `(asm ,info ,asm-inc-profile-counter ,x ,y)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-816-
chezscheme-9.5.4+dfsg/s/x86_64.ss-817- (define-instruction value (trunc)
chezscheme-9.5.4+dfsg/s/x86_64.ss:818: [(op (z ur) (x ur)) `(set! ,(make-live-info) ,z (asm ,info ,asm-trunc ,x))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-819-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-824- (safe-assert (eq? z %rax))
chezscheme-9.5.4+dfsg/s/x86_64.ss:825: `(set! ,(make-live-info) ,z (asm ,info ,asm-get-tc))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-826-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-829- (safe-assert (eq? z %rax)) ; see get-tc
chezscheme-9.5.4+dfsg/s/x86_64.ss:830: `(set! ,(make-live-info) ,z (asm ,info ,asm-activate-thread))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-831-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-833- [(op)
chezscheme-9.5.4+dfsg/s/x86_64.ss:834: `(asm ,info ,asm-deactivate-thread)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-835-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-838- (safe-assert (eq? x %Carg1))
chezscheme-9.5.4+dfsg/s/x86_64.ss:839: `(asm ,info ,asm-unactivate-thread ,x)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-840-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-845- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:846: `(set! ,(make-live-info) ,urax (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/x86_64.ss:847: `(set! ,(make-live-info) ,z (asm ,info ,(asm-library-call (info-asmlib-libspec info)) ,urax ,(info-kill*-live*-live* info) ...))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-848-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-852- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:853: `(set! ,(make-live-info) ,urax (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/x86_64.ss:854: `(asm ,info ,(asm-library-call (info-asmlib-libspec info)) ,urax ,(info-kill*-live*-live* info) ...)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-855-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-860- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:861: `(set! ,(make-live-info) ,urax (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/x86_64.ss:862: `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info)) ,urax)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-863-
chezscheme-9.5.4+dfsg/s/x86_64.ss-864- (define-instruction value pop
chezscheme-9.5.4+dfsg/s/x86_64.ss:865: [(op (z ur)) `(set! ,(make-live-info) ,z (asm ,info ,asm-pop))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-866-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-869- (let ([info (make-info-condition-code op #t #f)]) ; NB: reversed? flag is assumed to be #t
chezscheme-9.5.4+dfsg/s/x86_64.ss:870: (values '() `(asm ,info ,(asm-fl-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-871-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-883- (let ([info (make-info-condition-code op #f #t)])
chezscheme-9.5.4+dfsg/s/x86_64.ss:884: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-885- [(op (x ur) (y mem))
chezscheme-9.5.4+dfsg/s/x86_64.ss-886- (let ([info (make-info-condition-code op #t #t)])
chezscheme-9.5.4+dfsg/s/x86_64.ss:887: (values '() `(asm ,info ,(asm-relop info) ,y ,x)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-888- [(op (x imm32) (y ur mem))
chezscheme-9.5.4+dfsg/s/x86_64.ss-889- (let ([info (make-info-condition-code op #t #t)])
chezscheme-9.5.4+dfsg/s/x86_64.ss:890: (values '() `(asm ,info ,(asm-relop info) ,y ,x)))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-891- [(op (x ur) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss-892- (let ([info (make-info-condition-code op #f #t)])
chezscheme-9.5.4+dfsg/s/x86_64.ss:893: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-894-
chezscheme-9.5.4+dfsg/s/x86_64.ss-895- (define-instruction pred (condition-code)
chezscheme-9.5.4+dfsg/s/x86_64.ss:896: [(op) (values '() `(asm ,info ,(asm-condition-code info)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-897-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-906- `(set! ,(make-live-info) ,tmp ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:907: `(set! ,(make-live-info) ,tmp (asm ,null-info ,asm-logand ,tmp ,mask))))
chezscheme-9.5.4+dfsg/s/x86_64.ss:908: `(asm ,info-cc-eq ,asm-eq ,tmp ,type)))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-909-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-911- [(op (x mem) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:912: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-913- [(op (x ur imm32) (y mem))
chezscheme-9.5.4+dfsg/s/x86_64.ss:914: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-915- [(op (x imm32) (y ur))
chezscheme-9.5.4+dfsg/s/x86_64.ss:916: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/s/x86_64.ss-917- [(op (x ur) (y ur imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:918: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-919-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-929- `(set! ,(make-live-info) ,uts
chezscheme-9.5.4+dfsg/s/x86_64.ss:930: (asm ,info ,asm-exchange ,uts
chezscheme-9.5.4+dfsg/s/x86_64.ss-931- (mref ,x ,y ,imm)))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss:932: `(asm ,info-cc-eq ,asm-eq ,uts (immediate 0))))]))
chezscheme-9.5.4+dfsg/s/x86_64.ss-933-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-935- [(op (x ur) (y ur) (w imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:936: `(asm ,info ,asm-locked-incr ,x ,y ,w)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-937-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-939- [(op (x ur) (y ur) (w imm32))
chezscheme-9.5.4+dfsg/s/x86_64.ss:940: `(asm ,info ,asm-locked-decr ,x ,y ,w)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-941-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-948- ;; NB: may modify %rax:
chezscheme-9.5.4+dfsg/s/x86_64.ss:949: `(asm ,info ,asm-locked-cmpxchg ,x ,y ,w ,urax ,new))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-950-
chezscheme-9.5.4+dfsg/s/x86_64.ss-951- (define-instruction effect (pause)
chezscheme-9.5.4+dfsg/s/x86_64.ss:952: [(op) `(asm ,info ,asm-pause)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-953-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-960- `(set! ,(make-live-info) ,urcx ,x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:961: `(set! ,(make-live-info) ,z (asm ,info ,asm-read-performance-monitoring-counter ,urcx))))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-962-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-966- (safe-assert (and (info-kill*? info) (memq %rdx (info-kill*-kill* info))))
chezscheme-9.5.4+dfsg/s/x86_64.ss:967: `(set! ,(make-live-info) ,z (asm ,info ,asm-read-time-stamp-counter))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-968-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-971- (define-instruction effect (c-call)
chezscheme-9.5.4+dfsg/s/x86_64.ss:972: [(op (x ur mem)) `(asm ,info ,asm-indirect-call ,x ,(info-kill*-live*-live* info) ...)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-973-
chezscheme-9.5.4+dfsg/s/x86_64.ss-974- (define-instruction effect (push)
chezscheme-9.5.4+dfsg/s/x86_64.ss:975: [(op (x ur)) `(asm ,info ,asm-push ,x)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-976-
chezscheme-9.5.4+dfsg/s/x86_64.ss-977- (define-instruction effect save-flrv
chezscheme-9.5.4+dfsg/s/x86_64.ss:978: [(op) `(asm ,info ,asm-save-flrv)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-979-
chezscheme-9.5.4+dfsg/s/x86_64.ss-980- (define-instruction effect restore-flrv
chezscheme-9.5.4+dfsg/s/x86_64.ss:981: [(op) `(asm ,info ,asm-restore-flrv)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-982-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-987- (seq
chezscheme-9.5.4+dfsg/s/x86_64.ss:988: `(set! ,(make-live-info) ,%sp (asm ,info ,asm-sub ,%sp (immediate 8)))
chezscheme-9.5.4+dfsg/s/x86_64.ss-989- `(set! ,(make-live-info) ,%tc ,%Carg1))])
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-1590- (build-maybe-cons* #'(chunk ...)
chezscheme-9.5.4+dfsg/s/x86_64.ss:1591: #'(aop-cons* `(asm ,op ,opnd ...) ?code*))])))
chezscheme-9.5.4+dfsg/s/x86_64.ss-1592-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-1767- (case (car x)
chezscheme-9.5.4+dfsg/s/x86_64.ss:1768: [(asm x86_64-jump x86_64-call) 0]
chezscheme-9.5.4+dfsg/s/x86_64.ss-1769- [(byte) 1]
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-2310- (lambda (offset)
chezscheme-9.5.4+dfsg/s/x86_64.ss:2311: (let ([disp (fx- next-addr (fx- offset incr-offset))])
chezscheme-9.5.4+dfsg/s/x86_64.ss-2312- (and (signed-32? disp)
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-2355- #`(let ([code* (emit #,bop #,opnd1 code*)])
chezscheme-9.5.4+dfsg/s/x86_64.ss:2356: (let-values ([(disp #,opnd2) (get-disp-opnd (fx+ next-addr (asm-size* code*)) #,l2)])
chezscheme-9.5.4+dfsg/s/x86_64.ss-2357- #,body))))
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-2411- (let ([rel (make-funcrel 'abs l offset)])
chezscheme-9.5.4+dfsg/s/x86_64.ss:2412: (cons* rel (aop-cons* `(asm "mrv point:" ,rel) code*)))))
chezscheme-9.5.4+dfsg/s/x86_64.ss-2413-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-2432- (lambda (code* reloc)
chezscheme-9.5.4+dfsg/s/x86_64.ss:2433: (cons* reloc (aop-cons* `(asm "relocation:" ,reloc) code*))))
chezscheme-9.5.4+dfsg/s/x86_64.ss-2434-
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-2443- `(abs 0 (object ,lpm)))
chezscheme-9.5.4+dfsg/s/x86_64.ss:2444: (aop-cons* `(asm livemask: ,(format "~b" lpm))
chezscheme-9.5.4+dfsg/s/x86_64.ss-2445- '(code-top-link)
chezscheme-9.5.4+dfsg/s/x86_64.ss:2446: (aop-cons* `(asm code-top-link)
chezscheme-9.5.4+dfsg/s/x86_64.ss-2447- `(,size . ,fs)
chezscheme-9.5.4+dfsg/s/x86_64.ss:2448: (aop-cons* `(asm "frame size:" ,fs)
chezscheme-9.5.4+dfsg/s/x86_64.ss-2449- (if mrvl
##############################################
chezscheme-9.5.4+dfsg/s/x86_64.ss-2452- mrv-error
chezscheme-9.5.4+dfsg/s/x86_64.ss:2453: (aop-cons* `(asm "mrv point:" ,mrv-error)
chezscheme-9.5.4+dfsg/s/x86_64.ss-2454- code*)))))))))))
##############################################
chezscheme-9.5.4+dfsg/s/Mf-base-155-obj = ${baseobj} ${compilerobj}
chezscheme-9.5.4+dfsg/s/Mf-base:156:asm = $(basesrc:%.ss=%.asm)
chezscheme-9.5.4+dfsg/s/Mf-base-157-
##############################################
chezscheme-9.5.4+dfsg/s/Mf-base-275- '(delete-file "$*.covin")'\
chezscheme-9.5.4+dfsg/s/Mf-base:276: '(compile-with-asm "$*.ss" "$*.$m" (quote $m))'\
chezscheme-9.5.4+dfsg/s/Mf-base-277- '(when #${pdhtml} (profile-dump-html))'\
##############################################
chezscheme-9.5.4+dfsg/s/Mf-base-570- ${Scheme} -q ${macroobj} mkheader.so
chezscheme-9.5.4+dfsg/s/Mf-base:571: (if `cmp -s ${Cheader} ${Cheader}.bak`;\
chezscheme-9.5.4+dfsg/s/Mf-base-572- then mv -f ${Cheader}.bak ${Cheader};\
##############################################
chezscheme-9.5.4+dfsg/s/Mf-base-579- ${Scheme} -q ${macroobj} mkheader.so
chezscheme-9.5.4+dfsg/s/Mf-base:580: (if `cmp -s ${Cequates} ${Cequates}.bak`;\
chezscheme-9.5.4+dfsg/s/Mf-base-581- then mv -f ${Cequates}.bak ${Cequates};\
##############################################
chezscheme-9.5.4+dfsg/s/Mf-base-591-prettyclean:
chezscheme-9.5.4+dfsg/s/Mf-base:592: rm -f *.$m xpatch ${patch} *.patch *.so *.covin *.asm script.all header.tmp *.html
chezscheme-9.5.4+dfsg/s/Mf-base-593- rm -rf nanopass
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-74- (let ([do-read ($make-read p sfd 0)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:75: (let* ([regs (do-read)] [inst (do-read)] [asm (do-read)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-76- (when (eof-object? asm) ($oops #f "too few expressions in ~a" fn))
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6885- (%inline -
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:6886: ,(ptr->integer e-addr (type->width ptr-type))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6887- ,(build-unfix e-roffset)))])
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6914- (build-object-ref #f type
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:6915: (ptr->integer e-addr (constant ptr-bits))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6916- e-offset))))]
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6937- (build-object-set! type
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:6938: (ptr->integer e-addr (constant ptr-bits))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6939- e-offset
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6961- (set! ,(%mref ,t ,(constant record-data-disp))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:6962: ,(ptr->integer e-addr (constant ptr-bits)))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-6963- ,t)))])])
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-7054- (let-values ([(e-index imm-offset) (offset-expr->index+offset e-offset)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:7055: (bind #f ([e-addr ($extract-fptr-address e-fptr)] e-index e-val)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-7056- `(inline ,(make-info-load ptr-type #f) ,%store ,e-addr ,e-index (immediate ,imm-offset)
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-7324- (bind #f (e-val)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:7325: (bind #t ([e-addr ($extract-fptr-address e-fptr)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-7326- (build-int-load swapped? 'type e-addr e-index imm-offset
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-8251- (bind #t (e-bv e-offset)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:8252: `(if ,(handle-prim #f #f 3 '$bytevector-ref-check? (list `(quote 8) e-bv e-offset))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-8253- ,(let-values ([(e-index imm-offset) (bv-index-offset e-offset)])
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-11341- ,(%seq
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:11342: ; (asm align)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-11343- (label ,Lret)
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-12376- ; TODO: add alignment
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:12377: #;(asm align) ; must start aligned or align below may fail
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-12378- ,(%inline invoke-prelude)
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-12386- (tail ,(do-call)) ; argcnt already in ac0
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:12387: #;(asm align)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-12388- (label ,Lret)
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-13934- (values
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:13935: (remp (lambda (code) (record-case code [(asm label) stuff #t] [else #f])) code*)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-13936- (extract-trace-code code*)
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14093- (values '() (cons chunk chunk*) (fx+ (chunk-size chunk) offset)))))]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:14094: [(set! ,lvalue (asm ,info ,proc ,t* ...)) (values (apply proc code* lvalue t*) chunk* offset)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14095- [(set! ,lvalue ,rhs) (values (asm-move code* lvalue rhs) chunk* offset)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:14096: [(asm ,info ,proc ,t* ...) (values (apply proc code* t*) chunk* offset)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14097- (Pred : Pred (ir l1 l2 offset) -> * (code* chunk)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:14098: [(asm ,info ,proc ,t* ...) (apply proc l1 l2 offset t*)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14099- (Program ir))
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14135- (syntax-rules ()
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:14136: [(_ asm e1 e2 ...)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14137- (let ([ls (cons* e1 e2 ...)])
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:14138: (if aop (cons asm ls) ls))]))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-14139-
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15158- (nanopass-case (L15d Rhs) rhs
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15159: [(asm ,info ,proc ,t* ...) (fold-left Triv out t*)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15160- [else (Triv out rhs)])))
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15163- (nanopass-case (L15d Pred) pred
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15164: [(asm ,info ,proc ,t* ...) (fold-left Triv out t*)])))
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15165- (define Tail
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15187- (Triv (Rhs out rhs) lvalue)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15188: [(asm ,info ,proc ,t* ...) (fold-left Triv out t*)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15189- [else out])))))
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15393- (nanopass-case (L15d Rhs) rhs
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15394: [(asm ,info ,proc ,t* ...) (fold-left Triv unspillable* t*)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15395- [else (Triv unspillable* rhs)])))
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15398- (nanopass-case (L15d Pred) p
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15399: [(asm ,info ,proc ,t* ...) (fold-left Triv '() t*)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15400- [else (sorry! who "unexpected pred ~s" p)])))
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15440- [(set! ,live-info ,lvalue ,rhs) (Triv (Rhs unspillable* rhs) lvalue)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15441: [(asm ,info ,proc ,t* ...) (fold-left Triv unspillable* t*)]
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15442- [(move-related ,x1 ,x2) (add-move-hint! x1 x2) unspillable*]
##############################################
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15972- (nanopass-case (L16 Pred) pred
chezscheme-9.5.4+dfsg/s/cpnanopass.ss:15973: [(asm ,info ,proc ,t* ...)
chezscheme-9.5.4+dfsg/s/cpnanopass.ss-15974- (safe-assert (info-condition-code? info))
##############################################
chezscheme-9.5.4+dfsg/s/np-languages.ss-1022- (- (inline info value-prim t* ...))
chezscheme-9.5.4+dfsg/s/np-languages.ss:1023: (+ (asm info proc t* ...) => (asm proc t* ...)))
chezscheme-9.5.4+dfsg/s/np-languages.ss-1024- (Effect (e)
##############################################
chezscheme-9.5.4+dfsg/s/np-languages.ss-1028- (fcallable-overflow-check live-info))
chezscheme-9.5.4+dfsg/s/np-languages.ss:1029: (+ (asm info proc t* ...) => (asm proc t* ...)
chezscheme-9.5.4+dfsg/s/np-languages.ss-1030- (move-related x1 x2)
##############################################
chezscheme-9.5.4+dfsg/s/np-languages.ss-1033- (- (inline live-info info pred-prim t* ...))
chezscheme-9.5.4+dfsg/s/np-languages.ss:1034: (+ (asm info proc t* ...) => (asm proc t* ...)))
chezscheme-9.5.4+dfsg/s/np-languages.ss-1035- (Tail (tl)
##############################################
chezscheme-9.5.4+dfsg/s/np-languages.ss-1072- (with-output-language (L15d Effect)
chezscheme-9.5.4+dfsg/s/np-languages.ss:1073: `(asm ,info ,(lambda (code*) code*)))))
chezscheme-9.5.4+dfsg/s/np-languages.ss-1074-)
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-226- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:227: (build-set! ,u (asm ,null-info ,(asm-add #f) ,x0 (immediate ,imm)))
chezscheme-9.5.4+dfsg/s/arm32.ss-228- (return u x1 0)))]
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-233- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:234: (build-set! ,u (asm ,null-info ,(asm-sub #f) ,x0 (immediate ,imm)))
chezscheme-9.5.4+dfsg/s/arm32.ss-235- (return u x1 0)))]
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-242- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:243: (build-set! ,u (asm ,null-info ,(asm-add #f) ,u ,x1))
chezscheme-9.5.4+dfsg/s/arm32.ss-244- (return x0 u 0)))))])))))])))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-463- [(op (z ur) (x ur) (y funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:464: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(-/ovfl -/eq))) ,x ,y))]
chezscheme-9.5.4+dfsg/s/arm32.ss-465- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:466: `(set! ,(make-live-info) ,z (asm ,info ,(asm-rsb (memq op '(-/ovfl -/eq))) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-467- [(op (z ur) (x ur) (y negate-funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:468: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(-/ovfl -/eq))) ,x ,y))]
chezscheme-9.5.4+dfsg/s/arm32.ss-469- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:470: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(-/ovfl -/eq))) ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-471-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-473- [(op (z ur) (x ur) (y funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:474: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(+/ovfl +/carry))) ,x ,y))]
chezscheme-9.5.4+dfsg/s/arm32.ss-475- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:476: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(+/ovfl +/carry))) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-477- [(op (z ur) (x ur) (y negate-funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:478: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(+/ovfl +/carry))) ,x ,y))]
chezscheme-9.5.4+dfsg/s/arm32.ss-479- [(op (z ur) (x negate-funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:480: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(+/ovfl +/carry))) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-481- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:482: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(+/ovfl +/carry))) ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-483-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-486- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:487: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-488-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-493- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:494: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:495: `(set! ,(make-live-info) ,z (asm ,null-info ,asm-smull ,x ,y ,u))
chezscheme-9.5.4+dfsg/s/arm32.ss:496: `(asm ,null-info ,(asm-cmp/shift 31 'sra) ,u ,z)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-497-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-501- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:502: `(set! ,(make-live-info) ,z (asm ,info ,asm-div ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-503-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-505- [(op (z ur) (x ur) (y funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:506: `(set! ,(make-live-info) ,z (asm ,info ,(asm-logand #f) ,x ,y))]
chezscheme-9.5.4+dfsg/s/arm32.ss-507- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:508: `(set! ,(make-live-info) ,z (asm ,info ,(asm-logand #f) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-509- [(op (z ur) (x ur) (y lognot-funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:510: `(set! ,(make-live-info) ,z (asm ,info ,(asm-bic #f) ,x ,y))]
chezscheme-9.5.4+dfsg/s/arm32.ss-511- [(op (z ur) (x lognot-funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:512: `(set! ,(make-live-info) ,z (asm ,info ,(asm-bic #f) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-513- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:514: `(set! ,(make-live-info) ,z (asm ,info ,(asm-logand #f) ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-515-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-519- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:520: `(set! ,(make-live-info) ,z (asm ,info ,((select-op op) #f) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-521- [(op (z ur) (x ur) (y funky12 ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:522: `(set! ,(make-live-info) ,z (asm ,info ,((select-op op) #f) ,x ,y))]))
chezscheme-9.5.4+dfsg/s/arm32.ss-523-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-525- [(op (z ur) (x ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:526: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))])
chezscheme-9.5.4+dfsg/s/arm32.ss-527-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-529- [(op (z ur) (x ur) (y ur shift-count))
chezscheme-9.5.4+dfsg/s/arm32.ss:530: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-531-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-544- (if (funky12 offset)
chezscheme-9.5.4+dfsg/s/arm32.ss:545: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add #f) ,x (immediate ,offset)))
chezscheme-9.5.4+dfsg/s/arm32.ss-546- (let ([u (make-tmp 'u)])
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-548- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/s/arm32.ss:549: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add #f) ,x ,u)))))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-550-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-556- (if (funky12 offset)
chezscheme-9.5.4+dfsg/s/arm32.ss:557: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,y (immediate ,offset)))
chezscheme-9.5.4+dfsg/s/arm32.ss-558- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss-559- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/s/arm32.ss:560: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,u ,y))))
chezscheme-9.5.4+dfsg/s/arm32.ss:561: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add #f) ,x ,u))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-562-
chezscheme-9.5.4+dfsg/s/arm32.ss-563- (define-instruction value (sext8 sext16 zext8 zext16)
chezscheme-9.5.4+dfsg/s/arm32.ss:564: [(op (z ur) (x ur)) `(set! ,(make-live-info) ,z (asm ,info ,(asm-move/extend op) ,x))])
chezscheme-9.5.4+dfsg/s/arm32.ss-565-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-575- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:576: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,y ,w))
chezscheme-9.5.4+dfsg/s/arm32.ss-577- (k x u imm-zero))))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-587- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:588: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x ,y))
chezscheme-9.5.4+dfsg/s/arm32.ss-589- (k u %zero w)))))]
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-594- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:595: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x (immediate ,n)))
chezscheme-9.5.4+dfsg/s/arm32.ss-596- (k u y imm-zero))))]
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-601- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:602: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-sub #f) ,x (immediate ,n)))
chezscheme-9.5.4+dfsg/s/arm32.ss-603- (k u y imm-zero))))]
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-610- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:611: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x ,u))
chezscheme-9.5.4+dfsg/s/arm32.ss-612- (k u y imm-zero)))))]))))))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-617- (lambda (x y w)
chezscheme-9.5.4+dfsg/s/arm32.ss:618: (let ([instr `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-load type) ,x ,y ,w))])
chezscheme-9.5.4+dfsg/s/arm32.ss-619- (if (info-load-swapped? info)
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-621- instr
chezscheme-9.5.4+dfsg/s/arm32.ss:622: `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-swap type) ,z)))
chezscheme-9.5.4+dfsg/s/arm32.ss-623- instr)))))])
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-631- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:632: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-swap type) ,z))
chezscheme-9.5.4+dfsg/s/arm32.ss:633: `(asm ,null-info ,(asm-store type) ,x ,y ,w ,u)))
chezscheme-9.5.4+dfsg/s/arm32.ss:634: `(asm ,null-info ,(asm-store type) ,x ,y ,w ,z)))))]))
chezscheme-9.5.4+dfsg/s/arm32.ss-635-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-648- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/s/arm32.ss:649: `(asm ,info ,(pick-asm-op op info) ,x ,z)
chezscheme-9.5.4+dfsg/s/arm32.ss-650- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/s/arm32.ss-651- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:652: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,x ,y))
chezscheme-9.5.4+dfsg/s/arm32.ss:653: `(asm ,info ,(pick-asm-op op info) ,u ,z))))]
chezscheme-9.5.4+dfsg/s/arm32.ss-654- [(op (x ur) (y ur) (z ur))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-656- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:657: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,x ,z))
chezscheme-9.5.4+dfsg/s/arm32.ss-658- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/s/arm32.ss:659: `(asm ,info ,(pick-asm-op op info) ,u (immediate 0))
chezscheme-9.5.4+dfsg/s/arm32.ss-660- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:661: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,u ,y))
chezscheme-9.5.4+dfsg/s/arm32.ss:662: `(asm ,info ,(pick-asm-op op info) ,u (immediate 0))))))]))
chezscheme-9.5.4+dfsg/s/arm32.ss-663-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-671- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:672: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x (immediate ,(constant flonum-data-disp))))
chezscheme-9.5.4+dfsg/s/arm32.ss-673- (p u))))))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-684- (with-flonum-data-pointers (y)
chezscheme-9.5.4+dfsg/s/arm32.ss:685: `(asm ,info ,asm-flt ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-686-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-689- (with-flonum-data-pointers (x y z)
chezscheme-9.5.4+dfsg/s/arm32.ss:690: `(asm ,info ,(asm-flop-2 op) ,x ,y ,z))])
chezscheme-9.5.4+dfsg/s/arm32.ss-691-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-694- (with-flonum-data-pointers (x y)
chezscheme-9.5.4+dfsg/s/arm32.ss:695: `(asm ,info ,asm-flsqrt ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-696-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-699- (with-flonum-data-pointers (x)
chezscheme-9.5.4+dfsg/s/arm32.ss:700: `(set! ,(make-live-info) ,z (asm ,info ,asm-trunc ,x)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-701-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-705- (let ([info (make-info-condition-code op #f #f)])
chezscheme-9.5.4+dfsg/s/arm32.ss:706: (values '() `(asm ,info ,(asm-fl-relop info) ,x ,y))))]))
chezscheme-9.5.4+dfsg/s/arm32.ss-707-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-711- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:712: `(set! ,(make-live-info) ,u1 (asm ,null-info ,(asm-add #f) ,x ,w))
chezscheme-9.5.4+dfsg/s/arm32.ss:713: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:714: `(asm ,null-info ,asm-inc-cc-counter ,u1 ,z ,u2)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-715-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-720- `(set! ,(make-live-info) ,u ,x)
chezscheme-9.5.4+dfsg/s/arm32.ss:721: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,u ,y))
chezscheme-9.5.4+dfsg/s/arm32.ss-722- `(set! ,(make-live-info) ,x ,u)))])
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-724- (define-instruction value (read-time-stamp-counter)
chezscheme-9.5.4+dfsg/s/arm32.ss:725: [(op (z ur)) `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-read-counter 1)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-726-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-730- (let ([imm (nanopass-case (L15d Triv) x [(immediate ,imm) (fxmin imm 1)])])
chezscheme-9.5.4+dfsg/s/arm32.ss:731: `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-read-counter (fx+ imm 2)))))]
chezscheme-9.5.4+dfsg/s/arm32.ss:732: [(op (z ur) (x ur)) `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-read-counter) ,x))])
chezscheme-9.5.4+dfsg/s/arm32.ss-733-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-739- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:740: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:741: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:742: `(set! ,(make-live-info) ,z (asm ,info ,asm-get-tc ,u ,ulr))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-743-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-748- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:749: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:750: `(set! ,(make-live-info) ,z (asm ,info ,(asm-library-call (info-asmlib-libspec info) #t) ,u ,(info-kill*-live*-live* info) ...)))
chezscheme-9.5.4+dfsg/s/arm32.ss-751- (let ([ulr (make-precolored-unspillable 'ulr %lr)])
chezscheme-9.5.4+dfsg/s/arm32.ss-752- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:753: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:754: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:755: `(set! ,(make-live-info) ,z (asm ,info ,(asm-library-call (info-asmlib-libspec info) #f) ,u ,ulr ,(info-kill*-live*-live* info) ...))))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-756-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-762- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:763: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:764: `(asm ,info ,(asm-library-call! (info-asmlib-libspec info) #t) ,u ,(info-kill*-live*-live* info) ...)))
chezscheme-9.5.4+dfsg/s/arm32.ss-765- (let ([ulr (make-precolored-unspillable 'ulr %lr)])
chezscheme-9.5.4+dfsg/s/arm32.ss-766- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:767: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:768: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:769: `(asm ,info ,(asm-library-call! (info-asmlib-libspec info) #f) ,u ,ulr ,(info-kill*-live*-live* info) ...)))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-770-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-776- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:777: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:778: `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info) #t) ,u))
chezscheme-9.5.4+dfsg/s/arm32.ss-779- (let ([ulr (make-precolored-unspillable 'ulr %lr)])
chezscheme-9.5.4+dfsg/s/arm32.ss-780- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:781: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:782: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:783: `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info) #f) ,u ,ulr)))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-784-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-787- (let ([info (if (eq? op 'eq?) info-cc-eq (make-info-condition-code op #t #t))])
chezscheme-9.5.4+dfsg/s/arm32.ss:788: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))]
chezscheme-9.5.4+dfsg/s/arm32.ss-789- [(op (x ur) (y ur funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss-790- (let ([info (if (eq? op 'eq?) info-cc-eq (make-info-condition-code op #f #t))])
chezscheme-9.5.4+dfsg/s/arm32.ss:791: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-792-
chezscheme-9.5.4+dfsg/s/arm32.ss-793- (define-instruction pred (condition-code)
chezscheme-9.5.4+dfsg/s/arm32.ss:794: [(op) (values '() `(asm ,info ,(asm-condition-code info)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-795-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-800- (with-output-language (L15d Effect)
chezscheme-9.5.4+dfsg/s/arm32.ss:801: `(set! ,(make-live-info) ,tmp (asm ,null-info ,(asm-logand #f) ,x ,mask)))
chezscheme-9.5.4+dfsg/s/arm32.ss:802: `(asm ,info-cc-eq ,asm-eq ,tmp ,type)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-803-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-805- [(op (x funky12) (y ur))
chezscheme-9.5.4+dfsg/s/arm32.ss:806: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/s/arm32.ss-807- [(op (x ur) (y ur funky12))
chezscheme-9.5.4+dfsg/s/arm32.ss:808: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))])
chezscheme-9.5.4+dfsg/s/arm32.ss-809-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-819- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:820: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,r ,w))
chezscheme-9.5.4+dfsg/s/arm32.ss-821- (k u))))))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-825- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:826: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x ,y))
chezscheme-9.5.4+dfsg/s/arm32.ss-827- (add-offset u)))))))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-836- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:837: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:838: `(asm ,null-info ,asm-lock ,r ,u)))))
chezscheme-9.5.4+dfsg/s/arm32.ss:839: `(asm ,info-cc-eq ,asm-eq ,u (immediate 0))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-840- (define-instruction effect (locked-incr! locked-decr!)
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-845- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:846: `(set! ,(make-live-info) ,u1 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:847: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:848: `(asm ,null-info ,(asm-lock+/- op) ,r ,u1 ,u2)))))])
chezscheme-9.5.4+dfsg/s/arm32.ss-849- (define-instruction effect (cas)
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-854- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:855: `(set! ,(make-live-info) ,u1 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:856: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:857: `(asm ,info ,asm-cas ,r ,old ,new ,u1 ,u2)))))]))
chezscheme-9.5.4+dfsg/s/arm32.ss-858-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-866- (seq
chezscheme-9.5.4+dfsg/s/arm32.ss:867: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/s/arm32.ss:868: `(asm ,info ,asm-indirect-call ,x ,ulr ,(info-kill*-live*-live* info) ...)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-869-
chezscheme-9.5.4+dfsg/s/arm32.ss-870- (define-instruction effect (pop-multiple)
chezscheme-9.5.4+dfsg/s/arm32.ss:871: [(op) `(asm ,info ,(asm-pop-multiple (info-kill*-kill* info)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-872-
chezscheme-9.5.4+dfsg/s/arm32.ss-873- (define-instruction effect (push-multiple)
chezscheme-9.5.4+dfsg/s/arm32.ss:874: [(op) `(asm ,info ,(asm-push-multiple (info-kill*-live*-live* info)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-875-
chezscheme-9.5.4+dfsg/s/arm32.ss-876- (define-instruction effect (vpush-multiple)
chezscheme-9.5.4+dfsg/s/arm32.ss:877: [(op) `(asm ,info ,(asm-vpush-multiple (info-vpush-reg info) (info-vpush-n info)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-878-
chezscheme-9.5.4+dfsg/s/arm32.ss-879- (define-instruction effect (vpop-multiple)
chezscheme-9.5.4+dfsg/s/arm32.ss:880: [(op) `(asm ,info ,(asm-vpop-multiple (info-vpush-reg info) (info-vpush-n info)))])
chezscheme-9.5.4+dfsg/s/arm32.ss-881-
chezscheme-9.5.4+dfsg/s/arm32.ss-882- (define-instruction effect save-flrv
chezscheme-9.5.4+dfsg/s/arm32.ss:883: [(op) `(asm ,info ,asm-save-flrv)])
chezscheme-9.5.4+dfsg/s/arm32.ss-884-
chezscheme-9.5.4+dfsg/s/arm32.ss-885- (define-instruction effect restore-flrv
chezscheme-9.5.4+dfsg/s/arm32.ss:886: [(op) `(asm ,info ,asm-restore-flrv)])
chezscheme-9.5.4+dfsg/s/arm32.ss-887-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-1564-
chezscheme-9.5.4+dfsg/s/arm32.ss:1565: ; asm helpers
chezscheme-9.5.4+dfsg/s/arm32.ss-1566-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-1614- (build-maybe-cons* #'((build long (byte-fields chunk ...)))
chezscheme-9.5.4+dfsg/s/arm32.ss:1615: #'(aop-cons* `(asm ,op ,opnd ...) ?code*))])))
chezscheme-9.5.4+dfsg/s/arm32.ss-1616-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-1620- [(_ (op opnd ... ?code*) chunk ...)
chezscheme-9.5.4+dfsg/s/arm32.ss:1621: (fold-right cons #'(aop-cons* `(asm ,op ,opnd ...) ?code*)
chezscheme-9.5.4+dfsg/s/arm32.ss-1622- #'((build long (byte-fields chunk ...))))])))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-1715- (case (car x)
chezscheme-9.5.4+dfsg/s/arm32.ss:1716: [(asm arm32-abs arm32-jump arm32-call) 0]
chezscheme-9.5.4+dfsg/s/arm32.ss-1717- [else 4])))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-1726- (emit brai 0
chezscheme-9.5.4+dfsg/s/arm32.ss:1727: (cons* `(long . ,n) (aop-cons* `(asm "long:" ,n) code*))))))
chezscheme-9.5.4+dfsg/s/arm32.ss-1728-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-2154- (lambda (offset)
chezscheme-9.5.4+dfsg/s/arm32.ss:2155: (let ([disp (fx- next-addr (fx- offset incr-offset) 4)])
chezscheme-9.5.4+dfsg/s/arm32.ss-2156- (cond
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-2214- #`(let ([code* (emit #,bop #,opnd1 code*)])
chezscheme-9.5.4+dfsg/s/arm32.ss:2215: (let-values ([(ignore #,opnd2) (get-disp-opnd (fx+ next-addr (asm-size* code*)) #,l2)])
chezscheme-9.5.4+dfsg/s/arm32.ss-2216- #,body))))
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-2263- (let ([rel (make-funcrel 'abs l offset)])
chezscheme-9.5.4+dfsg/s/arm32.ss:2264: (cons* rel (aop-cons* `(asm "mrv point:" ,rel) code*)))))
chezscheme-9.5.4+dfsg/s/arm32.ss-2265-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-2303- (lambda (code* reloc)
chezscheme-9.5.4+dfsg/s/arm32.ss:2304: (cons* reloc (aop-cons* `(asm "relocation:" ,reloc) code*))))
chezscheme-9.5.4+dfsg/s/arm32.ss-2305-
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-2313- `(abs 0 (object ,lpm)))
chezscheme-9.5.4+dfsg/s/arm32.ss:2314: (aop-cons* `(asm livemask: ,(format "~b" lpm))
chezscheme-9.5.4+dfsg/s/arm32.ss-2315- '(code-top-link)
chezscheme-9.5.4+dfsg/s/arm32.ss:2316: (aop-cons* `(asm code-top-link)
chezscheme-9.5.4+dfsg/s/arm32.ss-2317- `(long . ,fs)
chezscheme-9.5.4+dfsg/s/arm32.ss:2318: (aop-cons* `(asm "frame size:" ,fs)
chezscheme-9.5.4+dfsg/s/arm32.ss-2319- (if mrvl
##############################################
chezscheme-9.5.4+dfsg/s/arm32.ss-2322- mrv-error
chezscheme-9.5.4+dfsg/s/arm32.ss:2323: (aop-cons* `(asm "mrv point:" ,mrv-error)
chezscheme-9.5.4+dfsg/s/arm32.ss-2324- code*))))))))))
##############################################
chezscheme-9.5.4+dfsg/s/syntax.ss-6323- (syntax-case e ()
chezscheme-9.5.4+dfsg/s/syntax.ss:6324: ((_ conv* foreign-name foreign-addr (arg ...) result)
chezscheme-9.5.4+dfsg/s/syntax.ss-6325- (build-foreign-procedure ae
##############################################
chezscheme-9.5.4+dfsg/s/syntax.ss-9070- ;; Return void, since an extra first argument receives the result,
chezscheme-9.5.4+dfsg/s/syntax.ss:9071: ;; but tell `$foreign-procedure` that the result is actually an & form
chezscheme-9.5.4+dfsg/s/syntax.ss-9072- #`((lambda (r) (void)) #,(datum->syntax #'foreign-procedure result-type))]
##############################################
chezscheme-9.5.4+dfsg/s/syntax.ss-9075- [([extra ...] [extra-arg ...] [extra-check ...])
chezscheme-9.5.4+dfsg/s/syntax.ss:9076: ;; When the result type is `(& <ftype>)`, the `$foreign-procedure` result
chezscheme-9.5.4+dfsg/s/syntax.ss-9077- ;; expects an extra argument as a `(* <ftype>)` that it uses to store the
chezscheme-9.5.4+dfsg/s/syntax.ss-9078- ;; foreign-procedure result, and it returns void. The extra argument is made
chezscheme-9.5.4+dfsg/s/syntax.ss:9079: ;; explicit for `$foreign-procedure`, and the return type is preserved as-is
chezscheme-9.5.4+dfsg/s/syntax.ss:9080: ;; to let `$foreign-procedure` know that it needs to fill the first argument.
chezscheme-9.5.4+dfsg/s/syntax.ss-9081- (cond
##############################################
chezscheme-9.5.4+dfsg/s/syntax.ss-9088- [else #'([] [] [])])])
chezscheme-9.5.4+dfsg/s/syntax.ss:9089: #`(let ([p ($foreign-procedure conv* foreign-name ?foreign-addr (extra-arg ... arg ... ...) result)]
chezscheme-9.5.4+dfsg/s/syntax.ss-9090- #,@(if unsafe?
##############################################
chezscheme-9.5.4+dfsg/s/syntax.ss-9324- ;; callable receives an extra pointer argument to fill with the result;
chezscheme-9.5.4+dfsg/s/syntax.ss:9325: ;; we add this type to `$foreign-callable` as an initial address argument,
chezscheme-9.5.4+dfsg/s/syntax.ss-9326- ;; which may be actually provided by the caller or synthesized by the
##############################################
chezscheme-9.5.4+dfsg/workarea-162- workdir $W/$dir
chezscheme-9.5.4+dfsg/workarea:163: for file in `(cd $dir ; echo *)` ; do
chezscheme-9.5.4+dfsg/workarea-164- (cd $W/$dir ; workln ../../$dir/$file $file)
##############################################
chezscheme-9.5.4+dfsg/debian/patches/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch-32- (lambda (offset)
chezscheme-9.5.4+dfsg/debian/patches/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch:33: (let ([disp (fx- next-addr (fx- offset incr-offset) 4)])
chezscheme-9.5.4+dfsg/debian/patches/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch-34- (cond
##############################################
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-155-obj = ${baseobj} ${compilerobj}
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base:156:asm = $(basesrc:%.ss=%.asm)
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-157-
##############################################
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-275- '(delete-file "$*.covin")'\
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base:276: '(compile-with-asm "$*.ss" "$*.$m" (quote $m))'\
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-277- '(when #${pdhtml} (profile-dump-html))'\
##############################################
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-570- ${Scheme} -q ${macroobj} mkheader.so
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base:571: (if `cmp -s ${Cheader} ${Cheader}.bak`;\
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-572- then mv -f ${Cheader}.bak ${Cheader};\
##############################################
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-579- ${Scheme} -q ${macroobj} mkheader.so
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base:580: (if `cmp -s ${Cequates} ${Cequates}.bak`;\
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-581- then mv -f ${Cequates}.bak ${Cequates};\
##############################################
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-591-prettyclean:
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base:592: rm -f *.$m xpatch ${patch} *.patch *.so *.covin *.asm script.all header.tmp *.html
chezscheme-9.5.4+dfsg/.pc/0003-Support-using-the-system-s-installed-stex-and-nanopa.patch/s/Mf-base-593- rm -rf nanopass
##############################################
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in-30-logcheck1: $(x).thirdrun
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in:31: @if [ -n "`grep 'Warning: Label(s) may have changed' $(x).log`" ] ; then\
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in-32- /bin/rm -f $(x).thirdrun ;\
##############################################
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in-38-logcheck2: $(x).thirdrun
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in:39: @if [ -n "`grep Warning $(x).log | grep -v pdftex.map`" ] ; then\
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in:40: echo "`grep Warning $(x).log | grep -v pdftex.map`";\
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in-41- false;\
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in-42- fi
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in:43: @if [ -n "`grep Overfull $(x).log | grep -v pdftex.map`" ] ; then\
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in:44: echo "`grep Overfull $(x).log | grep -v pdftex.map`";\
chezscheme-9.5.4+dfsg/.pc/0004-Remove-the-need-for-files-removed-in-dfsg-cleaning.patch/makefiles/Makefile-csug.in-45- false;\
##############################################
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-20- machs=$machs$sep0$last
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:21: last=`echo $fn | sed -e 's/boot\/\(.*\)\/scheme.boot/\1/'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-22- sep0=$sep1; sep1=", "; sep2=$sep3; sep3=$sep4; sep4=", and "
##############################################
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-165- -m=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:166: m=`echo $1 | sed -e 's/^-m=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-167- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-168- --machine=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:169: m=`echo $1 | sed -e 's/^--machine=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-170- ;;
##############################################
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-180- --installprefix=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:181: installprefix=`echo $1 | sed -e 's/^--installprefix=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-182- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-183- --installlib=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:184: installlib=`echo $1 | sed -e 's/^--installlib=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-185- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-186- --installbin=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:187: installbin=`echo $1 | sed -e 's/^--installbin=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-188- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-189- --installman=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:190: installman=`echo $1 | sed -e 's/^--installman=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-191- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-192- --installowner=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:193: installowner=`echo $1 | sed -e 's/^--installowner=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-194- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-195- --installgroup=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:196: installgroup=`echo $1 | sed -e 's/^--installgroup=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-197- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-198- --installschemename=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:199: installschemename=`echo $1 | sed -e 's/^--installschemename=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-200- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-201- --installpetitename=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:202: installpetitename=`echo $1 | sed -e 's/^--installpetitename=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-203- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-204- --installscriptname=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:205: installscriptname=`echo $1 | sed -e 's/^--installscriptname=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-206- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-207- --toolprefix=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:208: toolprefix=`echo $1 | sed -e 's/^--toolprefix=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-209- CC="${toolprefix}${CC}"
##############################################
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-221- --temproot=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:222: temproot=`echo $1 | sed -e 's/^--temproot=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-223- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-224- --workarea=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:225: w=`echo $1 | sed -e 's/^--workarea=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-226- ;;
##############################################
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-252- CC=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:253: CC=`echo $1 | sed -e 's/^CC=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-254- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-255- CPPFLAGS=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:256: CPPFLAGS=`echo $1 | sed -e 's/^CPPFLAGS=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-257- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-258- CFLAGS=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:259: CFLAGS=`echo $1 | sed -e 's/^CFLAGS=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-260- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-261- LD=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:262: LD=`echo $1 | sed -e 's/^LD=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-263- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-264- LDFLAGS=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:265: LDFLAGS=`echo $1 | sed -e 's/^LDFLAGS=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-266- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-267- AR=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:268: AR=`echo $1 | sed -e 's/^AR=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-269- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-270- ARFLAGS=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:271: ARFLAGS=`echo $1 | sed -e 's/^ARFLAGS=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-272- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-273- RANLIB=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:274: RANLIB=`echo $1 | sed -e 's/^RANLIB=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-275- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-276- WINDRES=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:277: WINDRES=`echo $1 | sed -e 's/^WINDRES=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-278- ;;
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-279- ZLIB=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:280: zlibLib=`echo $1 | sed -e 's/^ZLIB=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-281- zlibInc=
##############################################
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-286- LZ4=*)
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure:287: LZ4Lib=`echo $1 | sed -e 's/^LZ4=//'`
chezscheme-9.5.4+dfsg/.pc/0002-configure-Do-not-download-dependencies.patch/configure-288- LZ4Inc=
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-74- (let ([do-read ($make-read p sfd 0)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:75: (let* ([regs (do-read)] [inst (do-read)] [asm (do-read)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-76- (when (eof-object? asm) ($oops #f "too few expressions in ~a" fn))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6885- (%inline -
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:6886: ,(ptr->integer e-addr (type->width ptr-type))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6887- ,(build-unfix e-roffset)))])
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6914- (build-object-ref #f type
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:6915: (ptr->integer e-addr (constant ptr-bits))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6916- e-offset))))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6937- (build-object-set! type
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:6938: (ptr->integer e-addr (constant ptr-bits))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6939- e-offset
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6961- (set! ,(%mref ,t ,(constant record-data-disp))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:6962: ,(ptr->integer e-addr (constant ptr-bits)))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-6963- ,t)))])])
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-7054- (let-values ([(e-index imm-offset) (offset-expr->index+offset e-offset)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:7055: (bind #f ([e-addr ($extract-fptr-address e-fptr)] e-index e-val)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-7056- `(inline ,(make-info-load ptr-type #f) ,%store ,e-addr ,e-index (immediate ,imm-offset)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-7324- (bind #f (e-val)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:7325: (bind #t ([e-addr ($extract-fptr-address e-fptr)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-7326- (build-int-load swapped? 'type e-addr e-index imm-offset
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-8251- (bind #t (e-bv e-offset)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:8252: `(if ,(handle-prim #f #f 3 '$bytevector-ref-check? (list `(quote 8) e-bv e-offset))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-8253- ,(let-values ([(e-index imm-offset) (bv-index-offset e-offset)])
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-11338- ,(%seq
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:11339: ; (asm align)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-11340- (label ,Lret)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-12370- ; TODO: add alignment
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:12371: #;(asm align) ; must start aligned or align below may fail
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-12372- ,(%inline invoke-prelude)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-12380- (tail ,(do-call)) ; argcnt already in ac0
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:12381: #;(asm align)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-12382- (label ,Lret)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-13928- (values
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:13929: (remp (lambda (code) (record-case code [(asm label) stuff #t] [else #f])) code*)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-13930- (extract-trace-code code*)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14087- (values '() (cons chunk chunk*) (fx+ (chunk-size chunk) offset)))))]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:14088: [(set! ,lvalue (asm ,info ,proc ,t* ...)) (values (apply proc code* lvalue t*) chunk* offset)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14089- [(set! ,lvalue ,rhs) (values (asm-move code* lvalue rhs) chunk* offset)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:14090: [(asm ,info ,proc ,t* ...) (values (apply proc code* t*) chunk* offset)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14091- (Pred : Pred (ir l1 l2 offset) -> * (code* chunk)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:14092: [(asm ,info ,proc ,t* ...) (apply proc l1 l2 offset t*)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14093- (Program ir))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14129- (syntax-rules ()
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:14130: [(_ asm e1 e2 ...)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14131- (let ([ls (cons* e1 e2 ...)])
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:14132: (if aop (cons asm ls) ls))]))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-14133-
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15152- (nanopass-case (L15d Rhs) rhs
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15153: [(asm ,info ,proc ,t* ...) (fold-left Triv out t*)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15154- [else (Triv out rhs)])))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15157- (nanopass-case (L15d Pred) pred
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15158: [(asm ,info ,proc ,t* ...) (fold-left Triv out t*)])))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15159- (define Tail
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15181- (Triv (Rhs out rhs) lvalue)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15182: [(asm ,info ,proc ,t* ...) (fold-left Triv out t*)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15183- [else out])))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15387- (nanopass-case (L15d Rhs) rhs
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15388: [(asm ,info ,proc ,t* ...) (fold-left Triv unspillable* t*)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15389- [else (Triv unspillable* rhs)])))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15392- (nanopass-case (L15d Pred) p
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15393: [(asm ,info ,proc ,t* ...) (fold-left Triv '() t*)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15394- [else (sorry! who "unexpected pred ~s" p)])))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15434- [(set! ,live-info ,lvalue ,rhs) (Triv (Rhs unspillable* rhs) lvalue)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15435: [(asm ,info ,proc ,t* ...) (fold-left Triv unspillable* t*)]
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15436- [(move-related ,x1 ,x2) (add-move-hint! x1 x2) unspillable*]
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15966- (nanopass-case (L16 Pred) pred
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss:15967: [(asm ,info ,proc ,t* ...)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/cpnanopass.ss-15968- (safe-assert (info-condition-code? info))
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1021- (- (inline info value-prim t* ...))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss:1022: (+ (asm info proc t* ...) => (asm proc t* ...)))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1023- (Effect (e)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1027- (fcallable-overflow-check live-info))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss:1028: (+ (asm info proc t* ...) => (asm proc t* ...)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1029- (move-related x1 x2)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1032- (- (inline live-info info pred-prim t* ...))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss:1033: (+ (asm info proc t* ...) => (asm proc t* ...)))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1034- (Tail (tl)
##############################################
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1071- (with-output-language (L15d Effect)
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss:1072: `(asm ,info ,(lambda (code*) code*)))))
chezscheme-9.5.4+dfsg/.pc/0005-continuation-repair-for-return-arity-error.patch/s/np-languages.ss-1073-)
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-226- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:227: (build-set! ,u (asm ,null-info ,(asm-add #f) ,x0 (immediate ,imm)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-228- (return u x1 0)))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-233- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:234: (build-set! ,u (asm ,null-info ,(asm-sub #f) ,x0 (immediate ,imm)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-235- (return u x1 0)))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-242- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:243: (build-set! ,u (asm ,null-info ,(asm-add #f) ,u ,x1))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-244- (return x0 u 0)))))])))))])))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-463- [(op (z ur) (x ur) (y funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:464: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(-/ovfl -/eq))) ,x ,y))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-465- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:466: `(set! ,(make-live-info) ,z (asm ,info ,(asm-rsb (memq op '(-/ovfl -/eq))) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-467- [(op (z ur) (x ur) (y negate-funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:468: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(-/ovfl -/eq))) ,x ,y))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-469- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:470: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(-/ovfl -/eq))) ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-471-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-473- [(op (z ur) (x ur) (y funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:474: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(+/ovfl +/carry))) ,x ,y))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-475- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:476: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(+/ovfl +/carry))) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-477- [(op (z ur) (x ur) (y negate-funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:478: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(+/ovfl +/carry))) ,x ,y))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-479- [(op (z ur) (x negate-funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:480: `(set! ,(make-live-info) ,z (asm ,info ,(asm-sub (memq op '(+/ovfl +/carry))) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-481- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:482: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add (memq op '(+/ovfl +/carry))) ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-483-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-486- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:487: `(set! ,(make-live-info) ,z (asm ,info ,asm-mul ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-488-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-493- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:494: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:495: `(set! ,(make-live-info) ,z (asm ,null-info ,asm-smull ,x ,y ,u))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:496: `(asm ,null-info ,(asm-cmp/shift 31 'sra) ,u ,z)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-497-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-501- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:502: `(set! ,(make-live-info) ,z (asm ,info ,asm-div ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-503-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-505- [(op (z ur) (x ur) (y funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:506: `(set! ,(make-live-info) ,z (asm ,info ,(asm-logand #f) ,x ,y))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-507- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:508: `(set! ,(make-live-info) ,z (asm ,info ,(asm-logand #f) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-509- [(op (z ur) (x ur) (y lognot-funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:510: `(set! ,(make-live-info) ,z (asm ,info ,(asm-bic #f) ,x ,y))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-511- [(op (z ur) (x lognot-funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:512: `(set! ,(make-live-info) ,z (asm ,info ,(asm-bic #f) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-513- [(op (z ur) (x ur) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:514: `(set! ,(make-live-info) ,z (asm ,info ,(asm-logand #f) ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-515-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-519- [(op (z ur) (x funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:520: `(set! ,(make-live-info) ,z (asm ,info ,((select-op op) #f) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-521- [(op (z ur) (x ur) (y funky12 ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:522: `(set! ,(make-live-info) ,z (asm ,info ,((select-op op) #f) ,x ,y))]))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-523-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-525- [(op (z ur) (x ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:526: `(set! ,(make-live-info) ,z (asm ,info ,asm-lognot ,x))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-527-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-529- [(op (z ur) (x ur) (y ur shift-count))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:530: `(set! ,(make-live-info) ,z (asm ,info ,(asm-shiftop op) ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-531-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-544- (if (funky12 offset)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:545: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add #f) ,x (immediate ,offset)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-546- (let ([u (make-tmp 'u)])
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-548- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:549: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add #f) ,x ,u)))))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-550-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-556- (if (funky12 offset)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:557: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,y (immediate ,offset)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-558- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-559- `(set! ,(make-live-info) ,u (immediate ,offset))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:560: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,u ,y))))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:561: `(set! ,(make-live-info) ,z (asm ,info ,(asm-add #f) ,x ,u))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-562-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-563- (define-instruction value (sext8 sext16 zext8 zext16)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:564: [(op (z ur) (x ur)) `(set! ,(make-live-info) ,z (asm ,info ,(asm-move/extend op) ,x))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-565-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-575- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:576: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,y ,w))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-577- (k x u imm-zero))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-587- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:588: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x ,y))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-589- (k u %zero w)))))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-594- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:595: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x (immediate ,n)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-596- (k u y imm-zero))))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-601- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:602: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-sub #f) ,x (immediate ,n)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-603- (k u y imm-zero))))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-610- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:611: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x ,u))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-612- (k u y imm-zero)))))]))))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-617- (lambda (x y w)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:618: (let ([instr `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-load type) ,x ,y ,w))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-619- (if (info-load-swapped? info)
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-621- instr
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:622: `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-swap type) ,z)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-623- instr)))))])
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-631- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:632: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-swap type) ,z))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:633: `(asm ,null-info ,(asm-store type) ,x ,y ,w ,u)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:634: `(asm ,null-info ,(asm-store type) ,x ,y ,w ,z)))))]))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-635-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-648- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:649: `(asm ,info ,(pick-asm-op op info) ,x ,z)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-650- (let ([u (make-tmp 'u)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-651- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:652: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,x ,y))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:653: `(asm ,info ,(pick-asm-op op info) ,u ,z))))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-654- [(op (x ur) (y ur) (z ur))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-656- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:657: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,x ,z))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-658- (if (eq? y %zero)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:659: `(asm ,info ,(pick-asm-op op info) ,u (immediate 0))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-660- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:661: `(set! ,(make-live-info) ,u (asm ,info ,(asm-add #f) ,u ,y))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:662: `(asm ,info ,(pick-asm-op op info) ,u (immediate 0))))))]))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-663-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-671- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:672: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x (immediate ,(constant flonum-data-disp))))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-673- (p u))))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-684- (with-flonum-data-pointers (y)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:685: `(asm ,info ,asm-flt ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-686-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-689- (with-flonum-data-pointers (x y z)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:690: `(asm ,info ,(asm-flop-2 op) ,x ,y ,z))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-691-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-694- (with-flonum-data-pointers (x y)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:695: `(asm ,info ,asm-flsqrt ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-696-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-699- (with-flonum-data-pointers (x)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:700: `(set! ,(make-live-info) ,z (asm ,info ,asm-trunc ,x)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-701-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-705- (let ([info (make-info-condition-code op #f #f)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:706: (values '() `(asm ,info ,(asm-fl-relop info) ,x ,y))))]))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-707-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-711- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:712: `(set! ,(make-live-info) ,u1 (asm ,null-info ,(asm-add #f) ,x ,w))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:713: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:714: `(asm ,null-info ,asm-inc-cc-counter ,u1 ,z ,u2)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-715-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-720- `(set! ,(make-live-info) ,u ,x)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:721: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,u ,y))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-722- `(set! ,(make-live-info) ,x ,u)))])
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-724- (define-instruction value (read-time-stamp-counter)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:725: [(op (z ur)) `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-read-counter 1)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-726-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-730- (let ([imm (nanopass-case (L15d Triv) x [(immediate ,imm) (fxmin imm 1)])])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:731: `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-read-counter (fx+ imm 2)))))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:732: [(op (z ur) (x ur)) `(set! ,(make-live-info) ,z (asm ,null-info ,(asm-read-counter) ,x))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-733-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-739- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:740: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:741: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:742: `(set! ,(make-live-info) ,z (asm ,info ,asm-get-tc ,u ,ulr))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-743-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-748- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:749: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:750: `(set! ,(make-live-info) ,z (asm ,info ,(asm-library-call (info-asmlib-libspec info) #t) ,u ,(info-kill*-live*-live* info) ...)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-751- (let ([ulr (make-precolored-unspillable 'ulr %lr)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-752- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:753: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:754: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:755: `(set! ,(make-live-info) ,z (asm ,info ,(asm-library-call (info-asmlib-libspec info) #f) ,u ,ulr ,(info-kill*-live*-live* info) ...))))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-756-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-762- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:763: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:764: `(asm ,info ,(asm-library-call! (info-asmlib-libspec info) #t) ,u ,(info-kill*-live*-live* info) ...)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-765- (let ([ulr (make-precolored-unspillable 'ulr %lr)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-766- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:767: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:768: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:769: `(asm ,info ,(asm-library-call! (info-asmlib-libspec info) #f) ,u ,ulr ,(info-kill*-live*-live* info) ...)))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-770-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-776- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:777: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:778: `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info) #t) ,u))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-779- (let ([ulr (make-precolored-unspillable 'ulr %lr)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-780- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:781: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:782: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:783: `(asm ,info ,(asm-c-simple-call (info-c-simple-call-entry info) #f) ,u ,ulr)))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-784-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-787- (let ([info (if (eq? op 'eq?) info-cc-eq (make-info-condition-code op #t #t))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:788: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-789- [(op (x ur) (y ur funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-790- (let ([info (if (eq? op 'eq?) info-cc-eq (make-info-condition-code op #f #t))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:791: (values '() `(asm ,info ,(asm-relop info) ,x ,y)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-792-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-793- (define-instruction pred (condition-code)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:794: [(op) (values '() `(asm ,info ,(asm-condition-code info)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-795-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-800- (with-output-language (L15d Effect)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:801: `(set! ,(make-live-info) ,tmp (asm ,null-info ,(asm-logand #f) ,x ,mask)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:802: `(asm ,info-cc-eq ,asm-eq ,tmp ,type)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-803-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-805- [(op (x funky12) (y ur))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:806: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,y ,x))]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-807- [(op (x ur) (y ur funky12))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:808: (values '() `(asm ,info-cc-eq ,(asm-logtest (eq? op 'log!test) info-cc-eq) ,x ,y))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-809-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-819- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:820: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,r ,w))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-821- (k u))))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-825- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:826: `(set! ,(make-live-info) ,u (asm ,null-info ,(asm-add #f) ,x ,y))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-827- (add-offset u)))))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-836- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:837: `(set! ,(make-live-info) ,u (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:838: `(asm ,null-info ,asm-lock ,r ,u)))))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:839: `(asm ,info-cc-eq ,asm-eq ,u (immediate 0))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-840- (define-instruction effect (locked-incr! locked-decr!)
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-845- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:846: `(set! ,(make-live-info) ,u1 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:847: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:848: `(asm ,null-info ,(asm-lock+/- op) ,r ,u1 ,u2)))))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-849- (define-instruction effect (cas)
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-854- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:855: `(set! ,(make-live-info) ,u1 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:856: `(set! ,(make-live-info) ,u2 (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:857: `(asm ,info ,asm-cas ,r ,old ,new ,u1 ,u2)))))]))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-858-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-866- (seq
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:867: `(set! ,(make-live-info) ,ulr (asm ,null-info ,asm-kill))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:868: `(asm ,info ,asm-indirect-call ,x ,ulr ,(info-kill*-live*-live* info) ...)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-869-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-870- (define-instruction effect (pop-multiple)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:871: [(op) `(asm ,info ,(asm-pop-multiple (info-kill*-kill* info)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-872-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-873- (define-instruction effect (push-multiple)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:874: [(op) `(asm ,info ,(asm-push-multiple (info-kill*-live*-live* info)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-875-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-876- (define-instruction effect (vpush-multiple)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:877: [(op) `(asm ,info ,(asm-vpush-multiple (info-vpush-reg info) (info-vpush-n info)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-878-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-879- (define-instruction effect (vpop-multiple)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:880: [(op) `(asm ,info ,(asm-vpop-multiple (info-vpush-reg info) (info-vpush-n info)))])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-881-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-882- (define-instruction effect save-flrv
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:883: [(op) `(asm ,info ,asm-save-flrv)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-884-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-885- (define-instruction effect restore-flrv
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:886: [(op) `(asm ,info ,asm-restore-flrv)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-887-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1564-
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:1565: ; asm helpers
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1566-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1614- (build-maybe-cons* #'((build long (byte-fields chunk ...)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:1615: #'(aop-cons* `(asm ,op ,opnd ...) ?code*))])))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1616-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1620- [(_ (op opnd ... ?code*) chunk ...)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:1621: (fold-right cons #'(aop-cons* `(asm ,op ,opnd ...) ?code*)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1622- #'((build long (byte-fields chunk ...))))])))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1705- (case (car x)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:1706: [(asm arm32-abs arm32-jump arm32-call) 0]
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1707- [else 4])))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1716- (emit brai 0
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:1717: (cons* `(long . ,n) (aop-cons* `(asm "long:" ,n) code*))))))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-1718-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2144- (lambda (offset)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2145: (let ([disp (fx- next-addr (fx- offset incr-offset) 4)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2146- (cond
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2204- #`(let ([code* (emit #,bop #,opnd1 code*)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2205: (let-values ([(ignore #,opnd2) (get-disp-opnd (fx+ next-addr (asm-size* code*)) #,l2)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2206- #,body))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2253- (let ([rel (make-funcrel 'abs l offset)])
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2254: (cons* rel (aop-cons* `(asm "mrv point:" ,rel) code*)))))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2255-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2293- (lambda (code* reloc)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2294: (cons* reloc (aop-cons* `(asm "relocation:" ,reloc) code*))))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2295-
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2303- `(abs 0 (object ,lpm)))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2304: (aop-cons* `(asm livemask: ,(format "~b" lpm))
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2305- '(code-top-link)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2306: (aop-cons* `(asm code-top-link)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2307- `(long . ,fs)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2308: (aop-cons* `(asm "frame size:" ,fs)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2309- (if mrvl
##############################################
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2312- mrv-error
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss:2313: (aop-cons* `(asm "mrv point:" ,mrv-error)
chezscheme-9.5.4+dfsg/.pc/0006-make-arm32-return-address-encoding-montonic-w.r.t.-o.patch/s/arm32.ss-2314- code*))))))))))
##############################################
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-6322- (syntax-case e ()
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:6323: ((_ conv* foreign-name foreign-addr (arg ...) result)
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-6324- (build-foreign-procedure ae
##############################################
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9069- ;; Return void, since an extra first argument receives the result,
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:9070: ;; but tell `$foreign-procedure` that the result is actually an & form
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9071- #`((lambda (r) (void)) #,(datum->syntax #'foreign-procedure result-type))]
##############################################
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9074- [([extra ...] [extra-arg ...] [extra-check ...])
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:9075: ;; When the result type is `(& <ftype>)`, the `$foreign-procedure` result
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9076- ;; expects an extra argument as a `(* <ftype>)` that it uses to store the
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9077- ;; foreign-procedure result, and it returns void. The extra argument is made
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:9078: ;; explicit for `$foreign-procedure`, and the return type is preserved as-is
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:9079: ;; to let `$foreign-procedure` know that it needs to fill the first argument.
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9080- (cond
##############################################
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9087- [else #'([] [] [])])])
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:9088: #`(let ([p ($foreign-procedure conv* foreign-name ?foreign-addr (extra-arg ... arg ... ...) result)]
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9089- #,@(if unsafe?
##############################################
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9323- ;; callable receives an extra pointer argument to fill with the result;
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss:9324: ;; we add this type to `$foreign-callable` as an initial address argument,
chezscheme-9.5.4+dfsg/.pc/0008-Add-usr-share-r6rs-to-the-library-path.patch/s/syntax.ss-9325- ;; which may be actually provided by the caller or synthesized by the
##############################################
chezscheme-9.5.4+dfsg/configure-20- machs=$machs$sep0$last
chezscheme-9.5.4+dfsg/configure:21: last=`echo $fn | sed -e 's/boot\/\(.*\)\/scheme.boot/\1/'`
chezscheme-9.5.4+dfsg/configure-22- sep0=$sep1; sep1=", "; sep2=$sep3; sep3=$sep4; sep4=", and "
##############################################
chezscheme-9.5.4+dfsg/configure-165- -m=*)
chezscheme-9.5.4+dfsg/configure:166: m=`echo $1 | sed -e 's/^-m=//'`
chezscheme-9.5.4+dfsg/configure-167- ;;
chezscheme-9.5.4+dfsg/configure-168- --machine=*)
chezscheme-9.5.4+dfsg/configure:169: m=`echo $1 | sed -e 's/^--machine=//'`
chezscheme-9.5.4+dfsg/configure-170- ;;
##############################################
chezscheme-9.5.4+dfsg/configure-180- --installprefix=*)
chezscheme-9.5.4+dfsg/configure:181: installprefix=`echo $1 | sed -e 's/^--installprefix=//'`
chezscheme-9.5.4+dfsg/configure-182- ;;
chezscheme-9.5.4+dfsg/configure-183- --installlib=*)
chezscheme-9.5.4+dfsg/configure:184: installlib=`echo $1 | sed -e 's/^--installlib=//'`
chezscheme-9.5.4+dfsg/configure-185- ;;
chezscheme-9.5.4+dfsg/configure-186- --installbin=*)
chezscheme-9.5.4+dfsg/configure:187: installbin=`echo $1 | sed -e 's/^--installbin=//'`
chezscheme-9.5.4+dfsg/configure-188- ;;
chezscheme-9.5.4+dfsg/configure-189- --installman=*)
chezscheme-9.5.4+dfsg/configure:190: installman=`echo $1 | sed -e 's/^--installman=//'`
chezscheme-9.5.4+dfsg/configure-191- ;;
chezscheme-9.5.4+dfsg/configure-192- --installowner=*)
chezscheme-9.5.4+dfsg/configure:193: installowner=`echo $1 | sed -e 's/^--installowner=//'`
chezscheme-9.5.4+dfsg/configure-194- ;;
chezscheme-9.5.4+dfsg/configure-195- --installgroup=*)
chezscheme-9.5.4+dfsg/configure:196: installgroup=`echo $1 | sed -e 's/^--installgroup=//'`
chezscheme-9.5.4+dfsg/configure-197- ;;
chezscheme-9.5.4+dfsg/configure-198- --installschemename=*)
chezscheme-9.5.4+dfsg/configure:199: installschemename=`echo $1 | sed -e 's/^--installschemename=//'`
chezscheme-9.5.4+dfsg/configure-200- ;;
chezscheme-9.5.4+dfsg/configure-201- --installpetitename=*)
chezscheme-9.5.4+dfsg/configure:202: installpetitename=`echo $1 | sed -e 's/^--installpetitename=//'`
chezscheme-9.5.4+dfsg/configure-203- ;;
chezscheme-9.5.4+dfsg/configure-204- --installscriptname=*)
chezscheme-9.5.4+dfsg/configure:205: installscriptname=`echo $1 | sed -e 's/^--installscriptname=//'`
chezscheme-9.5.4+dfsg/configure-206- ;;
chezscheme-9.5.4+dfsg/configure-207- --toolprefix=*)
chezscheme-9.5.4+dfsg/configure:208: toolprefix=`echo $1 | sed -e 's/^--toolprefix=//'`
chezscheme-9.5.4+dfsg/configure-209- CC="${toolprefix}${CC}"
##############################################
chezscheme-9.5.4+dfsg/configure-221- --temproot=*)
chezscheme-9.5.4+dfsg/configure:222: temproot=`echo $1 | sed -e 's/^--temproot=//'`
chezscheme-9.5.4+dfsg/configure-223- ;;
chezscheme-9.5.4+dfsg/configure-224- --workarea=*)
chezscheme-9.5.4+dfsg/configure:225: w=`echo $1 | sed -e 's/^--workarea=//'`
chezscheme-9.5.4+dfsg/configure-226- ;;
##############################################
chezscheme-9.5.4+dfsg/configure-252- CC=*)
chezscheme-9.5.4+dfsg/configure:253: CC=`echo $1 | sed -e 's/^CC=//'`
chezscheme-9.5.4+dfsg/configure-254- ;;
chezscheme-9.5.4+dfsg/configure-255- CPPFLAGS=*)
chezscheme-9.5.4+dfsg/configure:256: CPPFLAGS=`echo $1 | sed -e 's/^CPPFLAGS=//'`
chezscheme-9.5.4+dfsg/configure-257- ;;
chezscheme-9.5.4+dfsg/configure-258- CFLAGS=*)
chezscheme-9.5.4+dfsg/configure:259: CFLAGS=`echo $1 | sed -e 's/^CFLAGS=//'`
chezscheme-9.5.4+dfsg/configure-260- ;;
chezscheme-9.5.4+dfsg/configure-261- LD=*)
chezscheme-9.5.4+dfsg/configure:262: LD=`echo $1 | sed -e 's/^LD=//'`
chezscheme-9.5.4+dfsg/configure-263- ;;
chezscheme-9.5.4+dfsg/configure-264- LDFLAGS=*)
chezscheme-9.5.4+dfsg/configure:265: LDFLAGS=`echo $1 | sed -e 's/^LDFLAGS=//'`
chezscheme-9.5.4+dfsg/configure-266- ;;
chezscheme-9.5.4+dfsg/configure-267- AR=*)
chezscheme-9.5.4+dfsg/configure:268: AR=`echo $1 | sed -e 's/^AR=//'`
chezscheme-9.5.4+dfsg/configure-269- ;;
chezscheme-9.5.4+dfsg/configure-270- ARFLAGS=*)
chezscheme-9.5.4+dfsg/configure:271: ARFLAGS=`echo $1 | sed -e 's/^ARFLAGS=//'`
chezscheme-9.5.4+dfsg/configure-272- ;;
chezscheme-9.5.4+dfsg/configure-273- RANLIB=*)
chezscheme-9.5.4+dfsg/configure:274: RANLIB=`echo $1 | sed -e 's/^RANLIB=//'`
chezscheme-9.5.4+dfsg/configure-275- ;;
chezscheme-9.5.4+dfsg/configure-276- WINDRES=*)
chezscheme-9.5.4+dfsg/configure:277: WINDRES=`echo $1 | sed -e 's/^WINDRES=//'`
chezscheme-9.5.4+dfsg/configure-278- ;;
chezscheme-9.5.4+dfsg/configure-279- ZLIB=*)
chezscheme-9.5.4+dfsg/configure:280: zlibLib=`echo $1 | sed -e 's/^ZLIB=//'`
chezscheme-9.5.4+dfsg/configure-281- zlibInc=
##############################################
chezscheme-9.5.4+dfsg/configure-286- LZ4=*)
chezscheme-9.5.4+dfsg/configure:287: LZ4Lib=`echo $1 | sed -e 's/^LZ4=//'`
chezscheme-9.5.4+dfsg/configure-288- LZ4Inc=