Diff

Differences From Artifact [2f5bd45b79]:

To Artifact [6954747816]:


285
286
287
288
289
290
291
292

293

294
295
296
297
298
299
300
285
286
287
288
289
290
291

292
293
294
295
296
297
298
299
300
301







-
+

+







	s = tcc_new(Tcl_GetString(objv[1]));
	if (s == NULL) {
		return(TCL_ERROR);
	}

#ifdef USE_TCL_STUBS
	if (index == TCC_OUTPUT_MEMORY) {
		/* Only add this symbol if we are compiling to memory */
		/* Only add these symbols if we are compiling to memory */
		tcc_add_symbol(s, "tclStubsPtr", &tclStubsPtr);
		tcc_add_symbol(s, "Tcl_InitStubs", &Tcl_InitStubs);
	}

	tcc_define_symbol(s, "USE_TCL_STUBS", "1");
#endif

	tcc_set_error_func(s, interp, (void *)&Tcc4tclErrorFunc);