Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Scripts for typechecking examples and tests

  • Loading branch information...
commit bbda0d289168d57eab279aa8b67eb3770f0211ae 1 parent 229494a
@bergmark bergmark authored
View
4 examples/calc.hs
@@ -5,7 +5,7 @@
--
{-# OPTIONS -fno-warn-orphans -fno-warn-type-defaults -fno-warn-unused-do-bind #-}
-{-# LANGUAGE EmptyDataDecls #-}
+{-# LANGUAGE EmptyDataDecls #-}
module Calc (main) where
@@ -105,8 +105,6 @@ onClick = ffi "%2['click'](%1)"
--------------------------------------------------------------------------------
-- Utilities
-instance (Foreign a) => Foreign (Maybe a)
-
parseDouble :: Int -> String -> Double
parseDouble = ffi "parseFloat(%2,%1) || 0"
View
6 scripts/typecheck-examples
@@ -0,0 +1,6 @@
+#!/bin/bash
+
+for i in `ls examples/*.hs`; do
+ echo $i;
+ ghc -package fay -XNoImplicitPrelude -fno-code $i
+done
View
6 scripts/typecheck-tests
@@ -0,0 +1,6 @@
+#!/bin/bash
+
+for i in `ls tests/*.hs`; do
+ echo $i;
+ ghc -package fay -XNoImplicitPrelude -fno-code -itests $i
+done
Please sign in to comment.
Something went wrong with that request. Please try again.