Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source
Source file posix_getopt_generated_stubs.ml
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114moduleCI=Cstubs_internalsexternalposix_getopt_1_getopt:int->_CI.fatptr->_CI.fatptr->int="posix_getopt_1_getopt"externalposix_getopt_2_has_getopt_long:unit->bool="posix_getopt_2_has_getopt_long"externalposix_getopt_3_getopt_long:int->_CI.fatptr->_CI.fatptr->_CI.fatptr->_CI.fatptr->int="posix_getopt_3_getopt_long"externalposix_getopt_4_has_getopt_long_only:unit->bool="posix_getopt_4_has_getopt_long_only"externalposix_getopt_5_getopt_long_only:int->_CI.fatptr->_CI.fatptr->_CI.fatptr->_CI.fatptr->int="posix_getopt_5_getopt_long_only"externalposix_getopt_6_getoptarg:unit->CI.voidp="posix_getopt_6_getoptarg"externalposix_getopt_7_getoptind:unit->CI.voidp="posix_getopt_7_getoptind"externalposix_getopt_8_getopterr:unit->CI.voidp="posix_getopt_8_getopterr"externalposix_getopt_9_getoptopt:unit->CI.voidp="posix_getopt_9_getoptopt"externalposix_getopt_10_getoptreset:unit->CI.voidp="posix_getopt_10_getoptreset"externalposix_getopt_11_strlen:_CI.fatptr->int="posix_getopt_11_strlen"type'aresult='atype'areturn='atype'afn=|Returns:'aCI.typ->'areturnfn|Function:'aCI.typ*'bfn->('a->'b)fnletmap_resultfx=fxletreturningt=Returnstlet(@->)fp=Function(f,p)letforeign:typeab.string->(a->b)fn->(a->b)=funnamet->matcht,namewith|Function(CI.Pointer_,Returns(CI.PrimitiveCI.Int)),"strlen"->(funx1->letCI.CPointerx2=x1inposix_getopt_11_strlenx2)|Function(CI.Void,Returns(CI.Pointerx4)),"getoptreset"->(funx3->CI.make_ptrx4(posix_getopt_10_getoptresetx3))|Function(CI.Void,Returns(CI.Pointerx6)),"getoptopt"->(funx5->CI.make_ptrx6(posix_getopt_9_getoptoptx5))|Function(CI.Void,Returns(CI.Pointerx8)),"getopterr"->(funx7->CI.make_ptrx8(posix_getopt_8_getopterrx7))|Function(CI.Void,Returns(CI.Pointerx10)),"getoptind"->(funx9->CI.make_ptrx10(posix_getopt_7_getoptindx9))|Function(CI.Void,Returns(CI.Pointerx12)),"getoptarg"->(funx11->CI.make_ptrx12(posix_getopt_6_getoptargx11))|Function(CI.PrimitiveCI.Int,Function(CI.Pointer_,Function(CI.View{CI.ty=CI.Pointer_;write=x17;_},Function(CI.Pointer_,Function(CI.Pointer_,Returns(CI.PrimitiveCI.Int)))))),"getopt_long_only"->(funx13x14x16x20x22->letCI.CPointerx23=x22inletCI.CPointerx21=x20inletCI.CPointerx19=x17x16inletCI.CPointerx15=x14inletx18=x19inposix_getopt_5_getopt_long_onlyx13x15x18x21x23)|Function(CI.Void,Returns(CI.PrimitiveCI.Bool)),"has_getopt_long_only"->posix_getopt_4_has_getopt_long_only|Function(CI.PrimitiveCI.Int,Function(CI.Pointer_,Function(CI.View{CI.ty=CI.Pointer_;write=x29;_},Function(CI.Pointer_,Function(CI.Pointer_,Returns(CI.PrimitiveCI.Int)))))),"getopt_long"->(funx25x26x28x32x34->letCI.CPointerx35=x34inletCI.CPointerx33=x32inletCI.CPointerx31=x29x28inletCI.CPointerx27=x26inletx30=x31inposix_getopt_3_getopt_longx25x27x30x33x35)|Function(CI.Void,Returns(CI.PrimitiveCI.Bool)),"has_getopt_long"->posix_getopt_2_has_getopt_long|Function(CI.PrimitiveCI.Int,Function(CI.Pointer_,Function(CI.View{CI.ty=CI.Pointer_;write=x41;_},Returns(CI.PrimitiveCI.Int)))),"getopt"->(funx37x38x40->letCI.CPointerx43=x41x40inletCI.CPointerx39=x38inletx42=x43inposix_getopt_1_getoptx37x39x42)|_,s->Printf.ksprintffailwith"No match for %s"sletforeign_value:typea.string->aCtypes.typ->aCtypes.ptr=funnamet->matcht,namewith|_,s->Printf.ksprintffailwith"No match for %s"s