Differences From Artifact [b234b5a5e4]:

• File generic/tclLoad.c — part of check-in [0979177469] at 2008-05-30 22:54:27 on branch trunk — Small clarifications that code a bit nicer to read. (user: dkf size: 32560)

To Artifact [168750046e]:

• File generic/tclLoad.c — part of check-in [3120107af3] at 2010-11-18 15:08:26 on branch activestate-nre-excised-variant-1-roll-forward — Next. (user: andreask size: 32563)

545
546
547
548
549
550
551
552
553
554
555
556
557
558
559

	    i++;
	    goto endOfForLoop;
	}
    }
  endOfForLoop:
    if ((objc-i < 1) || (objc-i > 3)) {
	Tcl_WrongNumArgs(interp, 1, objv,
		"?switches? fileName ?packageName? ?interp?");
	return TCL_ERROR;
    }
    if (Tcl_FSConvertToPathType(interp, objv[i]) != TCL_OK) {
	return TCL_ERROR;
    }

    fullFileName = Tcl_GetString(objv[i]);

|

545
546
547
548
549
550
551
552
553
554
555
556
557
558
559

	    i++;
	    goto endOfForLoop;
	}
    }
  endOfForLoop:
    if ((objc-i < 1) || (objc-i > 3)) {
	Tcl_WrongNumArgs(interp, 1, objv,
		"?-switch ...? fileName ?packageName? ?interp?");
	return TCL_ERROR;
    }
    if (Tcl_FSConvertToPathType(interp, objv[i]) != TCL_OK) {
	return TCL_ERROR;
    }

    fullFileName = Tcl_GetString(objv[i]);