sclass ClassesAndPatterns {
  new LPair<Class, S> entries;

  *(L<Class> classes, Class outerClass) {
    entries = map(classes,
      c -> pair(c, dollarsToStarsAndSplitCamelCase(classNameRelativeTo(c, outerClass)));
  }

  O parse(S s, IF1<S, O> parseArg) {  
    fOr (Pair<Class, S> p : entries)
      if (match3_plusBrackets_uncurly(p.b, s, m))
        ret nuObject(p.a, mapToObjectArray(parseArg, m.m));
    null;
  }
}