pike.git/
src/
svalue.h
Branch:
Tag:
Non-build tags
All tags
No tags
1999-08-06
1999-08-06 22:58:49 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
efa5fae24c7c6e233830cc3ada8172d727b17a15 (
14
lines) (+
11
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
magic for MSVC++
Rev: src/svalue.h:1.34
5:
\*/ /*
-
* $Id: svalue.h,v 1.
33
1999/
07
/
27
19
:
45
:
03
mirar
Exp $
+
* $Id: svalue.h,v 1.
34
1999/
08
/
06
22
:
58
:
49
hubbe
Exp $
*/ #ifndef SVALUE_H #define SVALUE_H
112:
#define tSet(IND) "\002" IND #define tMultiset tSet(tMix) #define tObj "\003\000\000\000\000\000"
-
#define tFuncV(ARGS,REST,RET) "\004" ARGS "\021" REST RET
-
#define
tFunc
(
ARGS,
RET) tFuncV(ARGS "", tVoid, RET)
+
+
#define tFuncV(ARGS,REST,RET)
MagictFuncV(RET,REST,ARGS)
+
#define tFunc(ARGS,RET) MagictFunc(RET,ARGS)
+
+
/* These two magic funcions are used to make MSVC++ work
+
* even if 'ARGS' is empty.
+
*/
+
#define MagictFuncV(RET,REST,ARGS)
"\004" ARGS "\021" REST RET
+
#define
MagictFunc
(
RET,
ARGS) tFuncV(ARGS "", tVoid, RET)
#define tFunction tFuncV("" ,tMix,tMix) #define tNone "" #define tPrg "\005"