Check-in [ce6b692ea9]
Not logged in
Tcl 2015 Conference, Manassas/VA, US, Oct 19-23
Send your abstracts to tclconference@googlegroups.com by Aug 24.

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

Overview
SHA1 Hash:ce6b692ea9c10591a092c06b4396b438422fe4be
Date: 2013-12-22 13:03:19
User: mig
Comment:remove duplicate statement in previous commit
Tags And Properties
Context
2013-12-22
14:11
[6e3a672696] remove unnecessary messing around INST_CONTINUE and INST_BREAK: local continue/break are already con... (user: mig, tags: trunk)
13:05
[9609a547c6] merge trunk (user: mig, tags: mig-optimize)
13:03
[ce6b692ea9] remove duplicate statement in previous commit (user: mig, tags: trunk)
12:52
[f4a47f8891] fix stack counting bug in new catch compiler, commit 62a51cdb45. (user: mig, tags: trunk)
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclCompCmds.c.

597
598
599
600
601
602
603
604
605
606
607
608
609
610
611

    range = TclCreateExceptRange(CATCH_EXCEPTION_RANGE, envPtr);
    if (cmdTokenPtr->type == TCL_TOKEN_SIMPLE_WORD) {
	TclEmitInstInt4(	INST_BEGIN_CATCH4, range,	envPtr);
	ExceptionRangeStarts(envPtr, range);
	BODY(cmdTokenPtr, 1);
    } else {
	dropScript = 1;
	SetLineInformation(1);
	CompileTokens(envPtr, cmdTokenPtr, interp);
	TclEmitInstInt4(	INST_BEGIN_CATCH4, range,	envPtr);
	ExceptionRangeStarts(envPtr, range);
	TclEmitOpcode(		INST_DUP,			envPtr);
	TclEmitInvoke(envPtr,	INST_EVAL_STK);
	/* drop the script */







<







597
598
599
600
601
602
603

604
605
606
607
608
609
610

    range = TclCreateExceptRange(CATCH_EXCEPTION_RANGE, envPtr);
    if (cmdTokenPtr->type == TCL_TOKEN_SIMPLE_WORD) {
	TclEmitInstInt4(	INST_BEGIN_CATCH4, range,	envPtr);
	ExceptionRangeStarts(envPtr, range);
	BODY(cmdTokenPtr, 1);
    } else {

	SetLineInformation(1);
	CompileTokens(envPtr, cmdTokenPtr, interp);
	TclEmitInstInt4(	INST_BEGIN_CATCH4, range,	envPtr);
	ExceptionRangeStarts(envPtr, range);
	TclEmitOpcode(		INST_DUP,			envPtr);
	TclEmitInvoke(envPtr,	INST_EVAL_STK);
	/* drop the script */