diff --git a/prelude/__internal__/IO.mad b/prelude/__internal__/IO.mad
index a3d7e4e4..69b6e54d 100644
--- a/prelude/__internal__/IO.mad
+++ b/prelude/__internal__/IO.mad
@@ -13,6 +13,7 @@ import Error from "__IOError__"
 import {
   AddressAlreadyInUse,
   ArgumentListToLong,
+  GeneralError,
   PermissionDenied,
   UnknownError,
 } from "__IOError__"
@@ -24,6 +25,7 @@ export AddressAlreadyInUse
 export ArgumentListToLong
 export PermissionDenied
 export UnknownError
+export GeneralError
 
 prettyCase :: (String -> String) -> String -> String
 prettyCase = (color, str) => pipe(
diff --git a/prelude/__internal__/__IOError__.mad b/prelude/__internal__/__IOError__.mad
index a12b0694..65a2c581 100644
--- a/prelude/__internal__/__IOError__.mad
+++ b/prelude/__internal__/__IOError__.mad
@@ -3,6 +3,7 @@ export type Error
   | ArgumentListToLong
   | PermissionDenied
   | UnknownError
+  | GeneralError(String)
 
 fromLibuvError :: Integer -> Error
 export fromLibuvError = where {