diff --git a/rtl/objpas/sysutils/sysutilh.inc b/rtl/objpas/sysutils/sysutilh.inc
index 6a1e2b419c..7cf7adf018 100644
--- a/rtl/objpas/sysutils/sysutilh.inc
+++ b/rtl/objpas/sysutils/sysutilh.inc
@@ -163,6 +163,7 @@ type
    EZeroDivide = Class(EMathError);
    EOverflow   = Class(EMathError);
    EUnderflow  = Class(EMathError);
+   EInvalidArgument = class(EMathError);
 
    { Run-time and I/O Errors }
    EInOutError = class(Exception)