Differences From Artifact [d1ca01c64ffb6e1f]:
File autopsy.rx part of check-in [abfd99870e] - new autopsy w/block view from Marc by crc on 2011-01-19 15:52:04. [annotate] [view]
To Artifact [9a48d8cc43947f24]:
File autopsy.rx part of check-in [d254cde5a2] - fix autopsy by crc on 2011-02-12 17:55:12. [annotate] [view]
@@ -62,9 +62,9 @@
: .row ( aqn- ) cr (.row) 2drop drop ;
: (.cells) ( an- )
0 repeat dup boxRows = if; dup 1+
- [ ( ann ) boxtbl + @ ( anq ) &2dup dip swap .row ( an ) ] dip again ;
+ [ ( ann ) boxtbl + @ ( anq ) [ 2over ] dip swap .row ( an ) ] dip again ;
( --[ Utility words for finding the RET opcode ]------------ )
: findRet ( a-na ) 1 swap repeat dup ^dissect'endOfWord? if;