*BSD News Article 1785


Return to BSD News archive

Xref: sserve comp.lang.perl:10215 comp.unix.bsd:1818
Path: sserve!manuel!munnari.oz.au!network.ucsd.edu!swrinde!gatech!bloom-beacon!bloom-picayune.mit.edu!athena.mit.edu!eichin
From: eichin@athena.mit.edu (Mark W. Eichin)
Newsgroups: comp.lang.perl,comp.unix.bsd
Subject: perl-4.035 on Jolitz' 386BSD
Message-ID: <EICHIN.92Jul1235310@tsx-11.mit.edu>
Date: 2 Jul 92 03:53:18 GMT
Sender: news@athena.mit.edu (News system)
Organization: Massachusetts Institute of Technology
Lines: 104
Nntp-Posting-Host: tsx-11.mit.edu

Only two problems with the perl-4.035 distribution under 386BSD (no
hints, just add -D_ANSI_SOURCE to ccflags to avoid a conflicting
setenv declaration.)

lib/dbm.t assumes that the dbm file will have a .dir and .pag
component; the dbm implementation under 386BSD only uses one, a ".db"
file. This makes lib/dbm tests 2 and 9 fail... test 2 is checking the
protections (which do get set correctly) and 9 checks the size of the
..pag file. (In other words, perl is ok, the tests are wrong.)

The other bug is with lib/big; I haven't worked it out yet, but the
failure is pretty drastic; I haven't had time to debug it yet, but if
you've seen similar failures before let me know what the cause was and
I'll look for something in common.
				_Mark_ <eichin@athena.mit.edu>
				MIT Student Information Processing Board
				Cygnus Support <eichin@cygnus.com>

.../perl lib/big.t
1..246
not ok 73
# '&badd('+9999','+1');' expected: '+10000' got: '+999900001'
not ok 74
# '&badd('+99999','+1');' expected: '+100000' got: '+9999900001'
not ok 78
# '&badd('+999999999','+1');' expected: '+1000000000' got: '+99999999900001'
not ok 79
# '&badd('+9999999999','+1');' expected: '+10000000000' got: '+999999999900001'
not ok 83
# '&badd('+1000','-1');' expected: '+999' got: '+99999999'
not ok 84
# '&badd('+10000','-1');' expected: '+9999' got: '+999999999'
not ok 88
# '&badd('+100000000','-1');' expected: '+99999999' got: '+9999999999999'
not ok 89
# '&badd('+1000000000','-1');' expected: '+999999999' got: '+99999999999999'
not ok 91
# '&badd('+123456789','+987654321');' expected: '+1111111110' got: '+111111111000000'
not ok 92
# '&badd('-123456789','+987654321');' expected: '+864197532' got: '+86419753200000'
not ok 93
# '&badd('-123456789','-987654321');' expected: '-1111111110' got: '-111111111000000'
not ok 94
# '&badd('+123456789','-987654321');' expected: '-864197532' got: '-86419753200000'
not ok 110
# '&bsub('+9999','+1');' expected: '+9998' got: '+999899999'
not ok 111
# '&bsub('+99999','+1');' expected: '+99998' got: '+9999899999'
not ok 115
# '&bsub('+999999999','+1');' expected: '+999999998' got: '+99999999899999'
not ok 116
# '&bsub('+9999999999','+1');' expected: '+9999999998' got: '+999999999899999'
not ok 120
# '&bsub('+1000','-1');' expected: '+1001' got: '+100000001'
not ok 121
# '&bsub('+10000','-1');' expected: '+10001' got: '+1000000001'
not ok 125
# '&bsub('+100000000','-1');' expected: '+100000001' got: '+10000000000001'
not ok 126
# '&bsub('+1000000000','-1');' expected: '+1000000001' got: '+100000000000001'
not ok 128
# '&bsub('+123456789','+987654321');' expected: '-864197532' got: '-86419753200000'
not ok 129
# '&bsub('-123456789','+987654321');' expected: '-1111111110' got: '-111111111000000'
not ok 130
# '&bsub('-123456789','-987654321');' expected: '+864197532' got: '+86419753200000'
not ok 131
# '&bsub('+123456789','-987654321');' expected: '+1111111110' got: '+111111111000000'
not ok 151
# '&bmul('+10101','+10101');' expected: '+102030201' got: '+1020302010000000000'
not ok 153
# '&bmul('+100010001','+100010001');' expected: '+10002000300020001' got: '+100020003000200010000000000'
not ok 178
# '&bdiv('+1000000000','+9');' expected: '+111111111' got: '+11111111111111'
not ok 179
# '&bdiv('+2000000000','+9');' expected: '+222222222' got: '+22222222222222'
not ok 180
# '&bdiv('+3000000000','+9');' expected: '+333333333' got: '+33333333333333'
not ok 181
# '&bdiv('+4000000000','+9');' expected: '+444444444' got: '+44444444444444'
not ok 182
# '&bdiv('+5000000000','+9');' expected: '+555555555' got: '+55555555555555'
not ok 183
# '&bdiv('+6000000000','+9');' expected: '+666666666' got: '+66666666666666'
not ok 184
# '&bdiv('+7000000000','+9');' expected: '+777777777' got: '+77777777777777'
not ok 185
# '&bdiv('+8000000000','+9');' expected: '+888888888' got: '+88888888888888'
not ok 186
# '&bdiv('+9000000000','+9');' expected: '+1000000000' got: '+100000000000000'
not ok 189
# '&bdiv('+106500000','+339');' expected: '+314159' got: '+31415929203'
not ok 190
# '&bdiv('+1000000000','+3');' expected: '+333333333' got: '+33333333333333'
not ok 193
# '&bdiv('+1000','+8');' expected: '+125' got: '+12500000'
not ok 194
# '&bdiv('+10000','+16');' expected: '+625' got: '+62500000'
not ok 198
# '&bdiv('+999999999999','+9999');' expected: '+100010001' got: '+1000'
not ok 225
# '&bmod('+106500000','+339');' expected: '+99' got: '+183'
not ok 234
# '&bmod('+999999999999','+9999');' expected: '+0' got: '+99999999'