lib/setup.h

   1 /* File: "setup.h", Time-stamp: <2007-09-28 09:57:58 feeley> */
   2
   3 /* Copyright (c) 1994-2007 by Marc Feeley, All Rights Reserved. */
   4
   5 #ifndef ___SETUP_H
   6 #define ___SETUP_H
   7
   8
   9 /*---------------------------------------------------------------------------*/
  10
  11
  12 extern ___setup_params_struct ___setup_params; /* params passed to ___setup */
  13
  14
  15 extern ___SCMOBJ ___os_load_object_file
  16    ___P((___SCMOBJ path,
  17          ___SCMOBJ modname),
  18         ());
  19
  20
  21 extern ___SCMOBJ ___find_symkey_from_scheme_string
  22    ___P((___SCMOBJ str,
  23          unsigned int subtype),
  24         ());
  25
  26
  27 extern ___SCMOBJ ___new_symkey
  28    ___P((___SCMOBJ name,
  29          unsigned int subtype),
  30         ());
  31
  32 extern void ___for_each_symkey
  33    ___P((unsigned int subtype,
  34          void (*visit) (___SCMOBJ symkey, void *data),
  35          void *data),
  36         ());
  37
  38 #ifdef ___DEBUG
  39
  40 extern ___SCMOBJ find_global_var_bound_to
  41    ___P((___SCMOBJ val),
  42         ());
  43
  44 #endif
  45
  46
  47 #define ___COVER(n)
  48 #define ___COVER_SFUN_CONVERSION_ERROR_HANDLER               ___COVER(0)
  49 #define ___COVER_CFUN_CONVERSION_ERROR_HANDLER               ___COVER(1)
  50 #define ___COVER_STACK_LIMIT_HANDLER_STACK_LIMIT             ___COVER(2)
  51 #define ___COVER_STACK_LIMIT_HANDLER_HEAP_OVERFLOW           ___COVER(3)
  52 #define ___COVER_STACK_LIMIT_HANDLER_INTR_ENABLED            ___COVER(4)
  53 #define ___COVER_STACK_LIMIT_HANDLER_INTERRUPT               ___COVER(5)
  54 #define ___COVER_STACK_LIMIT_HANDLER_END                     ___COVER(6)
  55 #define ___COVER_HEAP_LIMIT_HANDLER_END                      ___COVER(7)
  56 #define ___COVER_NONPROC_HANDLER_END                         ___COVER(8)
  57 #define ___COVER_GLOBAL_NONPROC_HANDLER_FOUND                ___COVER(9)
  58 #define ___COVER_GLOBAL_NONPROC_HANDLER_NEXT                 ___COVER(10)
  59 #define ___COVER_GLOBAL_NONPROC_HANDLER_END                  ___COVER(11)
  60 #define ___COVER_WRONG_NARGS_HANDLER_NONCLOSURE              ___COVER(12)
  61 #define ___COVER_WRONG_NARGS_HANDLER_CLOSURE                 ___COVER(13)
  62 #define ___COVER_REST_PARAM_HANDLER_WRONG_NARGS              ___COVER(14)
  63 #define ___COVER_REST_PARAM_HANDLER_HEAP_LIMIT               ___COVER(15)
  64 #define ___COVER_REST_PARAM_HANDLER_NEED_TO_GC               ___COVER(16)
  65 #define ___COVER_REST_PARAM_HANDLER_NO_NEED_TO_GC            ___COVER(17)
  66 #define ___COVER_KEYWORD_PARAM_HANDLER_WRONG_NARGS1          ___COVER(18)
  67 #define ___COVER_KEYWORD_PARAM_HANDLER_FOUND                 ___COVER(19)
  68 #define ___COVER_KEYWORD_PARAM_HANDLER_NOT_FOUND             ___COVER(20)
  69 #define ___COVER_KEYWORD_PARAM_HANDLER_WRONG_NARGS2          ___COVER(21)
  70 #define ___COVER_KEYWORD_PARAM_HANDLER_KEYWORD_EXPECTED      ___COVER(22)
  71 #define ___COVER_KEYWORD_PARAM_HANDLER_END                   ___COVER(23)
  72 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_WRONG_NARGS1     ___COVER(24)
  73 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_FOUND            ___COVER(25)
  74 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_NOT_FOUND        ___COVER(26)
  75 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_WRONG_NARGS2     ___COVER(27)
  76 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_KEYWORD_EXPECTED ___COVER(28)
  77 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_HEAP_LIMIT       ___COVER(29)
  78 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_NEED_TO_GC       ___COVER(30)
  79 #define ___COVER_KEYWORD_REST_PARAM_HANDLER_NO_NEED_TO_GC    ___COVER(31)
  80 #define ___COVER_FORCE_HANDLER_DETERMINED                    ___COVER(32)
  81 #define ___COVER_FORCE_HANDLER_NOT_DETERMINED                ___COVER(33)
  82 #define ___COVER_RETURN_TO_C_HANDLER_FIRST_RETURN            ___COVER(34)
  83 #define ___COVER_RETURN_TO_C_HANDLER_MULTIPLE_RETURN         ___COVER(35)
  84 #define ___COVER_BREAK_HANDLER_STACK_RETI                    ___COVER(36)
  85 #define ___COVER_BREAK_HANDLER_STACK_RETN                    ___COVER(37)
  86 #define ___COVER_BREAK_HANDLER_STACK_FIRST_FRAME             ___COVER(38)
  87 #define ___COVER_BREAK_HANDLER_STACK_NOT_FIRST_FRAME         ___COVER(39)
  88 #define ___COVER_BREAK_HANDLER_HEAP_RETI                     ___COVER(40)
  89 #define ___COVER_BREAK_HANDLER_HEAP_RETN                     ___COVER(41)
  90 #define ___COVER_INTERNAL_RETURN_HANDLER_END                 ___COVER(42)
  91 #define ___COVER_REST_PARAM_RESUME_PROCEDURE                 ___COVER(43)
  92 #define ___COVER_GC_WITHOUT_EXCEPTIONS                       ___COVER(44)
  93 #define ___COVER_APPLY_ARGUMENT_LIMIT                        ___COVER(45)
  94 #define ___COVER_APPLY_ARGUMENT_LIMIT_END                    ___COVER(46)
  95 #define  ___COVER_MARK_CAPTURED_CONTINUATION_RETI            ___COVER(47)
  96 #define  ___COVER_MARK_CAPTURED_CONTINUATION_RETN            ___COVER(48)
  97 #define  ___COVER_MARK_CAPTURED_CONTINUATION_ALREADY_COPIED  ___COVER(49)
  98 #define  ___COVER_MARK_CAPTURED_CONTINUATION_COPY            ___COVER(50)
  99 #define  ___COVER_MARK_CAPTURED_CONTINUATION_FIRST_FRAME     ___COVER(51)
 100 #define  ___COVER_MARK_CAPTURED_CONTINUATION_NOT_FIRST_FRAME ___COVER(52)
 101 #define  ___COVER_MARK_CONTINUATION_RETI                     ___COVER(53)
 102 #define  ___COVER_MARK_CONTINUATION_RETN                     ___COVER(54)
 103 #define  ___COVER_SCAN_FRAME_RETI                            ___COVER(55)
 104 #define  ___COVER_SCAN_FRAME_RETN                            ___COVER(56)
 105
 106 /*---------------------------------------------------------------------------*/
 107
 108
 109 #endif