Lines Matching refs:lst
171 SWIGSTATIC CAML_VALUE caml_list_nth( CAML_VALUE lst, int n ) {
172 CAMLparam1(lst);
174 while( i < n && lst && Is_block(lst) ) {
175 i++; lst = SWIG_Field(lst,1);
177 if( lst == Val_unit ) CAMLreturn(Val_unit);
178 else CAMLreturn(SWIG_Field(lst,0));
181 SWIGSTATIC CAML_VALUE caml_list_append( CAML_VALUE lst, CAML_VALUE elt ) {
182 CAMLparam2(lst,elt);
188 if( !Is_block(elt) ) return lst;
190 while( lst && Is_block(lst) ) {
198 SWIG_Store_field(v,0,SWIG_Field(lst,0));
199 lst = SWIG_Field(lst,1);
215 SWIGSTATIC int caml_list_length( CAML_VALUE lst ) {
216 CAMLparam1(lst);
218 while( lst && Is_block(lst) ) { i++; lst = SWIG_Field(lst,1); }
