add impl RocRefcounted for RocResult

crates/roc_std/src/lib.rs

@@ -214,6 +214,32 @@ impl<T, E> RocResult<T, E> {
     }
 }
 
+impl<T, E> RocRefcounted for RocResult<T, E>
+where
+    T: RocRefcounted,
+    E: RocRefcounted,
+{
+    fn inc(&mut self) {
+        unsafe {
+            match self.tag {
+                RocResultTag::RocOk => (*self.payload.ok).inc(),
+                RocResultTag::RocErr => (*self.payload.err).inc(),
+            }
+        }
+    }
+    fn dec(&mut self) {
+        unsafe {
+            match self.tag {
+                RocResultTag::RocOk => (*self.payload.ok).dec(),
+                RocResultTag::RocErr => (*self.payload.err).dec(),
+            }
+        }
+    }
+    fn is_refcounted() -> bool {
+        T::is_refcounted() || E::is_refcounted()
+    }
+}
+
 impl<T, E> From<RocResult<T, E>> for Result<T, E> {
     fn from(roc_result: RocResult<T, E>) -> Self {
         use RocResultTag::*;