From e106683a5e1883b9be5d14532e79a9ca4c3dac80 Mon Sep 17 00:00:00 2001 From: jtc Date: Thu, 4 Nov 1993 20:39:30 +0000 Subject: From Dyane Bruce, db@diana.ocunix.on.ca: I found an error in the table. The same error is found in the SUNOS 4.1.1 version of bcd. It has apparently been around a long time. The error caused 'Q' and 'R' to have the same punch code. I only noticed the error due to someone pointing t out to me when the program was used to print a cover for an APA! --- bcd/bcd.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'bcd') diff --git a/bcd/bcd.c b/bcd/bcd.c index 9da41dce..d236fe36 100644 --- a/bcd/bcd.c +++ b/bcd/bcd.c @@ -42,7 +42,7 @@ char copyright[] = #ifndef lint /*static char sccsid[] = "from: @(#)bcd.c 4.4 (Berkeley) 6/1/90";*/ -static char rcsid[] = "$Id: bcd.c,v 1.2 1993/08/01 18:55:42 mycroft Exp $"; +static char rcsid[] = "$Id: bcd.c,v 1.3 1993/11/04 20:39:30 jtc Exp $"; #endif /* not lint */ /* @@ -78,7 +78,7 @@ u_short holes[256] = { 0x002, 0x001, 0x012, 0x40a, 0x80a, 0x212, 0x00a, 0x006, 0x022, 0x900, 0x880, 0x840, 0x820, 0x810, 0x808, 0x804, 0x802, 0x801, 0x500, 0x480, 0x440, 0x420, 0x410, 0x408, - 0x404, 0x402, 0x402, 0x280, 0x240, 0x220, 0x210, 0x208, + 0x404, 0x402, 0x401, 0x280, 0x240, 0x220, 0x210, 0x208, 0x204, 0x202, 0x201, 0x082, 0x822, 0x600, 0x282, 0x30f, 0x900, 0x880, 0x840, 0x820, 0x810, 0x808, 0x804, 0x802, 0x801, 0x500, 0x480, 0x440, 0x420, 0x410, 0x408, 0x404, @@ -94,7 +94,7 @@ u_short holes[256] = { 0x001, 0x012, 0x40a, 0x80a, 0x212, 0x00a, 0x006, 0x022, 0x900, 0x880, 0x840, 0x820, 0x810, 0x808, 0x804, 0x802, 0x801, 0x500, 0x480, 0x440, 0x420, 0x410, 0x408, 0x404, - 0x402, 0x402, 0x280, 0x240, 0x220, 0x210, 0x208, 0x204, + 0x402, 0x401, 0x280, 0x240, 0x220, 0x210, 0x208, 0x204, 0x202, 0x201, 0x082, 0x806, 0x822, 0x600, 0x282, 0x30f, 0x900, 0x880, 0x840, 0x820, 0x810, 0x808, 0x804, 0x802, 0x801, 0x500, 0x480, 0x440, 0x420, 0x410, 0x408, 0x404, -- cgit v1.2.3-56-ge451