Edinburgh Speech Tools  2.1-release
Classes | Macros | Typedefs | Functions | Variables
siodp.h File Reference
#include "io.h"
#include "siod.h"
Include dependency graph for siodp.h:
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Classes

struct  user_type_hooks
 
struct  catch_frame
 
struct  gc_protected
 

Macros

#define NEWCELL(_into, _type)
 
#define INTERRUPT_CHECK()
 
#define STACK_LIMIT(_ptr, _amt)   (((char *)_ptr) - (_amt))
 
#define STACK_CHECK(_ptr)   if (((char *) (_ptr)) < stack_limit_ptr) err_stack((char *) _ptr);
 
#define TKBUFFERN   256
 
#define SIG_restargs
 

Typedefs

typedef int(* repl_getc_fn) (FILE *)
 
typedef void(* repl_ungetc_fn) (int, FILE *)
 

Functions

void sock_acknowledge_error ()
 
void err_stack (char *)
 
void init_storage (int init_heap_size)
 
void init_subrs_base (void)
 
void init_subrs_core (void)
 
void init_subrs_doc (void)
 
void init_subrs_file (void)
 
void init_subrs_format (void)
 
void init_subrs_list (void)
 
void init_subrs_math (void)
 
void init_subrs_sys (void)
 
void init_subrs_srv (void)
 
void init_subrs_str (void)
 
void init_subrs_xtr (void)
 
void need_n_cells (int n)
 
char * must_malloc (unsigned long size)
 
LISP gc_relocate (LISP x)
 
void gc_fatal_error (void)
 
void gc_for_newcell (void)
 
struct user_type_hooks * get_user_type_hooks (long type)
 
void gc_mark (LISP ptr)
 
LISP newcell (long type)
 
void put_st (const char *st)
 
int f_getc (FILE *f)
 
void f_ungetc (int c, FILE *f)
 
long no_interrupt (long n)
 
LISP readtl (struct gen_readio *f)
 
long repl_driver (long want_sigint, long want_init, struct repl_hooks *)
 
LISP leval_args (LISP l, LISP env)
 
LISP extend_env (LISP actuals, LISP formals, LISP env)
 
LISP envlookup (LISP var, LISP env)
 
LISP closure (LISP env, LISP code)
 
void close_open_files (void)
 
void close_open_files_upto (LISP end)
 
void pprintf (FILE *fd, LISP exp, int indent, int width, int depth, int length)
 

Variables

repl_getc_fn siod_fancy_getc
 
repl_ungetc_fn siod_fancy_ungetc
 
const char * repl_prompt
 
char * tkbuffer
 
LISP heap
 
LISP heap_end
 
LISP heap_org
 
LISP oblistvar
 
LISP open_files
 
LISP eof_val
 
LISP siod_docstrings
 
int siod_interactive
 
FILE * fwarn
 
LISP unbound_marker
 
long gc_kind_copying
 
LISP freelist
 
long gc_cells_allocated
 
int siod_server_socket
 
int rl_pos
 
char * stack_limit_ptr
 
struct catch_frame * catch_framep
 

Macro Definition Documentation

#define NEWCELL (   _into,
  _type 
)
Value:
{if (gc_kind_copying == 1) \
{if ((_into = heap) >= heap_end) \
gc_fatal_error(); \
heap = _into+1;} \
else \
{if NULLP(freelist) \
gc_for_newcell(); \
_into = freelist; \
freelist = CDR(freelist); \
++gc_cells_allocated;} \
(*_into).gc_mark = 0; \
(*_into).type = (short) _type;}
heap
LISP heap
Definition: slib.cc:115
NULLP
#define NULLP(x)
Definition: siod_defs.h:95
gc_cells_allocated
long gc_cells_allocated
Definition: slib.cc:124
gc_for_newcell
void gc_for_newcell(void)
Definition: slib.cc:1093
gc_kind_copying
long gc_kind_copying
Definition: slib.cc:123
heap_end
LISP heap_end
Definition: slib.cc:115
freelist
LISP freelist
Definition: slib.cc:127
gc_fatal_error
void gc_fatal_error(void)
Definition: slib.cc:665
CDR
#define CDR(x)
Definition: siod_defs.h:77

Definition at line 69 of file siodp.h.

#define INTERRUPT_CHECK ( )

Definition at line 87 of file siodp.h.

#define STACK_LIMIT (   _ptr,
  _amt 
)    (((char *)_ptr) - (_amt))

Definition at line 91 of file siodp.h.

#define STACK_CHECK (   _ptr)    if (((char *) (_ptr)) < stack_limit_ptr) err_stack((char *) _ptr);

Definition at line 94 of file siodp.h.

#define TKBUFFERN   256

Definition at line 97 of file siodp.h.

#define SIG_restargs

Definition at line 104 of file siodp.h.

Typedef Documentation

typedef int(* repl_getc_fn) (FILE *)

Definition at line 17 of file siodp.h.

typedef void(* repl_ungetc_fn) (int, FILE *)

Definition at line 18 of file siodp.h.

Function Documentation

void sock_acknowledge_error ( )

Definition at line 57 of file slib_server.cc.

void err_stack ( char *  )

Definition at line 621 of file slib.cc.

void init_storage ( int  init_heap_size)

Definition at line 880 of file slib.cc.

void init_subrs_base ( void  )

Definition at line 1863 of file slib.cc.

void init_subrs_core ( void  )

Definition at line 288 of file slib_core.cc.

void init_subrs_doc ( void  )

Definition at line 244 of file slib_doc.cc.

void init_subrs_file ( void  )

Definition at line 661 of file slib_file.cc.

void init_subrs_format ( void  )

Definition at line 354 of file slib_format.cc.

void init_subrs_list ( void  )

Definition at line 183 of file slib_list.cc.

void init_subrs_math ( void  )

Definition at line 209 of file slib_math.cc.

void init_subrs_sys ( void  )

Definition at line 94 of file slib_sys.cc.

void init_subrs_srv ( void  )

Definition at line 121 of file slib_server.cc.

void init_subrs_str ( void  )

Definition at line 335 of file slib_str.cc.

void init_subrs_xtr ( void  )

Definition at line 592 of file slib_xtr.cc.

void need_n_cells ( int  n)

Definition at line 200 of file slib.cc.

char* must_malloc ( unsigned long  size)

Definition at line 693 of file slib.cc.

LISP gc_relocate ( LISP  x)

Definition at line 964 of file slib.cc.

void gc_fatal_error ( void  )

Definition at line 665 of file slib.cc.

void gc_for_newcell ( void  )

Definition at line 1093 of file slib.cc.

struct user_type_hooks* get_user_type_hooks ( long  type)

Definition at line 913 of file slib.cc.

void gc_mark ( LISP  ptr)

Definition at line 1135 of file slib.cc.

LISP newcell ( long  type)

Definition at line 668 of file slib.cc.

void put_st ( const char *  st)

Definition at line 460 of file slib.cc.

int f_getc ( FILE *  f)

Definition at line 1517 of file slib.cc.

void f_ungetc ( int  c,
FILE *  f 
)

Definition at line 1530 of file slib.cc.

long no_interrupt ( long  n)

Definition at line 275 of file slib.cc.

LISP readtl ( struct gen_readio *  f)

Definition at line 1608 of file slib.cc.

long repl_driver ( long  want_sigint,
long  want_init,
struct repl_hooks *   
)

Definition at line 329 of file slib.cc.

LISP leval_args ( LISP  l,
LISP  env 
)

Definition at line 1328 of file slib.cc.

LISP extend_env ( LISP  actuals,
LISP  formals,
LISP  env 
)

Definition at line 1341 of file slib.cc.

LISP envlookup ( LISP  var,
LISP  env 
)

Definition at line 1353 of file slib.cc.

LISP closure ( LISP  env,
LISP  code 
)

Definition at line 752 of file slib.cc.

void close_open_files ( void  )

Definition at line 610 of file slib_file.cc.

void close_open_files_upto ( LISP  end)

Definition at line 599 of file slib_file.cc.

void pprintf ( FILE *  fd,
LISP  exp,
int  indent,
int  width,
int  depth,
int  length 
)

Definition at line 21 of file slib_file.cc.

Variable Documentation

repl_getc_fn siod_fancy_getc

Definition at line 148 of file slib.cc.

repl_ungetc_fn siod_fancy_ungetc

Definition at line 149 of file slib.cc.

const char* repl_prompt

Definition at line 23 of file siodp.h.

char* tkbuffer

Definition at line 122 of file slib.cc.

LISP heap

Definition at line 115 of file slib.cc.

LISP heap_end

Definition at line 115 of file slib.cc.

LISP heap_org

Definition at line 115 of file slib.cc.

LISP oblistvar

Definition at line 131 of file slib.cc.

LISP open_files

Definition at line 19 of file slib_file.cc.

LISP eof_val

Definition at line 136 of file slib.cc.

LISP siod_docstrings

Definition at line 151 of file slib.cc.

int siod_interactive

Definition at line 164 of file slib.cc.

FILE* fwarn

Definition at line 163 of file slib.cc.

LISP unbound_marker

Definition at line 140 of file slib.cc.

long gc_kind_copying

Definition at line 123 of file slib.cc.

LISP freelist

Definition at line 127 of file slib.cc.

long gc_cells_allocated

Definition at line 124 of file slib.cc.

int siod_server_socket

Definition at line 18 of file slib_server.cc.

int rl_pos

Definition at line 39 of file siodp.h.

char* stack_limit_ptr

Definition at line 184 of file slib.cc.

struct catch_frame* catch_framep

Definition at line 143 of file slib.cc.