diff options
-rw-r--r-- | hash.c | 5 | ||||
-rw-r--r-- | lib.c | 21 | ||||
-rw-r--r-- | parser.y | 5 | ||||
-rw-r--r-- | unwind.c | 5 |
4 files changed, 0 insertions, 36 deletions
@@ -100,11 +100,6 @@ static struct hash_iter *reachable_iters; static int hash_str_limit = INT_MAX, hash_rec_limit = 32; -/* C99 inline instantiations. */ -#if __STDC_VERSION__ >= 199901L -loc gethash_l(val self, val hash, val key, loc new_p); -#endif - static u32_t randbox[] = { 0x49848f1bU, 0xe6255dbaU, 0x36da5bdcU, 0x47bf94e9U, 0x8cbcce22U, 0x559fc06aU, 0xd268f536U, 0xe10af79aU, @@ -131,27 +131,6 @@ val year_s, month_s, day_s, hour_s, min_s, sec_s, dst_s, gmtoff_s, zone_s; static val env_list; static val recycled_conses; -/* C99 inline instantiations. */ -#if __STDC_VERSION__ >= 199901L -loc mkloc_fun(val *ptr, val obj); -cnum tag(val obj); -int is_ptr(val obj); -int is_num(val obj); -int is_chr(val obj); -int is_lit(val obj); -type_t type(val obj); -val auto_str(const wchli_t *str); -val static_str(const wchli_t *str); -wchar_t *litptr(val obj); -val num_fast(cnum n); -mp_int *mp(val bign); -val chr(wchar_t ch); -val eq(val a, val b); -val null(val v); -int null_or_missing_p(val v); -val default_null_arg(val arg); -#endif - const seq_kind_t seq_kind_tab[MAXTYPE+1] = { SEQ_NIL, /* NIL */ SEQ_NOTSEQ, /* NUM */ @@ -1305,11 +1305,6 @@ const int have_yydebug = YYDEBUG; int yylex(YYSTYPE *, yyscan_t scanner); -/* C99 inline instantiations. */ -#if __STDC_VERSION__ >= 199901L -val rlcp(val to, val from); -#endif - void yydebug_onoff(int val) { #if YYDEBUG @@ -75,11 +75,6 @@ static val deferred_warnings, tentative_defs; static int uw_break_on_error; #endif -/* C99 inline instantiations. */ -#if __STDC_VERSION__ >= 199901L -val uw_block_return(val tag, val result); -#endif - static void uw_unwind_to_exit_point(void) { uw_frame_t *orig_stack = uw_stack; |