hw7/StringBufEditor.hs

   1 module Main where
   2
   3 import StringBuffer
   4 import Editor
   5
   6 main = runEditor editor $ unlines
   7          [ "This buffer is for notes you don't want to save, and for"
   8          , "evaluation of steam valve coefficients."
   9          , "To load a different file, type the character L followed"
  10          , "by the name of the file."
  11          ]