浏览代码

* remove uses strings, strlen/strpas are in system unit

git-svn-id: trunk@9826 -
peter 17 年之前
父节点
当前提交
37e509f290
共有 1 个文件被更改,包括 4 次插入2 次删除
  1. 4 2
      rtl/unix/unix.pp

+ 4 - 2
rtl/unix/unix.pp

@@ -151,8 +151,10 @@ procedure SigRaise (sig:integer); deprecated;
 
 Implementation
 
-Uses UnixUtil,  // tzseconds
-     Strings {$ifndef FPC_USE_LIBC},Syscall{$endif};
+Uses 
+  UnixUtil  // tzseconds
+  {$ifndef FPC_USE_LIBC},Syscall{$endif}
+  ;
 
 {$i unxovl.inc}