*** empty log message ***
This commit is contained in:
31
ase/test/stx/stx.c
Normal file
31
ase/test/stx/stx.c
Normal file
@ -0,0 +1,31 @@
|
||||
#include <xp/stx/memory.h>
|
||||
#include <xp/bas/stdio.h>
|
||||
|
||||
int xp_main ()
|
||||
{
|
||||
xp_stx_memory_t mem;
|
||||
xp_stx_word_t i;
|
||||
|
||||
if (xp_stx_memory_open (&mem, 10) == XP_NULL) {
|
||||
xp_printf (XP_TEXT("cannot open memory\n"));
|
||||
return -1;
|
||||
}
|
||||
|
||||
for (i = 0; i < 20; i++) {
|
||||
xp_printf (XP_TEXT("%d, %d\n"),
|
||||
i, xp_stx_alloc_object(&mem, 100));
|
||||
}
|
||||
|
||||
for (i = 0; i < 5; i++) {
|
||||
xp_stx_dealloc_object (&mem, i);
|
||||
}
|
||||
|
||||
for (i = 0; i < 20; i++) {
|
||||
xp_printf (XP_TEXT("%d, %d\n"),
|
||||
i, xp_stx_alloc_object(&mem, 100));
|
||||
}
|
||||
|
||||
xp_printf (XP_TEXT("End of program\n"));
|
||||
return 0;
|
||||
}
|
||||
|
175
ase/test/stx/stx.tgt
Normal file
175
ase/test/stx/stx.tgt
Normal file
@ -0,0 +1,175 @@
|
||||
40
|
||||
targetIdent
|
||||
0
|
||||
MProject
|
||||
1
|
||||
MComponent
|
||||
0
|
||||
2
|
||||
WString
|
||||
4
|
||||
NEXE
|
||||
3
|
||||
WString
|
||||
5
|
||||
nc2en
|
||||
1
|
||||
0
|
||||
1
|
||||
4
|
||||
MCommand
|
||||
0
|
||||
5
|
||||
MCommand
|
||||
0
|
||||
6
|
||||
MItem
|
||||
7
|
||||
stx.exe
|
||||
7
|
||||
WString
|
||||
4
|
||||
NEXE
|
||||
8
|
||||
WVList
|
||||
0
|
||||
9
|
||||
WVList
|
||||
0
|
||||
-1
|
||||
1
|
||||
1
|
||||
0
|
||||
10
|
||||
WPickList
|
||||
5
|
||||
11
|
||||
MItem
|
||||
3
|
||||
*.c
|
||||
12
|
||||
WString
|
||||
4
|
||||
COBJ
|
||||
13
|
||||
WVList
|
||||
3
|
||||
14
|
||||
MVState
|
||||
15
|
||||
WString
|
||||
3
|
||||
WCC
|
||||
16
|
||||
WString
|
||||
25
|
||||
n????Include directories:
|
||||
1
|
||||
17
|
||||
WString
|
||||
37
|
||||
$(%watcom)\h;$(%watcom)\h\nt;..\..\..
|
||||
0
|
||||
18
|
||||
MRState
|
||||
19
|
||||
WString
|
||||
3
|
||||
WCC
|
||||
20
|
||||
WString
|
||||
35
|
||||
??2??Pentium Register based calling
|
||||
1
|
||||
0
|
||||
21
|
||||
MRState
|
||||
22
|
||||
WString
|
||||
3
|
||||
WCC
|
||||
23
|
||||
WString
|
||||
32
|
||||
??2??Pentium Stack based calling
|
||||
1
|
||||
1
|
||||
24
|
||||
WVList
|
||||
0
|
||||
-1
|
||||
1
|
||||
1
|
||||
0
|
||||
25
|
||||
MItem
|
||||
5
|
||||
stx.c
|
||||
26
|
||||
WString
|
||||
4
|
||||
COBJ
|
||||
27
|
||||
WVList
|
||||
0
|
||||
28
|
||||
WVList
|
||||
0
|
||||
11
|
||||
1
|
||||
1
|
||||
0
|
||||
29
|
||||
MItem
|
||||
5
|
||||
*.lib
|
||||
30
|
||||
WString
|
||||
3
|
||||
NIL
|
||||
31
|
||||
WVList
|
||||
0
|
||||
32
|
||||
WVList
|
||||
0
|
||||
-1
|
||||
1
|
||||
1
|
||||
0
|
||||
33
|
||||
MItem
|
||||
19
|
||||
..\..\bas\xpbas.lib
|
||||
34
|
||||
WString
|
||||
3
|
||||
NIL
|
||||
35
|
||||
WVList
|
||||
0
|
||||
36
|
||||
WVList
|
||||
0
|
||||
29
|
||||
1
|
||||
1
|
||||
0
|
||||
37
|
||||
MItem
|
||||
19
|
||||
..\..\stx\xpstx.lib
|
||||
38
|
||||
WString
|
||||
3
|
||||
NIL
|
||||
39
|
||||
WVList
|
||||
0
|
||||
40
|
||||
WVList
|
||||
0
|
||||
29
|
||||
1
|
||||
1
|
||||
0
|
43
ase/test/stx/stx.wpj
Normal file
43
ase/test/stx/stx.wpj
Normal file
@ -0,0 +1,43 @@
|
||||
40
|
||||
projectIdent
|
||||
0
|
||||
VpeMain
|
||||
1
|
||||
WRect
|
||||
1500
|
||||
440
|
||||
7680
|
||||
9200
|
||||
2
|
||||
MProject
|
||||
3
|
||||
MCommand
|
||||
0
|
||||
4
|
||||
MCommand
|
||||
0
|
||||
1
|
||||
5
|
||||
WFileName
|
||||
7
|
||||
stx.tgt
|
||||
6
|
||||
WVList
|
||||
1
|
||||
7
|
||||
VComponent
|
||||
8
|
||||
WRect
|
||||
0
|
||||
0
|
||||
5700
|
||||
4280
|
||||
0
|
||||
0
|
||||
9
|
||||
WFileName
|
||||
7
|
||||
stx.tgt
|
||||
0
|
||||
3
|
||||
7
|
Reference in New Issue
Block a user