Not logged in

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;