uniform-fileio-0.1.5.2: tests/test1.hs

- 
module test1    where      -- must have Main (main) or Main where
 
import           Uniform.Strings
import Uniform.Error 
--import TestingFileIO


main :: IO ()
main = do

    putIOwords ["HTF LayoutTest.hs:\n posTest"]
    test1     
    return ()

test1 = do
    putStrLn "file1test"
    -- push2
    -- runErrorVoid $ do 
    -- test_hidden1
    return ()