bridge/class-master/depend/pari/src/basemath/gen2.c
/* x a scalar, y a t_VECSMALL */
x a scalar, y a t_VECSMALL
x a scalar y a t_VECSMALL
static int
lexcmp_scal_vecsmall(GEN x, GEN y)
{
  int fl;
  if (lg(y)==1) return 1;
  fl = lexcmpgs(x, y[1]);
  if (fl) return fl;
  return -1;
}
static int lexcmp_scal_vecsmall ( GEN x , GEN y ) { int fl ; if ( lg ( y ) == 1 ) return 1 ; fl = lexcmpgs ( x , y [ 1 ] ) ; if ( fl ) return fl ; return -1 ; }
x a scalar, y a t_VECSMALL
x a scalar y a t_VECSMALL