X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Futilities%2Fpermissions.c;fp=src%2Flanguage%2Futilities%2Fpermissions.c;h=3f679c150e21968370c2b2d283fcdfb7145f4131;hb=6276f76974fc271d325e9756357618c384a33b82;hp=904ba95b270e2a7de6c5a22e729f64b8b3247cf1;hpb=43ec93cfe90172f186b71bfc229b34a981f5b128;p=pspp

diff --git a/src/language/utilities/permissions.c b/src/language/utilities/permissions.c
index 904ba95b27..3f679c150e 100644
--- a/src/language/utilities/permissions.c
+++ b/src/language/utilities/permissions.c
@@ -51,9 +51,10 @@ cmd_permissions (struct lexer *lexer, struct dataset *ds UNUSED)
     lex_match (lexer, T_EQUALS);
 
   str = lex_tokcstr (lexer);
-  fn = strdup (str);
+  if (str)
+    fn = strdup (str);
 
-  if (!lex_force_match (lexer, T_STRING))
+  if (!lex_force_match (lexer, T_STRING) || str == NULL)
     goto error;
 
   lex_match (lexer, T_SLASH);