BugFix: is-digit-p includes hexadecimals
Fixing Logic