version 1.18, 2007/03/25 21:30:59
|
version 1.20, 2007/04/09 22:36:01
|
Line 82 s" NULL" groups @ cell+ $!
|
Line 82 s" NULL" groups @ cell+ $!
|
IF |
IF |
11 /string $has? 0= IF r@ scan-ifs THEN |
11 /string $has? 0= IF r@ scan-ifs THEN |
ELSE 2dup s" #else" prefix? |
ELSE 2dup s" #else" prefix? |
IF r@ scan-ifs |
IF 2drop r@ scan-ifs |
ELSE 2dup s" GROUP(" prefix? |
ELSE 2dup s" GROUP(" prefix? |
IF 2drop drop 1+ 0 ELSE |
IF 2drop drop 1+ 0 ELSE |
2dup s" INST_ADDR(" prefix? |
2dup s" INST_ADDR(" prefix? |
Line 199 Variable bitmap-chars
|
Line 199 Variable bitmap-chars
|
|
|
: fi2c ( addr u -- ) base @ >r hex |
: fi2c ( addr u -- ) base @ >r hex |
read-image |
read-image |
." static void* image[" .imagesize ." ] = {" cr .image ." };" cr |
\ .\" const static __attribute__ ((__section__ (\".rodata\"))) void* image[" .imagesize ." ] = {" cr .image ." };" cr |
|
.\" static void* image[" .imagesize ." ] = {" cr .image ." };" cr |
." #ifdef USE_RELOC" cr |
." #ifdef USE_RELOC" cr |
." const char reloc_bits[" .relocsize ." ] = {" cr .reloc ." };" cr |
." const char reloc_bits[" .relocsize ." ] = {" cr .reloc ." };" cr |
." #endif" cr |
." #endif" cr |