Changeset f460b18 in tol for toltcl/generic/toltcl.c

Timestamp:

May 13, 2011, 10:10:18 AM (15 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

87ff241

Parents:

9c64d34

Message:

Refs #1197

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

File:

• toltcl/generic/toltcl.c (modified) (2 diffs)

toltcl/generic/toltcl.c

@@ -221 +221 @@
    */
 
-  InitTolKernel(lang, vmode&&vmode[0]?vmode:NULL);
+  InitTolKernel(Tcl_GetNameOfExecutable(), lang, vmode&&vmode[0]?vmode:NULL);
 
   /*
@@ -322 +322 @@
     return TCL_ERROR;
   }
-  LoadInitLibrary(Tcl_GetNameOfExecutable());
+  LoadInitLibrary();
   return TCL_OK;
 }