core, basis, extra: Remove DOS line endings from files.

[factor.git] / basis / interval-maps / interval-maps-tests.factor

diff --git a/basis/interval-maps/interval-maps-tests.factor b/basis/interval-maps/interval-maps-tests.factor
index 5a4b508939888c70df183010ed7e019065262ae7..19c6b64571a961f2ab226ceae69d45d0fde70d62 100644 (file)
--- a/basis/interval-maps/interval-maps-tests.factor
+++ b/basis/interval-maps/interval-maps-tests.factor
@@ -1,18 +1,18 @@
-USING: kernel namespaces interval-maps tools.test ;\r
-IN: interval-maps.test\r
-\r
-SYMBOL: test\r
-\r
-[ ] [ { { { 4 8 } 3 } { 1 2 } } <interval-map> test set ] unit-test\r
-[ 3 ] [ 5 test get interval-at ] unit-test\r
-[ 3 ] [ 8 test get interval-at ] unit-test\r
-[ 3 ] [ 4 test get interval-at ] unit-test\r
-[ f ] [ 9 test get interval-at ] unit-test\r
-[ 2 ] [ 1 test get interval-at ] unit-test\r
-[ f ] [ 2 test get interval-at ] unit-test\r
-[ f ] [ 0 test get interval-at ] unit-test\r
-\r
-[ { { { 1 4 } 3 } { { 4 8 } 6 } } <interval-map> ] must-fail\r
-\r
-[ { { { 1 3 } 2 } { { 4 5 } 4 } { { 7 8 } 4 } } ]\r
-[ { { 1 2 } { 2 2 } { 3 2 } { 4 4 } { 5 4 } { 7 4 } { 8 4 } } coalesce ] unit-test\r
+USING: kernel namespaces interval-maps tools.test ;
+IN: interval-maps.test
+
+SYMBOL: test
+
+[ ] [ { { { 4 8 } 3 } { 1 2 } } <interval-map> test set ] unit-test
+[ 3 ] [ 5 test get interval-at ] unit-test
+[ 3 ] [ 8 test get interval-at ] unit-test
+[ 3 ] [ 4 test get interval-at ] unit-test
+[ f ] [ 9 test get interval-at ] unit-test
+[ 2 ] [ 1 test get interval-at ] unit-test
+[ f ] [ 2 test get interval-at ] unit-test
+[ f ] [ 0 test get interval-at ] unit-test
+
+[ { { { 1 4 } 3 } { { 4 8 } 6 } } <interval-map> ] must-fail
+
+[ { { { 1 3 } 2 } { { 4 5 } 4 } { { 7 8 } 4 } } ]
+[ { { 1 2 } { 2 2 } { 3 2 } { 4 4 } { 5 4 } { 7 4 } { 8 4 } } coalesce ] unit-test