From f2f43bcce7f240a13ca0a85b835ad2173ef74a89 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Tue, 31 Jul 2012 20:38:30 +0200
Subject: [PATCH] lexical #1/19, use wl_cons

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

diff --git a/src/frontend/parser/lexical.c b/src/frontend/parser/lexical.c
index 4b4159a74..af94d465d 100644
--- a/src/frontend/parser/lexical.c
+++ b/src/frontend/parser/lexical.c
@@ -75,10 +75,9 @@ static int numeofs = 0;
  */
 
 #define newword cw->wl_word = copy(buf); \
-        cw->wl_next = alloc(struct wordlist); \
+        cw->wl_next = wl_cons(NULL, NULL); \
         cw->wl_next->wl_prev = cw; \
         cw = cw->wl_next; \
-        cw->wl_next = NULL; \
         bzero(buf, NEW_BSIZE_SP); \
         i = 0;