-- File [Ivy]Lupine>LupineTranslator.config. -- Copyright (C) 1985 by Xerox Corporation. All rights reserved. -- Last edited by BZM on 2-May-82 21:29:25. -- Last edited by Andrew Birrell on October 25, 1983 10:51 am -- Last edited by Paul Rovner on January 28, 1983 1:29 pm -- Bob Hagmann February 8, 1985 4:56:43 pm PST -- LupineTranslator makes Lupine callable as a procedure by exporting -- TranslateInterface and its friends from the LupineManager interface. -- Last Edited by: Swinehart, July 11, 1984 5:38:54 pm PDT LupineTranslator: CONFIG LINKS: CODE IMPORTS AMTypes, Atom, BasicTime, BcdOps, Convert, ConvertUnsafe, FileStream, FS, IO, Loader, Rope, RTSymbolOps, RTSymbols, RefTab, VM EXPORTS LupineManager CONTROL LupineManagerImpl = BEGIN -- A symbol table module that uses both Cedar and the Compiler. LupineSymbolTableImpl; -- IMPORTS RTSymbols, SymbolTable, Table. LupineSymbolTableUtilsImpl; -- IMPORTS RTSymbols, SymbolTable, Table -- The modules of the Lupine translator. LupineManagerImpl; -- Contains driver, output, and utility routines. LupineMakeRpcModulesImpl; -- Generates the stubs's control interface and -- the client and server stub modules. LupineDeclareStubsImpl; -- Declares stub routines and bodies. LupineDeclareBindingImpl; -- Declares remote binding routines. LupineDeclareUtilityImpl; -- Declares various pieces of the stubs. LupineMarshalInfoImpl; -- Gathers together parameter info for marshaling. LupineMarshalTypeManagerImpl; -- Controls marshaling and handles builtin types. LupineMarshalTypeConstructorImpl; -- Handles marshaling of type constructors. LupineMarshalUtilityImpl; -- Handles generic marshaling operations. END. -- LupineTranslator. PBob Hagmann February 8, 1985 4:56:43 pm PST changes to: LupineTranslator Ê©˜Jš8Ïc5œB¥œ0ŽÏk;œžœžœžœFžœžœ0žœžœžœžœ@œ,œ )œ)œ2œ/œ(œ&œ%œ)œ3œ 2œ$,œ*œžœ˜î code™+KšœÏr™—K™—…—ðé