7 #include "cl_number_io.h"
15 void read_number_junk (const char * string_rest, const char * string, const char * string_limit)
17 fprint(cl_stderr, "Junk after number: ");
18 { for (const char * ptr = string; ptr != string_rest; ptr++)
19 fprintchar(cl_stderr, *ptr);
21 fprint(cl_stderr, "\"");
22 { for (const char * ptr = string_rest; ptr != string_limit; ptr++)
23 fprintchar(cl_stderr, *ptr);
25 fprint(cl_stderr, "\"\n");