scope gazelle_addHelperTablesToRules.

sclass #Massager {
  LL<S> helperTable;
  Map<S, Pair<Int>> helperIndex;
 
  *() {}
  *(LL<S> *helperTable, Map<S, Pair<Int>> *helperIndex) {}
  
  SS get(SS map, LS tokC, LS tokI, RuleEngine2_MatchedRule matched) {
    if (map == null) null;
    //print("Massaging: " + map + " " + sfu(tokC) + " / " + sfu(tokI));
    for (S t : codeTokens(matched.tokenize(matched.rule.out))) {
      //print("Checking: " + t);
      if (map.containsKey(t)) continue;
      Pair<Int> idx = helperIndex.get(t);
      if (idx == null) continue;
      //print("Found: " + t);
      for (S key, val : cloneMap(map)) {
        int idx2 = indexOfIC(helperTable.get(idx.a), key);
        if (idx2 < 0) continue;
        Pair<Int> idxVal = helperIndex.get(val);
        if (idxVal == null) continue;
        S out = _get(_get(helperTable, idxVal.a), idx.b);
        print("Massaged: " + t + " <-> " + key + " => " + out);
        mapPut(map, t, out);
      }
    }
    ret map;
  }
}

svoid gazelle_addHelperTablesToRules(RuleEngine2 engine) {
  new Matches m;
  for (final RuleEngine2.Rule r : engine.rules) {
    continue unless matchAny("use helper table mech list *", r.comments, m);
    LS entries = mL($1);
    continue if empty(entries);
    
    final LL<S> helperTable = map tok_splitAtCommaOrDoubleArrow(entries);
    final Map<S, Pair<Int>> helperIndex = indexTwoDArrayIC(helperTable);
  
    r.addMapMassager(new Massager(helperTable, helperIndex));
  }
}

end scope