-- compiler.conversions
-- Last Edited by: Maxwell, August 5, 1983 9:47 am

-- Rename CIFSInterface => Interface and CIFSFileParmPack => FileParmPack.
-- Use PrincOps and PrincOpsUtils instead of Inline, Mopcodes, and Environment.
-- Use FS instead of Directory.
-- Use VM instead of Space.
-- Use IO instead of CharIO.  (IO.UnsafePutBlock)
-- Convert Interface to use Commander instead of Exec and Feedback.
-- convert CommandUtil, CommandPack, CompilerOps, Interface, ProtoParser and Sequencer to use Rope and IO exclusively.
-- convert FileParms, FilePack and FileParmPack to use Rope as much as possible.
-- Use ConvertUnsafe.SubString and LONG STRING instead of Strings everywhere else.
-- Convert FilePack.fileTable, FileParmPack.fileTable, and Interface.parms to REFs.

DoTiogaOps ClearCommandNumber "1" ClearOperations "ClearSearchFor ""Mopcodes"" ClearReplaceBy ""PrincOps"" MatchWords DoSubstitute 
ClearSearchFor ""Environment"" ClearReplaceBy ""PrincOps"" DoSubstitute ClearSearchFor ""Inline"" ClearReplaceBy ""PrincOpsUtils"" 
DoSubstitute" DoSetOps

DoTiogaOps ClearCommandNumber "2" ClearOperations "ClearSearchFor ""Strings.String"" ClearReplaceBy ""LONG STRING"" SetMesaLooks 
MatchLooks MatchWords DoSubstitute ClearSearchFor ""Strings"" ClearReplaceBy ""ConvertUnsafe"" DoSubstitute IgnoreLooks" DoSetOps 

DoTiogaOps ClearCommandNumber "3" ClearOperations "ClearSearchFor ""Stream.Handle"" ClearReplaceBy ""IO.STREAM"" SetMesaLooks 
MatchLooks MatchWords DoSubstitute ClearSearchFor ""Stream"" ClearReplaceBy ""IO"" SetMesaLooks DoSubstitute ClearSearchFor 
""FileStream"" ClearReplaceBy ""IO"" SetMesaLooks DoSubstitute ClearSearchFor ""CharIO"" ClearReplaceBy ""IO"" SetMesaLooks 
DoSubstitute IgnoreLooks" DoSetOps

DoTiogaOps ClearCommandNumber "4" ClearOperations "ClearSearchFor ""Capability"" ClearReplaceBy ""OpenFile"" MatchWords 
DoSubstitute ClearSearchFor ""nullCapability"" ClearReplaceBy ""nullOpenFile"" DoSubstitute ClearSearchFor ""File"" ClearReplaceBy 
""FS"" SetMesaLooks MatchLooks DoSubstitute IgnoreLooks" DoSetOps

DoTiogaOps ClearCommandNumber "5" ClearOperations "ClearSearchFor ""Space"" ClearReplaceBy ""VM"" MatchWords SetMesaLooks 
MatchLooks DoSubstitute ClearSearchFor ""VM.Handle"" ClearReplaceBy ""VM.Interval"" SetMesaLooks DoSubstitute ClearSearchFor 
""VM.nullHandle"" ClearReplaceBy ""VM.nullInterval"" SetMesaLooks DoSubstitute ClearSearchFor ""VM.Create"" ClearReplaceBy 
""VM.Allocate"" SetMesaLooks DoSubstitute ClearSearchFor ""VM.Delete"" ClearReplaceBy ""VM.Free"" SetMesaLooks DoSubstitute 
IgnoreLooks" DoSetOps