Skip to content

Commit

Permalink
coevolve with Rascal & Rascalware (not yet complete)
Browse files Browse the repository at this point in the history
  • Loading branch information
grammarware committed Jan 10, 2013
1 parent e57300b commit 3f372cf
Showing 1 changed file with 5 additions and 9 deletions.
14 changes: 5 additions & 9 deletions shared/rascal/src/transform/NegotiatedXBGF.rsc
@@ -1,15 +1,11 @@
@contributor{Vadim Zaytsev - vadim@grammarware.net - SWAT, CWI}
module transform::NegotiatedXBGF

import lib::Rascalware;
import IO;
import syntax::BGF;
import syntax::XBGF;
//import diff::GDT;
import List;
import String;
import Integer;
import normal::BGF;
import transform::library::Core;
import transform::library::Util;
import transform::XBGF;

Expand Down Expand Up @@ -142,7 +138,7 @@ Advice adviseUsedNonterminal(str x, set[str] nts)
int minl = 9000;
str mins = "";
good = {z | z <- nts, levenshtein(z,x) == min([levenshtein(s,x) | s <- nts])};
if (good == {})
if (isEmpty(good))
return noadvice();
else
return setadvice("Did you mean",good);
Expand All @@ -164,11 +160,11 @@ Advice adviseFreshNonterminal(str x, set[str] nts)
adv += s;
// expr -> shjk
s = "";
for (c <- [stringChar(charAt(x,i)) | i <- [0..size(x)-1]])
for (c <- [stringChar(charAt(x,i)) | i <- [0..len(x)-1]])
if (c in low)
s += low[arbInt(size(low))];
s += low[arbInt(len(low))];
elseif (c in upp)
s += upp[arbInt(size(upp))];
s += upp[arbInt(len(upp))];
else
s += stringChar(c);
adv += s;
Expand Down

0 comments on commit 3f372cf

Please sign in to comment.