🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: net.lang.mod2
Article #497

Bit stripping... an answer.

#497
From: Peter G. Trei
Date: Wed, 06 Aug 1986 03:53
16 lines
941 bytes

    Alright, here's the 'Right Way' to strip parity in Modula-2:

PROCEDURE StripParity(VAR c:CHAR);
BEGIN
c := CHAR( BITSET(c) * BITSET(127) );
END StripParity;

this is such a trivial procedure it is clearly easier to code it in-line.

						Peter Trei
						oc.trei@cu20b

[My employer would feel insulted if anyone thought it shared veiws with me.]
-------
Technical Details
Message-ID: <12228535854.11.OC.TREI@CU20B.COLUMBIA.EDU>
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!caip!topaz!ll-xn!cit-vax!nike!ucbcad!ucbvax!CU20B.COLUMBIA.EDU!OC.TREI

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: arc1-ca.pugleaf.net!utzoo!watmath!clyde!caip!topaz!ll-xn!cit-vax!nike!ucbcad!ucbvax!CU20B.COLUMBIA.EDU!OC.TREI
From: OC.TREI@CU20B.COLUMBIA.EDU (Peter G. Trei)
Newsgroups: net.lang.mod2
Subject: Bit stripping... an answer.
Message-ID: <12228535854.11.OC.TREI@CU20B.COLUMBIA.EDU>
Date: Tue, 5-Aug-86 23:53:41 EDT
Article-I.D.: CU20B.12228535854.11.OC.TREI
Posted: Tue Aug  5 23:53:41 1986
Date-Received: Thu, 7-Aug-86 02:58:44 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The ARPA Internet
Lines: 16