#include "plplotP.h"
#include "pltkd.h"
#include <stdio.h>
#include <stdlib.h>
#include <tcl.h>
#include <tk.h>
Go to the source code of this file.
Defines | |
#define | BUFFER_SIZE 4000 |
Functions | |
EXTERN int Itk_Init | _ANSI_ARGS_ ((Tcl_Interp *interp)) |
EXTERN int Tcl_Import | _ANSI_ARGS_ ((Tcl_Interp *interp, Tcl_Namespace *nsPtr, char *pattern, int allowOverwrite)) |
char *strrchr | _ANSI_ARGS_ ((CONST char *string, int c)) |
static void Prompt | _ANSI_ARGS_ ((Tcl_Interp *interp, int partial)) |
static void StdinProc | _ANSI_ARGS_ ((ClientData clientData, int mask)) |
int | pltkMain (int argc, const char **argv, char *RcFileName, int(*AppInit)(Tcl_Interp *interp)) |
static void | StdinProc (ClientData clientData, int mask) |
static void | Prompt (Tcl_Interp *interp, int partial) |
Variables | |
static Tcl_Interp * | interp |
static Tcl_DString | command |
static int | tty |
static char | errorExitCmd [] = "exit 1" |
static int | synchronize = 0 |
static const char * | script = NULL |
static const char * | fileName = NULL |
static const char * | name = NULL |
static const char * | display = NULL |
static const char * | geometry = NULL |
static Tk_ArgvInfo | argTable [] |
#define BUFFER_SIZE 4000 |
EXTERN Tcl_Namespace *Tcl_GetGlobalNamespace _ANSI_ARGS_ | ( | (Tcl_Interp *interp) | ) |
EXTERN int Tcl_Import _ANSI_ARGS_ | ( | (Tcl_Interp *interp, Tcl_Namespace *nsPtr, char *pattern, int allowOverwrite) | ) |
static void Prompt _ANSI_ARGS_ | ( | (Tcl_Interp *interp, int partial) | ) | [static] |
static void StdinProc _ANSI_ARGS_ | ( | (ClientData clientData, int mask) | ) | [static] |
char* strrchr _ANSI_ARGS_ | ( | (CONST char *string, int c) | ) |
int pltkMain | ( | int | argc, | |
const char ** | argv, | |||
char * | RcFileName, | |||
int(*)(Tcl_Interp *interp) | AppInit | |||
) |
static void Prompt | ( | Tcl_Interp * | interp, | |
int | partial | |||
) | [static] |
static void StdinProc | ( | ClientData | clientData, | |
int | mask | |||
) | [static] |
Tk_ArgvInfo argTable[] [static] |
{ { "-file", TK_ARGV_STRING, (char *) NULL, (char *) &fileName, "File from which to read commands" }, { "-e", TK_ARGV_STRING, (char *) NULL, (char *) &script, "Script to execute on startup" }, { "-geometry", TK_ARGV_STRING, (char *) NULL, (char *) &geometry, "Initial geometry for window" }, { "-display", TK_ARGV_STRING, (char *) NULL, (char *) &display, "Display to use" }, { "-name", TK_ARGV_STRING, (char *) NULL, (char *) &name, "Name to use for application" }, { "-sync", TK_ARGV_CONSTANT, (char *) 1, (char *) &synchronize, "Use synchronous mode for display server" }, { (char *) NULL, TK_ARGV_END, (char *) NULL, (char *) NULL, (char *) NULL } }
char errorExitCmd[] = "exit 1" [static] |
int synchronize = 0 [static] |