This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
find.t: Use temporary testing directory for all blocks of tests.
[perl5.git] / ext / Amiga-ARexx / tagtypes.h
1 /* defines types for tags */
2 #ifndef _TAGTYPES_H
3 #define _TAGTYPES_H
4
5 #define TT_APTR    1
6 #define TT_WORD    2
7 #define TT_UWORD   3
8 #define TT_LONG    4
9 #define TT_ULONG   5
10 #define TT_STRPTR  6
11 #define TT_UBYTE   7
12
13 typedef union TagReturn
14 {
15     WORD    tr_word;
16     UWORD  tr_uword;
17     LONG    tr_long;
18     ULONG   tr_ulong;
19     STRPTR  tr_strptr;
20     APTR     tr_aptr;
21     UBYTE * tr_ubyte;
22 }
23 TAGRET;
24
25 #endif