add nativesizeof sub

rakudo · Feb 21, 2015 · e321ea6 · e321ea6
1 parent 32041d3
commit e321ea6
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/lib/NativeCall.pm b/lib/NativeCall.pm
@@ -373,6 +373,10 @@ sub nativecast($target-type, $source) is export(:DEFAULT) {
         nqp::decont(map_return_type($target-type)), nqp::decont($source));
 }
 
+sub nativesizeof($obj) is export(:DEFAULT) {
+    nqp::nativecallsizeof(nqp::decont($obj))
+}
+
 sub cglobal($libname, $symbol, $target-type) is export {
     Proxy.new(
         FETCH => -> $ {