Check-in [36e8177510]
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to tclconference@googlegroups.com
or submit via the online form by Sep 9.

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

Overview
Comment:Fix misorderered scalar check/copy to result
Timelines: family | ancestors | descendants | both | notworking | kbk-refactor-callframe
Files: files | file ages | folders
SHA3-256:36e8177510274d1201064c91135f98ef00e8f4d03d63003e5c2e212abc0f5de1
User & Date: kbk 2019-01-29 13:19:16
Context
2019-02-16
21:40
Start writing discussion of callframe management check-in: 50af9aa069 user: kbk tags: kbk-refactor-callframe
2019-01-29
13:19
Fix misorderered scalar check/copy to result check-in: 36e8177510 user: kbk tags: notworking, kbk-refactor-callframe
02:00
Fix translation bugs that broke [dict] tests check-in: ab6da27502 user: kbk tags: notworking, kbk-refactor-callframe
Changes

Changes to demos/perftest/tester.tcl.

  2646   2646       regsubtest
  2647   2647       # Failure handling, [subst], [try]
  2648   2648       wideretest
  2649   2649       substtest
  2650   2650       substtest2
  2651   2651       switchfail
  2652   2652       trimtest
  2653         -    # magicreturn TEMP - skip this, it doesn't compile
         2653  +    magicreturn
  2654   2654       returntest
  2655   2655       errortest1
  2656   2656       errortest2
  2657   2657       errortest2-caller
  2658   2658       errortest3
  2659   2659       errortest4 errortest4a errortest4b
  2660   2660       errortest5 errortest6
................................................................................
  2704   2704   #    callframe::test4		TEMP direct ops
  2705   2705       # The interprocedural tests
  2706   2706       mrtest::*
  2707   2707       coscaller1
  2708   2708       coscaller2
  2709   2709       xsum xsum2
  2710   2710       # Namespace tests
  2711         -    # nstestaux::pts	depends on direct ops
         2711  +    # nstestaux::pts	TEMP depends on direct ops
  2712   2712       nstest::nstest0
  2713   2713       nstest::nstest1
  2714   2714       # nstest::nstest2   fails with command not found
  2715   2715       nstest::nstest3
  2716   2716       nstest::nstest4
  2717   2717       # nstest::nstest5   fails with invalid command name
  2718   2718       nstest::nstest6
................................................................................
  2753   2753       linesearch::colinear
  2754   2754       linesearch::sameline
  2755   2755       linesearch::getAllLines1
  2756   2756       linesearch::getAllLines2
  2757   2757       regexptest::*
  2758   2758       vartest::*
  2759   2759       nsvartest::*
  2760         -    # directtest::*		direct ops
         2760  +    # directtest::*		TEMP direct ops
  2761   2761       upvar0
  2762   2762       upvar0a
  2763   2763       upvartest0::*
  2764   2764       upvartest1::*
  2765   2765       upvartest2::*
  2766   2766       flightawarebench::*
  2767   2767       hash::*

Changes to quadcode/translate.tcl.

  1085   1085   
  1086   1086   	    loadScalar1 -
  1087   1087   	    loadScalar4 {	# Load a variable
  1088   1088   		set result [list temp $depth]
  1089   1089   		set var [my index-to-var [lindex $insn 1]]
  1090   1090   		my generate-move-from-callframe $var
  1091   1091   		my generate-existence-check $pc $var
  1092         -		my quads copy $result $var
  1093   1092   		my generate-scalar-check $pc $var {TCL READ VARNAME} \
  1094   1093   		    "can't read \"%s\": variable is array"
  1095         -		#my quads copy $result $var
         1094  +		my quads copy $result $var
  1096   1095   	    }
  1097   1096   	    loadArray1 -
  1098   1097   	    loadArray4 {	# Load from an array
  1099   1098   		set idx [list temp [incr depth -1]]
  1100   1099   		set ary [my index-to-var [lindex $insn 1]]
  1101   1100   		my generate-move-from-callframe $ary
  1102   1101   		my generate-existence-check $pc $ary