| ... | ... |
@@ -592,8 +592,8 @@ include projects/library/heap.tal |
| 592 | 592 |
POP POP2 |
| 593 | 593 |
JMP2r |
| 594 | 594 |
|
| 595 |
-@asma-label-helper ( incoming-ptr* -- binary-ptr* 00 if label existed already |
|
| 596 |
- OR binary-ptr* 01 if label was created ) |
|
| 595 |
+@asma-label-helper ( incoming-ptr* -- binary-ptr* 01 if label existed already |
|
| 596 |
+ OR binary-ptr* 00 if label was created ) |
|
| 597 | 597 |
;asma-traverse-tree JSR2 |
| 598 | 598 |
,&new-label JCN |
| 599 | 599 |
|