./tethered.ss~:40:                        (asm-[01;31mconstant-[00mfind x)))
./comp.ss:99:         [01;31mconstant-[00mregister!
./comp.ss:213:  (define ([01;31mconstant-[00mregister! name body)
./comp.ss:222:    (asm-[01;31mconstant-[00mregister! name (car body))
./comp.ss:245:       (compositions [01;31mconstant-[00mregister! defs ...))))
./comp.ss:392:    (begin ([01;31mconstant-[00mregister! name `(,a)) '()))
./asm.ss:215:                        ([01;31mconstant-[00m>word         ;; constant from ram/flash/const
./asm.ss:235:        (let ((c (asm-[01;31mconstant-[00mfind arg)))
./asm.ss:463:    (let ((name (dasm-[01;31mconstant-[00mfind thing)))
./asm.ss:515:  (define (asm-[01;31mconstant-[00mfind sym)
./asm.ss:519:  (define (dasm-[01;31mconstant-[00mfind number)
./asm.ss:526:  (define (asm-[01;31mconstant-[00mregister! name value)
./asm.ss:620:   ((const)       (asm-[01;31mconstant-[00mfind)))
./comp.ss~:95:         [01;31mconstant-[00mregister!
./comp.ss~:206:  (define ([01;31mconstant-[00mregister! name body)
./comp.ss~:215:    (asm-[01;31mconstant-[00mregister! name (car body))
./comp.ss~:238:       (compositions [01;31mconstant-[00mregister! defs ...))))
./comp.ss~:365:    (begin ([01;31mconstant-[00mregister! name `(,a)) '()))
./pic18-console.ss:17: (target-stack  'stack-data asm-[01;31mconstant-[00mfind
./asm.ss~:227:                        ([01;31mconstant-[00m>word         ;; constant from ram/flash/const
./asm.ss~:247:        (let ((c (asm-[01;31mconstant-[00mfind arg)))
./asm.ss~:475:    (let ((name (dasm-[01;31mconstant-[00mfind thing)))
./asm.ss~:527:  (define (asm-[01;31mconstant-[00mfind sym)
./asm.ss~:531:  (define (dasm-[01;31mconstant-[00mfind number)
./asm.ss~:538:  (define (asm-[01;31mconstant-[00mregister! name value)
./asm.ss~:639:   ((const)       (asm-[01;31mconstant-[00mfind)))
./tethered.ss:40:                        (asm-[01;31mconstant-[00mfind x)))
./#asm.ss#:215:;;                         ([01;31mconstant-[00m>word         ;; constant from ram/flash/const
./#asm.ss#:238:        (let ((c (asm-[01;31mconstant-[00mfind arg)))
./#asm.ss#:466:    (let ((name (dasm-[01;31mconstant-[00mfind thing)))
./#asm.ss#:518:  (define (asm-[01;31mconstant-[00mfind sym)
./#asm.ss#:522:  (define (dasm-[01;31mconstant-[00mfind number)
./#asm.ss#:529:  (define (asm-[01;31mconstant-[00mregister! name value)
./#asm.ss#:623:   ((const)       (asm-[01;31mconstant-[00mfind)))
