-- file: WeaveProcArrayImpl.mesa
-- Last Edited by: Ramshaw, September 22, 1983 4:22 pm
-- Written by hand by Lyle Ramshaw for Tangle, changed by Pavel for Weave
-- Last changed by Pavel on September 11, 1984 5:19:34 pm PDT
-- Allocates an array for Weave.

DIRECTORY
PascalBasic,
PascalWizardFiles,
WeaveVars,
WeaveProcArray;

WeaveProcArrayImpl: PROGRAM IMPORTS PascalBasic EXPORTS WeaveProcArray = PUBLIC
BEGIN OPEN PascalBasic, PascalWizardFiles, WeaveVars, WeaveProcArray;


ByteMemA: LONG POINTER TO ARRAY PascalInteger[0..MaxBytes] OF AsciiCode ←
PascalStaticZone.NEW[ARRAY PascalInteger[0..MaxBytes] OF AsciiCode];
ByteMemB: LONG POINTER TO ARRAY PascalInteger[0..MaxBytes] OF AsciiCode ←
PascalStaticZone.NEW[ARRAY PascalInteger[0..MaxBytes] OF AsciiCode];

END.