File: sfun_argd.h

package info (click to toggle)
gcl 2.6.7%2Bdfsga-1
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 84,796 kB
  • sloc: ansic: 452,686; lisp: 156,133; asm: 111,405; sh: 29,299; cpp: 18,599; perl: 5,602; makefile: 5,201; tcl: 3,181; sed: 469; yacc: 378; lex: 174; fortran: 48; awk: 30; csh: 23
file content (10 lines) | stat: -rwxr-xr-x 288 bytes parent folder | download | duplicates (10) 
1
2
3
4
5
6
7
8
9
10
 
#define SFUN_RETURN_MASK (0xf00 & ~VFUN_NARG_BIT)
#define SFUN_ARG_TYPE_MASK (~0xfff)

#define SFUN_RETURN_TYPE(s) \
  ((enum ftype)(((s) & SFUN_RETURN_MASK) >> 8))

#define SFUN_START_ARG_TYPES(x) (x=(x>>10))
#define SFUN_NEXT_TYPE(x) ((enum ftype)((x=(x>>2))& 3))

#define MAX_C_ARGS 9