[system] / trunk / pg / macros / PGbasicmacros.pl Repository:
ViewVC logotype

Diff of /trunk/pg/macros/PGbasicmacros.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1314 Revision 1328
977 return $li[random(1,scalar(@li))-1]; 977 return $li[random(1,scalar(@li))-1];
978} 978}
979 979
980sub SRAND { # resets the main random generator -- use cautiously 980sub SRAND { # resets the main random generator -- use cautiously
981 my $seed = shift; 981 my $seed = shift;
982 PG_random_generator -> srand($seed); 982 $PG_random_generator -> srand($seed);
983} 983}
984 984
985# display macros 985# display macros
986 986
987=head2 Display Macros 987=head2 Display Macros

Legend:
Removed from v.1314  
changed lines
  Added in v.1328

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9