[101982] trunk/base/src/pextlib1.0/uid.c
jeremyhu at macports.org
jeremyhu at macports.org
Wed Jan 23 13:10:22 PST 2013
Revision: 101982
https://trac.macports.org/changeset/101982
Author: jeremyhu at macports.org
Date: 2013-01-23 13:10:22 -0800 (Wed, 23 Jan 2013)
Log Message:
-----------
Silence warning when building in C90 mode
Modified Paths:
--------------
trunk/base/src/pextlib1.0/uid.c
Modified: trunk/base/src/pextlib1.0/uid.c
===================================================================
--- trunk/base/src/pextlib1.0/uid.c 2013-01-23 20:33:27 UTC (rev 101981)
+++ trunk/base/src/pextlib1.0/uid.c 2013-01-23 21:10:22 UTC (rev 101982)
@@ -110,8 +110,7 @@
if (0 != setuid(uid)) {
char buffer[128];
snprintf(buffer, sizeof(buffer), "could not set uid to %ld: %d %s", uid, errno, strerror(errno));
- Tcl_Obj *result = Tcl_NewStringObj(buffer, -1);
- Tcl_SetObjResult(interp, result);
+ Tcl_SetObjResult(interp, Tcl_NewStringObj(buffer, -1));
return TCL_ERROR;
}
@@ -141,8 +140,7 @@
if (0 != seteuid(uid)) {
char buffer[128];
snprintf(buffer, sizeof(buffer), "could not set effective uid to %ld: %d %s", uid, errno, strerror(errno));
- Tcl_Obj *result = Tcl_NewStringObj(buffer, -1);
- Tcl_SetObjResult(interp, result);
+ Tcl_SetObjResult(interp, Tcl_NewStringObj(buffer, -1));
return TCL_ERROR;
}
@@ -168,8 +166,7 @@
if (0 != setgid(gid)) {
char buffer[128];
snprintf(buffer, sizeof(buffer), "could not set gid to %ld: %d %s", gid, errno, strerror(errno));
- Tcl_Obj *result = Tcl_NewStringObj(buffer, -1);
- Tcl_SetObjResult(interp, result);
+ Tcl_SetObjResult(interp, Tcl_NewStringObj(buffer, -1));
return TCL_ERROR;
}
@@ -195,8 +192,7 @@
if (0 != setegid(gid)) {
char buffer[128];
snprintf(buffer, sizeof(buffer), "could not set effective gid to %ld: %d %s", gid, errno, strerror(errno));
- Tcl_Obj *result = Tcl_NewStringObj(buffer, -1);
- Tcl_SetObjResult(interp, result);
+ Tcl_SetObjResult(interp, Tcl_NewStringObj(buffer, -1));
return TCL_ERROR;
}
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20130123/c1e5250d/attachment.html>
More information about the macports-changes
mailing list