Cyclone Scheme  0.20

◆ closcall1

#define closcall1 (   td,
  clo,
  a1 
)
Value:
if (obj_is_not_closure(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:1384
#define obj_is_not_closure(obj)
Definition: types.h:78