Overview
| Comment: | Disabled a test which now does not work |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
30810bb6d935ee1bf33d0e6c11341068 |
| User & Date: | rkeene on 2017-10-13 20:36:38 |
| Other Links: | manifest | tags |
Context
|
2017-10-13
| ||
| 20:37 | tcc4tcl 0.30 check-in: 215571a61c user: rkeene tags: trunk, 0.30 | |
| 20:36 | Disabled a test which now does not work check-in: 30810bb6d9 user: rkeene tags: trunk | |
| 20:34 | Added enough critcl to be handle tcllib check-in: f6d387c96c user: rkeene tags: trunk | |
Changes
Modified test.tcl from [63a2456439] to [27bd9c9018].
| ︙ | ︙ | |||
107 108 109 110 111 112 113 | return(x); } $handle go puts [wideTest 30] # Produce a loadable object ## Currently doesn't work on Darwin | | | 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 |
return(x);
}
$handle go
puts [wideTest 30]
# Produce a loadable object
## Currently doesn't work on Darwin
if {false && [info exists ::env(TCC4TCL_TEST_RUN_NATIVE)] && $::tcl_platform(os) != "Darwin"} {
set tmpfile "/tmp/DELETEME_tcc4tcl_test_exec[expr rand()].so"
file delete $tmpfile
set handle [tcc4tcl::new $tmpfile "myPkg 0.1"]
$handle cproc ext_add {int a int b} long { return(a+b); }
$handle add_include_path [::tcl::pkgconfig get includedir,runtime]
$handle add_library_path [::tcl::pkgconfig get libdir,runtime]
$handle add_library_path /usr/lib/x86_64-linux-gnu
|
| ︙ | ︙ |