From: David Z. <kr...@kr...> - 2008-02-07 18:19:36
|
With your code I got the same error (10.5.1 + Mactel) but this one works for me: package provide four 1.0 package require critcl critcl::tk switch -glob -- $::tcl_platform(os) { Windows* { # .../... } Linux { # .../... } Darwin { set tcl_prefix /Library/Frameworks/Tcl.framework/ set tk_prefix /Library/Frameworks/Tk.framework/ set platform "unix" lappend critcl::v::compile \ -I$tk_prefix/generic \ -I$tk_prefix/xlib \ -I$tk_prefix/$platform \ -I$tk_prefix \ -I$tcl_prefix/generic \ -I$tcl_prefix/$platform \ -I$tcl_prefix \ -I[pwd] \ -DMAC_OSX_TK critcl::cheaders \ -I$tk_prefix/generic \ -I$tk_prefix/xlib \ -I$tk_prefix/$platform \ -I$tk_prefix -I$tcl_prefix/generic \ -I$tcl_prefix/$platform -I$tcl_prefix \ -I[pwd] \ -DMAC_OSX_TK } } critcl::cproc quadruple {int i} int { return i * 4; /* this is C code */ } I hope this will help you because that's just a copy/paste stuff written by someone else I always use. -- David Zolli kr...@kr... http://www.kroc.tk |