Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!wuarchive!uunet!comtst!teqsoft!jmc
From: jmc@teqsoft.UUCP (Jack Cloninger)
Newsgroups: comp.lang.perl
Subject: Re: Math error in Perl PL41
Message-ID: <35@teqsoft.UUCP>
Date: 4 Dec 90 15:26:28 GMT
References: <978@ecicrl.UUCP>
Organization: TeqSoft, 112 N Highway 1, Tequesta, FL 33469 (407-747-7163): Document Processing
Lines: 26

clewis@ecicrl.UUCP (Chris Lewis) writes:

>Complement of 0 doesn't work as expected (Perl 3, PL41, AT&T 3b1, 3.5.1.4).

>The following perl program:
>    $foo = 0;

>    printf "%o, %x, %o\n", 0666, ~$foo, 0666 & ~$foo;

>prints:

>    666, 80000000, 0

>Complement of 0 should be 0xFFFFFFFF (-1) not 0x80000000.

Chris,

I get:
    666, ffffffff, 666
Running Perl 3, PL41, MLC 386SX, SCO UNIX 3.2 v 2.0.

Jack

-- 
Jack Cloninger, TeqSoft, 112 US Highway 1, Tequesta, FL 33469    B-)
...uunet!comtst!teqsoft!jmc       Phone: 407-747-7163  Fax: 407-747-0354


Brought to you by Super Global Mega Corp .com