diff --git a/extra/euler/b-rep/io/obj/obj-tests.factor b/extra/euler/b-rep/io/obj/obj-tests.factor
index 3f2f8edae9..a4ca2d0a61 100644
--- a/extra/euler/b-rep/io/obj/obj-tests.factor
+++ b/extra/euler/b-rep/io/obj/obj-tests.factor
@@ -4,7 +4,7 @@ io.streams.string literals math.vectors.simd.cords tools.test ;
 IN: euler.b-rep.io.obj.tests
 
 CONSTANT: valid-cube-obj
-"""v -1.0 -1.0 -1.0
+"v -1.0 -1.0 -1.0
 v -1.0 1.0 -1.0
 v 1.0 -1.0 -1.0
 v 1.0 1.0 -1.0
@@ -18,10 +18,10 @@ f 7 8 6 5
 f 3 4 8 7
 f 2 6 8 4
 f 5 1 3 7
-"""
+"
 
 CONSTANT: valid-cube-obj-relative-indices
-"""v -1.0 -1.0 -1.0
+"v -1.0 -1.0 -1.0
 v -1.0 1.0 -1.0
 v 1.0 -1.0 -1.0
 v 1.0 1.0 -1.0
@@ -35,10 +35,10 @@ f 7 8 6 5
 f 3 4 8 7
 f 2 6 8 4
 f 5 1 3 7
-"""
+"
 
 CONSTANT: valid-cube-obj-texcoords
-"""# comment should be ignored
+"# comment should be ignored
 v -1.0 -1.0 -1.0
 v -1.0 1.0 -1.0
 v 1.0 -1.0 -1.0
@@ -57,7 +57,7 @@ f 7/3 8/4 6/2 5/1
 f 3/3 4/4 8/4 7/3
 f 2/2 6/2 8/4 4/4
 f 5/1 1/1 3/3 7/3
-"""
+"
 
 { $ valid-cube-obj } [ [ valid-cube-b-rep write-obj ] with-string-writer ] unit-test