Avoid using now obsolete AllocDosObject() in MorphOS

jens-maus · Jan 1, 2009 · 7480076 · 7480076
1 parent 77f01e4
commit 7480076
Showing 1 changed file with 25 additions and 0 deletions.
diff --git a/src/base64.c b/src/base64.c
@@ -147,6 +147,31 @@ openIn(STRPTR name, int64 *size)
   return file;
 }
 
+#elif defined(__MORPHOS__)
+static BPTR
+openIn(STRPTR name, ULONG * size)
+{
+  struct FileInfoBlock fib;
+  BPTR file;
+
+  ENTER();
+
+  if((file = Open(name,MODE_OLDFILE)))
+  {
+    if(!ExamineFH(file,&fib))
+    {
+  	   Close(file);
+      file = 0;
+    }
+    else
+    {
+    	*size = fib.fib_Size;
+    }
+  }
+
+  RETURN(file);
+  return file;
+}
 #else
 static BPTR
 openIn(STRPTR name, ULONG * size)