From 2205c499756469cb7d7100d7de3d38445794a78c Mon Sep 17 00:00:00 2001 From: Randy Kunkee Date: Wed, 22 Dec 1999 18:29:34 +0000 Subject: [PATCH] Add missing 2nd arg (NULL) in call to Tcl_GetStringFromObj in experimental trap code. --- contrib/ldaptcl/neoXldap.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/ldaptcl/neoXldap.c b/contrib/ldaptcl/neoXldap.c index 5d36668895..b91e6a450b 100644 --- a/contrib/ldaptcl/neoXldap.c +++ b/contrib/ldaptcl/neoXldap.c @@ -1075,11 +1075,11 @@ NeoX_LdapTargetObjCmd (clientData, interp, objc, objv) return TCL_ERROR; if (l == 0) return TCL_OK; /* empty code list */ - ldaptcl->traplist = malloc(sizeof(int) * (l + 1)); + ldaptcl->traplist = (int*)malloc(sizeof(int) * (l + 1)); ldaptcl->traplist[l] = 0; for (i = 0; i < l; i++) { Tcl_ListObjIndex(interp, objv[3], i, &resultObj); - code = LDAP_ErrorStringToCode(interp, Tcl_GetStringFromObj(resultObj)); + code = LDAP_ErrorStringToCode(interp, Tcl_GetStringFromObj(resultObj, NULL)); if (code == -1) { free(ldaptcl->traplist); ldaptcl->traplist = NULL; -- 2.39.5