Add definition for 0 in case it's not available in cross.fs

parent d14af7d7
Pipeline #799 failed with stage
in 5 minutes and 8 seconds
......@@ -1078,7 +1078,7 @@ Variable cross-locs[]
: gxt-location ( addr -- addr )
\ note that an xt was compiled at addr, for backtrace-locate functionality
dup glocs-start - T 1 cells H / >r
tsourceview dup r> 1+ cross-locs[] $[] cell- 2! ;
tsourceview dup r> 1+ cross-locs[] $[] 1 cells - 2! ;
\ search for ghosts
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment