/*?
?*?tkAppInit.c?--
?*
?*	Provides?a?default?version?of?the?Tcl_AppInit?procedure?for
?*	use?in?wish?and?similar?Tk-based?applications.
?*
?*?Copyright?（c）?1993?The?Regents?of?the?University?of?California.
?*?Copyright?（c）?1994-1997?Sun?Microsystems?Inc.
?*
?*?See?the?file?“license.terms“?for?information?on?usage?and?redistribution
?*?of?this?file?and?for?a?DISCLAIMER?OF?ALL?WARRANTIES.
?*
?*?RCS:?@（#）?$Id:?tkAppInit.cv?1.7?2002/06/21?20:24:29?dgp?Exp?$
?*/

#include?“tk.h“
#include?“locale.h“

#ifdef?TK_TEST
extern?int		Tktest_Init?_ANSI_ARGS_（（Tcl_Interp?*interp））;
#endif?/*?TK_TEST?*/

/*
?*----------------------------------------------------------------------
?*
?*?main?--
?*
?*	This?is?the?main?program?for?the?application.
?*
?*?Results:
?*	None:?Tk_Main?never?returns?here?so?this?procedure?never
?*	returns?either.
?*
?*?Side?effects:
?*	Whatever?the?application?does.
?*
?*----------------------------------------------------------------------
?*/

int
main（argc?argv）
????int?argc;			/*?Number?of?command-line?arguments.?*/
????char?**argv;		/*?Values?of?command-line?arguments.?*/
{
????/*
?????*?The?following?#if?block?allows?you?to?change?the?AppInit
?????*?function?by?using?a?#define?of?TCL_LOCAL_APPINIT?instead
?????*?of?rewriting?this?entire?file.??The?#if?checks?for?that
?????*?#define?and?uses?Tcl_AppInit?if?it?doesn‘t?exist.
?????*/
????
#ifndef?TK_LOCAL_APPINIT
#define?TK_LOCAL_APPINIT?Tcl_AppInit????
#endif
????extern?int?TK_LOCAL_APPINIT?_ANSI_ARGS_（（Tcl_Interp?*interp））;
????
????/*
?????*?The?following?#if?block?allows?you?to?change?how?Tcl?finds?the?startup
?????*?script?prime?the?library?or?encoding?paths?fiddle?with?the?argv
?????*?etc.?without?needing?to?rewrite?Tk_Main（）
?????*/
????
#ifdef?TK_LOCAL_MAIN_HOOK
????extern?int?TK_LOCAL_MAIN_HOOK?_ANSI_ARGS_（（int?*argc?char?***argv））;
????TK_LOCAL_MAIN_HOOK（&argc?&argv）;
#endif

????Tk_Main（argc?argv?TK_LOCAL_APPINIT）;
????return?0;			/*?Needed?only?to?prevent?compiler?warning.?*/
}

/*
?*----------------------------------------------------------------------
?*
?*?Tcl_AppInit?--
?*
?*	This?procedure?performs?application-specific?initialization.
?*	Most?applications?especially?those?that?incorporate?additional
?*	packages?will?have?their?own?version?of?this?procedure.
?*
?*?Results:
?*	Returns?a?standard?Tcl?completion?code?and?leaves?an?error
?*	message?in?the?interp‘s?result?if?an?error?occurs.
?*
?*?Side?effects:
?*	Depends?on?the?startup?script.
?*
?*----------------------------------------------------------------------
?*/

int
Tcl_AppInit（interp）
????Tcl_Interp?*interp;		/*?Interpreter?for?application.?*/
{
????if?（Tcl_Init（interp）?==?TCL_ERROR）?{
	return?TCL_ERROR;
????}
????if?（Tk_Init（interp）?==?TCL_ERROR）?{
	return?TCL_ERROR;
????}
????Tcl_StaticPackage（interp?“Tk“?Tk_Init?Tk_SafeInit）;
#ifdef?TK_TEST
????if?（Tktest_Init（interp）?==?TCL_ERROR）?{
	return?TCL_ERROR;
????}
????Tcl_StaticPackage（interp?“Tktest“?Tktest_Init
????????????（Tcl_PackageIni

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2004-11-15?03:21??Swarm-2.2-java\
?????目錄???????????0??2004-12-16?00:26??Swarm-2.2-java\bin\
?????文件?????1131598??2004-12-15?02:39??Swarm-2.2-java\bin\BLT24.dll
?????文件????10504230??2004-12-17?21:46??Swarm-2.2-java\bin\javaswarm.dll
?????文件?????1133532??2004-11-18?03:52??Swarm-2.2-java\bin\libhdf5-0.dll
?????文件??????141873??2004-10-31?17:05??Swarm-2.2-java\bin\libjpeg-62.dll
?????文件?????1020016??2004-10-31?17:59??Swarm-2.2-java\bin\libtiff-3.dll
?????文件???????62464??2004-10-10?04:20??Swarm-2.2-java\bin\mgwz.dll
?????文件??????184320??2004-10-31?22:20??Swarm-2.2-java\bin\png12.dll
?????文件??????772366??2004-10-31?15:53??Swarm-2.2-java\bin\tcl84.dll
?????文件?????1041325??2004-10-31?15:55??Swarm-2.2-java\bin\tk84.dll
?????目錄???????????0??2004-11-15?03:21??Swarm-2.2-java\include\
?????文件????????5237??2004-12-17?21:32??Swarm-2.2-java\include\swarmconfig.h
?????目錄???????????0??2004-12-16?00:28??Swarm-2.2-java\lib\
?????目錄???????????0??2004-12-16?00:29??Swarm-2.2-java\lib\blt2.4\
?????文件????????2277??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\bltCanvEps.pro
?????文件???????13139??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\bltGraph.pro
?????文件????????3250??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\dnd.tcl
?????文件????????2790??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\dragdrop.tcl
?????文件???????14160??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\graph.tcl
?????文件???????13607??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\hierbox.tcl
?????文件????????1003??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\pkgIndex.tcl
?????文件???????10400??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\tabnotebook.tcl
?????文件???????10408??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\tabset.tcl
?????文件???????25453??2004-12-15?02:40??Swarm-2.2-java\lib\blt2.4\treeview.tcl
?????目錄???????????0??2004-11-15?03:04??Swarm-2.2-java\lib\tcl8.4\
?????文件???????19529??2004-10-31?15:53??Swarm-2.2-java\lib\tcl8.4\auto.tcl
?????目錄???????????0??2004-12-17?20:10??Swarm-2.2-java\lib\tcl8.4\encoding\
?????文件????????1090??2004-10-31?15:53??Swarm-2.2-java\lib\tcl8.4\encoding\ascii.enc
?????文件???????92873??2004-10-31?15:53??Swarm-2.2-java\lib\tcl8.4\encoding\big5.enc
?????文件????????1091??2004-10-31?15:53??Swarm-2.2-java\lib\tcl8.4\encoding\cp1250.enc
............此處省略230個文件信息