// The real begin routine is in assembler. // It its beginning RSP in location other and calls startR. // That causes the first output from code R (0 just now) to be returned // as the value of this function. #include #define SSize (1<<20) extern long int RSP; // imaginary stack pointer #include "x.h" vL begin(){ // Push onto the old stack whatever PutGetR will pop off when first called. other = RSP; RSP = SSize + (long int)malloc(SSize); return startR(11);}