module test

import StdEnv
import System.FilePath
import Text
import Text.GenPrint

Start = join "\n" (map printToString
	[splitExtension "a"
	,splitExtension "/a"
	,splitExtension "a.out"
	,splitExtension "/a.out"
	,splitExtension "a/b"
	,splitExtension "/a/b"
	,splitExtension "a/b.out"
	,splitExtension "/a/b.out"
	,splitExtension "a/b.c/d"
	,splitExtension "/a/b.c/d"
	,splitExtension "a/b.c/d.out"
	,splitExtension "/a/b.c/d.out"
	,splitExtension ""
	])