* Added '\r' to the list of whitespace characters, as in the patch I found
on http://verno.ueda.info.waseda.ac.jp/network/patch-z . git-svn-id: svn://svn.zoy.org/elk/trunk@195 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
parent
421d32ec28
commit
1e16bd8dd3
|
@ -40,7 +40,7 @@ extern_c Object elk_import False2;
|
|||
#define Print(x) General_Print_Object (x, Curr_Output_Port, 0)
|
||||
#define Numeric(t) (t == T_Fixnum || t == T_Flonum || t == T_Bignum)
|
||||
|
||||
#define Whitespace(c) (c == ' ' || c == '\t' || c == '\014' || c == '\n')
|
||||
#define Whitespace(c) (c == ' ' || c == '\t' || c == '\014' || c == '\n' || c == '\r')
|
||||
#define Delimiter(c) (c == ';' || c == ')' || c == '(' || c == '"')
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue