Changeset 5869 for branches/1.4-release
- Timestamp:
- Sep 17, 2015, 9:30:15 AM (9 years ago)
- Location:
- branches/1.4-release
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.4-release/gui/scripts/uq.tcl
r5192 r5869 5 5 6 6 constructor {varlist num type uqargs} { 7 puts "Rappture::UQ constructor $varlist:$type:$uqargs"7 #puts "Rappture::UQ constructor $varlist:$type:$uqargs" 8 8 set _varlist $varlist 9 9 set _type $type … … 120 120 121 121 itcl::body Rappture::UQ::num_runs {} { 122 puts "varlist=$_varlist"122 #puts "varlist=$_varlist" 123 123 set numvars $_num 124 puts "UQ num_runs $numvars $_type $_args"124 #puts "UQ num_runs $numvars $_type $_args" 125 125 if {![array exists _num_pts]} { _init_num_pts_array } 126 126 switch $_type { -
branches/1.4-release/lang/tcl/scripts/library.tcl
r5315 r5869 1153 1153 } 1154 1154 if {$varout == "\[\]"} {set varout ""} 1155 puts "uq_get_vars returning $varout"1155 #puts "uq_get_vars returning $varout" 1156 1156 return [list $varout $count] 1157 1157 }
Note: See TracChangeset
for help on using the changeset viewer.