pike.git / lib / modules / Array.pmod

version» Context lines:

pike.git/lib/modules/Array.pmod:67:    int j = random(i--);    if (j != i) {    mixed tmp = arr[i];    arr[i] = arr[j];    arr[j] = tmp;    }    }    return(arr);   }    + array permute(array a,int n) + { +  int q=sizeof(a); +  int i; +  a=a[..]; // copy    -  +  while (n && q) +  { +  int x=n%q; +  n/=q; +  q--; +  if (x) [a[i],a[i+x]]=({ a[i+x],a[i] }); +  i++; +  } +  +  return a; + } +    int search_array(mixed *arr, mixed fun, mixed ... args)   {    int e;       if(stringp(fun))    {    for(e=0;e<sizeof(arr);e++)    if(arr[e][fun](@args))    return e;    return -1;