changeset 2924 | 908851e59958 |
parent 2716 | b9ca1bfca24f |
child 2948 | 3f21a9dc93d0 |
2923:e33ecd95aa1a | 2924:908851e59958 |
---|---|
19 {$INCLUDE "options.inc"} |
19 {$INCLUDE "options.inc"} |
20 |
20 |
21 unit uRandom; |
21 unit uRandom; |
22 interface |
22 interface |
23 uses uFloat; |
23 uses uFloat; |
24 {$INCLUDE "proto.inc"} |
24 {$INCLUDE "config.inc"} |
25 |
25 |
26 procedure init_uRandom; |
26 procedure init_uRandom; |
27 procedure free_uRandom; |
27 procedure free_uRandom; |
28 |
28 |
29 procedure SetRandomSeed(Seed: shortstring); |
29 procedure SetRandomSeed(Seed: shortstring); |