home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / scheme / schematk / src_1152.lha / Agent.subproj / PrefAgent.h < prev    next >
Encoding:
Text File  |  1992-03-11  |  4.1 KB  |  181 lines

  1. /* Copyright รก 1991 Gustavus Adolphus College.  All rights reserved.
  2.  *
  3.  * Schematik was developed by Gustavus Adolphus College (GAC) with
  4.  * support from NeXT Computer, Inc.  Permission to copy this software,
  5.  * to redistribute it, and to use it for any purpose is granted,
  6.  * subject to the following restrictions and understandings.
  7.  *
  8.  * 1. Any copy made of this software must include this copyright
  9.  * notice in full.
  10.  *
  11.  * 2. Users of this software agree to make their best efforts (a) to
  12.  * return to the GAC Mathematics and Computer Science Department any
  13.  * improvements or extensions that they make, so that these may be
  14.  * included in future releases; and (b) to inform GAC of noteworthy
  15.  * uses of this software.
  16.  *
  17.  * 3. All materials developed as a consequence of the use of this
  18.  * software shall duly acknowledge such use, in accordance with the
  19.  * usual standards of acknowledging credit in academic research.
  20.  *
  21.  * 4. GAC makes no express or implied warranty or representation of
  22.  * any kind with respect to this software, including any warranty
  23.  * that the operation of this software will be error-free.  ANY
  24.  * IMPLIED WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR
  25.  * PURPOSE IS HEREBY DISCLAIMED.  GAC is under no obligation to
  26.  * provide any services, by way of maintenance, update, or otherwise.
  27.  *
  28.  * 5. In conjunction with products arising from the use of this
  29.  * material, there shall be no use of the name of Gustavus Adolphus
  30.  * College nor of any adaptation thereof in any advertising,
  31.  * promotional, or sales literature without prior written consent
  32.  * from GAC in each case.
  33.  */
  34.  
  35. #import <objc/Object.h>
  36.  
  37. @interface PrefAgent:Object
  38. {
  39. NXZone    *agentZone;
  40.     id    prefPanel;
  41.     id    theBox;
  42.     id    buttonMatrix;
  43.     id    win0;
  44.     id    options1Matrix;
  45.     id    onErrorMatrix;
  46.     id    win1;
  47.     id    options2Matrix;
  48.     id    win2;
  49.     id    deField;
  50.     id    formsBrowser;
  51.     id    formsField;
  52.     id    win3;
  53.     id    dialectMatrix;
  54.     id    executableForm;
  55.     id    parametersBox;
  56.     id    parametersField;
  57. }
  58.  
  59. + new;
  60.  
  61. - activateAgent:sender;
  62. - buttonClicked:sender;
  63. - selectPrefs:sender;
  64.  
  65. @end
  66.  
  67. @interface PrefAgent (Localization)
  68.  
  69. #define LocalString(key, value) doLocalString(key, value)
  70.  
  71. - loadLocalNib:(const char *)nibFile owner:(id)owner fromZone:(NXZone *)zone;
  72. - loadLocalMainMenu:(const char *)nibFile;
  73. - localImage:(const char *)imageFile fromZone:(NXZone *)zone;
  74.  
  75. const char *doLocalString(const char *, const char *);
  76.  
  77. @end
  78.  
  79. @interface PrefAgent (Client0)
  80.  
  81. #define CLIENT0        0
  82. #define EVALALLAT    0
  83. #define COMMMENTOUTAT    1
  84. #define INSERTERRSAT    2
  85. #define TRANSCRIPTAT    3
  86. #define AUTOSCROLLAT    4
  87. #define CONFCLOSEAT    5
  88. #define CONFQUITAT    6
  89. #define KEEPBACKUPAT    7
  90.  
  91. - (BOOL)evaluateAll;
  92. - (BOOL)commentOutput;
  93. - (BOOL)insertErrors;
  94. - (BOOL)transcriptMode;
  95. - (BOOL)autoScroll;
  96. - (BOOL)confirmOnClose;
  97. - (BOOL)confirmOnQuit;
  98. - (BOOL)keepBackupCopy;
  99. - (int)errorAbort;
  100. - setConfirmOnClose:(BOOL)aBool;
  101.  
  102. @end
  103.  
  104. @interface PrefAgent (Client1)
  105.  
  106. #define CLIENT1        1
  107. #define DBLCLICKAT    0
  108. #define AUTOINDENTAT    1
  109. #define MATCHPARENAT    2
  110. #define FORMATPASTEAT    3
  111.  
  112. - (BOOL)dblClickMatch;
  113. - (BOOL)autoindent;
  114. - (BOOL)matchParens;
  115. - (BOOL)formatAfterPaste;
  116.  
  117. @end
  118.  
  119. @interface PrefAgent (Client2)
  120.  
  121. #define CLIENT2        2
  122.  
  123. - formsButtonClicked:sender;
  124. - formsBrowserClick:sender;
  125.  
  126. - (BOOL)isSpecialForm:(const char *)aString;
  127. - (int)deForSpecialForm:(const char *)aString;
  128. - (int)keywordListVersion;
  129.  
  130. @end
  131.  
  132. @interface PrefAgent (Client3)
  133.  
  134. #define CLIENT3        3
  135. #define SICPDIALECT    0
  136. #define MITDIALECT    1
  137. #define MITDIALECTCOMP    2
  138. #define OTHERDIALECT    3
  139.  
  140. - dialectChosen:sender;
  141.  
  142. - (int)schemeDialect;
  143. - (char *)executable;
  144. - (char *)parameters;
  145.  
  146. @end
  147.  
  148. @interface PrefAgent (NoClient)
  149.  
  150. #import <appkit/graphics.h>
  151.  
  152. - setInterFrame:(const NXRect *)r;
  153. - getInterFrame:(NXRect *)r;
  154. - setInterFont:(id)aFont;
  155. - (char *)interFont;
  156. - (float)interFontSize;
  157. - getDocOrigin:(NXPoint *)p;
  158. - getDocOffset:(NXPoint *)p;
  159. - (BOOL)reverseVideo;
  160. - (BOOL)useSpecialCursors;
  161. - getGraphicsSize:(NXSize *)s;
  162. - getGraphicsTolerance:(NXSize *)s;
  163.  
  164. @end
  165.  
  166. @interface Keyword:Object
  167. {
  168.   char    *keyword;
  169.    int    distelems;
  170. }
  171.  
  172. - init;
  173. - initTo:(char *)aString with:(int)anInt;
  174. - free;
  175. - (char *)keyword;
  176. - (int)distinguishedElems;
  177. - setKeyword:(char *)aString;
  178. - setDistElems:(int)anInt;
  179.  
  180. @end
  181.