From 74cb50a7f7e14cec7195d30e50b76e17969c9e62 Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Mon, 13 Jan 2025 12:29:26 +1300 Subject: Help_Dialog now has Show_With_Args --- src/fltk-widgets-groups-windows.ads | 13 ------------- 1 file changed, 13 deletions(-) (limited to 'src/fltk-widgets-groups-windows.ads') diff --git a/src/fltk-widgets-groups-windows.ads b/src/fltk-widgets-groups-windows.ads index 97d79d9..d00d3d7 100644 --- a/src/fltk-widgets-groups-windows.ads +++ b/src/fltk-widgets-groups-windows.ads @@ -235,19 +235,6 @@ private with Inline; - -- Used for implementing show(argc,argv) - type Show_With_Args_Func is access procedure - (CObj : in Storage.Integer_Address; - Argc : in Interfaces.C.int; - Argv : in Storage.Integer_Address); - - pragma Convention (C, Show_With_Args_Func); - - procedure Dispatch_Show_With_Args - (Func : in Show_With_Args_Func; - CObj : in Storage.Integer_Address); - - pragma Inline (Show); pragma Inline (Show_With_Args); pragma Inline (Hide); -- cgit