Check-in [2c9323bb11]
Overview
Comment:Made this code more readable
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 2c9323bb11ad901798eceb1f2cc22c2751c3c4ac
User & Date: rkeene on 2015-02-02 13:57:18
Other Links: manifest | tags
Context
2015-02-02
16:26
Added more search paths for libcurl check-in: ecb174b881 user: rkeene tags: trunk
13:57
Made this code more readable check-in: 2c9323bb11 user: rkeene tags: trunk
13:44
Updated to not add the "tclStubsPtr" symbol unless we are compiling to memory check-in: fb2a14e7f1 user: rkeene tags: trunk
Changes

Modified tcc4tcl.c from [49e3cc661b] to [2f5bd45b79].

284
285
286
287
288
289
290
291
292
293
294
295
296
297
298

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

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

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








|







284
285
286
287
288
289
290
291
292
293
294
295
296
297
298

	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 */
		tcc_add_symbol(s, "tclStubsPtr", &tclStubsPtr);
	}

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