summaryrefslogtreecommitdiffstats
path: root/protsym.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-06-07 20:21:08 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-06-07 20:21:08 -0700
commitde885069bebb4e674b7579b22dbecab0742ba02b (patch)
tree8360af0cf5455b6b47d3773756e45c9ce60c8dc3 /protsym.c
parent032f568f5f0b844db4890a95bd81851a6cb83fd2 (diff)
downloadtxr-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.c116
1 files changed, 62 insertions, 54 deletions
diff --git a/protsym.c b/protsym.c
index 67321db6..9c9d11f8 100644
--- a/protsym.c
+++ b/protsym.c
@@ -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,