9 lines
233 B
Text
9 lines
233 B
Text
|
#include <order/interpreter.h>
|
||
|
|
|
||
|
|
#define ORDER_PP_DEF_8printloop ORDER_PP_FN( \
|
||
|
|
8fn(8N, \
|
||
|
|
8do(8print(8to_lit(8N) 8comma 8space), \
|
||
|
|
8printloop(8inc(8N)))) )
|
||
|
|
|
||
|
|
ORDER_PP( 8printloop(1) )
|