diff options
-rwxr-xr-x | data/bin2bac.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/data/bin2bac.pl b/data/bin2bac.pl index 7df1830..b3a7208 100755 --- a/data/bin2bac.pl +++ b/data/bin2bac.pl @@ -47,7 +47,7 @@ sub makebac($$$) { my $r = 0; # Last emitted line number # Address 65054 is EOFA - # 1 Z%=CALL(PEEK(65054%)+SWAP%(PEEK(65055%)-<loader offset>) + # 1 Z%=CALL(PEEK(65054%)+SWAP%(PEEK(65055%))-<loader offset>) $q .= bacstmt(++$r, \$left, "\x83\xc1\xf1\x5a\x00\xbb\xc7\x1e\xfe\xce\x36\xc7". "\x1f\xfe\xce\x36\xce\x34\xf5\xc7". |