added appropriate pragmas to top of spec files

rapha · Apr 30, 2011 · 62db410 · 62db410
1 parent 83da7af
commit 62db410
Show file tree

Hide file tree

Showing 3 changed files with 21 additions and 1 deletion.
diff --git a/Makefile b/Makefile
@@ -13,7 +13,7 @@ game.cmxa: src/piece.cmx src/row.cmx src/col.cmx src/columns.cmx src/line.cmx sr
 	$(OCAMLOPT) -a -package batteries src/piece.cmx src/row.cmx src/col.cmx src/columns.cmx src/line.cmx src/lines.cmx src/board.cmx src/player.cmx src/ai.cmx src/game.cmx -o game.cmxa
 
 spec: game.cma spec/*.ml
-	ospecl -I src spec/*.ml
+	ospecl -I src -color spec/*.ml
 
 tui.byte: game.cma src/tui.ml
 	$(OCAMLC) -thread -linkpkg game.cma src/tui.ml -o tui.byte

diff --git a/spec/columns_spec.ml b/spec/columns_spec.ml
@@ -1,6 +1,17 @@
+#use "topfind"
+
+#require "unix"
+#require "ospecl"
 open Ospecl.Spec
 open Ospecl.Matchers
 
+#require "batteries"
+open Batteries_uni
+
+#load "col.cmo"
+#load "row.cmo"
+#load "columns.cmo"
+
 let specs = [
   describe "Columns" [
     describe ".append" begin

diff --git a/spec/line_spec.ml b/spec/line_spec.ml
@@ -1,6 +1,15 @@
+#use "topfind"
+
+#require "unix"
+#require "ospecl"
 open Ospecl.Spec
 open Ospecl.Matchers
 
+#require "batteries"
+open Batteries_uni
+
+#load "line.cmo"
+
 let specs = [
   describe "Line" [
     describe ".include cell" [