diff --git a/src/frontend/subckt.c b/src/frontend/subckt.c
index d9b36a608..0467ff960 100644
--- a/src/frontend/subckt.c
+++ b/src/frontend/subckt.c
@@ -419,9 +419,12 @@ doit(struct line *deck) {
 #endif
 
   {
-    struct line *last, *lc;
     /* First pass: xtract all the .subckts and stick pointers to them into sss.  */
-    for (last = deck, lc = NULL;  last;  ) {
+
+    struct line *last = deck;
+    struct line *lc   = NULL;
+
+    while (last) {
 
         struct line *c, *lcc;