X-Git-Url: https://pd.if.org/git/?p=pdclib.old;a=blobdiff_plain;f=platform%2Fgandr%2Ffunctions%2F_PDCLIB%2F_PDCLIB_allocpages.c;h=485177914b3709ff0e07939b5581f953223e4c64;hp=bdcd525ca3ece71ab92d2e63829c357113eb58b2;hb=cf570d22242daae63a9763efcd05c45bc8a6c6b8;hpb=866b99d6c4b5cbcb210d38258b16a32da7a81420

diff --git a/platform/gandr/functions/_PDCLIB/_PDCLIB_allocpages.c b/platform/gandr/functions/_PDCLIB/_PDCLIB_allocpages.c
index bdcd525..4851779 100644
--- a/platform/gandr/functions/_PDCLIB/_PDCLIB_allocpages.c
+++ b/platform/gandr/functions/_PDCLIB/_PDCLIB_allocpages.c
@@ -6,18 +6,23 @@
    Permission is granted to use, modify, and / or redistribute at will.
 */
 
-/* This is a stub implementation of _PDCLIB_allocpages
-*/
-
 #include <stdint.h>
 #include <stddef.h>
 #include <_PDCLIB_glue.h>
 #include <errno.h>
+#include <gd_bal.h>
 
 void * _PDCLIB_allocpages( size_t n )
 {
-    errno = ENOTSUP;
-    return NULL;
+    void *p = NULL;
+    int rv = gd_alloc_pages( gd_loader_data, &p, n );
+
+    if (rv) {
+        errno = rv;
+        return NULL;
+    } else {
+        return p;
+    }
 }
 
 #ifdef TEST