Home
last modified time | relevance | path

Searched refs:storage_as (Results 1 – 11 of 11) sorted by relevance

/dports/audio/festival/speech_tools/siod/
H A Dslib_xtr.cc47 wfree(ptr->storage_as.string.data); in array_gc_free()
160 a->storage_as.double_array.dim = n; in cons_array()
166 a->storage_as.long_array.dim = n; in cons_array()
173 a->storage_as.string.data[n] = 0; in cons_array()
177 a->storage_as.lisp_array.dim = n; in cons_array()
234 len = a->storage_as.string.dim; in array_equal()
236 if (memcmp(a->storage_as.string.data,b->storage_as.string.data,len) == 0) in array_equal()
244 b->storage_as.long_array.data, in array_equal()
254 b->storage_as.double_array.data[j]) in array_equal()
275 len = a->storage_as.string.dim; in array_sxhash()
[all …]
H A Dslib_file.cc108 fflush(p->storage_as.c_file.f); in fflush_l()
173 sd += (*exp).storage_as.subr.name; in siod_string_print()
179 if (exp->storage_as.c_file.name) in siod_string_print()
318 {if ((ptr->storage_as.c_file.f) && in file_gc_free()
323 if (ptr->storage_as.c_file.name) in file_gc_free()
351 return(p->storage_as.c_file.f);} in get_c_file()
427 n = s->storage_as.string.dim; in lfread()
589 f = lf->storage_as.c_file.f; in save_forms()
601 if (p->storage_as.c_file.f) in close_open_files_upto()
603 (p->storage_as.c_file.name) ? p->storage_as.c_file.name : ""); in close_open_files_upto()
[all …]
H A Dtrace.cc54 code = fcn->storage_as.closure.code; in ltrace_1()
95 {gc_mark(ptr->storage_as.closure.code); in ct_gc_mark()
96 return(ptr->storage_as.closure.env);} in ct_gc_mark()
100 lprin1f(car(ptr->storage_as.closure.code),f); in ct_prin1()
102 lprin1f(cdr(ptr->storage_as.closure.code),f); in ct_prin1()
107 fcn_name = ltrace_fcn_name(cdr(ct->storage_as.closure.code)); in ct_eval()
116 car(ct->storage_as.closure.code), in ct_eval()
117 ct->storage_as.closure.env); in ct_eval()
118 result = leval(cdr(ct->storage_as.closure.code),env); in ct_eval()
H A Dslib_str.cc33 s->storage_as.string.data = must_malloc(length+1); in strcons()
34 s->storage_as.string.dim = length; in strcons()
36 memmove(s->storage_as.string.data,data,length+1); in strcons()
46 s->storage_as.string.data = (char *)(void *)data; in cstrcons()
47 s->storage_as.string.dim = strlen(data); in cstrcons()
87 data = s->storage_as.string.data; in string_append()
95 return(flocons((double)string->storage_as.string.dim));} in string_length()
295 const char *data = string->storage_as.string.data; in l_substring()
296 int dim = string->storage_as.string.dim; in l_substring()
H A Dslib_list.cc20 return(flocons(obj->storage_as.string.dim)); in llength()
22 return(flocons(obj->storage_as.double_array.dim)); in llength()
24 return(flocons(obj->storage_as.long_array.dim)); in llength()
26 return(flocons(obj->storage_as.lisp_array.dim)); in llength()
H A Dslib.cc661 return(x->storage_as.string.data); in get_c_string()
753 (*z).storage_as.subr.name = name; in subrcons()
754 (*z).storage_as.subr0.f = f; in subrcons()
760 (*z).storage_as.closure.env = env; in closure()
761 (*z).storage_as.closure.code = code; in closure()
1159 ptr = (*ptr).storage_as.closure.env; in gc_mark()
1227 wfree(ptr->storage_as.string.data); in gc_sweep()
1468 car((*tmp).storage_as.closure.code), in leval()
1469 (*tmp).storage_as.closure.env); in leval()
1850 {return(exp->storage_as.closure.code);} in closure_code()
[all …]
H A Dslib_doc.cc74 code = val->storage_as.closure.code; in siod_doc()
106 code = val->storage_as.closure.code; in siod_all_function_docstrings()
H A Dsiod_est.cc156 return *((class EST_Val *)x->storage_as.val.v); in val()
H A Dsiod.cc155 if (strcmp(key,lcc->storage_as.string.data)==0) in siod_assoc_str()
/dports/audio/festival/speech_tools/include/
H A Dsiod_defs.h68 storage_as; member
74 #define CAR(x) ((*x).storage_as.cons.car)
75 #define CDR(x) ((*x).storage_as.cons.cdr)
78 #define SUBR0(x) (*((*x).storage_as.subr0.f))
79 #define SUBR1(x) (*((*x).storage_as.subr1.f))
80 #define SUBR2(x) (*((*x).storage_as.subr2.f))
81 #define SUBR3(x) (*((*x).storage_as.subr3.f))
82 #define SUBR4(x) (*((*x).storage_as.subr4.f))
83 #define SUBRM(x) (*((*x).storage_as.subrm.f))
84 #define SUBRF(x) (*((*x).storage_as.subr.f))
[all …]
/dports/audio/festival/festival/src/modules/Text/
H A Dtext.cc143 if (ts.open(stream->storage_as.c_file.f, FALSE) == -1) in tts_file_raw()