public static Cons clTranslateHandleExceptionTree(Cons tree) {
    { Symbol var = ((Symbol)(((Cons)(tree.rest.value)).value));
      StandardObject type = ((StandardObject)(((Cons)(tree.rest.value)).rest.value));

      tree.value = Stella_Class.clTranslateClassName(Surrogate.typeToClass(StandardObject.typeSpecToBaseType(type)));
      if (var != null) {
        tree.secondSetter(Cons.cons(Symbol.clTranslateLocalSymbol(var), Stella.NIL));
      }
      else {
        tree.secondSetter(Stella.NIL);
      }
      tree.rest.rest = Cons.clTranslateListOfTrees(tree.rest.rest);
      return (tree);
    }
  }