diff options
Diffstat (limited to 'body/fltk-environment.adb')
-rw-r--r-- | body/fltk-environment.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/body/fltk-environment.adb b/body/fltk-environment.adb index 22cf676..58c13d6 100644 --- a/body/fltk-environment.adb +++ b/body/fltk-environment.adb @@ -392,7 +392,7 @@ package body FLTK.Environment is return User; end if; exception - when Chk.Assertion_Error => raise Internal_FLTK_Error; + when Chk.Assertion_Error => raise Constraint_Error; end To_Scope; |