Update of /cvsroot/pure-data/externals/miXed/shared/common In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8661/shared/common
Modified Files: port.c Log Message:
Index: port.c =================================================================== RCS file: /cvsroot/pure-data/externals/miXed/shared/common/port.c,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** port.c 20 Apr 2004 13:55:28 -0000 1.10 --- port.c 21 Apr 2004 14:47:34 -0000 1.11 *************** *** 89,92 **** --- 89,93 ---- static t_symbol *portps_vtable; static t_symbol *portps_coll; + static t_symbol *portps_funbuff; static t_symbol *portps_picture;
*************** *** 501,504 **** --- 502,513 ---- }
+ static int imaction_N1_funbuff(t_port *x, char *arg) + { + import_emstart(x, portps_funbuff, &s_, 0); + import_emaddv(x, portps_funbuff, "si;", gensym("embed"), + port_getint(x, 2) != 0); + return (PORT_NEXT); + } + static int imaction_N1_picture(t_port *x, char *arg) { *************** *** 565,568 **** --- 574,587 ---- }
+ static int imaction_P6_funbuff(t_port *x, char *arg) + { + binbuf_addv(x->x_outbb, "ssffs;", + gensym("#X"), gensym("obj"), + port_getx(x, 2), port_gety(x, 3), portps_funbuff); + import_emflush(x, portps_funbuff, &s_); + x->x_nobj++; + return (PORT_NEXT); + } + /* LATER use hammer replacements */ static int imaction_P6_pack(t_port *x, char *arg) *************** *** 749,752 **** --- 768,772 ---- static int imaction_T1_set(t_port *x, char *arg) { + /* FIXME funbuff */ if (import_emcopy(x, portps_vtable)) { *************** *** 841,844 **** --- 861,865 ---- { "vtable", imaction_N1_vtable, 0, 0, 0 }, { "coll", imaction_N1_coll, 0, 0, 0 }, + { "funbuff", imaction_N1_funbuff, 0, 0, 0 }, { "picture", imaction_N1_picture, 0, 0, 0 } }; *************** *** 850,854 **** { "p", imaction_P6_patcher, 0, 0, 0 }, { "table", imaction_P6_table, 0, 0, 0 }, ! { "coll", imaction_P6_coll, 0, 0, 0 } }; static t_portnode imnode_newobj = { imslots_newobj, --- 871,876 ---- { "p", imaction_P6_patcher, 0, 0, 0 }, { "table", imaction_P6_table, 0, 0, 0 }, ! { "coll", imaction_P6_coll, 0, 0, 0 }, ! { "funbuff", imaction_P6_funbuff, 0, 0, 0 } }; static t_portnode imnode_newobj = { imslots_newobj, *************** *** 1270,1273 **** --- 1292,1296 ---- portps_vtable = gensym("vtable"); portps_coll = gensym("coll"); + portps_funbuff = gensym("funbuff"); portps_picture = gensym("picture");