hedgewars/pas2cSystem.pas
changeset 6873 30840365af0a
parent 6860 f4238c683ec7
child 6891 ab9843957664
--- a/hedgewars/pas2cSystem.pas	Mon Apr 09 22:01:13 2012 +0400
+++ b/hedgewars/pas2cSystem.pas	Mon Apr 09 22:01:36 2012 +0400
@@ -17,7 +17,6 @@
     Int = integer;
 
     pointer = pointer;
-    PChar = pointer;
 
     float = float;
     single = float;
@@ -36,6 +35,7 @@
     widechar = string;
 
     char = char;
+    PChar = ^char;
     
     PByte = ^Byte;
     PLongInt = ^LongInt;