===================================================================
RCS file: /home/cvs/OpenXM/src/ox_pari/pari_ftab.c,v
retrieving revision 1.1
retrieving revision 1.4
diff -u -p -r1.1 -r1.4
--- OpenXM/src/ox_pari/pari_ftab.c	2015/08/21 01:20:30	1.1
+++ OpenXM/src/ox_pari/pari_ftab.c	2019/03/29 01:57:46	1.4
@@ -1,6 +1,7 @@
 #include "ox_pari.h"
 
 /* type=1 : one num/poly/mat arg */
+/* type=2 : 1starg=num/poly/mat arg, 2ndarg=0(flag) */
 
 struct parif parif_tab[] = {
 /* (ulong)allocatemoremem(ulong) */
@@ -17,14 +18,13 @@ struct parif parif_tab[] = {
   {"imag",gimag,1},
   {"conj",gconj,1},
   {"ceil",gceil,1},
-  {"isprime",gisprime,1},
+  {"isprime",gisprime,2},
   {"bigomega",gbigomega,1},
   {"denom",denom,1},
   {"numer",numer,1},
   {"lngamma",glngamma,1},
   {"logagm",glogagm,1},
   {"classno",classno,1},
-  {"classno2",classno2,1},
   {"dilog",dilog,1},
   {"disc",discsr,1},
   {"discf",discf,1},
@@ -38,7 +38,7 @@ struct parif parif_tab[] = {
 
   /* num/array */
   {"binary",binaire,1},
-  {"factorint",factorint,1},
+  {"factorint",factorint,2},
   {"factor",Z_factor,1},
   {"cf",gcf,1},
   {"divisors",divisors,1},
@@ -51,6 +51,7 @@ struct parif parif_tab[] = {
   /* poly/array */
   {"galois",galois,1},
   {"roots",roots,1},
+  {"factpol",factpol,1},
 
   /* mat/mat */
   {"adj",adj,1},