lace.events: Optimise.

2023-12-08 14:42:45 +11:00
parent f12686d233
commit dbe487c074
29 changed files with 275 additions and 136 deletions
--- a/4-high/gel/source/gel-window.ads
+++ b/4-high/gel/source/gel-window.ads
@@ -110,6 +110,7 @@ private

   type String_view is access all String;

+   pragma Suppress (Container_Checks);     -- Suppress expensive tamper checks.

   type Item is limited new lace.Subject_and_deferred_Observer.item with
      record