553 ffi_closure_helper_SYSV (ffi_closure *closure,  in ffi_closure_helper_SYSV()  argument
573   p_arg = avalue = alloca (closure->cif->nargs * sizeof (void *));  in ffi_closure_helper_SYSV()
579   if (closure->cif->flags == FFI390_RET_STRUCT)  in ffi_closure_helper_SYSV()
584   for (ptr = closure->cif->arg_types, i = closure->cif->nargs;  in ffi_closure_helper_SYSV()
692   (closure->fun) (closure->cif, rvalue, avalue, closure->user_data);  in ffi_closure_helper_SYSV()
695   switch (closure->cif->rtype->type)  in ffi_closure_helper_SYSV()
758 ffi_prep_closure_loc (ffi_closure *closure,  in ffi_prep_closure_loc()  argument
768   *(short *)&closure->tramp [0] = 0x0d10;   /* basr %r1,0 */  in ffi_prep_closure_loc()
769   *(short *)&closure->tramp [2] = 0x9801;   /* lm %r0,%r1,6(%r1) */  in ffi_prep_closure_loc()
770   *(short *)&closure->tramp [4] = 0x1006;  in ffi_prep_closure_loc()
771   *(short *)&closure->tramp [6] = 0x07f1;   /* br %r1 */  in ffi_prep_closure_loc()
772   *(long  *)&closure->tramp [8] = (long)codeloc;  in ffi_prep_closure_loc()
773   *(long  *)&closure->tramp[12] = (long)&ffi_closure_SYSV;  in ffi_prep_closure_loc()
775   *(short *)&closure->tramp [0] = 0x0d10;   /* basr %r1,0 */  in ffi_prep_closure_loc()
776   *(short *)&closure->tramp [2] = 0xeb01;   /* lmg %r0,%r1,14(%r1) */  in ffi_prep_closure_loc()
777   *(short *)&closure->tramp [4] = 0x100e;  in ffi_prep_closure_loc()
778   *(short *)&closure->tramp [6] = 0x0004;  in ffi_prep_closure_loc()
779   *(short *)&closure->tramp [8] = 0x07f1;   /* br %r1 */  in ffi_prep_closure_loc()
780   *(long  *)&closure->tramp[16] = (long)codeloc;  in ffi_prep_closure_loc()
781   *(long  *)&closure->tramp[24] = (long)&ffi_closure_SYSV;  in ffi_prep_closure_loc()
784   closure->cif = cif;  in ffi_prep_closure_loc()
785   closure->user_data = user_data;  in ffi_prep_closure_loc()
786   closure->fun = fun;  in ffi_prep_closure_loc()