summaryrefslogtreecommitdiffstats
path: root/protsym.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-07-09 19:09:07 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-07-09 19:09:07 -0700
commit51e4d7610da093d7b9ee87dfc2535a9b871490de (patch)
treeecb1b437d77571fb8d77ef665ce77d4ee37b7e60 /protsym.c
parent86d3aa6d73dad70090cb29b867f618b7cda5bf70 (diff)
downloadtxr-51e4d7610da093d7b9ee87dfc2535a9b871490de.tar.gz
txr-51e4d7610da093d7b9ee87dfc2535a9b871490de.tar.bz2
txr-51e4d7610da093d7b9ee87dfc2535a9b871490de.zip
Version 182.txr-182
* RELNOTES: Updated. * configure, txr.1: Bumped version and date. * share/txr/stdlib/ver.tl: Likewise. * txr.vim, tl.vim, protsym.c: Regenerated.
Diffstat (limited to 'protsym.c')
-rw-r--r--protsym.c234
1 files changed, 118 insertions, 116 deletions
diff --git a/protsym.c b/protsym.c
index 71f7b8b1..ae4128b7 100644
--- a/protsym.c
+++ b/protsym.c
@@ -68,61 +68,62 @@ extern val gen_s, generate_s, gensym_counter_s, gid_k, gid_s;
extern val gmtoff_s, greedy_k, gun_s, handler_bind_s, hash_construct_s;
extern val hash_iter_s, hash_lit_s, hash_s, hextoint_k, hour_s;
extern val iapply_s, identity_s, if_s, iflet_s, in_package_s;
-extern val inc_s, include_s, ino_k, ino_s, int16_s;
-extern val int32_s, int64_s, int8_s, int_s, integer_s;
-extern val internal_error_s, into_k, intr_s, ipf_s, keyword_package_s;
-extern val labels_s, lambda_s, lambda_set_s, last_s, lbind_s;
-extern val lcons_s, le_double_s, le_float_s, le_int16_s, le_int32_s;
-extern val le_int64_s, le_uint16_s, le_uint32_s, le_uint64_s, length_s;
-extern val let_s, let_star_s, lfilt_k, line_s, lines_k;
-extern val lisp1_setq_s, list_k, list_s, list_star_s, listener_hist_len_s;
-extern val listener_multi_line_p_s, listener_sel_inclusive_p_s, lit_s, load_path_s, load_recursive_s;
-extern val load_s, local_s, long_s, longest_k, lstr_s;
-extern val mac_param_bind_s, macro_s, macro_time_s, macrolet_s, make_struct_lit_s;
-extern val mandatory_k, maxgap_k, maxtimes_k, maybe_s, mdo_s;
-extern val memq_s, memql_s, memqual_s, merge_s, meth_s;
-extern val min_s, mingap_k, mintimes_k, mod_s, mode_k;
-extern val mode_s, modlast_s, month_s, mtime_k, mtime_s;
-extern val name_k, name_s, named_k, next_s, next_spec_k;
-extern val nlink_k, nlink_s, none_s, nongreedy_s, not_s;
-extern val nothrow_k, noval_s, null_s, nullify_s, number_s;
-extern val numeric_error_s, oand_s, oneplus_s, op_s, opip_s;
-extern val optional_s, or_s, output_s, package_alist_s, package_s;
-extern val panic_s, parser_s, path_s, pkg_s, plus_s;
-extern val pprint_flo_format_s, print_base_s, print_circle_s, print_flo_digits_s, print_flo_format_s;
-extern val print_flo_precision_s, print_s, process_error_s, prof_s, prog1_s;
-extern val progn_s, promise_forced_s, promise_inprogress_s, promise_s, ptr_in_d_s;
-extern val ptr_in_s, ptr_out_d_s, ptr_out_s, ptr_out_s_s, ptr_s;
-extern val qquote_s, qref_s, quasi_s, quasilist_s, query_error_s;
-extern val quote_s, random_state_s, random_state_var_s, random_warmup_s, range_error_s;
-extern val range_s, rcons_s, rdev_k, rdev_s, real_time_k;
-extern val rebind_s, reflect_k, regex_s, rep_s, repeat_s;
-extern val repeat_spec_k, require_s, resolve_k, rest_s, restart_s;
-extern val ret_s, return_from_s, return_s, rfilt_k, sbit_s;
-extern val sec_s, sequence_s, set_s, setq_s, setqf_s;
-extern val short_s, shortest_k, single_s, size_k, size_s;
-extern val skip_s, slot_s, some_s, space_k, special_s;
-extern val splice_s, stat_s, static_slot_s, stddebug_s, stderr_s;
-extern val stdin_s, stdio_stream_s, stdnull_s, stdout_s, str_d_s;
-extern val str_s, stream_s, string_k, string_s, struct_lit_s;
-extern val struct_s, struct_type_s, switch_s, sym_s, symacro_k;
-extern val symacrolet_s, syntax_error_s, sys_abscond_from_s, sys_apply_s, sys_catch_s;
-extern val sys_lisp1_value_s, sys_mark_special_s, sys_qquote_s, sys_splice_s, sys_unquote_s;
-extern val system_error_s, system_package_s, text_s, throw_s, time_local_s;
-extern val time_parse_s, time_s, time_string_s, time_utc_s, timeout_error_s;
-extern val times_k, tlist_k, tobase64_k, tofloat_k, tohtml_k;
-extern val tohtml_star_k, toint_k, tonumber_k, topercent_k, tourl_k;
-extern val trailer_s, tree_bind_s, tree_case_s, try_s, type_error_s;
-extern val ubit_s, uchar_s, uid_k, uid_s, uint16_s;
-extern val uint32_s, uint64_s, uint8_s, uint_s, ulong_s;
-extern val unbound_s, union_s, unique_s, unquote_s, until_s;
-extern val until_star_s, upcase_k, uref_s, user_package_s, userdata_k;
-extern val ushort_s, uw_protect_s, val_s, var_k, var_s;
-extern val vars_k, vec_list_s, vec_s, vecref_s, vector_lit_s;
-extern val void_s, warning_s, wchar_s, weak_keys_k, weak_vals_k;
-extern val when_s, while_s, while_star_s, whole_k, wild_s;
-extern val with_dyn_rebinds_s, word_char_k, wrap_k, wstr_d_s, wstr_s;
-extern val year_s, zap_s, zarray_s, zeroplus_s, zone_s;
+extern val inc_s, include_s, init_k, ino_k, ino_s;
+extern val int16_s, int32_s, int64_s, int8_s, int_s;
+extern val integer_s, internal_error_s, into_k, intr_s, ipf_s;
+extern val keyword_package_s, labels_s, lambda_s, lambda_set_s, last_s;
+extern val lbind_s, lcons_s, le_double_s, le_float_s, le_int16_s;
+extern val le_int32_s, le_int64_s, le_uint16_s, le_uint32_s, le_uint64_s;
+extern val length_s, let_s, let_star_s, lfilt_k, line_s;
+extern val lines_k, lisp1_setq_s, list_k, list_s, list_star_s;
+extern val listener_hist_len_s, listener_multi_line_p_s, listener_sel_inclusive_p_s, lit_s, load_path_s;
+extern val load_recursive_s, load_s, local_s, long_s, longest_k;
+extern val lstr_s, mac_param_bind_s, macro_s, macro_time_s, macrolet_s;
+extern val make_struct_lit_s, mandatory_k, maxgap_k, maxtimes_k, maybe_s;
+extern val mdo_s, memq_s, memql_s, memqual_s, merge_s;
+extern val meth_s, min_s, mingap_k, mintimes_k, mod_s;
+extern val mode_k, mode_s, modlast_s, month_s, mtime_k;
+extern val mtime_s, name_k, name_s, named_k, next_s;
+extern val next_spec_k, nlink_k, nlink_s, none_s, nongreedy_s;
+extern val not_s, nothrow_k, noval_s, null_s, nullify_s;
+extern val number_s, numeric_error_s, oand_s, oneplus_s, op_s;
+extern val opip_s, optional_s, or_s, output_s, package_alist_s;
+extern val package_s, panic_s, parser_s, path_s, pkg_s;
+extern val plus_s, postinit_k, pprint_flo_format_s, print_base_s, print_circle_s;
+extern val print_flo_digits_s, print_flo_format_s, print_flo_precision_s, print_s, process_error_s;
+extern val prof_s, prog1_s, progn_s, promise_forced_s, promise_inprogress_s;
+extern val promise_s, ptr_in_d_s, ptr_in_s, ptr_out_d_s, ptr_out_s;
+extern val ptr_out_s_s, ptr_s, qquote_s, qref_s, quasi_s;
+extern val quasilist_s, query_error_s, quote_s, random_state_s, random_state_var_s;
+extern val random_warmup_s, range_error_s, range_s, rcons_s, rdev_k;
+extern val rdev_s, real_time_k, rebind_s, reflect_k, regex_s;
+extern val rep_s, repeat_s, repeat_spec_k, require_s, resolve_k;
+extern val rest_s, restart_s, ret_s, return_from_s, return_s;
+extern val rfilt_k, sbit_s, sec_s, sequence_s, set_s;
+extern val setq_s, setqf_s, short_s, shortest_k, single_s;
+extern val size_k, size_s, skip_s, slot_s, some_s;
+extern val space_k, special_s, splice_s, stat_s, static_slot_s;
+extern val stddebug_s, stderr_s, stdin_s, stdio_stream_s, stdnull_s;
+extern val stdout_s, str_d_s, str_s, stream_s, string_k;
+extern val string_s, struct_lit_s, struct_s, struct_type_s, switch_s;
+extern val sym_s, symacro_k, symacrolet_s, syntax_error_s, sys_abscond_from_s;
+extern val sys_apply_s, sys_catch_s, sys_lisp1_value_s, sys_mark_special_s, sys_qquote_s;
+extern val sys_splice_s, sys_unquote_s, system_error_s, system_package_s, text_s;
+extern val throw_s, time_local_s, time_parse_s, time_s, time_string_s;
+extern val time_utc_s, timeout_error_s, times_k, tlist_k, tobase64_k;
+extern val tofloat_k, tohtml_k, tohtml_star_k, toint_k, tonumber_k;
+extern val topercent_k, tourl_k, trailer_s, tree_bind_s, tree_case_s;
+extern val try_s, type_error_s, ubit_s, uchar_s, uid_k;
+extern val uid_s, uint16_s, uint32_s, uint64_s, uint8_s;
+extern val uint_s, ulong_s, unbound_s, union_s, unique_s;
+extern val unquote_s, until_s, until_star_s, upcase_k, uref_s;
+extern val user_package_s, userdata_k, ushort_s, uw_protect_s, val_s;
+extern val var_k, var_s, vars_k, vec_list_s, vec_s;
+extern val vecref_s, vector_lit_s, void_s, warning_s, wchar_s;
+extern val weak_keys_k, weak_vals_k, when_s, while_s, while_star_s;
+extern val whole_k, wild_s, with_dyn_rebinds_s, word_char_k, wrap_k;
+extern val wstr_d_s, wstr_s, year_s, zap_s, zarray_s;
+extern val zeroplus_s, zone_s;
#if CONFIG_DEBUG_SUPPORT
extern val debug_quit_s;
@@ -137,13 +138,13 @@ extern val group_s, mem_s;
extern val dir_s, gecos_s, passwd_s, shell_s;
#endif
#if HAVE_SOCKETS
-extern val socket_error_s;
-#endif
-#if HAVE_SOCKETS
extern val addr_s, addrinfo_s, canonname_s, family_s, flags_s;
extern val flow_info_s, port_s, protocol_s, scope_id_s, sockaddr_in6_s;
extern val sockaddr_in_s, sockaddr_un_s, socktype_s;
#endif
+#if HAVE_SOCKETS
+extern val socket_error_s;
+#endif
#if HAVE_SYSLOG
extern val prio_k;
#endif
@@ -194,61 +195,62 @@ val *protected_sym[] = {
&gmtoff_s, &greedy_k, &gun_s, &handler_bind_s, &hash_construct_s,
&hash_iter_s, &hash_lit_s, &hash_s, &hextoint_k, &hour_s,
&iapply_s, &identity_s, &if_s, &iflet_s, &in_package_s,
- &inc_s, &include_s, &ino_k, &ino_s, &int16_s,
- &int32_s, &int64_s, &int8_s, &int_s, &integer_s,
- &internal_error_s, &into_k, &intr_s, &ipf_s, &keyword_package_s,
- &labels_s, &lambda_s, &lambda_set_s, &last_s, &lbind_s,
- &lcons_s, &le_double_s, &le_float_s, &le_int16_s, &le_int32_s,
- &le_int64_s, &le_uint16_s, &le_uint32_s, &le_uint64_s, &length_s,
- &let_s, &let_star_s, &lfilt_k, &line_s, &lines_k,
- &lisp1_setq_s, &list_k, &list_s, &list_star_s, &listener_hist_len_s,
- &listener_multi_line_p_s, &listener_sel_inclusive_p_s, &lit_s, &load_path_s, &load_recursive_s,
- &load_s, &local_s, &long_s, &longest_k, &lstr_s,
- &mac_param_bind_s, &macro_s, &macro_time_s, &macrolet_s, &make_struct_lit_s,
- &mandatory_k, &maxgap_k, &maxtimes_k, &maybe_s, &mdo_s,
- &memq_s, &memql_s, &memqual_s, &merge_s, &meth_s,
- &min_s, &mingap_k, &mintimes_k, &mod_s, &mode_k,
- &mode_s, &modlast_s, &month_s, &mtime_k, &mtime_s,
- &name_k, &name_s, &named_k, &next_s, &next_spec_k,
- &nlink_k, &nlink_s, &none_s, &nongreedy_s, &not_s,
- &nothrow_k, &noval_s, &null_s, &nullify_s, &number_s,
- &numeric_error_s, &oand_s, &oneplus_s, &op_s, &opip_s,
- &optional_s, &or_s, &output_s, &package_alist_s, &package_s,
- &panic_s, &parser_s, &path_s, &pkg_s, &plus_s,
- &pprint_flo_format_s, &print_base_s, &print_circle_s, &print_flo_digits_s, &print_flo_format_s,
- &print_flo_precision_s, &print_s, &process_error_s, &prof_s, &prog1_s,
- &progn_s, &promise_forced_s, &promise_inprogress_s, &promise_s, &ptr_in_d_s,
- &ptr_in_s, &ptr_out_d_s, &ptr_out_s, &ptr_out_s_s, &ptr_s,
- &qquote_s, &qref_s, &quasi_s, &quasilist_s, &query_error_s,
- &quote_s, &random_state_s, &random_state_var_s, &random_warmup_s, &range_error_s,
- &range_s, &rcons_s, &rdev_k, &rdev_s, &real_time_k,
- &rebind_s, &reflect_k, &regex_s, &rep_s, &repeat_s,
- &repeat_spec_k, &require_s, &resolve_k, &rest_s, &restart_s,
- &ret_s, &return_from_s, &return_s, &rfilt_k, &sbit_s,
- &sec_s, &sequence_s, &set_s, &setq_s, &setqf_s,
- &short_s, &shortest_k, &single_s, &size_k, &size_s,
- &skip_s, &slot_s, &some_s, &space_k, &special_s,
- &splice_s, &stat_s, &static_slot_s, &stddebug_s, &stderr_s,
- &stdin_s, &stdio_stream_s, &stdnull_s, &stdout_s, &str_d_s,
- &str_s, &stream_s, &string_k, &string_s, &struct_lit_s,
- &struct_s, &struct_type_s, &switch_s, &sym_s, &symacro_k,
- &symacrolet_s, &syntax_error_s, &sys_abscond_from_s, &sys_apply_s, &sys_catch_s,
- &sys_lisp1_value_s, &sys_mark_special_s, &sys_qquote_s, &sys_splice_s, &sys_unquote_s,
- &system_error_s, &system_package_s, &text_s, &throw_s, &time_local_s,
- &time_parse_s, &time_s, &time_string_s, &time_utc_s, &timeout_error_s,
- &times_k, &tlist_k, &tobase64_k, &tofloat_k, &tohtml_k,
- &tohtml_star_k, &toint_k, &tonumber_k, &topercent_k, &tourl_k,
- &trailer_s, &tree_bind_s, &tree_case_s, &try_s, &type_error_s,
- &ubit_s, &uchar_s, &uid_k, &uid_s, &uint16_s,
- &uint32_s, &uint64_s, &uint8_s, &uint_s, &ulong_s,
- &unbound_s, &union_s, &unique_s, &unquote_s, &until_s,
- &until_star_s, &upcase_k, &uref_s, &user_package_s, &userdata_k,
- &ushort_s, &uw_protect_s, &val_s, &var_k, &var_s,
- &vars_k, &vec_list_s, &vec_s, &vecref_s, &vector_lit_s,
- &void_s, &warning_s, &wchar_s, &weak_keys_k, &weak_vals_k,
- &when_s, &while_s, &while_star_s, &whole_k, &wild_s,
- &with_dyn_rebinds_s, &word_char_k, &wrap_k, &wstr_d_s, &wstr_s,
- &year_s, &zap_s, &zarray_s, &zeroplus_s, &zone_s,
+ &inc_s, &include_s, &init_k, &ino_k, &ino_s,
+ &int16_s, &int32_s, &int64_s, &int8_s, &int_s,
+ &integer_s, &internal_error_s, &into_k, &intr_s, &ipf_s,
+ &keyword_package_s, &labels_s, &lambda_s, &lambda_set_s, &last_s,
+ &lbind_s, &lcons_s, &le_double_s, &le_float_s, &le_int16_s,
+ &le_int32_s, &le_int64_s, &le_uint16_s, &le_uint32_s, &le_uint64_s,
+ &length_s, &let_s, &let_star_s, &lfilt_k, &line_s,
+ &lines_k, &lisp1_setq_s, &list_k, &list_s, &list_star_s,
+ &listener_hist_len_s, &listener_multi_line_p_s, &listener_sel_inclusive_p_s, &lit_s, &load_path_s,
+ &load_recursive_s, &load_s, &local_s, &long_s, &longest_k,
+ &lstr_s, &mac_param_bind_s, &macro_s, &macro_time_s, &macrolet_s,
+ &make_struct_lit_s, &mandatory_k, &maxgap_k, &maxtimes_k, &maybe_s,
+ &mdo_s, &memq_s, &memql_s, &memqual_s, &merge_s,
+ &meth_s, &min_s, &mingap_k, &mintimes_k, &mod_s,
+ &mode_k, &mode_s, &modlast_s, &month_s, &mtime_k,
+ &mtime_s, &name_k, &name_s, &named_k, &next_s,
+ &next_spec_k, &nlink_k, &nlink_s, &none_s, &nongreedy_s,
+ &not_s, &nothrow_k, &noval_s, &null_s, &nullify_s,
+ &number_s, &numeric_error_s, &oand_s, &oneplus_s, &op_s,
+ &opip_s, &optional_s, &or_s, &output_s, &package_alist_s,
+ &package_s, &panic_s, &parser_s, &path_s, &pkg_s,
+ &plus_s, &postinit_k, &pprint_flo_format_s, &print_base_s, &print_circle_s,
+ &print_flo_digits_s, &print_flo_format_s, &print_flo_precision_s, &print_s, &process_error_s,
+ &prof_s, &prog1_s, &progn_s, &promise_forced_s, &promise_inprogress_s,
+ &promise_s, &ptr_in_d_s, &ptr_in_s, &ptr_out_d_s, &ptr_out_s,
+ &ptr_out_s_s, &ptr_s, &qquote_s, &qref_s, &quasi_s,
+ &quasilist_s, &query_error_s, &quote_s, &random_state_s, &random_state_var_s,
+ &random_warmup_s, &range_error_s, &range_s, &rcons_s, &rdev_k,
+ &rdev_s, &real_time_k, &rebind_s, &reflect_k, &regex_s,
+ &rep_s, &repeat_s, &repeat_spec_k, &require_s, &resolve_k,
+ &rest_s, &restart_s, &ret_s, &return_from_s, &return_s,
+ &rfilt_k, &sbit_s, &sec_s, &sequence_s, &set_s,
+ &setq_s, &setqf_s, &short_s, &shortest_k, &single_s,
+ &size_k, &size_s, &skip_s, &slot_s, &some_s,
+ &space_k, &special_s, &splice_s, &stat_s, &static_slot_s,
+ &stddebug_s, &stderr_s, &stdin_s, &stdio_stream_s, &stdnull_s,
+ &stdout_s, &str_d_s, &str_s, &stream_s, &string_k,
+ &string_s, &struct_lit_s, &struct_s, &struct_type_s, &switch_s,
+ &sym_s, &symacro_k, &symacrolet_s, &syntax_error_s, &sys_abscond_from_s,
+ &sys_apply_s, &sys_catch_s, &sys_lisp1_value_s, &sys_mark_special_s, &sys_qquote_s,
+ &sys_splice_s, &sys_unquote_s, &system_error_s, &system_package_s, &text_s,
+ &throw_s, &time_local_s, &time_parse_s, &time_s, &time_string_s,
+ &time_utc_s, &timeout_error_s, &times_k, &tlist_k, &tobase64_k,
+ &tofloat_k, &tohtml_k, &tohtml_star_k, &toint_k, &tonumber_k,
+ &topercent_k, &tourl_k, &trailer_s, &tree_bind_s, &tree_case_s,
+ &try_s, &type_error_s, &ubit_s, &uchar_s, &uid_k,
+ &uid_s, &uint16_s, &uint32_s, &uint64_s, &uint8_s,
+ &uint_s, &ulong_s, &unbound_s, &union_s, &unique_s,
+ &unquote_s, &until_s, &until_star_s, &upcase_k, &uref_s,
+ &user_package_s, &userdata_k, &ushort_s, &uw_protect_s, &val_s,
+ &var_k, &var_s, &vars_k, &vec_list_s, &vec_s,
+ &vecref_s, &vector_lit_s, &void_s, &warning_s, &wchar_s,
+ &weak_keys_k, &weak_vals_k, &when_s, &while_s, &while_star_s,
+ &whole_k, &wild_s, &with_dyn_rebinds_s, &word_char_k, &wrap_k,
+ &wstr_d_s, &wstr_s, &year_s, &zap_s, &zarray_s,
+ &zeroplus_s, &zone_s,
#if CONFIG_DEBUG_SUPPORT
&debug_quit_s,
@@ -263,13 +265,13 @@ val *protected_sym[] = {
&dir_s, &gecos_s, &passwd_s, &shell_s,
#endif
#if HAVE_SOCKETS
- &socket_error_s,
-#endif
-#if HAVE_SOCKETS
&addr_s, &addrinfo_s, &canonname_s, &family_s, &flags_s,
&flow_info_s, &port_s, &protocol_s, &scope_id_s, &sockaddr_in6_s,
&sockaddr_in_s, &sockaddr_un_s, &socktype_s,
#endif
+#if HAVE_SOCKETS
+ &socket_error_s,
+#endif
#if HAVE_SYSLOG
&prio_k,
#endif