X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Flanguage%2Futilities%2Fpermissions.c;h=3f679c150e21968370c2b2d283fcdfb7145f4131;hb=35717813005e999b6b807fc3f4bd6bb2d770f301;hp=904ba95b270e2a7de6c5a22e729f64b8b3247cf1;hpb=7635ce0697c163bd9c80adb8b382df7a9aa97f42;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);