home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / ada / !Ada / Desc < prev    next >
Encoding:
Text File  |  1994-08-27  |  1.7 KB  |  92 lines

  1. # This is a description of the wimp interface for Ada
  2.  
  3. tool_details_start
  4.    name          "Ada";
  5.    command_is    "Adacomp";
  6.    version       "1.11.2 (21-Aug-1994)";
  7.    wimpslot      800k;
  8.    has_extended_cmdline;
  9. tool_details_end
  10.  
  11.  
  12. metaoptions_start
  13.    has_auto_run;
  14.    has_text_window;
  15.    has_summary_window;
  16.    display_dft_is text;
  17. metaoptions_end
  18.  
  19.  
  20. # options dialogue box
  21. dbox_start
  22.  
  23.    #icon mappings
  24.    icons_start
  25.       icn 3  maps_to string          not_saved;
  26.       icn 5  maps_to "-l " string    not_saved;
  27.       icn 8  maps_to "-b";
  28.       icn 9  maps_to "-n";
  29.       icn 10 maps_to "-a";
  30.       icn 11 maps_to "-d";
  31.       icn 13 maps_to string prefix_by "-i " not_saved;
  32.    icons_end
  33.  
  34.    #default icon values
  35.    defaults
  36.       icn 5  "",
  37.       icn 8  off,
  38.       icn 9  off,
  39.       icn 10 off,
  40.       icn 11 on,
  41.       icn 13 "";
  42.  
  43.    make_defaults
  44.       icn 5  "",
  45.       icn 8  off,
  46.       icn 9  off,
  47.       icn 10 off,
  48.       icn 11 on;
  49.                 
  50.    #drags to dbox (and icon bar)
  51.    imports_start
  52.       drag_to icn 3 inserts icn 3;
  53.       drag_to icn 5 inserts icn 5;
  54.       drag_to iconbar inserts icn 3;
  55.       drag_to icn 13 inserts icn 13 separator_is " ";
  56.    imports_end
  57.  
  58. dbox_end
  59.  
  60.  
  61. #menu from dbox
  62. menu_start
  63.  
  64.    "Main program"    maps_to "" sub_menu "Unit name:" 256 prefix_by "-m ";
  65.    "Listing"         maps_to "-s";
  66.    "Verbose"         maps_to "-v";
  67.    "Assembler"       maps_to "-g";
  68.  
  69.    #default values
  70.    defaults
  71.       menu  1 off,
  72.       menu  2 off,
  73.       menu  3 off,
  74.       menu  4 off;
  75.  
  76. menu_end
  77.  
  78. make_excludes icn 3, icn 8, icn 9, menu 3, menu 4;
  79.  
  80. order_is  icn 9, icn 5, icn 10, icn 11, icn 13, icn 8, menu 1, menu 2, menu 3, menu 4, icn 3;
  81.  
  82. make_order_is  icn 9, icn 5, icn 10, icn 11, icn 8, menu 1, menu 2, menu 3, menu 4, icn 3;
  83.  
  84.  
  85.    
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.