2 ***********************************************************
3 $SNARK_Header: S N A R K 1 4 - A PICTURE RECONSTRUCTION PROGRAM $
4 $HeadURL: svn://dig.cs.gc.cuny.edu/snark/trunk/src/snark/getint.cpp $
5 $LastChangedRevision: 80 $
6 $Date: 2014-07-01 21:01:54 -0400 (Tue, 01 Jul 2014) $
8 ***********************************************************
10 GETINT SCANS THE INPUT AREA FOR THE NEXT NUMBER AND RETURNS
11 THE INTERNAL INTEGER REPRESENTATION OF THE NUMBER.
12 IF THE INPUT AREA DOES NOT CONTAIN A NUMBER, ZERO IS
13 RETURNED AND EOL IS SET TO .TRUE.
25 #include "inputfile.h"
27 INTEGER InputFile_class::getint(BOOLEAN NewLine, BOOLEAN* eol)
34 //bug 274 (there is no check for number of digits in the number,
35 //this should be <=9, fixed by Joanna Klukowska
36 INTEGER numOfDigits = 1; //bug 274, RD
48 // FIND START OF NUMBER (FIRST DIGIT) AND SIGN
56 { // NO NUMBER FOUND // bug 190 - swr - 12/09/05
73 // PROCESS INTEGER PART
77 intvalue = 10 * intvalue + (chtoin(nextch));
80 numOfDigits++; //bug 274, jklukowska
81 } while (isdigit(nextch) && numOfDigits <= 9); //bug 274, jklukowska
85 // ERROR - ILLEGAL REPRESENTATION OF NUMBER
87 for (i = 0; i < DATASIZ; i++)
88 { // bug 190 - swr - 12/09/05
94 "\n **** illegal integer modifier encountered\n **** program aborted\n");
97 return sign * intvalue;