From 36bf9cd9fdfc06e12d88fdc647cc932d4a1c6452 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Wed, 2 Dec 2020 17:26:17 -0500 Subject: Added a new abstract call for renderers to signal layout completion. Switch AppGraphics renderer to double-buffered for smooth display. Accelerated mouse wheel. --- render.f90 | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'render.f90') diff --git a/render.f90 b/render.f90 index 74b1406..9027f83 100644 --- a/render.f90 +++ b/render.f90 @@ -58,6 +58,7 @@ implicit none procedure(initialize), deferred::initialize procedure(prepare_for_layout), deferred::prepare_for_layout + procedure(layout_complete), deferred::layout_complete procedure(new_page), deferred::new_page procedure(calculate_width), deferred::text_width @@ -107,6 +108,13 @@ implicit none class(renderer)::self end subroutine prepare_for_layout end interface + + abstract interface + subroutine layout_complete(self) + import::renderer + class(renderer)::self + end subroutine layout_complete + end interface abstract interface function calculate_width(self, text, text_type) -- cgit v1.2.3