home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Tex / texsrc.arc / COERCE.H < prev    next >
Text File  |  1988-09-14  |  25KB  |  566 lines
  1. #define zmem (zzzaa - memmin)
  2. #define r_initialize register memoryword *mem=zmem, *eqtb=zeqtb;
  3. #define r_println
  4. #define printchar(a) zprintchar((int)(a))
  5. #define r_printchar register memoryword *eqtb=zeqtb;
  6. #define print(a) zprint((integer)(a))
  7. #define r_print register memoryword *eqtb=zeqtb;
  8. #define slowprint(a) zslowprint((integer)(a))
  9. #define r_slowprint register memoryword *eqtb=zeqtb;
  10. #define printnl(a) zprintnl((strnumber)(a))
  11. #define r_printnl
  12. #define printesc(a) zprintesc((strnumber)(a))
  13. #define r_printesc register memoryword *eqtb=zeqtb;
  14. #define printthedigs(a) zprintthedigs((int)(a))
  15. #define r_printthedigs
  16. #define printint(a) zprintint((integer)(a))
  17. #define r_printint
  18. #define printcs(a) zprintcs((integer)(a))
  19. #define r_printcs register memoryword *eqtb=zeqtb;
  20. #define sprintcs(a) zsprintcs((halfword)(a))
  21. #define r_sprintcs
  22. #define printfilenam(a,b,c) zprintfilenam((integer)(a),(integer)(b),(integer)(c))
  23. #define r_printfilenam
  24. #define printsize(a) zprintsize((integer)(a))
  25. #define r_printsize
  26. #define printwritewh(a,b) zprintwritewh((strnumber)(a),(halfword)(b))
  27. #define r_printwritewh register memoryword *mem=zmem;
  28. #define r_jumpout
  29. #define r_error
  30. #define fatalerror(a) zfatalerror((strnumber)(a))
  31. #define r_fatalerror
  32. #define overflow(a,b) zoverflow((strnumber)(a),(integer)(b))
  33. #define r_overflow
  34. #define confusion(a) zconfusion((strnumber)(a))
  35. #define r_confusion
  36. boolean initterminal();
  37. #define r_initterminal
  38. strnumber makestring();
  39. #define r_makestring
  40. #define streqbuf(a,b) zstreqbuf((strnumber)(a),(integer)(b))
  41. boolean zstreqbuf();
  42. #define r_streqbuf
  43. #define streqstr(a,b) zstreqstr((strnumber)(a),(strnumber)(b))
  44. boolean zstreqstr();
  45. #define r_streqstr
  46. boolean getstringsst();
  47. #define r_getstringsst
  48. #define printtwo(a) zprinttwo((integer)(a))
  49. #define r_printtwo
  50. #define printhex(a) zprinthex((integer)(a))
  51. #define r_printhex
  52. #define printASCII(a) zprintASCII((integer)(a))
  53. #define r_printASCII
  54. #define printromanin(a) zprintromanin((integer)(a))
  55. #define r_printromanin
  56. #define r_printcurrent
  57. #define r_terminput
  58. #define interror(a) zinterror((integer)(a))
  59. #define r_interror
  60. #define r_normalizesel
  61. #define r_pauseforinst
  62. #define half(a) zhalf((integer)(a))
  63. integer zhalf();
  64. #define r_half
  65. #define rounddecimal(a) zrounddecimal((int)(a))
  66. scaled zrounddecimal();
  67. #define r_rounddecimal
  68. #define printscaled(a) zprintscaled((scaled)(a))
  69. #define r_printscaled
  70. #define nxplusy(a,b,c) znxplusy((integer)(a),(scaled)(b),(scaled)(c))
  71. scaled znxplusy();
  72. #define r_nxplusy
  73. #define xovern(a,b) zxovern((scaled)(a),(integer)(b))
  74. scaled zxovern();
  75. #define r_xovern
  76. #define xnoverd(a,b,c) zxnoverd((scaled)(a),(integer)(b),(integer)(c))
  77. scaled zxnoverd();
  78. #define r_xnoverd
  79. #define badness(a,b) zbadness((scaled)(a),(scaled)(b))
  80. halfword zbadness();
  81. #define r_badness
  82. #define printword(a) zprintword((memoryword)(a))
  83. #define r_printword
  84. #define showtokenlis(a,b,c) zshowtokenlis((integer)(a),(integer)(b),(integer)(c))
  85. #define r_showtokenlis register memoryword *mem=zmem;
  86. #define r_runaway register memoryword *mem=zmem;
  87. halfword getavail();
  88. #define r_getavail register memoryword *mem=zmem;
  89. #define flushlist(a) zflushlist((halfword)(a))
  90. #define r_flushlist register memoryword *mem=zmem;
  91. #define getnode(a) zgetnode((integer)(a))
  92. halfword zgetnode();
  93. #define r_getnode register memoryword *mem=zmem;
  94. #define freenode(a,b) zfreenode((halfword)(a),(halfword)(b))
  95. #define r_freenode register memoryword *mem=zmem;
  96. #define r_sortavail register memoryword *mem=zmem;
  97. halfword newnullbox();
  98. #define r_newnullbox register memoryword *mem=zmem;
  99. halfword newrule();
  100. #define r_newrule register memoryword *mem=zmem;
  101. #define newligature(a,b,c) znewligature((int)(a),(int)(b),(halfword)(c))
  102. halfword znewligature();
  103. #define r_newligature register memoryword *mem=zmem;
  104. halfword newdisc();
  105. #define r_newdisc register memoryword *mem=zmem;
  106. #define newmath(a,b) znewmath((scaled)(a),(int)(b))
  107. halfword znewmath();
  108. #define r_newmath register memoryword *mem=zmem;
  109. #define newspec(a) znewspec((halfword)(a))
  110. halfword znewspec();
  111. #define r_newspec register memoryword *mem=zmem;
  112. #define newparamglue(a) znewparamglue((int)(a))
  113. halfword znewparamglue();
  114. #define r_newparamglue register memoryword *mem=zmem, *eqtb=zeqtb;
  115. #define newglue(a) znewglue((halfword)(a))
  116. halfword znewglue();
  117. #define r_newglue register memoryword *mem=zmem;
  118. #define newskipparam(a) znewskipparam((int)(a))
  119. halfword znewskipparam();
  120. #define r_newskipparam register memoryword *mem=zmem, *eqtb=zeqtb;
  121. #define newkern(a) znewkern((scaled)(a))
  122. halfword znewkern();
  123. #define r_newkern register memoryword *mem=zmem;
  124. #define newpenalty(a) znewpenalty((integer)(a))
  125. halfword znewpenalty();
  126. #define r_newpenalty register memoryword *mem=zmem;
  127. #define checkmem(a) zcheckmem((int)(a))
  128. #define r_checkmem register memoryword *mem=zmem;
  129. #define searchmem(a) zsearchmem((halfword)(a))
  130. #define r_searchmem register memoryword *mem=zmem, *eqtb=zeqtb;
  131. #define shortdisplay(a) zshortdisplay((integer)(a))
  132. #define r_shortdisplay register memoryword *mem=zmem;
  133. #define printfontand(a) zprintfontand((integer)(a))
  134. #define r_printfontand register memoryword *mem=zmem;
  135. #define printmark(a) zprintmark((integer)(a))
  136. #define r_printmark register memoryword *mem=zmem;
  137. #define printruledim(a) zprintruledim((scaled)(a))
  138. #define r_printruledim
  139. #define printglue(a,b,c) zprintglue((scaled)(a),(integer)(b),(strnumber)(c))
  140. #define r_printglue
  141. #define printspec(a,b) zprintspec((integer)(a),(strnumber)(b))
  142. #define r_printspec register memoryword *mem=zmem;
  143. #define printfamandc(a) zprintfamandc((halfword)(a))
  144. #define r_printfamandc register memoryword *mem=zmem;
  145. #define printdelimit(a) zprintdelimit((halfword)(a))
  146. #define r_printdelimit register memoryword *mem=zmem;
  147. #define printsubsidi(a,b) zprintsubsidi((halfword)(a),(int)(b))
  148. #define r_printsubsidi register memoryword *mem=zmem;
  149. #define printstyle(a) zprintstyle((integer)(a))
  150. #define r_printstyle
  151. #define printskippar(a) zprintskippar((integer)(a))
  152. #define r_printskippar
  153. #define shownodelist(a) zshownodelist((integer)(a))
  154. #define r_shownodelist register memoryword *mem=zmem;
  155. #define showbox(a) zshowbox((halfword)(a))
  156. #define r_showbox register memoryword *eqtb=zeqtb;
  157. #define deletetokenr(a) zdeletetokenr((halfword)(a))
  158. #define r_deletetokenr register memoryword *mem=zmem;
  159. #define deletegluere(a) zdeletegluere((halfword)(a))
  160. #define r_deletegluere register memoryword *mem=zmem;
  161. #define flushnodelis(a) zflushnodelis((halfword)(a))
  162. #define r_flushnodelis register memoryword *mem=zmem;
  163. #define copynodelist(a) zcopynodelist((halfword)(a))
  164. halfword zcopynodelist();
  165. #define r_copynodelist register memoryword *mem=zmem;
  166. #define printmode(a) zprintmode((integer)(a))
  167. #define r_printmode
  168. #define r_pushnest
  169. #define r_popnest register memoryword *mem=zmem;
  170. #define r_showactiviti register memoryword *mem=zmem, *eqtb=zeqtb;
  171. #define printparam(a) zprintparam((integer)(a))
  172. #define r_printparam
  173. #define r_begindiagnos register memoryword *eqtb=zeqtb;
  174. #define enddiagnosti(a) zenddiagnosti((int)(a))
  175. #define r_enddiagnosti
  176. #define printlengthp(a) zprintlengthp((integer)(a))
  177. #define r_printlengthp
  178. #define printcmdchr(a,b) zprintcmdchr((int)(a),(halfword)(b))
  179. #define r_printcmdchr
  180. #define showeqtb(a) zshoweqtb((halfword)(a))
  181. #define r_showeqtb register memoryword *mem=zmem, *eqtb=zeqtb;
  182. #define idlookup(a,b) zidlookup((integer)(a),(integer)(b))
  183. halfword zidlookup();
  184. #define r_idlookup
  185. #define primitive(a,b,c) zprimitive((strnumber)(a),(int)(b),(halfword)(c))
  186. #define r_primitive register memoryword *eqtb=zeqtb;
  187. #define newsavelevel(a) znewsavelevel((int)(a))
  188. #define r_newsavelevel
  189. #define eqdestroy(a) zeqdestroy((memoryword)(a))
  190. #define r_eqdestroy register memoryword *mem=zmem;
  191. #define eqsave(a,b) zeqsave((halfword)(a),(int)(b))
  192. #define r_eqsave register memoryword *eqtb=zeqtb;
  193. #define eqdefine(a,b,c) zeqdefine((halfword)(a),(int)(b),(halfword)(c))
  194. #define r_eqdefine register memoryword *eqtb=zeqtb;
  195. #define eqworddefine(a,b) zeqworddefine((halfword)(a),(integer)(b))
  196. #define r_eqworddefine register memoryword *eqtb=zeqtb;
  197. #define geqdefine(a,b,c) zgeqdefine((halfword)(a),(int)(b),(halfword)(c))
  198. #define r_geqdefine register memoryword *eqtb=zeqtb;
  199. #define geqworddefin(a,b) zgeqworddefin((halfword)(a),(integer)(b))
  200. #define r_geqworddefin register memoryword *eqtb=zeqtb;
  201. #define saveforafter(a) zsaveforafter((halfword)(a))
  202. #define r_saveforafter
  203. #define restoretrace(a,b) zrestoretrace((halfword)(a),(strnumber)(b))
  204. #define r_restoretrace
  205. #define r_unsave register memoryword *eqtb=zeqtb;
  206. #define r_preparemag register memoryword *eqtb=zeqtb;
  207. #define tokenshow(a) ztokenshow((halfword)(a))
  208. #define r_tokenshow register memoryword *mem=zmem;
  209. #define r_printmeaning
  210. #define r_showcurcmdch
  211. #define r_showcontext register memoryword *mem=zmem, *eqtb=zeqtb;
  212. #define begintokenli(a,b) zbegintokenli((halfword)(a),(int)(b))
  213. #define r_begintokenli register memoryword *mem=zmem, *eqtb=zeqtb;
  214. #define r_endtokenlist
  215. #define r_backinput register memoryword *mem=zmem;
  216. #define r_backerror
  217. #define r_inserror
  218. #define r_beginfilerea
  219. #define r_endfilereadi
  220. #define r_clearforerro
  221. #define r_checkouterva register memoryword *mem=zmem;
  222. #define r_getnext register memoryword *mem=zmem, *eqtb=zeqtb;
  223. #define r_firmupthelin register memoryword *eqtb=zeqtb;
  224. #define r_gettoken
  225. #define r_macrocall register memoryword *mem=zmem, *eqtb=zeqtb;
  226. #define r_insertrelax
  227. #define r_expand register memoryword *mem=zmem, *eqtb=zeqtb;
  228. #define r_getxtoken
  229. #define r_xtoken
  230. #define r_scanleftbrac
  231. #define r_scanoptional
  232. #define scankeyword(a) zscankeyword((strnumber)(a))
  233. boolean zscankeyword();
  234. #define r_scankeyword register memoryword *mem=zmem;
  235. #define r_muerror
  236. #define r_scansevenbit
  237. #define r_scaneightbit
  238. #define r_scanfourbiti
  239. #define r_scancharnum
  240. #define r_scanfifteenb
  241. #define r_scantwentyse
  242. #define r_scanfontiden register memoryword *eqtb=zeqtb;
  243. #define findfontdime(a) zfindfontdime((int)(a))
  244. #define r_findfontdime
  245. #define scansomethin(a,b) zscansomethin((int)(a),(int)(b))
  246. #define r_scansomethin register memoryword *mem=zmem, *eqtb=zeqtb;
  247. #define r_scanint
  248. #define scandimen(a,b,c) zscandimen((int)(a),(int)(b),(int)(c))
  249. #define r_scandimen register memoryword *mem=zmem, *eqtb=zeqtb;
  250. #define scanglue(a) zscanglue((int)(a))
  251. #define r_scanglue register memoryword *mem=zmem;
  252. halfword scanrulespec();
  253. #define r_scanrulespec register memoryword *mem=zmem;
  254. halfword strtoks();
  255. #define r_strtoks register memoryword *mem=zmem;
  256. halfword thetoks();
  257. #define r_thetoks register memoryword *mem=zmem;
  258. #define r_insthetoks register memoryword *mem=zmem;
  259. #define r_convtoks register memoryword *mem=zmem;
  260. #define scantoks(a,b) zscantoks((int)(a),(int)(b))
  261. halfword zscantoks();
  262. #define r_scantoks register memoryword *mem=zmem;
  263. #define readtoks(a,b) zreadtoks((integer)(a),(halfword)(b))
  264. #define r_readtoks register memoryword *mem=zmem, *eqtb=zeqtb;
  265. #define r_passtext
  266. #define changeiflimi(a,b) zchangeiflimi((int)(a),(halfword)(b))
  267. #define r_changeiflimi register memoryword *mem=zmem;
  268. #define r_conditional register memoryword *mem=zmem, *eqtb=zeqtb;
  269. #define r_beginname
  270. #define morename(a) zmorename((int)(a))
  271. boolean zmorename();
  272. #define r_morename
  273. #define r_endname
  274. #define packfilename(a,b,c) zpackfilename((strnumber)(a),(strnumber)(b),(strnumber)(c))
  275. #define r_packfilename
  276. #define packbuffered(a,b,c) zpackbuffered((int)(a),(integer)(b),(integer)(c))
  277. #define r_packbuffered
  278. strnumber makenamestri();
  279. #define r_makenamestri
  280. #define amakenamestr(a) zamakenamestr((alphafile)(a))
  281. strnumber zamakenamestr();
  282. #define r_amakenamestr
  283. #define bmakenamestr(a) zbmakenamestr((bytefile)(a))
  284. strnumber zbmakenamestr();
  285. #define r_bmakenamestr
  286. #define wmakenamestr(a) zwmakenamestr((wordfile)(a))
  287. strnumber zwmakenamestr();
  288. #define r_wmakenamestr
  289. #define r_scanfilename
  290. #define packjobname(a) zpackjobname((strnumber)(a))
  291. #define r_packjobname
  292. #define promptfilena(a,b) zpromptfilena((strnumber)(a),(strnumber)(b))
  293. #define r_promptfilena
  294. #define r_openlogfile register memoryword *eqtb=zeqtb;
  295. #define r_startinput register memoryword *eqtb=zeqtb;
  296. #define readfontinfo(a,b,c,d) zreadfontinfo((halfword)(a),(strnumber)(b),(strnumber)(c),(scaled)(d))
  297. internalfont zreadfontinfo();
  298. #define r_readfontinfo register memoryword *eqtb=zeqtb;
  299. #define charwarning(a,b) zcharwarning((internalfont)(a),(int)(b))
  300. #define r_charwarning register memoryword *eqtb=zeqtb;
  301. #define newcharacter(a,b) znewcharacter((internalfont)(a),(int)(b))
  302. halfword znewcharacter();
  303. #define r_newcharacter register memoryword *mem=zmem;
  304. #define r_dviswap
  305. #define dvifour(a) zdvifour((integer)(a))
  306. #define r_dvifour
  307. #define dvipop(a) zdvipop((integer)(a))
  308. #define r_dvipop
  309. #define dvifontdef(a) zdvifontdef((internalfont)(a))
  310. #define r_dvifontdef
  311. #define movement(a,b) zmovement((scaled)(a),(int)(b))
  312. #define r_movement register memoryword *mem=zmem;
  313. #define prunemovemen(a) zprunemovemen((integer)(a))
  314. #define r_prunemovemen register memoryword *mem=zmem;
  315. #define specialout(a) zspecialout((halfword)(a))
  316. #define r_specialout register memoryword *mem=zmem;
  317. #define writeout(a) zwriteout((halfword)(a))
  318. #define r_writeout register memoryword *mem=zmem;
  319. #define outwhat(a) zoutwhat((halfword)(a))
  320. #define r_outwhat register memoryword *mem=zmem;
  321. #define r_hlistout register memoryword *mem=zmem;
  322. #define r_vlistout register memoryword *mem=zmem;
  323. #define shipout(a) zshipout((halfword)(a))
  324. #define r_shipout register memoryword *mem=zmem, *eqtb=zeqtb;
  325. #define r_scanspec
  326. #define hpack(a,b,c) zhpack((halfword)(a),(scaled)(b),(int)(c))
  327. halfword zhpack();
  328. #define r_hpack register memoryword *mem=zmem, *eqtb=zeqtb;
  329. #define vpackage(a,b,c,d) zvpackage((halfword)(a),(scaled)(b),(int)(c),(scaled)(d))
  330. halfword zvpackage();
  331. #define r_vpackage register memoryword *mem=zmem, *eqtb=zeqtb;
  332. #define appendtovlis(a) zappendtovlis((halfword)(a))
  333. #define r_appendtovlis register memoryword *mem=zmem, *eqtb=zeqtb;
  334. halfword newnoad();
  335. #define r_newnoad register memoryword *mem=zmem;
  336. #define newstyle(a) znewstyle((int)(a))
  337. halfword znewstyle();
  338. #define r_newstyle register memoryword *mem=zmem;
  339. halfword newchoice();
  340. #define r_newchoice register memoryword *mem=zmem;
  341. #define r_showinfo register memoryword *mem=zmem;
  342. #define fractionrule(a) zfractionrule((scaled)(a))
  343. halfword zfractionrule();
  344. #define r_fractionrule register memoryword *mem=zmem;
  345. #define overbar(a,b,c) zoverbar((halfword)(a),(scaled)(b),(scaled)(c))
  346. halfword zoverbar();
  347. #define r_overbar register memoryword *mem=zmem;
  348. #define charbox(a,b) zcharbox((internalfont)(a),(int)(b))
  349. halfword zcharbox();
  350. #define r_charbox register memoryword *mem=zmem;
  351. #define stackintobox(a,b,c) zstackintobox((halfword)(a),(internalfont)(b),(int)(c))
  352. #define r_stackintobox register memoryword *mem=zmem;
  353. #define heightplusde(a,b) zheightplusde((internalfont)(a),(int)(b))
  354. scaled zheightplusde();
  355. #define r_heightplusde
  356. #define vardelimiter(a,b,c) zvardelimiter((halfword)(a),(int)(b),(scaled)(c))
  357. halfword zvardelimiter();
  358. #define r_vardelimiter register memoryword *mem=zmem, *eqtb=zeqtb;
  359. #define rebox(a,b) zrebox((halfword)(a),(scaled)(b))
  360. halfword zrebox();
  361. #define r_rebox register memoryword *mem=zmem;
  362. #define mathglue(a,b) zmathglue((halfword)(a),(scaled)(b))
  363. halfword zmathglue();
  364. #define r_mathglue register memoryword *mem=zmem;
  365. #define mathkern(a,b) zmathkern((halfword)(a),(scaled)(b))
  366. #define r_mathkern register memoryword *mem=zmem;
  367. #define r_flushmath register memoryword *mem=zmem;
  368. #define cleanbox(a,b) zcleanbox((halfword)(a),(int)(b))
  369. halfword zcleanbox();
  370. #define r_cleanbox register memoryword *mem=zmem, *eqtb=zeqtb;
  371. #define fetch(a) zfetch((halfword)(a))
  372. #define r_fetch register memoryword *mem=zmem, *eqtb=zeqtb;
  373. #define makeover(a) zmakeover((halfword)(a))
  374. #define r_makeover register memoryword *mem=zmem, *eqtb=zeqtb;
  375. #define makeunder(a) zmakeunder((halfword)(a))
  376. #define r_makeunder register memoryword *mem=zmem, *eqtb=zeqtb;
  377. #define makevcenter(a) zmakevcenter((halfword)(a))
  378. #define r_makevcenter register memoryword *mem=zmem, *eqtb=zeqtb;
  379. #define makeradical(a) zmakeradical((halfword)(a))
  380. #define r_makeradical register memoryword *mem=zmem, *eqtb=zeqtb;
  381. #define makemathacce(a) zmakemathacce((halfword)(a))
  382. #define r_makemathacce register memoryword *mem=zmem;
  383. #define makefraction(a) zmakefraction((halfword)(a))
  384. #define r_makefraction register memoryword *mem=zmem, *eqtb=zeqtb;
  385. #define makeop(a) zmakeop((halfword)(a))
  386. scaled zmakeop();
  387. #define r_makeop register memoryword *mem=zmem, *eqtb=zeqtb;
  388. #define makeord(a) zmakeord((halfword)(a))
  389. #define r_makeord register memoryword *mem=zmem;
  390. #define makescripts(a,b) zmakescripts((halfword)(a),(scaled)(b))
  391. #define r_makescripts register memoryword *mem=zmem, *eqtb=zeqtb;
  392. #define makeleftrigh(a,b,c,d) zmakeleftrigh((halfword)(a),(int)(b),(scaled)(c),(scaled)(d))
  393. smallnumber zmakeleftrigh();
  394. #define r_makeleftrigh register memoryword *mem=zmem, *eqtb=zeqtb;
  395. #define r_mlisttohlist register memoryword *mem=zmem, *eqtb=zeqtb;
  396. #define r_pushalignmen register memoryword *mem=zmem;
  397. #define r_popalignment register memoryword *mem=zmem;
  398. #define r_getpreamblet register memoryword *eqtb=zeqtb;
  399. #define r_initalign register memoryword *mem=zmem, *eqtb=zeqtb;
  400. #define initspan(a) zinitspan((halfword)(a))
  401. #define r_initspan
  402. #define r_initrow register memoryword *mem=zmem;
  403. #define r_initcol register memoryword *mem=zmem;
  404. boolean fincol();
  405. #define r_fincol register memoryword *mem=zmem;
  406. #define r_finrow register memoryword *mem=zmem, *eqtb=zeqtb;
  407. #define r_finalign register memoryword *mem=zmem, *eqtb=zeqtb;
  408. #define r_alignpeek
  409. #define finiteshrink(a) zfiniteshrink((halfword)(a))
  410. halfword zfiniteshrink();
  411. #define r_finiteshrink register memoryword *mem=zmem;
  412. #define trybreak(a,b) ztrybreak((integer)(a),(int)(b))
  413. #define r_trybreak register memoryword *mem=zmem, *eqtb=zeqtb;
  414. #define postlinebrea(a) zpostlinebrea((integer)(a))
  415. #define r_postlinebrea register memoryword *mem=zmem, *eqtb=zeqtb;
  416. #define reconstitute(a,b) zreconstitute((int)(a),(int)(b))
  417. smallnumber zreconstitute();
  418. #define r_reconstitute register memoryword *mem=zmem;
  419. #define r_hyphenate register memoryword *mem=zmem;
  420. #define linebreak(a) zlinebreak((integer)(a))
  421. #define r_linebreak register memoryword *mem=zmem, *eqtb=zeqtb;
  422. #define r_newhyphexcep register memoryword *mem=zmem, *eqtb=zeqtb;
  423. #define newtrieop(a,b,c) znewtrieop((int)(a),(int)(b),(int)(c))
  424. quarterword znewtrieop();
  425. #define r_newtrieop
  426. #define trienode(a) ztrienode((triepointer)(a))
  427. triepointer ztrienode();
  428. #define r_trienode
  429. #define compresstrie(a) zcompresstrie((triepointer)(a))
  430. triepointer zcompresstrie();
  431. #define r_compresstrie
  432. #define r_initpatternm
  433. #define r_inittriememo
  434. #define firstfit(a) zfirstfit((triepointer)(a))
  435. #define r_firstfit
  436. #define triepack(a) ztriepack((triepointer)(a))
  437. #define r_triepack
  438. #define triefix(a) ztriefix((triepointer)(a))
  439. #define r_triefix
  440. #define r_newpatterns register memoryword *eqtb=zeqtb;
  441. #define prunepagetop(a) zprunepagetop((halfword)(a))
  442. halfword zprunepagetop();
  443. #define r_prunepagetop register memoryword *mem=zmem;
  444. #define vertbreak(a,b,c) zvertbreak((halfword)(a),(scaled)(b),(scaled)(c))
  445. halfword zvertbreak();
  446. #define r_vertbreak register memoryword *mem=zmem;
  447. #define vsplit(a,b) zvsplit((int)(a),(scaled)(b))
  448. halfword zvsplit();
  449. #define r_vsplit register memoryword *mem=zmem, *eqtb=zeqtb;
  450. #define r_printtotals
  451. #define freezepagesp(a) zfreezepagesp((int)(a))
  452. #define r_freezepagesp register memoryword *eqtb=zeqtb;
  453. #define boxerror(a) zboxerror((int)(a))
  454. #define r_boxerror register memoryword *eqtb=zeqtb;
  455. #define ensurevbox(a) zensurevbox((int)(a))
  456. #define r_ensurevbox register memoryword *mem=zmem, *eqtb=zeqtb;
  457. #define fireup(a) zfireup((halfword)(a))
  458. #define r_fireup register memoryword *mem=zmem, *eqtb=zeqtb;
  459. #define r_buildpage register memoryword *mem=zmem, *eqtb=zeqtb;
  460. #define r_appspace register memoryword *mem=zmem, *eqtb=zeqtb;
  461. #define r_insertdollar
  462. #define r_youcant
  463. #define r_reportillega
  464. boolean privileged();
  465. #define r_privileged
  466. boolean itsallover();
  467. #define r_itsallover register memoryword *mem=zmem, *eqtb=zeqtb;
  468. #define r_appendglue register memoryword *mem=zmem;
  469. #define r_appendkern register memoryword *mem=zmem;
  470. #define r_offsave register memoryword *mem=zmem;
  471. #define r_extrarightbr
  472. #define r_normalparagr register memoryword *eqtb=zeqtb;
  473. #define r_boxend register memoryword *mem=zmem;
  474. #define r_beginbox register memoryword *mem=zmem, *eqtb=zeqtb;
  475. #define r_scanbox
  476. #define package(a) zpackage((int)(a))
  477. #define r_package register memoryword *mem=zmem, *eqtb=zeqtb;
  478. #define newgraf(a) znewgraf((int)(a))
  479. #define r_newgraf register memoryword *mem=zmem, *eqtb=zeqtb;
  480. #define r_indentinhmod register memoryword *mem=zmem, *eqtb=zeqtb;
  481. #define r_headforvmode
  482. #define r_endgraf register memoryword *eqtb=zeqtb;
  483. #define r_begininserto
  484. #define r_makemark register memoryword *mem=zmem;
  485. #define r_appendpenalt register memoryword *mem=zmem;
  486. #define r_deletelast register memoryword *mem=zmem;
  487. #define r_unpackage register memoryword *mem=zmem, *eqtb=zeqtb;
  488. #define r_appenditalic register memoryword *mem=zmem;
  489. #define r_appenddiscre register memoryword *mem=zmem, *eqtb=zeqtb;
  490. #define r_builddiscret register memoryword *mem=zmem;
  491. #define r_makeaccent register memoryword *mem=zmem, *eqtb=zeqtb;
  492. #define r_alignerror
  493. #define r_noalignerror
  494. #define r_omiterror
  495. #define r_doendv
  496. #define r_cserror
  497. #define pushmath(a) zpushmath((int)(a))
  498. #define r_pushmath
  499. #define r_initmath register memoryword *mem=zmem, *eqtb=zeqtb;
  500. #define r_starteqno register memoryword *eqtb=zeqtb;
  501. #define scanmath(a) zscanmath((halfword)(a))
  502. #define r_scanmath register memoryword *mem=zmem, *eqtb=zeqtb;
  503. #define setmathchar(a) zsetmathchar((integer)(a))
  504. #define r_setmathchar register memoryword *mem=zmem, *eqtb=zeqtb;
  505. #define r_mathlimitswi register memoryword *mem=zmem;
  506. #define scandelimite(a,b) zscandelimite((halfword)(a),(int)(b))
  507. #define r_scandelimite register memoryword *mem=zmem, *eqtb=zeqtb;
  508. #define r_mathradical register memoryword *mem=zmem;
  509. #define r_mathac register memoryword *mem=zmem, *eqtb=zeqtb;
  510. #define r_appendchoice register memoryword *mem=zmem;
  511. #define finmlist(a) zfinmlist((halfword)(a))
  512. halfword zfinmlist();
  513. #define r_finmlist register memoryword *mem=zmem;
  514. #define r_buildchoices register memoryword *mem=zmem;
  515. #define r_subsup register memoryword *mem=zmem;
  516. #define r_mathfraction register memoryword *mem=zmem;
  517. #define r_mathleftrigh register memoryword *mem=zmem;
  518. #define r_aftermath register memoryword *mem=zmem, *eqtb=zeqtb;
  519. #define r_resumeafterd
  520. #define r_getrtoken
  521. #define r_trapzeroglue register memoryword *mem=zmem;
  522. #define doregisterco(a) zdoregisterco((int)(a))
  523. #define r_doregisterco register memoryword *mem=zmem, *eqtb=zeqtb;
  524. #define r_alteraux
  525. #define r_alterprevgra
  526. #define r_alterpagesof
  527. #define r_alterinteger
  528. #define r_alterboxdime register memoryword *mem=zmem, *eqtb=zeqtb;
  529. #define newfont(a) znewfont((int)(a))
  530. #define r_newfont register memoryword *eqtb=zeqtb;
  531. #define r_newinteracti
  532. #define r_prefixedcomm register memoryword *mem=zmem, *eqtb=zeqtb;
  533. #define r_doassignment
  534. #define r_openorclosei
  535. #define r_issuemessage register memoryword *mem=zmem, *eqtb=zeqtb;
  536. #define r_shiftcase register memoryword *mem=zmem, *eqtb=zeqtb;
  537. #define r_showwhatever register memoryword *mem=zmem, *eqtb=zeqtb;
  538. #define r_storefmtfile register memoryword *mem=zmem, *eqtb=zeqtb;
  539. #define newwhatsit(a,b) znewwhatsit((int)(a),(int)(b))
  540. #define r_newwhatsit register memoryword *mem=zmem;
  541. #define newwritewhat(a) znewwritewhat((int)(a))
  542. #define r_newwritewhat register memoryword *mem=zmem;
  543. #define r_doextension register memoryword *mem=zmem;
  544. #define r_handlerightb register memoryword *mem=zmem, *eqtb=zeqtb;
  545. #define r_maincontrol register memoryword *mem=zmem, *eqtb=zeqtb;
  546. #define r_giveerrhelp register memoryword *eqtb=zeqtb;
  547. boolean openfmtfile();
  548. #define r_openfmtfile
  549. boolean loadfmtfile();
  550. #define r_loadfmtfile register memoryword *mem=zmem, *eqtb=zeqtb;
  551. #define r_closefilesan register memoryword *eqtb=zeqtb;
  552. #define r_finalcleanup register memoryword *mem=zmem;
  553. #define r_initprim register memoryword *eqtb=zeqtb;
  554. #define r_debughelp register memoryword *mem=zmem, *eqtb=zeqtb;
  555. #define r_texbody memoryword *eqtb=zeqtb;
  556. /*
  557.  * The C compiler ignores most unnecessary casts (i.e., casts of something
  558.  * to its own type).  However, for structures, it doesn't.  Therefore,
  559.  * we have to redefine these two macros so that they don't try to cast
  560.  * the argument (a memoryword) as a memoryword.
  561.  */
  562. #undef    eqdestroy
  563. #define    eqdestroy(x)    zeqdestroy(x)
  564. #undef    printword
  565. #define    printword(x)    zprintword(x)
  566.