X-Assembler 2.0 beta 3.

This commit is contained in:
Piotr Fusik 1998-10-04 19:27:10 +02:00
parent 6f34469afa
commit e9ca59c76b
1 changed files with 9 additions and 2 deletions

View File

@ -1762,6 +1762,10 @@ equret: ret
nolabl: error e_label
chkhon: test [flags], m_hdr
jnz equret
error e_hoff
p_org: call spaces
and [flags], not m_norg
lodsw
@ -1775,12 +1779,14 @@ p_org: call spaces
jmp orget
orgff: or [flags], m_rqff
orgaf: or [flags], m_rorg
call chkhon
orget: call getuns
jc unknow
mov [origin], ax
ret
p_rui: mov ah, 2
p_rui: call chkhon
mov ah, 2
mov [origin], ax
call spauns
jmp savwor
@ -2282,7 +2288,7 @@ noper1 = $-opert1
swilet db 'TSOLIC'
hello db 'X-Assembler 2.0áII by Fox/Taquart',eot
hello db 'X-Assembler 2.0á3 by Fox/Taquart',eot
hellen = $-hello-1
usgtxt db "Syntax: XASM source [options]",eol
db "/c List false conditionals",eol
@ -2345,6 +2351,7 @@ e_mift db 'Missing IFT',eol
e_meif db 'Missing EIF',eol
e_norg db 'No ORG specified',eol
e_fshor db 'File is too short',eol
e_hoff db 'Illegal when headers off',eol
exitcod dw 4c00h
ohand dw nhand