| author | Jan Vrany <jan.vrany@labware.com> |
| Mon, 29 Nov 2021 16:36:55 +0000 | |
| changeset 4010 | 19843598d34b |
| parent 3601 | 4f1b473722cb |
| permissions | -rw-r--r-- |
|
3336
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
1 |
/* |
|
3601
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
2 |
* $Header$ |
|
3336
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
3 |
* |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
4 |
* DO NOT EDIT |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
5 |
* automagically generated from the projectDefinition: stx_libjava_tests. |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
6 |
*/ |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
7 |
#define __INDIRECTVMINITCALLS__ |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
8 |
#include <stc.h> |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
9 |
|
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
10 |
#ifdef WIN32 |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
11 |
# pragma codeseg INITCODE "INITCODE" |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
12 |
#endif |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
13 |
|
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
14 |
#if defined(INIT_TEXT_SECTION) || defined(DLL_EXPORT) |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
15 |
DLL_EXPORT void _libstx_libjava_tests_Init() INIT_TEXT_SECTION; |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
16 |
DLL_EXPORT void _libstx_libjava_tests_InitDefinition() INIT_TEXT_SECTION; |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
17 |
#endif |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
18 |
|
|
3601
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
19 |
extern void _stx_137libjava_137tests_Init(int pass, struct __vmData__ *__pRT__, OBJ snd); |
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
20 |
|
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
21 |
|
|
3336
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
22 |
|
|
3601
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
23 |
void _libstx_libjava_tests_InitDefinition(int pass, struct __vmData__ *__pRT__, OBJ snd) |
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
24 |
{
|
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
25 |
__BEGIN_PACKAGE2__("libstx_libjava_tests__DFN", _libstx_libjava_tests_InitDefinition, "stx:libjava/tests");
|
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
26 |
_stx_137libjava_137tests_Init(pass,__pRT__,snd); |
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
27 |
|
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
28 |
__END_PACKAGE__(); |
|
3336
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
29 |
} |
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
30 |
|
|
3601
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
31 |
void _libstx_libjava_tests_Init(int pass, struct __vmData__ *__pRT__, OBJ snd) |
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
32 |
{
|
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
33 |
__BEGIN_PACKAGE2__("libstx_libjava_tests", _libstx_libjava_tests_Init, "stx:libjava/tests");
|
|
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
34 |
_stx_137libjava_137tests_Init(pass,__pRT__,snd); |
|
3336
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
35 |
|
|
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
36 |
|
|
3601
4f1b473722cb
Interop: return Java `char` value as instance of Character
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
3514
diff
changeset
|
37 |
__END_PACKAGE__(); |
|
3336
08a79331ec58
Repository cleanup (5/7): made stx:libjava/tests a full Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff
changeset
|
38 |
} |