paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-31 22:49:35 +01:00
Code Issues Packages Projects Releases Wiki Activity

* disabled low-level hack test for LLVM

Browse Source 
git-svn-id: trunk@42102 -
This commit is contained in:
Jonas Maebe 2019-05-19 19:20:38 +00:00
parent 4c34b7b67d
commit 15532e5277
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
tests/tbs/tb0508.pp
View File

@ -1,5 +1,7 @@
{ inlining is not compatible with get_caller_frame/get_frame } { inlining is not compatible with get_caller_frame/get_frame }
{$inline off} {$inline off}
{$ifndef cpullvm}
type type
PointerLocal = procedure(_EBP: Pointer); PointerLocal = procedure(_EBP: Pointer);
@ -44,3 +46,8 @@ var
begin begin
t1; t1;
end. end.
{$else ndef cpullvm}
begin
{ this kind of hacks can never work on llvm }
end.
{$endif cpullvm}