home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / fish / applications / xlispstat / src / original_headers / osptrs.h < prev    next >
Text File  |  1990-07-30  |  25KB  |  752 lines
  1. #ifndef XLISP_ONLY
  2. /************************************************************************/
  3. /************************************************************************/
  4. /**                                                                    **/
  5. /**                          Object Methods                            **/
  6. /**                                                                    **/
  7. /************************************************************************/
  8. /************************************************************************/
  9.  
  10. /* objects.c */
  11. {    NULL,                S, xsmessage_method        }, /* 300 */
  12. {    NULL,                S, xsreparent_object        }, 
  13. {    NULL,                S, xshas_slot            }, 
  14. {    NULL,                S, xshas_method            },
  15. {    NULL,                S, xsadd_slot            },
  16. {    NULL,                S, xsdelete_slot        },
  17. {    NULL,                S, xsadd_method            },
  18. {    NULL,                S, xsdelete_method        },
  19. {    NULL,                S, xsshow_object        },
  20. {    NULL,                S, xsobject_isnew        },
  21. {    NULL,                S, xsparents            },
  22. {    NULL,                S, xsprecedence_list        },
  23. {    NULL,                S, xsobject_slots        },
  24. {    NULL,                S, xsobject_methods        },
  25. {    NULL,                S, xsobject_documentation    },
  26. {    NULL,                S, xsmakeproto            },
  27.  
  28. /* hardware-objects */
  29. {    NULL,                S, xsobject_null_method        },
  30. {    NULL,                S, xsobject_null_method        },
  31. {    NULL,                S, xsobject_null_method        },
  32.  
  33. /* windows.c */
  34. {    NULL,                S, xsshowwindow            },
  35. {    NULL,                S, xshidewindow            },
  36. {    NULL,                S, xshidewindow            },
  37. {    NULL,                S, xswindow_title        },
  38. {    NULL,                S, xswindow_location        },
  39. {    NULL,                S, xswindow_size        },
  40. {    NULL,                S, xswindow_frame_location    },
  41. {    NULL,                S, xswindow_frame_size        },
  42. {    NULL,                S, xsobject_null_method        },
  43. {    NULL,                S, xsobject_null_method        },
  44. {    NULL,                S, xsobject_null_method        },
  45. {    NULL,                S, xsobject_null_method        },
  46. {    NULL,                S, xsobject_null_method        },
  47. {    NULL,                S, xsobject_null_method        },
  48. {    NULL,                S, xsobject_null_method        },
  49. {    NULL,                S, xsobject_null_method        },
  50. {    NULL,                S, xsobject_null_method        },
  51. {    NULL,                S, xsobject_null_method        },
  52. {    NULL,                S, xsobject_null_method        },
  53.  
  54. #ifdef MACINTOSH
  55. /* edit.c */
  56. {    NULL,                S, xsedit_window_isnew        },
  57. {    NULL,                S, xsedit_window_allocate    },
  58. {    NULL,                S, xsedit_window_cut        },
  59. {    NULL,                S, xsedit_window_copy        },
  60. {    NULL,                S, xsedit_window_paste        },
  61. {    NULL,                S, xsedit_window_revert        },
  62. {    NULL,                S, xsedit_window_save        },
  63. {    NULL,                S, xsedit_window_save_as    },
  64. {    NULL,                S, xsedit_window_save_copy    },
  65. {    NULL,                S, xsedit_window_paste_stream    },
  66. {    NULL,                S, xsedit_window_paste_string    },
  67. {    NULL,                S, xsedit_window_flush_window    },
  68. {    NULL,                S, xsedit_window_selection_stream},
  69. {    NULL,                S, xsedit_window_remove        },
  70. {    NULL,                S, xsedit_window_remove        },
  71. {    NULL,                S, xsedit_window_remove        },
  72. {    NULL,                S, xsedit_window_activate    },
  73. {    NULL,                S, xsedit_window_update        },
  74. {    NULL,                S, xsedit_window_find        },
  75. {    NULL,                S, xslistener_isnew        },
  76. {    NULL,                S, xslistener_allocate        },
  77. {    NULL,                S, xshidewindow            },
  78. {    NULL,                S, xshidewindow            },
  79. {    NULL,                S, xshidewindow            },
  80. #endif MACINTOSH
  81.  
  82. /* menus.c */
  83. {    NULL,                S, xsmenu_isnew            },
  84. {    NULL,                S, xsallocate_menu        },
  85. {    NULL,                S, xsdispose_menu        },
  86. {    NULL,                S, xsinstall_menu        },
  87. {    NULL,                S, xsremove_menu        },
  88. {    NULL,                S, xsmenu_enabled        },
  89. {    NULL,                S, xsupdate_menu        },
  90. {    NULL,                S, xsallocated_p        },
  91. {    NULL,                S, xsmenu_title            },
  92. {    NULL,                S, xsmenu_items            },
  93. {    NULL,                S, xsinstalled_p        },
  94. {    NULL,                S, xsappend_items        },
  95. {    NULL,                S, xsdelete_items        },
  96. {    NULL,                S, xsmenu_select        },
  97. {    NULL,                S, xsmenu_popup            },
  98. #ifdef MACINTOSH
  99. {    NULL,                S, xsapple_menu_isnew        }, 
  100. {    NULL,                S, xsapple_menu_select        }, 
  101. #endif MACINTOSH
  102. {    NULL,                S, xsitem_isnew            },
  103. {    NULL,                S, xsitem_title            },
  104. {    NULL,                S, xsitem_key            },
  105. {    NULL,                S, xsitem_mark            },
  106. {    NULL,                S, xsitem_style            },
  107. {    NULL,                S, xsitem_action        },
  108. {    NULL,                S, xsitem_enabled        },
  109. {    NULL,                S, xsitem_installed_p        },
  110. {    NULL,                S, xsitem_update        },
  111. {    NULL,                S, xsitem_do_action        },
  112.  
  113. /* dialog.c */
  114. {    NULL,                S, xsdialog_isnew        },
  115. {    NULL,                S, xsdialog_allocate        },
  116. {    NULL,                S, xsdialog_remove        },
  117. {    NULL,                S, xsdialog_remove        },
  118. {    NULL,                S, xsdialog_remove        },
  119. {    NULL,                S, xsdialog_allocated_p        },
  120. {    NULL,                S, xsdialog_default_button    },
  121. {    NULL,                S, xsdialog_modal        },
  122. {    NULL,                S, xsdialog_item_do_action    },
  123. {    NULL,                S, xsdialog_item_action        },
  124. {    NULL,                S, xsbutton_item_isnew        },
  125. {    NULL,                S, xstoggle_item_isnew        },
  126. {    NULL,                S, xstoggle_item_value        },
  127. {    NULL,                S, xstext_item_isnew        },
  128. {    NULL,                S, xstext_item_text        },
  129. {    NULL,                S, xschoice_item_isnew        },
  130. {    NULL,                S, xschoice_item_value        },
  131. {    NULL,                S, xsscroll_item_isnew        },
  132. {    NULL,                S, xsscroll_item_value        },
  133. {    NULL,                S, xsscroll_item_max        },
  134. {    NULL,                S, xsscroll_item_min        },
  135. {    NULL,                S, xsscroll_item_action        },
  136. {    NULL,                S, xslist_item_isnew        },
  137. {    NULL,                S, xslist_item_action        },
  138. {    NULL,                S, xslist_item_text        },
  139. {    NULL,                S, xslist_item_selection    },
  140.  
  141. /* xsiviewwindow.c */
  142. {    NULL,                S, iview_window_isnew        },
  143. {    NULL,                S, iview_window_allocate    },
  144.  
  145. {    NULL,                S, iview_window_idle_on        },
  146.  
  147. {    NULL,                S, iview_window_menu        },
  148.  
  149. {    NULL,                S, xsiview_window_update    },
  150. {    NULL,                S, xsiview_window_activate    },
  151.  
  152. {    NULL,                S, iview_window_remove        },
  153. {    NULL,                S, iview_window_remove        },
  154. {    NULL,                S, iview_window_remove        },
  155. {    NULL,                S, iview_window_while_button_down},
  156. {    NULL,                S, iview_window_show_window    },
  157. {    NULL,                S, xsobject_null_method        },
  158. {    NULL,                S, xsobject_null_method        },
  159. {    NULL,                S, xsobject_null_method        },
  160. {    NULL,                S, xsobject_null_method        },
  161. {    NULL,                S, xsobject_null_method        },
  162. {    NULL,                S, xsobject_null_method        },
  163. {    NULL,                S, xsobject_null_method        },
  164. {    NULL,                S, xsobject_null_method        },
  165.  
  166. {    NULL,                S, iview_window_canvas_width    },
  167. {    NULL,                S, iview_window_canvas_height    },
  168. {    NULL,                S, iview_window_line_type    },
  169. {    NULL,                S, iview_window_draw_mode    },
  170. {    NULL,                S, iview_window_draw_color    },
  171. {    NULL,                S, iview_window_back_color    },
  172. {    NULL,                S, iview_window_use_color    },
  173. {    NULL,                S, iview_window_reverse_colors    },
  174. {    NULL,                S, iview_window_view_rect    },
  175. {    NULL,                S, iview_window_line_width    },
  176. {    NULL,                S, iview_window_clip_rect    },
  177. {    NULL,                S, iview_window_cursor        },
  178.  
  179. {    NULL,                S, iview_window_has_h_scroll    },
  180. {    NULL,                S, iview_window_has_v_scroll    },
  181. {    NULL,                S, iview_window_scroll        },
  182. {    NULL,                S, iview_window_h_scroll_incs    },
  183. {    NULL,                S, iview_window_v_scroll_incs    },
  184.  
  185. {    NULL,                S, iview_window_draw_line    },
  186. {    NULL,                S, iview_window_draw_point    },
  187. {    NULL,                S, iview_window_erase_rect    },
  188. {    NULL,                S, iview_window_frame_rect    },
  189. {    NULL,                S, iview_window_paint_rect    },
  190. {    NULL,                S, iview_window_erase_oval    },
  191. {    NULL,                S, iview_window_frame_oval    },
  192. {    NULL,                S, iview_window_paint_oval    },
  193. {    NULL,                S, iview_window_erase_arc    },
  194. {    NULL,                S, iview_window_frame_arc    },
  195. {    NULL,                S, iview_window_paint_arc    },
  196. {    NULL,                S, iview_window_erase_poly    },
  197. {    NULL,                S, iview_window_frame_poly    },
  198. {    NULL,                S, iview_window_paint_poly    },
  199.  
  200. {    NULL,                S, iview_window_text_ascent    },
  201. {    NULL,                S, iview_window_text_descent    },
  202. {    NULL,                S, iview_window_text_width    },
  203. {    NULL,                S, iview_window_draw_string    },
  204. {    NULL,                S, iview_window_draw_string_up    },
  205. {    NULL,                S, iview_window_draw_text    },
  206. {    NULL,                S, iview_window_draw_text_up    },
  207.  
  208. {    NULL,                S, iview_window_draw_symbol    },
  209. {    NULL,                S, iview_window_replace_symbol    },
  210.  
  211. {    NULL,                S, iview_window_start_buffering    },
  212. {    NULL,                S, iview_window_buffer_to_screen},
  213.  
  214. #ifdef MACINTOSH
  215. {    NULL,                S, iview_window_copy_to_clip    },
  216. #endif MACINTOSH
  217. {    NULL,                S, iview_window_drag_grey_rect    },
  218. {    NULL,                S, iview_window_dump_image    },
  219. {    NULL,                S, gw_draw_bitmap        },
  220.  
  221. /* xsiview.c */
  222. {    NULL,                S, iview_isnew            },
  223. {    NULL,                S, iview_allocate        },
  224.  
  225. {    NULL,                S, iview_std_resize        },
  226. {    NULL,                S, iview_std_redraw        },
  227. {    NULL,                S, iview_std_redraw_background    },
  228. {    NULL,                S, iview_std_redraw_content    },
  229. {    NULL,                S, xsobject_null_method        },
  230. {    NULL,                S, xsobject_null_method        },
  231. {    NULL,                S, xsobject_null_method        },
  232. {    NULL,                S, iview_std_adjust_screen    },
  233. {    NULL,                S, iview_std_adjust_points_in_rect},
  234. {    NULL,                S, iview_std_adjust_screen_point},
  235. {    NULL,                S, iview_std_mark_points_in_rect},
  236.  
  237. {    NULL,                S, iview_content_rect        },
  238. {    NULL,                S, iview_content_origin        },
  239. {    NULL,                S, iview_content_variables    },
  240. {    NULL,                S, iview_click_range        },
  241. {    NULL,                S, iview_mouse_mode        },
  242. {    NULL,                S, iview_showing_labels        },
  243. {    NULL,                S, iview_margin            },
  244. {    NULL,                S, iview_fixed_aspect        },
  245. {    NULL,                S, iview_dirty            },
  246.  
  247. {    NULL,                S, iview_x_axis            },
  248. {    NULL,                S, iview_y_axis            },
  249.  
  250. {    NULL,                S, iview_brush            },
  251. {    NULL,                S, iview_erase_brush        },
  252. {    NULL,                S, iview_draw_brush        },
  253. {    NULL,                S, iview_move_brush        },
  254. {    NULL,                S, iview_resize_brush        },
  255.  
  256. {    NULL,                S, iview_do_click        },
  257. {    NULL,                S, iview_do_motion        },
  258. {    NULL,                S, iview_std_click        },
  259. {    NULL,                S, iview_std_click        },
  260. {    NULL,                S, iview_std_motion        },
  261. {    NULL,                S, iview_unselect_all_points    },
  262. {    NULL,                S, iview_erase_selection    },
  263. {    NULL,                S, iview_mask_selection        },
  264. {    NULL,                S, iview_unmask_all_points    },
  265. {    NULL,                S, iview_points_showing        },
  266. {    NULL,                S, iview_points_hilited        },
  267. {    NULL,                S, iview_points_selected    },
  268. {    NULL,                S, iview_points_selected    },
  269. {    NULL,                S, iview_show_all_points    },
  270. {    NULL,                S, iview_all_points_showing    },
  271. {    NULL,                S, iview_all_points_unmasked    },
  272. {    NULL,                S, iview_any_points_selected    },
  273.  
  274. {    NULL,                S, iview_linked            },
  275. #ifndef OLDLINKS
  276. {    NULL,                S, iview_links            },
  277. #endif OLDLINKS
  278.  
  279. {    NULL,                S, iview_num_variables        },
  280. {    NULL,                S, iview_variable_label        },
  281. {    NULL,                S, iview_range            },
  282. {    NULL,                S, iview_scaled_range        },
  283. {    NULL,                S, iview_screen_range        },
  284. {    NULL,                S, iview_transformation        },
  285. {    NULL,                S, iview_apply_transformation    },
  286.  
  287. {    NULL,                S, iview_add_points        },
  288. {    NULL,                S, iview_clear_points        },
  289. {    NULL,                S, iview_num_points        },
  290. {    NULL,                S, iview_point_coordinate    },
  291. {    NULL,                S, iview_point_screen_coordinate},
  292. {    NULL,                S, iview_point_transformed_coordinate    },
  293. {    NULL,                S, iview_point_masked        },
  294. {    NULL,                S, iview_point_color        },
  295. {    NULL,                S, iview_point_state        },
  296. {    NULL,                S, iview_point_screen_state    },
  297. {    NULL,                S, iview_point_marked        },
  298. {    NULL,                S, iview_point_label        },
  299. {    NULL,                S, iview_point_symbol        },
  300. {    NULL,                S, iview_point_selected        },
  301. {    NULL,                S, iview_point_hilited        },
  302. {    NULL,                S, iview_point_showing        },
  303.  
  304. {    NULL,                S, iview_add_lines        },
  305. {    NULL,                S, iview_clear_lines        },
  306. {    NULL,                S, iview_num_lines        },
  307. {    NULL,                S, iview_line_coordinate    },
  308. {    NULL,                S, iview_line_screen_coordinate    },
  309. {    NULL,                S, iview_line_transformed_coordinate    },
  310. {    NULL,                S, iview_line_masked        },
  311. {    NULL,                S, iview_line_color        },
  312. {    NULL,                S, iview_line_next        },
  313. {    NULL,                S, iview_line_type        },
  314. {    NULL,                S, iview_line_width        },
  315.  
  316. #ifdef USESTRINGS
  317. {    NULL,                S, iview_add_strings        },
  318. {    NULL,                S, iview_clear_strings        },
  319. {    NULL,                S, iview_num_strings        },
  320. {    NULL,                S, iview_string_coordinate    },
  321. {    NULL,                S, iview_string_screen_coordinate},
  322. {    NULL,                S, iview_string_transformed_coordinate    },
  323. {    NULL,                S, iview_string_masked        },
  324. {    NULL,                S, iview_string_color        },
  325. {    NULL,                S, iview_string_modifiers    },
  326. #endif /* USESTRINGS */
  327.  
  328. {    NULL,                S, iview_draw_data_points    },
  329. {    NULL,                S, iview_draw_data_lines    },
  330. #ifdef USESTRINGS
  331. {    NULL,                S, iview_draw_data_strings    },
  332. #endif /* USESTRINGS */
  333.  
  334. {    NULL,                S, iview_rotate_2        },
  335.  
  336. {    NULL,                S, iview_adjust_to_data        },
  337. {    NULL,                S, iview_visible_range        },
  338. {    NULL,                S, iview_scale_to_range        },
  339. {    NULL,                S, iview_scale            },
  340. {    NULL,                S, iview_shift            },
  341.  
  342. {    NULL,                S, iview_clear_masks        },
  343. {    NULL,                S, iview_slice_variable        },
  344. {    NULL,                S, iview_real_to_screen        },
  345. {    NULL,                S, iview_screen_to_real        },
  346. {    NULL,                S, iview_scaled_to_screen    },
  347. {    NULL,                S, iview_screen_to_scaled    },
  348. {    NULL,                S, iview_points_in_rect        },
  349. {    NULL,                S, iview_adjust_depth_cuing    },
  350.  
  351. {    NULL,                S, iview_spin_allocate        },
  352. {    NULL,                S, iview_spin_content_variables    },
  353. {    NULL,                S, iview_spin_showing_axes    },
  354. {    NULL,                S, iview_spin_depth_cuing    },
  355. {    NULL,                S, iview_spin_resize        },
  356. {    NULL,                S, iview_spin_redraw_content    },
  357. {    NULL,                S, iview_spin_rotate        },
  358. {    NULL,                S, iview_spin_angle        },
  359. {    NULL,                S, iview_spin_rotate        },
  360. {    NULL,                S, iview_spin_draw_axes        },
  361.  
  362. {    NULL,                S, iview_scatmat_allocate    },
  363. {    NULL,                S, iview_scatmat_resize        },
  364. {    NULL,                S, xsobject_null_method        },
  365. {    NULL,                S, iview_scatmat_redraw_content    },
  366. {    NULL,                S, iview_scatmat_click        },
  367. {    NULL,                S, iview_scatmat_motion        },
  368. {    NULL,                S, iview_scatmat_add_points    },
  369. {    NULL,                S, iview_scatmat_add_lines    },
  370. #ifdef USESTRINGS
  371. {    NULL,                S, iview_scatmat_add_strings    },
  372. #endif /* USESTRINGS */
  373. {    NULL,                S, iview_scatmat_adjust_screen_point},
  374. {    NULL,                S, iview_scatmat_adjust_points_in_rect},
  375. {    NULL,                S, iview_scatmat_mark_points_in_rect},
  376.  
  377. {    NULL,                S, iview_list_allocate        },
  378. {    NULL,                S, xsobject_null_method        },
  379. {    NULL,                S, iview_list_redraw_content    },
  380. {    NULL,                S, iview_list_add_points    },
  381. {    NULL,                S, iview_list_adjust_screen_point},
  382. {    NULL,                S, iview_list_adjust_points_in_rect},
  383. {    NULL,                S, iview_list_mark_points_in_rect},
  384.  
  385. {    NULL,                S, iview_hist_isnew        },
  386. {    NULL,                S, iview_hist_allocate        },
  387. {    NULL,                S, iview_hist_add_points    },
  388. {    NULL,                S, iview_hist_clear_points    },
  389. {    NULL,                S, iview_hist_resize        },
  390. {    NULL,                S, iview_hist_redraw_content    },
  391. {    NULL,                S, iview_hist_adjust_screen    },
  392. {    NULL,                S, iview_hist_num_bins        },
  393. {    NULL,                S, iview_hist_bin_counts    },
  394. {    NULL,                S, iview_hist_adjust_to_data    },
  395. {    NULL,                S, iview_hist_adjust_screen_point},
  396. {    NULL,                S, iview_hist_adjust_points_in_rect},
  397. {    NULL,                S, iview_hist_mark_points_in_rect},
  398.  
  399. {    NULL,                S, iview_plot2d_add_points    },
  400. {    NULL,                S, iview_plot2d_add_lines    },
  401. #ifdef USESTRINGS
  402. {    NULL,                S, iview_plot2d_add_strings    },
  403. #endif /* USESTRINGS */
  404. {    NULL,                S, iview_plot2d_adjust_to_data    },
  405.  
  406. /* compound.c */
  407. {    NULL,                S, xsobject_null_method        },
  408. {    NULL,                S, xsobject_null_method        },
  409. {    NULL,                S, xsobject_null_method        },
  410. {    NULL,                S, xsobject_null_method        },
  411.  
  412. /************************************************************************/
  413. /************************************************************************/
  414. /**                                                                    **/
  415. /**                        Reguler Functions                           **/
  416. /**                                                                    **/
  417. /************************************************************************/
  418. /************************************************************************/
  419.  
  420. /* dialog.c */
  421. {    "SYSBEEP",            S, xssysbeep            },
  422. {    "NUM-TO-STRING",        S, xsnumtostring        },
  423. #ifdef MACINTOSH
  424. {    "ABOUT-XLISP-STAT",        S, xsabout_xlisp_stat        },
  425.  
  426. /* edit.c */
  427. {    "OPEN-FILE-DIALOG",        S, xsopenfiledialog        },
  428. {    "SET-FILE-DIALOG",        S, xssetfiledialog        },
  429. {    "SET-VOLUME",            S, xssetvolume            },
  430. {    "FRONT-WINDOW",            S, xsfrontwindow        },
  431. {    "HIDE-FRONT-WINDOW",        S, xshidefrontwindow        },
  432. {    "SYSTEM-EDIT",            S, xssystem_edit        },
  433. #endif MACINTOSH
  434.  
  435. /* experimental.c */
  436. {    "TIME",                F, xstime            },
  437. {    "GET-INTERNAL-RUN-TIME",    S, xs_get_internal_run_time    },
  438. {    "GET-INTERNAL-REAL-TIME",    S, xs_get_internal_real_time    },
  439. {    "GETENV",            S, xsgetenv            },
  440.  
  441. /* common.c */
  442. {    "APROPOS",            S, xsapropos            },
  443. {    "APROPOS-LIST",            S, xsaproposlist        },
  444. {    "IDENTITY",            S, xsidentity            },
  445. {    "MAKE-LIST",            S, xsmklist            },
  446. {    "ADJOIN",            S, xsadjoin            },
  447. {    "FILE-POSITION",        S, xsfileposition        },
  448. {    "FORMAT",            S, xsformat            },
  449. {    "FORCE-OUTPUT",            S, xsforce_output        },
  450. {    "COPY-LIST",            S, xscopylist            },
  451. {    "COPY-SEQ",            S, xscopyseq            },
  452. {    "REDUCE",            S, xsreduce            },
  453. {    "MAP",                S, xsmap            },
  454. {    "ELT",                S, xselt            },
  455. {    "COERCE",            S, xscoerce            },
  456. {    "APPLY",            S, xsapply            },
  457. {    "EVAL",                S, xseval            },
  458. {    "LOAD",                S, xsload            },
  459. {    "COMPLEXP",            S, xscomplexp            },
  460. {    "COMPLEX",            S, xsrcomplex            },
  461. {    "CONJUGATE",            S, xsrconjugate            },
  462. {    "REALPART",            S, xsrrealpart            },
  463. {    "IMAGPART",            S, xsrimagpart            },
  464. {    "EQL",                S, xseql            },
  465. {    "EQUAL",            S, xsequal            },
  466. {    "DEFCONSTANT",            F, xsdefconstant        },
  467. {    "DEFPARAMETER",            F, xsdefparameter        },
  468. {    "DEFVAR",            F, xsdefvar            },
  469. {    "MAKUNBOUND",            S, xsmakunbound            },
  470. {    "FMAKUNBOUND",            S, xsfmakunbound        },
  471. {    "MAKE-STRING",            S, xsmake_string        },
  472. {    "CONCATENATE",            S, xsconcatenate        },
  473. {    "SOME",                S, xssome            },
  474. {    "EVERY",            S, xsevery            },
  475. {    "NOTANY",            S, xsnotany            },
  476. {    "NOTEVERY",            S, xsnotevery            },
  477. {    "UNION",            S, xsunion            },
  478. {    "INTERSECTION",            S, xsintersection        },
  479. {    "SET-DIFFERENCE",        S, xsset_difference        },
  480. {    "SUBSETP",            S, xssubsetp            },
  481. {    "REMOVE-DUPLICATES",        S, xsremove_duplicates        },
  482. {    "BUTLAST",            S, xsbutlast            },
  483. {    "FIND",                S, xsfind            },
  484. {    "POSITION",            S, xsposition            },
  485. {    "ERROR",            S, xserror            },
  486. {    "BREAK",            S, xsbreak            },
  487.  
  488. /* commonarrays.c */
  489. {    "ARRAYP",            S, xsarrayp            },
  490. {    "ARRAY-IN-BOUNDS-P",        S, xsarrayinboundsp        },
  491. {    "ARRAY-DIMENSIONS",        S, xsarraydimensions        },
  492. {    "ARRAY-RANK",            S, xsarrayrank            },
  493. {    "ARRAY-TOTAL-SIZE",        S, xsarraytotalsize        },
  494. {    "ARRAY-DIMENSION",        S, xsarraydimension        },
  495. {    "ARRAY-ROW-MAJOR-INDEX",    S, xsarrayrowmajorindex        },
  496. {    "AREF",                S, xsaref            },
  497. {    "MAKE-ARRAY",            S, xsmakearray            },
  498.  
  499. /* distributions.c */
  500. {    "NORMAL-CDF",            S, xsrnormalcdf            },
  501. {    "BETA-CDF",            S, xsrbetacdf            },
  502. {    "GAMMA-CDF",            S, xsrgammacdf            },
  503. {    "CHISQ-CDF",            S, xsrchisqcdf            },
  504. {    "T-CDF",            S, xsrtcdf            },
  505. {    "F-CDF",            S, xsrfcdf            },
  506. {    "CAUCHY-CDF",            S, xsrcauchycdf            },
  507. {    "LOG-GAMMA",            S, xsrloggamma            },
  508. {    "BIVNORM-CDF",            S, xsrbnormcdf            },
  509. {    "NORMAL-QUANT",            S, xsrnormalquant        },
  510. {    "CAUCHY-QUANT",            S, xsrcauchyquant        },
  511. {    "BETA-QUANT",            S, xsrbetaquant            },
  512. {    "GAMMA-QUANT",            S, xsrgammaquant        },
  513. {    "CHISQ-QUANT",            S, xsrchisqquant        },
  514. {    "T-QUANT",            S, xsrtquant            },
  515. {    "F-QUANT",            S, xsrfquant            },
  516. {    "NORMAL-DENS",            S, xsrnormaldens        },
  517. {    "CAUCHY-DENS",            S, xsrcauchydens        },
  518. {    "BETA-DENS",            S, xsrbetadens            },
  519. {    "GAMMA-DENS",            S, xsrgammadens            },
  520. {    "CHISQ-DENS",            S, xsrchisqdens            },
  521. {    "T-DENS",            S, xsrtdens            },
  522. {    "F-DENS",            S, xsrfdens            },
  523. {    "UNIFORM-RAND",            S, xsruniformrand        },
  524. {    "NORMAL-RAND",            S, xsrnormalrand        },
  525. {    "CAUCHY-RAND",            S, xsrcauchyrand        },
  526. {    "GAMMA-RAND",            S, xsrgammarand            },
  527. {    "CHISQ-RAND",            S, xsrchisqrand            },
  528. {    "T-RAND",            S, xsrtrand            },
  529. {    "BETA-RAND",            S, xsrbetarand            },
  530. {    "F-RAND",            S, xsrfrand            },
  531.  
  532. /* ddistributions.c */
  533. {    "BINOMIAL-CDF",            S, xsrbinomialcdf        },
  534. {    "POISSON-CDF",            S, xsrpoissoncdf        },
  535. {    "BINOMIAL-PMF",            S, xsrbinomialpmf        },
  536. {    "POISSON-PMF",            S, xsrpoissonpmf        },
  537. {    "BINOMIAL-QUANT",        S, xsrbinomialquant        },
  538. {    "POISSON-QUANT",        S, xsrpoissonquant        },
  539. {    "BINOMIAL-RAND",        S, xsrbinomialrand        },
  540. {    "POISSON-RAND",            S, xsrpoissonrand        },
  541.  
  542. /* linalg.c */
  543. {    "LU-DECOMP",            S, xslu_decomp            },
  544. {    "LU-SOLVE",            S, xslu_solve            },
  545. {    "DETERMINANT",            S, xslu_determinant        },
  546. {    "INVERSE",            S, xslu_inverse            },
  547. {    "SV-DECOMP",            S, xssv_decomp            },
  548. {    "QR-DECOMP",            S, xsqr_decomp            },
  549. {    "CHOL-DECOMP",            S, xschol_decomp        },
  550. {    "RCONDEST",            S, xsrcondest            },
  551. {    "MAKE-ROTATION",        S, xsmake_rotation        },
  552. {    "SPLINE",            S, xsspline            },
  553. {    "KERNEL-DENS",            S, xskernel_dens        },
  554. {    "KERNEL-SMOOTH",        S, xskernel_smooth        },
  555. {    "base-lowess",            S, xsbase_lowess        },
  556. {    "SURFACE-CONTOUR",        S, xssurface_contour        },
  557. {    "FFT",                S, xsfft            },
  558.  
  559. /* matrices1.c */
  560. {    "MATMULT",            S, xsmatmult            },
  561. {    "%*",                S, xsmatmult            },
  562. {    "INNER-PRODUCT",        S, xsmatmult            },
  563. {    "CROSS-PRODUCT",        S, xscrossproduct        },
  564. {    "DIAGONAL",            S, xsdiagonal            },
  565. {    "IDENTITY-MATRIX",        S, xsidentitymatrix        },
  566. {    "OUTER-PRODUCT",        S, xsouterproduct        },
  567. {    "ROW-LIST",            S, xsrowlist            },
  568. {    "COLUMN-LIST",            S, xscolumnlist            },
  569. {    "BIND-ROWS",            S, xsbindrows            },
  570. {    "BIND-COLUMNS",            S, xsbindcols            },
  571. {    "TRANSPOSE",            S, xstranspose            },
  572.  
  573. /* matrices2.c */
  574. {    "MAKE-SWEEP-MATRIX",        S, xsmakesweepmatrix        },
  575. {    "SWEEP-OPERATOR",        S, xssweepoperator        },
  576.  
  577. /* basics.c */
  578. {    "SEQUENCEP",            S, xssequencep            },
  579. {    "COPY-VECTOR",            S, xscopyvector            },
  580. {    "COPY-ARRAY",            S, xscopyarray            },
  581. {    "SPLIT-LIST",            S, xssplitlist            },
  582. {    "WHICH",            S, xswhich            },
  583. {    "ISEQ",                S, xsiseq            },
  584. {    "REPEAT",            S, xsrepeat            },
  585. {    "SELECT",            S, xsselect            },
  586. {    "SET-SELECT",            S, xssetselect            },
  587. {    "PERMUTE-ARRAY",        S, xspermutearray        },
  588. #ifdef SAVERESTORE
  589. {    "RESTORE",            S, xsrestore            },
  590. #endif
  591.  
  592. /* compound.c */
  593. {    "COMPOUND-DATA-P",        S, xscompoundp            },
  594. {    "COMPOUND-DATA-LENGTH",        S, xscompound_length        },
  595. {    "COMPOUND-DATA-SEQ",        S, xscompound_seq        },
  596. {    "MAP-ELEMENTS",            S, xsmap_elements        },
  597.  
  598. /* math.c */
  599. {    "+",                S, xsradd            },
  600. {    "-",                S, xsrsub            },
  601. {    "*",                S, xsrmul            },
  602. {    "/",                S, xsrdiv            },
  603. {    "REM",                S, xsrrem            },
  604. {    "PMIN",                S, xsrmin            },
  605. {    "PMAX",                S, xsrmax            },
  606. {    "^",                S, xsrexpt            },
  607. {    "**",                S, xsrexpt            },
  608. {    "EXPT",                S, xsrexpt            },
  609. {    "LOG",                S, xsrlog            },
  610.  
  611. {    "LOGAND",            S, xsrlogand            },
  612. {    "LOGIOR",            S, xsrlogior            },
  613. {    "LOGXOR",            S, xsrlogxor            },
  614. {    "LOGNOT",            S, xsrlognot            },
  615.  
  616. {    "ABS",                S, xsrabs            },
  617. {    "1+",                S, xsradd1            },
  618. {    "1-",                S, xsrsub1            },
  619. {    "SIN",                S, xsrsin            },
  620. {    "COS",                S, xsrcos            },
  621. {    "TAN",                S, xsrtan            },
  622. {    "EXP",                S, xsrexp            },
  623. {    "SQRT",                S, xsrsqrt            },
  624. {    "TRUNCATE",            S, xsrfix            },
  625. {    "FLOAT",            S, xsrfloat            },
  626. {    "RANDOM",            S, xsrrand            },
  627. {    "FLOOR",            S, xsrfloor            },
  628. {    "CEILING",            S, xsrceil            },
  629. {    "ROUND",            S, xsrround            },
  630. {    "ASIN",                S, xsrasin            },
  631. {    "ACOS",                S, xsracos            },
  632. {    "ATAN",                S, xsratan            },
  633. {    "PHASE",            S, xsrphase            },
  634.  
  635. {    "MINUSP",            S, xsrminusp            },
  636. {    "ZEROP",            S, xsrzerop            },
  637. {    "PLUSP",            S, xsrplusp            },
  638. {    "EVENP",            S, xsrevenp            },
  639. {    "ODDP",                S, xsroddp            },
  640.  
  641. {    "<",                S, xsrlss            },
  642. {    "<=",                S, xsrleq            },
  643. {    "=",                S, xsrequ            },
  644. {    "/=",                S, xsrneq            },
  645. {    ">=",                S, xsrgeq            },
  646. {    ">",                S, xsrgtr            },
  647.  
  648. /* objects.c */
  649. {    "KIND-OF-P",            S, xskind_of_p            },
  650. {    "SLOT-VALUE",            S, xsslot_value            },
  651. {    "MAKE-OBJECT",            S, xsmake_object        },
  652. {    "SEND",                S, xmsend            },
  653. {    "SEND-SUPER",            S, xmsendsuper            },
  654. {    "CALL-NEXT-METHOD",        S, xscall_next            },
  655. {    "CALL-METHOD",            S, xscall_method        },
  656. {    "DEFMETH",            F, xsdefmeth            },
  657. {    "DEFPROTO",            F, xsdefproto            },
  658.  
  659. /* optimize.c */
  660. #ifdef OPTIMIZE
  661. {    "BRACKET-SEARCH",        S, xsbracket_search        },
  662. {    "GOLDEN-SEARCH",        S, xsgolden_search        },
  663. {    "PARABOLIC-SEARCH",        S, xsparabolic_search        },
  664. #endif OPTIMIZE
  665.  
  666. /* sortdata.c */
  667. {    "SORT-DATA",            S, xssortdata            },
  668. {    "ORDER",            S, xsorder            },
  669. {    "RANK",                S, xsrank            },
  670.  
  671. /* statistics.c */
  672. {    "QUANTILE",            S, xsquantile            },
  673. {    "SUM",                S, xssum            },
  674. {    "PROD",                S, xsprod            },
  675. {    "MIN",                S, xsmin            },
  676. {    "MAX",                S, xsmax            },
  677. {    "COUNT-ELEMENTS",        S, xscount            },
  678. {    "ELEMENT-SEQ",            S, xselement_seq        },
  679. {    "IF-ELSE",            S, xsifelse            },
  680. {    "MEAN",                S, xsmean            },
  681. {    "SAMPLE",            S, xssample            },
  682.  
  683. /* uni.c */
  684. {    "MAKE-RANDOM-STATE",        S, xsmake_random_state        },
  685. {    "RANDOM-STATE-P",        S, xsrandom_state_p        },
  686.  
  687. /* windows.c */
  688. {    "SCREEN-SIZE",            S, xsscreen_size        },
  689. {    "SCREEN-HAS-COLOR",        S, xsscreen_has_color        },
  690. {    "FLUSH-GRAPHICS",        S,  xsflush_graphics        },
  691.  
  692. /* xsiviewwindow.c */
  693. {    "RESET-GRAPHICS-BUFFER",    S, iview_window_reset_buffer    },
  694. {    "MAKE-COLOR",            S, gw_make_color        },
  695. {    "FREE-COLOR",            S, gw_free_color        },
  696. {    "MAKE-CURSOR",            S, gw_make_cursor        },
  697. {    "FREE-CURSOR",            S, gw_free_cursor        },
  698.  
  699. /* xsiviewinternal.c */
  700. {    "UNLINK-ALL-WINDOWS",        S, iview_unlink_all_windows    },
  701.  
  702. /* xsiview.c */
  703. {    "GET-NICE-RANGE",        S, iview_get_nice_range        },
  704.  
  705. /* xsgraphics.c */
  706. {    "HISTOGRAM",            S, xshistogram            },
  707. {    "PLOT-POINTS",            S, xsplot_points        },
  708. {    "PLOT-LINES",            S, xsplot_lines            },
  709. {    "SPIN-PLOT",            S, xsspin_plot            },
  710. {    "SCATTERPLOT-MATRIX",        S, xsscatterplot_matrix        },
  711. {    "NAME-LIST",            S, xsnamelist            },
  712. #ifdef UNIX
  713. {    "GNU-PLOT-POINTS",        S, gnupointplot            },
  714. {    "GNU-PLOT-LINES",               S, gnulineplot            },
  715. #endif UNIX
  716.  
  717. #ifdef MACINTOSH
  718. /* macxsgraph.c */
  719. {    "PICK-COLOR",            S, xspick_color            },
  720.  
  721. /* macdynload.c */
  722. {    "OPEN-RESOURCE-FILE",        S, xsopen_resfile        },
  723. {    "CLOSE-RESOURCE-FILE",        S, xsclose_resfile        },
  724. {    "CALL-CFUN",            S, xscall_cfun            },
  725. #endif MACINTOSH
  726.  
  727. #ifdef X11WINDOWS
  728. {    "PARSE-COLOR",            S, xsparse_color        },
  729. {    "BEST-CURSOR-SIZE",        S, xsbest_cursor_size        },
  730. {    "BITMAP-FROM-FILE",        S, xsbitmap_from_file        },
  731. {    "X11-OPTIONS",            S, xsx11_options        },
  732. #endif X11WINDOWS
  733.  
  734. #ifdef FOREIGNCALL
  735. {    "DYN-LOAD",            S, xsdynload            },
  736. {    "CALL-CFUN",            S, xscall_cfun            },
  737. {    "CALL-FSUB",            S, xscall_fsub            },
  738. {    "CALL-LFUN",            S, xscall_lfun            },
  739. #endif FOREIGNCALL
  740. #ifdef UNIX
  741. {    "SYSTEM",            S, xssystem            },
  742. #endif UNIX
  743.  
  744. /* xsbayes.c */
  745. {    "NUMGRAD",            S, xsnumgrad            },
  746. {    "NUMHESS",            S, xsnumhess            },
  747. {    "minfo-isnew",            S, xsminfo_isnew        },
  748. {    "minfo-maximize",        S, xsminfo_maximize        },
  749. {    "minfo-loglap",            S, xsminfo_loglap        },
  750. {    "AX+Y",                S, xsaxpy            },
  751. #endif /* XLISP_ONLY */
  752.