🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.tcl
Article #124

Re: Tcl & C++

#124
From: Shiro Kawai
Date: Sun, 07 Sep 1997 00:00
32 lines
1454 bytes
$B$R$H$D$@$1!#(B

In article <B038AD2B966845456@spr4161.bekkoame.or.jp>
kandalva@ppp.bekkoame.or.jp (Eizen Kimura) writes:

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

ClientData$B$K%$%s%9%?%s%9$N%]%$%s%?$rEO$7!"4X?t%]%$%s%?$K(Bstatic method$B$N(B
$B%]%$%s%?$rEO$;$PBg>fIW$G$9!#(B

 class T {
   public:
    static int cmdproc(ClientData, Tcl_Interp*, int, char**);
 };

$B$H$+$7$F$*$$$F!"(B

 T t;
 Tcl_CreateCommand(interp, "mycommand", T::cmdproc, (ClientData)t, NULL);

$B$N$h$&$KEO$;$^$9!#(B

--
Shiro KAWAI
  Square USA Inc.   4640 Admiralty Way, Suite 1200, Marina del Rey CA 90292
  Phone  310 302 9500        Fax  310 302 9550       E-mail  shiro@sqla.com
#"The most important things are the hardest things to say" --- Stephen King
Technical Details
Message-ID: <SHIRO.97Sep7143640@jema.sqla.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <B038AD2B966845456@spr4161.bekkoame.or.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 15a83d,fbca2cb422ee658f
X-Google-Attributes: gid15a83d,public
From: shiro@sqla.com (Shiro Kawai)
Subject: Re: Tcl & C++
Date: 1997/09/07
Message-ID: <SHIRO.97Sep7143640@jema.sqla.com>
X-Deja-AN: 270555561
References: <B038AD2B966845456@spr4161.bekkoame.or.jp>
Organization: Square L.A. Inc.
Newsgroups: fj.lang.tcl