mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-31 20:30:26 +02:00
* Patch by Luiz (mantis #27503) that fixes a procedure-type that has
"char" as argumenttype instead of pchar/pansichar. git-svn-id: trunk@29766 -
This commit is contained in:
parent
add4e800be
commit
b2b56a4791
@ -427,7 +427,7 @@ const
|
||||
|
||||
type
|
||||
xTrace = procedure(user: pointer; s: pansichar); cdecl;
|
||||
xProfile = procedure(user: pointer; s: char; i: sqlite3_uint64); cdecl;
|
||||
xProfile = procedure(user: pointer; s: pansichar; i: sqlite3_uint64); cdecl;
|
||||
|
||||
{$IFDEF S}function{$ELSE}var{$ENDIF}sqlite3_trace{$IFDEF D}: function{$ENDIF}(db: psqlite3; cb: xTrace; user: pointer): pointer; cdecl;{$IFDEF S}external Sqlite3Lib;{$ENDIF}
|
||||
{$IFDEF S}function{$ELSE}var{$ENDIF}sqlite3_profile{$IFDEF D}: function{$ENDIF}(db: psqlite3; cb: xProfile; user: pointer): pointer; cdecl;{$IFDEF S}external Sqlite3Lib;{$ENDIF}
|
||||
|
Loading…
Reference in New Issue
Block a user