Tcl Library Source Code

Check-in [71d074f491]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Tweaked the last change a bit to follow coding guidelines.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 71d074f491fa48a69403ee10206871825bf72eaa
User & Date: andreask 2014-01-29 19:23:33.779
Context
2014-01-29
19:29
Ticket [f58015fbd0]: ftp - DisplayMsg - Removed bogus use of ::errorInfo. Simplified the code a bit. check-in: 3b14767f50 user: andreask tags: trunk
19:23
Tweaked the last change a bit to follow coding guidelines. check-in: 71d074f491 user: andreask tags: trunk
2014-01-26
16:32
silence gcc error, "should return a value [-Wreturn-type]" check-in: c1b3934ac2 user: pooryorick tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to modules/struct/graph/filter.c.
1059
1060
1061
1062
1063
1064
1065
1066


1067
1068
1069
1070
1071
1072
1073
    int       i;

    if (Tcl_ListObjGetElements (interp, cmd, &cmdc, &cmdv) != TCL_OK) {
	return TCL_ERROR;
    }

    /* Skip the step if there is nothing which can be filtered.  */
    if (l->c == 0) return TCL_OK;



    /* -------------------- */
    /* Set up the command vector for the callback. Two placeholders for graph
     * and node/arc arguments.
     */

    ec = cmdc + 2;







|
>
>







1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
    int       i;

    if (Tcl_ListObjGetElements (interp, cmd, &cmdc, &cmdv) != TCL_OK) {
	return TCL_ERROR;
    }

    /* Skip the step if there is nothing which can be filtered.  */
    if (l->c == 0) {
	return TCL_OK;
    }

    /* -------------------- */
    /* Set up the command vector for the callback. Two placeholders for graph
     * and node/arc arguments.
     */

    ec = cmdc + 2;