Posted to tcl by auriocus at Sat Jun 21 18:04:36 GMT 2014view raw

  1. cp /usr/include/i386/types.h /Users/chris/Sources/tcc4tcl-0ca36ca558fe0794/__TMP__/tcc4tcl-@@VERS@@/include/i386/types.h
  2. cp /usr/include/mach/i386/_structs.h /Users/chris/Sources/tcc4tcl-0ca36ca558fe0794/__TMP__/tcc4tcl-@@VERS@@/include/mach/i386/_structs.h
  3. ./patch-headers.sh "/Users/chris/Sources/tcc4tcl-0ca36ca558fe0794/__TMP__/tcc4tcl-@@VERS@@/include"
  4. if [ "@@VERS@@" = '@@VERS@@' ]; then cd __TMP__/* && ( \
  5. for file in tcc4tcl.tcl pkgIndex.tcl; do \
  6. sed 's/@@VERS@@/0.0/g' "${file}" > "${file}.new"; \
  7. cat "${file}.new" > "${file}"; \
  8. rm -f "${file}.new"; \
  9. done \
  10. ); fi
  11. tclsh ./test.tcl __TMP__
  12. In file included from <string>:1:
  13. In file included from __TMP__/tcc4tcl-@@VERS@@/include/tcl.h:141:
  14. In file included from __TMP__/tcc4tcl-@@VERS@@/include/stdio.h:64:
  15. __TMP__/tcc4tcl-@@VERS@@/include/sys/cdefs.h:81: warning: #warning "Unsupported compiler detected"
  16. In file included from <string>:1:
  17. In file included from __TMP__/tcc4tcl-@@VERS@@/include/tcl.h:386:
  18. __TMP__/tcc4tcl-@@VERS@@/include/limits.h:37: error: function pointer expected
  19. compilation failed
  20. while executing
  21. "tcc compile $code"
  22. ("memory" arm line 2)
  23. invoked from within
  24. "switch -- $state(type) {
  25. "memory" {
  26. tcc compile $code
  27.  
  28. if {[info exists state(procs)] && [llength $state(procs)] > 0} {
  29. foreach {procn..."
  30. (procedure "::tcc4tcl::_go" line 78)
  31. invoked from within
  32. "::tcc4tcl::_go ::tcc4tcl::tcc_1 0"
  33. ("uplevel" body line 1)
  34. invoked from within
  35. "uplevel 1 [list ::tcc4tcl::_$cmd $handle {*}$args]"
  36. (procedure "::tcc4tcl::tcc_1" line 12)
  37. invoked from within
  38. "$handle go"
  39. (procedure "tcc4tcl::cproc" line 4)
  40. invoked from within
  41. "tcc4tcl::cproc test {int i} int { return(i+42); }"
  42. (file "./test.tcl" line 6)
  43. make: *** [test] Error 1