🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.tcl
Article #122

Tcl & C++

#122
From: Eizen Kimura
Date: Sun, 07 Sep 1997 00:00
23 lines
1320 bytes
$BLZB<!wKLBg0e3XIt$G$9!#(J

$B<+:n%"%W%j%1!<%7%g%s$+$i(JTcl_Interp$B$r8F$S=P$7$F(JTcl$B$rAv$i$;$h$&$H$7$F$$$k(J
$B$N$G$9$,!"$&$^$/$$$+$J$$$N$G=u8@$r$*4j$$$7$?$$<!Bh$G$9!#(J

# How to Register C++ routine
$B%^%K%e%"%k$K$h$l$P!"(JTcl_CreateCommand$B$rEPO?$9$k$N$K$O#C$N%k!<%A%s$r(J
$BEO$5$J$1$l$PBLL\$@$H$"$j$^$7$?$,!";d$N%W%m%0%i%`$O#C!\!\$G!"$+$D!"(J
$B%"%W%j%1!<%7%g%sFbIt$N%G!<%?$rA`:n$5$;$k@Q$b$j$J$N$G!"#C!\!\$N%k!<%A%s(J
$B$rEO$7$?$$$H;W$&$N$G$9!#$3$l$r$$$+$K$7$F<B8=$9$k$+!#(J

# puts$B$J$I$N%3%^%s%I$,F~$C$F$$$k$HF0:n$,$*$+$7$/$J$k(J
$BI8=`=PNO$J$I$N%3%^%s%I$,$"$k$H!"%(%i!<$,=P$^$9!#$=$l$OEvA3!"I8=`=PNO(J
$B$r;XDj$7$F$$$J$$$+$i$=$&$J$k$N$G$9$,!":$$C$?$3$H$K!"%a%b%j$rGK2u$7$F(J
$B$7$^$&$h$&$G$9!#$3$N(Jputs$B$J$I$N%5%]!<%H$7$J$$%3%^%s%I$rM^@)$9$k$K$O(J
$B$I$&$9$l$P$h$$$+!#(J

$B$3$A$i$N3+H/4D6-$O!"(J
 Tcl/Tk 8.0 for Macintosh
 CodeWarrior Pro1 C++ & PowerPlant 

$B$I$J$?$+8f=u8@$r$*4j$$$$$?$7$^$9!#(J
Technical Details
Message-ID: <B038AD2B966845456@spr4161.bekkoame.or.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 15a83d,fbca2cb422ee658f,start
X-Google-Attributes: gid15a83d,public
From: kandalva@ppp.bekkoame.or.jp (Eizen Kimura)
Subject: Tcl & C++
Date: 1997/09/07
Message-ID: <B038AD2B966845456@spr4161.bekkoame.or.jp>
X-Deja-AN: 270447745
Organization: Med@Hokkaido Univ.
Newsgroups: fj.lang.tcl