blob: e7d80c198f131a4510094023b29bf6ff0ec47b8c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
unit my4_sys;
interface
uses
ctypes;
type
st_dynamic_array = record
buffers : pchar;
elements : cuint;
max_elements : cuint;
alloc_increment : cuint;
size_of_element : cuint;
end;
tst_dynamic_array = st_dynamic_array;
pst_dynamic_array = ^tst_dynamic_array;
implementation
end.
|
