diff options
author | Jed Barber <jjbarber@y7mail.com> | 2016-07-15 22:20:30 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2016-07-15 22:20:30 +1000 |
commit | b72f41264d96f6cd9333badad82f978ecdc48fc2 (patch) | |
tree | acf583ae23932244f90e0822ef989ad64d3c9426 /src/fltk_binding/fltk-text_buffers.ads | |
parent | 29a95cbf34e89274d8556e6f5b9f0e8b447e94c7 (diff) |
Groups and Widgets should now keep track of themselves properly, also all named access types removed
Diffstat (limited to 'src/fltk_binding/fltk-text_buffers.ads')
-rw-r--r-- | src/fltk_binding/fltk-text_buffers.ads | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/fltk_binding/fltk-text_buffers.ads b/src/fltk_binding/fltk-text_buffers.ads index 902c978..2dae75d 100644 --- a/src/fltk_binding/fltk-text_buffers.ads +++ b/src/fltk_binding/fltk-text_buffers.ads @@ -4,7 +4,8 @@ package FLTK.Text_Buffers is type Text_Buffer is new Wrapper with private; - type Text_Buffer_Access is access all Text_Buffer; + type Text_Buffer_Cursor (Data : access Text_Buffer'Class) is limited null record + with Implicit_Dereference => Data; function Create |