Преглед изворни кода

* more deprecations. Copies of stringtypes usually defined in unit dos, but
that are no longer needed.

git-svn-id: trunk@21358 -

marco пре 13 година
родитељ
комит
043ff2c81c
1 измењених фајлова са 5 додато и 5 уклоњено
  1. 5 5
      rtl/unix/unixutil.pp

+ 5 - 5
rtl/unix/unixutil.pp

@@ -20,11 +20,11 @@ var
   Tzseconds : Longint;
 
 Type
-  ComStr  = String[255];
-  PathStr = String[255];
-  DirStr  = String[255];
-  NameStr = String[255];
-  ExtStr  = String[255];
+  ComStr  = String[255] deprecated 'Clean up shortstring use, or use same type from unit dos.';
+  PathStr = String[255] deprecated 'Clean up shortstring use, or use same type from unit dos.';
+  DirStr  = String[255] deprecated 'Clean up shortstring use, or use same type from unit dos.';
+  NameStr = String[255] deprecated 'Clean up shortstring use, or use same type from unit dos.';
+  ExtStr  = String[255] deprecated 'Clean up shortstring use, or use same type from unit dos.';
 
 Function Dirname(Const path:pathstr):pathstr; deprecated;
 Function StringToPPChar(S: PChar;ReserveEntries:integer):ppchar;