Branch: Tag:

2004-05-01

2004-05-01 16:02:30 by Martin Nilsson <mani@lysator.liu.se>

More bitbuffer tests

Rev: lib/modules/ADT.pmod/testsuite.in:1.14

1: - dnl $Id: testsuite.in,v 1.13 2004/05/01 13:58:00 nilsson Exp $ + dnl $Id: testsuite.in,v 1.14 2004/05/01 16:02:30 nilsson Exp $      dnl - ADT.BitBuffer   
26:   test_eq( B->get(4), 8 )   test_eq( B->get(5), 0 )    - dnl test_eq( B->put0(4), B ) - dnl test_eq( sizeof(B), 5 ) - dnl test_eq( B->put1(4), B ) - dnl test_eq( sizeof(B), 9 ) - dnl test_eq( B->get(1), 1 ) - dnl test_eq( B->drain(), "\17" ) - dnl test_eq( sizeof(B), 0 ) - dnl test_eq( B->drain(), "" ) + test_eq( B->put1(9), B ) + test_eq( B->get(9), 0b111111111 )    -  + test_eq( B->put1(1), B ) + test_eq( B->put0(4), B ) + test_eq( sizeof(B), 5 ) + test_eq( B->put1(4), B ) + test_eq( sizeof(B), 9 ) + test_eq( B->get(1), 1 ) + test_eq( B->drain(), "\17" ) + test_eq( sizeof(B), 0 ) + test_eq( B->drain(), "" ) + test_eval_error( B->get(1) ) +    test_do( add_constant( "B" ) )