Index: idl.c
===================================================================
RCS file: /home/cvs/l4/pkg/loader/server/src/idl.c,v
retrieving revision 1.25
diff -u -r1.25 idl.c
--- idl.c	8 Apr 2006 22:05:39 -0000	1.25
+++ idl.c	15 Nov 2006 14:18:18 -0000
@@ -234,11 +234,28 @@
 #endif
 }
 
+void *
+CORBA_alloc(unsigned long s)
+{
+  static char buf[1024];
+  return buf;
+}
+
+void
+CORBA_free(void *p)
+{
+}
+
 /** IDL server loop */
 void
 server_loop(void)
 {
-  l4loader_app_server_loop(NULL);
+  CORBA_Server_Environment env = dice_default_server_environment;
+  
+  env.malloc = (dice_malloc_func) CORBA_alloc;
+  env.free = (dice_free_func) CORBA_free;
+  
+  l4loader_app_server_loop(&env);
   for (;;)
     ;
 }