* PChar -> PAnsiChar

packages/libc/src/aineth.inc

@@ -1,19 +1,19 @@
 
 
-function inet_addr(__cp:Pchar):in_addr_t;cdecl;external clib name 'inet_addr';
+function inet_addr(__cp:PAnsiChar):in_addr_t;cdecl;external clib name 'inet_addr';
 function inet_lnaof(__in:in_addr):in_addr_t;cdecl;external clib name 'inet_lnaof';
 function inet_makeaddr(__net:in_addr_t; __host:in_addr_t): in_addr_t;cdecl;external clib name 'inet_makeaddr';
 function inet_netof(__in:in_addr):in_addr_t;cdecl;external clib name 'inet_netof';
-function inet_network(__cp:Pchar):in_addr_t;cdecl;external clib name 'inet_network';
-function inet_ntoa(__in:in_addr):Pchar;cdecl;external clib name 'inet_ntoa';
-function inet_pton(__af:longint; __cp:Pchar; __buf:pointer):longint;cdecl;external clib name 'inet_pton';
-function inet_ntop(__af:longint; __cp:pointer; __buf:Pchar; __len:socklen_t):Pchar;cdecl;external clib name 'inet_ntop';
-function inet_aton(__cp:Pchar; __inp:Pin_addr):in_addr_t;cdecl;external clib name 'inet_aton';
-function inet_neta(__net:in_addr_t; __buf:Pchar; __len:size_t):Pchar;cdecl;external clib name 'inet_neta';
-function inet_net_ntop(__af:longint; __cp:pointer; __bits:longint; __buf:Pchar; __len:size_t):Pchar;cdecl;external clib name 'inet_net_ntop';
-function inet_net_pton(__af:longint; __cp:Pchar; __buf:pointer; __len:size_t):longint;cdecl;external clib name 'inet_net_pton';
-function inet_nsap_addr(__cp:Pchar; __buf:Pbyte; __len:longint):dword;cdecl;external clib name 'inet_nsap_addr';
-function inet_nsap_ntoa(__len:longint; __cp:Pbyte; __buf:Pchar):Pchar;cdecl;external clib name 'inet_nsap_ntoa';
+function inet_network(__cp:PAnsiChar):in_addr_t;cdecl;external clib name 'inet_network';
+function inet_ntoa(__in:in_addr):PAnsiChar;cdecl;external clib name 'inet_ntoa';
+function inet_pton(__af:longint; __cp:PAnsiChar; __buf:pointer):longint;cdecl;external clib name 'inet_pton';
+function inet_ntop(__af:longint; __cp:pointer; __buf:PAnsiChar; __len:socklen_t):PAnsiChar;cdecl;external clib name 'inet_ntop';
+function inet_aton(__cp:PAnsiChar; __inp:Pin_addr):in_addr_t;cdecl;external clib name 'inet_aton';
+function inet_neta(__net:in_addr_t; __buf:PAnsiChar; __len:size_t):PAnsiChar;cdecl;external clib name 'inet_neta';
+function inet_net_ntop(__af:longint; __cp:pointer; __bits:longint; __buf:PAnsiChar; __len:size_t):PAnsiChar;cdecl;external clib name 'inet_net_ntop';
+function inet_net_pton(__af:longint; __cp:PAnsiChar; __buf:pointer; __len:size_t):longint;cdecl;external clib name 'inet_net_pton';
+function inet_nsap_addr(__cp:PAnsiChar; __buf:Pbyte; __len:longint):dword;cdecl;external clib name 'inet_nsap_addr';
+function inet_nsap_ntoa(__len:longint; __cp:Pbyte; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'inet_nsap_ntoa';
 
 
 { ---------------------------------------------------------------------
@@ -21,4 +21,4 @@ function inet_nsap_ntoa(__len:longint; __cp:Pbyte; __buf:Pchar):Pchar;cdecl;exte
   ---------------------------------------------------------------------}
 
 // Type
-function inet_aton(__cp:Pchar; var __inp:in_addr):in_addr_t;cdecl;external clib name 'inet_aton';
+function inet_aton(__cp:PAnsiChar; var __inp:in_addr):in_addr_t;cdecl;external clib name 'inet_aton';

packages/libc/src/aioh.inc

@@ -15,8 +15,8 @@ type
        __error_code : longint;
        __return_value : __ssize_t;
        aio_offset : __off_t;
-       __pad : array[0..((sizeof(__off64_t)) - (sizeof(__off_t)))-1] of char;
-       __unused : array[0..31] of char;
+       __pad : array[0..((sizeof(__off64_t)) - (sizeof(__off_t)))-1] of AnsiChar;
+       __unused : array[0..31] of AnsiChar;
     end;
   PPaiocb = ^Paiocb;
 
@@ -34,7 +34,7 @@ type
        __error_code : longint;
        __return_value : __ssize_t;
        aio_offset : __off64_t;
-       __unused : array[0..31] of char;
+       __unused : array[0..31] of AnsiChar;
     end;
   PPaiocb64 = ^Paiocb64;
 

packages/libc/src/aliasesh.inc

@@ -2,9 +2,9 @@
 type
  Paliasent = ^aliasent;
  aliasent = record
-   alias_name : Pchar;
+   alias_name : PAnsiChar;
    alias_members_len : size_t;
-   alias_members : ^Pchar;
+   alias_members : ^PAnsiChar;
    alias_local : longint;
  end;
  PPaliasent = ^Paliasent;
@@ -12,9 +12,9 @@ type
 procedure setaliasent;cdecl;external clib name 'setaliasent';
 procedure endaliasent;cdecl;external clib name 'endaliasent';
 function getaliasent:Paliasent;cdecl;external clib name 'getaliasent';
-function getaliasent_r(__result_buf:Paliasent; __buffer:Pchar; __buflen:size_t; __result:PPaliasent):longint;cdecl;external clib name 'getaliasent_r';
-function getaliasbyname(__name:Pchar):Paliasent;cdecl;external clib name 'getaliasbyname';
-function getaliasbyname_r(__name:Pchar; __result_buf:Paliasent; __buffer:Pchar; __buflen:size_t; __result:PPaliasent):longint;cdecl;external clib name 'getaliasbyname_r';
+function getaliasent_r(__result_buf:Paliasent; __buffer:PAnsiChar; __buflen:size_t; __result:PPaliasent):longint;cdecl;external clib name 'getaliasent_r';
+function getaliasbyname(__name:PAnsiChar):Paliasent;cdecl;external clib name 'getaliasbyname';
+function getaliasbyname_r(__name:PAnsiChar; __result_buf:Paliasent; __buffer:PAnsiChar; __buflen:size_t; __result:PPaliasent):longint;cdecl;external clib name 'getaliasbyname_r';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
@@ -24,5 +24,5 @@ Type
   TAliasEntry = aliasent;
   PAliasEntry = ^TAliasEntry;
 
-function getaliasent_r(var __result_buf:aliasent; __buffer:Pchar; __buflen:size_t; var __result:Paliasent):longint;cdecl;external clib name 'getaliasent_r';
-function getaliasbyname_r(__name:Pchar; var __result_buf:aliasent; __buffer:Pchar; __buflen:size_t; var __result:Paliasent):longint;cdecl;external clib name 'getaliasbyname_r';
+function getaliasent_r(var __result_buf:aliasent; __buffer:PAnsiChar; __buflen:size_t; var __result:Paliasent):longint;cdecl;external clib name 'getaliasent_r';
+function getaliasbyname_r(__name:PAnsiChar; var __result_buf:aliasent; __buffer:PAnsiChar; __buflen:size_t; var __result:Paliasent):longint;cdecl;external clib name 'getaliasbyname_r';

packages/libc/src/argph.inc

@@ -2,11 +2,11 @@
 type
    Pargp_option = ^argp_option;
    argp_option = record
-        name : Pchar;
+        name : PAnsiChar;
         key : longint;
-        arg : Pchar;
+        arg : PAnsiChar;
         flags : longint;
-        doc : Pchar;
+        doc : PAnsiChar;
         group : longint;
      end;
 
@@ -48,31 +48,31 @@ type
   Pargp_state = ^argp_state;
   Pargp_child = ^argp_child;
 
-  argp_parser_t = function (key:longint; arg:Pchar; state:Pargp_state):error_t;cdecl;
+  argp_parser_t = function (key:longint; arg:PAnsiChar; state:Pargp_state):error_t;cdecl;
 
    Pargp = ^argp;
    argp = record
         options : Pargp_option;
         parser : argp_parser_t;
-        args_doc : Pchar;
-        doc : Pchar;
+        args_doc : PAnsiChar;
+        doc : PAnsiChar;
         children : Pargp_child;
-        help_filter : function (__key:longint; __text:Pchar; __input:pointer):Pchar;
-        argp_domain : Pchar;
+        help_filter : function (__key:longint; __text:PAnsiChar; __input:pointer):PAnsiChar;
+        argp_domain : PAnsiChar;
      end;
 
 
    argp_child = record
         argp : Pargp;
         flags : longint;
-        header : Pchar;
+        header : PAnsiChar;
         group : longint;
      end;
 
    argp_state = record
         root_argp : Pargp;
         argc : longint;
-        argv : ^Pchar;
+        argv : ^PAnsiChar;
         next : longint;
         flags : dword;
         arg_num : dword;
@@ -80,7 +80,7 @@ type
         input : pointer;
         child_inputs : ^pointer;
         hook : pointer;
-        name : Pchar;
+        name : PAnsiChar;
         err_stream : PFILE;
         out_stream : PFILE;
         pstate : pointer;
@@ -91,14 +91,14 @@ type
 
 
 
-function argp_parse(__argp:Pargp; __argc:longint; __argv:PPchar; __flags:dword; __arg_index:Plongint;
+function argp_parse(__argp:Pargp; __argc:longint; __argv:PPAnsiChar; __flags:dword; __arg_index:Plongint;
            __input:pointer):error_t;cdecl;external clib name 'argp_parse';
-function __argp_parse(__argp:Pargp; __argc:longint; __argv:PPchar; __flags:dword; __arg_index:Plongint;
+function __argp_parse(__argp:Pargp; __argc:longint; __argv:PPAnsiChar; __flags:dword; __arg_index:Plongint;
            __input:pointer):error_t;cdecl;external clib name '__argp_parse';
 var
-  argp_program_version : Pchar;cvar;external;
+  argp_program_version : PAnsiChar;cvar;external;
   argp_program_version_hook : TArgPProgramVersionHook;cvar;external;
-  argp_program_bug_address : Pchar;cvar;external;
+  argp_program_bug_address : PAnsiChar;cvar;external;
   argp_err_exit_status : error_t;cvar;external;
 
 const
@@ -117,20 +117,20 @@ const
    ARGP_HELP_STD_USAGE = (ARGP_HELP_SHORT_USAGE or ARGP_HELP_SEE) or ARGP_HELP_EXIT_ERR;
    ARGP_HELP_STD_HELP = (((ARGP_HELP_SHORT_USAGE or ARGP_HELP_LONG) or ARGP_HELP_EXIT_OK) or ARGP_HELP_DOC) or ARGP_HELP_BUG_ADDR;
 
-procedure argp_help(__argp:Pargp; __stream:PFILE; __flags:dword; __name:Pchar);cdecl;external clib name 'argp_help';
-procedure __argp_help(__argp:Pargp; __stream:PFILE; __flags:dword; __name:Pchar);cdecl;external clib name '__argp_help';
+procedure argp_help(__argp:Pargp; __stream:PFILE; __flags:dword; __name:PAnsiChar);cdecl;external clib name 'argp_help';
+procedure __argp_help(__argp:Pargp; __stream:PFILE; __flags:dword; __name:PAnsiChar);cdecl;external clib name '__argp_help';
 procedure argp_state_help(__state:Pargp_state; __stream:PFILE; __flags:dword);cdecl;external clib name 'argp_state_help';
 procedure __argp_state_help(__state:Pargp_state; __stream:PFILE; __flags:dword);cdecl;external clib name '__argp_state_help';
 procedure argp_usage(__state:Pargp_state);cdecl;external clib name 'argp_usage';
 procedure __argp_usage(__state:Pargp_state);cdecl;external clib name '__argp_usage';
-procedure argp_error(__state:Pargp_state; __fmt:Pchar; args:array of const);cdecl;external clib name 'argp_error';
-procedure argp_error(__state:Pargp_state; __fmt:Pchar);cdecl;varargs;external clib name 'argp_error';
-procedure __argp_error(__state:Pargp_state; __fmt:Pchar; args:array of const);cdecl;external clib name '__argp_error';
-procedure __argp_error(__state:Pargp_state; __fmt:Pchar);cdecl;varargs;external clib name '__argp_error';
-procedure argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:Pchar; args:array of const);cdecl;external clib name 'argp_failure';
-procedure argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:Pchar);cdecl;varargs;external clib name 'argp_failure';
-procedure __argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:Pchar; args:array of const);cdecl;external clib name '__argp_failure';
-procedure __argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:Pchar);cdecl;varargs;external clib name '__argp_failure';
+procedure argp_error(__state:Pargp_state; __fmt:PAnsiChar; args:array of const);cdecl;external clib name 'argp_error';
+procedure argp_error(__state:Pargp_state; __fmt:PAnsiChar);cdecl;varargs;external clib name 'argp_error';
+procedure __argp_error(__state:Pargp_state; __fmt:PAnsiChar; args:array of const);cdecl;external clib name '__argp_error';
+procedure __argp_error(__state:Pargp_state; __fmt:PAnsiChar);cdecl;varargs;external clib name '__argp_error';
+procedure argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:PAnsiChar; args:array of const);cdecl;external clib name 'argp_failure';
+procedure argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:PAnsiChar);cdecl;varargs;external clib name 'argp_failure';
+procedure __argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:PAnsiChar; args:array of const);cdecl;external clib name '__argp_failure';
+procedure __argp_failure(__state:Pargp_state; __status:longint; __errnum:longint; __fmt:PAnsiChar);cdecl;varargs;external clib name '__argp_failure';
 function _option_is_short(__opt:Pargp_option):longint;cdecl;external clib name '_option_is_short';
 function __option_is_short(__opt:Pargp_option):longint;cdecl;external clib name '__option_is_short';
 function _option_is_end(__opt:Pargp_option):longint;cdecl;external clib name '_option_is_end';

packages/libc/src/argzh.inc

@@ -4,18 +4,18 @@ type
 
    Perror_t = ^error_t;
 
-function argz_create(__argv:PPchar; __argz:PPchar; __len:Psize_t):error_t;cdecl;external clib name 'argz_create';
-function argz_create_sep(__string:Pchar; __sep:longint; __argz:PPchar; __len:Psize_t):error_t;cdecl;external clib name 'argz_create_sep';
-function argz_count(__argz:Pchar; __len:size_t):size_t;cdecl;external clib name 'argz_count';
-procedure argz_extract(__argz:Pchar; __len:size_t; __argv:PPchar);cdecl;external clib name 'argz_extract';
-procedure argz_stringify(__argz:Pchar; __len:size_t; __sep:longint);cdecl;external clib name 'argz_stringify';
-function argz_append(__argz:PPchar; __argz_len:Psize_t; __buf:Pchar; __buf_len:size_t):error_t;cdecl;external clib name 'argz_append';
-function argz_add(__argz:PPchar; __argz_len:Psize_t; __str:Pchar):error_t;cdecl;external clib name 'argz_add';
-function argz_add_sep(__argz:PPchar; __argz_len:Psize_t; __string:Pchar; __delim:longint):error_t;cdecl;external clib name 'argz_add_sep';
-procedure argz_delete(__argz:PPchar; __argz_len:Psize_t; __entry:Pchar);cdecl;external clib name 'argz_delete';
-function argz_insert(__argz:PPchar; __argz_len:Psize_t; __before:Pchar; __entry:Pchar):error_t;cdecl;external clib name 'argz_insert';
-function argz_replace(__argz:PPchar; __argz_len:Psize_t; __str:Pchar; __with:Pchar; __replace_count:Pdword):error_t;cdecl;external clib name 'argz_replace';
-function argz_next(__argz:Pchar; __argz_len:size_t; __entry:Pchar):Pchar;cdecl;external clib name 'argz_next';
+function argz_create(__argv:PPAnsiChar; __argz:PPAnsiChar; __len:Psize_t):error_t;cdecl;external clib name 'argz_create';
+function argz_create_sep(__string:PAnsiChar; __sep:longint; __argz:PPAnsiChar; __len:Psize_t):error_t;cdecl;external clib name 'argz_create_sep';
+function argz_count(__argz:PAnsiChar; __len:size_t):size_t;cdecl;external clib name 'argz_count';
+procedure argz_extract(__argz:PAnsiChar; __len:size_t; __argv:PPAnsiChar);cdecl;external clib name 'argz_extract';
+procedure argz_stringify(__argz:PAnsiChar; __len:size_t; __sep:longint);cdecl;external clib name 'argz_stringify';
+function argz_append(__argz:PPAnsiChar; __argz_len:Psize_t; __buf:PAnsiChar; __buf_len:size_t):error_t;cdecl;external clib name 'argz_append';
+function argz_add(__argz:PPAnsiChar; __argz_len:Psize_t; __str:PAnsiChar):error_t;cdecl;external clib name 'argz_add';
+function argz_add_sep(__argz:PPAnsiChar; __argz_len:Psize_t; __string:PAnsiChar; __delim:longint):error_t;cdecl;external clib name 'argz_add_sep';
+procedure argz_delete(__argz:PPAnsiChar; __argz_len:Psize_t; __entry:PAnsiChar);cdecl;external clib name 'argz_delete';
+function argz_insert(__argz:PPAnsiChar; __argz_len:Psize_t; __before:PAnsiChar; __entry:PAnsiChar):error_t;cdecl;external clib name 'argz_insert';
+function argz_replace(__argz:PPAnsiChar; __argz_len:Psize_t; __str:PAnsiChar; __with:PAnsiChar; __replace_count:Pdword):error_t;cdecl;external clib name 'argz_replace';
+function argz_next(__argz:PAnsiChar; __argz_len:size_t; __entry:PAnsiChar):PAnsiChar;cdecl;external clib name 'argz_next';
 
 
 { ---------------------------------------------------------------------
@@ -23,11 +23,11 @@ function argz_next(__argz:Pchar; __argz_len:size_t; __entry:Pchar):Pchar;cdecl;e
   ---------------------------------------------------------------------}
 
 // Type
-function argz_create(__argv:PPchar; var __argz: Pchar; var __len: size_t):error_t;cdecl;external clib name 'argz_create';
-function argz_create_sep(__string:Pchar; __sep:longint; var __argz: Pchar; var __len: size_t):error_t;cdecl;external clib name 'argz_create_sep';
-function argz_append(var __argz: Pchar; var __argz_len: size_t; __buf:Pchar; __buf_len:size_t):error_t;cdecl;external clib name 'argz_append';
-function argz_add(var __argz: Pchar; var __argz_len: size_t; __str:Pchar):error_t;cdecl;external clib name 'argz_add';
-function argz_add_sep(var __argz: Pchar; var __argz_len: size_t; __string:Pchar; __delim:longint):error_t;cdecl;external clib name 'argz_add_sep';
-procedure argz_delete(var __argz: Pchar; var __argz_len: size_t; __entry:Pchar);cdecl;external clib name 'argz_delete';
-function argz_insert(var __argz: Pchar; var __argz_len: size_t; __before:Pchar; __entry:Pchar):error_t;cdecl;external clib name 'argz_insert';
-function argz_replace(var __argz: Pchar; var __argz_len: size_t; __str:Pchar; __with:Pchar; __replace_count:Pdword):error_t;cdecl;external clib name 'argz_replace';
+function argz_create(__argv:PPAnsiChar; var __argz: PAnsiChar; var __len: size_t):error_t;cdecl;external clib name 'argz_create';
+function argz_create_sep(__string:PAnsiChar; __sep:longint; var __argz: PAnsiChar; var __len: size_t):error_t;cdecl;external clib name 'argz_create_sep';
+function argz_append(var __argz: PAnsiChar; var __argz_len: size_t; __buf:PAnsiChar; __buf_len:size_t):error_t;cdecl;external clib name 'argz_append';
+function argz_add(var __argz: PAnsiChar; var __argz_len: size_t; __str:PAnsiChar):error_t;cdecl;external clib name 'argz_add';
+function argz_add_sep(var __argz: PAnsiChar; var __argz_len: size_t; __string:PAnsiChar; __delim:longint):error_t;cdecl;external clib name 'argz_add_sep';
+procedure argz_delete(var __argz: PAnsiChar; var __argz_len: size_t; __entry:PAnsiChar);cdecl;external clib name 'argz_delete';
+function argz_insert(var __argz: PAnsiChar; var __argz_len: size_t; __before:PAnsiChar; __entry:PAnsiChar):error_t;cdecl;external clib name 'argz_insert';
+function argz_replace(var __argz: PAnsiChar; var __argz_len: size_t; __str:PAnsiChar; __with:PAnsiChar; __replace_count:Pdword):error_t;cdecl;external clib name 'argz_replace';

packages/libc/src/bdirenth.inc

@@ -6,7 +6,7 @@ type
         d_off : __off_t;
         d_reclen : word;
         d_type : byte;
-        d_name : array[0..255] of char;
+        d_name : array[0..255] of AnsiChar;
      end;
 
 type
@@ -16,7 +16,7 @@ type
         d_off : __off64_t;
         d_reclen : word;
         d_type : byte;
-        d_name : array[0..255] of char;
+        d_name : array[0..255] of AnsiChar;
      end;
 
 

packages/libc/src/binh.inc

@@ -32,7 +32,7 @@ type
    Pip_opts = ^ip_opts;
    ip_opts = record
         ip_dst : in_addr;
-        ip_opts : array[0..39] of char;
+        ip_opts : array[0..39] of AnsiChar;
      end;
 
    Pip_mreq = ^ip_mreq;

packages/libc/src/bnetdbh.inc

@@ -2,8 +2,8 @@
 type
    Pnetent = ^netent;
    netent = record
-        n_name : Pchar;
-        n_aliases : ^Pchar;
+        n_name : PAnsiChar;
+        n_aliases : ^PAnsiChar;
         n_addrtype : longint;
         n_net : uint32_t;
      end;

packages/libc/src/bselecth.inc

@@ -35,7 +35,7 @@ in define line 37 *)
  in declarator_list *)
  in declarator_list *)
 (* error
-   ({register char __result;                                                  \
+   ({register AnsiChar __result;                                                  \
 (* error
      __asm__ ____ ("btl %1,%2 ; setcb %b0"                            \
 in declaration at line 54 *)

packages/libc/src/bsocketh.inc

@@ -104,20 +104,20 @@ type
     // Why borland decided to change it is a mystery to me :/
    sockaddr = record
      sa_family : sa_family_t ;
-     sa_data : array [0..13] of char;
+     sa_data : array [0..13] of AnsiChar;
    end;
  }
    // redefined as osockaddr.
    osockaddr = record
      sa_family : sa_family_t ;
-     sa_data : array [0..13] of char;
+     sa_data : array [0..13] of AnsiChar;
    end;
 
    Psockaddr_storage = ^sockaddr_storage;
    sockaddr_storage = record
       __ss__family : sa_family_t;
       __ss_align   : __ss_aligntype;
-      __ss_padding : array[0..(_SS_PADSIZE)-1] of char;
+      __ss_padding : array[0..(_SS_PADSIZE)-1] of AnsiChar;
    end;
 
 

packages/libc/src/bstroptsh.inc

@@ -82,7 +82,7 @@ type
    strbuf = record
         maxlen : longint;
         len : longint;
-        buf : Pchar;
+        buf : PAnsiChar;
      end;
 
    t_uscalar_t = __t_uscalar_t; // moved here from stropts.h
@@ -108,7 +108,7 @@ type
         ic_cmd : longint;
         ic_timout : longint;
         ic_len : longint;
-        ic_dp : Pchar;
+        ic_dp : PAnsiChar;
      end;
 
    Pstrrecvfd = ^strrecvfd;
@@ -116,12 +116,12 @@ type
         fd : longint;
         uid : uid_t;
         gid : gid_t;
-        __fill : array[0..7] of char;
+        __fill : array[0..7] of AnsiChar;
      end;
 
    Pstr_mlist = ^str_mlist;
    str_mlist = record
-        l_name : array[0..(FMNAMESZ + 1)-1] of char;
+        l_name : array[0..(FMNAMESZ + 1)-1] of AnsiChar;
      end;
 
    Pstr_list = ^str_list;

packages/libc/src/btermiosh.inc

@@ -2,7 +2,7 @@
 type
 
    Pcc_t = ^cc_t;
-   cc_t = char;
+   cc_t = AnsiChar;
 
    Pspeed_t = ^speed_t;
    speed_t = dword;

packages/libc/src/bustath.inc

@@ -4,8 +4,8 @@ type
    _ustat = record
      f_tfree : __daddr_t;
      f_tinode : __ino_t;
-     f_fname : array[0..5] of char;
-     f_fpack : array[0..5] of char;
+     f_fname : array[0..5] of AnsiChar;
+     f_fpack : array[0..5] of AnsiChar;
    end;
 
 

packages/libc/src/butmph.inc

@@ -8,8 +8,8 @@ type
    Plastlog = ^lastlog;
    lastlog = record
         ll_time : __time_t;
-        ll_line : array[0..(UT_LINESIZE)-1] of char;
-        ll_host : array[0..(UT_HOSTSIZE)-1] of char;
+        ll_line : array[0..(UT_LINESIZE)-1] of AnsiChar;
+        ll_host : array[0..(UT_HOSTSIZE)-1] of AnsiChar;
      end;
 
    Pexit_status = ^exit_status;
@@ -22,15 +22,15 @@ type
    utmp = record
         ut_type : smallint;
         ut_pid : pid_t;
-        ut_line : array[0..(UT_LINESIZE)-1] of char;
-        ut_id : array[0..3] of char;
-        ut_user : array[0..(UT_NAMESIZE)-1] of char;
-        ut_host : array[0..(UT_HOSTSIZE)-1] of char;
+        ut_line : array[0..(UT_LINESIZE)-1] of AnsiChar;
+        ut_id : array[0..3] of AnsiChar;
+        ut_user : array[0..(UT_NAMESIZE)-1] of AnsiChar;
+        ut_host : array[0..(UT_HOSTSIZE)-1] of AnsiChar;
         ut_exit : exit_status;
         ut_session : longint;
         ut_tv : timeval;
         ut_addr_v6 : array[0..3] of int32_t;
-        __unused : array[0..19] of char;
+        __unused : array[0..19] of AnsiChar;
      end;
    PPutmp = ^Putmp;
 

packages/libc/src/butmpxh.inc

@@ -19,15 +19,15 @@ type
   utmpx = record
     ut_type : smallint;
     ut_pid : __pid_t;
-    ut_line : array[0..(__UT_LINESIZE)-1] of char;
-    ut_id : array[0..3] of char;
-    ut_user : array[0..(__UT_NAMESIZE)-1] of char;
-    ut_host : array[0..(__UT_HOSTSIZE)-1] of char;
+    ut_line : array[0..(__UT_LINESIZE)-1] of AnsiChar;
+    ut_id : array[0..3] of AnsiChar;
+    ut_user : array[0..(__UT_NAMESIZE)-1] of AnsiChar;
+    ut_host : array[0..(__UT_HOSTSIZE)-1] of AnsiChar;
     ut_exit : __exit_status;
     ut_session : longint;
     ut_tv : timeval;
     ut_addr_v6 : array[0..3] of __int32_t;
-    __unused : array[0..19] of char;
+    __unused : array[0..19] of AnsiChar;
   end;
 
 { ---------------------------------------------------------------------

packages/libc/src/crypth.inc

@@ -1,28 +1,28 @@
 
 
 { defined earlier in unistdh.inc...
-function crypt(__key:Pchar; __salt:Pchar):Pchar;cdecl;external cryptlib name 'crypt';
-procedure setkey(__key:Pchar);cdecl;external cryptlib name 'setkey';
-procedure encrypt(__block:Pchar; __edflag:longint);cdecl;external cryptlib name 'encrypt';
+function crypt(__key:PAnsiChar; __salt:PAnsiChar):PAnsiChar;cdecl;external cryptlib name 'crypt';
+procedure setkey(__key:PAnsiChar);cdecl;external cryptlib name 'setkey';
+procedure encrypt(__block:PAnsiChar; __edflag:longint);cdecl;external cryptlib name 'encrypt';
 }
 type
    Pcrypt_data = ^crypt_data;
    crypt_data = record
-        keysched : array[0..(16 * 8)-1] of char;
-        sb0 : array[0..32767] of char;
-        sb1 : array[0..32767] of char;
-        sb2 : array[0..32767] of char;
-        sb3 : array[0..32767] of char;
-        crypt_3_buf : array[0..13] of char;
-        current_salt : array[0..1] of char;
+        keysched : array[0..(16 * 8)-1] of AnsiChar;
+        sb0 : array[0..32767] of AnsiChar;
+        sb1 : array[0..32767] of AnsiChar;
+        sb2 : array[0..32767] of AnsiChar;
+        sb3 : array[0..32767] of AnsiChar;
+        crypt_3_buf : array[0..13] of AnsiChar;
+        current_salt : array[0..1] of AnsiChar;
         current_saltbits : longint;
         direction : longint;
         initialized : longint;
      end;
 
-function crypt_r(__key:Pchar; __salt:Pchar; __data:Pcrypt_data):Pchar;cdecl;external cryptlib name 'crypt_r';
-procedure setkey_r(__key:Pchar; __data:Pcrypt_data);cdecl;external cryptlib name 'setkey_r';
-procedure encrypt_r(__block:Pchar; __edflag:longint; __data:Pcrypt_data);cdecl;external cryptlib name 'encrypt_r';
+function crypt_r(__key:PAnsiChar; __salt:PAnsiChar; __data:Pcrypt_data):PAnsiChar;cdecl;external cryptlib name 'crypt_r';
+procedure setkey_r(__key:PAnsiChar; __data:Pcrypt_data);cdecl;external cryptlib name 'setkey_r';
+procedure encrypt_r(__block:PAnsiChar; __edflag:longint; __data:Pcrypt_data);cdecl;external cryptlib name 'encrypt_r';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/direnth.inc

@@ -19,7 +19,7 @@ type
    __dirstream = DIR;
   PDIR = ^DIR;
 
-function opendir(__name:Pchar):PDIR;cdecl;external clib name 'opendir';
+function opendir(__name:PAnsiChar):PDIR;cdecl;external clib name 'opendir';
 function closedir(__dirp:PDIR):longint;cdecl;external clib name 'closedir';
 
 function readdir(__dirp:PDIR):Pdirent;cdecl;external clib name 'readdir';
@@ -42,11 +42,11 @@ Type
   TSelectorFunc64 = function(const p1: PDirEnt64): Integer; cdecl;
   TCompareFunc    = function(const p1, p2: Pointer): Integer; cdecl;
 
-function scandir(__dir:Pchar; __namelist:PPPdirent; __selector:TSelectorfunc; __cmp:TComparefunc):longint;cdecl;external clib name 'scandir';
-function scandir64(__dir:Pchar; __namelist:PPPdirent64; __selector:TSelectorFunc64; __cmp:TCompareFunc):longint;cdecl;external clib name 'scandir64';
+function scandir(__dir:PAnsiChar; __namelist:PPPdirent; __selector:TSelectorfunc; __cmp:TComparefunc):longint;cdecl;external clib name 'scandir';
+function scandir64(__dir:PAnsiChar; __namelist:PPPdirent64; __selector:TSelectorFunc64; __cmp:TCompareFunc):longint;cdecl;external clib name 'scandir64';
 
-function getdirentries(__fd:longint; __buf:Pchar; __nbytes:size_t; __basep:P__off_t):__ssize_t;cdecl;external clib name 'getdirentries';
-function getdirentries64(__fd:longint; __buf:Pchar; __nbytes:size_t; __basep:P__off64_t):__ssize_t;cdecl;external clib name 'getdirentries64';
+function getdirentries(__fd:longint; __buf:PAnsiChar; __nbytes:size_t; __basep:P__off_t):__ssize_t;cdecl;external clib name 'getdirentries';
+function getdirentries64(__fd:longint; __buf:PAnsiChar; __nbytes:size_t; __basep:P__off64_t):__ssize_t;cdecl;external clib name 'getdirentries64';
 
 function alphasort(const e1: Pointer; const e2: Pointer): Integer; cdecl; external clib name 'alphasort';
 function alphasort64(const e1: Pointer; const e2: Pointer): Integer; cdecl; external clib name 'alphasort64';
@@ -66,9 +66,9 @@ Type
   TSelectorProc64 = TSelectorFunc64;
   TCompareProc    = TCompareFunc;
 
-function scandir(__dir:Pchar; var __namelist:PPdirent; __selector:TSelectorfunc; __cmp:TComparefunc):longint;cdecl;external clib name 'scandir';
-function scandir64(__dir:Pchar; var __namelist:PPdirent64; __selector:TSelectorFunc64; __cmp:TCompareFunc):longint;cdecl;external clib name 'scandir64';
+function scandir(__dir:PAnsiChar; var __namelist:PPdirent; __selector:TSelectorfunc; __cmp:TComparefunc):longint;cdecl;external clib name 'scandir';
+function scandir64(__dir:PAnsiChar; var __namelist:PPdirent64; __selector:TSelectorFunc64; __cmp:TCompareFunc):longint;cdecl;external clib name 'scandir64';
 
-function getdirentries(__fd:longint; __buf:Pchar; __nbytes:size_t; var __basep:__off_t):__ssize_t;cdecl;external clib name 'getdirentries';
-function getdirentries64(__fd:longint; __buf:Pchar; __nbytes:size_t; var __basep: __off64_t):__ssize_t;cdecl;external clib name 'getdirentries64';
+function getdirentries(__fd:longint; __buf:PAnsiChar; __nbytes:size_t; var __basep:__off_t):__ssize_t;cdecl;external clib name 'getdirentries';
+function getdirentries64(__fd:longint; __buf:PAnsiChar; __nbytes:size_t; var __basep: __off64_t):__ssize_t;cdecl;external clib name 'getdirentries64';
 

packages/libc/src/dlfcnh.inc

@@ -3,19 +3,19 @@ Const
   RTLD_NEXT = Pointer(-1);
   RTLD_DEFAULT = nil;
 
-function dlopen(__file:Pchar; __mode:longint):pointer;cdecl;external dllib name 'dlopen';
+function dlopen(__file:PAnsiChar; __mode:longint):pointer;cdecl;external dllib name 'dlopen';
 function dlclose(__handle:pointer):longint;cdecl;external dllib name 'dlclose';
-function dlsym(__handle:pointer; __name:Pchar):pointer;cdecl;external dllib name 'dlsym';
-function dlvsym(__handle:pointer; __name:Pchar; __version:Pchar):pointer;cdecl;external dllib name 'dlvsym';
-function dlerror:Pchar;cdecl;external clib name 'dlerror';
+function dlsym(__handle:pointer; __name:PAnsiChar):pointer;cdecl;external dllib name 'dlsym';
+function dlvsym(__handle:pointer; __name:PAnsiChar; __version:PAnsiChar):pointer;cdecl;external dllib name 'dlvsym';
+function dlerror:PAnsiChar;cdecl;external clib name 'dlerror';
 
 type
 
    PDl_info = ^Dl_info;
    Dl_info = record
-        dli_fname : Pchar;
+        dli_fname : PAnsiChar;
         dli_fbase : pointer;
-        dli_sname : Pchar;
+        dli_sname : PAnsiChar;
         dli_saddr : pointer;
      end;
 

packages/libc/src/envzh.inc

@@ -1,17 +1,17 @@
 
-function envz_entry(__envz:Pchar; __envz_len:size_t; __name:Pchar):Pchar;cdecl;external clib name 'envz_entry';
-function envz_get(__envz:Pchar; __envz_len:size_t; __name:Pchar):Pchar;cdecl;external clib name 'envz_get';
-function envz_add(__envz:PPchar; __envz_len:Psize_t; __name:Pchar; __value:Pchar):error_t;cdecl;external clib name 'envz_add';
-function envz_merge(__envz:PPchar; __envz_len:Psize_t; __envz2:Pchar; __envz2_len:size_t; __override:longint):error_t;cdecl;external clib name 'envz_merge';
-procedure envz_remove(__envz:PPchar; __envz_len:Psize_t; __name:Pchar);cdecl;external clib name 'envz_remove';
-procedure envz_strip(__envz:PPchar; __envz_len:Psize_t);cdecl;external clib name 'envz_strip';
+function envz_entry(__envz:PAnsiChar; __envz_len:size_t; __name:PAnsiChar):PAnsiChar;cdecl;external clib name 'envz_entry';
+function envz_get(__envz:PAnsiChar; __envz_len:size_t; __name:PAnsiChar):PAnsiChar;cdecl;external clib name 'envz_get';
+function envz_add(__envz:PPAnsiChar; __envz_len:Psize_t; __name:PAnsiChar; __value:PAnsiChar):error_t;cdecl;external clib name 'envz_add';
+function envz_merge(__envz:PPAnsiChar; __envz_len:Psize_t; __envz2:PAnsiChar; __envz2_len:size_t; __override:longint):error_t;cdecl;external clib name 'envz_merge';
+procedure envz_remove(__envz:PPAnsiChar; __envz_len:Psize_t; __name:PAnsiChar);cdecl;external clib name 'envz_remove';
+procedure envz_strip(__envz:PPAnsiChar; __envz_len:Psize_t);cdecl;external clib name 'envz_strip';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
   ---------------------------------------------------------------------}
 
 // Type
-function envz_add(var __envz:Pchar; var __envz_len: size_t; __name:Pchar; __value:Pchar):error_t;cdecl;external clib name 'envz_add';
-function envz_merge(var __envz: Pchar; var __envz_len: size_t; __envz2:Pchar; __envz2_len:size_t; __override:longint):error_t;cdecl;external clib name 'envz_merge';
-procedure envz_remove(var __envz:Pchar; var __envz_len: size_t; __name:Pchar);cdecl;external clib name 'envz_remove';
-procedure envz_strip(var __envz:Pchar; var __envz_len: size_t);cdecl;external clib name 'envz_strip';
+function envz_add(var __envz:PAnsiChar; var __envz_len: size_t; __name:PAnsiChar; __value:PAnsiChar):error_t;cdecl;external clib name 'envz_add';
+function envz_merge(var __envz: PAnsiChar; var __envz_len: size_t; __envz2:PAnsiChar; __envz2_len:size_t; __override:longint):error_t;cdecl;external clib name 'envz_merge';
+procedure envz_remove(var __envz:PAnsiChar; var __envz_len: size_t; __name:PAnsiChar);cdecl;external clib name 'envz_remove';
+procedure envz_strip(var __envz:PAnsiChar; var __envz_len: size_t);cdecl;external clib name 'envz_strip';

packages/libc/src/errh.inc

@@ -1,12 +1,12 @@
 
-procedure warn(__format: Pchar; args: array of const); cdecl; external clib name 'warn';
-procedure vwarn(__format: Pchar; arg: Pointer); cdecl;external clib name 'vwarn';
-procedure warnx(__format: Pchar; args: array of const); cdecl; external clib name 'warnx';
-procedure vwarnx(__format: Pchar; arg: pointer); cdecl; external clib name 'vwarnx';
-procedure err(__status: Integer; __format: Pchar; args : array of const); cdecl; external clib name 'err';
-procedure verr(__status: Integer; __format: Pchar; Arg: Pointer); cdecl;  external clib name 'verr';
-procedure errx(__status: Integer; __format: Pchar); cdecl;  external clib name 'errx';
-procedure verrx(__status: Integer; __format: Pchar; Arg: Pointer); cdecl; external clib name 'verrx';
+procedure warn(__format: PAnsiChar; args: array of const); cdecl; external clib name 'warn';
+procedure vwarn(__format: PAnsiChar; arg: Pointer); cdecl;external clib name 'vwarn';
+procedure warnx(__format: PAnsiChar; args: array of const); cdecl; external clib name 'warnx';
+procedure vwarnx(__format: PAnsiChar; arg: pointer); cdecl; external clib name 'vwarnx';
+procedure err(__status: Integer; __format: PAnsiChar; args : array of const); cdecl; external clib name 'err';
+procedure verr(__status: Integer; __format: PAnsiChar; Arg: Pointer); cdecl;  external clib name 'verr';
+procedure errx(__status: Integer; __format: PAnsiChar); cdecl;  external clib name 'errx';
+procedure verrx(__status: Integer; __format: PAnsiChar; Arg: Pointer); cdecl; external clib name 'verrx';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/errnoh.inc

@@ -6,7 +6,7 @@ var
 {$ifdef LIBC_OLDERRNO}
   errno : error_t; cvar; external;
 {$endif}
-  program_invocation_name : Pchar;cvar;external;
+  program_invocation_name : PAnsiChar;cvar;external;
 
 {$ifndef LIBC_OLDERRNO}
   function errno : error_t;

packages/libc/src/errorh.inc

@@ -1,6 +1,6 @@
 
-procedure error(status: longint; errnum: longint; format: Pchar; args: array of const); cdecl; external clib name 'error';
-procedure error_at_line(status: longint; errnum: longint; fname: Pchar; lineno: Cardinal; format: Pchar; args : array of const); cdecl; external clib name 'error_at_line';
+procedure error(status: longint; errnum: longint; format: PAnsiChar; args: array of const); cdecl; external clib name 'error';
+procedure error_at_line(status: longint; errnum: longint; fname: PAnsiChar; lineno: Cardinal; format: PAnsiChar; args : array of const); cdecl; external clib name 'error_at_line';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/fcntlh.inc

@@ -13,14 +13,14 @@ const
 function fcntl(__fd:longint; __cmd:longint; args:array of const):longint;cdecl;external clib name 'fcntl';
 function fcntl(__fd:longint; __cmd:longint):longint;cdecl;varargs;external clib name 'fcntl';
 
-function open(__file:Pchar; __oflag:longint; args:array of const):longint;cdecl;external clib name 'open';
-function open(__file:Pchar; __oflag:longint):longint;cdecl;varargs;external clib name 'open';
+function open(__file:PAnsiChar; __oflag:longint; args:array of const):longint;cdecl;external clib name 'open';
+function open(__file:PAnsiChar; __oflag:longint):longint;cdecl;varargs;external clib name 'open';
 
-function open64(__file:Pchar; __oflag:longint; args:array of const):longint;cdecl;external clib name 'open64';
-function open64(__file:Pchar; __oflag:longint):longint;cdecl;varargs;external clib name 'open64';
+function open64(__file:PAnsiChar; __oflag:longint; args:array of const):longint;cdecl;external clib name 'open64';
+function open64(__file:PAnsiChar; __oflag:longint):longint;cdecl;varargs;external clib name 'open64';
 
-function creat(__file:Pchar; __mode:__mode_t):longint;cdecl;external clib name 'creat';
-function creat64(__file:Pchar; __mode:__mode_t):longint;cdecl;external clib name 'creat64';
+function creat(__file:PAnsiChar; __mode:__mode_t):longint;cdecl;external clib name 'creat';
+function creat64(__file:PAnsiChar; __mode:__mode_t):longint;cdecl;external clib name 'creat64';
 
 const
   F_LOCK = 1;

packages/libc/src/fmtmsgh.inc

@@ -17,12 +17,12 @@ Const
   MM_WARNING = 3;
   MM_INFO = 4;
 
-  MM_NULLLBL       = PChar(nil);
+  MM_NULLLBL       = PAnsiChar(nil);
   MM_NULLSEV       = 0;
   MM_NULLMC        = Longint(0);
-  MM_NULLTXT       = PChar(0);
-  MM_NULLACT       = PChar(0);
-  MM_NULLTAG       = PChar(0);
+  MM_NULLTXT       = PAnsiChar(0);
+  MM_NULLACT       = PAnsiChar(0);
+  MM_NULLTAG       = PAnsiChar(0);
 
   MM_NOTOK = -(1);
   MM_OK = 0;
@@ -30,8 +30,8 @@ Const
   MM_NOCON = 4;
 
 
-function fmtmsg(__classification:longint; __label:Pchar; __severity:longint; __text:Pchar; __action:Pchar;  __tag:Pchar):longint;cdecl;external clib name 'fmtmsg';
-function addseverity(__severity:longint; __string:Pchar):longint;cdecl;external clib name 'addseverity';
+function fmtmsg(__classification:longint; __label:PAnsiChar; __severity:longint; __text:PAnsiChar; __action:PAnsiChar;  __tag:PAnsiChar):longint;cdecl;external clib name 'fmtmsg';
+function addseverity(__severity:longint; __string:PAnsiChar):longint;cdecl;external clib name 'addseverity';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/fnmatchh.inc

@@ -15,7 +15,7 @@
 
        FNM_NOSYS = -(1);
 
-function fnmatch(__pattern:Pchar; __name:Pchar; __flags:longint):longint;cdecl;external clib name 'fnmatch';
+function fnmatch(__pattern:PAnsiChar; __name:PAnsiChar; __flags:longint):longint;cdecl;external clib name 'fnmatch';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/fstabh.inc

@@ -11,19 +11,19 @@ const
 type
    Pfstab = ^fstab;
    fstab = record
-        fs_spec : Pchar;
-        fs_file : Pchar;
-        fs_vfstype : Pchar;
-        fs_mntops : Pchar;
-        fs_type : Pchar;
+        fs_spec : PAnsiChar;
+        fs_file : PAnsiChar;
+        fs_vfstype : PAnsiChar;
+        fs_mntops : PAnsiChar;
+        fs_type : PAnsiChar;
         fs_freq : longint;
         fs_passno : longint;
    end;
 
 
 function getfsent:Pfstab;cdecl;external clib name 'getfsent';
-function getfsspec(__name:Pchar):Pfstab;cdecl;external clib name 'getfsspec';
-function getfsfile(__name:Pchar):Pfstab;cdecl;external clib name 'getfsfile';
+function getfsspec(__name:PAnsiChar):Pfstab;cdecl;external clib name 'getfsspec';
+function getfsfile(__name:PAnsiChar):Pfstab;cdecl;external clib name 'getfsfile';
 function setfsent:longint;cdecl;external clib name 'setfsent';
 procedure endfsent;cdecl;external clib name 'endfsent';
 

packages/libc/src/gconvh.inc

@@ -38,9 +38,9 @@ type
 
    __gconv_trans_context_fct = function (_para1:pointer; _para2:Pbyte; _para3:Pbyte; _para4:Pbyte; _para5:Pbyte):longint;cdecl;
 
-   __gconv_trans_query_fct = function (_para1:Pchar; _para2:PPPchar; _para3:Psize_t):longint;cdecl;
+   __gconv_trans_query_fct = function (_para1:PAnsiChar; _para2:PPPAnsiChar; _para3:Psize_t):longint;cdecl;
 
-   __gconv_trans_init_fct = function (_para1:Ppointer; _para2:Pchar):longint;cdecl;
+   __gconv_trans_init_fct = function (_para1:Ppointer; _para2:PAnsiChar):longint;cdecl;
 
    __gconv_trans_end_fct = procedure (_para1:pointer);cdecl;
 
@@ -54,10 +54,10 @@ type
 
    __gconv_step = record
         __shlib_handle : P__gconv_loaded_object;
-        __modname : Pchar;
+        __modname : PAnsiChar;
         __counter : longint;
-        __from_name : Pchar;
-        __to_name : Pchar;
+        __from_name : PAnsiChar;
+        __to_name : PAnsiChar;
         __fct : __gconv_fct;
         __init_fct : __gconv_init_fct;
         __end_fct : __gconv_end_fct;

packages/libc/src/getopth.inc

@@ -1,6 +1,6 @@
 
 var
-  optarg : Pchar;cvar;external;
+  optarg : PAnsiChar;cvar;external;
   optind : longint;cvar;external;
   opterr : longint;cvar;external;
   optopt : longint;cvar;external;
@@ -8,7 +8,7 @@ var
 type
    Poption = ^option;
    option = record
-     name : Pchar;
+     name : PAnsiChar;
      has_arg : longint;
      flag : Plongint;
      val : longint;
@@ -21,14 +21,14 @@ const
    optional_argument = 2;
 
 
-function getopt(___argc:longint; ___argv:PPchar; __shortopts:Pchar):longint;cdecl;external clib name 'getopt';
-function getopt_long(___argc:longint; ___argv:PPchar; __shortopts:Pchar; __longopts:Poption; __longind:Plongint):longint;cdecl;external clib name 'getopt_long';
-function getopt_long_only(___argc:longint; ___argv:PPchar; __shortopts:Pchar; __longopts:Poption; __longind:Plongint):longint;cdecl;external clib name 'getopt_long_only';
+function getopt(___argc:longint; ___argv:PPAnsiChar; __shortopts:PAnsiChar):longint;cdecl;external clib name 'getopt';
+function getopt_long(___argc:longint; ___argv:PPAnsiChar; __shortopts:PAnsiChar; __longopts:Poption; __longind:Plongint):longint;cdecl;external clib name 'getopt_long';
+function getopt_long_only(___argc:longint; ___argv:PPAnsiChar; __shortopts:PAnsiChar; __longopts:Poption; __longind:Plongint):longint;cdecl;external clib name 'getopt_long_only';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
   ---------------------------------------------------------------------}
 
 // Type
-function getopt_long(___argc:longint; ___argv:PPchar; __shortopts:Pchar; const __longopts:option; var __longind:longint):longint;cdecl;external clib name 'getopt_long';
-function getopt_long_only(___argc:longint; ___argv:PPchar; __shortopts:Pchar; const __longopts:option; var __longind:longint):longint;cdecl;external clib name 'getopt_long_only';
+function getopt_long(___argc:longint; ___argv:PPAnsiChar; __shortopts:PAnsiChar; const __longopts:option; var __longind:longint):longint;cdecl;external clib name 'getopt_long';
+function getopt_long_only(___argc:longint; ___argv:PPAnsiChar; __shortopts:PAnsiChar; const __longopts:option; var __longind:longint):longint;cdecl;external clib name 'getopt_long_only';

packages/libc/src/glibc_versionh.inc

@@ -1,6 +1,6 @@
 
-function gnu_get_libc_release:Pchar;cdecl;external clib name 'gnu_get_libc_release';
-function gnu_get_libc_version:Pchar;cdecl;external clib name 'gnu_get_libc_version';
+function gnu_get_libc_release:PAnsiChar;cdecl;external clib name 'gnu_get_libc_release';
+function gnu_get_libc_version:PAnsiChar;cdecl;external clib name 'gnu_get_libc_version';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/globh.inc

@@ -25,13 +25,13 @@ Const
 Type
   TGlobCloseDirProc = procedure(Param: Pointer); cdecl;
   TGlobReadDirFunc = function(Param: Pointer): PDirEnt; cdecl;
-  TGlobOpenDirFunc = function(Param: PChar): __ptr_t; cdecl;
-  TGlobStatFunc = function(Param1: PChar; Param2: PStatBuf): longint; cdecl;
+  TGlobOpenDirFunc = function(Param: PAnsiChar): __ptr_t; cdecl;
+  TGlobStatFunc = function(Param1: PAnsiChar; Param2: PStatBuf): longint; cdecl;
 
    Pglob_t = ^glob_t;
    glob_t = record
      gl_pathc : size_t;
-     gl_pathv : ^Pchar;
+     gl_pathv : ^PAnsiChar;
      gl_offs : size_t;
      gl_flags : longint;
      gl_closedir : TGlobClosedirProc;
@@ -42,12 +42,12 @@ Type
    end;
 
   TGlobReadDir64Func = function(Param: Pointer): PDirEnt64; cdecl;
-  TGlobStat64Func = function(Param1: PChar; Param2: PStatBuf64): longint; cdecl;
+  TGlobStat64Func = function(Param1: PAnsiChar; Param2: PStatBuf64): longint; cdecl;
 
   Pglob64_t = ^glob64_t;
   glob64_t = record
     gl_pathc: size_t;
-    gl_pathv: PPChar;
+    gl_pathv: PPAnsiChar;
     gl_offs: size_t;
     gl_flags: longint;
     gl_closedir: TGlobCloseDirProc;
@@ -57,15 +57,15 @@ Type
     gl_stat: TGlobStat64Func;
   end;
 
-  TGlobErrFunc = function(PathName: PChar; ErrNo: longint): longint; cdecl;
+  TGlobErrFunc = function(PathName: PAnsiChar; ErrNo: longint): longint; cdecl;
 
-function glob(__pattern:Pchar; __flags:longint; __errfunc:TGlobErrFunc; __pglob:Pglob_t):longint;cdecl;external clib name 'glob';
+function glob(__pattern:PAnsiChar; __flags:longint; __errfunc:TGlobErrFunc; __pglob:Pglob_t):longint;cdecl;external clib name 'glob';
 procedure globfree(__pglob:Pglob_t);cdecl;external clib name 'globfree';
 
-function glob64(__pattern: PChar; __flags: longint; __errfunc: TGlobErrFunc; __pglob: Pglob64_t): longint; cdecl;external clib name 'glob64';
+function glob64(__pattern: PAnsiChar; __flags: longint; __errfunc: TGlobErrFunc; __pglob: Pglob64_t): longint; cdecl;external clib name 'glob64';
 procedure globfree64(__pglob: Pglob64_t); cdecl;external clib name 'globfree64';
 
-function glob_pattern_p(__pattern: PChar; __quote: longint): longint; cdecl;external clib name 'glob_pattern_p';
+function glob_pattern_p(__pattern: PAnsiChar; __quote: longint): longint; cdecl;external clib name 'glob_pattern_p';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/glue.inc

@@ -33,7 +33,7 @@ Type
     count: Integer;
     case { __value } Integer of
       0: (__wch: wint_t);
-      1: (__wchb: packed array[0..4 - 1] of Char);
+      1: (__wchb: packed array[0..4 - 1] of AnsiChar);
     end;
   mbstate_t = __mbstate_t;
   P__mbstate_t = ^__mbstate_t;

packages/libc/src/grph.inc

@@ -2,10 +2,10 @@
 type
    Pgroup = ^group;
    group = record
-        gr_name : Pchar;
-        gr_passwd : Pchar;
+        gr_name : PAnsiChar;
+        gr_passwd : PAnsiChar;
         gr_gid : __gid_t;
-        gr_mem : ^Pchar;
+        gr_mem : ^PAnsiChar;
      end;
    PPgroup = ^Pgroup;
 
@@ -15,18 +15,18 @@ function getgrent:Pgroup;cdecl;external clib name 'getgrent';
 function fgetgrent(__stream:PFILE):Pgroup;cdecl;external clib name 'fgetgrent';
 function putgrent(__p:Pgroup; __f:PFILE):longint;cdecl;external clib name 'putgrent';
 function getgrgid(__gid:__gid_t):Pgroup;cdecl;external clib name 'getgrgid';
-function getgrnam(__name:Pchar):Pgroup;cdecl;external clib name 'getgrnam';
+function getgrnam(__name:PAnsiChar):Pgroup;cdecl;external clib name 'getgrnam';
 
 const
    NSS_BUFLEN_GROUP = 1024;
 
-function getgrent_r(__resultbuf:Pgroup; __buffer:Pchar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'getgrent_r';
-function getgrgid_r(__gid:__gid_t; __resultbuf:Pgroup; __buffer:Pchar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'getgrgid_r';
-function getgrnam_r(__name:Pchar; __resultbuf:Pgroup; __buffer:Pchar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'getgrnam_r';
-function fgetgrent_r(__stream:PFILE; __resultbuf:Pgroup; __buffer:Pchar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'fgetgrent_r';
+function getgrent_r(__resultbuf:Pgroup; __buffer:PAnsiChar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'getgrent_r';
+function getgrgid_r(__gid:__gid_t; __resultbuf:Pgroup; __buffer:PAnsiChar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'getgrgid_r';
+function getgrnam_r(__name:PAnsiChar; __resultbuf:Pgroup; __buffer:PAnsiChar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'getgrnam_r';
+function fgetgrent_r(__stream:PFILE; __resultbuf:Pgroup; __buffer:PAnsiChar; __buflen:size_t; __result:PPgroup):longint;cdecl;external clib name 'fgetgrent_r';
 function setgroups(__n:size_t; __groups:P__gid_t):longint;cdecl;external clib name 'setgroups';
-function getgrouplist(__user:Pchar; __group:__gid_t; __groups:P__gid_t; __ngroups:Plongint):longint;cdecl;external clib name 'getgrouplist';
-function initgroups(__user:Pchar; __group:__gid_t):longint;cdecl;external clib name 'initgroups';
+function getgrouplist(__user:PAnsiChar; __group:__gid_t; __groups:P__gid_t; __ngroups:Plongint):longint;cdecl;external clib name 'getgrouplist';
+function initgroups(__user:PAnsiChar; __group:__gid_t):longint;cdecl;external clib name 'initgroups';
 
 
 { ---------------------------------------------------------------------
@@ -37,9 +37,9 @@ Type
   TGroup = group;
 
 function putgrent(const __p: group; __f:PFILE):longint;cdecl;external clib name 'putgrent';
-function getgrent_r(var __resultbuf: group; __buffer:Pchar; __buflen:size_t; var __result: Pgroup):longint;cdecl;external clib name 'getgrent_r';
-function getgrgid_r(__gid:__gid_t; var __resultbuf:group; __buffer:Pchar; __buflen:size_t; var __result:Pgroup):longint;cdecl;external clib name 'getgrgid_r';
-function getgrnam_r(__name:Pchar; var __resultbuf:group; __buffer:Pchar; __buflen:size_t; var __result:Pgroup):longint;cdecl;external clib name 'getgrnam_r';
-function fgetgrent_r(__stream:PFILE; var __resultbuf:group; __buffer:Pchar; __buflen:size_t; var __result:Pgroup):longint;cdecl;external clib name 'fgetgrent_r';
-function getgrouplist(__user:Pchar; __group:__gid_t; var __groups: __gid_t; var __ngroups:longint):longint;cdecl;external clib name 'getgrouplist';
+function getgrent_r(var __resultbuf: group; __buffer:PAnsiChar; __buflen:size_t; var __result: Pgroup):longint;cdecl;external clib name 'getgrent_r';
+function getgrgid_r(__gid:__gid_t; var __resultbuf:group; __buffer:PAnsiChar; __buflen:size_t; var __result:Pgroup):longint;cdecl;external clib name 'getgrgid_r';
+function getgrnam_r(__name:PAnsiChar; var __resultbuf:group; __buffer:PAnsiChar; __buflen:size_t; var __result:Pgroup):longint;cdecl;external clib name 'getgrnam_r';
+function fgetgrent_r(__stream:PFILE; var __resultbuf:group; __buffer:PAnsiChar; __buflen:size_t; var __result:Pgroup):longint;cdecl;external clib name 'fgetgrent_r';
+function getgrouplist(__user:PAnsiChar; __group:__gid_t; var __groups: __gid_t; var __ngroups:longint):longint;cdecl;external clib name 'getgrouplist';
 

packages/libc/src/iconvh.inc

@@ -4,8 +4,8 @@ type
    Piconv_t = ^iconv_t;
    iconv_t = pointer;
 
-function iconv_open(__tocode:Pchar; __fromcode:Pchar):iconv_t;cdecl;external clib name 'iconv_open';
-function iconv(__cd:iconv_t; __inbuf:PPchar; __inbytesleft:Psize_t; __outbuf:PPchar; __outbytesleft:Psize_t):size_t;cdecl;external clib name 'iconv';
+function iconv_open(__tocode:PAnsiChar; __fromcode:PAnsiChar):iconv_t;cdecl;external clib name 'iconv_open';
+function iconv(__cd:iconv_t; __inbuf:PPAnsiChar; __inbytesleft:Psize_t; __outbuf:PPAnsiChar; __outbytesleft:Psize_t):size_t;cdecl;external clib name 'iconv';
 function iconv_close(__cd:iconv_t):longint;cdecl;external clib name 'iconv_close';
 
 
@@ -13,4 +13,4 @@ function iconv_close(__cd:iconv_t):longint;cdecl;external clib name 'iconv_close
     Borland compatibility types
   ---------------------------------------------------------------------}
 
-function iconv(__cd:iconv_t; var __inbuf:Pchar; var __inbytesleft:size_t; var __outbuf:Pchar; var __outbytesleft: size_t):size_t;cdecl;external clib name 'iconv';
+function iconv(__cd:iconv_t; var __inbuf:PAnsiChar; var __inbytesleft:size_t; var __outbuf:PAnsiChar; var __outbytesleft: size_t):size_t;cdecl;external clib name 'iconv';

packages/libc/src/inttypesh.inc

@@ -8,8 +8,8 @@ type
 
 function imaxabs (__n : intmax_t) : intmax_t; cdecl; external clib name 'imaxabs';
 function imaxdiv (__numer: intmax_t; __denom: intmax_t): imaxdiv_t; cdecl;external clib name 'imaxdiv';
-function strtoimax(__nptr: PChar; __endptr: PPChar; __base: Integer): intmax_t;cdecl;external clib name 'strtoimax';
-function strtoumax(__nptr: PChar; __endptr: PPChar; __base: Integer): uintmax_t; cdecl; external clib name 'strtoumax';
+function strtoimax(__nptr: PAnsiChar; __endptr: PPAnsiChar; __base: Integer): intmax_t;cdecl;external clib name 'strtoimax';
+function strtoumax(__nptr: PAnsiChar; __endptr: PPAnsiChar; __base: Integer): uintmax_t; cdecl; external clib name 'strtoumax';
 function wcstoimax(__nptr: Pwchar_t; __endptr: PPwchar_t; __base: Integer): intmax_t; cdecl;external clib name 'wcstoimax';
 function wcstoumax(__nptr: Pwchar_t; __endptr: PPwchar_t; __base: Integer): uintmax_t; cdecl;external clib name 'wcstoumax';
 

packages/libc/src/kerneldefs.pp

@@ -48,7 +48,7 @@ type
 type
 
    Ps8 = ^s8;
-   s8 = char;
+   s8 = AnsiChar;
 
    Pu8 = ^u8;
    u8 = byte;
@@ -628,7 +628,7 @@ Function DEFLATE_MAKE_OPT(w: longint): longint;
             sat_family : sa_family_t;
             sat_port : __u8;
             sat_addr : at_addr;
-            sat_zero : array[0..7] of char;
+            sat_zero : array[0..7] of AnsiChar;
          end;
 
        Pnetrange = ^netrange;

packages/libc/src/langinfoh.inc

@@ -364,8 +364,8 @@ const
    NOSTR = __NOSTR;
 
 
-function nl_langinfo(__item:nl_item):Pchar;cdecl;external clib name 'nl_langinfo';
-function __nl_langinfo_l(__item:nl_item; l:__locale_t):Pchar;cdecl;external clib name '__nl_langinfo_l';
+function nl_langinfo(__item:nl_item):PAnsiChar;cdecl;external clib name 'nl_langinfo';
+function __nl_langinfo_l(__item:nl_item; l:__locale_t):PAnsiChar;cdecl;external clib name '__nl_langinfo_l';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/libgenh.inc

@@ -1,8 +1,8 @@
 
 
-function dirname(__path:Pchar):Pchar;cdecl;external clib name 'dirname';
-function __xpg_basename(__path:Pchar):Pchar;cdecl;external clib name '__xpg_basename';
-// maybe add later. function basename(__path:Pchar):Pchar;cdecl;external clib name '__xpg_basename';
+function dirname(__path:PAnsiChar):PAnsiChar;cdecl;external clib name 'dirname';
+function __xpg_basename(__path:PAnsiChar):PAnsiChar;cdecl;external clib name '__xpg_basename';
+// maybe add later. function basename(__path:PAnsiChar):PAnsiChar;cdecl;external clib name '__xpg_basename';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/libintlh.inc

@@ -1,16 +1,16 @@
 
 
-function gettext(__msgid:Pchar):Pchar;cdecl;external clib name 'gettext';
-function dgettext(__domainname:Pchar; __msgid:Pchar):Pchar;cdecl;external clib name 'dgettext';
-function __dgettext(__domainname:Pchar; __msgid:Pchar):Pchar;cdecl;external clib name '__dgettext';
-function dcgettext(__domainname:Pchar; __msgid:Pchar; __category:longint):Pchar;cdecl;external clib name 'dcgettext';
-function __dcgettext(__domainname:Pchar; __msgid:Pchar; __category:longint):Pchar;cdecl;external clib name '__dcgettext';
-function ngettext(__msgid1:Pchar; __msgid2:Pchar; __n:dword):Pchar;cdecl;external clib name 'ngettext';
-function dngettext(__domainname:Pchar; __msgid1:Pchar; __msgid2:Pchar; __n:dword):Pchar;cdecl;external clib name 'dngettext';
-function dcngettext(__domainname:Pchar; __msgid1:Pchar; __msgid2:Pchar; __n:dword; __category:longint):Pchar;cdecl;external clib name 'dcngettext';
-function textdomain(__domainname:Pchar):Pchar;cdecl;external clib name 'textdomain';
-function bindtextdomain(__domainname:Pchar; __dirname:Pchar):Pchar;cdecl;external clib name 'bindtextdomain';
-function bind_textdomain_codeset(__domainname:Pchar; __codeset:Pchar):Pchar;cdecl;external clib name 'bind_textdomain_codeset';
+function gettext(__msgid:PAnsiChar):PAnsiChar;cdecl;external clib name 'gettext';
+function dgettext(__domainname:PAnsiChar; __msgid:PAnsiChar):PAnsiChar;cdecl;external clib name 'dgettext';
+function __dgettext(__domainname:PAnsiChar; __msgid:PAnsiChar):PAnsiChar;cdecl;external clib name '__dgettext';
+function dcgettext(__domainname:PAnsiChar; __msgid:PAnsiChar; __category:longint):PAnsiChar;cdecl;external clib name 'dcgettext';
+function __dcgettext(__domainname:PAnsiChar; __msgid:PAnsiChar; __category:longint):PAnsiChar;cdecl;external clib name '__dcgettext';
+function ngettext(__msgid1:PAnsiChar; __msgid2:PAnsiChar; __n:dword):PAnsiChar;cdecl;external clib name 'ngettext';
+function dngettext(__domainname:PAnsiChar; __msgid1:PAnsiChar; __msgid2:PAnsiChar; __n:dword):PAnsiChar;cdecl;external clib name 'dngettext';
+function dcngettext(__domainname:PAnsiChar; __msgid1:PAnsiChar; __msgid2:PAnsiChar; __n:dword; __category:longint):PAnsiChar;cdecl;external clib name 'dcngettext';
+function textdomain(__domainname:PAnsiChar):PAnsiChar;cdecl;external clib name 'textdomain';
+function bindtextdomain(__domainname:PAnsiChar; __dirname:PAnsiChar):PAnsiChar;cdecl;external clib name 'bindtextdomain';
+function bind_textdomain_codeset(__domainname:PAnsiChar; __codeset:PAnsiChar):PAnsiChar;cdecl;external clib name 'bind_textdomain_codeset';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/libio.inc

@@ -23,7 +23,7 @@ begin
 end;
 
 
-Function _IO_putc_unlocked(_ch: Char; _fp: P_IO_FILE): longint;
+Function _IO_putc_unlocked(_ch: AnsiChar; _fp: P_IO_FILE): longint;
 begin
   if _fp^._IO_write_ptr>=_fp^._IO_write_end then
     Result:=__overflow(_fp, Byte(_ch))

packages/libc/src/libioh.inc

@@ -104,12 +104,12 @@ type
 
   // The following function declarations are used anonymously in the header file.
   TCodeCvtDestrProc = procedure(p1: P_IO_codecvt); cdecl;
-  TCodeCvtDoOutFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3, p4: Pwchar_t; p5: PPwchar_t; p6, p7: PChar; p8: PPChar): __codecvt_result; cdecl;
-  TCodeCvtDoUnshiftFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3: PChar; p4: PChar; p5: PPChar): __codecvt_result; cdecl;
-  TCodeCvtDoInFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3: PChar; p4: PChar; p5: PPChar; p6: Pwchar_t; p7: Pwchar_t; p8: PPwchar_t): __codecvt_result; cdecl;
+  TCodeCvtDoOutFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3, p4: Pwchar_t; p5: PPwchar_t; p6, p7: PAnsiChar; p8: PPAnsiChar): __codecvt_result; cdecl;
+  TCodeCvtDoUnshiftFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3: PAnsiChar; p4: PAnsiChar; p5: PPAnsiChar): __codecvt_result; cdecl;
+  TCodeCvtDoInFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3: PAnsiChar; p4: PAnsiChar; p5: PPAnsiChar; p6: Pwchar_t; p7: Pwchar_t; p8: PPwchar_t): __codecvt_result; cdecl;
   TCodeCvtDoEncodingFunc = function(p1: P_IO_codecvt): Integer; cdecl;
   TCodeCvtDoAlwaysNoConvFunc = function(p1: P_IO_codecvt): Integer; cdecl;
-  TCodeCvtDoLengthFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3: PChar; p4: PChar; p5: _IO_size_t): Integer; cdecl;
+  TCodeCvtDoLengthFunc = function(p1: P_IO_codecvt; p2: PMultiByteState; p3: PAnsiChar; p4: PAnsiChar; p5: _IO_size_t): Integer; cdecl;
   TCodeCvtDoMaxLengthFunc = function(p1: P_IO_codecvt): Integer; cdecl;
 
   _IO_codecvt = record
@@ -155,17 +155,17 @@ type
 
   _IO_FILE = {packed} record
     _flags: Longint;
-    _IO_read_ptr: PChar;
-    _IO_read_end: PChar;
-    _IO_read_base: PChar;
-    _IO_write_base: PChar;
-    _IO_write_ptr: PChar;
-    _IO_write_end: PChar;
-    _IO_buf_base: PChar;
-    _IO_buf_end: PChar;
-    _IO_save_base: PChar;
-    _IO_backup_base: PChar;
-    _IO_save_end: PChar;
+    _IO_read_ptr: PAnsiChar;
+    _IO_read_end: PAnsiChar;
+    _IO_read_base: PAnsiChar;
+    _IO_write_base: PAnsiChar;
+    _IO_write_ptr: PAnsiChar;
+    _IO_write_end: PAnsiChar;
+    _IO_buf_base: PAnsiChar;
+    _IO_buf_end: PAnsiChar;
+    _IO_save_base: PAnsiChar;
+    _IO_backup_base: PAnsiChar;
+    _IO_save_end: PAnsiChar;
     _markers: PIOMarker;
     _chain: P_IO_File;
     _fileno: Integer;
@@ -173,7 +173,7 @@ type
     _old_offset: _IO_off_t;
     _cur_column: word;
     _vtable_offset: shortint;
-    _shortbuf: packed array[0..1-1] of Char;
+    _shortbuf: packed array[0..1-1] of AnsiChar;
     _lock: P_IO_Lock;
     _offset: _IO_off64_t;
     _codecvt: ^_IO_codecvt;
@@ -208,8 +208,8 @@ var
   _IO_stderr : P_IO_FILE;cvar;external;
 
 type
-  __io_read_fn = function(__cookie: Pointer; __buf: PChar; __nbytes: size_t): __ssize_t; cdecl;
-  __io_write_fn = function(__cookie: Pointer; __buf: PChar; __n: size_t): __ssize_t; cdecl;
+  __io_read_fn = function(__cookie: Pointer; __buf: PAnsiChar; __nbytes: size_t): __ssize_t; cdecl;
+  __io_write_fn = function(__cookie: Pointer; __buf: PAnsiChar; __n: size_t): __ssize_t; cdecl;
   __io_seek_fn = function(__cookie: Pointer; __pos: P_IO_off64_t; __w: Integer): Integer; cdecl;
   __io_close_fn = function(__cookie: Pointer): Integer; cdecl;
 
@@ -254,7 +254,7 @@ function __woverflow(_para1:P_IO_FILE; _para2:_IO_wint_t):_IO_wint_t;cdecl;exter
 
 function _IO_getc_unlocked(_fp: P_IO_File): Longint;
 function _IO_peekc_unlocked(_fp: P_IO_File): Longint;
-function _IO_putc_unlocked(_ch: Char; _fp: P_IO_File): Longint;
+function _IO_putc_unlocked(_ch: AnsiChar; _fp: P_IO_File): Longint;
 
 function _IO_getwc_unlocked(_fp: P_IO_File): Longint;
 function _IO_putwc_unlocked(_wch: wchar_t; _fp: P_IO_File): Longint;
@@ -274,8 +274,8 @@ procedure _IO_flockfile(_para1:P_IO_FILE);cdecl;external clib name '_IO_flockfil
 procedure _IO_funlockfile(_para1:P_IO_FILE);cdecl;external clib name '_IO_funlockfile';
 function _IO_ftrylockfile(_para1:P_IO_FILE):longint;cdecl;external clib name '_IO_ftrylockfile';
 
-function _IO_vfscanf(_para1:P_IO_FILE; _para2:Pchar; _para3:_IO_va_list; _para4:Plongint):longint;cdecl;external clib name '_IO_vfscanf';
-function _IO_vfprintf(_para1:P_IO_FILE; _para2:Pchar; _para3:_IO_va_list):longint;cdecl;external clib name '_IO_vfprintf';
+function _IO_vfscanf(_para1:P_IO_FILE; _para2:PAnsiChar; _para3:_IO_va_list; _para4:Plongint):longint;cdecl;external clib name '_IO_vfscanf';
+function _IO_vfprintf(_para1:P_IO_FILE; _para2:PAnsiChar; _para3:_IO_va_list):longint;cdecl;external clib name '_IO_vfprintf';
 function _IO_padn(_para1:P_IO_FILE; _para2:longint; _para3:_IO_ssize_t):_IO_ssize_t;cdecl;external clib name '_IO_padn';
 function _IO_sgetn(_para1:P_IO_FILE; _para2:pointer; _para3:_IO_size_t):_IO_size_t;cdecl;external clib name '_IO_sgetn';
 function _IO_seekoff(_para1:P_IO_FILE; _para2:_IO_off64_t; _para3:longint; _para4:longint):_IO_off64_t;cdecl;external clib name '_IO_seekoff';

packages/libc/src/localeh.inc

@@ -31,42 +31,42 @@ const
 type
    Plconv = ^lconv;
    lconv = record
-        decimal_point : Pchar;
-        thousands_sep : Pchar;
-        grouping : Pchar;
-        int_curr_symbol : Pchar;
-        currency_symbol : Pchar;
-        mon_decimal_point : Pchar;
-        mon_thousands_sep : Pchar;
-        mon_grouping : Pchar;
-        positive_sign : Pchar;
-        negative_sign : Pchar;
-        int_frac_digits : char;
-        frac_digits : char;
-        p_cs_precedes : char;
-        p_sep_by_space : char;
-        n_cs_precedes : char;
-        n_sep_by_space : char;
-        p_sign_posn : char;
-        n_sign_posn : char;
-        int_p_cs_precedes : char;
-        int_p_sep_by_space : char;
-        int_n_cs_precedes : char;
-        int_n_sep_by_space : char;
-        int_p_sign_posn : char;
-        int_n_sign_posn : char;
-        __int_p_cs_precedes : char;
-        __int_p_sep_by_space : char;
-        __int_n_cs_precedes : char;
-        __int_n_sep_by_space : char;
-        __int_p_sign_posn : char;
-        __int_n_sign_posn : char;
+        decimal_point : PAnsiChar;
+        thousands_sep : PAnsiChar;
+        grouping : PAnsiChar;
+        int_curr_symbol : PAnsiChar;
+        currency_symbol : PAnsiChar;
+        mon_decimal_point : PAnsiChar;
+        mon_thousands_sep : PAnsiChar;
+        mon_grouping : PAnsiChar;
+        positive_sign : PAnsiChar;
+        negative_sign : PAnsiChar;
+        int_frac_digits : AnsiChar;
+        frac_digits : AnsiChar;
+        p_cs_precedes : AnsiChar;
+        p_sep_by_space : AnsiChar;
+        n_cs_precedes : AnsiChar;
+        n_sep_by_space : AnsiChar;
+        p_sign_posn : AnsiChar;
+        n_sign_posn : AnsiChar;
+        int_p_cs_precedes : AnsiChar;
+        int_p_sep_by_space : AnsiChar;
+        int_n_cs_precedes : AnsiChar;
+        int_n_sep_by_space : AnsiChar;
+        int_p_sign_posn : AnsiChar;
+        int_n_sign_posn : AnsiChar;
+        __int_p_cs_precedes : AnsiChar;
+        __int_p_sep_by_space : AnsiChar;
+        __int_n_cs_precedes : AnsiChar;
+        __int_n_sep_by_space : AnsiChar;
+        __int_p_sign_posn : AnsiChar;
+        __int_n_sign_posn : AnsiChar;
      end;
 
 
-function setlocale(__category:longint; __locale:Pchar):Pchar;cdecl;external clib name 'setlocale';
+function setlocale(__category:longint; __locale:PAnsiChar):PAnsiChar;cdecl;external clib name 'setlocale';
 function localeconv:Plconv;cdecl;external clib name 'localeconv';
-function __newlocale(__category_mask:longint; __locale:Pchar; __base:__locale_t):__locale_t;cdecl;external clib name '__newlocale';
+function __newlocale(__category_mask:longint; __locale:PAnsiChar; __base:__locale_t):__locale_t;cdecl;external clib name '__newlocale';
 function __duplocale(__dataset:__locale_t):__locale_t;cdecl;external clib name '__duplocale';
 procedure __freelocale(__dataset:__locale_t);cdecl;external clib name '__freelocale';
 

packages/libc/src/mntenth.inc

@@ -16,22 +16,22 @@ const
 type
    Pmntent = ^mntent;
    mntent = record
-        mnt_fsname : Pchar;
-        mnt_dir : Pchar;
-        mnt_type : Pchar;
-        mnt_opts : Pchar;
+        mnt_fsname : PAnsiChar;
+        mnt_dir : PAnsiChar;
+        mnt_type : PAnsiChar;
+        mnt_opts : PAnsiChar;
         mnt_freq : longint;
         mnt_passno : longint;
      end;
 
 
-function setmntent(__file:Pchar; __mode:Pchar):PFILE;cdecl;external clib name 'setmntent';
+function setmntent(__file:PAnsiChar; __mode:PAnsiChar):PFILE;cdecl;external clib name 'setmntent';
 function getmntent(__stream:PFILE):Pmntent;cdecl;external clib name 'getmntent';
-function getmntent_r(__stream:PFILE; __result:Pmntent; __buffer:Pchar; __bufsize:longint):Pmntent;cdecl;external clib name 'getmntent_r';
+function getmntent_r(__stream:PFILE; __result:Pmntent; __buffer:PAnsiChar; __bufsize:longint):Pmntent;cdecl;external clib name 'getmntent_r';
 
 function addmntent(__stream:PFILE; __mnt:Pmntent):longint;cdecl;external clib name 'addmntent';
 function endmntent(__stream:PFILE):longint;cdecl;external clib name 'endmntent';
-function hasmntopt(__mnt:Pmntent; __opt:Pchar):Pchar;cdecl;external clib name 'hasmntopt';
+function hasmntopt(__mnt:Pmntent; __opt:PAnsiChar):PAnsiChar;cdecl;external clib name 'hasmntopt';
 
 
 { ---------------------------------------------------------------------
@@ -42,7 +42,7 @@ Type
   TMountEntry = mntent;
   PMountEntry = ^TMountEntry;
 
-function getmntent_r(__stream:PFILE; var __result: mntent; __buffer:Pchar; __bufsize:longint):Pmntent;cdecl;external clib name 'getmntent_r';
+function getmntent_r(__stream:PFILE; var __result: mntent; __buffer:PAnsiChar; __bufsize:longint):Pmntent;cdecl;external clib name 'getmntent_r';
 function addmntent(__stream:PFILE; const __mnt: mntent):longint;cdecl;external clib name 'addmntent';
-function hasmntopt(const __mnt: mntent; __opt:Pchar):Pchar;cdecl;external clib name 'hasmntopt';
+function hasmntopt(const __mnt: mntent; __opt:PAnsiChar):PAnsiChar;cdecl;external clib name 'hasmntopt';
 

packages/libc/src/monetaryh.inc

@@ -1,9 +1,9 @@
 
 
-function strfmon(__s:Pchar; __maxsize:size_t; __format:Pchar; args:array of const):ssize_t;cdecl;external clib name 'strfmon';
-function strfmon(__s:Pchar; __maxsize:size_t; __format:Pchar):ssize_t;cdecl;varargs;external clib name 'strfmon';
-function __strfmon_l(__s:Pchar; __maxsize:size_t; loc:__locale_t; __format:Pchar; args:array of const):ssize_t;cdecl;external clib name '__strfmon_l';
-function __strfmon_l(__s:Pchar; __maxsize:size_t; loc:__locale_t; __format:Pchar):ssize_t;cdecl;varargs;external clib name '__strfmon_l';
+function strfmon(__s:PAnsiChar; __maxsize:size_t; __format:PAnsiChar; args:array of const):ssize_t;cdecl;external clib name 'strfmon';
+function strfmon(__s:PAnsiChar; __maxsize:size_t; __format:PAnsiChar):ssize_t;cdecl;varargs;external clib name 'strfmon';
+function __strfmon_l(__s:PAnsiChar; __maxsize:size_t; loc:__locale_t; __format:PAnsiChar; args:array of const):ssize_t;cdecl;external clib name '__strfmon_l';
+function __strfmon_l(__s:PAnsiChar; __maxsize:size_t; loc:__locale_t; __format:PAnsiChar):ssize_t;cdecl;varargs;external clib name '__strfmon_l';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/nax25h.inc

@@ -37,7 +37,7 @@ type
 
    Pax25_address = ^ax25_address;
    ax25_address = record
-        ax25_call : array[0..6] of char;
+        ax25_call : array[0..6] of AnsiChar;
      end;
    Psockaddr_ax25 = ^sockaddr_ax25;
    sockaddr_ax25 = record
@@ -106,7 +106,7 @@ type
 
    Pax25_bpqaddr_struct = ^ax25_bpqaddr_struct;
    ax25_bpqaddr_struct = record
-        dev : array[0..15] of char;
+        dev : array[0..15] of AnsiChar;
         addr : ax25_address;
      end;
 

packages/libc/src/netdbh.inc

@@ -23,19 +23,19 @@ const
   NO_ADDRESS = NO_DATA;
   SCOPE_DELIMITER = '%';
 
-procedure herror(__str:Pchar);cdecl;external clib name 'herror';
-function hstrerror(__err_num:longint):Pchar;cdecl;external clib name 'hstrerror';
+procedure herror(__str:PAnsiChar);cdecl;external clib name 'herror';
+function hstrerror(__err_num:longint):PAnsiChar;cdecl;external clib name 'hstrerror';
 
 type
   Phostent = ^hostent;
   hostent = record
-    h_name: PChar;
-    h_aliases: PPChar;
+    h_name: PAnsiChar;
+    h_aliases: PPAnsiChar;
     h_addrtype: Integer;
     h_length: socklen_t;
     case Byte of
-      0: (h_addr_list: PPChar);
-      1: (h_addr: PPChar);
+      0: (h_addr_list: PPAnsiChar);
+      1: (h_addr: PPAnsiChar);
   end;
   PPhostent = ^Phostent;
 
@@ -43,50 +43,50 @@ procedure sethostent(__stay_open:longint);cdecl;external clib name 'sethostent';
 procedure endhostent;cdecl;external clib name 'endhostent';
 function gethostent:Phostent;cdecl;external clib name 'gethostent';
 function gethostbyaddr(__addr:pointer; __len:__socklen_t; __type:longint):Phostent;cdecl;external clib name 'gethostbyaddr';
-function gethostbyname(__name:Pchar):Phostent;cdecl;external clib name 'gethostbyname';
-function gethostbyname2(__name:Pchar; __af:longint):Phostent;cdecl;external clib name 'gethostbyname2';
-function gethostent_r(__result_buf:Phostent; __buf:Pchar; __buflen:size_t; __result:PPhostent; __h_errnop:Plongint):longint;cdecl;external clib name 'gethostent_r';
-function gethostbyaddr_r(__addr:pointer; __len:__socklen_t; __type:longint; __result_buf:Phostent; __buf:Pchar;
+function gethostbyname(__name:PAnsiChar):Phostent;cdecl;external clib name 'gethostbyname';
+function gethostbyname2(__name:PAnsiChar; __af:longint):Phostent;cdecl;external clib name 'gethostbyname2';
+function gethostent_r(__result_buf:Phostent; __buf:PAnsiChar; __buflen:size_t; __result:PPhostent; __h_errnop:Plongint):longint;cdecl;external clib name 'gethostent_r';
+function gethostbyaddr_r(__addr:pointer; __len:__socklen_t; __type:longint; __result_buf:Phostent; __buf:PAnsiChar;
                __buflen:size_t; __result:PPhostent; __h_errnop:Plongint):longint;cdecl;external clib name 'gethostbyaddr_r';
-function gethostbyname_r(__name:Pchar; __result_buf:Phostent; __buf:Pchar; __buflen:size_t; __result:PPhostent;
+function gethostbyname_r(__name:PAnsiChar; __result_buf:Phostent; __buf:PAnsiChar; __buflen:size_t; __result:PPhostent;
                __h_errnop:Plongint):longint;cdecl;external clib name 'gethostbyname_r';
-function gethostbyname2_r(__name:Pchar; __af:longint; __result_buf:Phostent; __buf:Pchar; __buflen:size_t;
+function gethostbyname2_r(__name:PAnsiChar; __af:longint; __result_buf:Phostent; __buf:PAnsiChar; __buflen:size_t;
                __result:PPhostent; __h_errnop:Plongint):longint;cdecl;external clib name 'gethostbyname2_r';
 procedure setnetent(__stay_open:longint);cdecl;external clib name 'setnetent';
 procedure endnetent;cdecl;external clib name 'endnetent';
 function getnetent:Pnetent;cdecl;external clib name 'getnetent';
 function getnetbyaddr(__net:uint32_t; __type:longint):Pnetent;cdecl;external clib name 'getnetbyaddr';
-function getnetbyname(__name:Pchar):Pnetent;cdecl;external clib name 'getnetbyname';
-function getnetent_r(__result_buf:Pnetent; __buf:Pchar; __buflen:size_t; __result:PPnetent; __h_errnop:Plongint):longint;cdecl;external clib name 'getnetent_r';
-function getnetbyaddr_r(__net:uint32_t; __type:longint; __result_buf:Pnetent; __buf:Pchar; __buflen:size_t;
+function getnetbyname(__name:PAnsiChar):Pnetent;cdecl;external clib name 'getnetbyname';
+function getnetent_r(__result_buf:Pnetent; __buf:PAnsiChar; __buflen:size_t; __result:PPnetent; __h_errnop:Plongint):longint;cdecl;external clib name 'getnetent_r';
+function getnetbyaddr_r(__net:uint32_t; __type:longint; __result_buf:Pnetent; __buf:PAnsiChar; __buflen:size_t;
                __result:PPnetent; __h_errnop:Plongint):longint;cdecl;external clib name 'getnetbyaddr_r';
-function getnetbyname_r(__name:Pchar; __result_buf:Pnetent; __buf:Pchar; __buflen:size_t; __result:PPnetent;
+function getnetbyname_r(__name:PAnsiChar; __result_buf:Pnetent; __buf:PAnsiChar; __buflen:size_t; __result:PPnetent;
                __h_errnop:Plongint):longint;cdecl;external clib name 'getnetbyname_r';
 type
   Pservent = ^servent;
   servent = record
-       s_name : Pchar;
-       s_aliases : ^Pchar;
+       s_name : PAnsiChar;
+       s_aliases : ^PAnsiChar;
        s_port : longint;
-       s_proto : Pchar;
+       s_proto : PAnsiChar;
     end;
   PPservent = ^Pservent;
 
 procedure setservent(__stay_open:longint);cdecl;external clib name 'setservent';
 procedure endservent;cdecl;external clib name 'endservent';
 function getservent:Pservent;cdecl;external clib name 'getservent';
-function getservbyname(__name:Pchar; __proto:Pchar):Pservent;cdecl;external clib name 'getservbyname';
-function getservbyport(__port:longint; __proto:Pchar):Pservent;cdecl;external clib name 'getservbyport';
-function getservent_r(__result_buf:Pservent; __buf:Pchar; __buflen:size_t; __result:PPservent):longint;cdecl;external clib name 'getservent_r';
-function getservbyname_r(__name:Pchar; __proto:Pchar; __result_buf:Pservent; __buf:Pchar; __buflen:size_t;
+function getservbyname(__name:PAnsiChar; __proto:PAnsiChar):Pservent;cdecl;external clib name 'getservbyname';
+function getservbyport(__port:longint; __proto:PAnsiChar):Pservent;cdecl;external clib name 'getservbyport';
+function getservent_r(__result_buf:Pservent; __buf:PAnsiChar; __buflen:size_t; __result:PPservent):longint;cdecl;external clib name 'getservent_r';
+function getservbyname_r(__name:PAnsiChar; __proto:PAnsiChar; __result_buf:Pservent; __buf:PAnsiChar; __buflen:size_t;
                __result:PPservent):longint;cdecl;external clib name 'getservbyname_r';
-function getservbyport_r(__port:longint; __proto:Pchar; __result_buf:Pservent; __buf:Pchar; __buflen:size_t;
+function getservbyport_r(__port:longint; __proto:PAnsiChar; __result_buf:Pservent; __buf:PAnsiChar; __buflen:size_t;
                __result:PPservent):longint;cdecl;external clib name 'getservbyport_r';
 type
   Pprotoent = ^protoent;
   protoent = record
-       p_name : Pchar;
-       p_aliases : ^Pchar;
+       p_name : PAnsiChar;
+       p_aliases : ^PAnsiChar;
        p_proto : longint;
     end;
   PPprotoent =  ^Pprotoent;
@@ -94,27 +94,27 @@ type
 procedure setprotoent(__stay_open:longint);cdecl;external clib name 'setprotoent';
 procedure endprotoent;cdecl;external clib name 'endprotoent';
 function getprotoent:Pprotoent;cdecl;external clib name 'getprotoent';
-function getprotobyname(__name:Pchar):Pprotoent;cdecl;external clib name 'getprotobyname';
+function getprotobyname(__name:PAnsiChar):Pprotoent;cdecl;external clib name 'getprotobyname';
 function getprotobynumber(__proto:longint):Pprotoent;cdecl;external clib name 'getprotobynumber';
-function getprotoent_r(__result_buf:Pprotoent; __buf:Pchar; __buflen:size_t; __result:PPprotoent):longint;cdecl;external clib name 'getprotoent_r';
-function getprotobyname_r(__name:Pchar; __result_buf:Pprotoent; __buf:Pchar; __buflen:size_t; __result:PPprotoent):longint;cdecl;external clib name 'getprotobyname_r';
-function getprotobynumber_r(__proto:longint; __result_buf:Pprotoent; __buf:Pchar; __buflen:size_t; __result:PPprotoent):longint;cdecl;external clib name 'getprotobynumber_r';
-function setnetgrent(__netgroup:Pchar):longint;cdecl;external clib name 'setnetgrent';
+function getprotoent_r(__result_buf:Pprotoent; __buf:PAnsiChar; __buflen:size_t; __result:PPprotoent):longint;cdecl;external clib name 'getprotoent_r';
+function getprotobyname_r(__name:PAnsiChar; __result_buf:Pprotoent; __buf:PAnsiChar; __buflen:size_t; __result:PPprotoent):longint;cdecl;external clib name 'getprotobyname_r';
+function getprotobynumber_r(__proto:longint; __result_buf:Pprotoent; __buf:PAnsiChar; __buflen:size_t; __result:PPprotoent):longint;cdecl;external clib name 'getprotobynumber_r';
+function setnetgrent(__netgroup:PAnsiChar):longint;cdecl;external clib name 'setnetgrent';
 procedure endnetgrent;cdecl;external clib name 'endnetgrent';
-function getnetgrent(__hostp:PPchar; __userp:PPchar; __domainp:PPchar):longint;cdecl;external clib name 'getnetgrent';
-function innetgr(__netgroup:Pchar; __host:Pchar; __user:Pchar; domain:Pchar):longint;cdecl;external clib name 'innetgr';
-function getnetgrent_r(__hostp:PPchar; __userp:PPchar; __domainp:PPchar; __buffer:Pchar; __buflen:size_t):longint;cdecl;external clib name 'getnetgrent_r';
+function getnetgrent(__hostp:PPAnsiChar; __userp:PPAnsiChar; __domainp:PPAnsiChar):longint;cdecl;external clib name 'getnetgrent';
+function innetgr(__netgroup:PAnsiChar; __host:PAnsiChar; __user:PAnsiChar; domain:PAnsiChar):longint;cdecl;external clib name 'innetgr';
+function getnetgrent_r(__hostp:PPAnsiChar; __userp:PPAnsiChar; __domainp:PPAnsiChar; __buffer:PAnsiChar; __buflen:size_t):longint;cdecl;external clib name 'getnetgrent_r';
 
-function rcmd(__ahost:PPchar; __rport:word; __locuser:Pchar; __remuser:Pchar; __cmd:Pchar;
+function rcmd(__ahost:PPAnsiChar; __rport:word; __locuser:PAnsiChar; __remuser:PAnsiChar; __cmd:PAnsiChar;
                __fd2p:Plongint):longint;cdecl;external clib name 'rcmd';
-function rcmd_af(__ahost:PPchar; __rport:word; __locuser:Pchar; __remuser:Pchar; __cmd:Pchar;
+function rcmd_af(__ahost:PPAnsiChar; __rport:word; __locuser:PAnsiChar; __remuser:PAnsiChar; __cmd:PAnsiChar;
                __fd2p:Plongint; __af:sa_family_t):longint;cdecl;external clib name 'rcmd_af';
-function rexec(__ahost:PPchar; __rport:longint; __name:Pchar; __pass:Pchar; __cmd:Pchar;
+function rexec(__ahost:PPAnsiChar; __rport:longint; __name:PAnsiChar; __pass:PAnsiChar; __cmd:PAnsiChar;
                __fd2p:Plongint):longint;cdecl;external clib name 'rexec';
-function rexec_af(__ahost:PPchar; __rport:longint; __name:Pchar; __pass:Pchar; __cmd:Pchar;
+function rexec_af(__ahost:PPAnsiChar; __rport:longint; __name:PAnsiChar; __pass:PAnsiChar; __cmd:PAnsiChar;
                __fd2p:Plongint; __af:sa_family_t):longint;cdecl;external clib name 'rexec_af';
-function ruserok(__rhost:Pchar; __suser:longint; __remuser:Pchar; __locuser:Pchar):longint;cdecl;external clib name 'ruserok';
-function ruserok_af(__rhost:Pchar; __suser:longint; __remuser:Pchar; __locuser:Pchar; __af:sa_family_t):longint;cdecl;external clib name 'ruserok_af';
+function ruserok(__rhost:PAnsiChar; __suser:longint; __remuser:PAnsiChar; __locuser:PAnsiChar):longint;cdecl;external clib name 'ruserok';
+function ruserok_af(__rhost:PAnsiChar; __suser:longint; __remuser:PAnsiChar; __locuser:PAnsiChar; __af:sa_family_t):longint;cdecl;external clib name 'ruserok_af';
 function rresvport(__alport:Plongint):longint;cdecl;external clib name 'rresvport';
 function rresvport_af(__alport:Plongint; __af:sa_family_t):longint;cdecl;external clib name 'rresvport_af';
 
@@ -127,15 +127,15 @@ type
        ai_protocol : longint;
        ai_addrlen : socklen_t;
        ai_addr : Psockaddr;
-       ai_canonname : Pchar;
+       ai_canonname : PAnsiChar;
        ai_next : Paddrinfo;
     end;
   PPaddrinfo = ^Paddrinfo;
 
   Pgaicb = ^gaicb;
   gaicb = record
-       ar_name : Pchar;
-       ar_service : Pchar;
+       ar_name : PAnsiChar;
+       ar_service : PAnsiChar;
        ar_request : Paddrinfo;
        ar_result : Paddrinfo;
        __return : longint;
@@ -177,10 +177,10 @@ const
   NI_NAMEREQD = 8;
   NI_DGRAM = 16;
 
-function getaddrinfo(__name:Pchar; __service:Pchar; __req:Paddrinfo; __pai:PPaddrinfo):longint;cdecl;external clib name 'getaddrinfo';
+function getaddrinfo(__name:PAnsiChar; __service:PAnsiChar; __req:Paddrinfo; __pai:PPaddrinfo):longint;cdecl;external clib name 'getaddrinfo';
 procedure freeaddrinfo(__ai:Paddrinfo);cdecl;external clib name 'freeaddrinfo';
-function gai_strerror(__ecode:longint):Pchar;cdecl;external clib name 'gai_strerror';
-function getnameinfo(__sa:Psockaddr; __salen:socklen_t; __host:Pchar; __hostlen:socklen_t; __serv:Pchar;
+function gai_strerror(__ecode:longint):PAnsiChar;cdecl;external clib name 'gai_strerror';
+function getnameinfo(__sa:Psockaddr; __salen:socklen_t; __host:PAnsiChar; __hostlen:socklen_t; __serv:PAnsiChar;
                __servlen:socklen_t; __flags:dword):longint;cdecl;external clib name 'getnameinfo';
 function getaddrinfo_a(__mode:longint; __list: PPgaicb; __ent:longint; __sig:Psigevent):longint;cdecl;external clib name 'getaddrinfo_a';
 function gai_suspend(__list:array of Pgaicb; __ent:longint; __timeout:Ptimespec):longint;cdecl;external clib name 'gai_suspend';

packages/libc/src/netherh.inc

@@ -2,13 +2,13 @@
 const
    _NETINET_ETHER_H = 1;
 
-function ether_ntoa(__addr:Pether_addr):Pchar;cdecl;external clib name 'ether_ntoa';
-function ether_ntoa_r(__addr:Pether_addr; __buf:Pchar):Pchar;cdecl;external clib name 'ether_ntoa_r';
-function ether_aton(__asc:Pchar):Pether_addr;cdecl;external clib name 'ether_aton';
-function ether_aton_r(__asc:Pchar; __addr:Pether_addr):Pether_addr;cdecl;external clib name 'ether_aton_r';
-function ether_ntohost(__hostname:Pchar; __addr:Pether_addr):longint;cdecl;external clib name 'ether_ntohost';
-function ether_hostton(__hostname:Pchar; __addr:Pether_addr):longint;cdecl;external clib name 'ether_hostton';
-function ether_line(__line:Pchar; __addr:Pether_addr; __hostname:Pchar):longint;cdecl;external clib name 'ether_line';
+function ether_ntoa(__addr:Pether_addr):PAnsiChar;cdecl;external clib name 'ether_ntoa';
+function ether_ntoa_r(__addr:Pether_addr; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'ether_ntoa_r';
+function ether_aton(__asc:PAnsiChar):Pether_addr;cdecl;external clib name 'ether_aton';
+function ether_aton_r(__asc:PAnsiChar; __addr:Pether_addr):Pether_addr;cdecl;external clib name 'ether_aton_r';
+function ether_ntohost(__hostname:PAnsiChar; __addr:Pether_addr):longint;cdecl;external clib name 'ether_ntohost';
+function ether_hostton(__hostname:PAnsiChar; __addr:Pether_addr):longint;cdecl;external clib name 'ether_hostton';
+function ether_line(__line:PAnsiChar; __addr:Pether_addr; __hostname:PAnsiChar):longint;cdecl;external clib name 'ether_line';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/nif_arph.inc

@@ -77,7 +77,7 @@ type
         arp_ha : sockaddr;
         arp_flags : longint;
         arp_netmask : sockaddr;
-        arp_dev : array[0..15] of char;
+        arp_dev : array[0..15] of AnsiChar;
      end;
 
    Parpreq_old = ^arpreq_old;

packages/libc/src/nif_shaperh.inc

@@ -13,7 +13,7 @@ type
   Pshaperconf = ^shaperconf;
   shaperconf_u = record
     case Integer of
-      0: (ssu_name: packed array[0..14-1] of Char);
+      0: (ssu_name: packed array[0..14-1] of AnsiChar);
       1: (ssu_speed: u_int32_t);
   end;
 

packages/libc/src/nifh.inc

@@ -6,7 +6,7 @@ type
    Pif_nameindex = ^_if_nameindex;
    _if_nameindex = record
         if_index : dword;
-        if_name : Pchar;
+        if_name : PAnsiChar;
      end;
    P_if_nameindex = ^_if_nameindex;
 
@@ -60,7 +60,7 @@ type
    ifreq = record
         ifr_ifrn : record
             case longint of
-               0 : ( ifrn_name : array[0..(IFNAMSIZ)-1] of char );
+               0 : ( ifrn_name : array[0..(IFNAMSIZ)-1] of AnsiChar );
             end;
         ifr_ifru : record
             case longint of
@@ -73,8 +73,8 @@ type
                6 : ( ifru_ivalue : longint );
                7 : ( ifru_mtu : longint );
                8 : ( ifru_map : ifmap );
-               9 : ( ifru_slave : array[0..(IFNAMSIZ)-1] of char );
-               10 : ( ifru_newname : array[0..(IFNAMSIZ)-1] of char );
+               9 : ( ifru_slave : array[0..(IFNAMSIZ)-1] of AnsiChar );
+               10 : ( ifru_newname : array[0..(IFNAMSIZ)-1] of AnsiChar );
                11 : ( ifru_data : __caddr_t );
             end;
      end;
@@ -90,8 +90,8 @@ type
      end;
 
 
-function if_nametoindex(__ifname:Pchar):dword;cdecl;external clib name 'if_nametoindex';
-function if_indextoname(__ifindex:dword; __ifname:Pchar):Pchar;cdecl;external clib name 'if_indextoname';
+function if_nametoindex(__ifname:PAnsiChar):dword;cdecl;external clib name 'if_nametoindex';
+function if_indextoname(__ifindex:dword; __ifname:PAnsiChar):PAnsiChar;cdecl;external clib name 'if_indextoname';
 function if_nameindex:Pif_nameindex;cdecl;external clib name 'if_nameindex';
 procedure if_freenameindex(__ptr:Pif_nameindex);cdecl;external clib name 'if_freenameindex';
 

packages/libc/src/nl_typesh.inc

@@ -11,8 +11,8 @@ type
    Pnl_item = ^nl_item;
    nl_item = longint;
 
-function catopen(__cat_name:Pchar; __flag:longint):nl_catd;cdecl;external clib name 'catopen';
-function catgets(__catalog:nl_catd; __set:longint; __number:longint; __string:Pchar):Pchar;cdecl;external clib name 'catgets';
+function catopen(__cat_name:PAnsiChar; __flag:longint):nl_catd;cdecl;external clib name 'catopen';
+function catgets(__catalog:nl_catd; __set:longint; __number:longint; __string:PAnsiChar):PAnsiChar;cdecl;external clib name 'catgets';
 function catclose(__catalog:nl_catd):longint;cdecl;external clib name 'catclose';
 
 { ---------------------------------------------------------------------

packages/libc/src/nnetromh.inc

@@ -16,9 +16,9 @@ type
    nr_route_struct = record
         _type : longint;
         callsign : ax25_address;
-        device : array[0..15] of char;
+        device : array[0..15] of AnsiChar;
         quality : dword;
-        mnemonic : array[0..6] of char;
+        mnemonic : array[0..6] of AnsiChar;
         neighbour : ax25_address;
         obs_count : dword;
         ndigis : dword;

packages/libc/src/nroseh.inc

@@ -33,7 +33,7 @@ type
 
    Prose_address = ^rose_address;
    rose_address = record
-        rose_addr : array[0..4] of char;
+        rose_addr : array[0..4] of AnsiChar;
      end;
    Psockaddr_rose = ^sockaddr_rose;
    sockaddr_rose = record
@@ -58,7 +58,7 @@ type
         address : rose_address;
         mask : word;
         neighbour : ax25_address;
-        device : array[0..15] of char;
+        device : array[0..15] of AnsiChar;
         ndigis : byte;
         digipeaters : array[0..(AX25_MAX_DIGIS)-1] of ax25_address;
      end;

packages/libc/src/nrouteh.inc

@@ -14,7 +14,7 @@ type
         rt_class : byte;
         rt_pad4 : smallint;
         rt_metric : smallint;
-        rt_dev : Pchar;
+        rt_dev : PAnsiChar;
         rt_mtu : dword;
         rt_window : dword;
         rt_irtt : word;

packages/libc/src/nssh.inc

@@ -9,7 +9,7 @@ type
     NSS_STATUS_RETURN := 2
   );
 
-function __nss_configure_lookup(__dbname:Pchar; __string:Pchar):longint;cdecl;external clib name '__nss_configure_lookup';
+function __nss_configure_lookup(__dbname:PAnsiChar; __string:PAnsiChar):longint;cdecl;external clib name '__nss_configure_lookup';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/printfh.inc

@@ -13,7 +13,7 @@ type
   printf_arginfo_function = function(const __info: printf_info; __n: size_t; var __argtypes: Integer): Integer; cdecl;
 
 function register_printf_function(__spec:longint; __func:printf_function; __arginfo:printf_arginfo_function):longint;cdecl;external clib name 'register_printf_function';
-function parse_printf_format(__fmt:Pchar; __n:size_t; __argtypes:Plongint):size_t;cdecl;external clib name 'parse_printf_format';
+function parse_printf_format(__fmt:PAnsiChar; __n:size_t; __argtypes:Plongint):size_t;cdecl;external clib name 'parse_printf_format';
 
 Const
   PA_INT = 0;

packages/libc/src/proutedh.inc

@@ -17,7 +17,7 @@ type
         ripun : record
             case longint of
                0 : ( ru_nets : array[0..0] of netinfo );
-               1 : ( ru_tracefile : array[0..0] of char );
+               1 : ( ru_tracefile : array[0..0] of AnsiChar );
             end;
      end;
 
@@ -29,7 +29,7 @@ const
    RIPCMD_TRACEOFF = 4;
    RIPCMD_MAX = 5;
 
-   ripcmds : array [0..RIPCMD_MAX-1] of pchar = ( ''#0, 'REQUEST', 'RESPONSE', 'TRACEON', 'TRACEOFF' );
+   ripcmds : array [0..RIPCMD_MAX-1] of PAnsiChar = ( ''#0, 'REQUEST', 'RESPONSE', 'TRACEON', 'TRACEOFF' );
 
 const
    HOPCNT_INFINITY = 16;

packages/libc/src/prwhodh.inc

@@ -2,8 +2,8 @@
 type
    Poutmp = ^outmp;
    outmp = record
-        out_line : array[0..7] of char;
-        out_name : array[0..7] of char;
+        out_line : array[0..7] of AnsiChar;
+        out_name : array[0..7] of AnsiChar;
         out_time : int32_t;
      end;
 
@@ -14,12 +14,12 @@ type
 
    Pwhod = ^whod;
    whod = record
-        wd_vers : char;
-        wd_type : char;
-        wd_pad : array[0..1] of char;
+        wd_vers : AnsiChar;
+        wd_type : AnsiChar;
+        wd_pad : array[0..1] of AnsiChar;
         wd_sendtime : longint;
         wd_recvtime : longint;
-        wd_hostname : array[0..31] of char;
+        wd_hostname : array[0..31] of AnsiChar;
         wd_loadav : array[0..2] of longint;
         wd_boottime : longint;
         wd_we: packed array[0..(1024 div SizeOf(whoent))-1] of whoent;

packages/libc/src/ptalkdh.inc

@@ -15,9 +15,9 @@ type
         addr : osockaddr;
         ctl_addr : osockaddr;
         pid : int32_t;
-        l_name : array[0..(NAME_SIZE)-1] of char;
-        r_name : array[0..(NAME_SIZE)-1] of char;
-        r_tty : array[0..(TTY_SIZE)-1] of char;
+        l_name : array[0..(NAME_SIZE)-1] of AnsiChar;
+        r_name : array[0..(NAME_SIZE)-1] of AnsiChar;
+        r_tty : array[0..(TTY_SIZE)-1] of AnsiChar;
      end;
 
    PCTL_RESPONSE = ^CTL_RESPONSE;

packages/libc/src/ptimedh.inc

@@ -12,9 +12,9 @@ type
         tsp_u : record
             case longint of
                0 : ( tspu_time : timeval );
-               1 : ( tspu_hopcnt : char );
+               1 : ( tspu_hopcnt : AnsiChar );
             end;
-        tsp_name : array[0..(MAXHOSTNAMELEN)-1] of char;
+        tsp_name : array[0..(MAXHOSTNAMELEN)-1] of AnsiChar;
      end;
 
 
@@ -46,7 +46,7 @@ const
    TSP_LOOP = 24;
    TSPTYPENUMBER = 25;
 
-   tsptype : array [0..TSPTYPENUMBER-1] of pchar =
+   tsptype : array [0..TSPTYPENUMBER-1] of PAnsiChar =
   (
    'ANY', 'ADJTIME', 'ACK', 'MASTERREQ', 'MASTERACK', 'SETTIME', 'MASTERUP',
    'SLAVEUP', 'ELECTION', 'ACCEPT', 'REFUSE', 'CONFLICT', 'RESOLVE', 'QUIT',

packages/libc/src/ptyh.inc

@@ -1,6 +1,6 @@
 
-function openpty(__amaster:Plongint; __aslave:Plongint; __name:Pchar; __termp:Ptermios; __winp:Pwinsize):longint;cdecl;external clib name 'openpty';
-function forkpty(__amaster:Plongint; __name:Pchar; __termp:Ptermios; __winp:Pwinsize):longint;cdecl;external clib name 'forkpty';
+function openpty(__amaster:Plongint; __aslave:Plongint; __name:PAnsiChar; __termp:Ptermios; __winp:Pwinsize):longint;cdecl;external clib name 'openpty';
+function forkpty(__amaster:Plongint; __name:PAnsiChar; __termp:Ptermios; __winp:Pwinsize):longint;cdecl;external clib name 'forkpty';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/pwdh.inc

@@ -2,13 +2,13 @@
 type
    Ppasswd = ^passwd;
    passwd = record
-        pw_name : Pchar;
-        pw_passwd : Pchar;
+        pw_name : PAnsiChar;
+        pw_passwd : PAnsiChar;
         pw_uid : __uid_t;
         pw_gid : __gid_t;
-        pw_gecos : Pchar;
-        pw_dir : Pchar;
-        pw_shell : Pchar;
+        pw_gecos : PAnsiChar;
+        pw_dir : PAnsiChar;
+        pw_shell : PAnsiChar;
      end;
    PPpasswd = ^Ppasswd;
 
@@ -18,16 +18,16 @@ function getpwent:Ppasswd;cdecl;external clib name 'getpwent';
 function fgetpwent(__stream:PFILE):Ppasswd;cdecl;external clib name 'fgetpwent';
 function putpwent(__p:Ppasswd; __f:PFILE):longint;cdecl;external clib name 'putpwent';
 function getpwuid(__uid:__uid_t):Ppasswd;cdecl;external clib name 'getpwuid';
-function getpwnam(__name:Pchar):Ppasswd;cdecl;external clib name 'getpwnam';
+function getpwnam(__name:PAnsiChar):Ppasswd;cdecl;external clib name 'getpwnam';
 
 const
    NSS_BUFLEN_PASSWD = 1024;
 
-function getpwent_r(__resultbuf:Ppasswd; __buffer:Pchar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'getpwent_r';
-function getpwuid_r(__uid:__uid_t; __resultbuf:Ppasswd; __buffer:Pchar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'getpwuid_r';
-function getpwnam_r(__name:Pchar; __resultbuf:Ppasswd; __buffer:Pchar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'getpwnam_r';
-function fgetpwent_r(__stream:PFILE; __resultbuf:Ppasswd; __buffer:Pchar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'fgetpwent_r';
-function getpw(__uid:__uid_t; __buffer:Pchar):longint;cdecl;external clib name 'getpw';
+function getpwent_r(__resultbuf:Ppasswd; __buffer:PAnsiChar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'getpwent_r';
+function getpwuid_r(__uid:__uid_t; __resultbuf:Ppasswd; __buffer:PAnsiChar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'getpwuid_r';
+function getpwnam_r(__name:PAnsiChar; __resultbuf:Ppasswd; __buffer:PAnsiChar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'getpwnam_r';
+function fgetpwent_r(__stream:PFILE; __resultbuf:Ppasswd; __buffer:PAnsiChar; __buflen:size_t; __result:PPpasswd):longint;cdecl;external clib name 'fgetpwent_r';
+function getpw(__uid:__uid_t; __buffer:PAnsiChar):longint;cdecl;external clib name 'getpw';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
@@ -38,7 +38,7 @@ Type
   PPasswordRecord = ^TPasswordRecord;
 
 function putpwent(const __p:passwd; __f:PFILE):longint;cdecl;external clib name 'putpwent';
-function getpwent_r(var __resultbuf:passwd; __buffer:Pchar; __buflen:size_t; var __result:Ppasswd):longint;cdecl;external clib name 'getpwent_r';
-function getpwuid_r(__uid:__uid_t; var __resultbuf:passwd; __buffer:Pchar; __buflen:size_t; var __result: Ppasswd):longint;cdecl;external clib name 'getpwuid_r';
-function getpwnam_r(__name:Pchar; var __resultbuf:passwd; __buffer:Pchar; __buflen:size_t; var __result:Ppasswd):longint;cdecl;external clib name 'getpwnam_r';
-function fgetpwent_r(__stream:PFILE; var __resultbuf:passwd; __buffer:Pchar; __buflen:size_t; var __result:Ppasswd):longint;cdecl;external clib name 'fgetpwent_r';
+function getpwent_r(var __resultbuf:passwd; __buffer:PAnsiChar; __buflen:size_t; var __result:Ppasswd):longint;cdecl;external clib name 'getpwent_r';
+function getpwuid_r(__uid:__uid_t; var __resultbuf:passwd; __buffer:PAnsiChar; __buflen:size_t; var __result: Ppasswd):longint;cdecl;external clib name 'getpwuid_r';
+function getpwnam_r(__name:PAnsiChar; var __resultbuf:passwd; __buffer:PAnsiChar; __buflen:size_t; var __result:Ppasswd):longint;cdecl;external clib name 'getpwnam_r';
+function fgetpwent_r(__stream:PFILE; var __resultbuf:passwd; __buffer:PAnsiChar; __buflen:size_t; var __result:Ppasswd):longint;cdecl;external clib name 'fgetpwent_r';

packages/libc/src/regexh.inc

@@ -66,7 +66,7 @@ const
    REG_NOTEOL = 1 shl 1;
 
 type
-  RE_TRANSLATE_TYPE = PChar;
+  RE_TRANSLATE_TYPE = PAnsiChar;
 
 const
   REGS_UNALLOCATED = 0;
@@ -102,7 +102,7 @@ type
     allocated: LongWord;
     used: LongWord;
     syntax: reg_syntax_t;
-    fastmap: PChar;
+    fastmap: PAnsiChar;
     translate: RE_TRANSLATE_TYPE;
     re_nsub: size_t;
     __bitfield: Cardinal; (* In this case 8 bits use 32 bits *)
@@ -130,19 +130,19 @@ type
   end;
 
 function re_set_syntax(syntax:reg_syntax_t):reg_syntax_t;cdecl;external clib name 're_set_syntax';
-function re_compile_pattern(pattern:Pchar; length:size_t; buffer:Pre_pattern_buffer):Pchar;cdecl;external clib name 're_compile_pattern';
+function re_compile_pattern(pattern:PAnsiChar; length:size_t; buffer:Pre_pattern_buffer):PAnsiChar;cdecl;external clib name 're_compile_pattern';
 function re_compile_fastmap(buffer:Pre_pattern_buffer):longint;cdecl;external clib name 're_compile_fastmap';
-function re_search(buffer:Pre_pattern_buffer; _string:Pchar; length:longint; start:longint; range:longint;
+function re_search(buffer:Pre_pattern_buffer; _string:PAnsiChar; length:longint; start:longint; range:longint;
            regs:Pre_registers):longint;cdecl;external clib name 're_search';
-function re_search_2(buffer:Pre_pattern_buffer; string1:Pchar; length1:longint; string2:Pchar; length2:longint;
+function re_search_2(buffer:Pre_pattern_buffer; string1:PAnsiChar; length1:longint; string2:PAnsiChar; length2:longint;
            start:longint; range:longint; regs:Pre_registers; stop:longint):longint;cdecl;external clib name 're_search_2';
-function re_match(buffer:Pre_pattern_buffer; _string:Pchar; length:longint; start:longint; regs:Pre_registers):longint;cdecl;external clib name 're_match';
-function re_match_2(buffer:Pre_pattern_buffer; string1:Pchar; length1:longint; string2:Pchar; length2:longint;
+function re_match(buffer:Pre_pattern_buffer; _string:PAnsiChar; length:longint; start:longint; regs:Pre_registers):longint;cdecl;external clib name 're_match';
+function re_match_2(buffer:Pre_pattern_buffer; string1:PAnsiChar; length1:longint; string2:PAnsiChar; length2:longint;
            start:longint; regs:Pre_registers; stop:longint):longint;cdecl;external clib name 're_match_2';
 procedure re_set_registers(buffer:Pre_pattern_buffer; regs:Pre_registers; num_regs:dword; starts:Pregoff_t; ends:Pregoff_t);cdecl;external clib name 're_set_registers';
-function regcomp(__preg:Pregex_t; __pattern:Pchar; __cflags:longint):longint;cdecl;external clib name 'regcomp';
-function regexec(__preg:Pregex_t; __string:Pchar; __nmatch:size_t; __pmatch:array of regmatch_t; __eflags:longint):longint;cdecl;external clib name 'regexec';
-function regerror(__errcode:longint; __preg:Pregex_t; __errbuf:Pchar; __errbuf_size:size_t):size_t;cdecl;external clib name 'regerror';
+function regcomp(__preg:Pregex_t; __pattern:PAnsiChar; __cflags:longint):longint;cdecl;external clib name 'regcomp';
+function regexec(__preg:Pregex_t; __string:PAnsiChar; __nmatch:size_t; __pmatch:array of regmatch_t; __eflags:longint):longint;cdecl;external clib name 'regexec';
+function regerror(__errcode:longint; __preg:Pregex_t; __errbuf:PAnsiChar; __errbuf_size:size_t):size_t;cdecl;external clib name 'regerror';
 procedure regfree(__preg:Pregex_t);cdecl;external clib name 'regfree';
 
 
@@ -166,19 +166,19 @@ Type
   TRegMatch = regmatch_t;
   PRegMatch = ^TRegMatch;
 
-function re_compile_pattern(pattern:Pchar; length:size_t; var buffer: re_pattern_buffer):Pchar;cdecl;external clib name 're_compile_pattern';
+function re_compile_pattern(pattern:PAnsiChar; length:size_t; var buffer: re_pattern_buffer):PAnsiChar;cdecl;external clib name 're_compile_pattern';
 function re_compile_fastmap(var buffer: re_pattern_buffer):longint;cdecl;external clib name 're_compile_fastmap';
-function re_search(var buffer:re_pattern_buffer; _string:Pchar; length:longint; start:longint; range:longint; regs:Pre_registers):longint;cdecl;external clib name 're_search';
-function re_search(var buffer:re_pattern_buffer; _string:Pchar; length:longint; start:longint; range:longint; var regs:re_registers):longint;cdecl;external clib name 're_search';
-function re_search_2(var buffer:re_pattern_buffer; string1:Pchar; length1:longint; string2:Pchar; length2:longint; start:longint; range:longint; regs:Pre_registers; stop:longint):longint;cdecl;external clib name 're_search_2';
-function re_search_2(var buffer:re_pattern_buffer; string1:Pchar; length1:longint; string2:Pchar; length2:longint; start:longint; range:longint; var regs:re_registers; stop:longint):longint;cdecl;external clib name 're_search_2';
-function re_match(var buffer:re_pattern_buffer; _string:Pchar; length:longint; start:longint; regs:Pre_registers):longint;cdecl;external clib name 're_match';
-function re_match(var buffer:re_pattern_buffer; _string:Pchar; length:longint; start:longint; var regs:re_registers):longint;cdecl;external clib name 're_match';
-function re_match_2(var buffer:re_pattern_buffer; string1:Pchar; length1:longint; string2:Pchar; length2:longint; start:longint; regs:Pre_registers; stop:longint):longint;cdecl;external clib name 're_match_2';
-function re_match_2(var buffer:re_pattern_buffer; string1:Pchar; length1:longint; string2:Pchar; length2:longint; start:longint; var regs:re_registers; stop:longint):longint;cdecl;external clib name 're_match_2';
+function re_search(var buffer:re_pattern_buffer; _string:PAnsiChar; length:longint; start:longint; range:longint; regs:Pre_registers):longint;cdecl;external clib name 're_search';
+function re_search(var buffer:re_pattern_buffer; _string:PAnsiChar; length:longint; start:longint; range:longint; var regs:re_registers):longint;cdecl;external clib name 're_search';
+function re_search_2(var buffer:re_pattern_buffer; string1:PAnsiChar; length1:longint; string2:PAnsiChar; length2:longint; start:longint; range:longint; regs:Pre_registers; stop:longint):longint;cdecl;external clib name 're_search_2';
+function re_search_2(var buffer:re_pattern_buffer; string1:PAnsiChar; length1:longint; string2:PAnsiChar; length2:longint; start:longint; range:longint; var regs:re_registers; stop:longint):longint;cdecl;external clib name 're_search_2';
+function re_match(var buffer:re_pattern_buffer; _string:PAnsiChar; length:longint; start:longint; regs:Pre_registers):longint;cdecl;external clib name 're_match';
+function re_match(var buffer:re_pattern_buffer; _string:PAnsiChar; length:longint; start:longint; var regs:re_registers):longint;cdecl;external clib name 're_match';
+function re_match_2(var buffer:re_pattern_buffer; string1:PAnsiChar; length1:longint; string2:PAnsiChar; length2:longint; start:longint; regs:Pre_registers; stop:longint):longint;cdecl;external clib name 're_match_2';
+function re_match_2(var buffer:re_pattern_buffer; string1:PAnsiChar; length1:longint; string2:PAnsiChar; length2:longint; start:longint; var regs:re_registers; stop:longint):longint;cdecl;external clib name 're_match_2';
 procedure re_set_registers(var buffer:re_pattern_buffer; var regs:re_registers; num_regs:dword; var starts:regoff_t; var ends:regoff_t);cdecl;external clib name 're_set_registers';
-function regcomp(var __preg:regex_t; __pattern:Pchar; __cflags:longint):longint;cdecl;external clib name 'regcomp';
-function regexec(var __preg:regex_t; __string:Pchar; __nmatch:size_t; __pmatch: Pregmatch_t; __eflags:longint):longint;cdecl;external clib name 'regexec';
-function regerror(__errcode:longint; const __preg:regex_t; __errbuf:Pchar; __errbuf_size:size_t):size_t;cdecl;external clib name 'regerror';
+function regcomp(var __preg:regex_t; __pattern:PAnsiChar; __cflags:longint):longint;cdecl;external clib name 'regcomp';
+function regexec(var __preg:regex_t; __string:PAnsiChar; __nmatch:size_t; __pmatch: Pregmatch_t; __eflags:longint):longint;cdecl;external clib name 'regexec';
+function regerror(__errcode:longint; const __preg:regex_t; __errbuf:PAnsiChar; __errbuf_size:size_t):size_t;cdecl;external clib name 'regerror';
 procedure regfree(var __preg:regex_t);cdecl;external clib name 'regfree';
 

packages/libc/src/regexph.inc

@@ -9,15 +9,15 @@ const
 {$include <stdlib.h>}
 {$include <string.h>}
   var
-     loc1 : Pchar;cvar;external;
-     loc2 : Pchar;cvar;external;
-     locs : Pchar;cvar;external;
+     loc1 : PAnsiChar;cvar;external;
+     loc2 : PAnsiChar;cvar;external;
+     locs : PAnsiChar;cvar;external;
 {$ifndef __DO_NOT_DEFINE_COMPILE}
 (* error
 {
  in declarator_list *)
   var
- : char;
+ : AnsiChar;
 (* error
   size_t __input_size = 0;
  in declarator_list *)
@@ -42,7 +42,7 @@ const
   expbuf += __req;
 in declaration at line 122 *)
 (* error
-  expbuf -= (expbuf - ((char *) 0)) % __req;
+  expbuf -= (expbuf - ((AnsiChar *) 0)) % __req;
 in declaration at line 123 *)
 (* error
   if (endbuf < expbuf + sizeof (regex_t))
@@ -56,9 +56,9 @@ in declaration at line 128 *)
   __expr_ptr->buffer = expbuf + sizeof (regex_t);
  in declarator_list *)
 (* error
-  __expr_ptr->allocated = endbuf -  (char *) __expr_ptr->buffer;
+  __expr_ptr->allocated = endbuf -  (AnsiChar *) __expr_ptr->buffer;
 (* error
-  __expr_ptr->allocated = endbuf -  (char *) __expr_ptr->buffer;
+  __expr_ptr->allocated = endbuf -  (AnsiChar *) __expr_ptr->buffer;
  in declarator_list *)
 (* error
   while ((__ch = (GETC ())) != eof)
@@ -70,13 +70,13 @@ in declaration at line 139 *)
         }
 in declaration at line 144 *)
 (* error
-          char *__new_room = (char *) alloca (__new_size);
+          AnsiChar *__new_room = (AnsiChar *) alloca (__new_size);
  in declarator_list *)
 (* error
           if (__new_room + __new_size == __input_buffer)
  in declarator_list *)
 (* error
-              __input_buffer = (char *) memcpy (__new_room, __input_buffer,
+              __input_buffer = (AnsiChar *) memcpy (__new_room, __input_buffer,
 in declaration at line 151 *)
 (* error
             }
@@ -85,7 +85,7 @@ in declaration at line 154 *)
             {
 in declaration at line 157 *)
 (* error
-              __input_buffer = (char *) memcpy (__new_room, __input_buffer,
+              __input_buffer = (AnsiChar *) memcpy (__new_room, __input_buffer,
 in declaration at line 159 *)
 (* error
             }
@@ -117,7 +117,7 @@ in declaration at line 200 *)
 {$endif}
 in declaration at line 210 *)
 
-function advance(__string:Pchar; __expbuf:Pchar):longint;cdecl;external clib name 'advance';
+function advance(__string:PAnsiChar; __expbuf:PAnsiChar):longint;cdecl;external clib name 'advance';
 {$endif}
 
 

packages/libc/src/saccth.inc

@@ -9,7 +9,7 @@ type
 
   Pacct = ^_acct;
   _acct = record
-    ac_flag : char;
+    ac_flag : AnsiChar;
     ac_uid : u_int16_t;
     ac_gid : u_int16_t;
     ac_tty : u_int16_t;
@@ -24,8 +24,8 @@ type
     ac_majflt : comp_t;
     ac_swaps : comp_t;
     ac_exitcode : u_int32_t;
-    ac_comm : array[0..(ACCT_COMM + 1)-1] of char;
-    ac_pad : array[0..9] of char;
+    ac_comm : array[0..(ACCT_COMM + 1)-1] of AnsiChar;
+    ac_pad : array[0..9] of AnsiChar;
   end;
   P_acct = ^_acct;
 
@@ -38,7 +38,7 @@ Const
   AHZ   = 100;
 
 // Already defined in unistdh.inc
-//function acct(__filename:Pchar):longint;cdecl;external clib name 'acct';
+//function acct(__filename:PAnsiChar):longint;cdecl;external clib name 'acct';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/searchh.inc

@@ -4,7 +4,7 @@ type
    qelem = record
         q_forw : Pqelem;
         q_back : Pqelem;
-        q_data : array[0..0] of char;
+        q_data : array[0..0] of AnsiChar;
      end;
 
 procedure insque(__elem:pointer; __prev:pointer);cdecl;external clib name 'insque';
@@ -23,7 +23,7 @@ type
 
 {   Pentry = ^entry;
    entry = record
-        key : Pchar;
+        key : PAnsiChar;
         data : pointer;
      end;
 }

packages/libc/src/semaphoreh.inc

@@ -14,10 +14,10 @@ Const
 
 function sem_init(__sem:Psem_t; __pshared:longint; __value:dword):longint;cdecl;external threadslib name 'sem_init';
 function sem_destroy(__sem:Psem_t):longint;cdecl;external threadslib name 'sem_destroy';
-function sem_open(__name:Pchar; __oflag:longint; args:array of const):Psem_t;cdecl;external threadslib name 'sem_open';
-function sem_open(__name:Pchar; __oflag:longint):Psem_t;cdecl;varargs;external threadslib name 'sem_open';
+function sem_open(__name:PAnsiChar; __oflag:longint; args:array of const):Psem_t;cdecl;external threadslib name 'sem_open';
+function sem_open(__name:PAnsiChar; __oflag:longint):Psem_t;cdecl;varargs;external threadslib name 'sem_open';
 function sem_close(__sem:Psem_t):longint;cdecl;external threadslib name 'sem_close';
-function sem_unlink(__name:Pchar):longint;cdecl;external threadslib name 'sem_unlink';
+function sem_unlink(__name:PAnsiChar):longint;cdecl;external threadslib name 'sem_unlink';
 function sem_wait(__sem:Psem_t):longint;cdecl;external threadslib name 'sem_wait';
 function sem_timedwait(__sem:Psem_t; __abstime:Ptimespec):longint;cdecl;external threadslib name 'sem_timedwait';
 function sem_trywait(__sem:Psem_t):longint;cdecl;external threadslib name 'sem_trywait';

packages/libc/src/shadowh.inc

@@ -5,8 +5,8 @@ const
 type
    Pspwd = ^spwd;
    spwd = record
-        sp_namp : Pchar;
-        sp_pwdp : Pchar;
+        sp_namp : PAnsiChar;
+        sp_pwdp : PAnsiChar;
         sp_lstchg : longint;
         sp_min : longint;
         sp_max : longint;
@@ -20,14 +20,14 @@ type
 procedure setspent;cdecl;external clib name 'setspent';
 procedure endspent;cdecl;external clib name 'endspent';
 function getspent:Pspwd;cdecl;external clib name 'getspent';
-function getspnam(__name:Pchar):Pspwd;cdecl;external clib name 'getspnam';
-function sgetspent(__string:Pchar):Pspwd;cdecl;external clib name 'sgetspent';
+function getspnam(__name:PAnsiChar):Pspwd;cdecl;external clib name 'getspnam';
+function sgetspent(__string:PAnsiChar):Pspwd;cdecl;external clib name 'sgetspent';
 function fgetspent(__stream:PFILE):Pspwd;cdecl;external clib name 'fgetspent';
 function putspent(__p:Pspwd; __stream:PFILE):longint;cdecl;external clib name 'putspent';
-function getspent_r(__result_buf:Pspwd; __buffer:Pchar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'getspent_r';
-function getspnam_r(__name:Pchar; __result_buf:Pspwd; __buffer:Pchar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'getspnam_r';
-function sgetspent_r(__string:Pchar; __result_buf:Pspwd; __buffer:Pchar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'sgetspent_r';
-function fgetspent_r(__stream:PFILE; __result_buf:Pspwd; __buffer:Pchar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'fgetspent_r';
+function getspent_r(__result_buf:Pspwd; __buffer:PAnsiChar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'getspent_r';
+function getspnam_r(__name:PAnsiChar; __result_buf:Pspwd; __buffer:PAnsiChar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'getspnam_r';
+function sgetspent_r(__string:PAnsiChar; __result_buf:Pspwd; __buffer:PAnsiChar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'sgetspent_r';
+function fgetspent_r(__stream:PFILE; __result_buf:Pspwd; __buffer:PAnsiChar; __buflen:size_t; __result:PPspwd):longint;cdecl;external clib name 'fgetspent_r';
 function lckpwdf:longint;cdecl;external clib name 'lckpwdf';
 function ulckpwdf:longint;cdecl;external clib name 'ulckpwdf';
 
@@ -40,7 +40,7 @@ Type
   PPasswordFileEntry = ^TPasswordFileEntry;
 
 function putspent(const __p:spwd; __stream:PFILE):longint;cdecl;external clib name 'putspent';
-function getspent_r(var __result_buf: spwd; __buffer:Pchar; __buflen:size_t; var __result: Pspwd):longint;cdecl;external clib name 'getspent_r';
-function getspnam_r(__name:Pchar; var __result_buf:spwd; __buffer:Pchar; __buflen:size_t; var __result:Pspwd):longint;cdecl;external clib name 'getspnam_r';
-function sgetspent_r(__string:Pchar; var __result_buf:spwd; __buffer:Pchar; __buflen:size_t; var __result:Pspwd):longint;cdecl;external clib name 'sgetspent_r';
-function fgetspent_r(__stream:PFILE; var __result_buf:spwd; __buffer:Pchar; __buflen:size_t; var __result:Pspwd):longint;cdecl;external clib name 'fgetspent_r';
+function getspent_r(var __result_buf: spwd; __buffer:PAnsiChar; __buflen:size_t; var __result: Pspwd):longint;cdecl;external clib name 'getspent_r';
+function getspnam_r(__name:PAnsiChar; var __result_buf:spwd; __buffer:PAnsiChar; __buflen:size_t; var __result:Pspwd):longint;cdecl;external clib name 'getspnam_r';
+function sgetspent_r(__string:PAnsiChar; var __result_buf:spwd; __buffer:PAnsiChar; __buflen:size_t; var __result:Pspwd):longint;cdecl;external clib name 'sgetspent_r';
+function fgetspent_r(__stream:PFILE; var __result_buf:spwd; __buffer:PAnsiChar; __buflen:size_t; var __result:Pspwd):longint;cdecl;external clib name 'fgetspent_r';

packages/libc/src/signalh.inc

@@ -7,7 +7,7 @@ function killpg(__pgrp:__pid_t; __sig:longint):longint;cdecl;external clib name
 function __raise(__sig:longint):longint;cdecl;external clib name 'raise';
 function ssignal(__sig:longint; __handler:__sighandler_t):__sighandler_t;cdecl;external clib name 'ssignal';
 function gsignal(__sig:longint):longint;cdecl;external clib name 'gsignal';
-procedure psignal(__sig:longint; __s:Pchar);cdecl;external clib name 'psignal';
+procedure psignal(__sig:longint; __s:PAnsiChar);cdecl;external clib name 'psignal';
 function __sigpause(__sig_or_mask:longint; __is_sig:longint):longint;cdecl;external clib name '__sigpause';
 function sigpause(__mask:longint):longint;cdecl;external clib name 'sigpause';
 function sigblock(__mask:longint):longint;cdecl;external clib name 'sigblock';
@@ -26,8 +26,8 @@ Type
 
 
 var
-  _sys_siglist : array[0..(_NSIG)-1] of Pchar;cvar;external;
-  sys_siglist : array[0..(_NSIG)-1] of Pchar;cvar;external;
+  _sys_siglist : array[0..(_NSIG)-1] of PAnsiChar;cvar;external;
+  sys_siglist : array[0..(_NSIG)-1] of PAnsiChar;cvar;external;
 
 Type
   P_sigvec = ^_sigvec;

packages/libc/src/sipch.inc

@@ -1,6 +1,6 @@
 
 
-function ftok(__pathname:Pchar; __proj_id:longint):key_t;cdecl;external clib name 'ftok';
+function ftok(__pathname:PAnsiChar; __proj_id:longint):key_t;cdecl;external clib name 'ftok';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/sklogh.inc

@@ -1,6 +1,6 @@
 
 
-function klogctl(__type:longint; __bufp:Pchar; __len:longint):longint;cdecl;external clib name 'klogctl';
+function klogctl(__type:longint; __bufp:PAnsiChar; __len:longint):longint;cdecl;external clib name 'klogctl';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/smmaph.inc

@@ -21,8 +21,8 @@ function mlockall(__flags:longint):longint;cdecl;external clib name 'mlockall';
 function munlockall:longint;cdecl;external clib name 'munlockall';
 function mremap(__addr:pointer; __old_len:size_t; __new_len:size_t; __may_move:longint):pointer;cdecl;external clib name 'mremap';
 function mincore(__start:pointer; __len:size_t; __vec:Pbyte):longint;cdecl;external clib name 'mincore';
-function shm_open(__name:Pchar; __oflag:longint; __mode:mode_t):longint;cdecl;external rtlib name 'shm_open';
-function shm_unlink(__name:Pchar):longint;cdecl;external rtlib name 'shm_unlink';
+function shm_open(__name:PAnsiChar; __oflag:longint; __mode:mode_t):longint;cdecl;external rtlib name 'shm_open';
+function shm_unlink(__name:PAnsiChar):longint;cdecl;external rtlib name 'shm_unlink';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/smounth.inc

@@ -24,7 +24,7 @@ const
 
   MNT_FORCE = 1;
 
-function mount(__special_file:Pchar; __dir:Pchar; __fstype:Pchar; __rwflag:dword; __data:pointer):longint;cdecl;external clib name 'mount';
-function umount(__special_file:Pchar):longint;cdecl;external clib name 'umount';
-function umount2(__special_file:Pchar; __flags:longint):longint;cdecl;external clib name 'umount2';
+function mount(__special_file:PAnsiChar; __dir:PAnsiChar; __fstype:PAnsiChar; __rwflag:dword; __data:pointer):longint;cdecl;external clib name 'mount';
+function umount(__special_file:PAnsiChar):longint;cdecl;external clib name 'umount';
+function umount2(__special_file:PAnsiChar; __flags:longint):longint;cdecl;external clib name 'umount2';
 

packages/libc/src/smsgh.inc

@@ -3,7 +3,7 @@ Type
    Pmsgbuf = ^msgbuf;
    msgbuf = record
         mtype : longint;
-        mtext : array[0..0] of char;
+        mtext : array[0..0] of AnsiChar;
      end;
 
 

packages/libc/src/spawnh.inc

@@ -33,8 +33,8 @@ const
    POSIX_SPAWN_SETSCHEDPARAM = $10;
    POSIX_SPAWN_SETSCHEDULER = $20;
 
-function posix_spawn(__pid:Ppid_t; __path:Pchar; __file_actions:Pposix_spawn_file_actions_t; __attrp:Pposix_spawnattr_t; argv:ppchar;envp:ppchar):longint;cdecl;external clib name 'posix_spawn';
-function posix_spawnp(__pid:Ppid_t; __file:Pchar; __file_actions:Pposix_spawn_file_actions_t; __attrp:Pposix_spawnattr_t; argv:PPchar;envp:ppchar):longint;cdecl;external clib name 'posix_spawnp';
+function posix_spawn(__pid:Ppid_t; __path:PAnsiChar; __file_actions:Pposix_spawn_file_actions_t; __attrp:Pposix_spawnattr_t; argv:PPAnsiChar;envp:PPAnsiChar):longint;cdecl;external clib name 'posix_spawn';
+function posix_spawnp(__pid:Ppid_t; __file:PAnsiChar; __file_actions:Pposix_spawn_file_actions_t; __attrp:Pposix_spawnattr_t; argv:PPAnsiChar;envp:PPAnsiChar):longint;cdecl;external clib name 'posix_spawnp';
 function posix_spawnattr_init(__attr:Pposix_spawnattr_t):longint;cdecl;external clib name 'posix_spawnattr_init';
 function posix_spawnattr_destroy(__attr:Pposix_spawnattr_t):longint;cdecl;external clib name 'posix_spawnattr_destroy';
 function posix_spawnattr_getsigdefault(__attr:Pposix_spawnattr_t; __sigdefault:Psigset_t):longint;cdecl;external clib name 'posix_spawnattr_getsigdefault';
@@ -51,7 +51,7 @@ function posix_spawnattr_getschedparam(__attr:Pposix_spawnattr_t; __schedparam:P
 function posix_spawnattr_setschedparam(__attr:Pposix_spawnattr_t; __schedparam:Psched_param):longint;cdecl;external clib name 'posix_spawnattr_setschedparam';
 function posix_spawn_file_actions_init(__file_actions:Pposix_spawn_file_actions_t):longint;cdecl;external clib name 'posix_spawn_file_actions_init';
 function posix_spawn_file_actions_destroy(__file_actions:Pposix_spawn_file_actions_t):longint;cdecl;external clib name 'posix_spawn_file_actions_destroy';
-function posix_spawn_file_actions_addopen(__file_actions:Pposix_spawn_file_actions_t; __fd:longint; __path:Pchar; __oflag:longint; __mode:mode_t):longint;cdecl;external clib name 'posix_spawn_file_actions_addopen';
+function posix_spawn_file_actions_addopen(__file_actions:Pposix_spawn_file_actions_t; __fd:longint; __path:PAnsiChar; __oflag:longint; __mode:mode_t):longint;cdecl;external clib name 'posix_spawn_file_actions_addopen';
 function posix_spawn_file_actions_addclose(__file_actions:Pposix_spawn_file_actions_t; __fd:longint):longint;cdecl;external clib name 'posix_spawn_file_actions_addclose';
 function posix_spawn_file_actions_adddup2(__file_actions:Pposix_spawn_file_actions_t; __fd:longint; __newfd:longint):longint;cdecl;external clib name 'posix_spawn_file_actions_adddup2';
 
@@ -64,8 +64,8 @@ Type
    TSpawnAction = __spawn_action;
    PSpawnAction = ^TSpawnAction;
 
-function posix_spawn(__pid:Ppid_t; __path:Pchar; var __file_actions: posix_spawn_file_actions_t; var __attrp:posix_spawnattr_t; argv:ppchar;envp:ppchar):longint;cdecl;external clib name 'posix_spawn';
-function posix_spawnp(__pid:Ppid_t; __file:Pchar; var __file_actions: posix_spawn_file_actions_t; var __attrp: posix_spawnattr_t; argv:PPchar;envp:ppchar):longint;cdecl;external clib name 'posix_spawnp';
+function posix_spawn(__pid:Ppid_t; __path:PAnsiChar; var __file_actions: posix_spawn_file_actions_t; var __attrp:posix_spawnattr_t; argv:PPAnsiChar;envp:PPAnsiChar):longint;cdecl;external clib name 'posix_spawn';
+function posix_spawnp(__pid:Ppid_t; __file:PAnsiChar; var __file_actions: posix_spawn_file_actions_t; var __attrp: posix_spawnattr_t; argv:PPAnsiChar;envp:PPAnsiChar):longint;cdecl;external clib name 'posix_spawnp';
 function posix_spawnattr_init(var __attr: posix_spawnattr_t):longint;cdecl;external clib name 'posix_spawnattr_init';
 function posix_spawnattr_destroy(var __attr: posix_spawnattr_t):longint;cdecl;external clib name 'posix_spawnattr_destroy';
 function posix_spawnattr_getsigdefault(var __attr: posix_spawnattr_t; var __sigdefault: sigset_t):longint;cdecl;external clib name 'posix_spawnattr_getsigdefault';
@@ -82,6 +82,6 @@ function posix_spawnattr_getschedparam(var __attr: posix_spawnattr_t; var __sche
 function posix_spawnattr_setschedparam(var __attr: posix_spawnattr_t; var __schedparam:sched_param):longint;cdecl;external clib name 'posix_spawnattr_setschedparam';
 function posix_spawn_file_actions_init(var __file_actions: posix_spawn_file_actions_t):longint;cdecl;external clib name 'posix_spawn_file_actions_init';
 function posix_spawn_file_actions_destroy(var __file_actions: posix_spawn_file_actions_t):longint;cdecl;external clib name 'posix_spawn_file_actions_destroy';
-function posix_spawn_file_actions_addopen(var __file_actions: posix_spawn_file_actions_t; __fd:longint; __path:Pchar; __oflag:longint; __mode:mode_t):longint;cdecl;external clib name 'posix_spawn_file_actions_addopen';
+function posix_spawn_file_actions_addopen(var __file_actions: posix_spawn_file_actions_t; __fd:longint; __path:PAnsiChar; __oflag:longint; __mode:mode_t):longint;cdecl;external clib name 'posix_spawn_file_actions_addopen';
 function posix_spawn_file_actions_addclose(var __file_actions: posix_spawn_file_actions_t; __fd:longint):longint;cdecl;external clib name 'posix_spawn_file_actions_addclose';
 function posix_spawn_file_actions_adddup2(var __file_actions: posix_spawn_file_actions_t; __fd:longint; __newfd:longint):longint;cdecl;external clib name 'posix_spawn_file_actions_adddup2';

packages/libc/src/squotah.inc

@@ -12,7 +12,7 @@ const
   GRPQUOTA = 1;
 
 const
-  INITQFNAMES: array[0..2] of PChar = ('user','group','undefined');
+  INITQFNAMES: array[0..2] of PAnsiChar = ('user','group','undefined');
 
   QUOTAFILENAME = 'quota';
   QUOTAGROUP = 'staff';
@@ -66,7 +66,7 @@ type
     end;
 
 
-function quotactl(__cmd:longint; __special:Pchar; __id:longint; __addr:caddr_t):longint;cdecl;external clib name 'quotactl';
+function quotactl(__cmd:longint; __special:PAnsiChar; __id:longint; __addr:caddr_t):longint;cdecl;external clib name 'quotactl';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/ssgh.inc

@@ -67,10 +67,10 @@ type
 
    Psg_req_info = ^sg_req_info;
    sg_req_info = record
-        req_state : char;
-        orphan : char;
-        sg_io_owned : char;
-        problem : char;
+        req_state : AnsiChar;
+        orphan : AnsiChar;
+        sg_io_owned : AnsiChar;
+        problem : AnsiChar;
         pack_id : longint;
         usr_ptr : pointer;
         duration : dword;

packages/libc/src/sstat.inc

@@ -50,13 +50,13 @@ function fstat(__fd:longint; __buf:Pstat):longint;
   end;
 
 
-function lstat(__file:Pchar; __buf:Pstat):longint;
+function lstat(__file:PAnsiChar; __buf:Pstat):longint;
   begin
     lstat:=__lxstat(_STAT_VER,__file,__buf);
   end;
 
 
-function stat(__file:Pchar; __buf:Pstat):longint;
+function stat(__file:PAnsiChar; __buf:Pstat):longint;
   begin
     stat:=__xstat(_STAT_VER,__file,__buf);
   end;
@@ -68,19 +68,19 @@ function fstat64(__fd:longint; __buf:Pstat64):longint;
   end;
 
 
-function lstat64(__file:Pchar; __buf:Pstat64):longint;
+function lstat64(__file:PAnsiChar; __buf:Pstat64):longint;
   begin
     lstat64:=__lxstat64(_STAT_VER,__file,__buf);
   end;
 
 
-function stat64(__file:Pchar; __buf:Pstat64):longint;
+function stat64(__file:PAnsiChar; __buf:Pstat64):longint;
   begin
     stat64:=__xstat64(_STAT_VER,__file,__buf);
   end;
 
 
-function stat(__file:Pchar; var __buf:_stat):longint;
+function stat(__file:PAnsiChar; var __buf:_stat):longint;
   begin
     stat:=__xstat(_STAT_VER,__file,__buf);
   end;
@@ -92,7 +92,7 @@ function fstat(__fd:longint; var __buf:_stat):longint;
   end;
 
 
-function stat64(__file:Pchar; var __buf: _stat64):longint;
+function stat64(__file:PAnsiChar; var __buf: _stat64):longint;
   begin
     stat64:=__xstat64(_STAT_VER,__file,__buf);
   end;
@@ -104,13 +104,13 @@ function fstat64(__fd:longint; var __buf: _stat64):longint;
   end;
 
 
-function lstat(__file:Pchar; var __buf:_stat):longint;
+function lstat(__file:PAnsiChar; var __buf:_stat):longint;
   begin
     lstat:=__lxstat(_STAT_VER,__file,__buf);
   end;
 
 
-function lstat64(__file:Pchar; var __buf:_stat64):longint;
+function lstat64(__file:PAnsiChar; var __buf:_stat64):longint;
   begin
     lstat64:=__lxstat64(_STAT_VER,__file,__buf);
   end;

packages/libc/src/sstatfsh.inc

@@ -1,7 +1,7 @@
 
 
-function statfs(__file:Pchar; __buf:Pstatfs):longint;cdecl;external clib name 'statfs';
-function statfs64(__file:Pchar; __buf:Pstatfs64):longint;cdecl;external clib name 'statfs64';
+function statfs(__file:PAnsiChar; __buf:Pstatfs):longint;cdecl;external clib name 'statfs';
+function statfs64(__file:PAnsiChar; __buf:Pstatfs64):longint;cdecl;external clib name 'statfs64';
 function fstatfs(__fildes:longint; __buf:Pstatfs):longint;cdecl;external clib name 'fstatfs';
 function fstatfs64(__fildes:longint; __buf:Pstatfs64):longint;cdecl;external clib name 'fstatfs64';
 
@@ -10,7 +10,7 @@ function fstatfs64(__fildes:longint; __buf:Pstatfs64):longint;cdecl;external cli
   ---------------------------------------------------------------------}
 
 // Type
-function statfs(__file:Pchar; var __buf:_statfs):longint;cdecl;external clib name 'statfs';
-function statfs64(__file:Pchar; var __buf:_statfs64):longint;cdecl;external clib name 'statfs64';
+function statfs(__file:PAnsiChar; var __buf:_statfs):longint;cdecl;external clib name 'statfs';
+function statfs64(__file:PAnsiChar; var __buf:_statfs64):longint;cdecl;external clib name 'statfs64';
 function fstatfs(__fildes:longint; var __buf:_statfs):longint;cdecl;external clib name 'fstatfs';
 function fstatfs64(__fildes:longint; var __buf:_statfs64):longint;cdecl;external clib name 'fstatfs64';

packages/libc/src/sstath.inc

@@ -48,54 +48,54 @@ const
   DEFFILEMODE = ((((S_IRUSR or S_IWUSR) or S_IRGRP) or S_IWGRP) or S_IROTH) or S_IWOTH;
   S_BLKSIZE = 512;
 
-function stat(__file:Pchar; __buf:Pstat):longint;
+function stat(__file:PAnsiChar; __buf:Pstat):longint;
 function fstat(__fd:longint; __buf:Pstat):longint;
 
-function stat64(__file:Pchar; __buf:Pstat64):longint;
+function stat64(__file:PAnsiChar; __buf:Pstat64):longint;
 function fstat64(__fd:longint; __buf:Pstat64):longint;
 
-function lstat(__file:Pchar; __buf:Pstat):longint;
-function lstat64(__file:Pchar; __buf:Pstat64):longint;
+function lstat(__file:PAnsiChar; __buf:Pstat):longint;
+function lstat64(__file:PAnsiChar; __buf:Pstat64):longint;
 
-function chmod(__file:Pchar; __mode:__mode_t):longint;cdecl;external clib name 'chmod';
+function chmod(__file:PAnsiChar; __mode:__mode_t):longint;cdecl;external clib name 'chmod';
 function fchmod(__fd:longint; __mode:__mode_t):longint;cdecl;external clib name 'fchmod';
 function umask(__mask:__mode_t):__mode_t;cdecl;external clib name 'umask';
 function getumask:__mode_t;cdecl;external clib name 'getumask';
 
-function __mkdir(__path:Pchar; __mode:__mode_t):longint;cdecl;external clib name 'mkdir';
-function mknod(__path:Pchar; __mode:__mode_t; __dev:__dev_t):longint;cdecl;external clib name 'mknod';
-function mkfifo(__path:Pchar; __mode:__mode_t):longint;cdecl;external clib name 'mkfifo';
+function __mkdir(__path:PAnsiChar; __mode:__mode_t):longint;cdecl;external clib name 'mkdir';
+function mknod(__path:PAnsiChar; __mode:__mode_t; __dev:__dev_t):longint;cdecl;external clib name 'mknod';
+function mkfifo(__path:PAnsiChar; __mode:__mode_t):longint;cdecl;external clib name 'mkfifo';
 
 function __fxstat(__ver:longint; __fildes:longint; __stat_buf:Pstat):longint;cdecl;external clib name '__fxstat';
-function __xstat(__ver:longint; __filename:Pchar; __stat_buf:Pstat):longint;cdecl;external clib name '__xstat';
-function __lxstat(__ver:longint; __filename:Pchar; __stat_buf:Pstat):longint;cdecl;external clib name '__lxstat';
+function __xstat(__ver:longint; __filename:PAnsiChar; __stat_buf:Pstat):longint;cdecl;external clib name '__xstat';
+function __lxstat(__ver:longint; __filename:PAnsiChar; __stat_buf:Pstat):longint;cdecl;external clib name '__lxstat';
 
 function __fxstat64(__ver:longint; __fildes:longint; __stat_buf:Pstat64):longint;cdecl;external clib name '__fxstat64';
-function __xstat64(__ver:longint; __filename:Pchar; __stat_buf:Pstat64):longint;cdecl;external clib name '__xstat64';
-function __lxstat64(__ver:longint; __filename:Pchar; __stat_buf:Pstat64):longint;cdecl;external clib name '__lxstat64';
+function __xstat64(__ver:longint; __filename:PAnsiChar; __stat_buf:Pstat64):longint;cdecl;external clib name '__xstat64';
+function __lxstat64(__ver:longint; __filename:PAnsiChar; __stat_buf:Pstat64):longint;cdecl;external clib name '__lxstat64';
 
-function __xmknod(__ver:longint; __path:Pchar; __mode:__mode_t; __dev:P__dev_t):longint;cdecl;external clib name '__xmknod';
+function __xmknod(__ver:longint; __path:PAnsiChar; __mode:__mode_t; __dev:P__dev_t):longint;cdecl;external clib name '__xmknod';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
   ---------------------------------------------------------------------}
 
 // Type
-function stat(__file:Pchar; var __buf:_stat):longint;
+function stat(__file:PAnsiChar; var __buf:_stat):longint;
 function fstat(__fd:longint; var __buf:_stat):longint;
 
-function stat64(__file:Pchar; var __buf: _stat64):longint;
+function stat64(__file:PAnsiChar; var __buf: _stat64):longint;
 function fstat64(__fd:longint; var __buf: _stat64):longint;
 
-function lstat(__file:Pchar; var __buf:_stat):longint;
-function lstat64(__file:Pchar; var __buf:_stat64):longint;
+function lstat(__file:PAnsiChar; var __buf:_stat):longint;
+function lstat64(__file:PAnsiChar; var __buf:_stat64):longint;
 
 function __fxstat(__ver:longint; __fildes:longint; var __stat_buf: _stat):longint;cdecl;external clib name '__fxstat';
-function __xstat(__ver:longint; __filename:Pchar; var __stat_buf: _stat):longint;cdecl;external clib name '__xstat';
-function __lxstat(__ver:longint; __filename:Pchar; var __stat_buf: _stat):longint;cdecl;external clib name '__lxstat';
+function __xstat(__ver:longint; __filename:PAnsiChar; var __stat_buf: _stat):longint;cdecl;external clib name '__xstat';
+function __lxstat(__ver:longint; __filename:PAnsiChar; var __stat_buf: _stat):longint;cdecl;external clib name '__lxstat';
 
 function __fxstat64(__ver:longint; __fildes:longint; var __stat_buf: _stat64):longint;cdecl;external clib name '__fxstat64';
-function __xstat64(__ver:longint; __filename:Pchar; var __stat_buf: _stat64):longint;cdecl;external clib name '__xstat64';
-function __lxstat64(__ver:longint; __filename:Pchar; var __stat_buf: _stat64):longint;cdecl;external clib name '__lxstat64';
+function __xstat64(__ver:longint; __filename:PAnsiChar; var __stat_buf: _stat64):longint;cdecl;external clib name '__xstat64';
+function __lxstat64(__ver:longint; __filename:PAnsiChar; var __stat_buf: _stat64):longint;cdecl;external clib name '__lxstat64';
 
-function __xmknod(__ver:longint; __path:Pchar; __mode:__mode_t; var __dev: __dev_t):longint;cdecl;external clib name '__xmknod';
+function __xmknod(__ver:longint; __path:PAnsiChar; __mode:__mode_t; var __dev: __dev_t):longint;cdecl;external clib name '__xmknod';

packages/libc/src/sstatvfsh.inc

@@ -1,7 +1,7 @@
 
 
-function statvfs(__file:Pchar; __buf:Pstatvfs):longint;cdecl;external clib name 'statvfs';
-function statvfs64(__file:Pchar; __buf:Pstatvfs64):longint;cdecl;external clib name 'statvfs64';
+function statvfs(__file:PAnsiChar; __buf:Pstatvfs):longint;cdecl;external clib name 'statvfs';
+function statvfs64(__file:PAnsiChar; __buf:Pstatvfs64):longint;cdecl;external clib name 'statvfs64';
 function fstatvfs(__fildes:longint; __buf:Pstatvfs):longint;cdecl;external clib name 'fstatvfs';
 function fstatvfs64(__fildes:longint; __buf:Pstatvfs64):longint;cdecl;external clib name 'fstatvfs64';
 
@@ -11,7 +11,7 @@ function fstatvfs64(__fildes:longint; __buf:Pstatvfs64):longint;cdecl;external c
   ---------------------------------------------------------------------}
 
 // Type
-function statvfs(__file:Pchar; var __buf: _statvfs):longint;cdecl;external clib name 'statvfs';
-function statvfs64(__file:Pchar; var __buf: _statvfs64):longint;cdecl;external clib name 'statvfs64';
+function statvfs(__file:PAnsiChar; var __buf: _statvfs):longint;cdecl;external clib name 'statvfs';
+function statvfs64(__file:PAnsiChar; var __buf: _statvfs64):longint;cdecl;external clib name 'statvfs64';
 function fstatvfs(__fildes:longint; var __buf: _statvfs):longint;cdecl;external clib name 'fstatvfs';
 function fstatvfs64(__fildes:longint; var __buf: _statvfs64):longint;cdecl;external clib name 'fstatvfs64';

packages/libc/src/sswaph.inc

@@ -4,8 +4,8 @@ const
    SWAP_FLAG_PRIO_MASK = $7fff;
    SWAP_FLAG_PRIO_SHIFT = 0;
 
-function swapon(__path:Pchar; __flags:longint):longint;cdecl;external clib name 'swapon';
-function swapoff(__path:Pchar):longint;cdecl;external clib name 'swapoff';
+function swapon(__path:PAnsiChar; __flags:longint):longint;cdecl;external clib name 'swapon';
+function swapoff(__path:PAnsiChar):longint;cdecl;external clib name 'swapoff';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/ssysinfoh.inc

@@ -14,7 +14,7 @@ type
     totalswap: LongWord;                { Total swap space size }
     freeswap: LongWord;                 { swap space still available }
     procs: Word;                        { Number of current processes }
-    _f: packed array[0..21] of Char;    { Pads structure to 64 bytes }
+    _f: packed array[0..21] of AnsiChar;    { Pads structure to 64 bytes }
   end;
   P_sysInfo = ^_sysInfo;
 

packages/libc/src/ssyslogh.inc

@@ -22,7 +22,7 @@ type
 
    P_code = ^_code;
    _code = record
-        c_name : Pchar;
+        c_name : PAnsiChar;
         c_val : longint;
      end;
    CODE = _code;
@@ -113,10 +113,10 @@ const
    LOG_PERROR = $20;
 
 procedure closelog;cdecl;external clib name 'closelog';
-procedure openlog(__ident:Pchar; __option:longint; __facility:longint);cdecl;external clib name 'openlog';
+procedure openlog(__ident:PAnsiChar; __option:longint; __facility:longint);cdecl;external clib name 'openlog';
 function setlogmask(__mask:longint):longint;cdecl;external clib name 'setlogmask';
-procedure syslog(__pri: Integer; __fmt: PChar; arg : array of const); cdecl; external clib name 'syslog';
-procedure vsyslog(__pri: Integer; Fmt: PChar; Arg: Pointer);cdecl; external clib name 'vsyslog';
+procedure syslog(__pri: Integer; __fmt: PAnsiChar; arg : array of const); cdecl; external clib name 'syslog';
+procedure vsyslog(__pri: Integer; Fmt: PAnsiChar; Arg: Pointer);cdecl; external clib name 'vsyslog';
 
 
 { ---------------------------------------------------------------------

packages/libc/src/stdinth.inc

@@ -6,7 +6,7 @@ type
   uint16_t = word;
   uint32_t = dword;
   uint64_t = qword;
-  int_least8_t = char;
+  int_least8_t = AnsiChar;
   int_least16_t = smallint;
   int_least32_t = longint;
   int_least64_t = int64;

packages/libc/src/stdioh.inc

@@ -19,55 +19,55 @@ const
 const
    P_tmpdir = '/tmp';
 
-function remove(__filename:Pchar):longint;cdecl;external clib name 'remove';
-function __rename(__old:Pchar; __new:Pchar):longint;cdecl;external clib name 'rename';
+function remove(__filename:PAnsiChar):longint;cdecl;external clib name 'remove';
+function __rename(__old:PAnsiChar; __new:PAnsiChar):longint;cdecl;external clib name 'rename';
 
 function tmpfile:PFILE;cdecl;external clib name 'tmpfile';
 function tmpfile64:PFILE;cdecl;external clib name 'tmpfile64';
 
-function tmpnam(__s:Pchar):Pchar;cdecl;external clib name 'tmpnam';
-function tmpnam_r(__s:Pchar):Pchar;cdecl;external clib name 'tmpnam_r';
-function tempnam(dir,pfx: PChar): PChar; cdecl; external clib name 'tempnam';
+function tmpnam(__s:PAnsiChar):PAnsiChar;cdecl;external clib name 'tmpnam';
+function tmpnam_r(__s:PAnsiChar):PAnsiChar;cdecl;external clib name 'tmpnam_r';
+function tempnam(dir,pfx: PAnsiChar): PAnsiChar; cdecl; external clib name 'tempnam';
 
 function fclose(__stream:PFILE):longint;cdecl;external clib name 'fclose';
 function fflush(__stream:PFILE):longint;cdecl;external clib name 'fflush';
 function fflush_unlocked(__stream:PFILE):longint;cdecl;external clib name 'fflush_unlocked';
 function fcloseall:longint;cdecl;external clib name 'fcloseall';
 
-function fopen(__filename:Pchar; __modes:Pchar):PFILE;cdecl;external clib name 'fopen';
-function freopen(__filename:Pchar; __modes:Pchar; __stream:PFILE):PFILE;cdecl;external clib name 'freopen';
+function fopen(__filename:PAnsiChar; __modes:PAnsiChar):PFILE;cdecl;external clib name 'fopen';
+function freopen(__filename:PAnsiChar; __modes:PAnsiChar; __stream:PFILE):PFILE;cdecl;external clib name 'freopen';
 
-function fopen64(__filename:Pchar; __modes:Pchar):PFILE;cdecl;external clib name 'fopen64';
-function freopen64(__filename:Pchar; __modes:Pchar; __stream:PFILE):PFILE;cdecl;external clib name 'freopen64';
+function fopen64(__filename:PAnsiChar; __modes:PAnsiChar):PFILE;cdecl;external clib name 'fopen64';
+function freopen64(__filename:PAnsiChar; __modes:PAnsiChar; __stream:PFILE):PFILE;cdecl;external clib name 'freopen64';
 
-function fdopen(__fd:longint; __modes:Pchar):PFILE;cdecl;external clib name 'fdopen';
+function fdopen(__fd:longint; __modes:PAnsiChar):PFILE;cdecl;external clib name 'fdopen';
 
-function fopencookie(__magic_cookie:pointer; __modes:Pchar; __io_funcs:_IO_cookie_io_functions_t):PFILE;cdecl;external clib name 'fopencookie';
-function fmemopen(__s:pointer; __len:size_t; __modes:Pchar):PFILE;cdecl;external clib name 'fmemopen';
-function open_memstream(__bufloc:PPchar; __sizeloc:Psize_t):PFILE;cdecl;external clib name 'open_memstream';
+function fopencookie(__magic_cookie:pointer; __modes:PAnsiChar; __io_funcs:_IO_cookie_io_functions_t):PFILE;cdecl;external clib name 'fopencookie';
+function fmemopen(__s:pointer; __len:size_t; __modes:PAnsiChar):PFILE;cdecl;external clib name 'fmemopen';
+function open_memstream(__bufloc:PPAnsiChar; __sizeloc:Psize_t):PFILE;cdecl;external clib name 'open_memstream';
 
-procedure setbuf(__stream:PFILE; __buf:Pchar);cdecl;external clib name 'setbuf';
-function setvbuf(__stream:PFILE; __buf:Pchar; __modes:longint; __n:size_t):longint;cdecl;external clib name 'setvbuf';
+procedure setbuf(__stream:PFILE; __buf:PAnsiChar);cdecl;external clib name 'setbuf';
+function setvbuf(__stream:PFILE; __buf:PAnsiChar; __modes:longint; __n:size_t):longint;cdecl;external clib name 'setvbuf';
 
-procedure setbuffer(__stream:PFILE; __buf:Pchar; __size:size_t);cdecl;external clib name 'setbuffer';
+procedure setbuffer(__stream:PFILE; __buf:PAnsiChar; __size:size_t);cdecl;external clib name 'setbuffer';
 procedure setlinebuf(__stream:PFILE);cdecl;external clib name 'setlinebuf';
 
-function fprintf(__stream:PFILE; __format:Pchar; args:array of const):longint;cdecl;external clib name 'fprintf';
-function fprintf(__stream:PFILE; __format:Pchar):longint;cdecl;varargs;external clib name 'fprintf';
-function printf(__format:Pchar; args:array of const):longint;cdecl;external clib name 'printf';
-function printf(__format:Pchar):longint;cdecl;varargs;external clib name 'printf';
-function sprintf(__s:Pchar; __format:Pchar; args:array of const):longint;cdecl;external clib name 'sprintf';
-function sprintf(__s:Pchar; __format:Pchar):longint;varargs;cdecl;external clib name 'sprintf';
-function vfprintf(__s:PFILE; __format:Pchar; __arg:_G_va_list):longint;cdecl;external clib name 'vfprintf';
-function vprintf(__format:Pchar; __arg:_G_va_list):longint;cdecl;external clib name 'vprintf';
-function vsprintf(__s:Pchar; __format:Pchar; __arg:_G_va_list):longint;cdecl;external clib name 'vsprintf';
-
-function fscanf(__stream:PFILE; __format:Pchar; args:array of const):longint;cdecl;external clib name 'fscanf';
-function fscanf(__stream:PFILE; __format:Pchar):longint;varargs;cdecl;external clib name 'fscanf';
-function scanf(__format:Pchar; args:array of const):longint;cdecl;external clib name 'scanf';
-function scanf(__format:Pchar):longint;cdecl;varargs;external clib name 'scanf';
-function sscanf(__s:Pchar; __format:Pchar; args:array of const):longint;cdecl;external clib name 'sscanf';
-function sscanf(__s:Pchar; __format:Pchar):longint;cdecl;varargs;external clib name 'sscanf';
+function fprintf(__stream:PFILE; __format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'fprintf';
+function fprintf(__stream:PFILE; __format:PAnsiChar):longint;cdecl;varargs;external clib name 'fprintf';
+function printf(__format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'printf';
+function printf(__format:PAnsiChar):longint;cdecl;varargs;external clib name 'printf';
+function sprintf(__s:PAnsiChar; __format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'sprintf';
+function sprintf(__s:PAnsiChar; __format:PAnsiChar):longint;varargs;cdecl;external clib name 'sprintf';
+function vfprintf(__s:PFILE; __format:PAnsiChar; __arg:_G_va_list):longint;cdecl;external clib name 'vfprintf';
+function vprintf(__format:PAnsiChar; __arg:_G_va_list):longint;cdecl;external clib name 'vprintf';
+function vsprintf(__s:PAnsiChar; __format:PAnsiChar; __arg:_G_va_list):longint;cdecl;external clib name 'vsprintf';
+
+function fscanf(__stream:PFILE; __format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'fscanf';
+function fscanf(__stream:PFILE; __format:PAnsiChar):longint;varargs;cdecl;external clib name 'fscanf';
+function scanf(__format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'scanf';
+function scanf(__format:PAnsiChar):longint;cdecl;varargs;external clib name 'scanf';
+function sscanf(__s:PAnsiChar; __format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'sscanf';
+function sscanf(__s:PAnsiChar; __format:PAnsiChar):longint;cdecl;varargs;external clib name 'sscanf';
 
 function fgetc(__stream:PFILE):longint;cdecl;external clib name 'fgetc';
 function getc(__stream:PFILE):longint;cdecl;external clib name 'getc';
@@ -87,19 +87,19 @@ function putchar_unlocked(__c:longint):longint;cdecl;external clib name 'putchar
 function getw(__stream:PFILE):longint;cdecl;external clib name 'getw';
 function putw(__w:longint; __stream:PFILE):longint;cdecl;external clib name 'putw';
 
-function fgets(__s:Pchar; __n:longint; __stream:PFILE):Pchar;cdecl;external clib name 'fgets';
-function fgets_unlocked(__s:Pchar; __n:longint; __stream:PFILE):Pchar;cdecl;external clib name 'fgets_unlocked';
+function fgets(__s:PAnsiChar; __n:longint; __stream:PFILE):PAnsiChar;cdecl;external clib name 'fgets';
+function fgets_unlocked(__s:PAnsiChar; __n:longint; __stream:PFILE):PAnsiChar;cdecl;external clib name 'fgets_unlocked';
 
-function gets(__s:Pchar):Pchar;cdecl;external clib name 'gets';
+function gets(__s:PAnsiChar):PAnsiChar;cdecl;external clib name 'gets';
 
-function __getdelim(__lineptr:PPchar; __n:Psize_t; __delimiter:longint; __stream:PFILE):_IO_ssize_t;cdecl;external clib name '__getdelim';
-function getdelim(__lineptr:PPchar; __n:Psize_t; __delimiter:longint; __stream:PFILE):_IO_ssize_t;cdecl;external clib name 'getdelim';
-function getline(__lineptr:PPchar; __n:Psize_t; __stream:PFILE):_IO_ssize_t;cdecl;external clib name 'getline';
+function __getdelim(__lineptr:PPAnsiChar; __n:Psize_t; __delimiter:longint; __stream:PFILE):_IO_ssize_t;cdecl;external clib name '__getdelim';
+function getdelim(__lineptr:PPAnsiChar; __n:Psize_t; __delimiter:longint; __stream:PFILE):_IO_ssize_t;cdecl;external clib name 'getdelim';
+function getline(__lineptr:PPAnsiChar; __n:Psize_t; __stream:PFILE):_IO_ssize_t;cdecl;external clib name 'getline';
 
-function fputs(__s:Pchar; __stream:PFILE):longint;cdecl;external clib name 'fputs';
-function fputs_unlocked(__s:Pchar; __stream:PFILE):longint;cdecl;external clib name 'fputs_unlocked';
+function fputs(__s:PAnsiChar; __stream:PFILE):longint;cdecl;external clib name 'fputs';
+function fputs_unlocked(__s:PAnsiChar; __stream:PFILE):longint;cdecl;external clib name 'fputs_unlocked';
 
-function puts(__s:Pchar):longint;cdecl;external clib name 'puts';
+function puts(__s:PAnsiChar):longint;cdecl;external clib name 'puts';
 function ungetc(__c:longint; __stream:PFILE):longint;cdecl;external clib name 'ungetc';
 function fread(__ptr:pointer; __size:size_t; __n:size_t; __stream:PFILE):size_t;cdecl;external clib name 'fread';
 function fwrite(__ptr:pointer; __size:size_t; __n:size_t; __s:PFILE):size_t;cdecl;external clib name 'fwrite';
@@ -129,14 +129,14 @@ procedure clearerr_unlocked(__stream:PFILE);cdecl;external clib name 'clearerr_u
 function feof_unlocked(__stream:PFILE):longint;cdecl;external clib name 'feof_unlocked';
 function ferror_unlocked(__stream:PFILE):longint;cdecl;external clib name 'ferror_unlocked';
 
-procedure perror(__s:Pchar);cdecl;external clib name 'perror';
+procedure perror(__s:PAnsiChar);cdecl;external clib name 'perror';
 
 function fileno_unlocked(__stream:PFILE):longint;cdecl;external clib name 'fileno_unlocked';
 
-function popen(__command:PChar; __type:Pchar):PFILE;cdecl;external clib name 'popen';
+function popen(__command:PAnsiChar; __type:PAnsiChar):PFILE;cdecl;external clib name 'popen';
 function pclose(__stream:PFILE):longint;cdecl;external clib name 'pclose';
-function ctermid(__s:Pchar):Pchar;cdecl;external clib name 'ctermid';
-function cuserid(__s:Pchar):Pchar;cdecl;external clib name 'cuserid';
+function ctermid(__s:PAnsiChar):PAnsiChar;cdecl;external clib name 'ctermid';
+function cuserid(__s:PAnsiChar):PAnsiChar;cdecl;external clib name 'cuserid';
 
 type
    Pobstack = ^obstack;
@@ -144,9 +144,9 @@ type
        {undefined structure}
    end;
 
-function obstack_printf(__obstack:Pobstack; __format:Pchar; args:array of const):longint;cdecl;external clib name 'obstack_printf';
-function obstack_printf(__obstack:Pobstack; __format:Pchar):longint;varargs;cdecl;external clib name 'obstack_printf';
-function obstack_vprintf(__obstack:Pobstack; __format:Pchar; __args:_G_va_list):longint;cdecl;external clib name 'obstack_vprintf';
+function obstack_printf(__obstack:Pobstack; __format:PAnsiChar; args:array of const):longint;cdecl;external clib name 'obstack_printf';
+function obstack_printf(__obstack:Pobstack; __format:PAnsiChar):longint;varargs;cdecl;external clib name 'obstack_printf';
+function obstack_vprintf(__obstack:Pobstack; __format:PAnsiChar; __args:_G_va_list):longint;cdecl;external clib name 'obstack_vprintf';
 
 procedure flockfile(__stream:PFILE);cdecl;external clib name 'flockfile';
 function ftrylockfile(__stream:PFILE):longint;cdecl;external clib name 'ftrylockfile';

packages/libc/src/stdlibh.inc

@@ -26,40 +26,40 @@ const
 
 function MB_CUR_MAX : size_t;cdecl; external clib name '__ctype_get_mb_cur_max';
 function __ctype_get_mb_cur_max:size_t;cdecl;external clib name '__ctype_get_mb_cur_max';
-function atof(__nptr:Pchar):double;cdecl;external clib name 'atof';
-function atoi(__nptr:Pchar):longint;cdecl;external clib name 'atoi';
-function atol(__nptr:Pchar):longint;cdecl;external clib name 'atol';
-function atoll(__nptr:Pchar):int64;cdecl;external clib name 'atoll';
-function strtod(__nptr:Pchar; __endptr:PPchar):double;cdecl;external clib name 'strtod';
-function strtof(__nptr:Pchar; __endptr:PPchar):double;cdecl;external clib name 'strtof';
-function strtold(NumPtr: PChar; EndPtr: PPChar): Extended; cdecl; external clib name 'strtold';
-function strtol(__nptr:Pchar; __endptr:PPchar; __base:longint):longint;cdecl;external clib name 'strtol';
-function strtoul(__nptr:Pchar; __endptr:PPchar; __base:longint):dword;cdecl;external clib name 'strtoul';
-function strtoq(__nptr:Pchar; __endptr:PPchar; __base:longint):int64;cdecl;external clib name 'strtoq';
-function strtouq(__nptr:Pchar; __endptr:PPchar; __base:longint):qword;cdecl;external clib name 'strtouq';
-function strtoll(__nptr:Pchar; __endptr:PPchar; __base:longint):int64;cdecl;external clib name 'strtoll';
-function strtoull(__nptr:Pchar; __endptr:PPchar; __base:longint):qword;cdecl;external clib name 'strtoull';
-function __strtol_l(__nptr:Pchar; __endptr:PPchar; __base:longint; __loc:__locale_t):longint;cdecl;external clib name '__strtol_l';
-function __strtoul_l(__nptr:Pchar; __endptr:PPchar; __base:longint; __loc:__locale_t):dword;cdecl;external clib name '__strtoul_l';
-function __strtoll_l(__nptr:Pchar; __endptr:PPchar; __base:longint; __loc:__locale_t):int64;cdecl;external clib name '__strtoll_l';
-function __strtoull_l(__nptr:Pchar; __endptr:PPchar; __base:longint; __loc:__locale_t):qword;cdecl;external clib name '__strtoull_l';
-function __strtod_l(__nptr:Pchar; __endptr:PPchar; __loc:__locale_t):double;cdecl;external clib name '__strtod_l';
-function __strtof_l(__nptr:Pchar; __endptr:PPchar; __loc:__locale_t):double;cdecl;external clib name '__strtof_l';
-function __strtold_l(__nptr: PChar; __endptr: PPChar;__loc: __locale_t): Extended; cdecl;external clib name '__strtold_l';
-function __strtod_internal(__nptr:Pchar; __endptr:PPchar; __group:longint):double;cdecl;external clib name '__strtod_internal';
-function __strtof_internal(__nptr:Pchar; __endptr:PPchar; __group:longint):double;cdecl;external clib name '__strtof_internal';
-function __strtold_internal(__nptr: PChar; __endptr: PPChar;  __group: longint): Extended; cdecl;external clib name '__strtold_internal';
-function __strtol_internal(__nptr:Pchar; __endptr:PPchar; __base:longint; __group:longint):longint;cdecl;external clib name '__strtol_internal';
-function __strtoul_internal(__nptr:Pchar; __endptr:PPchar; __base:longint; __group:longint):dword;cdecl;external clib name '__strtoul_internal';
-function __strtoll_internal(__nptr:Pchar; __endptr:PPchar; __base:longint; __group:longint):int64;cdecl;external clib name '__strtoll_internal';
-function __strtoull_internal(__nptr:Pchar; __endptr:PPchar; __base:longint; __group:longint):qword;cdecl;external clib name '__strtoull_internal';
-function a64l(__s:Pchar):longint;cdecl;external clib name 'a64l';
-function l64a(N: longint): PChar; cdecl;external clib name 'l64a';
+function atof(__nptr:PAnsiChar):double;cdecl;external clib name 'atof';
+function atoi(__nptr:PAnsiChar):longint;cdecl;external clib name 'atoi';
+function atol(__nptr:PAnsiChar):longint;cdecl;external clib name 'atol';
+function atoll(__nptr:PAnsiChar):int64;cdecl;external clib name 'atoll';
+function strtod(__nptr:PAnsiChar; __endptr:PPAnsiChar):double;cdecl;external clib name 'strtod';
+function strtof(__nptr:PAnsiChar; __endptr:PPAnsiChar):double;cdecl;external clib name 'strtof';
+function strtold(NumPtr: PAnsiChar; EndPtr: PPAnsiChar): Extended; cdecl; external clib name 'strtold';
+function strtol(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint):longint;cdecl;external clib name 'strtol';
+function strtoul(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint):dword;cdecl;external clib name 'strtoul';
+function strtoq(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint):int64;cdecl;external clib name 'strtoq';
+function strtouq(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint):qword;cdecl;external clib name 'strtouq';
+function strtoll(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint):int64;cdecl;external clib name 'strtoll';
+function strtoull(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint):qword;cdecl;external clib name 'strtoull';
+function __strtol_l(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __loc:__locale_t):longint;cdecl;external clib name '__strtol_l';
+function __strtoul_l(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __loc:__locale_t):dword;cdecl;external clib name '__strtoul_l';
+function __strtoll_l(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __loc:__locale_t):int64;cdecl;external clib name '__strtoll_l';
+function __strtoull_l(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __loc:__locale_t):qword;cdecl;external clib name '__strtoull_l';
+function __strtod_l(__nptr:PAnsiChar; __endptr:PPAnsiChar; __loc:__locale_t):double;cdecl;external clib name '__strtod_l';
+function __strtof_l(__nptr:PAnsiChar; __endptr:PPAnsiChar; __loc:__locale_t):double;cdecl;external clib name '__strtof_l';
+function __strtold_l(__nptr: PAnsiChar; __endptr: PPAnsiChar;__loc: __locale_t): Extended; cdecl;external clib name '__strtold_l';
+function __strtod_internal(__nptr:PAnsiChar; __endptr:PPAnsiChar; __group:longint):double;cdecl;external clib name '__strtod_internal';
+function __strtof_internal(__nptr:PAnsiChar; __endptr:PPAnsiChar; __group:longint):double;cdecl;external clib name '__strtof_internal';
+function __strtold_internal(__nptr: PAnsiChar; __endptr: PPAnsiChar;  __group: longint): Extended; cdecl;external clib name '__strtold_internal';
+function __strtol_internal(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __group:longint):longint;cdecl;external clib name '__strtol_internal';
+function __strtoul_internal(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __group:longint):dword;cdecl;external clib name '__strtoul_internal';
+function __strtoll_internal(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __group:longint):int64;cdecl;external clib name '__strtoll_internal';
+function __strtoull_internal(__nptr:PAnsiChar; __endptr:PPAnsiChar; __base:longint; __group:longint):qword;cdecl;external clib name '__strtoull_internal';
+function a64l(__s:PAnsiChar):longint;cdecl;external clib name 'a64l';
+function l64a(N: longint): PAnsiChar; cdecl;external clib name 'l64a';
 
 function __random:longint;cdecl;external clib name 'random';
 procedure srandom(__seed:dword);cdecl;external clib name 'srandom';
-function initstate(__seed:dword; __statebuf:Pchar; __statelen:size_t):Pchar;cdecl;external clib name 'initstate';
-function setstate(__statebuf:Pchar):Pchar;cdecl;external clib name 'setstate';
+function initstate(__seed:dword; __statebuf:PAnsiChar; __statelen:size_t):PAnsiChar;cdecl;external clib name 'initstate';
+function setstate(__statebuf:PAnsiChar):PAnsiChar;cdecl;external clib name 'setstate';
 
 Type
   Prandom_data = ^random_data;
@@ -76,8 +76,8 @@ Type
 
 function random_r(__buf:Prandom_data; __result:Pint32_t):longint;cdecl;external clib name 'random_r';
 function srandom_r(__seed:dword; __buf:Prandom_data):longint;cdecl;external clib name 'srandom_r';
-function initstate_r(__seed:dword; __statebuf:Pchar; __statelen:size_t; __buf:Prandom_data):longint;cdecl;external clib name 'initstate_r';
-function setstate_r(__statebuf:Pchar; __buf:Prandom_data):longint;cdecl;external clib name 'setstate_r';
+function initstate_r(__seed:dword; __statebuf:PAnsiChar; __statelen:size_t; __buf:Prandom_data):longint;cdecl;external clib name 'initstate_r';
+function setstate_r(__statebuf:PAnsiChar; __buf:Prandom_data):longint;cdecl;external clib name 'setstate_r';
 function rand:longint;cdecl;external clib name 'rand';
 procedure srand(__seed:dword);cdecl;external clib name 'srand';
 function rand_r(__seed:Pdword):longint;cdecl;external clib name 'rand_r';
@@ -126,22 +126,22 @@ function on_exit(__func:TOnExitProc; __arg:pointer):longint;cdecl;external clib
 procedure __exit(Status: longint); cdecl;external clib name 'exit';
 //procedure _Exit (__status : longint);cdecl; external clib name '_exit';
 
-function getenv(__name:Pchar):Pchar;cdecl;external clib name 'getenv';
-function __secure_getenv(__name:Pchar):Pchar;cdecl;external clib name '__secure_getenv';
-function putenv(__string:Pchar):longint;cdecl;external clib name 'putenv';
-function setenv(__name:Pchar; __value:Pchar; __replace:longint):longint;cdecl;external clib name 'setenv';
-function unsetenv(__name:Pchar):longint;cdecl;external clib name 'unsetenv';
+function getenv(__name:PAnsiChar):PAnsiChar;cdecl;external clib name 'getenv';
+function __secure_getenv(__name:PAnsiChar):PAnsiChar;cdecl;external clib name '__secure_getenv';
+function putenv(__string:PAnsiChar):longint;cdecl;external clib name 'putenv';
+function setenv(__name:PAnsiChar; __value:PAnsiChar; __replace:longint):longint;cdecl;external clib name 'setenv';
+function unsetenv(__name:PAnsiChar):longint;cdecl;external clib name 'unsetenv';
 function clearenv:longint;cdecl;external clib name 'clearenv';
-function mktemp(__template:Pchar):Pchar;cdecl;external clib name 'mktemp';
-function mkstemp(__template:Pchar):longint;cdecl;external clib name 'mkstemp';
-function mkstemp64(__template:Pchar):longint;cdecl;external clib name 'mkstemp64';
-function mkdtemp(__template:Pchar):Pchar;cdecl;external clib name 'mkdtemp';
+function mktemp(__template:PAnsiChar):PAnsiChar;cdecl;external clib name 'mktemp';
+function mkstemp(__template:PAnsiChar):longint;cdecl;external clib name 'mkstemp';
+function mkstemp64(__template:PAnsiChar):longint;cdecl;external clib name 'mkstemp64';
+function mkdtemp(__template:PAnsiChar):PAnsiChar;cdecl;external clib name 'mkdtemp';
 // **************** detect whether system symbol is hidden. Should be as of 1.9.4
 // **************** End of detect
-function __system(__command:Pchar):longint;cdecl;external clib name 'system';
-function system(__command:Pchar):longint;cdecl;external clib name 'system';
-function canonicalize_file_name(__name:Pchar):Pchar;cdecl;external clib name 'canonicalize_file_name';
-function realpath(__name:Pchar; __resolved:Pchar):Pchar;cdecl;external clib name 'realpath';
+function __system(__command:PAnsiChar):longint;cdecl;external clib name 'system';
+function system(__command:PAnsiChar):longint;cdecl;external clib name 'system';
+function canonicalize_file_name(__name:PAnsiChar):PAnsiChar;cdecl;external clib name 'canonicalize_file_name';
+function realpath(__name:PAnsiChar; __resolved:PAnsiChar):PAnsiChar;cdecl;external clib name 'realpath';
 
 Type
   __compar_fn_t = function (_para1:pointer; _para2:pointer):longint;cdecl;
@@ -157,31 +157,31 @@ function __div(Numer: longint; Denom: longint): div_t; cdecl;external clib name
 function ldiv(Numer: Longint; Denom: Longint): ldiv_t; cdecl;external clib name 'ldiv';
 function lldiv(Numer: Int64; Denom: Int64): lldiv_t; cdecl;external clib name 'lldiv';
 
-function ecvt(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint):Pchar;cdecl;external clib name 'ecvt';
-function fcvt(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint):Pchar;cdecl;external clib name 'fcvt';
-function gcvt(__value:double; __ndigit:longint; __buf:Pchar):Pchar;cdecl;external clib name 'gcvt';
-function qecvt(__value: extended; __ndigit: longint; __decpt: Plongint;  __sign: plongint): PChar; cdecl;external clib name 'qecvt';
-function qfcvt(__value: extended; __ndigit: longint; __decpt: plongint;  __sign: plongint): PChar; cdecl;external clib name 'qfcvt';
-function qgcvt(__value: extended; __ndigit: longint;  __buf: PChar): PChar; cdecl;external clib name 'qgcvt';
-
-function ecvt_r(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint; __buf:Pchar; __len:size_t):longint;cdecl;external clib name 'ecvt_r';
-function fcvt_r(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint; __buf:Pchar; __len:size_t):longint;cdecl;external clib name 'fcvt_r';
-function qecvt_r(Value: Extended; __ndigit: longint; __decpt: Plongint; __sign: plongint; Buf: PChar; Len: size_t): longint; cdecl;external clib name 'qecvt_r';
-function qfcvt_r(Value: Extended; __ndigit: longint; __decpt: plongint; __sign: plongint; Buf: PChar; Len: size_t): longint; cdecl;external clib name 'qfcvt_r';
-
-function mblen(__s:Pchar; __n:size_t):longint;cdecl;external clib name 'mblen';
-function mbtowc(__pwc:Pwchar_t; __s:Pchar; __n:size_t):longint;cdecl;external clib name 'mbtowc';
-function wctomb(__s:Pchar; __wchar:wchar_t):longint;cdecl;external clib name 'wctomb';
-function mbstowcs(__pwcs:Pwchar_t; __s:Pchar; __n:size_t):size_t;cdecl;external clib name 'mbstowcs';
-function wcstombs(__s:Pchar; __pwcs:Pwchar_t; __n:size_t):size_t;cdecl;external clib name 'wcstombs';
-function rpmatch(__response:Pchar):longint;cdecl;external clib name 'rpmatch';
-function getsubopt(__optionp:PPchar; __tokens:PPchar; __valuep:PPchar):longint;cdecl;external clib name 'getsubopt';
-procedure setkey(__key:Pchar);cdecl;external clib name 'setkey';
+function ecvt(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint):PAnsiChar;cdecl;external clib name 'ecvt';
+function fcvt(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint):PAnsiChar;cdecl;external clib name 'fcvt';
+function gcvt(__value:double; __ndigit:longint; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'gcvt';
+function qecvt(__value: extended; __ndigit: longint; __decpt: Plongint;  __sign: plongint): PAnsiChar; cdecl;external clib name 'qecvt';
+function qfcvt(__value: extended; __ndigit: longint; __decpt: plongint;  __sign: plongint): PAnsiChar; cdecl;external clib name 'qfcvt';
+function qgcvt(__value: extended; __ndigit: longint;  __buf: PAnsiChar): PAnsiChar; cdecl;external clib name 'qgcvt';
+
+function ecvt_r(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint; __buf:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'ecvt_r';
+function fcvt_r(__value:double; __ndigit:longint; __decpt:Plongint; __sign:Plongint; __buf:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'fcvt_r';
+function qecvt_r(Value: Extended; __ndigit: longint; __decpt: Plongint; __sign: plongint; Buf: PAnsiChar; Len: size_t): longint; cdecl;external clib name 'qecvt_r';
+function qfcvt_r(Value: Extended; __ndigit: longint; __decpt: plongint; __sign: plongint; Buf: PAnsiChar; Len: size_t): longint; cdecl;external clib name 'qfcvt_r';
+
+function mblen(__s:PAnsiChar; __n:size_t):longint;cdecl;external clib name 'mblen';
+function mbtowc(__pwc:Pwchar_t; __s:PAnsiChar; __n:size_t):longint;cdecl;external clib name 'mbtowc';
+function wctomb(__s:PAnsiChar; __wchar:wchar_t):longint;cdecl;external clib name 'wctomb';
+function mbstowcs(__pwcs:Pwchar_t; __s:PAnsiChar; __n:size_t):size_t;cdecl;external clib name 'mbstowcs';
+function wcstombs(__s:PAnsiChar; __pwcs:Pwchar_t; __n:size_t):size_t;cdecl;external clib name 'wcstombs';
+function rpmatch(__response:PAnsiChar):longint;cdecl;external clib name 'rpmatch';
+function getsubopt(__optionp:PPAnsiChar; __tokens:PPAnsiChar; __valuep:PPAnsiChar):longint;cdecl;external clib name 'getsubopt';
+procedure setkey(__key:PAnsiChar);cdecl;external clib name 'setkey';
 function posix_openpt(__oflag:longint):longint;cdecl;external clib name 'posix_openpt';
 function grantpt(__fd:longint):longint;cdecl;external clib name 'grantpt';
 function unlockpt(__fd:longint):longint;cdecl;external clib name 'unlockpt';
-function ptsname(__fd:longint):Pchar;cdecl;external clib name 'ptsname';
-function ptsname_r(__fd:longint; __buf:Pchar; __buflen:size_t):longint;cdecl;external clib name 'ptsname_r';
+function ptsname(__fd:longint):PAnsiChar;cdecl;external clib name 'ptsname';
+function ptsname_r(__fd:longint; __buf:PAnsiChar; __buflen:size_t):longint;cdecl;external clib name 'ptsname_r';
 function getpt:longint;cdecl;external clib name 'getpt';
 function getloadavg(__loadavg:array of double; __nelem:longint):longint;cdecl;external clib name 'getloadavg';
 

packages/libc/src/stimeh.inc

@@ -41,7 +41,7 @@ Type
 
 function getitimer(__which:__itimer_which_t; __value:Pitimerval):longint;cdecl;external clib name 'getitimer';
 function setitimer(__which:__itimer_which_t; __new:Pitimerval; __old:Pitimerval):longint;cdecl;external clib name 'setitimer';
-function utimes(__file:Pchar; __tvp: Ptimeval):longint;cdecl;external clib name 'utimes';
+function utimes(__file:PAnsiChar; __tvp: Ptimeval):longint;cdecl;external clib name 'utimes';
 
 // Macros, translated.
 
@@ -69,7 +69,7 @@ type
   PIntervalTimerValue = ^TIntervalTimerValue;
 
 
-function utimes(__file: PChar; const AccessModTimes: TAccessModificationTimes):longint;cdecl;external clib name 'utimes';
+function utimes(__file: PAnsiChar; const AccessModTimes: TAccessModificationTimes):longint;cdecl;external clib name 'utimes';
 function gettimeofday(var __tv:timeval; __tz:__timezone_ptr_t):longint;cdecl;external clib name 'gettimeofday';
 function gettimeofday(var __tv:timeval; var _tz:timezone):longint;cdecl;external clib name 'gettimeofday';
 function settimeofday(const __tv: timeval; __tz:Ptimezone):longint;cdecl;external clib name 'settimeofday';

packages/libc/src/stringh.inc

@@ -8,58 +8,58 @@ function memcmp(__s1:pointer; __s2:pointer; __n:size_t):longint;cdecl;external c
 function memchr(__s:pointer; __c:longint; __n:size_t):pointer;cdecl;external clib name 'memchr';
 function rawmemchr(__s:pointer; __c:longint):pointer;cdecl;external clib name 'rawmemchr';
 function memrchr(__s:pointer; __c:longint; __n:size_t):pointer;cdecl;external clib name 'memrchr';
-function strcpy(__dest:Pchar; __src:Pchar):Pchar;cdecl;external clib name 'strcpy';
-function strncpy(__dest:Pchar; __src:Pchar; __n:size_t):Pchar;cdecl;external clib name 'strncpy';
-function __strcat(__dest:Pchar; __src:Pchar):Pchar;cdecl;external clib name 'strcat';
-function strncat(__dest:Pchar; __src:Pchar; __n:size_t):Pchar;cdecl;external clib name 'strncat';
-function strcmp(__s1:Pchar; __s2:Pchar):longint;cdecl;external clib name 'strcmp';
-function strncmp(__s1:Pchar; __s2:Pchar; __n:size_t):longint;cdecl;external clib name 'strncmp';
-function strcoll(__s1:Pchar; __s2:Pchar):longint;cdecl;external clib name 'strcoll';
-function strxfrm(__dest:Pchar; __src:Pchar; __n:size_t):size_t;cdecl;external clib name 'strxfrm';
-function __strcoll_l(__s1:Pchar; __s2:Pchar; __l:__locale_t):longint;cdecl;external clib name '__strcoll_l';
-function __strxfrm_l(__dest:Pchar; __src:Pchar; __n:size_t; __l:__locale_t):size_t;cdecl;external clib name '__strxfrm_l';
-function strdup(const S: PChar): PChar; cdecl;external clib name 'strdup';
-function strndup(const S: PChar; N: size_t): PChar; cdecl; external clib name 'strndup';
-function strrchr(__s:Pchar; __c:longint):Pchar;cdecl;external clib name 'strrchr';
-function strchrnul(__s:Pchar; __c:longint):Pchar;cdecl;external clib name 'strchrnul';
-function strcspn(__s:Pchar; __reject:Pchar):size_t;cdecl;external clib name 'strcspn';
-function strspn(__s:Pchar; __accept:Pchar):size_t;cdecl;external clib name 'strspn';
-function strpbrk(__s:Pchar; __accept:Pchar):Pchar;cdecl;external clib name 'strpbrk';
-function strstr(__haystack:Pchar; __needle:Pchar):Pchar;cdecl;external clib name 'strstr';
-function strcasestr(__haystack:Pchar; __needle:Pchar):Pchar;cdecl;external clib name 'strcasestr';
-function strtok(__s:Pchar; __delim:Pchar):Pchar;cdecl;external clib name 'strtok';
-function __strtok_r(__s:Pchar; __delim:Pchar; __save_ptr:PPchar):Pchar;cdecl;external clib name '__strtok_r';
-function strtok_r(__s:Pchar; __delim:Pchar; __save_ptr:PPchar):Pchar;cdecl;external clib name 'strtok_r';
+function strcpy(__dest:PAnsiChar; __src:PAnsiChar):PAnsiChar;cdecl;external clib name 'strcpy';
+function strncpy(__dest:PAnsiChar; __src:PAnsiChar; __n:size_t):PAnsiChar;cdecl;external clib name 'strncpy';
+function __strcat(__dest:PAnsiChar; __src:PAnsiChar):PAnsiChar;cdecl;external clib name 'strcat';
+function strncat(__dest:PAnsiChar; __src:PAnsiChar; __n:size_t):PAnsiChar;cdecl;external clib name 'strncat';
+function strcmp(__s1:PAnsiChar; __s2:PAnsiChar):longint;cdecl;external clib name 'strcmp';
+function strncmp(__s1:PAnsiChar; __s2:PAnsiChar; __n:size_t):longint;cdecl;external clib name 'strncmp';
+function strcoll(__s1:PAnsiChar; __s2:PAnsiChar):longint;cdecl;external clib name 'strcoll';
+function strxfrm(__dest:PAnsiChar; __src:PAnsiChar; __n:size_t):size_t;cdecl;external clib name 'strxfrm';
+function __strcoll_l(__s1:PAnsiChar; __s2:PAnsiChar; __l:__locale_t):longint;cdecl;external clib name '__strcoll_l';
+function __strxfrm_l(__dest:PAnsiChar; __src:PAnsiChar; __n:size_t; __l:__locale_t):size_t;cdecl;external clib name '__strxfrm_l';
+function strdup(const S: PAnsiChar): PAnsiChar; cdecl;external clib name 'strdup';
+function strndup(const S: PAnsiChar; N: size_t): PAnsiChar; cdecl; external clib name 'strndup';
+function strrchr(__s:PAnsiChar; __c:longint):PAnsiChar;cdecl;external clib name 'strrchr';
+function strchrnul(__s:PAnsiChar; __c:longint):PAnsiChar;cdecl;external clib name 'strchrnul';
+function strcspn(__s:PAnsiChar; __reject:PAnsiChar):size_t;cdecl;external clib name 'strcspn';
+function strspn(__s:PAnsiChar; __accept:PAnsiChar):size_t;cdecl;external clib name 'strspn';
+function strpbrk(__s:PAnsiChar; __accept:PAnsiChar):PAnsiChar;cdecl;external clib name 'strpbrk';
+function strstr(__haystack:PAnsiChar; __needle:PAnsiChar):PAnsiChar;cdecl;external clib name 'strstr';
+function strcasestr(__haystack:PAnsiChar; __needle:PAnsiChar):PAnsiChar;cdecl;external clib name 'strcasestr';
+function strtok(__s:PAnsiChar; __delim:PAnsiChar):PAnsiChar;cdecl;external clib name 'strtok';
+function __strtok_r(__s:PAnsiChar; __delim:PAnsiChar; __save_ptr:PPAnsiChar):PAnsiChar;cdecl;external clib name '__strtok_r';
+function strtok_r(__s:PAnsiChar; __delim:PAnsiChar; __save_ptr:PPAnsiChar):PAnsiChar;cdecl;external clib name 'strtok_r';
 function memmem(__haystack:pointer; __haystacklen:size_t; __needle:pointer; __needlelen:size_t):pointer;cdecl;external clib name 'memmem';
 function __mempcpy(__dest:pointer; __src:pointer; __n:size_t):pointer;cdecl;external clib name '__mempcpy';
 function mempcpy(__dest:pointer; __src:pointer; __n:size_t):pointer;cdecl;external clib name 'mempcpy';
-function __strlen(__s:Pchar):size_t;cdecl;external clib name 'strlen';
-function strnlen(__string:Pchar; __maxlen:size_t):size_t;cdecl;external clib name 'strnlen';
-function strerror(__errnum:longint):Pchar;cdecl;external clib name 'strerror';
-function strerror_r(__errnum:longint; __buf:Pchar; __buflen:size_t):Pchar;cdecl;external clib name 'strerror_r';
+function __strlen(__s:PAnsiChar):size_t;cdecl;external clib name 'strlen';
+function strnlen(__string:PAnsiChar; __maxlen:size_t):size_t;cdecl;external clib name 'strnlen';
+function strerror(__errnum:longint):PAnsiChar;cdecl;external clib name 'strerror';
+function strerror_r(__errnum:longint; __buf:PAnsiChar; __buflen:size_t):PAnsiChar;cdecl;external clib name 'strerror_r';
 procedure __bzero(__s:pointer; __n:size_t);cdecl;external clib name '__bzero';
 procedure bcopy(__src:pointer; __dest:pointer; __n:size_t);cdecl;external clib name 'bcopy';
 procedure bzero(__s:pointer; __n:size_t);cdecl;external clib name 'bzero';
 function bcmp(__s1:pointer; __s2:pointer; __n:size_t):longint;cdecl;external clib name 'bcmp';
-function __index(__s:Pchar; __c:longint):Pchar;cdecl;external clib name 'index';
-function rindex(__s:Pchar; __c:longint):Pchar;cdecl;external clib name 'rindex';
+function __index(__s:PAnsiChar; __c:longint):PAnsiChar;cdecl;external clib name 'index';
+function rindex(__s:PAnsiChar; __c:longint):PAnsiChar;cdecl;external clib name 'rindex';
 function ffs(I: Integer): Integer; cdecl; external clib name 'ffs';
 function ffsl(L: Integer): Integer; cdecl; external clib name 'ffsl';
 function ffsll(LL: Int64): Integer; cdecl; external clib name 'ffsll';
-function strcasecmp(__s1:Pchar; __s2:Pchar):longint;cdecl;external clib name 'strcasecmp';
-function strncasecmp(__s1:Pchar; __s2:Pchar; __n:size_t):longint;cdecl;external clib name 'strncasecmp';
-function __strcasecmp_l(__s1:Pchar; __s2:Pchar; __loc:__locale_t):longint;cdecl;external clib name '__strcasecmp_l';
-function __strncasecmp_l(__s1:Pchar; __s2:Pchar; __n:size_t; __loc:__locale_t):longint;cdecl;external clib name '__strncasecmp_l';
-function strsep(__stringp:PPchar; __delim:Pchar):Pchar;cdecl;external clib name 'strsep';
-function strverscmp(__s1:Pchar; __s2:Pchar):longint;cdecl;external clib name 'strverscmp';
-function strsignal(__sig:longint):Pchar;cdecl;external clib name 'strsignal';
-function __stpcpy(__dest:Pchar; __src:Pchar):Pchar;cdecl;external clib name '__stpcpy';
-function stpcpy(__dest:Pchar; __src:Pchar):Pchar;cdecl;external clib name 'stpcpy';
-function __stpncpy(__dest:Pchar; __src:Pchar; __n:size_t):Pchar;cdecl;external clib name '__stpncpy';
-function stpncpy(__dest:Pchar; __src:Pchar; __n:size_t):Pchar;cdecl;external clib name 'stpncpy';
-function strfry(__string:Pchar):Pchar;cdecl;external clib name 'strfry';
+function strcasecmp(__s1:PAnsiChar; __s2:PAnsiChar):longint;cdecl;external clib name 'strcasecmp';
+function strncasecmp(__s1:PAnsiChar; __s2:PAnsiChar; __n:size_t):longint;cdecl;external clib name 'strncasecmp';
+function __strcasecmp_l(__s1:PAnsiChar; __s2:PAnsiChar; __loc:__locale_t):longint;cdecl;external clib name '__strcasecmp_l';
+function __strncasecmp_l(__s1:PAnsiChar; __s2:PAnsiChar; __n:size_t; __loc:__locale_t):longint;cdecl;external clib name '__strncasecmp_l';
+function strsep(__stringp:PPAnsiChar; __delim:PAnsiChar):PAnsiChar;cdecl;external clib name 'strsep';
+function strverscmp(__s1:PAnsiChar; __s2:PAnsiChar):longint;cdecl;external clib name 'strverscmp';
+function strsignal(__sig:longint):PAnsiChar;cdecl;external clib name 'strsignal';
+function __stpcpy(__dest:PAnsiChar; __src:PAnsiChar):PAnsiChar;cdecl;external clib name '__stpcpy';
+function stpcpy(__dest:PAnsiChar; __src:PAnsiChar):PAnsiChar;cdecl;external clib name 'stpcpy';
+function __stpncpy(__dest:PAnsiChar; __src:PAnsiChar; __n:size_t):PAnsiChar;cdecl;external clib name '__stpncpy';
+function stpncpy(__dest:PAnsiChar; __src:PAnsiChar; __n:size_t):PAnsiChar;cdecl;external clib name 'stpncpy';
+function strfry(__string:PAnsiChar):PAnsiChar;cdecl;external clib name 'strfry';
 function memfrob(__s:pointer; __n:size_t):pointer;cdecl;external clib name 'memfrob';
-function basename(__filename:Pchar):Pchar;cdecl;external clib name 'basename';
+function basename(__filename:PAnsiChar):PAnsiChar;cdecl;external clib name 'basename';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/stroptsh.inc

@@ -4,8 +4,8 @@ function getmsg(__fildes:longint; __ctlptr:Pstrbuf; __dataptr:Pstrbuf; __flagsp:
 function getpmsg(__fildes:longint; __ctlptr:Pstrbuf; __dataptr:Pstrbuf; __bandp:Plongint; __flagsp:Plongint):longint;cdecl;external clib name 'getpmsg';
 function putmsg(__fildes:longint; __ctlptr:Pstrbuf; __dataptr:Pstrbuf; __flags:longint):longint;cdecl;external clib name 'putmsg';
 function putpmsg(__fildes:longint; __ctlptr:Pstrbuf; __dataptr:Pstrbuf; __band:longint; __flags:longint):longint;cdecl;external clib name 'putpmsg';
-function fattach(__fildes:longint; __path:Pchar):longint;cdecl;external clib name 'fattach';
-function fdetach(__path:Pchar):longint;cdecl;external clib name 'fdetach';
+function fattach(__fildes:longint; __path:PAnsiChar):longint;cdecl;external clib name 'fattach';
+function fdetach(__path:PAnsiChar):longint;cdecl;external clib name 'fdetach';
 
 { ---------------------------------------------------------------------
     Borland compatibility types

packages/libc/src/sttydefaults.inc

@@ -1,5 +1,5 @@
 
-function CTRL(x: Char): Char;
+function CTRL(x: AnsiChar): AnsiChar;
 begin
-  Result:=Char(Ord(x) and $1F);
+  Result:=AnsiChar(Ord(x) and $1F);
 end;

packages/libc/src/sttydefaultsh.inc

@@ -7,29 +7,29 @@ const
    TTYDEF_CFLAG = ((CREAD or CS7) or PARENB) or HUPCL;
    TTYDEF_SPEED = B9600;
 
-function CTRL(x : char) : char;
+function CTRL(x : AnsiChar) : AnsiChar;
 
 Const
   CEOF       = Chr(Ord('d') and $1F);
   CEOL       = #0; { XXX avoid _POSIX_VDISABLE }
 
   CERASE  = 0177;
-  CINTR   = Char(Ord('c') and $1F);
+  CINTR   = AnsiChar(Ord('c') and $1F);
 
   CSTATUS = #0;
-  CKILL   = Char(Ord('u') and $1F);
+  CKILL   = AnsiChar(Ord('u') and $1F);
 
   CMIN = 1;
   CQUIT = 034;
 
-  CSUSP      = Char(Ord('z') and $1F);
-  CDSUSP     = Char(Ord('y') and $1F);
-  CSTART     = Char(Ord('q') and $1F);
-  CSTOP      = Char(Ord('s') and $1F);
-  CLNEXT     = Char(Ord('v') and $1F);
-  CDISCARD   = Char(Ord('o') and $1F);
-  CWERASE    = Char(Ord('w') and $1F);
-  CREPRINT   = Char(Ord('r') and $1F);
+  CSUSP      = AnsiChar(Ord('z') and $1F);
+  CDSUSP     = AnsiChar(Ord('y') and $1F);
+  CSTART     = AnsiChar(Ord('q') and $1F);
+  CSTOP      = AnsiChar(Ord('s') and $1F);
+  CLNEXT     = AnsiChar(Ord('v') and $1F);
+  CDISCARD   = AnsiChar(Ord('o') and $1F);
+  CWERASE    = AnsiChar(Ord('w') and $1F);
+  CREPRINT   = AnsiChar(Ord('r') and $1F);
   CEOT       = CEOF;
 
   CBRK       = CEOL;

packages/libc/src/sunh.inc

@@ -3,7 +3,7 @@ type
    Psockaddr_un = ^sockaddr_un;
    sockaddr_un = record
      sun_family : sa_family_t;
-     sun_path : array[0..107] of char;
+     sun_path : array[0..107] of AnsiChar;
    end;
 
 

packages/libc/src/suserh.inc

@@ -65,7 +65,7 @@ type
         u_ar0 : Puser_regs_struct;
         u_fpstate : Puser_fpregs_struct;
         magic : dword;
-        u_comm : array[0..31] of char;
+        u_comm : array[0..31] of AnsiChar;
         u_debugreg : array[0..7] of longint;
      end;
 

packages/libc/src/sutsnameh.inc

@@ -5,13 +5,13 @@ const
 type
    Putsname = ^utsname;
    utsname = record
-        sysname : array[0..(_UTSNAME_LENGTH)-1] of char;
-        nodename : array[0..(_UTSNAME_NODENAME_LENGTH)-1] of char;
-        release : array[0..(_UTSNAME_LENGTH)-1] of char;
-        version : array[0..(_UTSNAME_LENGTH)-1] of char;
-        machine : array[0..(_UTSNAME_LENGTH)-1] of char;
-        domainname : array[0..(_UTSNAME_DOMAIN_LENGTH)-1] of char;
-        __domainname : array[0..(_UTSNAME_DOMAIN_LENGTH)-1] of char;
+        sysname : array[0..(_UTSNAME_LENGTH)-1] of AnsiChar;
+        nodename : array[0..(_UTSNAME_NODENAME_LENGTH)-1] of AnsiChar;
+        release : array[0..(_UTSNAME_LENGTH)-1] of AnsiChar;
+        version : array[0..(_UTSNAME_LENGTH)-1] of AnsiChar;
+        machine : array[0..(_UTSNAME_LENGTH)-1] of AnsiChar;
+        domainname : array[0..(_UTSNAME_DOMAIN_LENGTH)-1] of AnsiChar;
+        __domainname : array[0..(_UTSNAME_DOMAIN_LENGTH)-1] of AnsiChar;
      end;
 
 const

packages/libc/src/systypeshh.inc

@@ -33,7 +33,7 @@ Type
   ulong = dword;
   ushort = word;
   uint = dword;
-  int8_t = char;
+  int8_t = AnsiChar;
   int16_t = smallint;
   int32_t = longint;
   u_int8_t = byte;

packages/libc/src/timeh.inc

@@ -25,8 +25,8 @@ type
         tm_yday : longint;
         tm_isdst : longint;
         case boolean of 
-         false : (tm_gmtoff : longint;tm_zone : Pchar);
-         true  : (__tm_gmtoff : longint;__tm_zone : Pchar);
+         false : (tm_gmtoff : longint;tm_zone : PAnsiChar);
+         true  : (__tm_gmtoff : longint;__tm_zone : PAnsiChar);
 	end;
 
    Pitimerspec = ^itimerspec;
@@ -44,16 +44,16 @@ function clock:clock_t;cdecl;external clib name 'clock';
 function __time(__timer:Ptime_t):time_t;cdecl;external clib name 'time';
 function difftime(__time1:time_t; __time0:time_t):double;cdecl;external clib name 'difftime';
 function mktime(__tp:Ptm):time_t;cdecl;external clib name 'mktime';
-function strftime(__s:Pchar; __maxsize:size_t; __format:Pchar; __tp:Ptm):size_t;cdecl;external clib name 'strftime';
-function strptime(__s:Pchar; __fmt:Pchar; __tp:Ptm):Pchar;cdecl;external clib name 'strptime';
+function strftime(__s:PAnsiChar; __maxsize:size_t; __format:PAnsiChar; __tp:Ptm):size_t;cdecl;external clib name 'strftime';
+function strptime(__s:PAnsiChar; __fmt:PAnsiChar; __tp:Ptm):PAnsiChar;cdecl;external clib name 'strptime';
 function gmtime(__timer:Ptime_t):Ptm;cdecl;external clib name 'gmtime';
 function localtime(__timer:Ptime_t):Ptm;cdecl;external clib name 'localtime';
 function gmtime_r(__timer:Ptime_t; __tp:Ptm):Ptm;cdecl;external clib name 'gmtime_r';
 function localtime_r(__timer:Ptime_t; __tp:Ptm):Ptm;cdecl;external clib name 'localtime_r';
-function asctime(__tp:Ptm):Pchar;cdecl;external clib name 'asctime';
-function ctime(__timer:Ptime_t):Pchar;cdecl;external clib name 'ctime';
-function asctime_r(__tp:Ptm; __buf:Pchar):Pchar;cdecl;external clib name 'asctime_r';
-function ctime_r(__timer:Ptime_t; __buf:Pchar):Pchar;cdecl;external clib name 'ctime_r';
+function asctime(__tp:Ptm):PAnsiChar;cdecl;external clib name 'asctime';
+function ctime(__timer:Ptime_t):PAnsiChar;cdecl;external clib name 'ctime';
+function asctime_r(__tp:Ptm; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'asctime_r';
+function ctime_r(__timer:Ptime_t; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'ctime_r';
 procedure tzset;cdecl;external clib name 'tzset';
 function stime(__when:Ptime_t):longint;cdecl;external clib name 'stime';
 function timelocal(__tp:Ptm):time_t;cdecl;external clib name 'timelocal';
@@ -69,8 +69,8 @@ function timer_delete(__timerid:timer_t):longint;cdecl;external clib name 'timer
 function timer_settime(__timerid:timer_t; __flags:longint; __value:Pitimerspec; __ovalue:Pitimerspec):longint;cdecl;external clib name 'timer_settime';
 function timer_gettime(__timerid:timer_t; __value:Pitimerspec):longint;cdecl;external clib name 'timer_gettime';
 function timer_getoverrun(__timerid:timer_t):longint;cdecl;external clib name 'timer_getoverrun';
-function getdate(__string:Pchar):Ptm;cdecl;external clib name 'getdate';
-function getdate_r(__string:Pchar; __resbufp:Ptm):longint;cdecl;external clib name 'getdate_r';
+function getdate(__string:PAnsiChar):Ptm;cdecl;external clib name 'getdate';
+function getdate_r(__string:PAnsiChar; __resbufp:Ptm):longint;cdecl;external clib name 'getdate_r';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
@@ -86,16 +86,16 @@ Type
 
 function __time(var __timer : ttime_t):time_t;cdecl;external clib name 'time';
 function mktime(var __tp:tm):time_t;cdecl;external clib name 'mktime';
-function strftime(__s:Pchar; __maxsize:size_t; __format:Pchar; var __tp:tm):size_t;cdecl;external clib name 'strftime';
-function strptime(__s:Pchar; __fmt:Pchar; var __tp: tm):Pchar;cdecl;external clib name 'strptime';
+function strftime(__s:PAnsiChar; __maxsize:size_t; __format:PAnsiChar; var __tp:tm):size_t;cdecl;external clib name 'strftime';
+function strptime(__s:PAnsiChar; __fmt:PAnsiChar; var __tp: tm):PAnsiChar;cdecl;external clib name 'strptime';
 function gmtime(var __timer : ttime_t):Ptm;cdecl;external clib name 'gmtime';
 function localtime(var __timer : ttime_t):Ptm;cdecl;external clib name 'localtime';
 function gmtime_r(var __timer : ttime_t; var __tp:tm):Ptm;cdecl;external clib name 'gmtime_r';
 function localtime_r(var __timer : ttime_t; var __tp: tm):Ptm;cdecl;external clib name 'localtime_r';
-function asctime(var __tp: tm):Pchar;cdecl;external clib name 'asctime';
-function ctime(var __timer : ttime_t):Pchar;cdecl;external clib name 'ctime';
-function asctime_r(var __tp:tm; __buf:Pchar):Pchar;cdecl;external clib name 'asctime_r';
-function ctime_r(var __timer : ttime_t; __buf:Pchar):Pchar;cdecl;external clib name 'ctime_r';
+function asctime(var __tp: tm):PAnsiChar;cdecl;external clib name 'asctime';
+function ctime(var __timer : ttime_t):PAnsiChar;cdecl;external clib name 'ctime';
+function asctime_r(var __tp:tm; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'asctime_r';
+function ctime_r(var __timer : ttime_t; __buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'ctime_r';
 
 function stime(var __when : ttime_t):longint;cdecl;external clib name 'stime';
 function timegm(var __tp:tm):time_t;cdecl;external clib name 'timegm';

packages/libc/src/ttyenth.inc

@@ -9,12 +9,12 @@ const
 type
    Pttyent = ^ttyent;
    ttyent = record
-        ty_name : Pchar;
-        ty_getty : Pchar;
-        ty_type : Pchar;
+        ty_name : PAnsiChar;
+        ty_getty : PAnsiChar;
+        ty_type : PAnsiChar;
         ty_status : longint;
-        ty_window : Pchar;
-        ty_comment : Pchar;
+        ty_window : PAnsiChar;
+        ty_comment : PAnsiChar;
      end;
 
 
@@ -23,7 +23,7 @@ const
    TTY_SECURE = $02;
 
 function getttyent:Pttyent;cdecl;external clib name 'getttyent';
-function getttynam(__tty:Pchar):Pttyent;cdecl;external clib name 'getttynam';
+function getttynam(__tty:PAnsiChar):Pttyent;cdecl;external clib name 'getttynam';
 function setttyent:longint;cdecl;external clib name 'setttyent';
 function endttyent:longint;cdecl;external clib name 'endttyent';
 

packages/libc/src/typesh.inc

@@ -10,7 +10,7 @@ type
    __u_quad_t = qword;
    __quad_t = int64;
 
-   __int8_t = char;
+   __int8_t = AnsiChar;
    __uint8_t = byte;
    __int16_t = smallint;
    __uint16_t = word;
@@ -37,7 +37,7 @@ type
         __val : array[0..1] of longint;
      end;
    __daddr_t = longint;
-   __caddr_t = pchar;
+   __caddr_t = PAnsiChar;
    __time_t = longint;
    __useconds_t = dword;
    __suseconds_t = longint;
@@ -117,7 +117,7 @@ Type
   ulong = dword;
   ushort = word;
   uint = dword;
-  int8_t = char;
+  int8_t = AnsiChar;
   int16_t = smallint;
   int32_t = longint;
   u_int8_t = byte;

packages/libc/src/unistdh.inc

@@ -32,9 +32,9 @@ type
    Pintptr_t = ^intptr_t;
 
 
-function access(__name:Pchar; __type:longint):longint;cdecl;external clib name 'access';
+function access(__name:PAnsiChar; __type:longint):longint;cdecl;external clib name 'access';
 
-function euidaccess(__name:Pchar; __type:longint):longint;cdecl;external clib name 'euidaccess';
+function euidaccess(__name:PAnsiChar; __type:longint):longint;cdecl;external clib name 'euidaccess';
 
 function lseek(__fd:longint; __offset:__off_t; __whence:longint):__off_t;cdecl;external clib name 'lseek';
 function lseek64(__fd:longint; __offset:__off64_t; __whence:longint):__off64_t;cdecl;external clib name 'lseek64';
@@ -64,45 +64,45 @@ function ualarm(__value:__useconds_t; __interval:__useconds_t):__useconds_t;cdec
 function usleep(__useconds:__useconds_t):longint;cdecl;external clib name 'usleep';
 
 function pause:longint;cdecl;external clib name 'pause';
-function chown(__file:Pchar; __owner:__uid_t; __group:__gid_t):longint;cdecl;external clib name 'chown';
+function chown(__file:PAnsiChar; __owner:__uid_t; __group:__gid_t):longint;cdecl;external clib name 'chown';
 
 function fchown(__fd:longint; __owner:__uid_t; __group:__gid_t):longint;cdecl;external clib name 'fchown';
-function lchown(__file:Pchar; __owner:__uid_t; __group:__gid_t):longint;cdecl;external clib name 'lchown';
+function lchown(__file:PAnsiChar; __owner:__uid_t; __group:__gid_t):longint;cdecl;external clib name 'lchown';
 
-function __chdir(__path:Pchar):longint;cdecl;external clib name 'chdir';
+function __chdir(__path:PAnsiChar):longint;cdecl;external clib name 'chdir';
 function fchdir(__fd:longint):longint;cdecl;external clib name 'fchdir';
 
-function getcwd(__buf:Pchar; __size:size_t):Pchar;cdecl;external clib name 'getcwd';
-function get_current_dir_name:Pchar;cdecl;external clib name 'get_current_dir_name';
-function getwd(__buf:Pchar):Pchar;cdecl;external clib name 'getwd';
+function getcwd(__buf:PAnsiChar; __size:size_t):PAnsiChar;cdecl;external clib name 'getcwd';
+function get_current_dir_name:PAnsiChar;cdecl;external clib name 'get_current_dir_name';
+function getwd(__buf:PAnsiChar):PAnsiChar;cdecl;external clib name 'getwd';
 
 function dup(__fd:longint):longint;cdecl;external clib name 'dup';
 function dup2(__fd:longint; __fd2:longint):longint;cdecl;external clib name 'dup2';
 
   var
-     __environ : ^Pchar;cvar;external;
-     environ : ^Pchar;cvar;external;
+     __environ : ^PAnsiChar;cvar;external;
+     environ : ^PAnsiChar;cvar;external;
 
-function execve(__path:Pchar; __argv:PPchar; __envp:PPchar):longint;cdecl;external clib name 'execve';
-function fexecve(__fd:longint; __argv:PPchar; __envp:PPchar):longint;cdecl;external clib name 'fexecve';
+function execve(__path:PAnsiChar; __argv:PPAnsiChar; __envp:PPAnsiChar):longint;cdecl;external clib name 'execve';
+function fexecve(__fd:longint; __argv:PPAnsiChar; __envp:PPAnsiChar):longint;cdecl;external clib name 'fexecve';
 
-function execv(__path:Pchar; __argv:PPchar):longint;cdecl;external clib name 'execv';
-function execle(__path:Pchar; __arg:Pchar; args:array of const):longint;cdecl;varargs;external clib name 'execle';
-function execle(__path:Pchar; __arg:Pchar):longint;cdecl;external clib name 'execle';
-function execl(__path:Pchar; __arg:Pchar; args:array of const):longint;cdecl;external clib name 'execl';
-function execl(__path:Pchar; __arg:Pchar):longint;cdecl;varargs;external clib name 'execl';
-function execvp(__file:Pchar; __argv:PPchar):longint;cdecl;external clib name 'execvp';
-function execlp(__file:Pchar; __arg:Pchar; args:array of const):longint;cdecl;external clib name 'execlp';
-function execlp(__file:Pchar; __arg:Pchar):longint;cdecl;varargs;external clib name 'execlp';
+function execv(__path:PAnsiChar; __argv:PPAnsiChar):longint;cdecl;external clib name 'execv';
+function execle(__path:PAnsiChar; __arg:PAnsiChar; args:array of const):longint;cdecl;varargs;external clib name 'execle';
+function execle(__path:PAnsiChar; __arg:PAnsiChar):longint;cdecl;external clib name 'execle';
+function execl(__path:PAnsiChar; __arg:PAnsiChar; args:array of const):longint;cdecl;external clib name 'execl';
+function execl(__path:PAnsiChar; __arg:PAnsiChar):longint;cdecl;varargs;external clib name 'execl';
+function execvp(__file:PAnsiChar; __argv:PPAnsiChar):longint;cdecl;external clib name 'execvp';
+function execlp(__file:PAnsiChar; __arg:PAnsiChar; args:array of const):longint;cdecl;external clib name 'execlp';
+function execlp(__file:PAnsiChar; __arg:PAnsiChar):longint;cdecl;varargs;external clib name 'execlp';
 
 function nice(__inc:longint):longint;cdecl;external clib name 'nice';
 procedure _exit (__status : longint); cdecl; external clib name '_exit';
 
-function pathconf(__path:Pchar; __name:longint):longint;cdecl;external clib name 'pathconf';
+function pathconf(__path:PAnsiChar; __name:longint):longint;cdecl;external clib name 'pathconf';
 function fpathconf(__fd:longint; __name:longint):longint;cdecl;external clib name 'fpathconf';
 
 function sysconf (__name : longint) : longint; cdecl; external clib name 'sysconf';
-function confstr(__name:longint; __buf:Pchar; __len:size_t):size_t;cdecl;external clib name 'confstr';
+function confstr(__name:longint; __buf:PAnsiChar; __len:size_t):size_t;cdecl;external clib name 'confstr';
 
 function getpid:__pid_t;cdecl;external clib name 'getpid';
 function getppid:__pid_t;cdecl;external clib name 'getppid';
@@ -132,40 +132,40 @@ function setregid(__rgid:__gid_t; __egid:__gid_t):longint;cdecl;external clib na
 function setegid(__gid:__gid_t):longint;cdecl;external clib name 'setegid';
 function fork:__pid_t;cdecl;external clib name 'fork';
 function vfork:__pid_t;cdecl;external clib name 'vfork';
-function ttyname(__fd:longint):Pchar;cdecl;external clib name 'ttyname';
-function ttyname_r(__fd:longint; __buf:Pchar; __buflen:size_t):longint;cdecl;external clib name 'ttyname_r';
+function ttyname(__fd:longint):PAnsiChar;cdecl;external clib name 'ttyname';
+function ttyname_r(__fd:longint; __buf:PAnsiChar; __buflen:size_t):longint;cdecl;external clib name 'ttyname_r';
 function isatty(__fd:longint):longint;cdecl;external clib name 'isatty';
-function link(__from:Pchar; __to:Pchar):longint;cdecl;external clib name 'link';
-function symlink(__from:Pchar; __to:Pchar):longint;cdecl;external clib name 'symlink';
-function readlink(__path:Pchar; __buf:Pchar; __len:size_t):longint;cdecl;external clib name 'readlink';
-function unlink(__name:Pchar):longint;cdecl;external clib name 'unlink';
-function __rmdir(__path:Pchar):longint;cdecl;external clib name 'rmdir';
+function link(__from:PAnsiChar; __to:PAnsiChar):longint;cdecl;external clib name 'link';
+function symlink(__from:PAnsiChar; __to:PAnsiChar):longint;cdecl;external clib name 'symlink';
+function readlink(__path:PAnsiChar; __buf:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'readlink';
+function unlink(__name:PAnsiChar):longint;cdecl;external clib name 'unlink';
+function __rmdir(__path:PAnsiChar):longint;cdecl;external clib name 'rmdir';
 function tcgetpgrp(__fd:longint):__pid_t;cdecl;external clib name 'tcgetpgrp';
 function tcsetpgrp(__fd:longint; __pgrp_id:__pid_t):longint;cdecl;external clib name 'tcsetpgrp';
-function getlogin:Pchar;cdecl;external clib name 'getlogin';
-function getlogin_r(__name:Pchar; __name_len:size_t):longint;cdecl;external clib name 'getlogin_r';
-function setlogin(__name:Pchar):longint;cdecl;external clib name 'setlogin';
-function gethostname(__name:Pchar; __len:size_t):longint;cdecl;external clib name 'gethostname';
-function sethostname(__name:Pchar; __len:size_t):longint;cdecl;external clib name 'sethostname';
+function getlogin:PAnsiChar;cdecl;external clib name 'getlogin';
+function getlogin_r(__name:PAnsiChar; __name_len:size_t):longint;cdecl;external clib name 'getlogin_r';
+function setlogin(__name:PAnsiChar):longint;cdecl;external clib name 'setlogin';
+function gethostname(__name:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'gethostname';
+function sethostname(__name:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'sethostname';
 function sethostid(__id:longint):longint;cdecl;external clib name 'sethostid';
-function getdomainname(__name:Pchar; __len:size_t):longint;cdecl;external clib name 'getdomainname';
-function setdomainname(__name:Pchar; __len:size_t):longint;cdecl;external clib name 'setdomainname';
+function getdomainname(__name:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'getdomainname';
+function setdomainname(__name:PAnsiChar; __len:size_t):longint;cdecl;external clib name 'setdomainname';
 function vhangup:longint;cdecl;external clib name 'vhangup';
-function revoke(__file:Pchar):longint;cdecl;external clib name 'revoke';
+function revoke(__file:PAnsiChar):longint;cdecl;external clib name 'revoke';
 function profil(__sample_buffer:Pword; __size:size_t; __offset:size_t; __scale:dword):longint;cdecl;external clib name 'profil';
-function acct(__name:Pchar):longint;cdecl;external clib name 'acct';
-function getusershell:Pchar;cdecl;external clib name 'getusershell';
+function acct(__name:PAnsiChar):longint;cdecl;external clib name 'acct';
+function getusershell:PAnsiChar;cdecl;external clib name 'getusershell';
 procedure endusershell;cdecl;external clib name 'endusershell';
 procedure setusershell;cdecl;external clib name 'setusershell';
 function daemon(__nochdir:longint; __noclose:longint):longint;cdecl;external clib name 'daemon';
-function chroot(__path:Pchar):longint;cdecl;external clib name 'chroot';
-function getpass(__prompt:Pchar):Pchar;cdecl;external clib name 'getpass';
+function chroot(__path:PAnsiChar):longint;cdecl;external clib name 'chroot';
+function getpass(__prompt:PAnsiChar):PAnsiChar;cdecl;external clib name 'getpass';
 function fsync(__fd:longint):longint;cdecl;external clib name 'fsync';
 function gethostid:longint;cdecl;external clib name 'gethostid';
 procedure sync;cdecl;external clib name 'sync';
 function getpagesize : longint;cdecl; external clib name 'getpagesize';
-function __truncate(__file:Pchar; __length:__off_t):longint;cdecl;external clib name 'truncate';
-function truncate64(__file:Pchar; __length:__off64_t):longint;cdecl;external clib name 'truncate64';
+function __truncate(__file:PAnsiChar; __length:__off_t):longint;cdecl;external clib name 'truncate';
+function truncate64(__file:PAnsiChar; __length:__off64_t):longint;cdecl;external clib name 'truncate64';
 function ftruncate(__fd:longint; __length:__off_t):longint;cdecl;external clib name 'ftruncate';
 function ftruncate64(__fd:longint; __length:__off64_t):longint;cdecl;external clib name 'ftruncate64';
 function getdtablesize:longint;cdecl;external clib name 'getdtablesize';
@@ -176,8 +176,8 @@ function syscall(__sysno:longint; args:array of const):longint;cdecl;external cl
 function syscall(__sysno:longint):longint;cdecl;varargs;external clib name 'syscall';
 
 
-function crypt(__key:Pchar; __salt:Pchar):Pchar;cdecl;external clib name 'crypt';
-procedure encrypt(__block:Pchar; __edflag:longint);cdecl;external clib name 'encrypt';
+function crypt(__key:PAnsiChar; __salt:PAnsiChar):PAnsiChar;cdecl;external clib name 'crypt';
+procedure encrypt(__block:PAnsiChar; __edflag:longint);cdecl;external clib name 'encrypt';
 procedure swab(__from:pointer; __to:pointer; __n:ssize_t);cdecl;external clib name 'swab';
 
 

packages/libc/src/utimeh.inc

@@ -7,7 +7,7 @@ type
    end;
 
 
-function utime(__file:Pchar; __file_times:Putimbuf):longint;cdecl;external clib name 'utime';
+function utime(__file:PAnsiChar; __file_times:Putimbuf):longint;cdecl;external clib name 'utime';
 
 { ---------------------------------------------------------------------
     Borland compatibility types
@@ -17,4 +17,4 @@ type
   TUTimeBuffer = utimbuf;
   PUTimeBuffer = ^TUTimeBuffer;
 
-function utime(__file:Pchar; const __file_times: utimbuf):longint;cdecl;external clib name 'utime';
+function utime(__file:PAnsiChar; const __file_times: utimbuf):longint;cdecl;external clib name 'utime';