diff options
| -rw-r--r-- | elf.e | 2 | ||||
| -rw-r--r-- | labels.e | 3 |
2 files changed, 3 insertions, 2 deletions
diff --git a/elf.e b/elf.e index c38f740..708de13 100644 --- a/elf.e +++ b/elf.e @@ -58,7 +58,7 @@ 0 pack32 ~ processor flags L@' elf-header-size pack16 ~ ELF header size - L@' elf-program-header-size pack16 ~ *program header entry size + L@' elf-program-header-size pack16 ~ *program header entry size 1 pack16 ~ *number of program header entries 0 pack16 ~ section header entry size 0 pack16 ~ number of section header entries diff --git a/labels.e b/labels.e index be601a3..b524229 100644 --- a/labels.e +++ b/labels.e @@ -128,7 +128,8 @@ init-labels ~ (label entry pointer -- label value) : use-label ~ If it hasn't been defined yet, mark it used-before-set. - dup label-status dup @ dup 0x02 & not { 0x04 | swap ! } { drop drop } if-else + dup label-status dup @ dup 0x02 & not + { 0x04 | swap ! } { drop drop } if-else ~ Mark it used. It's faster to just do this than to check if it's needed. dup label-status dup @ 0x01 | swap ! |