diff options
| author | Adam <you@example.com> | 2020-05-17 05:51:50 +0200 |
|---|---|---|
| committer | Adam <you@example.com> | 2020-05-17 05:51:50 +0200 |
| commit | e611b132f9b8abe35b362e5870b74bce94a1e58e (patch) | |
| tree | a5781d2ec0e085eeca33cf350cf878f2efea6fe5 /private/mvdm/softpc.new/base/inc/j_c_lang.h | |
| download | NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.tar NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.tar.gz NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.tar.bz2 NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.tar.lz NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.tar.xz NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.tar.zst NT4.0-e611b132f9b8abe35b362e5870b74bce94a1e58e.zip | |
Diffstat (limited to 'private/mvdm/softpc.new/base/inc/j_c_lang.h')
| -rw-r--r-- | private/mvdm/softpc.new/base/inc/j_c_lang.h | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/private/mvdm/softpc.new/base/inc/j_c_lang.h b/private/mvdm/softpc.new/base/inc/j_c_lang.h new file mode 100644 index 000000000..9ec76913b --- /dev/null +++ b/private/mvdm/softpc.new/base/inc/j_c_lang.h @@ -0,0 +1,49 @@ +/* + * Name: j_c_lang.h + * + * Author: Simon Frost + * + * Created on: February 1994 + * + * SccsID: @(#)j_c_lang.h 1.2 08/19/94 + * + * Purpose: This file contains the necessary declarations for C + * files generated from J-code. + * + * (c)Copyright Insignia Solutions Ltd., 1994. All rights reserved. + */ +/* defines needed for basic types */ +#define jccc_parm1 r2 +#define jccc_parm2 r3 +#define jccc_parm3 r4 +#define jccc_parm4 r5 +#define jccc_gdp r1 +/* define variables (register replacements) used */ +extern IUH rnull ; /* holder for a null arg in calls and null return args */ +extern IUH r0, r1, r2, r3, r4, r5, r6, r7, r8, r9, r10,r11,r12,r13,r14,r15, + r16,r17,r18,r19,r20,r21,r22,r23,r24,r25,r26,r27,r28,r29,r30,r31; + +/* prototypes for support functions - see j_c_lang.c ? how many are used */ +extern IUH mask IPT2(IUH, bitpos, IUH, len); +extern IUH rorl IPT2(IUH, src, IUH, rots); +extern IUH rorw IPT2(IUH, src, IUH, rots); +extern IUH rorb IPT2(IUH, src, IUH, rots); +extern IUH roll IPT2(IUH, src, IUH, rots); +extern IUH rolw IPT2(IUH, src, IUH, rots); +extern IUH rolb IPT2(IUH, src, IUH, rots); + +#ifdef LITTLEND +#define UOFF_15_8(a) (((IU8 *)(a))+1) +#define SOFF_15_8(a) (((IS8 *)(a))+1) +#define REGBYTE 0 +#define REGWORD 0 +#define REGLONG 0 +#endif +#ifdef BIGEND +#define UOFF_15_8(a) ((IU8 *)(a) + sizeof(IUH)-2) +#define SOFF_15_8(a) ((IS8 *)(a) + sizeof(IUH)-2) +#define REGBYTE (sizeof(IUH) -1) +#define REGWORD (sizeof(IUH)/2 -1) +#define REGLONG (sizeof(IUH)/4 -1) +#endif +#define __J_C_LANG /* mark as already included */ |