Subversion Repositories Kolibri OS

Rev

Rev 692 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 692 Rev 1039
1
; flat assembler core
1
; flat assembler core
2
; Copyright (c) 1999-2007, Tomasz Grysztar.
2
; Copyright (c) 1999-2009, Tomasz Grysztar.
3
; All rights reserved.
3
; All rights reserved.
4
 
4
 
5
out_of_memory:
5
out_of_memory:
6
	push	_out_of_memory
6
	push	_out_of_memory
7
	jmp	fatal_error
7
	jmp	fatal_error
8
stack_overflow:
8
stack_overflow:
9
	push	_stack_overflow
9
	push	_stack_overflow
10
	jmp	fatal_error
10
	jmp	fatal_error
11
main_file_not_found:
11
main_file_not_found:
12
	push	_main_file_not_found
12
	push	_main_file_not_found
13
	jmp	fatal_error
13
	jmp	fatal_error
14
unexpected_end_of_file:
14
unexpected_end_of_file:
15
	push	_unexpected_end_of_file
15
	push	_unexpected_end_of_file
16
	jmp	fatal_error
16
	jmp	fatal_error
17
code_cannot_be_generated:
17
code_cannot_be_generated:
18
	push	_code_cannot_be_generated
18
	push	_code_cannot_be_generated
19
	jmp	fatal_error
19
	jmp	fatal_error
20
format_limitations_exceeded:
20
format_limitations_exceeded:
21
	push	_format_limitations_exceeded
21
	push	_format_limitations_exceeded
22
	jmp	fatal_error
22
	jmp	fatal_error
23
invalid_definition:
23
invalid_definition:
24
	push	_invalid_definition
24
	push	_invalid_definition
25
	jmp	fatal_error
25
	jmp	fatal_error
26
write_failed:
26
write_failed:
27
	push	_write_failed
27
	push	_write_failed
28
	jmp	fatal_error
28
	jmp	fatal_error
29
 
29
 
30
file_not_found:
30
file_not_found:
31
	push	_file_not_found
31
	push	_file_not_found
32
	jmp	assembler_error
32
	jmp	assembler_error
33
error_reading_file:
33
error_reading_file:
34
	push	_error_reading_file
34
	push	_error_reading_file
35
	jmp	assembler_error
35
	jmp	assembler_error
36
invalid_file_format:
36
invalid_file_format:
37
	push	_invalid_file_format
37
	push	_invalid_file_format
38
	jmp	assembler_error
38
	jmp	assembler_error
39
invalid_macro_arguments:
39
invalid_macro_arguments:
40
	push	_invalid_macro_arguments
40
	push	_invalid_macro_arguments
41
	jmp	assembler_error
41
	jmp	assembler_error
42
incomplete_macro:
42
incomplete_macro:
43
	push	_incomplete_macro
43
	push	_incomplete_macro
44
	jmp	assembler_error
44
	jmp	assembler_error
45
unexpected_characters:
45
unexpected_characters:
46
	push	_unexpected_characters
46
	push	_unexpected_characters
47
	jmp	assembler_error
47
	jmp	assembler_error
48
invalid_argument:
48
invalid_argument:
49
	push	_invalid_argument
49
	push	_invalid_argument
50
	jmp	assembler_error
50
	jmp	assembler_error
51
illegal_instruction:
51
illegal_instruction:
52
	push	_illegal_instruction
52
	push	_illegal_instruction
53
	jmp	assembler_error
53
	jmp	assembler_error
54
invalid_operand:
54
invalid_operand:
55
	push	_invalid_operand
55
	push	_invalid_operand
56
	jmp	assembler_error
56
	jmp	assembler_error
57
invalid_operand_size:
57
invalid_operand_size:
58
	push	_invalid_operand_size
58
	push	_invalid_operand_size
59
	jmp	assembler_error
59
	jmp	assembler_error
60
operand_size_not_specified:
60
operand_size_not_specified:
61
	push	_operand_size_not_specified
61
	push	_operand_size_not_specified
62
	jmp	assembler_error
62
	jmp	assembler_error
63
operand_sizes_do_not_match:
63
operand_sizes_do_not_match:
64
	push	_operand_sizes_do_not_match
64
	push	_operand_sizes_do_not_match
65
	jmp	assembler_error
65
	jmp	assembler_error
66
invalid_address_size:
66
invalid_address_size:
67
	push	_invalid_address_size
67
	push	_invalid_address_size
68
	jmp	assembler_error
68
	jmp	assembler_error
69
address_sizes_do_not_agree:
69
address_sizes_do_not_agree:
70
	push	_address_sizes_do_not_agree
70
	push	_address_sizes_do_not_agree
71
	jmp	assembler_error
71
	jmp	assembler_error
72
prefix_conflict:
72
prefix_conflict:
73
	push	_prefix_conflict
73
	push	_prefix_conflict
74
	jmp	assembler_error
74
	jmp	assembler_error
75
long_immediate_not_encodable:
75
long_immediate_not_encodable:
76
	push	_long_immediate_not_encodable
76
	push	_long_immediate_not_encodable
77
	jmp	assembler_error
77
	jmp	assembler_error
78
relative_jump_out_of_range:
78
relative_jump_out_of_range:
79
	push	_relative_jump_out_of_range
79
	push	_relative_jump_out_of_range
80
	jmp	assembler_error
80
	jmp	assembler_error
81
invalid_expression:
81
invalid_expression:
82
	push	_invalid_expression
82
	push	_invalid_expression
83
	jmp	assembler_error
83
	jmp	assembler_error
84
invalid_address:
84
invalid_address:
85
	push	_invalid_address
85
	push	_invalid_address
86
	jmp	assembler_error
86
	jmp	assembler_error
87
invalid_value:
87
invalid_value:
88
	push	_invalid_value
88
	push	_invalid_value
89
	jmp	assembler_error
89
	jmp	assembler_error
90
value_out_of_range:
90
value_out_of_range:
91
	push	_value_out_of_range
91
	push	_value_out_of_range
92
	jmp	assembler_error
92
	jmp	assembler_error
93
undefined_symbol:
93
undefined_symbol:
94
	mov	edi,message
94
	mov	edi,message
95
	mov	esi,_undefined_symbol
95
	mov	esi,_undefined_symbol
96
	call	copy_asciiz
96
	call	copy_asciiz
97
	push	message
97
	push	message
98
	cmp	[error_info],0
98
	cmp	[error_info],0
99
	je	assembler_error
99
	je	assembler_error
100
	mov	byte [edi-1],20h
100
	mov	byte [edi-1],20h
101
	call	write_quoted_symbol_name
101
	call	write_quoted_symbol_name
102
	jmp	assembler_error
102
	jmp	assembler_error
103
    copy_asciiz:
103
    copy_asciiz:
104
	lods	byte [esi]
104
	lods	byte [esi]
105
	stos	byte [edi]
105
	stos	byte [edi]
106
	test	al,al
106
	test	al,al
107
	jnz	copy_asciiz
107
	jnz	copy_asciiz
108
	ret
108
	ret
109
    write_quoted_symbol_name:
109
    write_quoted_symbol_name:
110
	mov	al,27h
110
	mov	al,27h
111
	stosb
111
	stosb
112
	mov	esi,[error_info]
112
	mov	esi,[error_info]
113
	movzx	ecx,byte [esi-1]
113
	movzx	ecx,byte [esi-1]
114
	rep	movs byte [edi],[esi]
114
	rep	movs byte [edi],[esi]
115
	mov	ax,27h
115
	mov	ax,27h
116
	stosw
116
	stosw
117
	ret
117
	ret
118
symbol_out_of_scope:
118
symbol_out_of_scope:
119
	mov	edi,message
119
	mov	edi,message
120
	mov	esi,_symbol_out_of_scope_1
120
	mov	esi,_symbol_out_of_scope_1
121
	call	copy_asciiz
121
	call	copy_asciiz
122
	cmp	[error_info],0
122
	cmp	[error_info],0
123
	je	finish_symbol_out_of_scope_message
123
	je	finish_symbol_out_of_scope_message
124
	mov	byte [edi-1],20h
124
	mov	byte [edi-1],20h
125
	call	write_quoted_symbol_name
125
	call	write_quoted_symbol_name
126
    finish_symbol_out_of_scope_message:
126
    finish_symbol_out_of_scope_message:
127
	mov	byte [edi-1],20h
127
	mov	byte [edi-1],20h
128
	mov	esi,_symbol_out_of_scope_2
128
	mov	esi,_symbol_out_of_scope_2
129
	call	copy_asciiz
129
	call	copy_asciiz
130
	push	message
130
	push	message
131
	jmp	assembler_error
131
	jmp	assembler_error
132
invalid_use_of_symbol:
132
invalid_use_of_symbol:
133
	push	_invalid_use_of_symbol
133
	push	_invalid_use_of_symbol
134
	jmp	assembler_error
134
	jmp	assembler_error
135
name_too_long:
135
name_too_long:
136
	push	_name_too_long
136
	push	_name_too_long
137
	jmp	assembler_error
137
	jmp	assembler_error
138
invalid_name:
138
invalid_name:
139
	push	_invalid_name
139
	push	_invalid_name
140
	jmp	assembler_error
140
	jmp	assembler_error
141
reserved_word_used_as_symbol:
141
reserved_word_used_as_symbol:
142
	push	_reserved_word_used_as_symbol
142
	push	_reserved_word_used_as_symbol
143
	jmp	assembler_error
143
	jmp	assembler_error
144
symbol_already_defined:
144
symbol_already_defined:
145
	push	_symbol_already_defined
145
	push	_symbol_already_defined
146
	jmp	assembler_error
146
	jmp	assembler_error
147
missing_end_quote:
147
missing_end_quote:
148
	push	_missing_end_quote
148
	push	_missing_end_quote
149
	jmp	assembler_error
149
	jmp	assembler_error
150
missing_end_directive:
150
missing_end_directive:
151
	push	_missing_end_directive
151
	push	_missing_end_directive
152
	jmp	assembler_error
152
	jmp	assembler_error
153
unexpected_instruction:
153
unexpected_instruction:
154
	push	_unexpected_instruction
154
	push	_unexpected_instruction
155
	jmp	assembler_error
155
	jmp	assembler_error
156
extra_characters_on_line:
156
extra_characters_on_line:
157
	push	_extra_characters_on_line
157
	push	_extra_characters_on_line
158
	jmp	assembler_error
158
	jmp	assembler_error
159
section_not_aligned_enough:
159
section_not_aligned_enough:
160
	push	_section_not_aligned_enough
160
	push	_section_not_aligned_enough
161
	jmp	assembler_error
161
	jmp	assembler_error
162
setting_already_specified:
162
setting_already_specified:
163
	push	_setting_already_specified
163
	push	_setting_already_specified
164
	jmp	assembler_error
164
	jmp	assembler_error
165
data_already_defined:
165
data_already_defined:
166
	push	_data_already_defined
166
	push	_data_already_defined
167
	jmp	assembler_error
167
	jmp	assembler_error
168
too_many_repeats:
168
too_many_repeats:
169
	push	_too_many_repeats
169
	push	_too_many_repeats
170
	jmp	assembler_error
170
	jmp	assembler_error
171
171
invoked_error:
-
 
172
	push	_invoked_error
-
 
173
	jmp	assembler_error
-
 
174
172
175