#ifndef _TCL_EMBED_H_

#define _TCL_EMBED_H_

#ifndef _ANSI_ARGS_
#define _ANSI_ARGS_(x) ()
#endif

typedef struct {
    char *name;
    char **tcl_code;
    long lines;
    long chars;
} Tcl2array;

/*
 * Loads the default library code
 */
extern int
Tcl_LoadDefaultLibraryCode _ANSI_ARGS_((Tcl_Interp *interp));

/* 
 * loads a tcl code put in code_array
 */
extern int 
Tcl_LoadCodeArray _ANSI_ARGS_((Tcl_Interp *interp, Tcl2array code_array));


#endif 
