aboutsummaryrefslogtreecommitdiff
path: root/render.f90
diff options
context:
space:
mode:
Diffstat (limited to 'render.f90')
-rw-r--r--render.f9014
1 files changed, 8 insertions, 6 deletions
diff --git a/render.f90 b/render.f90
index 96ec610..80de58b 100644
--- a/render.f90
+++ b/render.f90
@@ -69,6 +69,8 @@ implicit none
procedure(draw_simple_text), deferred::report_status
procedure(request_action), deferred::request_action
+
+ procedure(draw_simple_text), deferred::report_displayed_page
end type renderer
@@ -98,8 +100,8 @@ implicit none
import::renderer
class(renderer)::self
character(*), intent(in)::text
- integer, optional::heading
- logical, optional::list_item
+ integer, intent(in), optional::heading
+ logical, intent(in), optional::list_item
integer::calculate_width
end function calculate_width
end interface
@@ -109,8 +111,8 @@ implicit none
import::renderer
class(renderer)::self
character(*), intent(in)::text
- integer, optional::heading
- logical, optional::list_item
+ integer, intent(in), optional::heading
+ logical, intent(in), optional::list_item
integer::calculate_height
end function calculate_height
end interface
@@ -120,8 +122,8 @@ implicit none
import::renderer
class(renderer)::self
character(*), intent(in)::text
- integer, optional::heading
- logical, optional::list_item
+ integer, intent(in), optional::heading
+ logical, intent(in), optional::list_item
end subroutine draw_text
end interface