Luau print goes to mod's info log

mods/luau_runtime/src/runtime.cpp

@@ -179,6 +179,7 @@ ModuleOpenFn module_factory(std::string_view name) {
 }
 
 int module_require(lua_State* state);
+int print(lua_State* state);
 
 void install_module_require(lua_State* state, Vm& vm, std::string_view currentPath) {
     lua_pushlightuserdata(state, &vm);
@@ -187,6 +188,11 @@ void install_module_require(lua_State* state, Vm& vm, std::string_view currentPa
     lua_setglobal(state, "require");
 }
 
+void install_globals(Vm& vm) {
+    push_vm_closure(vm.state, vm, print, "print");
+    lua_setglobal(vm.state, "print");
+}
+
 bool load_source_module(
     lua_State* caller, Vm& vm, const std::string& path, bool keepResult, std::string& outError) {
     if (svc_resource == nullptr) {
@@ -299,6 +305,29 @@ int module_require(lua_State* state) {
     return 1;
 }
 
+int print(lua_State* state) {
+    Vm& vm = vm_from_upvalue(state);
+    if (svc_log == nullptr) {
+        service_unavailable(state, "LogService");
+    }
+
+    std::string value;
+    int const numArgs = lua_gettop(state);
+    for (int i = 0; i < numArgs; i += 1) {
+        if (i != 0) {
+            value.push_back('\t');
+        }
+
+        size_t length;
+        char const* str = luaL_tolstring(state, i + 1, &length);
+        value.append(str, length);
+        lua_pop(state, 1);
+    }
+
+    svc_log->info(vm.subject, value.data());
+    return 0;
+}
+
 ModResult runtime_activate(ModContext*, ModContext* subject, ModError* outError) {
     if (subject == nullptr) {
         return set_error(outError, MOD_INVALID_ARGUMENT, "Delegated mod context is null");
@@ -323,6 +352,7 @@ ModResult runtime_activate(ModContext*, ModContext* subject, ModError* outError)
         }
     };
     luaL_openlibs(vm->state);
+    install_globals(*vm);
     luaL_sandbox(vm->state);
 
     std::string error;