\hypertarget{gnoclVTE_8c}{
\section{gnoclVTE.c File Reference}
\label{gnoclVTE_8c}\index{gnoclVTE.c@{gnoclVTE.c}}
}
{\tt \#include \char`\"{}gnoclVTE.h\char`\"{}}\par
\subsection*{Functions}
\begin{CompactItemize}
\item 
int \hyperlink{gnoclVTE_8c_74a3627830d170fc2636c3beca4a712a}{Gnoclvte\_\-Init} (Tcl\_\-Interp $\ast$interp)
\end{CompactItemize}


\subsection{Function Documentation}
\hypertarget{gnoclVTE_8c_74a3627830d170fc2636c3beca4a712a}{
\index{gnoclVTE.c@{gnoclVTE.c}!Gnoclvte\_\-Init@{Gnoclvte\_\-Init}}
\index{Gnoclvte\_\-Init@{Gnoclvte\_\-Init}!gnoclVTE.c@{gnoclVTE.c}}
\subsubsection[Gnoclvte\_\-Init]{\setlength{\rightskip}{0pt plus 5cm}int Gnoclvte\_\-Init (Tcl\_\-Interp $\ast$ {\em interp})}}
\label{gnoclVTE_8c_74a3627830d170fc2636c3beca4a712a}




Definition at line 30 of file gnoclVTE.c.

References gnoclVTECmd.

\begin{Code}\begin{verbatim}31 {
32 
33         printf ( "Initializing gnocl virtual terminal emulator version %s\n", VERSION );
34 
35         if ( Tcl_InitStubs ( interp, "8.3", 0 ) == NULL )
36                 return TCL_ERROR;
37 
38         if ( Tcl_PkgRequire ( interp, "Gnocl", VERSION, 0 ) == NULL )
39                 return TCL_ERROR;
40 
41         if ( Tcl_PkgProvide ( interp, "GnoclVTE", VERSION ) != TCL_OK )
42                 return TCL_ERROR;
43 
44         /* gnoclSourceViewCmd is located in sourceview.c */
45         Tcl_CreateObjCommand ( interp, "gnocl::vte", gnoclVTECmd, NULL, NULL );
46 
47         return TCL_OK;
48 }
\end{verbatim}
\end{Code}


