CogVM source as per FileAttributesPlugin.oscog-eem.59

And fix yet another regression in eliding the first element (S_IFMT) in the Array version by mistake.
OpenSmalltalk · Sep 7, 2020 · 62947b6 · 62947b6
1 parent b6f3f2f
commit 62947b6
Showing 1 changed file with 4 additions and 13 deletions.
diff --git a/src/plugins/FileAttributesPlugin/FileAttributesPlugin.c b/src/plugins/FileAttributesPlugin/FileAttributesPlugin.c
@@ -1,9 +1,9 @@
 /* Automatically generated by
 	VMPluginCodeGenerator VMMaker.oscog-eem.2800 uuid: a6116113-df13-435d-968d-e9b111676754
    from
-	FileAttributesPlugin FileAttributesPlugin.oscog-eem.57 uuid: 6f82e8ad-42c9-484c-8b96-2c7b400f9208
+	FileAttributesPlugin FileAttributesPlugin.oscog-eem.59 uuid: 9ba1691a-0301-4e11-9903-c2a0aa91cee4
  */
-static char __buildInfo[] = "FileAttributesPlugin FileAttributesPlugin.oscog-eem.57 uuid: 6f82e8ad-42c9-484c-8b96-2c7b400f9208 " __DATE__ ;
+static char __buildInfo[] = "FileAttributesPlugin FileAttributesPlugin.oscog-eem.59 uuid: 9ba1691a-0301-4e11-9903-c2a0aa91cee4 " __DATE__ ;
 
 
 
@@ -188,7 +188,7 @@ extern sqInt storePointerofObjectwithValue(sqInt index, sqInt oop, sqInt valuePo
 extern
 #endif
 struct VirtualMachine* interpreterProxy;
-static const char *moduleName = "FileAttributesPlugin FileAttributesPlugin.oscog-eem.57 " INT_EXT;
+static const char *moduleName = "FileAttributesPlugin FileAttributesPlugin.oscog-eem.59 " INT_EXT;
 static void * sCLPfn;
 static void * sCOFfn;
 static int hasSecurityPlugin = 1;
@@ -750,7 +750,6 @@ primitiveFileMasks(void)
     sqInt masksArray;
     sqInt masksObj;
     sqInt maybeClassWordArray;
-    sqInt nilObj;
 
 	maybeClassWordArray = classWordArray();
 	if (maybeClassWordArray == (nilObject())) {
@@ -761,29 +760,21 @@ primitiveFileMasks(void)
 			goto l1;
 		}
 		masks = ((sqInt *) (firstIndexableField(masksArray)));
-		nilObj = nilObject();
+		masks[0] = (integerObjectOf(S_IFMT));
 #    if defined(S_IFSOCK)
 		masks[1] = (integerObjectOf(S_IFSOCK));
-#    else
-		masks[1] = nilObj;
 #    endif
 #    if defined(S_IFLNK)
 		masks[2] = (integerObjectOf(S_IFLNK));
-#    else
-		masks[1] = nilObj;
 #    endif
 		masks[3] = (integerObjectOf(S_IFREG));
 #    if defined(S_IFBLK)
 		masks[4] = (integerObjectOf(S_IFBLK));
-#    else
-		masks[1] = nilObj;
 #    endif
 		masks[5] = (integerObjectOf(S_IFDIR));
 		masks[6] = (integerObjectOf(S_IFCHR));
 #    if defined(S_IFIFO)
 		masks[7] = (integerObjectOf(S_IFIFO));
-#    else
-		masks[1] = nilObj;
 #    endif
 		methodReturnValue(masksArray);
 	l1:	/* end primitiveFileMasksAsArray */;