Tcl Source Code

Check-in [38a63eef25]
Login

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

Overview
Comment:Revert mistaken commit.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 38a63eef25d6aba1d912f15560d401a852d090d7
User & Date: dgp 2012-01-09 13:50:43
Context
2012-01-09
20:34
[Bug 3464428] string is graph \u0120 is wrong check-in: e9a619e9dc user: jan.nijtmans tags: trunk
13:50
Revert mistaken commit. check-in: 38a63eef25 user: dgp tags: trunk
2012-01-08
20:49
Fix loading of timezones where one abbreviation is a proper suffix of another [Bug 3470928] check-in: dc71499520 user: kbk tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to unix/tclLoadDl.c.

206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
UnloadFile(
    Tcl_LoadHandle loadHandle)	/* loadHandle returned by a previous call to
				 * TclpDlopen(). The loadHandle is a token
				 * that represents the loaded file. */
{
    void *handle = loadHandle->clientData;

    fprintf(stderr, "dlclose???\n"); fflush(stderr);
    dlclose(handle);
    ckfree(loadHandle);
}

/*
 *----------------------------------------------------------------------
 *







<







206
207
208
209
210
211
212

213
214
215
216
217
218
219
UnloadFile(
    Tcl_LoadHandle loadHandle)	/* loadHandle returned by a previous call to
				 * TclpDlopen(). The loadHandle is a token
				 * that represents the loaded file. */
{
    void *handle = loadHandle->clientData;


    dlclose(handle);
    ckfree(loadHandle);
}

/*
 *----------------------------------------------------------------------
 *