fixed pcall catching quota errors

daranable · Feb 16, 2014 · 05cfd8a · 05cfd8a
1 parent c6eca2d
commit 05cfd8a
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/lua/starfall/libs_sh/builtins.lua b/lua/starfall/libs_sh/builtins.lua
@@ -285,7 +285,16 @@ function SF.DefaultEnvironment.dofile(file)
 end
 
 --- Lua's pcall function
-SF.DefaultEnvironment.pcall = pcall
+function SF.DefaultEnvironment.pcall ( ... )
+    ok, err = pcall( ... )
+
+    -- don't catch quota errors
+    if SF.instance.ops > SF.instance.context.ops then
+        error( err, 0 )
+    end
+
+    return ok, err
+end
 
 --- GLua's loadstring, modified for safe use in Starfall
 -- Works like loadstring, except that it executes by default in the main environment