added WD test

usethesource · Apr 2, 2024 · 7f2d63b · 7f2d63b
1 parent 33fd54a
commit 7f2d63b
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/src/org/rascalmpl/library/lang/box/util/Box2Text.rsc b/src/org/rascalmpl/library/lang/box/util/Box2Text.rsc
@@ -515,3 +515,14 @@ test bool simpleAlignedTableDifferentAlignment()
        '777 888 999
        '";
 
+test bool WDtest() {
+    L1 = H([L("aap")]           , hs=0);
+    L2 = H([WD([L1]), L("noot")], hs=0);
+    L3 = H([WD([L2]), L("mies")], hs=0);
+
+    return format(V([L1, L2, L3]))
+        == "aap
+           '   noot
+           '       mies
+           '";
+}