improve rpath for fpc

2 files changed, 2 insertions, 2 deletions

diff --git a/tests/projects/pascal/shared/src/foo.pas b/tests/projects/pascal/shared/src/foo.pas
index 2d12d39f5..d1952cf21 100644
--- a/tests/projects/pascal/shared/src/foo.pas
+++ b/tests/projects/pascal/shared/src/foo.pas
@@ -1,4 +1,4 @@
-library subs;
+library foo;
 
 function SubStr(CString: PChar;FromPos,ToPos: Longint): PChar; cdecl;
 
diff --git a/tests/projects/pascal/shared/src/main.pas b/tests/projects/pascal/shared/src/main.pas
index 9ee983a12..ccf2e179b 100644
--- a/tests/projects/pascal/shared/src/main.pas
+++ b/tests/projects/pascal/shared/src/main.pas
@@ -1,7 +1,7 @@
 uses strings;
 
 function SubStr(const CString: PChar; FromPos, ToPos: longint): PChar;
-  cdecl; external 'subs';
+  cdecl; external 'foo';
 
 var
   s: PChar;