paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 09:09:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ added "nostackframe" to routine with code that should assemble into

Browse Source 
a single instruction

git-svn-id: trunk@25585 -
This commit is contained in:
Jonas Maebe 2013-09-27 15:06:48 +00:00
parent 48250dcafd
commit 8e107217f6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tests/webtbs/tw19910.pp
View File

@ -1,11 +1,11 @@
{ %cpu=i386 } { %cpu=i386 }
procedure p1;assembler; procedure p1;assembler;nostackframe;
asm asm
INSERTQ $1,$3,%xmm0,%xmm1 INSERTQ $1,$3,%xmm0,%xmm1
end; end;
{$asmmode intel} {$asmmode intel}
procedure p2;assembler; procedure p2;assembler;nostackframe;
asm asm
INSERTQ xmm1,xmm0,3,1 INSERTQ xmm1,xmm0,3,1
end; end;