added test for visit not removing keyword field .src

usethesource · Sep 2, 2020 · b44a55a · b44a55a
1 parent a0b0774
commit b44a55a
Showing 1 changed file with 18 additions and 0 deletions.
diff --git a/src/org/rascalmpl/library/lang/rascal/tests/concrete/Locations.rsc b/src/org/rascalmpl/library/lang/rascal/tests/concrete/Locations.rsc
@@ -15,4 +15,22 @@ test bool concreteExpressionsHaveSourceLocationsLegacy1()
 
 test bool concreteExpressionsHaveSourceLocationsLegacy2() 
   = (A) `a`@\loc.length == 1;  
+
+test bool concreteExpressionsHaveSourceLocationsAfterVisitWithMatch()  {
+   assert /int _ := (A) `a`;
+   
+   t = visit((A) `a`) { 
+     case int i => i + 1 
+   }
+
+   return t@\loc?;   
+}  
+
+test bool concreteExpressionsHaveSourceLocationsAfterVisitWithNoMatch()  {
+   t = visit((A) `a`) { 
+     case 1239461234912634 => 123498761234896123 
+   }
+
+   return t@\loc?;   
+}