Use a lockfile to protect against concurrent GHC invocations (fixes #23)

jspahrsummers · Aug 4, 2012 · 997e3bd · 997e3bd
1 parent 84e00b7
commit 997e3bd
Showing 1 changed file with 13 additions and 7 deletions.
diff --git a/Configuration/compileHaskell.sh b/Configuration/compileHaskell.sh
@@ -16,10 +16,16 @@ do
     IMPORTS="$IMPORTS -i$DIR"
 done
 
-/usr/local/bin/ghc \
-    -XForeignFunctionInterface -XTemplateHaskell \
-    -Werror -fwarn-incomplete-patterns -fwarn-dodgy-imports -fwarn-dodgy-exports -fwarn-unused-binds -fwarn-hi-shadowing -fwarn-identities -fwarn-monomorphism-restriction \
-    -framework Foundation $IMPORTS \
-    -c -O -threaded --make \
-    "$@" \
-    "$INPUT_FILE_PATH"
+lockfile -r 0 ghc.lock
+if [ $? -eq 0 ]
+then
+    /usr/local/bin/ghc \
+        -XForeignFunctionInterface -XTemplateHaskell \
+        -Werror -fwarn-incomplete-patterns -fwarn-dodgy-imports -fwarn-dodgy-exports -fwarn-unused-binds -fwarn-hi-shadowing -fwarn-identities -fwarn-monomorphism-restriction \
+        -framework Foundation $IMPORTS \
+        -c -O -threaded --make \
+        "$@" \
+        "$INPUT_FILE_PATH"
+
+    rm -f ghc.lock
+fi