Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-06 20:56:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Relocated prorotypes to common place

Browse source
This commit is contained in:
Justin Ethier 2015-04-21 17:22:31 -04:00
parent cfdac7963d
commit 42b524f9cb
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
cyclone.h
View file

@ -264,11 +264,6 @@ static const object primitive_##name = &name##_primitive
#define prim(x) (x && ((primitive)x)->tag == primitive_tag) #define prim(x) (x && ((primitive)x)->tag == primitive_tag)
#define prim_name(x) (((primitive_type *) x)->pname) #define prim_name(x) (((primitive_type *) x)->pname)
void dispatch(int argc, function_type func, object clo, object cont, object args);
void dispatch_va(int argc, function_type_va func, object clo, object cont, object args);
void do_dispatch(int argc, function_type func, object clo, object *buffer);
/* All constant-size objects */ /* All constant-size objects */
typedef union { typedef union {
boolean_type boolean_t; boolean_type boolean_t;
@ -284,4 +279,9 @@ typedef union {
void Cyc_rt_raise(object err); void Cyc_rt_raise(object err);
void Cyc_rt_raise_msg(const char *err); void Cyc_rt_raise_msg(const char *err);
void dispatch(int argc, function_type func, object clo, object cont, object args);
void dispatch_va(int argc, function_type_va func, object clo, object cont, object args);
void do_dispatch(int argc, function_type func, object clo, object *buffer);
#endif /* CYCLONE_H */ #endif /* CYCLONE_H */