Commit 0db34c2

SteveNewsuve

authored and

committed

Update ctypes.inc for Delphi-compatibility

Delphi has UIntPtr and IntPtr, not PtrUInt and PtrInt.

1 parent df433a3 commit 0db34c2Copy full SHA for 0db34c2

File tree

+11

-4

lines changed

+11

-4

lines changed

Lines changed: 11 additions & 4 deletions

Original file line number	Diff line number	Diff line change
`@@ -161,10 +161,17 @@ type`
`161`	`161`	`pointer: uintptr_t"`
`162`	`162`	`Source: https://pubs.opengroup.org/onlinepubs/000095399/basedefs/stdint.h.html`
`163`	`163`	`}`
`164`		`- cuintptr_t = PtrUInt;`
`165`		`- {$EXTERNALSYM cuintptr_t}`
`166`		`- cintptr_t = PtrInt;`
`167`		`- {$EXTERNALSYM cintptr_t}`
	`164`	`+ {$IFNDEF FPC}`
	`165`	`+ cuintptr_t = UIntPtr;`
	`166`	`+ {$EXTERNALSYM cuintptr_t}`
	`167`	`+ cintptr_t = IntPtr;`
	`168`	`+ {$EXTERNALSYM cintptr_t}`
	`169`	`+ {$ELSE}`
	`170`	`+ cuintptr_t = PtrUInt;`
	`171`	`+ {$EXTERNALSYM cuintptr_t}`
	`172`	`+ cintptr_t = PtrInt;`
	`173`	`+ {$EXTERNALSYM cintptr_t}`
	`174`	`+ {$ENDIF}`
`168`	`175`
`169`	`176`	`{$IFDEF WANT_CWCHAR_T}`
`170`	`177`	`(* wchar_t is the "wide character" type of the C language.`

Comments

(0)