* PChar -> PAnsiChar

This commit is contained in:
Michaël Van Canneyt 2023-01-14 14:14:44 +01:00
parent 88c52bc23e
commit 280aceea65
3 changed files with 7 additions and 7 deletions

View File

@ -7,7 +7,7 @@ program sockettest;
uses
cmem, ctypes, network, gccore;
function strncmp(__s1:Pchar; __s2:Pchar; __n:cardinal):longint;cdecl;external;
function strncmp(__s1:PAnsiChar; __s2:PAnsiChar; __n:cardinal):longint;cdecl;external;
var
@ -17,15 +17,15 @@ var
hits: cint = 0;
var
http_200: pchar = 'HTTP/1.1 200 OK\r\n';
indexdata: pchar = '<html> \' +
http_200: PAnsiChar = 'HTTP/1.1 200 OK\r\n';
indexdata: PAnsiChar = '<html> \' +
' <head><title>A test page</title></head> \' +
' <body> \' +
' This small test page has had %d hits. \' +
' </body> \' +
'</html>';
http_html_hdr: pchar = 'Content-type: text/html\r\n\r\n';
http_get_index: pchar = 'GET / HTTP/1.1\r\n';
http_html_hdr: PAnsiChar = 'Content-type: text/html\r\n\r\n';
http_get_index: PAnsiChar = 'GET / HTTP/1.1\r\n';
function httpd(arg: pointer): pointer; cdecl;
var

View File

@ -188,7 +188,7 @@ function SYS_GetArena2Size(): cuint32; cdecl; external;
function SYS_SetPowerCallback(cb: powercallback): powercallback; cdecl; external;
{$endif HW_RVL}
procedure kprintf(const str: Pchar; args: array of const); cdecl; external;
procedure kprintf(const str: PAnsiChar; args: array of const); cdecl; external;
{$endif OGC_INTERFACE}

View File

@ -379,7 +379,7 @@ type
unid : cint; (**< user specified id *)
cmdq : lwp_queue;
bdaddr : _bd_addr; (**< bt address *)
bdaddr_str : array [0..17] of char; (**< readable bt address *)
bdaddr_str : array [0..17] of AnsiChar; (**< readable bt address *)
sock : Pbte_pcb; (**< output socket *)
event_cb : wii_event_cb; (**< event callback *)
state : cint; (**< various state flags *)