diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2017-06-07 20:21:08 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2017-06-07 20:21:08 -0700 |
commit | de885069bebb4e674b7579b22dbecab0742ba02b (patch) | |
tree | 8360af0cf5455b6b47d3773756e45c9ce60c8dc3 /protsym.c | |
parent | 032f568f5f0b844db4890a95bd81851a6cb83fd2 (diff) | |
download | txr-de885069bebb4e674b7579b22dbecab0742ba02b.tar.gz txr-de885069bebb4e674b7579b22dbecab0742ba02b.tar.bz2 txr-de885069bebb4e674b7579b22dbecab0742ba02b.zip |
Version 177.txr-177
* 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.c | 116 |
1 files changed, 62 insertions, 54 deletions
@@ -31,51 +31,55 @@ #include "config.h" #include "lib.h" +#if HAVE_SYSLOG +extern val prio_k; +#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_GRGID extern val group_s, mem_s; #endif +#if HAVE_LIBFFI +extern val align_s, array_s, bchar_s, be_double_s, be_float_s; +extern val be_int16_s, be_int32_s, be_int64_s, be_uint16_s, be_uint32_s; +extern val be_uint64_s, bit_s, bstr_d_s, bstr_s, buf_d_s; +extern val carray_s, char_s, closure_s, double_s, downcase_k; +extern val enum_s, ffi_call_desc_s, ffi_closure_s, ffi_type_s, filter_k; +extern val frombase64_k, fromhtml_k, frompercent_k, fromurl_k, hextoint_k; +extern val int16_s, int32_s, int64_s, int8_s, int_s; +extern val le_double_s, le_float_s, le_int16_s, le_int32_s, le_int64_s; +extern val le_uint16_s, le_uint32_s, le_uint64_s, lfilt_k, long_s; +extern val ptr_in_d_s, ptr_in_s, ptr_out_d_s, ptr_out_s, ptr_out_s_s; +extern val ptr_s, rfilt_k, sbit_s, short_s, str_d_s; +extern val struct_s, tobase64_k, tofloat_k, tohtml_k, tohtml_star_k; +extern val toint_k, tonumber_k, topercent_k, tourl_k, ubit_s; +extern val uchar_s, uint16_s, uint32_s, uint64_s, uint8_s; +extern val uint_s, ulong_s, upcase_k, ushort_s, val_s; +extern val void_s, wchar_s, wstr_d_s, wstr_s, zarray_s; +#endif #if HAVE_PWUID extern val dir_s, gecos_s, passwd_s, shell_s; #endif #if HAVE_SOCKETS extern val socket_error_s; #endif -#if HAVE_UNAME -extern val domainname_s, machine_s, nodename_s, release_s, sysname_s; -extern val utsname_s, version_s; +#if HAVE_DLOPEN +extern val dlhandle_s, dlsym_s; #endif #if CONFIG_DEBUG_SUPPORT extern val debug_quit_s; #endif -#if HAVE_LIBFFI -extern val array_s, bchar_s, bstr_d_s, bstr_s, buf_d_s; -extern val carray_s, char_s, closure_s, double_s, downcase_k; -extern val ffi_call_desc_s, ffi_closure_s, ffi_type_s, filter_k, frombase64_k; -extern val fromhtml_k, frompercent_k, fromurl_k, hextoint_k, int16_s; -extern val int32_s, int64_s, int8_s, int_s, lfilt_k; -extern val long_s, ptr_in_d_s, ptr_in_s, ptr_out_d_s, ptr_out_s; -extern val ptr_out_s_s, ptr_s, rfilt_k, short_s, str_d_s; -extern val struct_s, tobase64_k, tofloat_k, tohtml_k, tohtml_star_k; -extern val toint_k, tonumber_k, topercent_k, tourl_k, uchar_s; -extern val uint16_s, uint32_s, uint64_s, uint8_s, uint_s; -extern val ulong_s, upcase_k, ushort_s, void_s, wchar_s; -extern val wstr_d_s, wstr_s, zarray_s; -#endif -#if HAVE_SYSLOG -extern val prio_k; -#endif -#if HAVE_DLOPEN -extern val dlhandle_s, dlsym_s; +#if HAVE_UNAME +extern val domainname_s, machine_s, nodename_s, release_s, sysname_s; +extern val utsname_s, version_s; #endif #if HAVE_TERMIOS extern val cc_s, cflag_s, iflag_s, ispeed_s, lflag_s; extern val oflag_s, ospeed_s, termios_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 extern val accept_s, addr_k, all_s, and_s, ap_s; extern val apf_s, append_each_s, append_each_star_s, append_k, append_s; @@ -156,51 +160,55 @@ extern val zone_s; val *protected_sym[] = { +#if HAVE_SYSLOG + &prio_k, +#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_GRGID &group_s, &mem_s, #endif +#if HAVE_LIBFFI + &align_s, &array_s, &bchar_s, &be_double_s, &be_float_s, + &be_int16_s, &be_int32_s, &be_int64_s, &be_uint16_s, &be_uint32_s, + &be_uint64_s, &bit_s, &bstr_d_s, &bstr_s, &buf_d_s, + &carray_s, &char_s, &closure_s, &double_s, &downcase_k, + &enum_s, &ffi_call_desc_s, &ffi_closure_s, &ffi_type_s, &filter_k, + &frombase64_k, &fromhtml_k, &frompercent_k, &fromurl_k, &hextoint_k, + &int16_s, &int32_s, &int64_s, &int8_s, &int_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, &lfilt_k, &long_s, + &ptr_in_d_s, &ptr_in_s, &ptr_out_d_s, &ptr_out_s, &ptr_out_s_s, + &ptr_s, &rfilt_k, &sbit_s, &short_s, &str_d_s, + &struct_s, &tobase64_k, &tofloat_k, &tohtml_k, &tohtml_star_k, + &toint_k, &tonumber_k, &topercent_k, &tourl_k, &ubit_s, + &uchar_s, &uint16_s, &uint32_s, &uint64_s, &uint8_s, + &uint_s, &ulong_s, &upcase_k, &ushort_s, &val_s, + &void_s, &wchar_s, &wstr_d_s, &wstr_s, &zarray_s, +#endif #if HAVE_PWUID &dir_s, &gecos_s, &passwd_s, &shell_s, #endif #if HAVE_SOCKETS &socket_error_s, #endif -#if HAVE_UNAME - &domainname_s, &machine_s, &nodename_s, &release_s, &sysname_s, - &utsname_s, &version_s, +#if HAVE_DLOPEN + &dlhandle_s, &dlsym_s, #endif #if CONFIG_DEBUG_SUPPORT &debug_quit_s, #endif -#if HAVE_LIBFFI - &array_s, &bchar_s, &bstr_d_s, &bstr_s, &buf_d_s, - &carray_s, &char_s, &closure_s, &double_s, &downcase_k, - &ffi_call_desc_s, &ffi_closure_s, &ffi_type_s, &filter_k, &frombase64_k, - &fromhtml_k, &frompercent_k, &fromurl_k, &hextoint_k, &int16_s, - &int32_s, &int64_s, &int8_s, &int_s, &lfilt_k, - &long_s, &ptr_in_d_s, &ptr_in_s, &ptr_out_d_s, &ptr_out_s, - &ptr_out_s_s, &ptr_s, &rfilt_k, &short_s, &str_d_s, - &struct_s, &tobase64_k, &tofloat_k, &tohtml_k, &tohtml_star_k, - &toint_k, &tonumber_k, &topercent_k, &tourl_k, &uchar_s, - &uint16_s, &uint32_s, &uint64_s, &uint8_s, &uint_s, - &ulong_s, &upcase_k, &ushort_s, &void_s, &wchar_s, - &wstr_d_s, &wstr_s, &zarray_s, -#endif -#if HAVE_SYSLOG - &prio_k, -#endif -#if HAVE_DLOPEN - &dlhandle_s, &dlsym_s, +#if HAVE_UNAME + &domainname_s, &machine_s, &nodename_s, &release_s, &sysname_s, + &utsname_s, &version_s, #endif #if HAVE_TERMIOS &cc_s, &cflag_s, &iflag_s, &ispeed_s, &lflag_s, &oflag_s, &ospeed_s, &termios_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 &accept_s, &addr_k, &all_s, &and_s, &ap_s, &apf_s, &append_each_s, &append_each_star_s, &append_k, &append_s, |