diff --git a/quickjs.c b/quickjs.c
index b71d88e..4947b8e 100644
--- a/quickjs.c
+++ b/quickjs.c
@@ -6305,6 +6305,11 @@ JSValue JS_GetException(JSContext *ctx)
     return val;
 }
 
+JS_BOOL JS_HasException(JSContext *ctx)
+{
+    return !JS_IsNull(ctx->rt->current_exception);
+}
+
 static void dbuf_put_leb128(DynBuf *s, uint32_t v)
 {
     uint32_t a;
diff --git a/quickjs.h b/quickjs.h
index 73f12b0..c3ef419 100644
--- a/quickjs.h
+++ b/quickjs.h
@@ -570,6 +570,7 @@ static inline JS_BOOL JS_IsObject(JSValue v)
 
 JS_EXTERN JSValue JS_Throw(JSContext *ctx, JSValue obj);
 JS_EXTERN JSValue JS_GetException(JSContext *ctx);
+JS_EXTERN JS_BOOL JS_HasException(JSContext *ctx);
 JS_EXTERN JS_BOOL JS_IsError(JSContext *ctx, JSValue val);
 JS_EXTERN void JS_ResetUncatchableError(JSContext *ctx);
 JS_EXTERN JSValue JS_NewError(JSContext *ctx);