/*?
?*?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?Sun?Microsystems?Inc.
?*
?*?See?the?file?“license.terms“?for?information?on?usage?and?redistribution
?*?of?this?file?and?for?a?DISCLAIMER?OF?ALL?WARRANTIES.
?*
?*?SCCS:?@（#）?tkAppInit.c?1.22?96/05/29?09:47:08
?*/

#include?“tk.h“

/*
?*?The?following?variable?is?a?special?hack?that?is?needed?in?order?for
?*?Sun?shared?libraries?to?be?used?for?Tcl.
?*/

extern?int?matherr（）;
int?*tclDummyMathPtr?=?（int?*）?matherr;

#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.?*/
{
????Tk_Main（argc?argv?Tcl_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?interp->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_PackageInitProc?*）?NULL）;
#endif?/*?TK_TEST?*/


????/*
?????*?Call?the?init?procedures?for?included?packages.??Each?call?should
?????*?look?like?this:
?????*
?????*?if?（Mod_Init（interp）?==?TCL_ERROR）?{
?????*?????return?TCL_ERROR;
?????*?}
?????*
?????*?where?“Mod“?is?the?name?of?the?module.
?????*/

????/*
?????*?Call?Tcl_CreateCommand?for?application-specific?commands?if
?????*?they?weren‘t?already?created?by?the?init?procedures?called?above.
?????*/

????/*
?????*?Specify?a?user-specific?startup?file?to?invoke?if?the?application
?????*?is?run?interactively.??Typically?the?startup?file?is?“~/.apprc“
?????*?where?“app“?is?the?name?of?the?applica

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????734??2016-06-26?16:21??genesis-install\install\frontline.gif

?????文件??????50073??2016-06-26?16:21??genesis-install\install\ftp\ftp_lib.tcl

?????文件???????5174??2016-06-26?16:21??genesis-install\install\ftp.tcl

?????文件???????9203??2016-06-26?16:21??genesis-install\install\install.hlp

?????文件??????61501??2016-06-26?16:21??genesis-install\install\install.tcl

?????文件??????14512??2016-06-26?16:21??genesis-install\install\plugin.tcl

?????文件???????2049??2016-06-26?16:21??genesis-install\install\reader.hlp

?????文件??????29334??2016-06-26?16:21??genesis-install\install\reader.tcl

?????文件??????49519??2016-06-26?16:21??genesis-install\install\tclu.tcl

?????文件??????33265??2016-06-26?16:21??genesis-install\install\tku.tcl

?????文件????????147??2016-06-26?16:21??genesis-install\install.bat

?????文件???????1101??2016-06-26?16:21??genesis-install\install.csh

?????文件????1219501??2016-06-26?16:21??genesis-install\literature\Brochures\CustomerSupport.pdf

?????文件????1205927??2016-06-26?16:21??genesis-install\literature\Brochures\Genesis.pdf

?????文件?????543781??2016-06-26?16:21??genesis-install\literature\Brochures\Genesisv9.5.pdf

?????文件????1030443??2016-06-26?16:21??genesis-install\literature\Brochures\Genesis_DFM.pdf

?????文件????1543825??2016-06-26?16:21??genesis-install\literature\Brochures\GenFlex.pdf

?????文件?????505740??2016-06-26?16:21??genesis-install\literature\Brochures\GenFlex2.5.pdf

?????文件????1001814??2016-06-26?16:21??genesis-install\literature\Brochures\InCAM.pdf

?????文件?????923084??2016-06-26?16:21??genesis-install\literature\Brochures\InCoupon.pdf

?????文件????1420605??2016-06-26?16:21??genesis-install\literature\Brochures\InPlan.pdf

?????文件?????830507??2016-06-26?16:21??genesis-install\literature\Brochures\InPlanFlex.pdf

?????文件?????502765??2016-06-26?16:21??genesis-install\literature\Brochures\InPlan_add-ons.pdf

?????文件?????702135??2016-06-26?16:21??genesis-install\literature\Brochures\InStack.pdf

?????文件?????308667??2016-06-26?16:21??genesis-install\literature\Brochures\ODB_format.pdf

?????文件?????599543??2016-06-26?16:21??genesis-install\literature\Brochures\Products_Overview.pdf

?????文件???????3320??2016-06-26?16:21??genesis-install\literature\index.txt

?????文件????2977102??2016-06-26?16:21??genesis-install\literature\Overview\Genesis_System_Overview.pdf

?????文件????2471233??2016-06-26?16:21??genesis-install\literature\Overview\GenFlex_System_Overview.pdf

?????文件?????????62??2012-07-04?21:30??genesis-install\products\app_gen\app_gen.ttl

............此處省略254個文件信息