Subversion Repositories Kolibri OS

Rev

Rev 2664 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2664 Rev 2665
Line 132... Line 132...
132 
	ret
 132 
	ret
133 
      symbol_value:
 133 
      symbol_value:
134 
	cmp	[source_start],0
 134 
	cmp	[source_start],0
135 
	je	preprocessor_value
 135 
	je	preprocessor_value
136 
	push	edi
 136 
	push	edi esi
137 
	mov	edi,address_registers
 137 
	lods	word [esi]
- 
 
 138 
	cmp	al,1Ah
- 
 
 139 
	jne	no_address_register
138 
	call	get_operator
 140 
	movzx	ecx,ah
- 
 
 141 
	call	get_symbol
139 
	or	al,al
 142 
	jc	no_address_register
- 
 
 143 
	cmp	al,10h
- 
 
 144 
	jne	no_address_register
- 
 
 145 
	mov	al,ah
140 
	jnz	register_value
 146 
	shr	ah,4
- 
 
 147 
	cmp	ah,4
- 
 
 148 
	je	register_value
- 
 
 149 
	cmp	ah,8
- 
 
 150 
	je	register_value
- 
 
 151 
	cmp	ah,0Ch
- 
 
 152 
	je	register_value
- 
 
 153 
	cmp	ah,0Dh
- 
 
 154 
	je	register_value
- 
 
 155 
	cmp	ah,0Fh
- 
 
 156 
	je	register_value
- 
 
 157 
	cmp	ah,2
- 
 
 158 
	jne	no_address_register
- 
 
 159 
	cmp	al,23h
- 
 
 160 
	je	register_value
- 
 
 161 
	cmp	al,25h
- 
 
 162 
	je	register_value
- 
 
 163 
	cmp	al,26h
- 
 
 164 
	je	register_value
- 
 
 165 
	cmp	al,27h
- 
 
 166 
	je	register_value
141 
	mov	edi,directive_operators
 167 
      no_address_register:
- 
 
 168 
	pop	esi
- 
 
 169 
	mov	edi,directive_operators
142 
	call	get_operator
 170 
	call	get_operator
143 
	pop	edi
 171 
	pop	edi
144 
	or	al,al
 172 
	or	al,al
145 
	jnz	broken_value
 173 
	jnz	broken_value
146 
	lods	byte [esi]
 174 
	lods	byte [esi]
Line 156... Line 184...
156 
      broken_value:
 184 
      broken_value:
157 
	mov	eax,0Fh
 185 
	mov	eax,0Fh
158 
	jmp	store_label_value
 186 
	jmp	store_label_value
159 
      register_value:
 187 
      register_value:
160 
	pop	edi
 188 
	pop	edx edi
161 
	mov	byte [edi-1],10h
 189 
	mov	byte [edi-1],10h
162 
	stos	byte [edi]
 190 
	stos	byte [edi]
163 
	ret
 191 
	ret
164 
      preprocessor_value:
 192 
      preprocessor_value:
165 
	dec	edi
 193 
	dec	edi
166 
	cmp	[hash_tree],0
 194 
	cmp	[hash_tree],0