0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2025-03-01 15:01:00 +00:00
quakeforge/ruamoko/scheme/Primitive.h

17 lines
316 B
C
Raw Normal View History

#ifndef __Primitive_h
#define __Primitive_h
#include "Procedure.h"
#include "Machine.h"
2011-02-14 13:39:43 +00:00
typedef SchemeObject *primfunc_t (SchemeObject *args, Machine *m);
@interface Primitive: Procedure
{
primfunc_t func;
}
+ (id) newFromFunc: (primfunc_t) f;
- (id) initWithFunc: (primfunc_t) f;
@end
#endif //__Procedure_h