-- AlpineDocMake.cm
-- Last Edited by: Taft, January 15, 1984 1:12 pm

TSetter

← [] ← &tool ← %TSViewer.NewTool[NIL];
← [] ← %TSViewer.TempPress[&tool, FALSE];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineInterfaces.tioga"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineEnvironment.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineFile.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineTransaction.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineOwner.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineVolume.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpInstance.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpFile.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpTransaction.mesa"];
← [] ← %TSViewer.QueueRequest[&tool, "AlpineFS.mesa"];
← [] ← %TSViewer.PrintAll[&tool];
← [] ← %TSViewer.WaitForIdle[&tool]

Rename AlpineInterfaces.press ← AlpineInterfaces.etc.press