sbool codeWithHintsToFunctionOnString_verbose;

static <A> F1<S, A> codeWithHintsToFunctionOnString(S code) {

  ret codeWithHintsToFunctionOnString(code, "");

}

static <A> F1<S, A> codeWithHintsToFunctionOnString(S code, S hints) {

  code = trim(code);

  Class c;

  S methodName;

  if (isIdentifier(code)) { // name of standard function

    c = loadFunctions_cached_withInit(code);

    methodName = code;

  } else if (jcontains(code, "calc(")) { // code defines its own calc function

    c = veryQuickJava(code);

    methodName = 'calc;

  } else { // code is an expression or block working on variable s

    S main = "sO calc(fS s) {\n" + tok_addReturn(code) + "\n}";

    if (codeWithHintsToFunctionOnString_verbose) print(main);

    c = veryQuickJava(main);

    if (codeWithHintsToFunctionOnString_verbose) print(c);

    methodName = 'calc;

  }

  final Method m = findMethod_precise(c, methodName, "");

  if (m == null) fail("Not a method on a string: " + code);

  ret func(S s) -> A { (A) invokeMethod(m, null, s) };

}