1 files changed, 6 insertions, 0 deletions
diff --git a/lib.c b/lib.c
index 17728fc3..8fd4034d 100644
--- a/lib.c
+++ b/lib.c
@@ -5356,6 +5356,12 @@ mem_t *cobj_handle(val cobj, val cls_sym)
   return cobj->co.handle;
 }
 
+struct cobj_ops *cobj_ops(val cobj, val cls_sym)
+{
+  class_check(cobj, cls_sym);
+  return cobj->co.ops;
+}
+
 void cobj_print_op(val obj, val out)
 {
   put_string(lit("#<"), out);