diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-15 11:15:28 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-05-15 11:15:28 (GMT) |
commit | 062f4d052949b2cd7d7a912c8c4980913a8d6f5b (patch) | |
tree | 04874afa5b0cc2299b475bceac006f2cb4699448 /unix/dltest | |
parent | 284a5014870e629b05bfa74cc12a432b8d45fa1d (diff) | |
download | tcl-062f4d052949b2cd7d7a912c8c4980913a8d6f5b.zip tcl-062f4d052949b2cd7d7a912c8c4980913a8d6f5b.tar.gz tcl-062f4d052949b2cd7d7a912c8c4980913a8d6f5b.tar.bz2 |
ckalloc -> attemptckalloc (since return-value is checked). Fix bug in unix/dltest/pkgooa.c, where last NULL-argument was missing
Diffstat (limited to 'unix/dltest')
-rw-r--r-- | unix/dltest/pkgooa.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/dltest/pkgooa.c b/unix/dltest/pkgooa.c index 06ff3ac..d731e48 100644 --- a/unix/dltest/pkgooa.c +++ b/unix/dltest/pkgooa.c @@ -110,18 +110,18 @@ Pkgooa_Init( } if (tclStubsPtr == NULL) { Tcl_AppendResult(interp, "Tcl stubs are not initialized, " - "did you compile using -DUSE_TCL_STUBS? "); + "did you compile using -DUSE_TCL_STUBS? ", NULL); return TCL_ERROR; } if (Tcl_OOInitStubs(interp) == NULL) { return TCL_ERROR; } if (tclOOStubsPtr == NULL) { - Tcl_AppendResult(interp, "TclOO stubs are not initialized"); + Tcl_AppendResult(interp, "TclOO stubs are not initialized", NULL); return TCL_ERROR; } if (tclOOIntStubsPtr == NULL) { - Tcl_AppendResult(interp, "TclOO internal stubs are not initialized"); + Tcl_AppendResult(interp, "TclOO internal stubs are not initialized", NULL); return TCL_ERROR; } |