]> gitweb.factorcode.org Git - factor.git/commitdiff
io.pathnames: add missing linux branch in test
authormasweeney <mark-sweeney@outlook.com>
Tue, 23 Aug 2016 16:25:24 +0000 (12:25 -0400)
committerJohn Benediktsson <mrjbq7@gmail.com>
Tue, 17 Nov 2020 18:33:30 +0000 (10:33 -0800)
core/io/pathnames/pathnames-tests.factor

index 3a3989043fd327f9fe02d0f492ef5492028afcda..c1f6bff23e55ec7630868164dc4759dd0e6248e6 100644 (file)
@@ -107,14 +107,28 @@ os windows?
 ] with-test-file
 
 ! aum's bug
-H{
-    { current-directory "." }
-    { "resource-path" ".." }
-} [
-    [ "..\\core\\bootstrap\\stage2.factor" ]
-    [ "resource:core\\bootstrap\\stage2.factor" absolute-path ]
-    unit-test
-] with-variables
+os windows?
+    [
+        H{
+            { current-directory "." }
+            { "resource-path" ".." }
+        } [
+            [ "..\\core\\bootstrap\\stage2.factor" ]
+            [ "resource:core\\bootstrap\\stage2.factor" absolute-path ]
+            unit-test
+        ] with-variables
+    ]
+    [
+        H{
+            { current-directory "." }
+            { "resource-path" ".." }
+        } [
+            [ "../core/bootstrap/stage2.factor" ]
+            [ "resource:core/bootstrap/stage2.factor" absolute-path ]
+            unit-test
+        ] with-variables
+    ]
+if
 
 { t } [ cwd "misc" resource-path [ ] with-directory cwd = ] unit-test