Cyclone Scheme  0.4

◆ closcall1

#define closcall1 (   td,
  clo,
  a1 
)
Value:
if (type_is_pair_prim(clo)) { \
Cyc_apply(td, 0, (closure)(a1), clo); \
} else { \
((clo)->fn)(td, 1, clo, a1);\
}
A closed-over function with no variables.
Definition: types.h:948
#define type_is_pair_prim(clo)
Definition: types.h:59