diff --git a/shf-tests.mlb b/shf-tests.mlb index 82ef7eb..d346a04 100644 --- a/shf-tests.mlb +++ b/shf-tests.mlb @@ -66,10 +66,11 @@ $(SML_LIB)/basis/mlton.mlb shell/exception-logger.sml test/Railroad/src/railroad.mlb +test/persistent-vector-tests.sml test/regex-tests.sml test/test-utils.sml -test/normal-move.sml -test/normal-delete.sml -test/normal-yank.sml -test/regression.sml +test/normal-move-tests.sml +test/normal-delete-tests.sml +test/normal-yank-tests.sml +test/regression-tests.sml test/test.sml diff --git a/test/normal-delete.sml b/test/normal-delete-tests.sml similarity index 99% rename from test/normal-delete.sml rename to test/normal-delete-tests.sml index a85689c..4dea247 100644 --- a/test/normal-delete.sml +++ b/test/normal-delete-tests.sml @@ -1,4 +1,4 @@ -structure NormalDelete = +structure NormalDeleteTests = struct open Railroad open Railroad.Test diff --git a/test/normal-move.sml b/test/normal-move-tests.sml similarity index 99% rename from test/normal-move.sml rename to test/normal-move-tests.sml index 1d203b7..52d5e3b 100644 --- a/test/normal-move.sml +++ b/test/normal-move-tests.sml @@ -1,4 +1,4 @@ -structure NormalMove = +structure NormalMoveTests = struct open Railroad open Railroad.Test diff --git a/test/normal-yank.sml b/test/normal-yank-tests.sml similarity index 99% rename from test/normal-yank.sml rename to test/normal-yank-tests.sml index 3d17f71..78d4661 100644 --- a/test/normal-yank.sml +++ b/test/normal-yank-tests.sml @@ -1,4 +1,4 @@ -structure NormalYank = +structure NormalYankTests = struct open Railroad open Railroad.Test diff --git a/test/persistent-vector-tests.sml b/test/persistent-vector-tests.sml new file mode 100644 index 0000000..28cb18b --- /dev/null +++ b/test/persistent-vector-tests.sml @@ -0,0 +1 @@ +structure PersistentVectorTests = struct val tests = [] end diff --git a/test/regression.sml b/test/regression-tests.sml similarity index 98% rename from test/regression.sml rename to test/regression-tests.sml index d3c4c79..823ad3c 100644 --- a/test/regression.sml +++ b/test/regression-tests.sml @@ -1,4 +1,4 @@ -structure Regression = +structure RegressionTests = struct open Railroad open Railroad.Test diff --git a/test/test.sml b/test/test.sml index e4992ba..bf93e53 100644 --- a/test/test.sml +++ b/test/test.sml @@ -6,10 +6,11 @@ struct fun main () = let val tests = List.concat - [ NormalMove.tests - , NormalDelete.tests - , NormalYank.tests - , Regression.tests + [ NormalMoveTests.tests + , NormalDeleteTests.tests + , NormalYankTests.tests + , PersistentVectorTests.tests + , RegressionTests.tests , RegexTests.tests ] val tests = concat tests