mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-29 19:41:18 +02:00
* don't use asm directly for main
This commit is contained in:
parent
8473dada93
commit
692cf241a8
@ -8,9 +8,11 @@
|
|||||||
|
|
||||||
var
|
var
|
||||||
buf : array[0..255] of char;
|
buf : array[0..255] of char;
|
||||||
asm
|
begin
|
||||||
|
asm
|
||||||
lea ebx,buf
|
lea ebx,buf
|
||||||
add ebx,'('
|
add ebx,'('
|
||||||
mov al, [ebx - '(']
|
mov al, [ebx - '(']
|
||||||
|
end;
|
||||||
end.
|
end.
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user