Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Of course, the value of "::tcl::pkgconfig get engine" should be "TH1" |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | tip-440-alt |
Files: | files | file ages | folders |
SHA1: |
fd00816d95413a144aa89123373cf993 |
User & Date: | jan.nijtmans 2016-01-20 22:41:32.603 |
Context
2016-01-26
| ||
10:22 | Alternative TIP #440 implementation, based on TIP #59 ... (check-in: 2ba6587c user: jan.nijtmans tags: tip-440-alt) | |
2016-01-20
| ||
22:41 | Of course, the value of "::tcl::pkgconfig get engine" should be "TH1" ... (check-in: fd00816d user: jan.nijtmans tags: tip-440-alt) | |
22:33 | How about the TIP #59 way of TIP #440? "::tcl::pkgconfig get engine" -> "core" ... (check-in: fbc9e292 user: jan.nijtmans tags: tip-440-alt) | |
Changes
Changes to src/th_lang.c.
︙ | ︙ | |||
1186 1187 1188 1189 1190 1191 1192 | const char **argv, int *argl ){ if( strcmp(argv[2], "engine") ){ Th_ErrorMessage(interp, "key not known", argv[2], argl[2]); return TH_ERROR; } | | | 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 | const char **argv, int *argl ){ if( strcmp(argv[2], "engine") ){ Th_ErrorMessage(interp, "key not known", argv[2], argl[2]); return TH_ERROR; } Th_SetResult(interp, "TH1" , -1); return TH_OK; } /* ** TH Syntax: ** ** package require Tcl |
︙ | ︙ |