File: intfuncs.tst

package info (click to toggle)
gap 4.15.1-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 110,212 kB
  • sloc: ansic: 97,261; xml: 48,343; cpp: 13,946; sh: 4,900; perl: 1,650; javascript: 255; makefile: 252; ruby: 9
file content (25 lines) | stat: -rw-r--r-- 788 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
#
# Tests for functions defined in src/intfuncs.c
#
gap> START_TEST("kernel/intfuncs.tst");

#
gap> InitRandomMT(fail);
Error, InitRandomMT: <initstr> must be a string (not the value 'fail')

#
gap> HASHKEY_BAG(0, 0, 0, 0);
0
gap> HASHKEY_BAG(Z(2), 0, 0, 0);
Error, HASHKEY_BAG: <obj> must not be an FFE
gap> HASHKEY_BAG("x", fail, 0, 0);
Error, HASHKEY_BAG: <seed> must be a small integer (not the value 'fail')
gap> HASHKEY_BAG("x", 0, fail, 0);
Error, HASHKEY_BAG: <offset> must be a small integer (not the value 'fail')
gap> HASHKEY_BAG("x", 0, 1000, 0);
Error, HashKeyBag: <offset> must be non-negative and less than the bag size
gap> HASHKEY_BAG("x", 0, 0, fail);
Error, HASHKEY_BAG: <maxlen> must be a small integer (not the value 'fail')

#
gap> STOP_TEST("kernel/intfuncs.tst");