URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [trunk/] [insight/] [tix/] [demos/] [et/] [etdemo.et] - Rev 1765
Compare with Previous | Blame | View Log
/*
* etdemo.et --
*
* This file demonstrates how the stand-alone module of Tix can be
* used in an ET application.
*
* Copyright (c) 1996, Expert Interface Technologies
*
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
*/
#include <stdio.h>
int main(int argc, char **argv)
{
/*
* Initialize ET, this will load the TCL and TK libraries and call
* Tcl_Init() and Tk_Init() for you.
*/
Et_Init(&argc,argv);
/*
* Initialize the stand-alone version of Tix.
*/
if (Tixsam_Init(Et_Interp) != ET_OK ){
fprintf(stderr,"Can't initialize the Tix extension.\n");
exit(1);
}
/*
* Now put your code here. As an example, I just "source" in the file
* test.tcl in the curent directory. Notice this file is loaded in
* dynamically. If you want to load in test.tcl statically, you should
* use ET_INCLUDE(test.tcl) instead. Please consult your ET manual
* for more details.
*/
/* ET(source test.tcl); */
/*
* Go into the ET mainloop. This won't return until the application
* exits.
*/
Et_MainLoop();
return 0;
}