define-entry-point

[syntax] define-entry-point index ((var type) ...) (rtype ...) exp1 exp2 ...

Chicken