1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
/* $Id: //info.ravenbrook.com/project/mps/master/test/test/testlib/preMO.h#3 $
Before modern interface;
 - no closure arguments for mps_root_create_reg
 - no rank argument for mps_ap_create (ever)
*/

#define mps_root_create_reg(ro, sp, ra, rm, thr, scan, p, _s) \
 (mps_root_create_reg)(ro, sp, ra, rm, thr, scan, p)

#define mps_ap_create(a, p, _r) \
 (mps_ap_create)(a, p)


#include "preGR.h"