public static Cons cppTranslateSysPointerToFunction(Cons tree) {
    { String functionname = Symbol.cppTranslateName(((Symbol)(tree.rest.value))).wrapperValue;
      Cons otree = null;

      if (tree.rest.rest.value == Stella.SYM_STELLA_TRUE) {
        functionname = functionname + "_setter";
      }
      otree = Cons.list$(Cons.cons(Stella.SYM_STELLA_CPP_FUNCTION_POINTER, Cons.cons(StringWrapper.wrapString(functionname), Cons.cons(Stella.NIL, Stella.NIL))));
      return (otree);
    }
  }