11' TEST_MODE : MULTI_MODULE_TEST
22
3- #ifdef __FB_64BIT__
4- type cxxint as long
5- # else
6- type cxxint as integer
7- # endif
8-
93'' simple
104
115extern "c++"
126 namespace cpp
13- declare function sum( byval a as cxxint , byval b as cxxint ) as cxxint
14- declare function dec( byval a as cxxint , byval b as cxxint ) as cxxint
7+ declare function sum( byval a as long , byval b as long ) as long
8+ declare function dec( byval a as long , byval b as long ) as long
159 end namespace
1610end extern
1711
@@ -23,8 +17,8 @@ end extern
2317
2418extern "c++"
2519 namespace cpp.foo.bar
26- declare function sum( byval a as cxxint , byval b as cxxint ) as cxxint
27- declare function dec( byval a as cxxint , byval b as cxxint ) as cxxint
20+ declare function sum( byval a as long , byval b as long ) as long
21+ declare function dec( byval a as long , byval b as long ) as long
2822 end namespace
2923end extern
3024
@@ -37,11 +31,11 @@ end extern
3731extern "c++"
3832 namespace cpp.foo.bar
3933 type udt
40- v as cxxint
34+ v as long
4135 end type
4236
43- declare function sum_udt( byval a as udt ptr, byval b as udt ptr ) as cxxint
44- declare function dec_udt( byval a as udt ptr, byval b as udt ptr ) as cxxint
37+ declare function sum_udt( byval a as udt ptr, byval b as udt ptr ) as long
38+ declare function dec_udt( byval a as udt ptr, byval b as udt ptr ) as long
4539 end namespace
4640end extern
4741
@@ -53,24 +47,24 @@ end extern
5347extern "c++"
5448 namespace cpp.foo.bar
5549 type baz
56- v1 as cxxint
57- v2 as cxxint
50+ v1 as long
51+ v2 as long
5852 end type
5953
6054 declare function sum_fn( byval baz as baz ptr, _
61- byval a as function cdecl( byval as baz ptr) as cxxint , _
62- byval b as function cdecl( byval as baz ptr) as cxxint ) as cxxint
55+ byval a as function cdecl( byval as baz ptr) as long , _
56+ byval b as function cdecl( byval as baz ptr) as long ) as long
6357 declare function dec_fn( byval baz as baz ptr, _
64- byval a as function cdecl( byval as baz ptr) as cxxint , _
65- byval b as function cdecl( byval as baz ptr) as cxxint ) as cxxint
58+ byval a as function cdecl( byval as baz ptr) as long , _
59+ byval b as function cdecl( byval as baz ptr) as long ) as long
6660 end namespace
6761end extern
6862
69- private function fun_v1 cdecl( byval baz as cpp.foo.bar.baz ptr) as cxxint
63+ private function fun_v1 cdecl( byval baz as cpp.foo.bar.baz ptr) as long
7064 function = baz->v1
7165end function
7266
73- private function fun_v2 cdecl ( byval baz as cpp.foo.bar.baz ptr) as cxxint
67+ private function fun_v2 cdecl ( byval baz as cpp.foo.bar.baz ptr) as long
7468 function = baz->v2
7569end function
7670
0 commit comments