diff --git a/src/org/rascalmpl/library/util/Validator.rsc b/src/org/rascalmpl/library/util/Validator.rsc index 616b25909f0..5ab797d5d3e 100644 --- a/src/org/rascalmpl/library/util/Validator.rsc +++ b/src/org/rascalmpl/library/util/Validator.rsc @@ -40,7 +40,7 @@ private data RuntimeException = none(); // there may be several constructors with this name; we try them all, backtracking over already validated sub-values: for (/\cons(label(str otherName:name, def), list[Symbol] symbols, list[Symbol] kwTypes, set[Attr] _) := grammar[def]?[] // if the constructors with the right name are exhausted, we try the others (in relaxed mode) - || := ) { + || := ) { children = getChildren(v); params = getKeywordParameters(v); diff --git a/src/org/rascalmpl/library/vis/Text.rsc b/src/org/rascalmpl/library/vis/Text.rsc index 083c57b9d28..566a229c92d 100644 --- a/src/org/rascalmpl/library/vis/Text.rsc +++ b/src/org/rascalmpl/library/vis/Text.rsc @@ -50,7 +50,7 @@ str prettyTree(Tree t, bool src=false, bool characters=true, bool \layout=false, str nodeLabel(loc src) = ""; default str nodeLabel(Tree v) = ""; - lrel[str,value] edges(Tree t:appl(_, list[Tree] args)) = [<"src", t.src> | src, t.src?] + [<"", k> | Tree k <- args, include(k)]; + lrel[str,value] edges(Tree t:appl(_, list[Tree] args)) = [<"src", t@\loc> | src, t@\loc?] + [<"", k> | Tree k <- args, include(k)]; lrel[str,value] edges(amb(set[Tree] alts)) = [<"", a> | Tree a <- alts]; lrel[str,value] edges(loc _) = []; default lrel[str,value] edges(Tree _) = [];