/* Generated from jack.scm by the CHICKEN compiler
   http://www.call-with-current-continuation.org
   2011-03-27 20:20
   Version 4.5.0
   linux-unix-gnu-x86 [ manyargs dload ptables ]
   compiled 2010-06-17 on biber (Linux)
   command line: jack.scm -output-file jack.c
   used units: library eval posix
*/

#include "chicken.h"

#include <jack/jack.h>

C_externexport  int  process(C_u32 t0,void *t1);

static C_PTABLE_ENTRY *create_ptable(void);
C_noret_decl(C_library_toplevel)
C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_noret;
C_noret_decl(C_eval_toplevel)
C_externimport void C_ccall C_eval_toplevel(C_word c,C_word d,C_word k) C_noret;
C_noret_decl(C_posix_toplevel)
C_externimport void C_ccall C_posix_toplevel(C_word c,C_word d,C_word k) C_noret;

static C_TLS C_word lf[25];
static double C_possibly_force_alignment;
static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,36),40,106,97,99,107,95,99,108,105,101,110,116,95,111,112,101,110,32,97,53,57,54,52,32,97,53,56,54,53,32,97,53,55,54,54,41,0,0,0,0};
static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,25),40,106,97,99,107,95,99,108,105,101,110,116,95,99,108,111,115,101,32,97,55,48,55,52,41,0,0,0,0,0,0,0};
static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,23),40,106,97,99,107,95,99,108,105,101,110,116,95,110,97,109,101,95,115,105,122,101,41,0};
static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,28),40,106,97,99,107,95,103,101,116,95,99,108,105,101,110,116,95,110,97,109,101,32,97,55,56,56,50,41,0,0,0,0};
static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,3),46,0,0,0,0,0,0,0};
static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,21),40,106,97,99,107,95,97,99,116,105,118,97,116,101,32,97,56,53,56,57,41,0,0,0};
static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,23),40,106,97,99,107,95,100,101,97,99,116,105,118,97,116,101,32,97,57,53,57,57,41,0};
static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,60),40,106,97,99,107,95,112,111,114,116,95,114,101,103,105,115,116,101,114,32,97,49,48,53,49,49,49,32,97,49,48,52,49,49,50,32,97,49,48,51,49,49,51,32,97,49,48,50,49,49,52,32,97,49,48,49,49,49,53,41,0,0,0,0};
static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,38),40,106,97,99,107,95,112,111,114,116,95,117,110,114,101,103,105,115,116,101,114,32,97,49,50,49,49,50,54,32,97,49,50,48,49,50,55,41,0,0};
static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,38),40,106,97,99,107,95,112,111,114,116,95,103,101,116,95,98,117,102,102,101,114,32,97,49,51,49,49,51,53,32,97,49,51,48,49,51,54,41,0,0};
static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,27),40,112,114,111,99,101,115,115,32,110,102,114,97,109,101,115,49,52,57,32,97,114,103,49,53,48,41,0,0,0,0,0};
static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};

struct _jack_client *client;
enum JackStatus status;

#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
static C_word C_fcall stub156(C_word C_buf) C_regparm;
C_regparm static C_word C_fcall stub156(C_word C_buf){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
jack_set_process_callback(client, process, NULL);
C_ret:
#undef return

return C_r;}

/* from k343 */
static C_word C_fcall stub132(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
C_regparm static C_word C_fcall stub132(C_word C_buf,C_word C_a0,C_word C_a1){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_port *t0=(struct _jack_port *)C_c_pointer_or_null(C_a0);
C_u32 t1=(C_u32 )C_unfix(C_a1);
C_r=C_mpointer_or_false(&C_a,(void*)jack_port_get_buffer(t0,t1));
return C_r;}

/* from k326 */
static C_word C_fcall stub122(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
C_regparm static C_word C_fcall stub122(C_word C_buf,C_word C_a0,C_word C_a1){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_client *t0=(struct _jack_client *)C_c_pointer_or_null(C_a0);
struct _jack_port *t1=(struct _jack_port *)C_c_pointer_or_null(C_a1);
C_r=C_fix((C_word)jack_port_unregister(t0,t1));
return C_r;}

/* from k298 */
static C_word C_fcall stub106(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4) C_regparm;
C_regparm static C_word C_fcall stub106(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2,C_word C_a3,C_word C_a4){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_client *t0=(struct _jack_client *)C_c_pointer_or_null(C_a0);
char * t1=(char * )C_string_or_null(C_a1);
char * t2=(char * )C_string_or_null(C_a2);
unsigned long t3=(unsigned long )C_num_to_unsigned_long(C_a3);
unsigned long t4=(unsigned long )C_num_to_unsigned_long(C_a4);
C_r=C_mpointer_or_false(&C_a,(void*)jack_port_register(t0,t1,t2,t3,t4));
return C_r;}

/* from k272 */
static C_word C_fcall stub96(C_word C_buf,C_word C_a0) C_regparm;
C_regparm static C_word C_fcall stub96(C_word C_buf,C_word C_a0){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_client *t0=(struct _jack_client *)C_c_pointer_or_null(C_a0);
C_r=C_fix((C_word)jack_deactivate(t0));
return C_r;}

/* from k255 in jack_activate in k195 in k192 in k189 */
C_noret_decl(stub86)
static void C_ccall stub86(C_word C_c,C_word C_self,C_word C_k,C_word C_buf,C_word C_a0) C_noret;
static void C_ccall stub86(C_word C_c,C_word C_self,C_word C_k,C_word C_buf,C_word C_a0){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_client *t0=(struct _jack_client *)C_c_pointer_or_null(C_a0);
int C_level=C_save_callback_continuation(&C_a,C_k);
C_r=C_fix((C_word)jack_activate(t0));
C_k=C_restore_callback_continuation2(C_level);
C_kontinue(C_k,C_r);}

/* from k246 */
static C_word C_fcall stub79(C_word C_buf,C_word C_a0) C_regparm;
C_regparm static C_word C_fcall stub79(C_word C_buf,C_word C_a0){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_client *t0=(struct _jack_client *)C_c_pointer_or_null(C_a0);
C_r=C_mpointer(&C_a,(void*)jack_get_client_name(t0));
return C_r;}

/* from jack_client_name_size in k195 in k192 in k189 */
static C_word C_fcall stub76(C_word C_buf) C_regparm;
C_regparm static C_word C_fcall stub76(C_word C_buf){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
C_r=C_fix((C_word)jack_client_name_size());
return C_r;}

/* from k229 */
static C_word C_fcall stub71(C_word C_buf,C_word C_a0) C_regparm;
C_regparm static C_word C_fcall stub71(C_word C_buf,C_word C_a0){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
struct _jack_client *t0=(struct _jack_client *)C_c_pointer_or_null(C_a0);
C_r=C_fix((C_word)jack_client_close(t0));
return C_r;}

/* from k212 */
static C_word C_fcall stub60(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2) C_regparm;
C_regparm static C_word C_fcall stub60(C_word C_buf,C_word C_a0,C_word C_a1,C_word C_a2){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
char * t0=(char * )C_string_or_null(C_a0);
enum JackOptions t1=(enum JackOptions )C_num_to_int(C_a1);
enum JackStatus *t2=(enum JackStatus *)C_c_pointer_or_null(C_a2);
C_r=C_mpointer_or_false(&C_a,(void*)jack_client_open(t0,t1,t2));
return C_r;}

C_noret_decl(C_toplevel)
C_externexport void C_ccall C_toplevel(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_191)
static void C_ccall f_191(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_194)
static void C_ccall f_194(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_197)
static void C_ccall f_197(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_351)
static void C_ccall f_351(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_370)
static void C_ccall f_370(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_373)
static void C_ccall f_373(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_376)
static void C_ccall f_376(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_379)
static void C_ccall f_379(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_382)
static void C_ccall f_382(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_385)
static void C_ccall f_385(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_388)
static void C_ccall f_388(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_391)
static void C_ccall f_391(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_394)
static void C_ccall f_394(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_397)
static void C_ccall f_397(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_403)
static void C_ccall f_403(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_400)
static void C_ccall f_400(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_357)
static void C_ccall f_357(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_361)
static void C_ccall f_361(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_336)
static void C_ccall f_336(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_319)
static void C_ccall f_319(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_279)
static void C_ccall f_279(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
C_noret_decl(f_288)
static void C_ccall f_288(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_292)
static void C_ccall f_292(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_269)
static void C_ccall f_269(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_253)
static void C_ccall f_253(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_257)
static void C_ccall f_257(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_239)
static void C_ccall f_239(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_236)
static void C_ccall f_236(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_226)
static void C_ccall f_226(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_201)
static void C_ccall f_201(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_206)
static void C_ccall f_206(C_word c,C_word t0,C_word t1) C_noret;

/* from process */
 int  process(C_u32 t0,void *t1){
C_word x,s=0+3,*a=C_alloc(s);
C_callback_adjust_stack(a,s);
x=C_fix(C_MOST_POSITIVE_FIXNUM&(C_word)t0);
C_save(x);
x=C_mpointer_or_false(&a,(void*)t1);
C_save(x);
return C_unfix(C_callback_wrapper((void *)f_357,2));}

C_noret_decl(tr5)
static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
C_regparm static void C_fcall tr5(C_proc5 k){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
(k)(5,t0,t1,t2,t3,t4);}

C_noret_decl(tr3)
static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
C_regparm static void C_fcall tr3(C_proc3 k){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
(k)(3,t0,t1,t2);}

C_noret_decl(tr7)
static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
C_regparm static void C_fcall tr7(C_proc7 k){
C_word t6=C_pick(0);
C_word t5=C_pick(1);
C_word t4=C_pick(2);
C_word t3=C_pick(3);
C_word t2=C_pick(4);
C_word t1=C_pick(5);
C_word t0=C_pick(6);
C_adjust_stack(-7);
(k)(7,t0,t1,t2,t3,t4,t5,t6);}

C_noret_decl(tr4)
static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
C_regparm static void C_fcall tr4(C_proc4 k){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
(k)(4,t0,t1,t2,t3);}

C_noret_decl(tr2)
static void C_fcall tr2(C_proc2 k) C_regparm C_noret;
C_regparm static void C_fcall tr2(C_proc2 k){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
(k)(2,t0,t1);}

/* toplevel */
static C_TLS int toplevel_initialized=0;
C_main_entry_point
C_noret_decl(toplevel_trampoline)
static void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;
C_regparm static void C_fcall toplevel_trampoline(void *dummy){
C_toplevel(2,C_SCHEME_UNDEFINED,C_restore);}

void C_ccall C_toplevel(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
else C_toplevel_entry(C_text("toplevel"));
C_resize_stack(131072);
C_check_nursery_minimum(3);
if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
if(!C_demand_2(170)){
C_save(t1);
C_rereclaim2(170*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
C_initialize_lf(lf,25);
lf[0]=C_h_intern(&lf[0],16,"jack_client_open");
lf[1]=C_h_intern(&lf[1],17,"\003sysmake-c-string");
lf[2]=C_h_intern(&lf[2],17,"jack_client_close");
lf[3]=C_h_intern(&lf[3],21,"jack_client_name_size");
lf[4]=C_h_intern(&lf[4],20,"jack_get_client_name");
lf[5]=C_h_intern(&lf[5],17,"\003syspeek-c-string");
lf[6]=C_h_intern(&lf[6],13,"jack_activate");
lf[7]=C_h_intern(&lf[7],6,"\003sysgc");
lf[8]=C_h_intern(&lf[8],15,"jack_deactivate");
lf[9]=C_h_intern(&lf[9],18,"jack_port_register");
lf[10]=C_h_intern(&lf[10],20,"jack_port_unregister");
lf[11]=C_h_intern(&lf[11],20,"jack_port_get_buffer");
lf[12]=C_h_intern(&lf[12],7,"process");
lf[13]=C_h_intern(&lf[13],7,"display");
lf[14]=C_decode_literal(C_heaptop,"\376B\000\000\017processing ...\012");
lf[15]=C_h_intern(&lf[15],4,"port");
lf[16]=C_h_intern(&lf[16],25,"\003sysimplicit-exit-handler");
lf[17]=C_decode_literal(C_heaptop,"\376B\000\000\003ok\012");
lf[18]=C_decode_literal(C_heaptop,"\376B\000\000\024jack_deactivate ...\012");
lf[19]=C_h_intern(&lf[19],5,"sleep");
lf[20]=C_decode_literal(C_heaptop,"\376B\000\000\003ok\012");
lf[21]=C_decode_literal(C_heaptop,"\376B\000\000\022jack_activate ...\012");
lf[22]=C_decode_literal(C_heaptop,"\376B\000\000\003out");
lf[23]=C_decode_literal(C_heaptop,"\376B\000\000\02732 bit float mono audio");
lf[24]=C_decode_literal(C_heaptop,"\376B\000\000\004pipo");
C_register_lf2(lf,25,create_ptable());
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_191,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}

/* k189 */
static void C_ccall f_191(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_191,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_194,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}

/* k192 in k189 */
static void C_ccall f_194(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_194,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_197,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_posix_toplevel(2,C_SCHEME_UNDEFINED,t2);}

/* k195 in k192 in k189 */
static void C_ccall f_197(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word ab[33],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_197,2,t0,t1);}
t2=C_mutate((C_word*)lf[0]+1 /* (set! jack_client_open ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_201,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
t3=C_mutate((C_word*)lf[2]+1 /* (set! jack_client_close ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_226,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
t4=C_mutate((C_word*)lf[3]+1 /* (set! jack_client_name_size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_236,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
t5=C_mutate((C_word*)lf[4]+1 /* (set! jack_get_client_name ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_239,a[2]=((C_word)li3),tmp=(C_word)a,a+=3,tmp));
t6=C_mutate((C_word*)lf[6]+1 /* (set! jack_activate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_253,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
t7=C_mutate((C_word*)lf[8]+1 /* (set! jack_deactivate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_269,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp));
t8=C_mutate((C_word*)lf[9]+1 /* (set! jack_port_register ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_279,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
t9=C_mutate((C_word*)lf[10]+1 /* (set! jack_port_unregister ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_319,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
t10=C_mutate((C_word*)lf[11]+1 /* (set! jack_port_get_buffer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_336,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp));
t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_351,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:145: jack_client_open");
((C_proc5)C_retrieve_proc(*((C_word*)lf[0]+1)))(5,*((C_word*)lf[0]+1),t11,lf[24],C_fix(0),C_mpointer_or_false(&a,(void*)&status));}

/* k349 in k195 in k192 in k189 */
static void C_ccall f_351(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word ab[9],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_351,2,t0,t1);}
t2=(C_truep(t1)?C_i_foreign_pointer_argumentp(t1):C_SCHEME_FALSE);
t3=(client=(struct _jack_client *)C_c_pointer_or_null(t2),C_SCHEME_UNDEFINED);
t4=C_mutate((C_word*)lf[12]+1 /* (set! process ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_357,a[2]=((C_word)li10),tmp=(C_word)a,a+=3,tmp));
t5=stub156(C_SCHEME_UNDEFINED);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_370,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:169: jack_port_register");
((C_proc7)C_retrieve_proc(*((C_word*)lf[9]+1)))(7,*((C_word*)lf[9]+1),t6,C_mpointer_or_false(&a,(void*)client),lf[22],lf[23],C_fix(2),C_fix(0));}

/* k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_370(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_370,2,t0,t1);}
t2=C_mutate((C_word*)lf[15]+1 /* (set! port ...) */,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_373,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:171: display");
((C_proc3)C_retrieve_proc(*((C_word*)lf[13]+1)))(3,*((C_word*)lf[13]+1),t3,lf[21]);}

/* k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_373(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_373,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_376,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:172: jack_activate");
((C_proc3)C_retrieve_proc(*((C_word*)lf[6]+1)))(3,*((C_word*)lf[6]+1),t2,C_mpointer_or_false(&a,(void*)client));}

/* k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_376(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_376,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_379,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:173: display");
((C_proc3)C_retrieve_proc(*((C_word*)lf[13]+1)))(3,*((C_word*)lf[13]+1),t2,lf[20]);}

/* k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_379(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_379,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_382,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:175: sleep");
((C_proc3)C_retrieve_symbol_proc(lf[19]))(3,*((C_word*)lf[19]+1),t2,C_fix(1));}

/* k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_382(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_382,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_385,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:177: display");
((C_proc3)C_retrieve_proc(*((C_word*)lf[13]+1)))(3,*((C_word*)lf[13]+1),t2,lf[18]);}

/* k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_385,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_388,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:178: jack_deactivate");
((C_proc3)C_retrieve_proc(*((C_word*)lf[8]+1)))(3,*((C_word*)lf[8]+1),t2,C_mpointer_or_false(&a,(void*)client));}

/* k386 in k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_388(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_388,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_391,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:179: display");
((C_proc3)C_retrieve_proc(*((C_word*)lf[13]+1)))(3,*((C_word*)lf[13]+1),t2,lf[17]);}

/* k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_391(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_391,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_394,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:181: jack_port_unregister");
((C_proc4)C_retrieve_proc(*((C_word*)lf[10]+1)))(4,*((C_word*)lf[10]+1),t2,C_mpointer_or_false(&a,(void*)client),C_retrieve(lf[15]));}

/* k392 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_394(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_394,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_397,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("jack.scm:183: jack_client_close");
((C_proc3)C_retrieve_proc(*((C_word*)lf[2]+1)))(3,*((C_word*)lf[2]+1),t2,C_mpointer_or_false(&a,(void*)client));}

/* k395 in k392 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_397(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_397,2,t0,t1);}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_400,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_403,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#implicit-exit-handler");
((C_proc2)C_retrieve_symbol_proc(lf[16]))(2,*((C_word*)lf[16]+1),t3);}

/* k401 in k395 in k392 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_403(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=t1;
((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}

/* k398 in k395 in k392 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k349 in k195 in k192 in k189 */
static void C_ccall f_400(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}

/* process in k349 in k195 in k192 in k189 */
static void C_ccall f_357(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[4],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr4,(void*)f_357,4,t0,t1,t2,t3);}
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_361,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_trace("jack.scm:161: display");
((C_proc3)C_retrieve_proc(*((C_word*)lf[13]+1)))(3,*((C_word*)lf[13]+1),t4,lf[14]);}

/* k359 in process in k349 in k195 in k192 in k189 */
static void C_ccall f_361(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}

/* jack_port_get_buffer in k195 in k192 in k189 */
static void C_ccall f_336(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word ab[5],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr4,(void*)f_336,4,t0,t1,t2,t3);}
t4=C_a_i_bytevector(&a,1,C_fix(3));
t5=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
t6=C_i_foreign_fixnum_argumentp(t3);
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,stub132(t4,t5,t6));}

/* jack_port_unregister in k195 in k192 in k189 */
static void C_ccall f_319(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr4,(void*)f_319,4,t0,t1,t2,t3);}
t4=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
t5=(C_truep(t3)?C_i_foreign_pointer_argumentp(t3):C_SCHEME_FALSE);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,stub122(C_SCHEME_UNDEFINED,t4,t5));}

/* jack_port_register in k195 in k192 in k189 */
static void C_ccall f_279(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word ab[13],*a=ab;
if(c!=7) C_bad_argc_2(c,7,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr7,(void*)f_279,7,t0,t1,t2,t3,t4,t5,t6);}
t7=C_a_i_bytevector(&a,1,C_fix(3));
t8=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_288,a[2]=t8,a[3]=t7,a[4]=t1,a[5]=t6,a[6]=t5,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t3)){
t10=C_i_foreign_string_argumentp(t3);
C_trace("##sys#make-c-string");
((C_proc3)C_retrieve_symbol_proc(lf[1]))(3,*((C_word*)lf[1]+1),t9,t10);}
else{
t10=t9;
f_288(2,t10,C_SCHEME_FALSE);}}

/* k286 in jack_port_register in k195 in k192 in k189 */
static void C_ccall f_288(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_288,2,t0,t1);}
t2=((C_word*)t0)[7];
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_292,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t2)){
t4=C_i_foreign_string_argumentp(t2);
C_trace("##sys#make-c-string");
((C_proc3)C_retrieve_symbol_proc(lf[1]))(3,*((C_word*)lf[1]+1),t3,t4);}
else{
t4=t3;
f_292(2,t4,C_SCHEME_FALSE);}}

/* k290 in k286 in jack_port_register in k195 in k192 in k189 */
static void C_ccall f_292(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_i_foreign_unsigned_integer_argumentp(((C_word*)t0)[7]);
t3=C_i_foreign_unsigned_integer_argumentp(((C_word*)t0)[6]);
t4=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub106(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,t2,t3));}

/* jack_deactivate in k195 in k192 in k189 */
static void C_ccall f_269(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr3,(void*)f_269,3,t0,t1,t2);}
t3=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub96(C_SCHEME_UNDEFINED,t3));}

/* jack_activate in k195 in k192 in k189 */
static void C_ccall f_253(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr3,(void*)f_253,3,t0,t1,t2);}
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_257,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
C_trace("##sys#gc");
((C_proc3)C_retrieve_symbol_proc(lf[7]))(3,*((C_word*)lf[7]+1),t3,C_SCHEME_FALSE);}

/* k255 in jack_activate in k195 in k192 in k189 */
static void C_ccall f_257(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word ab[11],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_257,2,t0,t1);}
t2=C_a_i_bytevector(&a,1,C_fix(6));
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)stub86,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp);
t4=((C_word*)t0)[3];
t5=(C_truep(t4)?C_i_foreign_pointer_argumentp(t4):C_SCHEME_FALSE);
C_trace("g9192");
t6=t3;
((C_proc4)C_retrieve_proc(t6))(4,t6,((C_word*)t0)[2],t2,t5);}

/* jack_get_client_name in k195 in k192 in k189 */
static void C_ccall f_239(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr3,(void*)f_239,3,t0,t1,t2);}
t3=C_a_i_bytevector(&a,1,C_fix(3));
t4=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
t5=stub79(t3,t4);
C_trace("##sys#peek-c-string");
t6=*((C_word*)lf[5]+1);
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,t5,C_fix(0));}

/* jack_client_name_size in k195 in k192 in k189 */
static void C_ccall f_236(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_236,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,stub76(C_SCHEME_UNDEFINED));}

/* jack_client_close in k195 in k192 in k189 */
static void C_ccall f_226(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr3,(void*)f_226,3,t0,t1,t2);}
t3=(C_truep(t2)?C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,stub71(C_SCHEME_UNDEFINED,t3));}

/* jack_client_open in k195 in k192 in k189 */
static void C_ccall f_201(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word ab[11],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr5,(void*)f_201,5,t0,t1,t2,t3,t4);}
t5=C_a_i_bytevector(&a,1,C_fix(3));
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_206,a[2]=t5,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
if(C_truep(t2)){
t7=C_i_foreign_string_argumentp(t2);
C_trace("##sys#make-c-string");
((C_proc3)C_retrieve_symbol_proc(lf[1]))(3,*((C_word*)lf[1]+1),t6,t7);}
else{
t7=t6;
f_206(2,t7,C_SCHEME_FALSE);}}

/* k204 in jack_client_open in k195 in k192 in k189 */
static void C_ccall f_206(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
t2=C_i_foreign_integer_argumentp(((C_word*)t0)[5]);
t3=((C_word*)t0)[4];
t4=(C_truep(t3)?C_i_foreign_pointer_argumentp(t3):C_SCHEME_FALSE);
t5=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,stub60(((C_word*)t0)[2],t1,t2,t4));}

#ifdef C_ENABLE_PTABLES
static C_PTABLE_ENTRY ptable[33] = {
{"toplevel:jack_scm",(void*)C_toplevel},
{"f_191:jack_scm",(void*)f_191},
{"f_194:jack_scm",(void*)f_194},
{"f_197:jack_scm",(void*)f_197},
{"f_351:jack_scm",(void*)f_351},
{"f_370:jack_scm",(void*)f_370},
{"f_373:jack_scm",(void*)f_373},
{"f_376:jack_scm",(void*)f_376},
{"f_379:jack_scm",(void*)f_379},
{"f_382:jack_scm",(void*)f_382},
{"f_385:jack_scm",(void*)f_385},
{"f_388:jack_scm",(void*)f_388},
{"f_391:jack_scm",(void*)f_391},
{"f_394:jack_scm",(void*)f_394},
{"f_397:jack_scm",(void*)f_397},
{"f_403:jack_scm",(void*)f_403},
{"f_400:jack_scm",(void*)f_400},
{"f_357:jack_scm",(void*)f_357},
{"f_361:jack_scm",(void*)f_361},
{"f_336:jack_scm",(void*)f_336},
{"f_319:jack_scm",(void*)f_319},
{"f_279:jack_scm",(void*)f_279},
{"f_288:jack_scm",(void*)f_288},
{"f_292:jack_scm",(void*)f_292},
{"f_269:jack_scm",(void*)f_269},
{"f_253:jack_scm",(void*)f_253},
{"f_257:jack_scm",(void*)f_257},
{"f_239:jack_scm",(void*)f_239},
{"f_236:jack_scm",(void*)f_236},
{"f_226:jack_scm",(void*)f_226},
{"f_201:jack_scm",(void*)f_201},
{"f_206:jack_scm",(void*)f_206},
{NULL,NULL}};
#endif

static C_PTABLE_ENTRY *create_ptable(void){
#ifdef C_ENABLE_PTABLES
return ptable;
#else
return NULL;
#endif
}
/* end of file */