DIRECTORY Rope, ThreeC4Support, RiscAssemblerTokenDef; RiscAssemblerTokenImpl: CEDAR PROGRAM IMPORTS Rope EXPORTS RiscAssemblerTokenDef= BEGIN OPEN Rope, ThreeC4Support, RiscAssemblerTokenDef; RiscAssemblerTokenLinkProc: PUBLIC PROC[prodLinkArray: SeeProdLinkArray, tknLinkArray: TokenLinkArray] = BEGIN tknLinkArray[tokenID] _ BuildidNode; END; BuildidNode: PUBLIC PROC[text: Rope.ROPE, firstCharPosition: INT] RETURNS[idNode] = {RETURN[NEW[idNodeBody_[text, firstCharPosition, Length[text]]]]}; END.. ÖRiscAssemblerTokenImpl.mesa Copyright Ó 1987 by Xerox Corporation. All rights reserved. Generated by hederman.pa at July 15, 1987 4:53:04 pm PDT using ThreeCasabaFour [1.2] of June 1, 1987 6:00:00 pm PDT id Êè˜šœ™Jšœ<™