diff --git a/src/frontend/inp.c b/src/frontend/inp.c
index 5c0f82690..70da4e03a 100644
--- a/src/frontend/inp.c
+++ b/src/frontend/inp.c
@@ -1234,7 +1234,7 @@ inp_dodeck(
     ct->ci_deck = deck;
     ct->ci_mcdeck = mc_deck;
     ct->ci_options = options;
-    if (deck->actualLine)
+    if (deck && deck->actualLine)
         ct->ci_origdeck = deck->actualLine;
     else
         ct->ci_origdeck = ct->ci_deck;
@@ -1576,6 +1576,9 @@ com_source(wordlist *wl)
     wordlist *owl = wl;
     size_t n;
 
+    if (wl == NULL)
+        return;
+
     inter = cp_interactive;
     cp_interactive = FALSE;