Commit a6e0ebd7 authored by Diederik van Arkel's avatar Diederik van Arkel

remove logfile module from BatchBuild directory

parent fc089d00
definition module logfile
import StdString, StdFile
openLogfile :: !String !*f -> (!Bool,!*File,!*f) | FileSystem f
closeLogfile :: !*File !*f -> (!Bool,!*f) | FileSystem f
writeLogfile :: !String !*File -> !*File
implementation module logfile
import StdFile, StdPathname, StdBool
openLogfile :: !String !*f -> (!Bool,!*File,!*f) | FileSystem f
openLogfile prj_name env
# log_name = RemoveSuffix prj_name +++. ".log"
= fopen log_name FWriteText env
closeLogfile :: !*File !*f -> (!Bool,!*f) | FileSystem f
closeLogfile file env
# (ok1,file) = ferror file
# (ok2,env) = fclose file env
= (ok1 && ok2,env)
writeLogfile :: !String !*File -> !*File
writeLogfile s file = fwrites (s+++."\n") file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment