Return to test2.rr CVS log

Up to [local] / OpenXM / src / ox_python / Test

Annotation of OpenXM/src/ox_python/Test/test2.rr, Revision 1.1

1.1     ! takayama    1: pari(nextprime,2)$  Pid=0$ // assume the server id of ox_pari is 0
        !             2: //load("python.rr")$ Pid=python.start()$
        !             3: //Pid=ox_launch(0,"ox_asir")$
        !             4: ox_push_cmo(Pid,"Hello")$
        !             5: ox_pop_cmo(Pid);
        !             6: Size=7309676$
        !             7: //Size=1024*10$
        !             8: A=newvect(Size)$
        !             9: for (I=0; I<Size; I++) A[I]=0x41;
        !            10: A=vtol(A)$
        !            11: ox_push_cmo(Pid,99)$
        !            12: ox_push_cmo(Pid,asciitostr(A))$
        !            13: printf("ox_push_cmo(string) is Done.\n")$
        !            14: B=ox_pop_cmo(Pid)$
        !            15: printf("B=ox_pop_cmo(); Done. type(B)=%a\n",type(B))$
        !            16: length(strtoascii(B));
        !            17: ox_pop_cmo(Pid)$ // pop 99
        !            18: end$
        !            19: