diff options
Diffstat (limited to 'tests/projects/pascal/static/src')
| -rw-r--r-- | tests/projects/pascal/static/src/foo.pas | 18 | ||||
| -rw-r--r-- | tests/projects/pascal/static/src/main.pas | 12 |
2 files changed, 0 insertions, 30 deletions
diff --git a/tests/projects/pascal/static/src/foo.pas b/tests/projects/pascal/static/src/foo.pas deleted file mode 100644 index 1fb4d7d6e..000000000 --- a/tests/projects/pascal/static/src/foo.pas +++ /dev/null @@ -1,18 +0,0 @@ -library foo; - -{$mode objfpc}{$H+} - -function fib(n : Int64) : Int64; cdecl; -begin - if n > 1 then - begin - Result := fib(n - 1) + fib(n - 2); - end - else - Result := 1; -end; - -exports - fib; -end. - diff --git a/tests/projects/pascal/static/src/main.pas b/tests/projects/pascal/static/src/main.pas deleted file mode 100644 index ce34e4af9..000000000 --- a/tests/projects/pascal/static/src/main.pas +++ /dev/null @@ -1,12 +0,0 @@ -program hello; - -function fib(n: Int64): Int64; - cdecl; external 'foo'; - -var - Value: Integer; -begin - Value := 5; - WriteLn(fib(Value)); -end. - |
