[gandr]: implement /_PDCLIB_(alloc|free)pages/

[pdclib.old] / platform / gandr / functions / _PDCLIB / _PDCLIB_freepages.c

diff --git a/platform/gandr/functions/_PDCLIB/_PDCLIB_freepages.c b/platform/gandr/functions/_PDCLIB/_PDCLIB_freepages.c
index c77687652e64de0739b74998a9f5a954fbd247e9..285589f6003596b8c362be35e5d442c7852f72fb 100644 (file)
--- a/platform/gandr/functions/_PDCLIB/_PDCLIB_freepages.c
+++ b/platform/gandr/functions/_PDCLIB/_PDCLIB_freepages.c
@@ -13,10 +13,15 @@
 #include <stddef.h>\r
 #include <_PDCLIB_glue.h>\r
 #include <errno.h>\r
+#include <gd_bal.h>\r
 \r
 void _PDCLIB_freepages( void * p, size_t n )\r
 {\r
-    return;\r
+    int rv = 0;\r
+    if((rv = gd_free_pages( p, n ))) {\r
+        perror("_PDCLIB_freepages");\r
+        abort();\r
+    }\r
 }\r
 \r
 #ifdef TEST\r