OpenXM_contrib2/asir2000/io/tcpf.c - diff

Return to tcpf.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / io

version 1.51, 2004/03/05 06:14:50

version 1.53, 2004/03/09 07:18:26

Line 44

* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/io/tcpf.c,v 1.50 2003/12/13 08:03:56 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/io/tcpf.c,v 1.52 2004/03/09 05:33:10 noro Exp $

#include "ca.h"

#include "parse.h"

Line 1237 void Pox_execute_string(NODE arg,Obj *rp)

int s;

int index = QTOS((Q)ARG0(arg));

asir_assert(ARG1(arg),O_STR,"ox_execute_string");

valid_mctab_index(index);

s = m_c_tab[index].c;

ox_send_data(s,ARG1(arg));