... | ... |
@@ -742,9 +742,13 @@ |
742 | 742 |
JMP2r |
743 | 743 |
|
744 | 744 |
@asma-literal-rel-addr |
745 |
+ LIT LIT ;asma-write-byte JSR2 |
|
746 |
+ ( fall through ) |
|
747 |
+ |
|
748 |
+@asma-rel-addr |
|
745 | 749 |
,asma-addr-helper JSR |
746 | 750 |
;asma/addr LDA2 SUB2 |
747 |
- #0003 SUB2 |
|
751 |
+ #0002 SUB2 |
|
748 | 752 |
|
749 | 753 |
DUP2 #0080 LTH2 STH |
750 | 754 |
DUP2 #ff7f GTH2 STHr ORA ,&in-bounds JCN |
... | ... |
@@ -754,7 +758,7 @@ |
754 | 758 |
JMP2r |
755 | 759 |
|
756 | 760 |
&in-bounds |
757 |
- ;asma-write-lit JSR2 |
|
761 |
+ ;asma-write-byte JSR2 |
|
758 | 762 |
POP |
759 | 763 |
JMP2r |
760 | 764 |
|
... | ... |
@@ -913,13 +917,14 @@ |
913 | 917 |
&29 :&28 $2 ") 00 :asma-comment-end |
914 | 918 |
&2c :&29 :&2d ", 00 :asma-literal-rel-addr |
915 | 919 |
&2d $2 $2 "- 00 :asma-zero-addr |
916 |
- &_entry :&26 :&7b ". 00 :asma-literal-zero-addr |
|
920 |
+ &_entry :&26 :&5f ". 00 :asma-literal-zero-addr |
|
917 | 921 |
&3a $2 $2 ": 00 :asma-abs-addr |
918 | 922 |
&3b :&3a $2 "; 00 :asma-literal-abs-addr |
919 | 923 |
&3d :&3b :&40 "= 00 :asma-abs-addr |
920 | 924 |
&40 $2 $2 "@ 00 :asma-label-define |
921 |
- &7b :&3d :&7d "{ 00 :asma-ignore |
|
922 |
- &7c $2 $2 "| 00 :asma-pad-absolute |
|
925 |
+ &5f :&3d :&7d "_ 00 :asma-rel-addr |
|
926 |
+ &7b $2 $2 "{ 00 :asma-ignore |
|
927 |
+ &7c :&7b $2 "| 00 :asma-pad-absolute |
|
923 | 928 |
&7d :&7c :&7e "} 00 :asma-ignore |
924 | 929 |
&7e $2 $2 "~ 00 :asma-include |
925 | 930 |
|