diff options
| author | das <das> | 2007-08-14 06:32:55 (GMT) |
|---|---|---|
| committer | das <das> | 2007-08-14 06:32:55 (GMT) |
| commit | 1d3c3ca5bc5a27b8810c6653a5cdafd895a64c0b (patch) | |
| tree | 85b24d056d0a9723d0d81dde23cd24241372e6b9 /unix/dltest/pkgb.c | |
| parent | a789ab33c1944041459d117c719d57c44582b717 (diff) | |
| download | tcl-1d3c3ca5bc5a27b8810c6653a5cdafd895a64c0b.zip tcl-1d3c3ca5bc5a27b8810c6653a5cdafd895a64c0b.tar.gz tcl-1d3c3ca5bc5a27b8810c6653a5cdafd895a64c0b.tar.bz2 | |
* unix/dltest/pkga.c: whitespace & comment cleanup, remove
* unix/dltest/pkgb.c: unused pkgf.c.
* unix/dltest/pkgc.c:
* unix/dltest/pkge.c:
* unix/dltest/pkgf.c (removed):
* unix/dltest/pkgua.c:
* macosx/Tcl.xcodeproj/project.pbxproj:
Diffstat (limited to 'unix/dltest/pkgb.c')
| -rw-r--r-- | unix/dltest/pkgb.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/unix/dltest/pkgb.c b/unix/dltest/pkgb.c index 1a60f05..35907ff 100644 --- a/unix/dltest/pkgb.c +++ b/unix/dltest/pkgb.c @@ -10,8 +10,9 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: pkgb.c,v 1.7 2007/05/29 14:05:53 dgp Exp $ + * RCS: @(#) $Id: pkgb.c,v 1.8 2007/08/14 06:32:55 das Exp $ */ + #include "tcl.h" /* @@ -51,11 +52,11 @@ Pkgb_SubObjCmd( if (objc != 3) { Tcl_WrongNumArgs(interp, 1, objv, "num num"); - return TCL_ERROR; + return TCL_ERROR; } if ((Tcl_GetIntFromObj(interp, objv[1], &first) != TCL_OK) || (Tcl_GetIntFromObj(interp, objv[2], &second) != TCL_OK)) { - return TCL_ERROR; + return TCL_ERROR; } Tcl_SetObjResult(interp, Tcl_NewIntObj(first - second)); return TCL_OK; @@ -133,7 +134,7 @@ Pkgb_Init( * Pkgb_SafeInit -- * * This is a package initialization procedure, which is called by Tcl - * when this package is to be added to an unsafe interpreter. + * when this package is to be added to a safe interpreter. * * Results: * None. |