@@ -9,7 +9,7 @@ chr x = prim__intToChar x
99
1010-- | Convert the number to its ASCII equivalent.
1111ord : Char -> Int
12−ord x = prim__charToInt
12+ord x = prim__charToInt x
1313
1414-- | Returns true if the character is in the range [A-Z].
1515isUpper : Char -> Bool
@@ -64,6 +64,6 @@ isHexDigit x = elem (toUpper x) hexChars where
6464
6565-- | Returns true if the character is an octal digit.
6666isOctDigit : Char -> Bool
67−isOctDigit x = (x >= '0' && x <= '9')
67+isOctDigit x = (x >= '0' && x <= '7')
6868
6969-- --------------------------------------------------------------------- [ EOF ]