diff options
-rw-r--r-- | FMark/src/Markalc/MarkalcShared.fs | 9 | ||||
-rwxr-xr-x | build.sh | 1 |
2 files changed, 2 insertions, 8 deletions
diff --git a/FMark/src/Markalc/MarkalcShared.fs b/FMark/src/Markalc/MarkalcShared.fs index f0c45b0..f206357 100644 --- a/FMark/src/Markalc/MarkalcShared.fs +++ b/FMark/src/Markalc/MarkalcShared.fs @@ -1,7 +1,6 @@ module MarkalcShared open Types open System.Text.RegularExpressions -open System.IO type CellReference = RowCol of Row:uint32*Col:uint32 @@ -100,10 +99,4 @@ let simpleLex txt = // Experimental Lexr for tokenising from entire table string // let stringLex (txt:string)= // List.map simpleLex (Array.toList (txt.Split("\n"))) -let lexY (x,y,z) = x,y|>simpleLex,z - -let printToFile fpath s = - use sw = new StreamWriter(path=fpath) - let myPrint format = fprintf sw format - do myPrint "%s" s - sw.Close()
\ No newline at end of file +let lexY (x,y,z) = x,y|>simpleLex,z
\ No newline at end of file @@ -45,6 +45,7 @@ if [[ -z $TRAVIS_BUILD_DIR ]]; then exit 1 fi dotnet fable yarn-dev + read -n1 -r -p "Press any key to continue..." key if [[ "$?" != "0" ]]; then exit 1 fi |