Changed the read-char and peek-char extended primitives to not block if there is not a char ready on the port