diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2011-04-07 10:19:46 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2011-04-07 10:19:46 (GMT) |
| commit | 903ba45e79d000802b114ec1659211b8708b9b58 (patch) | |
| tree | a1673d9cd9ab3c0d3472fa86eaae6bfae568e33c /unix/tclAppInit.c | |
| parent | e4d579ead5a212d6f43b5abd8fc285b1dbf8e47f (diff) | |
| download | tcl-903ba45e79d000802b114ec1659211b8708b9b58.zip tcl-903ba45e79d000802b114ec1659211b8708b9b58.tar.gz tcl-903ba45e79d000802b114ec1659211b8708b9b58.tar.bz2 | |
Add some (temporary) test cases showing the problem with --export-dynamic
Diffstat (limited to 'unix/tclAppInit.c')
| -rw-r--r-- | unix/tclAppInit.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/unix/tclAppInit.c b/unix/tclAppInit.c index 0d2a6c4..910a233 100644 --- a/unix/tclAppInit.c +++ b/unix/tclAppInit.c @@ -154,6 +154,14 @@ Tcl_AppInit( return TCL_OK; } + +#ifdef TCL_TEST +# undef TCL_STORAGE_CLASS +# define TCL_STORAGE_CLASS DLLEXPORT +EXTERN const char *Tcltest_Foo() { + return "I'm in tclAppInit.c"; +} +#endif /* TCL_TEST */ /* * Local Variables: |