Posted to tcl by auriocus at Sat Jun 21 18:04:36 GMT 2014view pretty
cp /usr/include/i386/types.h /Users/chris/Sources/tcc4tcl-0ca36ca558fe0794/__TMP__/tcc4tcl-@@VERS@@/include/i386/types.h cp /usr/include/mach/i386/_structs.h /Users/chris/Sources/tcc4tcl-0ca36ca558fe0794/__TMP__/tcc4tcl-@@VERS@@/include/mach/i386/_structs.h ./patch-headers.sh "/Users/chris/Sources/tcc4tcl-0ca36ca558fe0794/__TMP__/tcc4tcl-@@VERS@@/include" if [ "@@VERS@@" = '@@VERS@@' ]; then cd __TMP__/* && ( \ for file in tcc4tcl.tcl pkgIndex.tcl; do \ sed 's/@@VERS@@/0.0/g' "${file}" > "${file}.new"; \ cat "${file}.new" > "${file}"; \ rm -f "${file}.new"; \ done \ ); fi tclsh ./test.tcl __TMP__ In file included from <string>:1: In file included from __TMP__/tcc4tcl-@@VERS@@/include/tcl.h:141: In file included from __TMP__/tcc4tcl-@@VERS@@/include/stdio.h:64: __TMP__/tcc4tcl-@@VERS@@/include/sys/cdefs.h:81: warning: #warning "Unsupported compiler detected" In file included from <string>:1: In file included from __TMP__/tcc4tcl-@@VERS@@/include/tcl.h:386: __TMP__/tcc4tcl-@@VERS@@/include/limits.h:37: error: function pointer expected compilation failed while executing "tcc compile $code" ("memory" arm line 2) invoked from within "switch -- $state(type) { "memory" { tcc compile $code if {[info exists state(procs)] && [llength $state(procs)] > 0} { foreach {procn..." (procedure "::tcc4tcl::_go" line 78) invoked from within "::tcc4tcl::_go ::tcc4tcl::tcc_1 0" ("uplevel" body line 1) invoked from within "uplevel 1 [list ::tcc4tcl::_$cmd $handle {*}$args]" (procedure "::tcc4tcl::tcc_1" line 12) invoked from within "$handle go" (procedure "tcc4tcl::cproc" line 4) invoked from within "tcc4tcl::cproc test {int i} int { return(i+42); }" (file "./test.tcl" line 6) make: *** [test] Error 1