    ------------------------------------------------------------------------------
    --                                                                          --
    --                           GNAT ncurses Binding                           --
    --                                                                          --
    --                Terminal_Interface.Curses.Forms.Form_User_Data            --
    --                                                                          --
    --                                 S P E C                                  --
    --                                                                          --
    --  Version 00.91                                                           --
    --                                                                          --
    --  The ncurses Ada95 binding is copyrighted 1996 by                        --
    --  Jürgen Pfeifer, Email: Juergen.Pfeifer@T-Online.de                      --
    --                                                                          --
    --  Permission is hereby granted to reproduce and distribute this           --
    --  binding by any means and for any fee, whether alone or as part          --
    --  of a larger distribution, in source or in binary form, PROVIDED         --
    --  this notice is included with any such distribution, and is not          --
    --  removed from any of its header files. Mention of ncurses and the        --
    --  author of this binding in any applications linked with it is            --
    --  highly appreciated.                                                     --
    --                                                                          --
    --  This binding comes AS IS with no warranty, implied or expressed.        --
    ------------------------------------------------------------------------------
    --  Version Control:
    --  $Revision: 1.2 $
    ------------------------------------------------------------------------------

    generic
       type User is limited private;
       type User_Access is access User;
    package Terminal_Interface.Curses.Forms.Form_User_Data is

       --  The binding uses the C level user pointer already for its own
       --  internal purposes. So you canīt easily manipulate the user pointer
       --  with the low level C routines for this form without taking care of
       --  this special situation. If you want to read or write with C routines
       --  the user pointer of this form, you should get first the low level
       --  user pointer. This points to a record, that always has as its first
       --  member the Ada95 user pointer for this form. You should never change
       --  the low level user pointer of an Ada created form.
       --
       --  |=====================================================================
       --  | Man page form_userptr.3x
       --  |=====================================================================

       --  |
       procedure Set_User_Data (Frm  : in Form;
                                Data : in User_Access);
       --  AKA: set_form_userptr
       pragma Convention (C, Set_User_Data);

       --  |
       procedure Get_User_Data (Frm  : in  Form;
                                Data : out User_Access);
       --  AKA: form_userptr
       pragma Convention (C, Get_User_Data);

    end Terminal_Interface.Curses.Forms.Form_User_Data;

This is BETA software. The interface is subject to change without notice.

This hypertext format was generated by David A. Wheeler's ada2html