(#882) Make the Platform level loadable

[nothing.git] / src / broadcast.c

diff --git a/src/broadcast.c b/src/broadcast.c
index 4be22030016c0e35160f82d46d673b7bfb846176..383e0ebc637a92c2987e31697dcf815c8fa1c022 100644 (file)
--- a/src/broadcast.c
+++ b/src/broadcast.c
@@ -8,7 +8,6 @@
 #include "ebisp/expr.h"
 #include "ebisp/scope.h"
 #include "game.h"
-#include "broadcast_lisp.h"
 
 struct EvalResult
 unknown_target(Gc *gc, const char *source, const char *target)
@@ -84,20 +83,13 @@ broadcast_send(Broadcast *broadcast,
     return unknown_target(gc, "game", target);
 }
 
-struct EvalResult broadcast_load_library(Broadcast *broadcast,
-                                         Gc *gc,
-                                         struct Scope *scope)
+void broadcast_load_library(Broadcast *broadcast,
+                            Gc *gc,
+                            struct Scope *scope)
 {
     trace_assert(gc);
     trace_assert(scope);
     trace_assert(broadcast);
 
-    set_scope_value(gc, scope, SYMBOL(gc, "send-native"), NATIVE(gc, send, broadcast));
-
-    struct EvalResult result = eval_block(gc, scope, broadcast_lisp_library(gc));
-    if (result.is_error) {
-        return result;
-    }
-
-    return eval_success(NIL(gc));
+    set_scope_value(gc, scope, SYMBOL(gc, "send"), NATIVE(gc, send, broadcast));
 }