Commit 628d20cc authored by Tomasz Buchert's avatar Tomasz Buchert

New upstream version 1.73.02

parent 36cecaf1
No preview for this file type
No preview for this file type
......@@ -334,7 +334,6 @@ fatal_error:
mov al,0FFh
jmp exit_program
assembler_error:
and [output_file],0
call display_user_messages
mov ebx,[current_line]
test ebx,ebx
......
......@@ -186,6 +186,9 @@ lseek:
mov dl,al
mov eax,19
int 0x80
cmp eax,-1
je file_error
clc
ret
display_string:
......@@ -284,7 +287,6 @@ fatal_error:
jmp exit_program
assembler_error:
mov [con_handle],2
and [output_file],0
call display_user_messages
mov ebx,[current_line]
test ebx,ebx
......
......@@ -220,6 +220,9 @@ lseek:
syscall
mov esi,r12d
mov edi,r13d
cmp eax,-1
je file_error
clc
ret
display_string:
......@@ -318,7 +321,6 @@ fatal_error:
jmp exit_program
assembler_error:
mov [con_handle],2
and [output_file],0
call display_user_messages
mov ebx,[current_line]
test ebx,ebx
......
......@@ -187,6 +187,9 @@ lseek:
push edx
push ebx
call [SetFilePointer]
cmp eax,-1
je file_error
clc
ret
display_string:
......@@ -314,7 +317,6 @@ fatal_error:
jmp exit_program
assembler_error:
mov [con_handle],STD_ERROR_HANDLE
and [output_file],0
call display_user_messages
mov ebx,[current_line]
test ebx,ebx
......
......@@ -938,6 +938,7 @@ virtual_directive:
add esi,3+4
add [ebx+18h],ecx
mov [ebx+20h],ecx
or byte [ebx+0Ah],2
push ebx
mov ebx,characters
get_extension:
......
......@@ -131,9 +131,16 @@ lseek:
push ebx
movzx eax,al
ccall fseek,ebx,edx,eax
test eax,eax
jnz lseek_error
mov ebx,[esp]
ccall ftell,ebx
pop ebx
clc
ret
lseek_error:
pop ebx
stc
ret
display_string:
......@@ -220,7 +227,6 @@ fatal_error:
jmp exit_program
assembler_error:
mov [con_handle],2
and [output_file],0
call display_user_messages
mov ebx,[current_line]
test ebx,ebx
......
......@@ -33,7 +33,7 @@
; cannot simply be copied and put under another distribution licence
; (including the GNU Public Licence).
VERSION_STRING equ "1.73.01"
VERSION_STRING equ "1.73.02"
VERSION_MAJOR = 1
VERSION_MINOR = 73
......@@ -2,6 +2,11 @@
Visit http://flatassembler.net/ for more information.
version 1.73.02 (Dec 16, 2017)
[-] Fixed a bug in the storage of "virtual as" blocks.
version 1.73.01 (Nov 25, 2017)
[+] Added virtual block continuation syntax (backported from flat assembler g).
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment