aabc2/KOS_qrcodes
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

fasm 1.67.17

Browse Source 
tinypad - fixed link to fasm (/rd/1/develop/fasm)

git-svn-id: svn://kolibrios.org@242 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
heavyiron
2006-12-21 06:34:09 +00:00
parent e85c475db0
commit 3a022d4441
7 changed files with 107 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
programs/develop/fasm/trunk/parser.inc
View File

@@ -14,6 +14,7 @@ parser:
mov [anonymous_forward],eax
mov [hash_tree],eax
mov [blocks_stack],eax
mov [parsed_lines],eax
mov esi,[memory_start]
mov edi,[source_start]
parser_loop:
@@ -27,6 +28,7 @@ parser:
stos byte [edi]
mov eax,esi
stos dword [edi]
inc [parsed_lines]
add esi,16
parse_line:
cmp byte [esi],1Ah
@@ -410,6 +412,7 @@ parser:
stos byte [edi]
mov eax,[current_line]
stos dword [edi]
inc [parsed_lines]
mov eax,1 + (end_directive-assembler) shl 8
stos dword [edi]
mov eax,1 + (if_directive-assembler) shl 8
@@ -446,6 +449,7 @@ parser:
stos byte [edi]
mov eax,[current_line]
stos dword [edi]
inc [parsed_lines]
parse_else_if:
mov eax,1 + (if_directive-assembler) shl 8
stos dword [edi]
@@ -898,7 +902,12 @@ parse_line_contents:
jmp expression
contents_parsed:
cmp [parenthesis_stack],0
jne invalid_expression
; jne invalid_expression
je contents_ok
dec [parenthesis_stack]
add esp,8
jmp contents_parsed
contents_ok:
ret
identify_label: