add vclear

src/varray.c

@@ -64,3 +64,26 @@ int vput(var v, int idx, void* data)
 
     return method(obj, idx, data);
 }
+
+void vclear(var v)
+{
+    meta_obj_t* obj    = NULL;
+    vclear_fn_t method = NULL;
+
+    obj = RTTI_DATA_TO_OBJ(v);
+    if (RTTI_OBJ_INVALID(obj)) {
+        errno = EINVAL;
+        return;
+    }
+
+    RTTI_GET_METHOD(method, obj, varray, vclear);
+    if (method == NULL) {
+        errno = EINVAL;
+
+        return;
+    }
+
+    method(obj);
+
+    return;
+}