Changeset 248b844 in tol


Ignore:
Timestamp:
Jan 19, 2011, 3:53:41 PM (16 years ago)
Author:
Víctor de Buen <vdebuen@…>
Branches:
1941-docker-image-to-test, devel, master
Children:
697580c
Parents:
41bd293
Message:

I don't understand these fucntions
Recovering old message

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@3076 be4846ae-f051-483a-831f-b64e7d08527f

File:
1 edited

Legend:

Unmodified
Added
Removed

  • tol/btol/set_type/setgra.cpp

    r41bd293 r248b844  
    27212721  BSyntaxObject * so;
    27222722  BInt status = 0;
    2723   BText str_result_ = BText("[Tcl_Eval] Unimplemented method in script=\n")+script+"\n";
    2724   const char* str_result = str_result_.Buffer();
     2723  const char * str_result = "Unimplemented";
    27252724 
    27262725  if (tcl_evaluator)
    … …  
    27292728  result = Cons(so = new BContensDat("", status), result);
    27302729  so->PutName("status");
    2731   result = Cons(so = new BContensText("", str_result_), result);
     2730  result = Cons(so = new BContensText("", str_result), result);
    27322731  so->PutName("result");
    27332732  contens_.RobElement(result);
    … …  
    27642763  BSyntaxObject * so;
    27652764  BInt status = 0;
    2766   BText str_result_ = BText("[Tcl_EvalEx] Unimplemented method in cmd=\n")+cmd.Dump()+"\n";
    2767   const char* str_result = str_result_.Buffer();
     2765  const char *str_result = "Unimplemented";
    27682766 
    27692767  if (tcl_evaluatorEx)
    … …  
    27722770  result = Cons(so = new BContensDat("", status), result);
    27732771  so->PutName("status");
    2774   result = Cons(so = new BContensText("", str_result_), result);
     2772  result = Cons(so = new BContensText("", str_result), result);
    27752773  so->PutName("result");
    27762774  contens_.RobElement(result);
Note: See TracChangeset for help on using the changeset viewer.