Permalink
Browse files

Rename hack dummy to __zero

  • Loading branch information...
1 parent f091907 commit 874e900517fcf67df2929414253190de70baa514 @kulp committed Aug 21, 2012
Showing with 4 additions and 4 deletions.
  1. +2 −2 forth/forth_common.th
  2. +2 −2 forth/forty.tas.cpp
View
@@ -41,8 +41,8 @@
#define jmp(Reg) p <- Reg - (. + 1) + p
#define ccall(Loc) o <- R - 1 ; pushregs(o) ; push(o,p + 2); goto(Loc) ; popregs(o)
-#define reloc(Label) p + (@Label - . - 1)
-#define rel(X) X + p + (@dummy - . - 1)
+#define reloc(Label) p + (@Label - (. + 1))
+#define rel(X) X + p + (@__zero - . - 1)
#define unrel(X) X - p + (. + 1)
#define goto(Label) p <- reloc(Label)
#define push(Sp,Expr) [Sp] <- Expr ; Sp <- Sp - 1
View
@@ -5,8 +5,8 @@
// should be a list of addresses of code to run, ending with EXIT.
.set link, 0
-.global dummy
-dummy:
+.global __zero
+__zero:
__boot:
S <- [reloc(_PSPinit)]
R <- [reloc(_RSPinit)]

0 comments on commit 874e900

Please sign in to comment.