summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-buttons-light-check.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk-widgets-buttons-light-check.adb')
-rw-r--r--src/fltk-widgets-buttons-light-check.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/fltk-widgets-buttons-light-check.adb b/src/fltk-widgets-buttons-light-check.adb
index 7594782..d6a7ef7 100644
--- a/src/fltk-widgets-buttons-light-check.adb
+++ b/src/fltk-widgets-buttons-light-check.adb
@@ -68,6 +68,7 @@ package body FLTK.Widgets.Buttons.Light.Check is
Extra_Final (This);
if This.Void_Ptr /= Null_Pointer and This.Needs_Dealloc then
free_fl_check_button (This.Void_Ptr);
+ This.Void_Ptr := Null_Pointer;
end if;
end Finalize;