aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1996-02-09 17:35:23 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1996-02-09 17:35:23 -0200
commit73be918285f7e2eb0acc02d73effa6a95a8ab08c (patch)
tree531ca3af5cd96cae92eaf3750990f63b06727588
parentca412214cbbeb8f40e9abea534e6171044cc0a57 (diff)
downloadlua-73be918285f7e2eb0acc02d73effa6a95a8ab08c.tar.gz
lua-73be918285f7e2eb0acc02d73effa6a95a8ab08c.tar.bz2
lua-73be918285f7e2eb0acc02d73effa6a95a8ab08c.zip
a backslash followed by a newline allows the newline to go into
a string.
-rw-r--r--iolib.c8
-rw-r--r--lex.c3
2 files changed, 4 insertions, 7 deletions
diff --git a/iolib.c b/iolib.c
index a454084e..38b6f318 100644
--- a/iolib.c
+++ b/iolib.c
@@ -3,7 +3,7 @@
3** Input/output library to LUA 3** Input/output library to LUA
4*/ 4*/
5 5
6char *rcs_iolib="$Id: iolib.c,v 1.33 1996/02/05 21:32:19 roberto Exp roberto $"; 6char *rcs_iolib="$Id: iolib.c,v 1.34 1996/02/09 19:02:30 roberto Exp roberto $";
7 7
8#include <stdio.h> 8#include <stdio.h>
9#include <ctype.h> 9#include <ctype.h>
@@ -380,14 +380,10 @@ static int write_quoted (int just, int m)
380 { 380 {
381 switch (*s) 381 switch (*s)
382 { 382 {
383 case '"': case '\\': 383 case '"': case '\\': case '\n':
384 luaI_addchar('\\'); 384 luaI_addchar('\\');
385 luaI_addchar(*s); 385 luaI_addchar(*s);
386 break; 386 break;
387 case '\n':
388 luaI_addchar('\\');
389 luaI_addchar('n');
390 break;
391 case 0: 387 case 0:
392 goto END_WHILE; 388 goto END_WHILE;
393 default: 389 default:
diff --git a/lex.c b/lex.c
index acb835f8..f499d7a6 100644
--- a/lex.c
+++ b/lex.c
@@ -1,4 +1,4 @@
1char *rcs_lex = "$Id: lex.c,v 2.22 1995/12/21 16:14:04 roberto Exp roberto $"; 1char *rcs_lex = "$Id: lex.c,v 2.23 1996/02/07 14:14:40 roberto Exp roberto $";
2 2
3 3
4#include <ctype.h> 4#include <ctype.h>
@@ -254,6 +254,7 @@ int luaY_lex (void)
254 case 'n': save('\n'); next(); break; 254 case 'n': save('\n'); next(); break;
255 case 't': save('\t'); next(); break; 255 case 't': save('\t'); next(); break;
256 case 'r': save('\r'); next(); break; 256 case 'r': save('\r'); next(); break;
257 case '\n': lua_linenumber++; /* goes through */
257 default : save(current); next(); break; 258 default : save(current); next(); break;
258 } 259 }
259 break; 260 break;