/*
?*?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.
?*/

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

#ifdef?TK_TEST
extern?int		Tktest_Init（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（
????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?（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?（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（
????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_PackageInitProc?*）?NULL）;
#endif?/*?TK_TEST?*/

????/*
?????*?Call?the?init?procedures?for?included?packages.?Each?call?should?look
?????*?like?this:
?????

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2015-01-28?08:53??git-1.9.5.chromium.6_bin\
?????目錄???????????0??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\
?????文件??????215040??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\antiword.exe
?????文件?????????510??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\astextplain
?????文件?????????162??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\awk
?????文件???????18432??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\basename.exe
?????文件??????598016??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\bash.exe
?????文件?????1299968??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\bison.exe
?????文件?????????180??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\bunzip2
?????文件???????75264??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\bzip2.exe
?????文件???????22528??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\cat.exe
?????文件???????28160??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\chmod.exe
?????文件??????????99??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\clear
?????文件???????11264??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\cmp.exe
?????文件???????52224??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\connect.exe
?????文件???????74240??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\cp.exe
?????文件??????260642??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\curl-ca-bundle.crt
?????文件??????493568??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\curl.exe
?????文件???????24064??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\cut.exe
?????文件????????3642??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\c_rehash
?????文件???????47616??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\date.exe
?????文件???????68608??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\diff.exe
?????文件???????17920??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\dirname.exe
?????文件???????11376??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\docx2txt
?????文件???????14336??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\dos2unix.exe
?????文件???????65536??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\du.exe
?????文件?????????163??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\echo
?????文件?????????167??2015-01-25?03:40??git-1.9.5.chromium.6_bin\bin\egrep
?????文件???????18944??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\env.exe
?????文件???????49152??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\expr.exe
?????文件???????12288??2015-01-28?05:17??git-1.9.5.chromium.6_bin\bin\false.exe
............此處省略3646個文件信息