Artifact
41c59bb866f3babd5fc97c56a5f106f720b7cfdd:
0000: 2f 2f 20 41 73 73 65 6d 62 6c 79 20 6c 61 6e 67 // Assembly lang
0010: 75 61 67 65 20 73 75 70 70 6f 72 74 20 66 6f 72 uage support for
0020: 20 73 70 61 72 63 20 43 50 55 2e 0a 2f 2f 20 42 sparc CPU..// B
0030: 72 75 6e 6f 20 48 61 69 62 6c 65 20 32 39 2e 35 runo Haible 29.5
0040: 2e 31 39 39 39 0a 0a 23 69 66 64 65 66 20 41 53 .1999..#ifdef AS
0050: 4d 5f 55 4e 44 45 52 53 43 4f 52 45 0a 2f 2f 20 M_UNDERSCORE.//
0060: 53 75 6e 4f 53 34 2c 20 4c 69 6e 75 78 2f 61 2e SunOS4, Linux/a.
0070: 6f 75 74 0a 23 64 65 66 69 6e 65 20 43 28 65 6e out.#define C(en
0080: 74 72 79 70 6f 69 6e 74 29 20 5f 23 23 65 6e 74 trypoint) _##ent
0090: 72 79 70 6f 69 6e 74 0a 23 65 6c 73 65 0a 2f 2f rypoint.#else.//
00a0: 20 53 6f 6c 61 72 69 73 2c 20 4c 69 6e 75 78 2f Solaris, Linux/
00b0: 45 4c 46 0a 23 64 65 66 69 6e 65 20 43 28 65 6e ELF.#define C(en
00c0: 74 72 79 70 6f 69 6e 74 29 20 65 6e 74 72 79 70 trypoint) entryp
00d0: 6f 69 6e 74 0a 23 65 6e 64 69 66 0a 0a 2f 2f 20 oint.#endif..//
00e0: 57 68 65 6e 20 61 73 73 65 6d 62 6c 79 20 6c 61 When assembly la
00f0: 6e 67 75 61 67 65 20 63 6f 64 65 20 69 73 20 63 nguage code is c
0100: 6f 6d 70 69 6c 65 64 20 69 6e 74 6f 20 61 20 73 ompiled into a s
0110: 68 61 72 65 64 20 6c 69 62 72 61 72 79 2c 20 45 hared library, E
0120: 4c 46 20 6c 69 6e 6b 65 72 73 0a 2f 2f 20 6e 65 LF linkers.// ne
0130: 65 64 20 74 6f 20 6b 6e 6f 77 20 77 68 69 63 68 ed to know which
0140: 20 73 79 6d 62 6f 6c 73 20 61 72 65 20 66 75 6e symbols are fun
0150: 63 74 69 6f 6e 73 2e 0a 23 69 66 20 64 65 66 69 ctions..#if defi
0160: 6e 65 64 28 5f 5f 4e 65 74 42 53 44 5f 5f 29 20 ned(__NetBSD__)
0170: 7c 7c 20 64 65 66 69 6e 65 64 28 5f 5f 4f 70 65 || defined(__Ope
0180: 6e 42 53 44 5f 5f 29 0a 23 64 65 66 69 6e 65 20 nBSD__).#define
0190: 44 45 43 4c 41 52 45 5f 46 55 4e 43 54 49 4f 4e DECLARE_FUNCTION
01a0: 28 6e 61 6d 65 29 20 2e 74 79 70 65 20 43 28 6e (name) .type C(n
01b0: 61 6d 65 29 2c 40 66 75 6e 63 74 69 6f 6e 0a 23 ame),@function.#
01c0: 65 6c 69 66 20 64 65 66 69 6e 65 64 28 5f 5f 73 elif defined(__s
01d0: 76 72 34 5f 5f 29 20 7c 7c 20 64 65 66 69 6e 65 vr4__) || define
01e0: 64 28 5f 5f 45 4c 46 5f 5f 29 0a 2f 2f 20 53 6f d(__ELF__).// So
01f0: 6c 61 72 69 73 2c 20 4c 69 6e 75 78 2f 45 4c 46 laris, Linux/ELF
0200: 0a 2f 2f 20 53 6f 6d 65 20 70 72 65 70 72 6f 63 .// Some preproc
0210: 65 73 73 6f 72 73 20 6b 65 65 70 20 74 68 65 20 essors keep the
0220: 62 61 63 6b 73 6c 61 73 68 20 69 6e 20 70 6c 61 backslash in pla
0230: 63 65 2c 20 73 6f 6d 65 20 64 6f 6e 27 74 2e 0a ce, some don't..
0240: 2f 2f 20 53 6f 6d 65 20 63 6f 6d 70 6c 61 69 6e // Some complain
0250: 20 61 62 6f 75 74 20 74 68 65 20 23 20 62 65 69 about the # bei
0260: 6e 67 20 6e 6f 74 20 69 6e 20 66 72 6f 6e 74 20 ng not in front
0270: 6f 66 20 61 6e 20 41 4e 53 49 20 43 20 6d 61 63 of an ANSI C mac
0280: 72 6f 2e 0a 2f 2f 20 54 68 65 72 65 66 6f 72 65 ro..// Therefore
0290: 20 77 65 20 75 73 65 20 61 20 64 6f 6c 6c 61 72 we use a dollar
02a0: 2c 20 77 68 69 63 68 20 77 69 6c 6c 20 62 65 20 , which will be
02b0: 73 65 64 2d 63 6f 6e 76 65 72 74 65 64 20 74 6f sed-converted to
02c0: 20 23 20 6c 61 74 65 72 2e 0a 23 64 65 66 69 6e # later..#defin
02d0: 65 20 44 45 43 4c 41 52 45 5f 46 55 4e 43 54 49 e DECLARE_FUNCTI
02e0: 4f 4e 28 6e 61 6d 65 29 20 2e 74 79 70 65 20 43 ON(name) .type C
02f0: 28 6e 61 6d 65 29 2c 24 66 75 6e 63 74 69 6f 6e (name),$function
0300: 0a 23 65 6c 73 65 0a 2f 2f 20 53 75 6e 4f 53 34 .#else.// SunOS4
0310: 2c 20 4c 69 6e 75 78 2f 61 2e 6f 75 74 0a 23 64 , Linux/a.out.#d
0320: 65 66 69 6e 65 20 44 45 43 4c 41 52 45 5f 46 55 efine DECLARE_FU
0330: 4e 43 54 49 4f 4e 28 6e 61 6d 65 29 0a 23 65 6e NCTION(name).#en
0340: 64 69 66 0a dif.