proto_pcall wraper
authorChristian Thaeter <ct@pipapo.org>
Mon, 6 Mar 2017 13:31:05 +0000 (14:31 +0100)
committerChristian Thaeter <ct@pipapo.org>
Mon, 6 Mar 2017 13:31:05 +0000 (14:31 +0100)
proto.lua
prototest.lua

index 12a293c..7ffa3fa 100644 (file)
--- a/proto.lua
+++ b/proto.lua
@@ -234,6 +234,13 @@ function Object:proto_isa(prototype)
 end
 
 
+--- Object:proto_pcall (name,...)
+---   pcall wraper, for more sane duck typing
+function Object:proto_pcall(name,...)
+    return pcall(self[name], self, ...)
+end
+
+
 return Object
 
 -- Local Variables:
index 9c3bce6..1d7035e 100644 (file)
@@ -70,6 +70,7 @@ do
       proto_inherit=true,
       proto_clone=true,
       proto_erase=true,
+      proto_pcall=true,
    }
 
    for name,value in O4:proto_members() do