2 files changed, 24 insertions, 2 deletions
diff --git a/src/corelib/render/software/platform/linux/agg_linux_mini_libc.pas b/src/corelib/render/software/platform/linux/agg_linux_mini_libc.pas
new file mode 100644
index 00000000..314983f1
--- /dev/null
+++ b/src/corelib/render/software/platform/linux/agg_linux_mini_libc.pas
@@ -0,0 +1,21 @@
+unit agg_linux_mini_libc;
+
+{$mode delphi}
+
+interface
+
+uses
+  ctypes;
+
+const
+  clib = 'c';
+  CLOCKS_PER_SEC = 1000000;
+type
+  clock_t = clong;
+
+function clock:clock_t;cdecl;external clib name 'clock';
+
+implementation
+
+end.
+
diff --git a/src/corelib/render/software/platform/linux/agg_platform_support.pas b/src/corelib/render/software/platform/linux/agg_platform_support.pas
index c82fae89..bbe3e832 100644
--- a/src/corelib/render/software/platform/linux/agg_platform_support.pas
+++ b/src/corelib/render/software/platform/linux/agg_platform_support.pas
@@ -58,7 +58,8 @@ INTERFACE
 {$I agg_mode.inc }
 {$I- }
 uses
- X ,Xlib ,Xutil ,Xatom ,keysym ,libc ,CTypes ,SysUtils ,
+ X ,Xlib ,Xutil ,Xatom ,keysym ,CTypes ,SysUtils ,
+ agg_linux_mini_libc ,
  agg_basics ,
  agg_ctrl ,
  agg_rendering_buffer ,
@@ -1015,7 +1016,7 @@ begin
 
  p:=p + #0;
 
- libc.__chdir(PChar(@p[1 ] ) );
+ SetCurrentDir(p);
 
 end;