Diff

Differences From Artifact [49f61e4dc3]:

To Artifact [990ffbcf98]:


169
170
171
172
173
174
175



176

177
178
179
180
181
182
183
			if {$type == "Tcl_Interp*"} {
				continue
			}

			lappend args $var
		}




		set adefs_c [join $adefs_c {, }]


		# Determine how to return in failure
		if {$rtype != "void"} {
			if {[info exists returnErrorValue]} {
				set return_failure "return(${returnErrorValue})"
			} else {
				switch -- $rtype {







>
>
>
|
>







169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
			if {$type == "Tcl_Interp*"} {
				continue
			}

			lappend args $var
		}

		if {[llength $adefs_c] == 0} {
			set adefs_c "void"
		} else {
			set adefs_c [join $adefs_c {, }]
		}

		# Determine how to return in failure
		if {$rtype != "void"} {
			if {[info exists returnErrorValue]} {
				set return_failure "return(${returnErrorValue})"
			} else {
				switch -- $rtype {