CONST maxint = 32767; (* redefine *) minint = -32768;
To be pedantic, you might want to write `MinInt = -MaxInt;' since the standard demands a symmetric range of Integer.
Uh...
'-MaxInt' would imply -32767..32767, which wastes a potential stored value (and cannot accomidate interfacing with other languages, which do not have this restriction).
'-MinInt' would imply -32768 (yes, negative; run the negation in 2's compliment and you will see what I mean).
By 'symmetric,' do you mean that the Pascal standard actually calls for the INTEGER type to have the same negative range as positive?
===== ======= Frank D. Engel, Jr.
__________________________________________________ Do you Yahoo!? Yahoo! Mail Plus - Powerful. Affordable. Sign up now. http://mailplus.yahoo.com