-- file: TangleProcArrayImpl.mesa -- Last Edited by: Ramshaw, September 22, 1983 4:22 pm -- Written by hand by Lyle Ramshaw -- Allocates the arrays for Tangle. DIRECTORY PascalBasic, PascalWizardFiles, TanglePrivate, TangleProcArray; TangleProcArrayImpl: PROGRAM IMPORTS PascalBasic EXPORTS TangleProcArray = PUBLIC BEGIN OPEN PascalBasic, PascalWizardFiles, TanglePrivate, TangleProcArray; 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]; TokMemA: LONG POINTER TO ARRAY PascalInteger[0..MaxToks] OF EightBits _ PascalStaticZone.NEW[ARRAY PascalInteger[0..MaxToks] OF EightBits]; TokMemB: LONG POINTER TO ARRAY PascalInteger[0..MaxToks] OF EightBits _ PascalStaticZone.NEW[ARRAY PascalInteger[0..MaxToks] OF EightBits]; TokMemC: LONG POINTER TO ARRAY PascalInteger[0..MaxToks] OF EightBits _ PascalStaticZone.NEW[ARRAY PascalInteger[0..MaxToks] OF EightBits]; END. Ęæ˜JšbĪcĄœĪk œ_žœžœ žœžœžœžœMžœžœžœžœžœ"žœžœžœžœžœžœžœžœ"žœžœžœžœžœžœžœžœ"žœžœžœžœžœžœžœžœ"žœžœžœžœžœžœžœžœ"žœžœžœžœ˜ô—…—vb