From 3b575d5e3d7818fa6478221a55dbe417a66ce0d0 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Tue, 31 Jul 2012 20:39:17 +0200
Subject: [PATCH] lexical #5/19, collapse into `newword'

---
 src/frontend/parser/lexical.c | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

diff --git a/src/frontend/parser/lexical.c b/src/frontend/parser/lexical.c
index e112f1b08..6dc6085e0 100644
--- a/src/frontend/parser/lexical.c
+++ b/src/frontend/parser/lexical.c
@@ -184,15 +184,7 @@ gotchar:
 	case '\n':
             if (i) {
                 buf[i] = '\0';
-                cw->wl_word = copy(buf);
-                // assumption: cw != NULL and cw->wl_next == NULL
-                cw->wl_next = wl_cons(NULL, NULL);
-                cw->wl_next->wl_prev = cw;
-                cw = cw->wl_next;
-                // note: we can overwrite buf and i here
-                //   they  won't be accessed any more (see `goto done')
-                bzero(buf, NEW_BSIZE_SP);
-                i = 0;
+                newword;
             }
                 if (cw->wl_prev) {
                     cw->wl_prev->wl_next = NULL;