diff options
| author | Yann Herklotz <ymherklotz@gmail.com> | 2018-03-07 12:10:02 +0000 |
|---|---|---|
| committer | Yann Herklotz <ymherklotz@gmail.com> | 2018-03-07 12:10:02 +0000 |
| commit | 27b3f87dd774f37b60e3f67199f802cde3b71a0e (patch) | |
| tree | 3cad6dfeee85ab2964c681cf339f04294525ffd5 | |
| parent | 8d4cceac61bcce8722dbd144ecda32ea19057e5b (diff) | |
| parent | 7890913ea4401a591abf48f827eb2c6e675c7626 (diff) | |
| download | FMark-27b3f87dd774f37b60e3f67199f802cde3b71a0e.tar.gz FMark-27b3f87dd774f37b60e3f67199f802cde3b71a0e.zip | |
Merge branch 'htmlgen' of github.com:ymherklotz/FMark into htmlgen
| -rw-r--r-- | FMark/src/Markalc/MarkalcShared.fs | 9 | ||||
| -rwxr-xr-x | build.sh | 4 |
2 files changed, 5 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 @@ -66,4 +66,8 @@ if [[ $BUILD = "all" ]] || [[ $BUILD = "js" ]]; then cd $BASE_DIR/FMark/src/FMarkFable dotnet restore dotnet fable yarn-dev + read -n1 -r -p "Press any key to continue..." key + if [[ "$?" != "0" ]]; then + exit 1 + fi fi |