Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 340 → Rev 339

/programs/develop/fasm/trunk/parser.inc
1,6 → 1,6
 
; flat assembler core
; Copyright (c) 1999-2007, Tomasz Grysztar.
; Copyright (c) 1999-2006, Tomasz Grysztar.
; All rights reserved.
 
parser:
1297,14 → 1297,10
cmp al,39h
jbe invalid_name
name_first_char_ok:
cmp ecx,1
jne check_for_reserved_word
cmp al,'$'
jne check_for_reserved_word
cmp ecx,1
jne invalid_name
reserved_word:
mov eax,0Fh
pop edi
ret
je reserved_word
check_for_reserved_word:
call get_instruction
jnc reserved_word
1345,6 → 1341,10
mov [eax+24],ebx
pop edi
ret
reserved_word:
mov eax,0Fh
pop edi
ret
allocate_label:
mov eax,[labels_list]
mov ecx,LABEL_STRUCTURE_SIZE shr 2