Tcl Source Code

Artifact [90d630a419]
Login

Artifact 90d630a4194b7695b984c00a134a242a6a8a587c:

Attachment "unbalanced.patch" to ticket [501101ffff] added by dgp 2002-01-09 07:02:05.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/tcl/tcl/ChangeLog,v
retrieving revision 1.781
diff -u -u -r1.781 ChangeLog
--- ChangeLog	2002/01/07 23:09:12	1.781
+++ ChangeLog	2002/01/08 23:59:51
@@ -1,3 +1,7 @@
+2002-01-08  Don Porter <[email protected]>
+
+	* unix/tclLoadDld.c (TclpLoadFile):  syntax error: unbalanced parens.
+
 2002-01-07  Don Porter <[email protected]>
 
 	* generic/tclEvent.c (TclInExit):
Index: unix/tclLoadDld.c
===================================================================
RCS file: /cvsroot/tcl/tcl/unix/tclLoadDld.c,v
retrieving revision 1.6
diff -u -u -r1.6 tclLoadDld.c
--- unix/tclLoadDld.c	2001/09/28 01:21:53	1.6
+++ unix/tclLoadDld.c	2002/01/08 23:59:52
@@ -93,7 +93,7 @@
 	firstTime = 0;
     }
 
-    if ((returnCode = dld_link(Tcl_GetString(pathPtr)) != 0) {
+    if ((returnCode = dld_link(Tcl_GetString(pathPtr))) != 0) {
 	Tcl_AppendResult(interp, "couldn't load file \"", 
 			 Tcl_GetString(pathPtr),
 			 "\": ", dld_strerror(returnCode), (char *) NULL);