summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--RELNOTES72
-rwxr-xr-xconfigure2
-rw-r--r--protsym.c140
-rw-r--r--share/txr/stdlib/ver.tl2
-rw-r--r--tl.vim907
-rw-r--r--txr.16
-rw-r--r--txr.vim907
-rw-r--r--y.tab.c.shipped575
8 files changed, 1349 insertions, 1262 deletions
diff --git a/RELNOTES b/RELNOTES
index 7c24af6a..c468d1ec 100644
--- a/RELNOTES
+++ b/RELNOTES
@@ -1,3 +1,75 @@
+ TXR 262
+ 2021-06-11
+
+
+ Feature
+
+ - structural pattern matching:
+ - new feature: quasiquote matching.
+ - JSON:
+ - improved escaping of JSON output for safe embedding in <script> tags.
+ - new JSON pattern matching.
+ - text processing:
+ - new pic macro for formatting using pattern similar to perl's
+ format or PRINT USING in BASIC languages: ####.# <<<<<<.
+ - works by compiling to fmt calls.
+ - FFI:
+ - bad FFI call diagnostics now have function name.
+ - failures in dlsym function converted to better diagnosis.
+ - carray objects can be passed to cptr argument now.
+ - new deffi-struct and deffi-union macros for less verbose
+ definitions without a typedef.
+ - lib:
+ - new fill-vec function for efficiently filling an area of a vector
+ with repetitions of a value.
+ - reduce-left rewritten with generic sequence iteration, for
+ better efficiency (e.g. not consing memory over vectors).
+ - sum and prod functions likewise.
+ - expander:
+ - fixed issue in defun expansion interfering with defining a macro
+ and then a function of the same name which calls the macro.
+ - parser:
+ - new *read-unknown-structs* Boolean variable
+ - if set, the reader can read #S syntax which names undefined
+ structure types, without blowing up.
+ - used in tags.tl, which can therefore handle source code
+ that contains struct literals.
+ - compile/eval:
+ - improvement coordination between error exceptions,
+ compiler error messages sent to the error stream, and
+ deferred warnings.
+
+ Bugs
+
+ - listener:
+ - doc function not working in Cygwin/Cygnal port.
+ - macro and oeprator completion after ' (quote) character;
+ so that (doc 'wh[Tab] will complete on a macro name like while.
+ - system interface:
+ - mkstemp build problem problem affecting Solaris and other platforms.
+ - printer:
+ - added mising handing for for printing (sys:struct-lit ...)
+ syntax as #S syntax.
+ - parser
+ - bug with #; commenting syntax not playing nicely with #S literals.
+ - JSON:
+ - test cases on Cygwin work.
+ - JSON print-read consistency problem addressed..
+ - FFI:
+ - memory leaks in FFI type system when struct type is redefined.
+ - bug in deffi causing the libffi ffi_prep_cif_var function to
+ always be used, even for non-variadic functions.
+ - FFI now properly calculates the structure member descriptor arrays
+ for libffi, and fakes them out for arrays and unions also.
+ This should address problems with passing small structures by value.
+ - The material is calculated lazily: not done for types that are
+ never used as by-value parameters or return values.
+ - format:
+ - fix bugs in leading zero in precision field of format specifier.
+
+
+
+
TXR 261
2021-06-01
diff --git a/configure b/configure
index 3e97ed13..048407d3 100755
--- a/configure
+++ b/configure
@@ -571,7 +571,7 @@ chmod a+x reconfigure
#
-txr_ver=261
+txr_ver=262
#
# The all important banner.
diff --git a/protsym.c b/protsym.c
index 3630d1ab..ace1bc6b 100644
--- a/protsym.c
+++ b/protsym.c
@@ -115,41 +115,41 @@ extern val quasilist_s, query_error_s, quote_s, r_atan2_s, r_ceil_s;
extern val r_expt_s, r_floor_s, r_lognot_s, r_logtrunc_s, r_mod_s;
extern val r_round_s, r_trunc_s, random_state_s, random_state_var_s, random_warmup_s;
extern val range_error_s, range_s, rcons_s, rdev_k, rdev_s;
-extern val real_time_k, rebind_s, rec_source_loc_s, recip_s, reflect_k;
-extern val regex_s, rep_s, repeat_s, repeat_spec_k, require_s;
-extern val resolve_k, rest_s, restart_s, return_from_s, return_s;
-extern val rfilt_k, round1_s, round_s, rplaca_s, rplacd_s;
-extern val sbit_s, sec_s, seek_s, seq_iter_s, sequence_s;
-extern val set_prop_s, set_s, setq_s, setqf_s, short_s;
-extern val shortest_k, sign_extend_s, signum_s, sin_s, single_s;
-extern val sinh_s, size_k, size_s, skip_s, slot_s;
-extern val some_s, space_k, special_s, splice_s, sqrt_s;
-extern val square_s, stat_s, stddebug_s, stderr_s, stdin_s;
-extern val stdio_stream_s, stdnull_s, stdout_s, str_d_s, str_s;
-extern val stream_s, string_k, string_s, struct_lit_s, struct_s;
-extern val struct_type_s, switch_s, sym_s, symacro_k, symacrolet_s;
-extern val syntax_error_s, sys_abscond_from_s, sys_apply_s, sys_blk_s, sys_catch_s;
-extern val sys_l1_setq_s, sys_l1_val_s, sys_lisp1_setq_s, sys_lisp1_value_s, sys_mark_special_s;
-extern val sys_qquote_s, sys_splice_s, sys_unquote_s, system_error_s, system_package_s;
-extern val tan_s, tanh_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, tnode_s, tobase64_k, tobase64url_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 tree_construct_s, tree_fun_whitelist_s, tree_iter_s, tree_lit_s, tree_s;
-extern val trunc1_s, trunc_s, truncate_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, unget_byte_s, unget_char_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, usr_var_s, uw_protect_s;
-extern val val_s, var_k, var_s, vars_k, vec_list_s;
-extern val vec_s, vecref_s, vector_lit_s, vm_closure_s, vm_desc_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, width_s;
-extern val wild_s, word_char_k, wrap_k, wstr_d_s, wstr_s;
-extern val year_s, zap_s, zarray_s, zchar_s, zerop_s;
-extern val zeroplus_s, zone_s;
+extern val read_unknown_structs_s, real_time_k, rebind_s, rec_source_loc_s, recip_s;
+extern val reflect_k, regex_s, rep_s, repeat_s, repeat_spec_k;
+extern val require_s, resolve_k, rest_s, restart_s, return_from_s;
+extern val return_s, rfilt_k, round1_s, round_s, rplaca_s;
+extern val rplacd_s, sbit_s, sec_s, seek_s, seq_iter_s;
+extern val sequence_s, set_prop_s, set_s, setq_s, setqf_s;
+extern val short_s, shortest_k, sign_extend_s, signum_s, sin_s;
+extern val single_s, sinh_s, size_k, size_s, skip_s;
+extern val slot_s, some_s, space_k, special_s, splice_s;
+extern val sqrt_s, square_s, stat_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_blk_s;
+extern val sys_catch_s, sys_l1_setq_s, sys_l1_val_s, sys_lisp1_setq_s, sys_lisp1_value_s;
+extern val sys_mark_special_s, sys_qquote_s, sys_splice_s, sys_unquote_s, system_error_s;
+extern val system_package_s, tan_s, tanh_s, text_s, throw_s;
+extern val time_local_s, time_parse_s, time_s, time_string_s, time_utc_s;
+extern val timeout_error_s, times_k, tlist_k, tnode_s, tobase64_k;
+extern val tobase64url_k, tofloat_k, tohtml_k, tohtml_star_k, toint_k;
+extern val tonumber_k, topercent_k, tourl_k, trailer_s, tree_bind_s;
+extern val tree_case_s, tree_construct_s, tree_fun_whitelist_s, tree_iter_s, tree_lit_s;
+extern val tree_s, trunc1_s, trunc_s, truncate_s, try_s;
+extern val type_error_s, ubit_s, uchar_s, uid_k, uid_s;
+extern val uint16_s, uint32_s, uint64_s, uint8_s, uint_s;
+extern val ulong_s, unbound_s, unget_byte_s, unget_char_s, union_s;
+extern val unique_s, unquote_s, until_s, until_star_s, upcase_k;
+extern val uref_s, user_package_s, userdata_k, ushort_s, usr_var_s;
+extern val uw_protect_s, val_s, var_k, var_s, vars_k;
+extern val vec_list_s, vec_s, vecref_s, vector_lit_s, vm_closure_s;
+extern val vm_desc_s, void_s, warning_s, wchar_s, weak_keys_k;
+extern val weak_vals_k, when_s, while_s, while_star_s, whole_k;
+extern val width_s, wild_s, word_char_k, wrap_k, wstr_d_s;
+extern val wstr_s, year_s, zap_s, zarray_s, zchar_s;
+extern val zerop_s, zeroplus_s, zone_s;
#if HAVE_DLOPEN
extern val dlhandle_s, dlsym_s;
@@ -266,41 +266,41 @@ val *protected_sym[] = {
&r_expt_s, &r_floor_s, &r_lognot_s, &r_logtrunc_s, &r_mod_s,
&r_round_s, &r_trunc_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, &rec_source_loc_s, &recip_s, &reflect_k,
- &regex_s, &rep_s, &repeat_s, &repeat_spec_k, &require_s,
- &resolve_k, &rest_s, &restart_s, &return_from_s, &return_s,
- &rfilt_k, &round1_s, &round_s, &rplaca_s, &rplacd_s,
- &sbit_s, &sec_s, &seek_s, &seq_iter_s, &sequence_s,
- &set_prop_s, &set_s, &setq_s, &setqf_s, &short_s,
- &shortest_k, &sign_extend_s, &signum_s, &sin_s, &single_s,
- &sinh_s, &size_k, &size_s, &skip_s, &slot_s,
- &some_s, &space_k, &special_s, &splice_s, &sqrt_s,
- &square_s, &stat_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_blk_s, &sys_catch_s,
- &sys_l1_setq_s, &sys_l1_val_s, &sys_lisp1_setq_s, &sys_lisp1_value_s, &sys_mark_special_s,
- &sys_qquote_s, &sys_splice_s, &sys_unquote_s, &system_error_s, &system_package_s,
- &tan_s, &tanh_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, &tnode_s, &tobase64_k, &tobase64url_k,
- &tofloat_k, &tohtml_k, &tohtml_star_k, &toint_k, &tonumber_k,
- &topercent_k, &tourl_k, &trailer_s, &tree_bind_s, &tree_case_s,
- &tree_construct_s, &tree_fun_whitelist_s, &tree_iter_s, &tree_lit_s, &tree_s,
- &trunc1_s, &trunc_s, &truncate_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, &unget_byte_s, &unget_char_s, &union_s, &unique_s,
- &unquote_s, &until_s, &until_star_s, &upcase_k, &uref_s,
- &user_package_s, &userdata_k, &ushort_s, &usr_var_s, &uw_protect_s,
- &val_s, &var_k, &var_s, &vars_k, &vec_list_s,
- &vec_s, &vecref_s, &vector_lit_s, &vm_closure_s, &vm_desc_s,
- &void_s, &warning_s, &wchar_s, &weak_keys_k, &weak_vals_k,
- &when_s, &while_s, &while_star_s, &whole_k, &width_s,
- &wild_s, &word_char_k, &wrap_k, &wstr_d_s, &wstr_s,
- &year_s, &zap_s, &zarray_s, &zchar_s, &zerop_s,
- &zeroplus_s, &zone_s,
+ &read_unknown_structs_s, &real_time_k, &rebind_s, &rec_source_loc_s, &recip_s,
+ &reflect_k, &regex_s, &rep_s, &repeat_s, &repeat_spec_k,
+ &require_s, &resolve_k, &rest_s, &restart_s, &return_from_s,
+ &return_s, &rfilt_k, &round1_s, &round_s, &rplaca_s,
+ &rplacd_s, &sbit_s, &sec_s, &seek_s, &seq_iter_s,
+ &sequence_s, &set_prop_s, &set_s, &setq_s, &setqf_s,
+ &short_s, &shortest_k, &sign_extend_s, &signum_s, &sin_s,
+ &single_s, &sinh_s, &size_k, &size_s, &skip_s,
+ &slot_s, &some_s, &space_k, &special_s, &splice_s,
+ &sqrt_s, &square_s, &stat_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_blk_s,
+ &sys_catch_s, &sys_l1_setq_s, &sys_l1_val_s, &sys_lisp1_setq_s, &sys_lisp1_value_s,
+ &sys_mark_special_s, &sys_qquote_s, &sys_splice_s, &sys_unquote_s, &system_error_s,
+ &system_package_s, &tan_s, &tanh_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, &tnode_s, &tobase64_k,
+ &tobase64url_k, &tofloat_k, &tohtml_k, &tohtml_star_k, &toint_k,
+ &tonumber_k, &topercent_k, &tourl_k, &trailer_s, &tree_bind_s,
+ &tree_case_s, &tree_construct_s, &tree_fun_whitelist_s, &tree_iter_s, &tree_lit_s,
+ &tree_s, &trunc1_s, &trunc_s, &truncate_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, &unget_byte_s, &unget_char_s, &union_s,
+ &unique_s, &unquote_s, &until_s, &until_star_s, &upcase_k,
+ &uref_s, &user_package_s, &userdata_k, &ushort_s, &usr_var_s,
+ &uw_protect_s, &val_s, &var_k, &var_s, &vars_k,
+ &vec_list_s, &vec_s, &vecref_s, &vector_lit_s, &vm_closure_s,
+ &vm_desc_s, &void_s, &warning_s, &wchar_s, &weak_keys_k,
+ &weak_vals_k, &when_s, &while_s, &while_star_s, &whole_k,
+ &width_s, &wild_s, &word_char_k, &wrap_k, &wstr_d_s,
+ &wstr_s, &year_s, &zap_s, &zarray_s, &zchar_s,
+ &zerop_s, &zeroplus_s, &zone_s,
#if HAVE_DLOPEN
&dlhandle_s, &dlsym_s,
diff --git a/share/txr/stdlib/ver.tl b/share/txr/stdlib/ver.tl
index 88806986..2cb98ced 100644
--- a/share/txr/stdlib/ver.tl
+++ b/share/txr/stdlib/ver.tl
@@ -1,2 +1,2 @@
-(defvarl lib-version 261)
+(defvarl lib-version 262)
(defvarl *lib-version* lib-version)
diff --git a/tl.vim b/tl.vim
index 511e7fe2..d87b27d2 100644
--- a/tl.vim
+++ b/tl.vim
@@ -28,218 +28,219 @@ syn keyword tl_keyword contained *listener-sel-inclusive-p* *load-path* *match-m
syn keyword tl_keyword contained *package* *package-alist* *param-macro* *place-clobber-expander*
syn keyword tl_keyword contained *place-delete-expander* *place-macro* *place-update-expander* *pprint-flo-format*
syn keyword tl_keyword contained *print-base* *print-circle* *print-flo-digits* *print-flo-format*
-syn keyword tl_keyword contained *print-flo-precision* *random-state* *random-warmup* *rec-source-loc*
-syn keyword tl_keyword contained *stddebug* *stderr* *stdin* *stdlog*
-syn keyword tl_keyword contained *stdnull* *stdout* *trace-output* *tree-fun-whitelist*
-syn keyword tl_keyword contained *txr-version* *unhandled-hook* + -
-syn keyword tl_keyword contained / /= : :abandoned
-syn keyword tl_keyword contained :addr :all :android :apf
-syn keyword tl_keyword contained :append :args :atime :auto
-syn keyword tl_keyword contained :awk-again :awk-file :awk-rec :begin
-syn keyword tl_keyword contained :begin-file :blksize :blocks :bool
-syn keyword tl_keyword contained :byte-oriented :cdigit :chars :cint
-syn keyword tl_keyword contained :close :continue :counter :cspace
-syn keyword tl_keyword contained :ctime :cword-char :cygnal :cygwin
-syn keyword tl_keyword contained :dec :decline :dev :digit
-syn keyword tl_keyword contained :downcase :end :end-file :env
-syn keyword tl_keyword contained :eq-based :eql-based :equal-based :explicit-no
-syn keyword tl_keyword contained :fallback :fd :fence :filter
-syn keyword tl_keyword contained :fini :finish :float :form
-syn keyword tl_keyword contained :from-current :from-end :from-start :from_html
-syn keyword tl_keyword contained :frombase64 :frombase64url :fromhtml :frompercent
-syn keyword tl_keyword contained :fromurl :fun :function :gap
-syn keyword tl_keyword contained :gid :greedy :hex :hextoint
-syn keyword tl_keyword contained :inf :init :ino :inp
-syn keyword tl_keyword contained :inputs :instance :into :key
-syn keyword tl_keyword contained :let :lfilt :lines :linux
-syn keyword tl_keyword contained :list :lists :local :longest
-syn keyword tl_keyword contained :macos :mandatory :match :maxgap
-syn keyword tl_keyword contained :maxtimes :method :mid :mingap
-syn keyword tl_keyword contained :mintimes :mode :mtime :name
-syn keyword tl_keyword contained :named :next-spec :nlink :nothrow
-syn keyword tl_keyword contained :oct :outf :outp :output
-syn keyword tl_keyword contained :owner :perms :postinit :prio
-syn keyword tl_keyword contained :rdev :real-time :reflect :repeat-spec
-syn keyword tl_keyword contained :resolve :rfilt :set :set-file
-syn keyword tl_keyword contained :shortest :size :solaris :solaris10
-syn keyword tl_keyword contained :space :static :str :string
-syn keyword tl_keyword contained :symacro :symlinks :text :times
-syn keyword tl_keyword contained :tlist :to_html :tobase64 :tobase64url
-syn keyword tl_keyword contained :tofloat :tohtml :tohtml* :toint
-syn keyword tl_keyword contained :tonumber :topercent :tourl :uid
-syn keyword tl_keyword contained :unknown :upcase :use :use-from
-syn keyword tl_keyword contained :use-syms :userdata :var :vars
-syn keyword tl_keyword contained :weak-keys :weak-vals :whole :word-char
-syn keyword tl_keyword contained :wrap < <= =
-syn keyword tl_keyword contained > >= abort abs
-syn keyword tl_keyword contained abs-path-p acons acons-new aconsql-new
-syn keyword tl_keyword contained acos acosh ado af-inet
-syn keyword tl_keyword contained af-inet6 af-unix af-unspec ai-addrconfig
-syn keyword tl_keyword contained ai-all ai-canonname ai-numerichost ai-numericserv
-syn keyword tl_keyword contained ai-passive ai-v4mapped alet align
-syn keyword tl_keyword contained alignof alist-nremove alist-remove all
-syn keyword tl_keyword contained allocate-struct and andf ap
-syn keyword tl_keyword contained apf append append* append-each
-syn keyword tl_keyword contained append-each* append-each-prod append-each-prod* append-match-products
-syn keyword tl_keyword contained append-matches apply aret array
-syn keyword tl_keyword contained arraysize ash asin asinh
-syn keyword tl_keyword contained assert assoc assq assql
-syn keyword tl_keyword contained at-exit-call at-exit-do-not-call atan atan2
-syn keyword tl_keyword contained atanh atom awk base-name
-syn keyword tl_keyword contained base64-decode base64-decode-buf base64-encode base64-stream-dec
-syn keyword tl_keyword contained base64-stream-enc base64url-decode base64url-decode-buf base64url-encode
-syn keyword tl_keyword contained base64url-stream-dec base64url-stream-enc bchar be-double
-syn keyword tl_keyword contained be-float be-int16 be-int32 be-int64
-syn keyword tl_keyword contained be-uint16 be-uint32 be-uint64 bignum-len
-syn keyword tl_keyword contained bignump bindable bit bitset
-syn keyword tl_keyword contained blkcnt-t blksize-t block block*
-syn keyword tl_keyword contained bool boundp bracket break-str
-syn keyword tl_keyword contained brkint bs0 bs1 bsdly
-syn keyword tl_keyword contained bstr bstr-d buf buf-alloc-size
-syn keyword tl_keyword contained buf-carray buf-d buf-get-char buf-get-cptr
-syn keyword tl_keyword contained buf-get-double buf-get-float buf-get-i16 buf-get-i32
-syn keyword tl_keyword contained buf-get-i64 buf-get-i8 buf-get-int buf-get-long
-syn keyword tl_keyword contained buf-get-short buf-get-u16 buf-get-u32 buf-get-u64
-syn keyword tl_keyword contained buf-get-u8 buf-get-uchar buf-get-uint buf-get-ulong
-syn keyword tl_keyword contained buf-get-ushort buf-int buf-list buf-put-buf
-syn keyword tl_keyword contained buf-put-char buf-put-cptr buf-put-double buf-put-float
-syn keyword tl_keyword contained buf-put-i16 buf-put-i32 buf-put-i64 buf-put-i8
-syn keyword tl_keyword contained buf-put-int buf-put-long buf-put-short buf-put-u16
-syn keyword tl_keyword contained buf-put-u32 buf-put-u64 buf-put-u8 buf-put-uchar
-syn keyword tl_keyword contained buf-put-uint buf-put-ulong buf-put-ushort buf-set-length
-syn keyword tl_keyword contained buf-str buf-trim buf-uint bufp
-syn keyword tl_keyword contained build build-list buildn butlast
-syn keyword tl_keyword contained butlastn caaaaar caaaadr caaaar
-syn keyword tl_keyword contained caaadar caaaddr caaadr caaar
-syn keyword tl_keyword contained caadaar caadadr caadar caaddar
-syn keyword tl_keyword contained caadddr caaddr caadr caar
-syn keyword tl_keyword contained cadaaar cadaadr cadaar cadadar
-syn keyword tl_keyword contained cadaddr cadadr cadar caddaar
-syn keyword tl_keyword contained caddadr caddar cadddar caddddr
-syn keyword tl_keyword contained cadddr caddr cadr call
-syn keyword tl_keyword contained call-clobber-expander call-delete-expander call-finalizers call-super-fun
-syn keyword tl_keyword contained call-super-method call-update-expander callf car
-syn keyword tl_keyword contained carray carray-blank carray-buf carray-buf-sync
-syn keyword tl_keyword contained carray-cptr carray-dup carray-free carray-get
-syn keyword tl_keyword contained carray-getz carray-int carray-list carray-own
-syn keyword tl_keyword contained carray-pun carray-put carray-putz carray-ref
-syn keyword tl_keyword contained carray-refset carray-replace carray-set-length carray-sub
-syn keyword tl_keyword contained carray-type carray-uint carray-vec carrayp
-syn keyword tl_keyword contained caseq caseq* caseql caseql*
-syn keyword tl_keyword contained casequal casequal* cat-str cat-streams
-syn keyword tl_keyword contained cat-vec catch catch* catch**
-syn keyword tl_keyword contained catenated-stream-p catenated-stream-push cbaud cbaudex
-syn keyword tl_keyword contained cdaaaar cdaaadr cdaaar cdaadar
-syn keyword tl_keyword contained cdaaddr cdaadr cdaar cdadaar
-syn keyword tl_keyword contained cdadadr cdadar cdaddar cdadddr
-syn keyword tl_keyword contained cdaddr cdadr cdar cddaaar
-syn keyword tl_keyword contained cddaadr cddaar cddadar cddaddr
-syn keyword tl_keyword contained cddadr cddar cdddaar cdddadr
-syn keyword tl_keyword contained cdddar cddddar cdddddr cddddr
-syn keyword tl_keyword contained cdddr cddr cdr ceil
-syn keyword tl_keyword contained ceil-rem chain chand char
-syn keyword tl_keyword contained chdir chmod chmod-rec chown
-syn keyword tl_keyword contained chown-rec chr-digit chr-int chr-isalnum
-syn keyword tl_keyword contained chr-isalpha chr-isascii chr-isblank chr-iscntrl
-syn keyword tl_keyword contained chr-isdigit chr-isgraph chr-islower chr-isprint
-syn keyword tl_keyword contained chr-ispunct chr-isspace chr-isunisp chr-isupper
-syn keyword tl_keyword contained chr-isxdigit chr-num chr-str chr-str-set
-syn keyword tl_keyword contained chr-tolower chr-toupper chr-xdigit chrp
-syn keyword tl_keyword contained clamp clear-dirty clear-error clear-struct
-syn keyword tl_keyword contained clearhash clocal clock-t clockid-t
-syn keyword tl_keyword contained close close-stream closedir closelog
-syn keyword tl_keyword contained closure cmp-str cmspar coded-length
-syn keyword tl_keyword contained collect-each collect-each* collect-each-prod collect-each-prod*
-syn keyword tl_keyword contained comb command-get command-get-buf command-get-json
-syn keyword tl_keyword contained command-get-jsons command-get-lines command-get-string command-put
-syn keyword tl_keyword contained command-put-buf command-put-json command-put-jsons command-put-lines
-syn keyword tl_keyword contained command-put-string compare-swap compile compile-defr-warning
-syn keyword tl_keyword contained compile-error compile-file compile-only compile-toplevel
-syn keyword tl_keyword contained compile-update-file compile-warning compl-span-str cond
-syn keyword tl_keyword contained conda condlet cons conses
-syn keyword tl_keyword contained conses* consp constantp contain[s]
-syn keyword tl_keyword contained copy copy-alist copy-buf copy-carray
-syn keyword tl_keyword contained copy-cons copy-file copy-files copy-fun
-syn keyword tl_keyword contained copy-hash copy-list copy-path-rec copy-search-tree
-syn keyword tl_keyword contained copy-str copy-struct copy-tnode copy-tree
-syn keyword tl_keyword contained copy-tree-iter copy-vec cos cosh
-syn keyword tl_keyword contained count-if count-until-match countq countql
-syn keyword tl_keyword contained countqual cptr cptr-buf cptr-cast
-syn keyword tl_keyword contained cptr-free cptr-get cptr-int cptr-null
-syn keyword tl_keyword contained cptr-obj cptr-out cptr-size-hint cptr-type
-syn keyword tl_keyword contained cptr-zap cptrp cr0 cr1
-syn keyword tl_keyword contained cr2 cr3 crc32 crc32-stream
-syn keyword tl_keyword contained crdly cread crtscts crypt
-syn keyword tl_keyword contained cs5 cs6 cs7 cs8
-syn keyword tl_keyword contained csize cstopb cum-norm-dist daemon
-syn keyword tl_keyword contained dec defer-warning defex deffi
-syn keyword tl_keyword contained deffi-cb deffi-cb-unsafe deffi-sym deffi-type
-syn keyword tl_keyword contained deffi-var define-accessor define-modify-macro define-option-struct
-syn keyword tl_keyword contained define-param-expander define-place-macro defmacro defmatch
-syn keyword tl_keyword contained defmeth defpackage defparm defparml
-syn keyword tl_keyword contained defplace defset defstruct defsymacro
-syn keyword tl_keyword contained defun defun-match defvar defvarl
-syn keyword tl_keyword contained del delay delete-package dev-t
-syn keyword tl_keyword contained diff digits digpow dir-name
-syn keyword tl_keyword contained dirstat disassemble display-width divides
-syn keyword tl_keyword contained dlclose dlopen dlsym dlsym-checked
-syn keyword tl_keyword contained dlvsym dlvsym-checked do doc
-syn keyword tl_keyword contained dohash doloop doloop* dotimes
-syn keyword tl_keyword contained double downcase-str drop drop-until
-syn keyword tl_keyword contained drop-while dt-blk dt-chr dt-dir
-syn keyword tl_keyword contained dt-fifo dt-lnk dt-reg dt-sock
-syn keyword tl_keyword contained dt-unknown dump-compiled-objects dump-deferred-warnings dup
-syn keyword tl_keyword contained dupfd dwim e2big eacces
-syn keyword tl_keyword contained each each* each-match each-match-product
-syn keyword tl_keyword contained each-prod each-prod* eaddrinuse eaddrnotavail
-syn keyword tl_keyword contained eafnosupport eagain ealready ebadf
-syn keyword tl_keyword contained ebadmsg ebusy ecanceled echild
-syn keyword tl_keyword contained echo echoctl echoe echok
-syn keyword tl_keyword contained echoke echonl echoprt econnaborted
-syn keyword tl_keyword contained econnrefused econnreset edeadlk edestaddrreq
-syn keyword tl_keyword contained edom edquot eexist efault
-syn keyword tl_keyword contained efbig ehostunreach eidrm eighth
-syn keyword tl_keyword contained eilseq einprogress eintr einval
-syn keyword tl_keyword contained eio eisconn eisdir elemsize
-syn keyword tl_keyword contained elemtype eloop emfile emlink
-syn keyword tl_keyword contained empty emsgsize emultihop enametoolong
-syn keyword tl_keyword contained endgrent endp endpwent ends-with
-syn keyword tl_keyword contained enetdown enetreset enetunreach enfile
-syn keyword tl_keyword contained enobufs enodata enodev enoent
-syn keyword tl_keyword contained enoexec enolck enolink enomem
-syn keyword tl_keyword contained enomsg enoprotoopt enospc enosr
-syn keyword tl_keyword contained enostr enosys enotconn enotdir
-syn keyword tl_keyword contained enotempty enotrecoverable enotsock enotsup
-syn keyword tl_keyword contained enotty ensure-dir enum enumed
-syn keyword tl_keyword contained env env-fbind env-fbindings env-hash
-syn keyword tl_keyword contained env-next env-vbind env-vbindings enxio
-syn keyword tl_keyword contained eopnotsupp eoverflow eownerdead eperm
-syn keyword tl_keyword contained epipe eproto eprotonosupport eprototype
-syn keyword tl_keyword contained eq eql equal equot
-syn keyword tl_keyword contained erange erofs errno error
-syn keyword tl_keyword contained espipe esrch estale etime
-syn keyword tl_keyword contained etimedout etxtbsy eval eval-only
-syn keyword tl_keyword contained evenp ewouldblock exception-subtype-map exception-subtype-p
-syn keyword tl_keyword contained exdev exec exit exit*
-syn keyword tl_keyword contained exp expand expand* expand-left
-syn keyword tl_keyword contained expand-right expand-with-free-refs expt exptmod
-syn keyword tl_keyword contained extproc f$ f-dupfd f-dupfd-cloexec
-syn keyword tl_keyword contained f-getfd f-getfl f-getlk f-rdlck
-syn keyword tl_keyword contained f-setfd f-setfl f-setlk f-setlkw
-syn keyword tl_keyword contained f-unlck f-wrlck f^ f^$
-syn keyword tl_keyword contained false fboundp fcntl fd-cloexec
-syn keyword tl_keyword contained ff0 ff1 ffdly ffi
-syn keyword tl_keyword contained ffi-alignof ffi-arraysize ffi-call ffi-elemsize
-syn keyword tl_keyword contained ffi-elemtype ffi-get ffi-in ffi-make-call-desc
-syn keyword tl_keyword contained ffi-make-closure ffi-offsetof ffi-out ffi-put
-syn keyword tl_keyword contained ffi-put-into ffi-size ffi-type-compile ffi-type-operator-p
-syn keyword tl_keyword contained ffi-type-p ffi-typedef fifth file-append
-syn keyword tl_keyword contained file-append-buf file-append-json file-append-jsons file-append-lines
-syn keyword tl_keyword contained file-append-string file-get file-get-buf file-get-json
-syn keyword tl_keyword contained file-get-jsons file-get-lines file-get-string file-place-buf
-syn keyword tl_keyword contained file-put file-put-buf file-put-json file-put-jsons
-syn keyword tl_keyword contained file-put-lines file-put-string fileno fill-buf
-syn keyword tl_keyword contained fill-buf-adjust fill-carray fill-obj filter-equal
+syn keyword tl_keyword contained *print-flo-precision* *random-state* *random-warmup* *read-unknown-structs*
+syn keyword tl_keyword contained *rec-source-loc* *stddebug* *stderr* *stdin*
+syn keyword tl_keyword contained *stdlog* *stdnull* *stdout* *trace-output*
+syn keyword tl_keyword contained *tree-fun-whitelist* *txr-version* *unhandled-hook* +
+syn keyword tl_keyword contained - / /= :
+syn keyword tl_keyword contained :abandoned :addr :all :android
+syn keyword tl_keyword contained :apf :append :args :atime
+syn keyword tl_keyword contained :auto :awk-again :awk-file :awk-rec
+syn keyword tl_keyword contained :begin :begin-file :blksize :blocks
+syn keyword tl_keyword contained :bool :byte-oriented :cdigit :chars
+syn keyword tl_keyword contained :cint :close :continue :counter
+syn keyword tl_keyword contained :cspace :ctime :cword-char :cygnal
+syn keyword tl_keyword contained :cygwin :dec :decline :dev
+syn keyword tl_keyword contained :digit :downcase :end :end-file
+syn keyword tl_keyword contained :env :eq-based :eql-based :equal-based
+syn keyword tl_keyword contained :explicit-no :fallback :fd :fence
+syn keyword tl_keyword contained :filter :fini :finish :float
+syn keyword tl_keyword contained :form :from-current :from-end :from-start
+syn keyword tl_keyword contained :from_html :frombase64 :frombase64url :fromhtml
+syn keyword tl_keyword contained :frompercent :fromurl :fun :function
+syn keyword tl_keyword contained :gap :gid :greedy :hex
+syn keyword tl_keyword contained :hextoint :inf :init :ino
+syn keyword tl_keyword contained :inp :inputs :instance :into
+syn keyword tl_keyword contained :key :let :lfilt :lines
+syn keyword tl_keyword contained :linux :list :lists :local
+syn keyword tl_keyword contained :longest :macos :mandatory :match
+syn keyword tl_keyword contained :maxgap :maxtimes :method :mid
+syn keyword tl_keyword contained :mingap :mintimes :mode :mtime
+syn keyword tl_keyword contained :name :named :next-spec :nlink
+syn keyword tl_keyword contained :nothrow :oct :outf :outp
+syn keyword tl_keyword contained :output :owner :perms :postinit
+syn keyword tl_keyword contained :prio :rdev :real-time :reflect
+syn keyword tl_keyword contained :repeat-spec :resolve :rfilt :set
+syn keyword tl_keyword contained :set-file :shortest :size :solaris
+syn keyword tl_keyword contained :solaris10 :space :static :str
+syn keyword tl_keyword contained :string :symacro :symlinks :text
+syn keyword tl_keyword contained :times :tlist :to_html :tobase64
+syn keyword tl_keyword contained :tobase64url :tofloat :tohtml :tohtml*
+syn keyword tl_keyword contained :toint :tonumber :topercent :tourl
+syn keyword tl_keyword contained :uid :unknown :upcase :use
+syn keyword tl_keyword contained :use-from :use-syms :userdata :var
+syn keyword tl_keyword contained :vars :weak-keys :weak-vals :whole
+syn keyword tl_keyword contained :word-char :wrap < <=
+syn keyword tl_keyword contained = > >= abort
+syn keyword tl_keyword contained abs abs-path-p acons acons-new
+syn keyword tl_keyword contained aconsql-new acos acosh ado
+syn keyword tl_keyword contained af-inet af-inet6 af-unix af-unspec
+syn keyword tl_keyword contained ai-addrconfig ai-all ai-canonname ai-numerichost
+syn keyword tl_keyword contained ai-numericserv ai-passive ai-v4mapped alet
+syn keyword tl_keyword contained align alignof alist-nremove alist-remove
+syn keyword tl_keyword contained all allocate-struct and andf
+syn keyword tl_keyword contained ap apf append append*
+syn keyword tl_keyword contained append-each append-each* append-each-prod append-each-prod*
+syn keyword tl_keyword contained append-match-products append-matches apply aret
+syn keyword tl_keyword contained array arraysize ash asin
+syn keyword tl_keyword contained asinh assert assoc assq
+syn keyword tl_keyword contained assql at-exit-call at-exit-do-not-call atan
+syn keyword tl_keyword contained atan2 atanh atom awk
+syn keyword tl_keyword contained base-name base64-decode base64-decode-buf base64-encode
+syn keyword tl_keyword contained base64-stream-dec base64-stream-enc base64url-decode base64url-decode-buf
+syn keyword tl_keyword contained base64url-encode base64url-stream-dec base64url-stream-enc bchar
+syn keyword tl_keyword contained be-double be-float be-int16 be-int32
+syn keyword tl_keyword contained be-int64 be-uint16 be-uint32 be-uint64
+syn keyword tl_keyword contained bignum-len bignump bindable bit
+syn keyword tl_keyword contained bitset blkcnt-t blksize-t block
+syn keyword tl_keyword contained block* bool boundp bracket
+syn keyword tl_keyword contained break-str brkint bs0 bs1
+syn keyword tl_keyword contained bsdly bstr bstr-d buf
+syn keyword tl_keyword contained buf-alloc-size buf-carray buf-d buf-get-char
+syn keyword tl_keyword contained buf-get-cptr buf-get-double buf-get-float buf-get-i16
+syn keyword tl_keyword contained buf-get-i32 buf-get-i64 buf-get-i8 buf-get-int
+syn keyword tl_keyword contained buf-get-long buf-get-short buf-get-u16 buf-get-u32
+syn keyword tl_keyword contained buf-get-u64 buf-get-u8 buf-get-uchar buf-get-uint
+syn keyword tl_keyword contained buf-get-ulong buf-get-ushort buf-int buf-list
+syn keyword tl_keyword contained buf-put-buf buf-put-char buf-put-cptr buf-put-double
+syn keyword tl_keyword contained buf-put-float buf-put-i16 buf-put-i32 buf-put-i64
+syn keyword tl_keyword contained buf-put-i8 buf-put-int buf-put-long buf-put-short
+syn keyword tl_keyword contained buf-put-u16 buf-put-u32 buf-put-u64 buf-put-u8
+syn keyword tl_keyword contained buf-put-uchar buf-put-uint buf-put-ulong buf-put-ushort
+syn keyword tl_keyword contained buf-set-length buf-str buf-trim buf-uint
+syn keyword tl_keyword contained bufp build build-list buildn
+syn keyword tl_keyword contained butlast butlastn caaaaar caaaadr
+syn keyword tl_keyword contained caaaar caaadar caaaddr caaadr
+syn keyword tl_keyword contained caaar caadaar caadadr caadar
+syn keyword tl_keyword contained caaddar caadddr caaddr caadr
+syn keyword tl_keyword contained caar cadaaar cadaadr cadaar
+syn keyword tl_keyword contained cadadar cadaddr cadadr cadar
+syn keyword tl_keyword contained caddaar caddadr caddar cadddar
+syn keyword tl_keyword contained caddddr cadddr caddr cadr
+syn keyword tl_keyword contained call call-clobber-expander call-delete-expander call-finalizers
+syn keyword tl_keyword contained call-super-fun call-super-method call-update-expander callf
+syn keyword tl_keyword contained car carray carray-blank carray-buf
+syn keyword tl_keyword contained carray-buf-sync carray-cptr carray-dup carray-free
+syn keyword tl_keyword contained carray-get carray-getz carray-int carray-list
+syn keyword tl_keyword contained carray-own carray-pun carray-put carray-putz
+syn keyword tl_keyword contained carray-ref carray-refset carray-replace carray-set-length
+syn keyword tl_keyword contained carray-sub carray-type carray-uint carray-vec
+syn keyword tl_keyword contained carrayp caseq caseq* caseql
+syn keyword tl_keyword contained caseql* casequal casequal* cat-str
+syn keyword tl_keyword contained cat-streams cat-vec catch catch*
+syn keyword tl_keyword contained catch** catenated-stream-p catenated-stream-push cbaud
+syn keyword tl_keyword contained cbaudex cdaaaar cdaaadr cdaaar
+syn keyword tl_keyword contained cdaadar cdaaddr cdaadr cdaar
+syn keyword tl_keyword contained cdadaar cdadadr cdadar cdaddar
+syn keyword tl_keyword contained cdadddr cdaddr cdadr cdar
+syn keyword tl_keyword contained cddaaar cddaadr cddaar cddadar
+syn keyword tl_keyword contained cddaddr cddadr cddar cdddaar
+syn keyword tl_keyword contained cdddadr cdddar cddddar cdddddr
+syn keyword tl_keyword contained cddddr cdddr cddr cdr
+syn keyword tl_keyword contained ceil ceil-rem chain chand
+syn keyword tl_keyword contained char chdir chmod chmod-rec
+syn keyword tl_keyword contained chown chown-rec chr-digit chr-int
+syn keyword tl_keyword contained chr-isalnum chr-isalpha chr-isascii chr-isblank
+syn keyword tl_keyword contained chr-iscntrl chr-isdigit chr-isgraph chr-islower
+syn keyword tl_keyword contained chr-isprint chr-ispunct chr-isspace chr-isunisp
+syn keyword tl_keyword contained chr-isupper chr-isxdigit chr-num chr-str
+syn keyword tl_keyword contained chr-str-set chr-tolower chr-toupper chr-xdigit
+syn keyword tl_keyword contained chrp clamp clear-dirty clear-error
+syn keyword tl_keyword contained clear-struct clearhash clocal clock-t
+syn keyword tl_keyword contained clockid-t close close-stream closedir
+syn keyword tl_keyword contained closelog closure cmp-str cmspar
+syn keyword tl_keyword contained coded-length collect-each collect-each* collect-each-prod
+syn keyword tl_keyword contained collect-each-prod* comb command-get command-get-buf
+syn keyword tl_keyword contained command-get-json command-get-jsons command-get-lines command-get-string
+syn keyword tl_keyword contained command-put command-put-buf command-put-json command-put-jsons
+syn keyword tl_keyword contained command-put-lines command-put-string compare-swap compile
+syn keyword tl_keyword contained compile-defr-warning compile-error compile-file compile-only
+syn keyword tl_keyword contained compile-toplevel compile-update-file compile-warning compl-span-str
+syn keyword tl_keyword contained cond conda condlet cons
+syn keyword tl_keyword contained conses conses* consp constantp
+syn keyword tl_keyword contained contain[s] copy copy-alist copy-buf
+syn keyword tl_keyword contained copy-carray copy-cons copy-file copy-files
+syn keyword tl_keyword contained copy-fun copy-hash copy-list copy-path-rec
+syn keyword tl_keyword contained copy-search-tree copy-str copy-struct copy-tnode
+syn keyword tl_keyword contained copy-tree copy-tree-iter copy-vec cos
+syn keyword tl_keyword contained cosh count-if count-until-match countq
+syn keyword tl_keyword contained countql countqual cptr cptr-buf
+syn keyword tl_keyword contained cptr-cast cptr-free cptr-get cptr-int
+syn keyword tl_keyword contained cptr-null cptr-obj cptr-out cptr-size-hint
+syn keyword tl_keyword contained cptr-type cptr-zap cptrp cr0
+syn keyword tl_keyword contained cr1 cr2 cr3 crc32
+syn keyword tl_keyword contained crc32-stream crdly cread crtscts
+syn keyword tl_keyword contained crypt cs5 cs6 cs7
+syn keyword tl_keyword contained cs8 csize cstopb cum-norm-dist
+syn keyword tl_keyword contained daemon dec defer-warning defex
+syn keyword tl_keyword contained deffi deffi-cb deffi-cb-unsafe deffi-struct
+syn keyword tl_keyword contained deffi-sym deffi-type deffi-union deffi-var
+syn keyword tl_keyword contained define-accessor define-modify-macro define-option-struct define-param-expander
+syn keyword tl_keyword contained define-place-macro defmacro defmatch defmeth
+syn keyword tl_keyword contained defpackage defparm defparml defplace
+syn keyword tl_keyword contained defset defstruct defsymacro defun
+syn keyword tl_keyword contained defun-match defvar defvarl del
+syn keyword tl_keyword contained delay delete-package dev-t diff
+syn keyword tl_keyword contained digits digpow dir-name dirstat
+syn keyword tl_keyword contained disassemble display-width divides dlclose
+syn keyword tl_keyword contained dlopen dlsym dlsym-checked dlvsym
+syn keyword tl_keyword contained dlvsym-checked do doc dohash
+syn keyword tl_keyword contained doloop doloop* dotimes double
+syn keyword tl_keyword contained downcase-str drop drop-until drop-while
+syn keyword tl_keyword contained dt-blk dt-chr dt-dir dt-fifo
+syn keyword tl_keyword contained dt-lnk dt-reg dt-sock dt-unknown
+syn keyword tl_keyword contained dump-compiled-objects dump-deferred-warnings dup dupfd
+syn keyword tl_keyword contained dwim e2big eacces each
+syn keyword tl_keyword contained each* each-match each-match-product each-prod
+syn keyword tl_keyword contained each-prod* eaddrinuse eaddrnotavail eafnosupport
+syn keyword tl_keyword contained eagain ealready ebadf ebadmsg
+syn keyword tl_keyword contained ebusy ecanceled echild echo
+syn keyword tl_keyword contained echoctl echoe echok echoke
+syn keyword tl_keyword contained echonl echoprt econnaborted econnrefused
+syn keyword tl_keyword contained econnreset edeadlk edestaddrreq edom
+syn keyword tl_keyword contained edquot eexist efault efbig
+syn keyword tl_keyword contained ehostunreach eidrm eighth eilseq
+syn keyword tl_keyword contained einprogress eintr einval eio
+syn keyword tl_keyword contained eisconn eisdir elemsize elemtype
+syn keyword tl_keyword contained eloop emfile emlink empty
+syn keyword tl_keyword contained emsgsize emultihop enametoolong endgrent
+syn keyword tl_keyword contained endp endpwent ends-with enetdown
+syn keyword tl_keyword contained enetreset enetunreach enfile enobufs
+syn keyword tl_keyword contained enodata enodev enoent enoexec
+syn keyword tl_keyword contained enolck enolink enomem enomsg
+syn keyword tl_keyword contained enoprotoopt enospc enosr enostr
+syn keyword tl_keyword contained enosys enotconn enotdir enotempty
+syn keyword tl_keyword contained enotrecoverable enotsock enotsup enotty
+syn keyword tl_keyword contained ensure-dir enum enumed env
+syn keyword tl_keyword contained env-fbind env-fbindings env-hash env-next
+syn keyword tl_keyword contained env-vbind env-vbindings enxio eopnotsupp
+syn keyword tl_keyword contained eoverflow eownerdead eperm epipe
+syn keyword tl_keyword contained eproto eprotonosupport eprototype eq
+syn keyword tl_keyword contained eql equal equot erange
+syn keyword tl_keyword contained erofs errno error espipe
+syn keyword tl_keyword contained esrch estale etime etimedout
+syn keyword tl_keyword contained etxtbsy eval eval-only evenp
+syn keyword tl_keyword contained ewouldblock exception-subtype-map exception-subtype-p exdev
+syn keyword tl_keyword contained exec exit exit* exp
+syn keyword tl_keyword contained expand expand* expand-left expand-right
+syn keyword tl_keyword contained expand-with-free-refs expt exptmod extproc
+syn keyword tl_keyword contained f$ f-dupfd f-dupfd-cloexec f-getfd
+syn keyword tl_keyword contained f-getfl f-getlk f-rdlck f-setfd
+syn keyword tl_keyword contained f-setfl f-setlk f-setlkw f-unlck
+syn keyword tl_keyword contained f-wrlck f^ f^$ false
+syn keyword tl_keyword contained fboundp fcntl fd-cloexec ff0
+syn keyword tl_keyword contained ff1 ffdly ffi ffi-alignof
+syn keyword tl_keyword contained ffi-arraysize ffi-call ffi-elemsize ffi-elemtype
+syn keyword tl_keyword contained ffi-get ffi-in ffi-make-call-desc ffi-make-closure
+syn keyword tl_keyword contained ffi-offsetof ffi-out ffi-put ffi-put-into
+syn keyword tl_keyword contained ffi-size ffi-type-compile ffi-type-operator-p ffi-type-p
+syn keyword tl_keyword contained ffi-typedef fifth file-append file-append-buf
+syn keyword tl_keyword contained file-append-json file-append-jsons file-append-lines file-append-string
+syn keyword tl_keyword contained file-get file-get-buf file-get-json file-get-jsons
+syn keyword tl_keyword contained file-get-lines file-get-string file-place-buf file-put
+syn keyword tl_keyword contained file-put-buf file-put-json file-put-jsons file-put-lines
+syn keyword tl_keyword contained file-put-string fileno fill-buf fill-buf-adjust
+syn keyword tl_keyword contained fill-carray fill-obj fill-vec filter-equal
syn keyword tl_keyword contained filter-string-tree finalize find find-frame
syn keyword tl_keyword contained find-frames find-frames-by-mask find-if find-max
syn keyword tl_keyword contained find-min find-package find-struct-type find-symbol
@@ -396,155 +397,156 @@ syn keyword tl_keyword contained path-newer path-older path-pipe-p path-private-
syn keyword tl_keyword contained path-read-writable-to-me-p path-readable-to-me-p path-same-object path-sep-chars
syn keyword tl_keyword contained path-setgid-p path-setuid-p path-sock-p path-sticky-p
syn keyword tl_keyword contained path-strictly-private-to-me-p path-symlink-p path-writable-to-me-p pdec
-syn keyword tl_keyword contained pendin perm pid-t pinc
-syn keyword tl_keyword contained pipe place-form-p placelet placelet*
-syn keyword tl_keyword contained plist-to-alist plusp poll poll-err
-syn keyword tl_keyword contained poll-in poll-nval poll-out poll-pri
-syn keyword tl_keyword contained poll-rdband poll-rdhup poll-wrband poly
-syn keyword tl_keyword contained pop portable-abs-path-p pos pos-if
-syn keyword tl_keyword contained pos-max pos-min posq posql
-syn keyword tl_keyword contained posqual pppred ppred pprinl
-syn keyword tl_keyword contained pprint pprof pred prinl
-syn keyword tl_keyword contained print prod prof prog
-syn keyword tl_keyword contained prog* prog1 prog2 progn
-syn keyword tl_keyword contained promisep prop proper-list-p proper-listp
-syn keyword tl_keyword contained pset ptr ptr-in ptr-in-d
-syn keyword tl_keyword contained ptr-out ptr-out-d ptr-out-s ptrdiff-t
-syn keyword tl_keyword contained pub:txr-sym pure-rel-path-p purge-deferred-warning push
-syn keyword tl_keyword contained pushhash pushnew put-buf put-byte
-syn keyword tl_keyword contained put-carray put-char put-json put-jsonl
-syn keyword tl_keyword contained put-jsons put-line put-lines put-obj
-syn keyword tl_keyword contained put-string put-strings pwd qquote
-syn keyword tl_keyword contained qref quip quote r$
-syn keyword tl_keyword contained r^ r^$ raise rand
-syn keyword tl_keyword contained random random-fixnum random-float random-state-get-vec
-syn keyword tl_keyword contained random-state-p range range* range-regex
-syn keyword tl_keyword contained rangep rassoc rassq rassql
-syn keyword tl_keyword contained rcomb rcons read read-until-match
-syn keyword tl_keyword contained readdir readlink real-time-stream-p realpath
-syn keyword tl_keyword contained record-adapter reduce-left reduce-right ref
-syn keyword tl_keyword contained refset regex-compile regex-from-trie regex-parse
-syn keyword tl_keyword contained regex-prefix-match regex-source regexp register-exception-subtypes
-syn keyword tl_keyword contained register-tentative-def regsub rehome-sym reject
-syn keyword tl_keyword contained rel-path relate release-deferred-warnings remhash
-syn keyword tl_keyword contained remove-if remove-if* remove-path remove-path-rec
-syn keyword tl_keyword contained remq remq* remql remql*
-syn keyword tl_keyword contained remqual remqual* rename-path repeat
-syn keyword tl_keyword contained replace replace-buf replace-list replace-str
-syn keyword tl_keyword contained replace-struct replace-tree-iter replace-vec reset-struct
-syn keyword tl_keyword contained rest ret retf return
-syn keyword tl_keyword contained return* return-from revappend reverse
-syn keyword tl_keyword contained rfind rfind-if right rlcp
-syn keyword tl_keyword contained rlcp-tree rlet rlist rlist*
-syn keyword tl_keyword contained rmdir rmember rmember-if rmemq
-syn keyword tl_keyword contained rmemql rmemqual rmismatch rotate
-syn keyword tl_keyword contained round round-rem rperm rplaca
-syn keyword tl_keyword contained rplacd rpoly rpos rpos-if
-syn keyword tl_keyword contained rposq rposql rposqual rr
-syn keyword tl_keyword contained rra rsearch rslot rtld-deepbind
-syn keyword tl_keyword contained rtld-global rtld-lazy rtld-local rtld-nodelete
-syn keyword tl_keyword contained rtld-noload rtld-now run s-ifblk
-syn keyword tl_keyword contained s-ifchr s-ifdir s-ififo s-iflnk
-syn keyword tl_keyword contained s-ifmt s-ifreg s-ifsock s-irgrp
-syn keyword tl_keyword contained s-iroth s-irusr s-irwxg s-irwxo
-syn keyword tl_keyword contained s-irwxu s-isgid s-isuid s-isvtx
-syn keyword tl_keyword contained s-iwgrp s-iwoth s-iwusr s-ixgrp
-syn keyword tl_keyword contained s-ixoth s-ixusr save-exe sbit
-syn keyword tl_keyword contained scan-until-match search search-regex search-regst
-syn keyword tl_keyword contained search-str search-str-tree second seek-cur
-syn keyword tl_keyword contained seek-end seek-set seek-stream select
-syn keyword tl_keyword contained self-load-path self-path seq-begin seq-next
-syn keyword tl_keyword contained seq-reset seqp set set-diff
-syn keyword tl_keyword contained set-hash-userdata set-indent set-indent-mode set-key
-syn keyword tl_keyword contained set-left set-max-depth set-max-length set-package-fallback-list
-syn keyword tl_keyword contained set-right set-sig-handler setegid setenv
-syn keyword tl_keyword contained seteuid setgid setgrent setgroups
-syn keyword tl_keyword contained sethash setitimer setlogmask setpwent
-syn keyword tl_keyword contained setresgid setresuid setuid seventh
-syn keyword tl_keyword contained sh sha256 sha256-begin sha256-end
-syn keyword tl_keyword contained sha256-hash sha256-stream shift short
-syn keyword tl_keyword contained shuffle shut-rd shut-rdwr shut-wr
-syn keyword tl_keyword contained sig-abrt sig-alrm sig-atomic-t sig-bus
-syn keyword tl_keyword contained sig-check sig-chld sig-cont sig-fpe
-syn keyword tl_keyword contained sig-hup sig-ill sig-int sig-io
-syn keyword tl_keyword contained sig-iot sig-kill sig-pipe sig-poll
-syn keyword tl_keyword contained sig-prof sig-pwr sig-quit sig-segv
-syn keyword tl_keyword contained sig-stkflt sig-stop sig-sys sig-term
-syn keyword tl_keyword contained sig-trap sig-tstp sig-ttin sig-ttou
-syn keyword tl_keyword contained sig-urg sig-usr1 sig-usr2 sig-vtalrm
-syn keyword tl_keyword contained sig-winch sig-xcpu sig-xfsz sign-extend
-syn keyword tl_keyword contained signum sin sinh sixth
-syn keyword tl_keyword contained size-t size-vec sizeof slet
-syn keyword tl_keyword contained slot slotp slots slotset
-syn keyword tl_keyword contained sock-accept sock-bind sock-cloexec sock-connect
-syn keyword tl_keyword contained sock-dgram sock-family sock-listen sock-nonblock
-syn keyword tl_keyword contained sock-peer sock-recv-timeout sock-send-timeout sock-set-peer
-syn keyword tl_keyword contained sock-shutdown sock-stream sock-type some
-syn keyword tl_keyword contained sort sort-group source-loc source-loc-str
-syn keyword tl_keyword contained span-str special-operator-p special-var-p spl
-syn keyword tl_keyword contained splice split split* split-str
-syn keyword tl_keyword contained split-str-set sqrt square ssize-t
-syn keyword tl_keyword contained sspl sssucc ssucc starts-with
-syn keyword tl_keyword contained stat static-slot static-slot-ensure static-slot-home
-syn keyword tl_keyword contained static-slot-p static-slot-set stdlib str
-syn keyword tl_keyword contained str-buf str-d str-in6addr str-in6addr-net
-syn keyword tl_keyword contained str-inaddr str-inaddr-net str-seq str<
-syn keyword tl_keyword contained str<= str= str> str>=
-syn keyword tl_keyword contained stream-get-prop stream-set-prop streamp strerror
-syn keyword tl_keyword contained string-extend string-lt stringp strsignal
-syn keyword tl_keyword contained struct struct-from-args struct-from-plist struct-get-initfun
-syn keyword tl_keyword contained struct-get-postinitfun struct-set-initfun struct-set-postinitfun struct-type
-syn keyword tl_keyword contained struct-type-name struct-type-p structp sub
-syn keyword tl_keyword contained sub-buf sub-list sub-str sub-tree
-syn keyword tl_keyword contained sub-vec subtypep succ sum
-syn keyword tl_keyword contained super super-method suspend swap
-syn keyword tl_keyword contained symacrolet symbol-function symbol-macro symbol-name
-syn keyword tl_keyword contained symbol-package symbol-value symbolp symdiff
-syn keyword tl_keyword contained symlink sys:%backpatch-high16% sys:%backpatch-low16% sys:%big-endian%
-syn keyword tl_keyword contained sys:%bin-op% sys:%bin-ops% sys:%block-using-funs% sys:%call-op%
-syn keyword tl_keyword contained sys:%const-foldable% sys:%const-foldable-funs% sys:%dbg-command-env% sys:%effect-free%
-syn keyword tl_keyword contained sys:%effect-free-funs% sys:%file-suff-rx% sys:%functional% sys:%functional-funs%
-syn keyword tl_keyword contained sys:%gcall-op% sys:%lev-bits% sys:%lev-size% sys:%max-lambda-fixed-args%
-syn keyword tl_keyword contained sys:%max-lev% sys:%max-lev-idx% sys:%max-sm-lev% sys:%max-sm-lev-idx%
-syn keyword tl_keyword contained sys:%max-v-lev% sys:%nary-ops% sys:%oc-code% sys:%oc-hash%
-syn keyword tl_keyword contained sys:%oc-list-builder% sys:%package-manip% sys:%param-info% sys:%quip-rand-state%
-syn keyword tl_keyword contained sys:%quips% sys:%shuffled-quips% sys:%sm-lev-bits% sys:%sm-lev-size%
-syn keyword tl_keyword contained sys:%test-funs% sys:%test-funs-neg% sys:%test-funs-ops% sys:%test-funs-pos%
-syn keyword tl_keyword contained sys:%test-inv% sys:%test-opcode% sys:%tlo-ver% sys:*dedup*
-syn keyword tl_keyword contained sys:*emit* sys:*eval* sys:*in-compilation-unit* sys:*load-recursive*
-syn keyword tl_keyword contained sys:*load-time* sys:*match-form* sys:*op-ctx* sys:*pl-env*
-syn keyword tl_keyword contained sys:*pl-form* sys:*trace-hash* sys:*trace-level* sys:*unchecked-calls*
-syn keyword tl_keyword contained sys:abscond* sys:abscond-from sys:analyze-argtypes sys:analyze-params
-syn keyword tl_keyword contained sys:apply sys:asm-error sys:assumed-fun sys:awk%--rng
-syn keyword tl_keyword contained sys:awk%--rng+ sys:awk%--rng- sys:awk%-rng+ sys:awk%rng+
-syn keyword tl_keyword contained sys:awk-code-move-check sys:awk-error sys:awk-expander sys:awk-fun-let
-syn keyword tl_keyword contained sys:awk-fun-shadowing-env sys:awk-mac-let sys:awk-redir sys:awk-test
-syn keyword tl_keyword contained sys:b* sys:b+ sys:b- sys:b/
-syn keyword tl_keyword contained sys:b< sys:b<= sys:b= sys:b=>
-syn keyword tl_keyword contained sys:b> sys:bad-slot-syntax sys:bind-mac-check sys:bind-mac-error
-syn keyword tl_keyword contained sys:bindable-check sys:bits sys:bits-to-obj sys:blk
-syn keyword tl_keyword contained sys:build-expander sys:build-key-list-expr sys:capture-cont sys:catch
-syn keyword tl_keyword contained sys:check sys:check-end sys:check-slot sys:check-struct
-syn keyword tl_keyword contained sys:check-sym sys:circref sys:compat sys:compile-and-match
-syn keyword tl_keyword contained sys:compile-as-match sys:compile-atom-match sys:compile-cons-structure sys:compile-exprs-match
-syn keyword tl_keyword contained sys:compile-file-conditionally sys:compile-hash-match sys:compile-loop-match sys:compile-match
-syn keyword tl_keyword contained sys:compile-new-var-match sys:compile-not-match sys:compile-or-match sys:compile-predicate-match
-syn keyword tl_keyword contained sys:compile-range-match sys:compile-require-match sys:compile-scan-match sys:compile-struct-match
-syn keyword tl_keyword contained sys:compile-var-match sys:compile-vec-match sys:compile-with-match sys:compiler-emit-warnings
-syn keyword tl_keyword contained sys:conv sys:conv-expand sys:conv-let sys:ctx-form
-syn keyword tl_keyword contained sys:ctx-name sys:dbg-all sys:dbg-backtrace sys:dbg-clear
-syn keyword tl_keyword contained sys:dbg-enable sys:dbg-restore sys:dbg-set sys:dbg-step
-syn keyword tl_keyword contained sys:debugger sys:dedup sys:dedup-labels sys:deffi-cb-expander
-syn keyword tl_keyword contained sys:define-method sys:defset-expander sys:defset-expander-simple sys:dig
-syn keyword tl_keyword contained sys:disassemble-cdf sys:dlib-expr sys:do-conv sys:do-copy-obj
-syn keyword tl_keyword contained sys:do-path-test sys:do-tweak-obj sys:doc-syms sys:dump-to-tlo
-syn keyword tl_keyword contained sys:dvbind sys:dwim-del sys:dwim-set sys:dyn-size
-syn keyword tl_keyword contained sys:each-match-expander sys:each-op sys:early-peephole sys:enc-small-op
-syn keyword tl_keyword contained sys:ensure-op-arg sys:env-to-let sys:eq-comparable sys:eql-comparable
-syn keyword tl_keyword contained sys:eval-err sys:expand-and sys:expand-bind-mac-params sys:expand-defmacro
-syn keyword tl_keyword contained sys:expand-defsymacro sys:expand-defun sys:expand-defvarl sys:expand-dohash
-syn keyword tl_keyword contained sys:expand-doloop sys:expand-each sys:expand-each-prod sys:expand-each-prod*
-syn keyword tl_keyword contained sys:expand-handle sys:expand-lambda-match sys:expand-params sys:expand-quasi
+syn keyword tl_keyword contained pendin perm pic pid-t
+syn keyword tl_keyword contained pinc pipe place-form-p placelet
+syn keyword tl_keyword contained placelet* plist-to-alist plusp poll
+syn keyword tl_keyword contained poll-err poll-in poll-nval poll-out
+syn keyword tl_keyword contained poll-pri poll-rdband poll-rdhup poll-wrband
+syn keyword tl_keyword contained poly pop portable-abs-path-p pos
+syn keyword tl_keyword contained pos-if pos-max pos-min posq
+syn keyword tl_keyword contained posql posqual pppred ppred
+syn keyword tl_keyword contained pprinl pprint pprof pred
+syn keyword tl_keyword contained prinl print prod prof
+syn keyword tl_keyword contained prog prog* prog1 prog2
+syn keyword tl_keyword contained progn promisep prop proper-list-p
+syn keyword tl_keyword contained proper-listp pset ptr ptr-in
+syn keyword tl_keyword contained ptr-in-d ptr-out ptr-out-d ptr-out-s
+syn keyword tl_keyword contained ptrdiff-t pub:txr-sym pure-rel-path-p purge-deferred-warning
+syn keyword tl_keyword contained push pushhash pushnew put-buf
+syn keyword tl_keyword contained put-byte put-carray put-char put-json
+syn keyword tl_keyword contained put-jsonl put-jsons put-line put-lines
+syn keyword tl_keyword contained put-obj put-string put-strings pwd
+syn keyword tl_keyword contained qquote qref quip quote
+syn keyword tl_keyword contained r$ r^ r^$ raise
+syn keyword tl_keyword contained rand random random-fixnum random-float
+syn keyword tl_keyword contained random-state-get-vec random-state-p range range*
+syn keyword tl_keyword contained range-regex rangep rassoc rassq
+syn keyword tl_keyword contained rassql rcomb rcons read
+syn keyword tl_keyword contained read-until-match readdir readlink real-time-stream-p
+syn keyword tl_keyword contained realpath record-adapter reduce-left reduce-right
+syn keyword tl_keyword contained ref refset regex-compile regex-from-trie
+syn keyword tl_keyword contained regex-parse regex-prefix-match regex-source regexp
+syn keyword tl_keyword contained register-exception-subtypes register-tentative-def regsub rehome-sym
+syn keyword tl_keyword contained reject rel-path relate release-deferred-warnings
+syn keyword tl_keyword contained remhash remove-if remove-if* remove-path
+syn keyword tl_keyword contained remove-path-rec remq remq* remql
+syn keyword tl_keyword contained remql* remqual remqual* rename-path
+syn keyword tl_keyword contained repeat replace replace-buf replace-list
+syn keyword tl_keyword contained replace-str replace-struct replace-tree-iter replace-vec
+syn keyword tl_keyword contained reset-struct rest ret retf
+syn keyword tl_keyword contained return return* return-from revappend
+syn keyword tl_keyword contained reverse rfind rfind-if right
+syn keyword tl_keyword contained rlcp rlcp-tree rlet rlist
+syn keyword tl_keyword contained rlist* rmdir rmember rmember-if
+syn keyword tl_keyword contained rmemq rmemql rmemqual rmismatch
+syn keyword tl_keyword contained rotate round round-rem rperm
+syn keyword tl_keyword contained rplaca rplacd rpoly rpos
+syn keyword tl_keyword contained rpos-if rposq rposql rposqual
+syn keyword tl_keyword contained rr rra rsearch rslot
+syn keyword tl_keyword contained rtld-deepbind rtld-global rtld-lazy rtld-local
+syn keyword tl_keyword contained rtld-nodelete rtld-noload rtld-now run
+syn keyword tl_keyword contained s-ifblk s-ifchr s-ifdir s-ififo
+syn keyword tl_keyword contained s-iflnk s-ifmt s-ifreg s-ifsock
+syn keyword tl_keyword contained s-irgrp s-iroth s-irusr s-irwxg
+syn keyword tl_keyword contained s-irwxo s-irwxu s-isgid s-isuid
+syn keyword tl_keyword contained s-isvtx s-iwgrp s-iwoth s-iwusr
+syn keyword tl_keyword contained s-ixgrp s-ixoth s-ixusr save-exe
+syn keyword tl_keyword contained sbit scan-until-match search search-regex
+syn keyword tl_keyword contained search-regst search-str search-str-tree second
+syn keyword tl_keyword contained seek-cur seek-end seek-set seek-stream
+syn keyword tl_keyword contained select self-load-path self-path seq-begin
+syn keyword tl_keyword contained seq-next seq-reset seqp set
+syn keyword tl_keyword contained set-diff set-hash-userdata set-indent set-indent-mode
+syn keyword tl_keyword contained set-key set-left set-max-depth set-max-length
+syn keyword tl_keyword contained set-package-fallback-list set-right set-sig-handler setegid
+syn keyword tl_keyword contained setenv seteuid setgid setgrent
+syn keyword tl_keyword contained setgroups sethash setitimer setlogmask
+syn keyword tl_keyword contained setpwent setresgid setresuid setuid
+syn keyword tl_keyword contained seventh sh sha256 sha256-begin
+syn keyword tl_keyword contained sha256-end sha256-hash sha256-stream shift
+syn keyword tl_keyword contained short shuffle shut-rd shut-rdwr
+syn keyword tl_keyword contained shut-wr sig-abrt sig-alrm sig-atomic-t
+syn keyword tl_keyword contained sig-bus sig-check sig-chld sig-cont
+syn keyword tl_keyword contained sig-fpe sig-hup sig-ill sig-int
+syn keyword tl_keyword contained sig-io sig-iot sig-kill sig-pipe
+syn keyword tl_keyword contained sig-poll sig-prof sig-pwr sig-quit
+syn keyword tl_keyword contained sig-segv sig-stkflt sig-stop sig-sys
+syn keyword tl_keyword contained sig-term sig-trap sig-tstp sig-ttin
+syn keyword tl_keyword contained sig-ttou sig-urg sig-usr1 sig-usr2
+syn keyword tl_keyword contained sig-vtalrm sig-winch sig-xcpu sig-xfsz
+syn keyword tl_keyword contained sign-extend signum sin sinh
+syn keyword tl_keyword contained sixth size-t size-vec sizeof
+syn keyword tl_keyword contained slet slot slotp slots
+syn keyword tl_keyword contained slotset sock-accept sock-bind sock-cloexec
+syn keyword tl_keyword contained sock-connect sock-dgram sock-family sock-listen
+syn keyword tl_keyword contained sock-nonblock sock-peer sock-recv-timeout sock-send-timeout
+syn keyword tl_keyword contained sock-set-peer sock-shutdown sock-stream sock-type
+syn keyword tl_keyword contained some sort sort-group source-loc
+syn keyword tl_keyword contained source-loc-str span-str special-operator-p special-var-p
+syn keyword tl_keyword contained spl splice split split*
+syn keyword tl_keyword contained split-str split-str-set sqrt square
+syn keyword tl_keyword contained ssize-t sspl sssucc ssucc
+syn keyword tl_keyword contained starts-with stat static-slot static-slot-ensure
+syn keyword tl_keyword contained static-slot-home static-slot-p static-slot-set stdlib
+syn keyword tl_keyword contained str str-buf str-d str-in6addr
+syn keyword tl_keyword contained str-in6addr-net str-inaddr str-inaddr-net str-seq
+syn keyword tl_keyword contained str< str<= str= str>
+syn keyword tl_keyword contained str>= stream-get-prop stream-set-prop streamp
+syn keyword tl_keyword contained strerror string-extend string-lt stringp
+syn keyword tl_keyword contained strsignal struct struct-from-args struct-from-plist
+syn keyword tl_keyword contained struct-get-initfun struct-get-postinitfun struct-set-initfun struct-set-postinitfun
+syn keyword tl_keyword contained struct-type struct-type-name struct-type-p structp
+syn keyword tl_keyword contained sub sub-buf sub-list sub-str
+syn keyword tl_keyword contained sub-tree sub-vec subtypep succ
+syn keyword tl_keyword contained sum super super-method suspend
+syn keyword tl_keyword contained swap symacrolet symbol-function symbol-macro
+syn keyword tl_keyword contained symbol-name symbol-package symbol-value symbolp
+syn keyword tl_keyword contained symdiff symlink sys:%backpatch-high16% sys:%backpatch-low16%
+syn keyword tl_keyword contained sys:%big-endian% sys:%bin-op% sys:%bin-ops% sys:%block-using-funs%
+syn keyword tl_keyword contained sys:%call-op% sys:%const-foldable% sys:%const-foldable-funs% sys:%dbg-command-env%
+syn keyword tl_keyword contained sys:%effect-free% sys:%effect-free-funs% sys:%file-suff-rx% sys:%functional%
+syn keyword tl_keyword contained sys:%functional-funs% sys:%gcall-op% sys:%lev-bits% sys:%lev-size%
+syn keyword tl_keyword contained sys:%max-lambda-fixed-args% sys:%max-lev% sys:%max-lev-idx% sys:%max-sm-lev%
+syn keyword tl_keyword contained sys:%max-sm-lev-idx% sys:%max-v-lev% sys:%nary-ops% sys:%oc-code%
+syn keyword tl_keyword contained sys:%oc-hash% sys:%oc-list-builder% sys:%package-manip% sys:%param-info%
+syn keyword tl_keyword contained sys:%quip-rand-state% sys:%quips% sys:%shuffled-quips% sys:%sm-lev-bits%
+syn keyword tl_keyword contained sys:%sm-lev-size% sys:%test-funs% sys:%test-funs-neg% sys:%test-funs-ops%
+syn keyword tl_keyword contained sys:%test-funs-pos% sys:%test-inv% sys:%test-opcode% sys:%tlo-ver%
+syn keyword tl_keyword contained sys:*dedup* sys:*emit* sys:*eval* sys:*in-compilation-unit*
+syn keyword tl_keyword contained sys:*load-recursive* sys:*load-time* sys:*match-form* sys:*op-ctx*
+syn keyword tl_keyword contained sys:*pl-env* sys:*pl-form* sys:*trace-hash* sys:*trace-level*
+syn keyword tl_keyword contained sys:*unchecked-calls* sys:abscond* sys:abscond-from sys:analyze-argtypes
+syn keyword tl_keyword contained sys:analyze-params sys:apply sys:asm-error sys:assumed-fun
+syn keyword tl_keyword contained sys:awk%--rng sys:awk%--rng+ sys:awk%--rng- sys:awk%-rng+
+syn keyword tl_keyword contained sys:awk%rng+ sys:awk-code-move-check sys:awk-error sys:awk-expander
+syn keyword tl_keyword contained sys:awk-fun-let sys:awk-fun-shadowing-env sys:awk-mac-let sys:awk-redir
+syn keyword tl_keyword contained sys:awk-test sys:b* sys:b+ sys:b-
+syn keyword tl_keyword contained sys:b/ sys:b< sys:b<= sys:b=
+syn keyword tl_keyword contained sys:b=> sys:b> sys:bad-slot-syntax sys:bind-mac-check
+syn keyword tl_keyword contained sys:bind-mac-error sys:bindable-check sys:bits sys:bits-to-obj
+syn keyword tl_keyword contained sys:blk sys:build-expander sys:build-key-list-expr sys:capture-cont
+syn keyword tl_keyword contained sys:catch sys:check sys:check-end sys:check-slot
+syn keyword tl_keyword contained sys:check-struct sys:check-sym sys:circref sys:compat
+syn keyword tl_keyword contained sys:compile-and-match sys:compile-as-match sys:compile-atom-match sys:compile-cons-structure
+syn keyword tl_keyword contained sys:compile-exprs-match sys:compile-file-conditionally sys:compile-hash-match sys:compile-loop-match
+syn keyword tl_keyword contained sys:compile-match sys:compile-new-var-match sys:compile-not-match sys:compile-or-match
+syn keyword tl_keyword contained sys:compile-predicate-match sys:compile-range-match sys:compile-require-match sys:compile-scan-match
+syn keyword tl_keyword contained sys:compile-struct-match sys:compile-var-match sys:compile-vec-match sys:compile-with-match
+syn keyword tl_keyword contained sys:compiler-emit-warnings sys:conv sys:conv-expand sys:conv-let
+syn keyword tl_keyword contained sys:ctx-form sys:ctx-name sys:dbg-all sys:dbg-backtrace
+syn keyword tl_keyword contained sys:dbg-clear sys:dbg-enable sys:dbg-restore sys:dbg-set
+syn keyword tl_keyword contained sys:dbg-step sys:debugger sys:dedup sys:dedup-labels
+syn keyword tl_keyword contained sys:deffi-cb-expander sys:define-method sys:defset-expander sys:defset-expander-simple
+syn keyword tl_keyword contained sys:dig sys:disassemble-cdf sys:dlib-expr sys:do-conv
+syn keyword tl_keyword contained sys:do-copy-obj sys:do-path-test sys:do-tweak-obj sys:doc-syms
+syn keyword tl_keyword contained sys:dump-to-tlo sys:dvbind sys:dwim-del sys:dwim-set
+syn keyword tl_keyword contained sys:dyn-size sys:each-match-expander sys:each-op sys:early-peephole
+syn keyword tl_keyword contained sys:enc-small-op sys:ensure-op-arg sys:env-to-let sys:eq-comparable
+syn keyword tl_keyword contained sys:eql-comparable sys:eval-err sys:expand-and sys:expand-bind-mac-params
+syn keyword tl_keyword contained sys:expand-defmacro sys:expand-defsymacro sys:expand-defun sys:expand-defvarl
+syn keyword tl_keyword contained sys:expand-dohash sys:expand-doloop sys:expand-each sys:expand-each-prod
+syn keyword tl_keyword contained sys:expand-each-prod* sys:expand-handle sys:expand-lambda-match sys:expand-params
+syn keyword tl_keyword contained sys:expand-pic sys:expand-pic-align sys:expand-pic-num sys:expand-quasi
syn keyword tl_keyword contained sys:expand-quasi-args sys:expand-quasi-match sys:expand-quasi-mods sys:expand-sym-ref
syn keyword tl_keyword contained sys:expr sys:extract-keys sys:extract-keys-p sys:fbind
syn keyword tl_keyword contained sys:fixed-point sys:flatten-or sys:fmt-flex sys:fmt-join
@@ -564,96 +566,97 @@ syn keyword tl_keyword contained sys:op-meta-p sys:op-rec-p sys:open-compile-str
syn keyword tl_keyword contained sys:operand-to-exp sys:operand-to-sym sys:opip-expand sys:opt-dash
syn keyword tl_keyword contained sys:opt-err sys:os-symbol sys:param-check sys:parse-compound-operand
syn keyword tl_keyword contained sys:parse-lambda-match-clause sys:parse-operand sys:pat-len sys:path-access
-syn keyword tl_keyword contained sys:path-examine sys:path-test-mode sys:path-test-type sys:pl-expand
-syn keyword tl_keyword contained sys:placelet-1 sys:print-backtrace sys:propagate-ancestor sys:propagate-perms
-syn keyword tl_keyword contained sys:prune-missing-inits sys:qquote sys:quasi sys:quasilist
-syn keyword tl_keyword contained sys:r-s-let-expander sys:reduce-constant sys:reduce-lisp sys:reduce-or
-syn keyword tl_keyword contained sys:reg-expand-nongreedy sys:reg-optimize sys:register-opcode sys:register-simple-accessor
-syn keyword tl_keyword contained sys:repl sys:rewrite sys:rewrite-case sys:rplaca
-syn keyword tl_keyword contained sys:rplacd sys:rslotset sys:rt-assert-fail sys:rt-defmacro
-syn keyword tl_keyword contained sys:rt-defsymacro sys:rt-defun sys:rt-defv sys:rt-defvarl
-syn keyword tl_keyword contained sys:rt-load-for sys:rt-pprof sys:set-hash-traversal-limit sys:set-macro-ancestor
-syn keyword tl_keyword contained sys:setq sys:setqf sys:simplify-or sys:slot-types
-syn keyword tl_keyword contained sys:small-op-p sys:small-op-to-sym sys:splice sys:static-slot-types
-syn keyword tl_keyword contained sys:str-inaddr-net-impl sys:struct-lit sys:subst sys:subst-preserve
-syn keyword tl_keyword contained sys:switch sys:sym-clobber-expander sys:sym-delete-expander sys:sym-update-expander
-syn keyword tl_keyword contained sys:system-symbol-p sys:top-fb sys:top-mb sys:top-vb
-syn keyword tl_keyword contained sys:tr* sys:trace sys:trace-canonicalize-name sys:trace-enter
-syn keyword tl_keyword contained sys:trace-leave sys:trace-redefine-check sys:tree-construct sys:trfm
-syn keyword tl_keyword contained sys:true-const-p sys:try-load sys:txr-case-impl sys:unquote
-syn keyword tl_keyword contained sys:untrace sys:upenv sys:uw-block sys:uw-captured-block
-syn keyword tl_keyword contained sys:uw-catch sys:uw-cont-copy sys:uw-eval sys:uw-expand
-syn keyword tl_keyword contained sys:uw-fcall sys:uw-guard sys:uw-handle sys:uw-menv
-syn keyword tl_keyword contained sys:var sys:var-pat-p sys:vars-check sys:vm-closure-desc
-syn keyword tl_keyword contained sys:vm-closure-entry sys:vm-desc-bytecode sys:vm-desc-datavec sys:vm-desc-nlevels
-syn keyword tl_keyword contained sys:vm-desc-nregs sys:vm-desc-symvec sys:vm-execute-toplevel sys:vm-make-desc
-syn keyword tl_keyword contained sys:wdwrap sys:when-exprs-match sys:with-dyn-lib-check syslog
-syn keyword tl_keyword contained system-package t tab0 tab1
-syn keyword tl_keyword contained tab2 tab3 tabdly tagbody
-syn keyword tl_keyword contained tailp take take-until take-while
-syn keyword tl_keyword contained tan tanh tb tc
-syn keyword tl_keyword contained tcdrain tcflow tcflush tcgetattr
-syn keyword tl_keyword contained tciflush tcioff tcioflush tcion
-syn keyword tl_keyword contained tcoflush tcooff tcoon tcsadrain
-syn keyword tl_keyword contained tcsaflush tcsanow tcsendbreak tcsetattr
-syn keyword tl_keyword contained tentative-def-exists tenth test-clear test-clear-dirty
-syn keyword tl_keyword contained test-dec test-dirty test-inc test-neq-set-indent-mode
-syn keyword tl_keyword contained test-set test-set-indent-mode tf third
-syn keyword tl_keyword contained throw throwf time time-fields-local
-syn keyword tl_keyword contained time-fields-utc time-nsec time-parse time-parse-local
-syn keyword tl_keyword contained time-parse-utc time-string-local time-string-utc time-struct-local
-syn keyword tl_keyword contained time-struct-utc time-t time-usec tmpfile
-syn keyword tl_keyword contained tnode to tofloat tofloatz
-syn keyword tl_keyword contained toint tointz tojson tok
-syn keyword tl_keyword contained tok-str tok-where tostop tostring
-syn keyword tl_keyword contained tostringp touch tprint trace
-syn keyword tl_keyword contained transpose tree tree-begin tree-bind
-syn keyword tl_keyword contained tree-case tree-clear tree-delete tree-delete-node
-syn keyword tl_keyword contained tree-find tree-insert tree-insert-node tree-lookup
-syn keyword tl_keyword contained tree-lookup-node tree-next tree-peek tree-reset
-syn keyword tl_keyword contained tree-root treep trie-add trie-compress
-syn keyword tl_keyword contained trie-lookup-begin trie-lookup-feed-char trie-value-at trim-left
-syn keyword tl_keyword contained trim-right trim-str true trunc
-syn keyword tl_keyword contained trunc-rem truncate-stream tuples txr-case
-syn keyword tl_keyword contained txr-exe-path txr-if txr-parse txr-path
-syn keyword tl_keyword contained txr-version txr-when typecase typedef
-syn keyword tl_keyword contained typeof typep ubit uchar
-syn keyword tl_keyword contained uid-t uint uint-buf uint-carray
-syn keyword tl_keyword contained uint-ptr-t uint16 uint32 uint64
-syn keyword tl_keyword contained uint8 ulong ulonglong umask
-syn keyword tl_keyword contained umeth umethod uname unget-byte
-syn keyword tl_keyword contained unget-char uni unintern union
-syn keyword tl_keyword contained union-get union-in union-members union-out
-syn keyword tl_keyword contained union-put uniq unique unless
-syn keyword tl_keyword contained unquote unsetenv until until*
-syn keyword tl_keyword contained untrace unuse-package unuse-sym unwind-protect
-syn keyword tl_keyword contained upcase-str upd update uref
-syn keyword tl_keyword contained url-decode url-encode use use-package
-syn keyword tl_keyword contained use-sym user-package ushort usl
-syn keyword tl_keyword contained usleep uslot utimes val
-syn keyword tl_keyword contained vdiscard vec vec-carray vec-list
-syn keyword tl_keyword contained vec-push vec-seq vec-set-length vecref
-syn keyword tl_keyword contained vector vector-list vectorp veof
-syn keyword tl_keyword contained veol veol2 verase vintr
-syn keyword tl_keyword contained vkill vlnext vm-fun-p vmin
-syn keyword tl_keyword contained void vquit vreprint vstart
-syn keyword tl_keyword contained vstop vsusp vswtc vt0
-syn keyword tl_keyword contained vt1 vtdly vtime vwerase
-syn keyword tl_keyword contained w-continued w-coredump w-exitstatus w-ifcontinued
-syn keyword tl_keyword contained w-ifexited w-ifsignaled w-ifstopped w-nohang
-syn keyword tl_keyword contained w-stopsig w-termsig w-untraced wait
-syn keyword tl_keyword contained wchar weave when when-match
-syn keyword tl_keyword contained whena whenlet where while
-syn keyword tl_keyword contained while* whilet width width-check
-syn keyword tl_keyword contained window-map window-mapdo window-mappend wint-t
-syn keyword tl_keyword contained with-clobber-expander with-compilation-unit with-delete-expander with-dyn-lib
-syn keyword tl_keyword contained with-gensyms with-hash-iter with-in-buf-stream with-in-string-byte-stream
-syn keyword tl_keyword contained with-in-string-stream with-objects with-out-buf-stream with-out-string-stream
-syn keyword tl_keyword contained with-out-strlist-stream with-resources with-slots with-stream
-syn keyword tl_keyword contained with-update-expander wrap wrap* wstr
-syn keyword tl_keyword contained wstr-d xcase yield yield-from
-syn keyword tl_keyword contained zap zarray zchar zero-fill
-syn keyword tl_keyword contained zerop zip znew
+syn keyword tl_keyword contained sys:path-examine sys:path-test-mode sys:path-test-type sys:pic-join-opt
+syn keyword tl_keyword contained sys:pl-expand sys:placelet-1 sys:print-backtrace sys:propagate-ancestor
+syn keyword tl_keyword contained sys:propagate-perms sys:prune-missing-inits sys:qquote sys:quasi
+syn keyword tl_keyword contained sys:quasilist sys:r-s-let-expander sys:reduce-constant sys:reduce-lisp
+syn keyword tl_keyword contained sys:reduce-or sys:reg-expand-nongreedy sys:reg-optimize sys:register-opcode
+syn keyword tl_keyword contained sys:register-simple-accessor sys:repl sys:rewrite sys:rewrite-case
+syn keyword tl_keyword contained sys:rplaca sys:rplacd sys:rslotset sys:rt-assert-fail
+syn keyword tl_keyword contained sys:rt-defmacro sys:rt-defsymacro sys:rt-defun sys:rt-defv
+syn keyword tl_keyword contained sys:rt-defvarl sys:rt-load-for sys:rt-pprof sys:set-hash-traversal-limit
+syn keyword tl_keyword contained sys:set-macro-ancestor sys:setq sys:setqf sys:simplify-or
+syn keyword tl_keyword contained sys:slot-types sys:small-op-p sys:small-op-to-sym sys:splice
+syn keyword tl_keyword contained sys:static-slot-types sys:str-inaddr-net-impl sys:struct-lit sys:subst
+syn keyword tl_keyword contained sys:subst-preserve sys:switch sys:sym-clobber-expander sys:sym-delete-expander
+syn keyword tl_keyword contained sys:sym-update-expander sys:system-symbol-p sys:top-fb sys:top-mb
+syn keyword tl_keyword contained sys:top-vb sys:tr* sys:trace sys:trace-canonicalize-name
+syn keyword tl_keyword contained sys:trace-enter sys:trace-leave sys:trace-redefine-check sys:transform-qquote
+syn keyword tl_keyword contained sys:tree-construct sys:trfm sys:true-const-p sys:try-load
+syn keyword tl_keyword contained sys:txr-case-impl sys:unquote sys:untrace sys:upenv
+syn keyword tl_keyword contained sys:uw-block sys:uw-captured-block sys:uw-catch sys:uw-cont-copy
+syn keyword tl_keyword contained sys:uw-eval sys:uw-expand sys:uw-fcall sys:uw-guard
+syn keyword tl_keyword contained sys:uw-handle sys:uw-menv sys:var sys:var-pat-p
+syn keyword tl_keyword contained sys:vars-check sys:vm-closure-desc sys:vm-closure-entry sys:vm-desc-bytecode
+syn keyword tl_keyword contained sys:vm-desc-datavec sys:vm-desc-nlevels sys:vm-desc-nregs sys:vm-desc-symvec
+syn keyword tl_keyword contained sys:vm-execute-toplevel sys:vm-make-desc sys:wdwrap sys:when-exprs-match
+syn keyword tl_keyword contained sys:with-dyn-lib-check syslog system-package t
+syn keyword tl_keyword contained tab0 tab1 tab2 tab3
+syn keyword tl_keyword contained tabdly tagbody tailp take
+syn keyword tl_keyword contained take-until take-while tan tanh
+syn keyword tl_keyword contained tb tc tcdrain tcflow
+syn keyword tl_keyword contained tcflush tcgetattr tciflush tcioff
+syn keyword tl_keyword contained tcioflush tcion tcoflush tcooff
+syn keyword tl_keyword contained tcoon tcsadrain tcsaflush tcsanow
+syn keyword tl_keyword contained tcsendbreak tcsetattr tentative-def-exists tenth
+syn keyword tl_keyword contained test-clear test-clear-dirty test-dec test-dirty
+syn keyword tl_keyword contained test-inc test-neq-set-indent-mode test-set test-set-indent-mode
+syn keyword tl_keyword contained tf third throw throwf
+syn keyword tl_keyword contained time time-fields-local time-fields-utc time-nsec
+syn keyword tl_keyword contained time-parse time-parse-local time-parse-utc time-string-local
+syn keyword tl_keyword contained time-string-utc time-struct-local time-struct-utc time-t
+syn keyword tl_keyword contained time-usec tmpfile tnode to
+syn keyword tl_keyword contained tofloat tofloatz toint tointz
+syn keyword tl_keyword contained tojson tok tok-str tok-where
+syn keyword tl_keyword contained tostop tostring tostringp touch
+syn keyword tl_keyword contained tprint trace transpose tree
+syn keyword tl_keyword contained tree-begin tree-bind tree-case tree-clear
+syn keyword tl_keyword contained tree-delete tree-delete-node tree-find tree-insert
+syn keyword tl_keyword contained tree-insert-node tree-lookup tree-lookup-node tree-next
+syn keyword tl_keyword contained tree-peek tree-reset tree-root treep
+syn keyword tl_keyword contained trie-add trie-compress trie-lookup-begin trie-lookup-feed-char
+syn keyword tl_keyword contained trie-value-at trim-left trim-right trim-str
+syn keyword tl_keyword contained true trunc trunc-rem truncate-stream
+syn keyword tl_keyword contained tuples txr-case txr-exe-path txr-if
+syn keyword tl_keyword contained txr-parse txr-path txr-version txr-when
+syn keyword tl_keyword contained typecase typedef typeof typep
+syn keyword tl_keyword contained ubit uchar uid-t uint
+syn keyword tl_keyword contained uint-buf uint-carray uint-ptr-t uint16
+syn keyword tl_keyword contained uint32 uint64 uint8 ulong
+syn keyword tl_keyword contained ulonglong umask umeth umethod
+syn keyword tl_keyword contained uname unget-byte unget-char uni
+syn keyword tl_keyword contained unintern union union-get union-in
+syn keyword tl_keyword contained union-members union-out union-put uniq
+syn keyword tl_keyword contained unique unless unquote unsetenv
+syn keyword tl_keyword contained until until* untrace unuse-package
+syn keyword tl_keyword contained unuse-sym unwind-protect upcase-str upd
+syn keyword tl_keyword contained update uref url-decode url-encode
+syn keyword tl_keyword contained use use-package use-sym user-package
+syn keyword tl_keyword contained ushort usl usleep uslot
+syn keyword tl_keyword contained utimes val vdiscard vec
+syn keyword tl_keyword contained vec-carray vec-list vec-push vec-seq
+syn keyword tl_keyword contained vec-set-length vecref vector vector-list
+syn keyword tl_keyword contained vectorp veof veol veol2
+syn keyword tl_keyword contained verase vintr vkill vlnext
+syn keyword tl_keyword contained vm-fun-p vmin void vquit
+syn keyword tl_keyword contained vreprint vstart vstop vsusp
+syn keyword tl_keyword contained vswtc vt0 vt1 vtdly
+syn keyword tl_keyword contained vtime vwerase w-continued w-coredump
+syn keyword tl_keyword contained w-exitstatus w-ifcontinued w-ifexited w-ifsignaled
+syn keyword tl_keyword contained w-ifstopped w-nohang w-stopsig w-termsig
+syn keyword tl_keyword contained w-untraced wait wchar weave
+syn keyword tl_keyword contained when when-match whena whenlet
+syn keyword tl_keyword contained where while while* whilet
+syn keyword tl_keyword contained width width-check window-map window-mapdo
+syn keyword tl_keyword contained window-mappend wint-t with-clobber-expander with-compilation-unit
+syn keyword tl_keyword contained with-delete-expander with-dyn-lib with-gensyms with-hash-iter
+syn keyword tl_keyword contained with-in-buf-stream with-in-string-byte-stream with-in-string-stream with-objects
+syn keyword tl_keyword contained with-out-buf-stream with-out-string-stream with-out-strlist-stream with-resources
+syn keyword tl_keyword contained with-slots with-stream with-update-expander wrap
+syn keyword tl_keyword contained wrap* wstr wstr-d xcase
+syn keyword tl_keyword contained yield yield-from zap zarray
+syn keyword tl_keyword contained zchar zero-fill zerop zip
+syn keyword tl_keyword contained znew
syn match txr_nested_error "[^\t ]\+" contained
syn match txr_variable "\(@[ \t]*\)[*]\?[ \t]*[A-Za-z_][A-Za-z_0-9]*"
syn match txr_splicevar "@[ \t,*@]*[A-Za-z_][A-Za-z_0-9]*" contained
@@ -798,5 +801,5 @@ hi def link txr_jerr Error
let b:current_syntax = "lisp"
-set lispwords=ado,alet,align,alignof,ap,append-each,append-each*,append-each-prod,append-each-prod*,append-match-products,append-matches,aret,array,arraysize,assert,awk,bit,block,block*,bool,buf,buf-d,build,buildn,carray,caseq,caseq*,caseql,caseql*,casequal,casequal*,catch,catch*,catch**,collect-each,collect-each*,collect-each-prod,collect-each-prod*,compare-swap,compile-only,cond,conda,condlet,cptr,dec,defex,deffi,deffi-cb,deffi-cb-unsafe,deffi-sym,deffi-type,deffi-var,define-accessor,define-modify-macro,define-option-struct,define-param-expander,define-place-macro,defmacro,defmatch,defmeth,defpackage,defparm,defparml,defplace,defset,defstruct,defsymacro,defun,defun-match,defvar,defvarl,del,delay,do,dohash,doloop,doloop*,dotimes,each,each*,each-match,each-match-product,each-prod,each-prod*,elemsize,elemtype,enum,enumed,equot,eval-only,ffi,flet,flip,for,for*,fun,gen,go,gun,handle,handle*,handler-bind,hlet,hlet*,ido,if,if-match,ifa,iflet,ignerr,ignwarn,in-package,ip,json,keep-match-products,keep-matches,labels,lambda,lambda-match,lcons,ldo,let,let*,lnew*,load-for,load-time,lop,lset,mac-env-param-bind,mac-param-bind,macro-time,macrolet,match-case,mlet,new*,obtain,obtain*,obtain*-block,obtain-block,offsetof,op,pdec,pinc,placelet,placelet*,pop,pprof,prof,prog,prog*,prog1,prog2,progn,ptr,ptr-in,ptr-in-d,ptr-out,ptr-out-d,ptr-out-s,push,pushnew,ret,return,return-from,rlet,rslot,sbit,sizeof,slet,splice,struct,suspend,symacrolet,sys:abscond-from,sys:awk-fun-let,sys:awk-mac-let,sys:awk-redir,sys:blk,sys:catch,sys:conv,sys:dlib-expr,sys:dvbind,sys:each-op,sys:expr,sys:fbind,sys:fixed-point,sys:for-op,sys:l1-val,sys:lbind,sys:lisp1-value,sys:load-time-lit,sys:path-examine,sys:placelet-1,sys:rewrite-case,sys:splice,sys:struct-lit,sys:switch,sys:txr-case-impl,sys:unquote,sys:upenv,sys:var,sys:when-exprs-match,tagbody,tb,tc,test-clear,test-dec,test-inc,test-set,trace,tree-bind,tree-case,txr-case,txr-if,txr-when,typecase,typedef,ubit,union,unless,unquote,until,until*,untrace,unwind-protect,upd,uref,when,when-match,whena,whenlet,while,while*,whilet,with-clobber-expander,with-compilation-unit,with-delete-expander,with-dyn-lib,with-gensyms,with-hash-iter,with-in-buf-stream,with-in-string-byte-stream,with-in-string-stream,with-objects,with-out-buf-stream,with-out-string-stream,with-out-strlist-stream,with-resources,with-slots,with-stream,with-update-expander,yield,yield-from,zap,zarray,znew,:method,:function,:init,:postinit,:fini
+set lispwords=ado,alet,align,alignof,ap,append-each,append-each*,append-each-prod,append-each-prod*,append-match-products,append-matches,aret,array,arraysize,assert,awk,bit,block,block*,bool,buf,buf-d,build,buildn,carray,caseq,caseq*,caseql,caseql*,casequal,casequal*,catch,catch*,catch**,collect-each,collect-each*,collect-each-prod,collect-each-prod*,compare-swap,compile-only,cond,conda,condlet,cptr,dec,defex,deffi,deffi-cb,deffi-cb-unsafe,deffi-struct,deffi-sym,deffi-type,deffi-union,deffi-var,define-accessor,define-modify-macro,define-option-struct,define-param-expander,define-place-macro,defmacro,defmatch,defmeth,defpackage,defparm,defparml,defplace,defset,defstruct,defsymacro,defun,defun-match,defvar,defvarl,del,delay,do,dohash,doloop,doloop*,dotimes,each,each*,each-match,each-match-product,each-prod,each-prod*,elemsize,elemtype,enum,enumed,equot,eval-only,ffi,flet,flip,for,for*,fun,gen,go,gun,handle,handle*,handler-bind,hlet,hlet*,ido,if,if-match,ifa,iflet,ignerr,ignwarn,in-package,ip,json,keep-match-products,keep-matches,labels,lambda,lambda-match,lcons,ldo,let,let*,lnew*,load-for,load-time,lop,lset,mac-env-param-bind,mac-param-bind,macro-time,macrolet,match-case,mlet,new*,obtain,obtain*,obtain*-block,obtain-block,offsetof,op,pdec,pic,pinc,placelet,placelet*,pop,pprof,prof,prog,prog*,prog1,prog2,progn,ptr,ptr-in,ptr-in-d,ptr-out,ptr-out-d,ptr-out-s,push,pushnew,ret,return,return-from,rlet,rslot,sbit,sizeof,slet,splice,struct,suspend,symacrolet,sys:abscond-from,sys:awk-fun-let,sys:awk-mac-let,sys:awk-redir,sys:blk,sys:catch,sys:conv,sys:dlib-expr,sys:dvbind,sys:each-op,sys:expr,sys:fbind,sys:fixed-point,sys:for-op,sys:l1-val,sys:lbind,sys:lisp1-value,sys:load-time-lit,sys:path-examine,sys:placelet-1,sys:rewrite-case,sys:splice,sys:struct-lit,sys:switch,sys:txr-case-impl,sys:unquote,sys:upenv,sys:var,sys:when-exprs-match,tagbody,tb,tc,test-clear,test-dec,test-inc,test-set,trace,tree-bind,tree-case,txr-case,txr-if,txr-when,typecase,typedef,ubit,union,unless,unquote,until,until*,untrace,unwind-protect,upd,uref,when,when-match,whena,whenlet,while,while*,whilet,with-clobber-expander,with-compilation-unit,with-delete-expander,with-dyn-lib,with-gensyms,with-hash-iter,with-in-buf-stream,with-in-string-byte-stream,with-in-string-stream,with-objects,with-out-buf-stream,with-out-string-stream,with-out-strlist-stream,with-resources,with-slots,with-stream,with-update-expander,yield,yield-from,zap,zarray,znew,:method,:function,:init,:postinit,:fini
set comments=:\;\;\;,:\;\;,:\;
diff --git a/txr.1 b/txr.1
index 2fb9845c..87bb1a6d 100644
--- a/txr.1
+++ b/txr.1
@@ -430,9 +430,9 @@
.ds TX \f[B]TXR\f[]
.ds TL \f[B]TXR Lisp\f[]
.\" Start of man page:
-.TH TXR 1 2021-06-01 "Utility Commands" "TXR Programming Language" "Kaz Kylheku"
+.TH TXR 1 2021-06-11 "Utility Commands" "TXR Programming Language" "Kaz Kylheku"
.SH* NAME
-\*(TX \- Programming Language (Version 261)
+\*(TX \- Programming Language (Version 262)
.SH* SYNOPSIS
.mono
@@ -78620,7 +78620,7 @@ version 2, 3, 4 or 5, regardless of minor version.
Versions 252 through 259 produce version 6.0 files and loads only version 6,
regardless of minor version.
-Versions 260 and 261 produce version 7.0 files and loads
+Versions 260 through 262 produce version 7.0 files and loads
version 6 and 7, regardless of minor version. Version 261
introduces JSON
.code #J
diff --git a/txr.vim b/txr.vim
index c3c917ea..cc384457 100644
--- a/txr.vim
+++ b/txr.vim
@@ -28,218 +28,219 @@ syn keyword tl_keyword contained *listener-sel-inclusive-p* *load-path* *match-m
syn keyword tl_keyword contained *package* *package-alist* *param-macro* *place-clobber-expander*
syn keyword tl_keyword contained *place-delete-expander* *place-macro* *place-update-expander* *pprint-flo-format*
syn keyword tl_keyword contained *print-base* *print-circle* *print-flo-digits* *print-flo-format*
-syn keyword tl_keyword contained *print-flo-precision* *random-state* *random-warmup* *rec-source-loc*
-syn keyword tl_keyword contained *stddebug* *stderr* *stdin* *stdlog*
-syn keyword tl_keyword contained *stdnull* *stdout* *trace-output* *tree-fun-whitelist*
-syn keyword tl_keyword contained *txr-version* *unhandled-hook* + -
-syn keyword tl_keyword contained / /= : :abandoned
-syn keyword tl_keyword contained :addr :all :android :apf
-syn keyword tl_keyword contained :append :args :atime :auto
-syn keyword tl_keyword contained :awk-again :awk-file :awk-rec :begin
-syn keyword tl_keyword contained :begin-file :blksize :blocks :bool
-syn keyword tl_keyword contained :byte-oriented :cdigit :chars :cint
-syn keyword tl_keyword contained :close :continue :counter :cspace
-syn keyword tl_keyword contained :ctime :cword-char :cygnal :cygwin
-syn keyword tl_keyword contained :dec :decline :dev :digit
-syn keyword tl_keyword contained :downcase :end :end-file :env
-syn keyword tl_keyword contained :eq-based :eql-based :equal-based :explicit-no
-syn keyword tl_keyword contained :fallback :fd :fence :filter
-syn keyword tl_keyword contained :fini :finish :float :form
-syn keyword tl_keyword contained :from-current :from-end :from-start :from_html
-syn keyword tl_keyword contained :frombase64 :frombase64url :fromhtml :frompercent
-syn keyword tl_keyword contained :fromurl :fun :function :gap
-syn keyword tl_keyword contained :gid :greedy :hex :hextoint
-syn keyword tl_keyword contained :inf :init :ino :inp
-syn keyword tl_keyword contained :inputs :instance :into :key
-syn keyword tl_keyword contained :let :lfilt :lines :linux
-syn keyword tl_keyword contained :list :lists :local :longest
-syn keyword tl_keyword contained :macos :mandatory :match :maxgap
-syn keyword tl_keyword contained :maxtimes :method :mid :mingap
-syn keyword tl_keyword contained :mintimes :mode :mtime :name
-syn keyword tl_keyword contained :named :next-spec :nlink :nothrow
-syn keyword tl_keyword contained :oct :outf :outp :output
-syn keyword tl_keyword contained :owner :perms :postinit :prio
-syn keyword tl_keyword contained :rdev :real-time :reflect :repeat-spec
-syn keyword tl_keyword contained :resolve :rfilt :set :set-file
-syn keyword tl_keyword contained :shortest :size :solaris :solaris10
-syn keyword tl_keyword contained :space :static :str :string
-syn keyword tl_keyword contained :symacro :symlinks :text :times
-syn keyword tl_keyword contained :tlist :to_html :tobase64 :tobase64url
-syn keyword tl_keyword contained :tofloat :tohtml :tohtml* :toint
-syn keyword tl_keyword contained :tonumber :topercent :tourl :uid
-syn keyword tl_keyword contained :unknown :upcase :use :use-from
-syn keyword tl_keyword contained :use-syms :userdata :var :vars
-syn keyword tl_keyword contained :weak-keys :weak-vals :whole :word-char
-syn keyword tl_keyword contained :wrap < <= =
-syn keyword tl_keyword contained > >= abort abs
-syn keyword tl_keyword contained abs-path-p acons acons-new aconsql-new
-syn keyword tl_keyword contained acos acosh ado af-inet
-syn keyword tl_keyword contained af-inet6 af-unix af-unspec ai-addrconfig
-syn keyword tl_keyword contained ai-all ai-canonname ai-numerichost ai-numericserv
-syn keyword tl_keyword contained ai-passive ai-v4mapped alet align
-syn keyword tl_keyword contained alignof alist-nremove alist-remove all
-syn keyword tl_keyword contained allocate-struct and andf ap
-syn keyword tl_keyword contained apf append append* append-each
-syn keyword tl_keyword contained append-each* append-each-prod append-each-prod* append-match-products
-syn keyword tl_keyword contained append-matches apply aret array
-syn keyword tl_keyword contained arraysize ash asin asinh
-syn keyword tl_keyword contained assert assoc assq assql
-syn keyword tl_keyword contained at-exit-call at-exit-do-not-call atan atan2
-syn keyword tl_keyword contained atanh atom awk base-name
-syn keyword tl_keyword contained base64-decode base64-decode-buf base64-encode base64-stream-dec
-syn keyword tl_keyword contained base64-stream-enc base64url-decode base64url-decode-buf base64url-encode
-syn keyword tl_keyword contained base64url-stream-dec base64url-stream-enc bchar be-double
-syn keyword tl_keyword contained be-float be-int16 be-int32 be-int64
-syn keyword tl_keyword contained be-uint16 be-uint32 be-uint64 bignum-len
-syn keyword tl_keyword contained bignump bindable bit bitset
-syn keyword tl_keyword contained blkcnt-t blksize-t block block*
-syn keyword tl_keyword contained bool boundp bracket break-str
-syn keyword tl_keyword contained brkint bs0 bs1 bsdly
-syn keyword tl_keyword contained bstr bstr-d buf buf-alloc-size
-syn keyword tl_keyword contained buf-carray buf-d buf-get-char buf-get-cptr
-syn keyword tl_keyword contained buf-get-double buf-get-float buf-get-i16 buf-get-i32
-syn keyword tl_keyword contained buf-get-i64 buf-get-i8 buf-get-int buf-get-long
-syn keyword tl_keyword contained buf-get-short buf-get-u16 buf-get-u32 buf-get-u64
-syn keyword tl_keyword contained buf-get-u8 buf-get-uchar buf-get-uint buf-get-ulong
-syn keyword tl_keyword contained buf-get-ushort buf-int buf-list buf-put-buf
-syn keyword tl_keyword contained buf-put-char buf-put-cptr buf-put-double buf-put-float
-syn keyword tl_keyword contained buf-put-i16 buf-put-i32 buf-put-i64 buf-put-i8
-syn keyword tl_keyword contained buf-put-int buf-put-long buf-put-short buf-put-u16
-syn keyword tl_keyword contained buf-put-u32 buf-put-u64 buf-put-u8 buf-put-uchar
-syn keyword tl_keyword contained buf-put-uint buf-put-ulong buf-put-ushort buf-set-length
-syn keyword tl_keyword contained buf-str buf-trim buf-uint bufp
-syn keyword tl_keyword contained build build-list buildn butlast
-syn keyword tl_keyword contained butlastn caaaaar caaaadr caaaar
-syn keyword tl_keyword contained caaadar caaaddr caaadr caaar
-syn keyword tl_keyword contained caadaar caadadr caadar caaddar
-syn keyword tl_keyword contained caadddr caaddr caadr caar
-syn keyword tl_keyword contained cadaaar cadaadr cadaar cadadar
-syn keyword tl_keyword contained cadaddr cadadr cadar caddaar
-syn keyword tl_keyword contained caddadr caddar cadddar caddddr
-syn keyword tl_keyword contained cadddr caddr cadr call
-syn keyword tl_keyword contained call-clobber-expander call-delete-expander call-finalizers call-super-fun
-syn keyword tl_keyword contained call-super-method call-update-expander callf car
-syn keyword tl_keyword contained carray carray-blank carray-buf carray-buf-sync
-syn keyword tl_keyword contained carray-cptr carray-dup carray-free carray-get
-syn keyword tl_keyword contained carray-getz carray-int carray-list carray-own
-syn keyword tl_keyword contained carray-pun carray-put carray-putz carray-ref
-syn keyword tl_keyword contained carray-refset carray-replace carray-set-length carray-sub
-syn keyword tl_keyword contained carray-type carray-uint carray-vec carrayp
-syn keyword tl_keyword contained caseq caseq* caseql caseql*
-syn keyword tl_keyword contained casequal casequal* cat-str cat-streams
-syn keyword tl_keyword contained cat-vec catch catch* catch**
-syn keyword tl_keyword contained catenated-stream-p catenated-stream-push cbaud cbaudex
-syn keyword tl_keyword contained cdaaaar cdaaadr cdaaar cdaadar
-syn keyword tl_keyword contained cdaaddr cdaadr cdaar cdadaar
-syn keyword tl_keyword contained cdadadr cdadar cdaddar cdadddr
-syn keyword tl_keyword contained cdaddr cdadr cdar cddaaar
-syn keyword tl_keyword contained cddaadr cddaar cddadar cddaddr
-syn keyword tl_keyword contained cddadr cddar cdddaar cdddadr
-syn keyword tl_keyword contained cdddar cddddar cdddddr cddddr
-syn keyword tl_keyword contained cdddr cddr cdr ceil
-syn keyword tl_keyword contained ceil-rem chain chand char
-syn keyword tl_keyword contained chdir chmod chmod-rec chown
-syn keyword tl_keyword contained chown-rec chr-digit chr-int chr-isalnum
-syn keyword tl_keyword contained chr-isalpha chr-isascii chr-isblank chr-iscntrl
-syn keyword tl_keyword contained chr-isdigit chr-isgraph chr-islower chr-isprint
-syn keyword tl_keyword contained chr-ispunct chr-isspace chr-isunisp chr-isupper
-syn keyword tl_keyword contained chr-isxdigit chr-num chr-str chr-str-set
-syn keyword tl_keyword contained chr-tolower chr-toupper chr-xdigit chrp
-syn keyword tl_keyword contained clamp clear-dirty clear-error clear-struct
-syn keyword tl_keyword contained clearhash clocal clock-t clockid-t
-syn keyword tl_keyword contained close close-stream closedir closelog
-syn keyword tl_keyword contained closure cmp-str cmspar coded-length
-syn keyword tl_keyword contained collect-each collect-each* collect-each-prod collect-each-prod*
-syn keyword tl_keyword contained comb command-get command-get-buf command-get-json
-syn keyword tl_keyword contained command-get-jsons command-get-lines command-get-string command-put
-syn keyword tl_keyword contained command-put-buf command-put-json command-put-jsons command-put-lines
-syn keyword tl_keyword contained command-put-string compare-swap compile compile-defr-warning
-syn keyword tl_keyword contained compile-error compile-file compile-only compile-toplevel
-syn keyword tl_keyword contained compile-update-file compile-warning compl-span-str cond
-syn keyword tl_keyword contained conda condlet cons conses
-syn keyword tl_keyword contained conses* consp constantp contain[s]
-syn keyword tl_keyword contained copy copy-alist copy-buf copy-carray
-syn keyword tl_keyword contained copy-cons copy-file copy-files copy-fun
-syn keyword tl_keyword contained copy-hash copy-list copy-path-rec copy-search-tree
-syn keyword tl_keyword contained copy-str copy-struct copy-tnode copy-tree
-syn keyword tl_keyword contained copy-tree-iter copy-vec cos cosh
-syn keyword tl_keyword contained count-if count-until-match countq countql
-syn keyword tl_keyword contained countqual cptr cptr-buf cptr-cast
-syn keyword tl_keyword contained cptr-free cptr-get cptr-int cptr-null
-syn keyword tl_keyword contained cptr-obj cptr-out cptr-size-hint cptr-type
-syn keyword tl_keyword contained cptr-zap cptrp cr0 cr1
-syn keyword tl_keyword contained cr2 cr3 crc32 crc32-stream
-syn keyword tl_keyword contained crdly cread crtscts crypt
-syn keyword tl_keyword contained cs5 cs6 cs7 cs8
-syn keyword tl_keyword contained csize cstopb cum-norm-dist daemon
-syn keyword tl_keyword contained dec defer-warning defex deffi
-syn keyword tl_keyword contained deffi-cb deffi-cb-unsafe deffi-sym deffi-type
-syn keyword tl_keyword contained deffi-var define-accessor define-modify-macro define-option-struct
-syn keyword tl_keyword contained define-param-expander define-place-macro defmacro defmatch
-syn keyword tl_keyword contained defmeth defpackage defparm defparml
-syn keyword tl_keyword contained defplace defset defstruct defsymacro
-syn keyword tl_keyword contained defun defun-match defvar defvarl
-syn keyword tl_keyword contained del delay delete-package dev-t
-syn keyword tl_keyword contained diff digits digpow dir-name
-syn keyword tl_keyword contained dirstat disassemble display-width divides
-syn keyword tl_keyword contained dlclose dlopen dlsym dlsym-checked
-syn keyword tl_keyword contained dlvsym dlvsym-checked do doc
-syn keyword tl_keyword contained dohash doloop doloop* dotimes
-syn keyword tl_keyword contained double downcase-str drop drop-until
-syn keyword tl_keyword contained drop-while dt-blk dt-chr dt-dir
-syn keyword tl_keyword contained dt-fifo dt-lnk dt-reg dt-sock
-syn keyword tl_keyword contained dt-unknown dump-compiled-objects dump-deferred-warnings dup
-syn keyword tl_keyword contained dupfd dwim e2big eacces
-syn keyword tl_keyword contained each each* each-match each-match-product
-syn keyword tl_keyword contained each-prod each-prod* eaddrinuse eaddrnotavail
-syn keyword tl_keyword contained eafnosupport eagain ealready ebadf
-syn keyword tl_keyword contained ebadmsg ebusy ecanceled echild
-syn keyword tl_keyword contained echo echoctl echoe echok
-syn keyword tl_keyword contained echoke echonl echoprt econnaborted
-syn keyword tl_keyword contained econnrefused econnreset edeadlk edestaddrreq
-syn keyword tl_keyword contained edom edquot eexist efault
-syn keyword tl_keyword contained efbig ehostunreach eidrm eighth
-syn keyword tl_keyword contained eilseq einprogress eintr einval
-syn keyword tl_keyword contained eio eisconn eisdir elemsize
-syn keyword tl_keyword contained elemtype eloop emfile emlink
-syn keyword tl_keyword contained empty emsgsize emultihop enametoolong
-syn keyword tl_keyword contained endgrent endp endpwent ends-with
-syn keyword tl_keyword contained enetdown enetreset enetunreach enfile
-syn keyword tl_keyword contained enobufs enodata enodev enoent
-syn keyword tl_keyword contained enoexec enolck enolink enomem
-syn keyword tl_keyword contained enomsg enoprotoopt enospc enosr
-syn keyword tl_keyword contained enostr enosys enotconn enotdir
-syn keyword tl_keyword contained enotempty enotrecoverable enotsock enotsup
-syn keyword tl_keyword contained enotty ensure-dir enum enumed
-syn keyword tl_keyword contained env env-fbind env-fbindings env-hash
-syn keyword tl_keyword contained env-next env-vbind env-vbindings enxio
-syn keyword tl_keyword contained eopnotsupp eoverflow eownerdead eperm
-syn keyword tl_keyword contained epipe eproto eprotonosupport eprototype
-syn keyword tl_keyword contained eq eql equal equot
-syn keyword tl_keyword contained erange erofs errno error
-syn keyword tl_keyword contained espipe esrch estale etime
-syn keyword tl_keyword contained etimedout etxtbsy eval eval-only
-syn keyword tl_keyword contained evenp ewouldblock exception-subtype-map exception-subtype-p
-syn keyword tl_keyword contained exdev exec exit exit*
-syn keyword tl_keyword contained exp expand expand* expand-left
-syn keyword tl_keyword contained expand-right expand-with-free-refs expt exptmod
-syn keyword tl_keyword contained extproc f$ f-dupfd f-dupfd-cloexec
-syn keyword tl_keyword contained f-getfd f-getfl f-getlk f-rdlck
-syn keyword tl_keyword contained f-setfd f-setfl f-setlk f-setlkw
-syn keyword tl_keyword contained f-unlck f-wrlck f^ f^$
-syn keyword tl_keyword contained false fboundp fcntl fd-cloexec
-syn keyword tl_keyword contained ff0 ff1 ffdly ffi
-syn keyword tl_keyword contained ffi-alignof ffi-arraysize ffi-call ffi-elemsize
-syn keyword tl_keyword contained ffi-elemtype ffi-get ffi-in ffi-make-call-desc
-syn keyword tl_keyword contained ffi-make-closure ffi-offsetof ffi-out ffi-put
-syn keyword tl_keyword contained ffi-put-into ffi-size ffi-type-compile ffi-type-operator-p
-syn keyword tl_keyword contained ffi-type-p ffi-typedef fifth file-append
-syn keyword tl_keyword contained file-append-buf file-append-json file-append-jsons file-append-lines
-syn keyword tl_keyword contained file-append-string file-get file-get-buf file-get-json
-syn keyword tl_keyword contained file-get-jsons file-get-lines file-get-string file-place-buf
-syn keyword tl_keyword contained file-put file-put-buf file-put-json file-put-jsons
-syn keyword tl_keyword contained file-put-lines file-put-string fileno fill-buf
-syn keyword tl_keyword contained fill-buf-adjust fill-carray fill-obj filter-equal
+syn keyword tl_keyword contained *print-flo-precision* *random-state* *random-warmup* *read-unknown-structs*
+syn keyword tl_keyword contained *rec-source-loc* *stddebug* *stderr* *stdin*
+syn keyword tl_keyword contained *stdlog* *stdnull* *stdout* *trace-output*
+syn keyword tl_keyword contained *tree-fun-whitelist* *txr-version* *unhandled-hook* +
+syn keyword tl_keyword contained - / /= :
+syn keyword tl_keyword contained :abandoned :addr :all :android
+syn keyword tl_keyword contained :apf :append :args :atime
+syn keyword tl_keyword contained :auto :awk-again :awk-file :awk-rec
+syn keyword tl_keyword contained :begin :begin-file :blksize :blocks
+syn keyword tl_keyword contained :bool :byte-oriented :cdigit :chars
+syn keyword tl_keyword contained :cint :close :continue :counter
+syn keyword tl_keyword contained :cspace :ctime :cword-char :cygnal
+syn keyword tl_keyword contained :cygwin :dec :decline :dev
+syn keyword tl_keyword contained :digit :downcase :end :end-file
+syn keyword tl_keyword contained :env :eq-based :eql-based :equal-based
+syn keyword tl_keyword contained :explicit-no :fallback :fd :fence
+syn keyword tl_keyword contained :filter :fini :finish :float
+syn keyword tl_keyword contained :form :from-current :from-end :from-start
+syn keyword tl_keyword contained :from_html :frombase64 :frombase64url :fromhtml
+syn keyword tl_keyword contained :frompercent :fromurl :fun :function
+syn keyword tl_keyword contained :gap :gid :greedy :hex
+syn keyword tl_keyword contained :hextoint :inf :init :ino
+syn keyword tl_keyword contained :inp :inputs :instance :into
+syn keyword tl_keyword contained :key :let :lfilt :lines
+syn keyword tl_keyword contained :linux :list :lists :local
+syn keyword tl_keyword contained :longest :macos :mandatory :match
+syn keyword tl_keyword contained :maxgap :maxtimes :method :mid
+syn keyword tl_keyword contained :mingap :mintimes :mode :mtime
+syn keyword tl_keyword contained :name :named :next-spec :nlink
+syn keyword tl_keyword contained :nothrow :oct :outf :outp
+syn keyword tl_keyword contained :output :owner :perms :postinit
+syn keyword tl_keyword contained :prio :rdev :real-time :reflect
+syn keyword tl_keyword contained :repeat-spec :resolve :rfilt :set
+syn keyword tl_keyword contained :set-file :shortest :size :solaris
+syn keyword tl_keyword contained :solaris10 :space :static :str
+syn keyword tl_keyword contained :string :symacro :symlinks :text
+syn keyword tl_keyword contained :times :tlist :to_html :tobase64
+syn keyword tl_keyword contained :tobase64url :tofloat :tohtml :tohtml*
+syn keyword tl_keyword contained :toint :tonumber :topercent :tourl
+syn keyword tl_keyword contained :uid :unknown :upcase :use
+syn keyword tl_keyword contained :use-from :use-syms :userdata :var
+syn keyword tl_keyword contained :vars :weak-keys :weak-vals :whole
+syn keyword tl_keyword contained :word-char :wrap < <=
+syn keyword tl_keyword contained = > >= abort
+syn keyword tl_keyword contained abs abs-path-p acons acons-new
+syn keyword tl_keyword contained aconsql-new acos acosh ado
+syn keyword tl_keyword contained af-inet af-inet6 af-unix af-unspec
+syn keyword tl_keyword contained ai-addrconfig ai-all ai-canonname ai-numerichost
+syn keyword tl_keyword contained ai-numericserv ai-passive ai-v4mapped alet
+syn keyword tl_keyword contained align alignof alist-nremove alist-remove
+syn keyword tl_keyword contained all allocate-struct and andf
+syn keyword tl_keyword contained ap apf append append*
+syn keyword tl_keyword contained append-each append-each* append-each-prod append-each-prod*
+syn keyword tl_keyword contained append-match-products append-matches apply aret
+syn keyword tl_keyword contained array arraysize ash asin
+syn keyword tl_keyword contained asinh assert assoc assq
+syn keyword tl_keyword contained assql at-exit-call at-exit-do-not-call atan
+syn keyword tl_keyword contained atan2 atanh atom awk
+syn keyword tl_keyword contained base-name base64-decode base64-decode-buf base64-encode
+syn keyword tl_keyword contained base64-stream-dec base64-stream-enc base64url-decode base64url-decode-buf
+syn keyword tl_keyword contained base64url-encode base64url-stream-dec base64url-stream-enc bchar
+syn keyword tl_keyword contained be-double be-float be-int16 be-int32
+syn keyword tl_keyword contained be-int64 be-uint16 be-uint32 be-uint64
+syn keyword tl_keyword contained bignum-len bignump bindable bit
+syn keyword tl_keyword contained bitset blkcnt-t blksize-t block
+syn keyword tl_keyword contained block* bool boundp bracket
+syn keyword tl_keyword contained break-str brkint bs0 bs1
+syn keyword tl_keyword contained bsdly bstr bstr-d buf
+syn keyword tl_keyword contained buf-alloc-size buf-carray buf-d buf-get-char
+syn keyword tl_keyword contained buf-get-cptr buf-get-double buf-get-float buf-get-i16
+syn keyword tl_keyword contained buf-get-i32 buf-get-i64 buf-get-i8 buf-get-int
+syn keyword tl_keyword contained buf-get-long buf-get-short buf-get-u16 buf-get-u32
+syn keyword tl_keyword contained buf-get-u64 buf-get-u8 buf-get-uchar buf-get-uint
+syn keyword tl_keyword contained buf-get-ulong buf-get-ushort buf-int buf-list
+syn keyword tl_keyword contained buf-put-buf buf-put-char buf-put-cptr buf-put-double
+syn keyword tl_keyword contained buf-put-float buf-put-i16 buf-put-i32 buf-put-i64
+syn keyword tl_keyword contained buf-put-i8 buf-put-int buf-put-long buf-put-short
+syn keyword tl_keyword contained buf-put-u16 buf-put-u32 buf-put-u64 buf-put-u8
+syn keyword tl_keyword contained buf-put-uchar buf-put-uint buf-put-ulong buf-put-ushort
+syn keyword tl_keyword contained buf-set-length buf-str buf-trim buf-uint
+syn keyword tl_keyword contained bufp build build-list buildn
+syn keyword tl_keyword contained butlast butlastn caaaaar caaaadr
+syn keyword tl_keyword contained caaaar caaadar caaaddr caaadr
+syn keyword tl_keyword contained caaar caadaar caadadr caadar
+syn keyword tl_keyword contained caaddar caadddr caaddr caadr
+syn keyword tl_keyword contained caar cadaaar cadaadr cadaar
+syn keyword tl_keyword contained cadadar cadaddr cadadr cadar
+syn keyword tl_keyword contained caddaar caddadr caddar cadddar
+syn keyword tl_keyword contained caddddr cadddr caddr cadr
+syn keyword tl_keyword contained call call-clobber-expander call-delete-expander call-finalizers
+syn keyword tl_keyword contained call-super-fun call-super-method call-update-expander callf
+syn keyword tl_keyword contained car carray carray-blank carray-buf
+syn keyword tl_keyword contained carray-buf-sync carray-cptr carray-dup carray-free
+syn keyword tl_keyword contained carray-get carray-getz carray-int carray-list
+syn keyword tl_keyword contained carray-own carray-pun carray-put carray-putz
+syn keyword tl_keyword contained carray-ref carray-refset carray-replace carray-set-length
+syn keyword tl_keyword contained carray-sub carray-type carray-uint carray-vec
+syn keyword tl_keyword contained carrayp caseq caseq* caseql
+syn keyword tl_keyword contained caseql* casequal casequal* cat-str
+syn keyword tl_keyword contained cat-streams cat-vec catch catch*
+syn keyword tl_keyword contained catch** catenated-stream-p catenated-stream-push cbaud
+syn keyword tl_keyword contained cbaudex cdaaaar cdaaadr cdaaar
+syn keyword tl_keyword contained cdaadar cdaaddr cdaadr cdaar
+syn keyword tl_keyword contained cdadaar cdadadr cdadar cdaddar
+syn keyword tl_keyword contained cdadddr cdaddr cdadr cdar
+syn keyword tl_keyword contained cddaaar cddaadr cddaar cddadar
+syn keyword tl_keyword contained cddaddr cddadr cddar cdddaar
+syn keyword tl_keyword contained cdddadr cdddar cddddar cdddddr
+syn keyword tl_keyword contained cddddr cdddr cddr cdr
+syn keyword tl_keyword contained ceil ceil-rem chain chand
+syn keyword tl_keyword contained char chdir chmod chmod-rec
+syn keyword tl_keyword contained chown chown-rec chr-digit chr-int
+syn keyword tl_keyword contained chr-isalnum chr-isalpha chr-isascii chr-isblank
+syn keyword tl_keyword contained chr-iscntrl chr-isdigit chr-isgraph chr-islower
+syn keyword tl_keyword contained chr-isprint chr-ispunct chr-isspace chr-isunisp
+syn keyword tl_keyword contained chr-isupper chr-isxdigit chr-num chr-str
+syn keyword tl_keyword contained chr-str-set chr-tolower chr-toupper chr-xdigit
+syn keyword tl_keyword contained chrp clamp clear-dirty clear-error
+syn keyword tl_keyword contained clear-struct clearhash clocal clock-t
+syn keyword tl_keyword contained clockid-t close close-stream closedir
+syn keyword tl_keyword contained closelog closure cmp-str cmspar
+syn keyword tl_keyword contained coded-length collect-each collect-each* collect-each-prod
+syn keyword tl_keyword contained collect-each-prod* comb command-get command-get-buf
+syn keyword tl_keyword contained command-get-json command-get-jsons command-get-lines command-get-string
+syn keyword tl_keyword contained command-put command-put-buf command-put-json command-put-jsons
+syn keyword tl_keyword contained command-put-lines command-put-string compare-swap compile
+syn keyword tl_keyword contained compile-defr-warning compile-error compile-file compile-only
+syn keyword tl_keyword contained compile-toplevel compile-update-file compile-warning compl-span-str
+syn keyword tl_keyword contained cond conda condlet cons
+syn keyword tl_keyword contained conses conses* consp constantp
+syn keyword tl_keyword contained contain[s] copy copy-alist copy-buf
+syn keyword tl_keyword contained copy-carray copy-cons copy-file copy-files
+syn keyword tl_keyword contained copy-fun copy-hash copy-list copy-path-rec
+syn keyword tl_keyword contained copy-search-tree copy-str copy-struct copy-tnode
+syn keyword tl_keyword contained copy-tree copy-tree-iter copy-vec cos
+syn keyword tl_keyword contained cosh count-if count-until-match countq
+syn keyword tl_keyword contained countql countqual cptr cptr-buf
+syn keyword tl_keyword contained cptr-cast cptr-free cptr-get cptr-int
+syn keyword tl_keyword contained cptr-null cptr-obj cptr-out cptr-size-hint
+syn keyword tl_keyword contained cptr-type cptr-zap cptrp cr0
+syn keyword tl_keyword contained cr1 cr2 cr3 crc32
+syn keyword tl_keyword contained crc32-stream crdly cread crtscts
+syn keyword tl_keyword contained crypt cs5 cs6 cs7
+syn keyword tl_keyword contained cs8 csize cstopb cum-norm-dist
+syn keyword tl_keyword contained daemon dec defer-warning defex
+syn keyword tl_keyword contained deffi deffi-cb deffi-cb-unsafe deffi-struct
+syn keyword tl_keyword contained deffi-sym deffi-type deffi-union deffi-var
+syn keyword tl_keyword contained define-accessor define-modify-macro define-option-struct define-param-expander
+syn keyword tl_keyword contained define-place-macro defmacro defmatch defmeth
+syn keyword tl_keyword contained defpackage defparm defparml defplace
+syn keyword tl_keyword contained defset defstruct defsymacro defun
+syn keyword tl_keyword contained defun-match defvar defvarl del
+syn keyword tl_keyword contained delay delete-package dev-t diff
+syn keyword tl_keyword contained digits digpow dir-name dirstat
+syn keyword tl_keyword contained disassemble display-width divides dlclose
+syn keyword tl_keyword contained dlopen dlsym dlsym-checked dlvsym
+syn keyword tl_keyword contained dlvsym-checked do doc dohash
+syn keyword tl_keyword contained doloop doloop* dotimes double
+syn keyword tl_keyword contained downcase-str drop drop-until drop-while
+syn keyword tl_keyword contained dt-blk dt-chr dt-dir dt-fifo
+syn keyword tl_keyword contained dt-lnk dt-reg dt-sock dt-unknown
+syn keyword tl_keyword contained dump-compiled-objects dump-deferred-warnings dup dupfd
+syn keyword tl_keyword contained dwim e2big eacces each
+syn keyword tl_keyword contained each* each-match each-match-product each-prod
+syn keyword tl_keyword contained each-prod* eaddrinuse eaddrnotavail eafnosupport
+syn keyword tl_keyword contained eagain ealready ebadf ebadmsg
+syn keyword tl_keyword contained ebusy ecanceled echild echo
+syn keyword tl_keyword contained echoctl echoe echok echoke
+syn keyword tl_keyword contained echonl echoprt econnaborted econnrefused
+syn keyword tl_keyword contained econnreset edeadlk edestaddrreq edom
+syn keyword tl_keyword contained edquot eexist efault efbig
+syn keyword tl_keyword contained ehostunreach eidrm eighth eilseq
+syn keyword tl_keyword contained einprogress eintr einval eio
+syn keyword tl_keyword contained eisconn eisdir elemsize elemtype
+syn keyword tl_keyword contained eloop emfile emlink empty
+syn keyword tl_keyword contained emsgsize emultihop enametoolong endgrent
+syn keyword tl_keyword contained endp endpwent ends-with enetdown
+syn keyword tl_keyword contained enetreset enetunreach enfile enobufs
+syn keyword tl_keyword contained enodata enodev enoent enoexec
+syn keyword tl_keyword contained enolck enolink enomem enomsg
+syn keyword tl_keyword contained enoprotoopt enospc enosr enostr
+syn keyword tl_keyword contained enosys enotconn enotdir enotempty
+syn keyword tl_keyword contained enotrecoverable enotsock enotsup enotty
+syn keyword tl_keyword contained ensure-dir enum enumed env
+syn keyword tl_keyword contained env-fbind env-fbindings env-hash env-next
+syn keyword tl_keyword contained env-vbind env-vbindings enxio eopnotsupp
+syn keyword tl_keyword contained eoverflow eownerdead eperm epipe
+syn keyword tl_keyword contained eproto eprotonosupport eprototype eq
+syn keyword tl_keyword contained eql equal equot erange
+syn keyword tl_keyword contained erofs errno error espipe
+syn keyword tl_keyword contained esrch estale etime etimedout
+syn keyword tl_keyword contained etxtbsy eval eval-only evenp
+syn keyword tl_keyword contained ewouldblock exception-subtype-map exception-subtype-p exdev
+syn keyword tl_keyword contained exec exit exit* exp
+syn keyword tl_keyword contained expand expand* expand-left expand-right
+syn keyword tl_keyword contained expand-with-free-refs expt exptmod extproc
+syn keyword tl_keyword contained f$ f-dupfd f-dupfd-cloexec f-getfd
+syn keyword tl_keyword contained f-getfl f-getlk f-rdlck f-setfd
+syn keyword tl_keyword contained f-setfl f-setlk f-setlkw f-unlck
+syn keyword tl_keyword contained f-wrlck f^ f^$ false
+syn keyword tl_keyword contained fboundp fcntl fd-cloexec ff0
+syn keyword tl_keyword contained ff1 ffdly ffi ffi-alignof
+syn keyword tl_keyword contained ffi-arraysize ffi-call ffi-elemsize ffi-elemtype
+syn keyword tl_keyword contained ffi-get ffi-in ffi-make-call-desc ffi-make-closure
+syn keyword tl_keyword contained ffi-offsetof ffi-out ffi-put ffi-put-into
+syn keyword tl_keyword contained ffi-size ffi-type-compile ffi-type-operator-p ffi-type-p
+syn keyword tl_keyword contained ffi-typedef fifth file-append file-append-buf
+syn keyword tl_keyword contained file-append-json file-append-jsons file-append-lines file-append-string
+syn keyword tl_keyword contained file-get file-get-buf file-get-json file-get-jsons
+syn keyword tl_keyword contained file-get-lines file-get-string file-place-buf file-put
+syn keyword tl_keyword contained file-put-buf file-put-json file-put-jsons file-put-lines
+syn keyword tl_keyword contained file-put-string fileno fill-buf fill-buf-adjust
+syn keyword tl_keyword contained fill-carray fill-obj fill-vec filter-equal
syn keyword tl_keyword contained filter-string-tree finalize find find-frame
syn keyword tl_keyword contained find-frames find-frames-by-mask find-if find-max
syn keyword tl_keyword contained find-min find-package find-struct-type find-symbol
@@ -396,155 +397,156 @@ syn keyword tl_keyword contained path-newer path-older path-pipe-p path-private-
syn keyword tl_keyword contained path-read-writable-to-me-p path-readable-to-me-p path-same-object path-sep-chars
syn keyword tl_keyword contained path-setgid-p path-setuid-p path-sock-p path-sticky-p
syn keyword tl_keyword contained path-strictly-private-to-me-p path-symlink-p path-writable-to-me-p pdec
-syn keyword tl_keyword contained pendin perm pid-t pinc
-syn keyword tl_keyword contained pipe place-form-p placelet placelet*
-syn keyword tl_keyword contained plist-to-alist plusp poll poll-err
-syn keyword tl_keyword contained poll-in poll-nval poll-out poll-pri
-syn keyword tl_keyword contained poll-rdband poll-rdhup poll-wrband poly
-syn keyword tl_keyword contained pop portable-abs-path-p pos pos-if
-syn keyword tl_keyword contained pos-max pos-min posq posql
-syn keyword tl_keyword contained posqual pppred ppred pprinl
-syn keyword tl_keyword contained pprint pprof pred prinl
-syn keyword tl_keyword contained print prod prof prog
-syn keyword tl_keyword contained prog* prog1 prog2 progn
-syn keyword tl_keyword contained promisep prop proper-list-p proper-listp
-syn keyword tl_keyword contained pset ptr ptr-in ptr-in-d
-syn keyword tl_keyword contained ptr-out ptr-out-d ptr-out-s ptrdiff-t
-syn keyword tl_keyword contained pub:txr-sym pure-rel-path-p purge-deferred-warning push
-syn keyword tl_keyword contained pushhash pushnew put-buf put-byte
-syn keyword tl_keyword contained put-carray put-char put-json put-jsonl
-syn keyword tl_keyword contained put-jsons put-line put-lines put-obj
-syn keyword tl_keyword contained put-string put-strings pwd qquote
-syn keyword tl_keyword contained qref quip quote r$
-syn keyword tl_keyword contained r^ r^$ raise rand
-syn keyword tl_keyword contained random random-fixnum random-float random-state-get-vec
-syn keyword tl_keyword contained random-state-p range range* range-regex
-syn keyword tl_keyword contained rangep rassoc rassq rassql
-syn keyword tl_keyword contained rcomb rcons read read-until-match
-syn keyword tl_keyword contained readdir readlink real-time-stream-p realpath
-syn keyword tl_keyword contained record-adapter reduce-left reduce-right ref
-syn keyword tl_keyword contained refset regex-compile regex-from-trie regex-parse
-syn keyword tl_keyword contained regex-prefix-match regex-source regexp register-exception-subtypes
-syn keyword tl_keyword contained register-tentative-def regsub rehome-sym reject
-syn keyword tl_keyword contained rel-path relate release-deferred-warnings remhash
-syn keyword tl_keyword contained remove-if remove-if* remove-path remove-path-rec
-syn keyword tl_keyword contained remq remq* remql remql*
-syn keyword tl_keyword contained remqual remqual* rename-path repeat
-syn keyword tl_keyword contained replace replace-buf replace-list replace-str
-syn keyword tl_keyword contained replace-struct replace-tree-iter replace-vec reset-struct
-syn keyword tl_keyword contained rest ret retf return
-syn keyword tl_keyword contained return* return-from revappend reverse
-syn keyword tl_keyword contained rfind rfind-if right rlcp
-syn keyword tl_keyword contained rlcp-tree rlet rlist rlist*
-syn keyword tl_keyword contained rmdir rmember rmember-if rmemq
-syn keyword tl_keyword contained rmemql rmemqual rmismatch rotate
-syn keyword tl_keyword contained round round-rem rperm rplaca
-syn keyword tl_keyword contained rplacd rpoly rpos rpos-if
-syn keyword tl_keyword contained rposq rposql rposqual rr
-syn keyword tl_keyword contained rra rsearch rslot rtld-deepbind
-syn keyword tl_keyword contained rtld-global rtld-lazy rtld-local rtld-nodelete
-syn keyword tl_keyword contained rtld-noload rtld-now run s-ifblk
-syn keyword tl_keyword contained s-ifchr s-ifdir s-ififo s-iflnk
-syn keyword tl_keyword contained s-ifmt s-ifreg s-ifsock s-irgrp
-syn keyword tl_keyword contained s-iroth s-irusr s-irwxg s-irwxo
-syn keyword tl_keyword contained s-irwxu s-isgid s-isuid s-isvtx
-syn keyword tl_keyword contained s-iwgrp s-iwoth s-iwusr s-ixgrp
-syn keyword tl_keyword contained s-ixoth s-ixusr save-exe sbit
-syn keyword tl_keyword contained scan-until-match search search-regex search-regst
-syn keyword tl_keyword contained search-str search-str-tree second seek-cur
-syn keyword tl_keyword contained seek-end seek-set seek-stream select
-syn keyword tl_keyword contained self-load-path self-path seq-begin seq-next
-syn keyword tl_keyword contained seq-reset seqp set set-diff
-syn keyword tl_keyword contained set-hash-userdata set-indent set-indent-mode set-key
-syn keyword tl_keyword contained set-left set-max-depth set-max-length set-package-fallback-list
-syn keyword tl_keyword contained set-right set-sig-handler setegid setenv
-syn keyword tl_keyword contained seteuid setgid setgrent setgroups
-syn keyword tl_keyword contained sethash setitimer setlogmask setpwent
-syn keyword tl_keyword contained setresgid setresuid setuid seventh
-syn keyword tl_keyword contained sh sha256 sha256-begin sha256-end
-syn keyword tl_keyword contained sha256-hash sha256-stream shift short
-syn keyword tl_keyword contained shuffle shut-rd shut-rdwr shut-wr
-syn keyword tl_keyword contained sig-abrt sig-alrm sig-atomic-t sig-bus
-syn keyword tl_keyword contained sig-check sig-chld sig-cont sig-fpe
-syn keyword tl_keyword contained sig-hup sig-ill sig-int sig-io
-syn keyword tl_keyword contained sig-iot sig-kill sig-pipe sig-poll
-syn keyword tl_keyword contained sig-prof sig-pwr sig-quit sig-segv
-syn keyword tl_keyword contained sig-stkflt sig-stop sig-sys sig-term
-syn keyword tl_keyword contained sig-trap sig-tstp sig-ttin sig-ttou
-syn keyword tl_keyword contained sig-urg sig-usr1 sig-usr2 sig-vtalrm
-syn keyword tl_keyword contained sig-winch sig-xcpu sig-xfsz sign-extend
-syn keyword tl_keyword contained signum sin sinh sixth
-syn keyword tl_keyword contained size-t size-vec sizeof slet
-syn keyword tl_keyword contained slot slotp slots slotset
-syn keyword tl_keyword contained sock-accept sock-bind sock-cloexec sock-connect
-syn keyword tl_keyword contained sock-dgram sock-family sock-listen sock-nonblock
-syn keyword tl_keyword contained sock-peer sock-recv-timeout sock-send-timeout sock-set-peer
-syn keyword tl_keyword contained sock-shutdown sock-stream sock-type some
-syn keyword tl_keyword contained sort sort-group source-loc source-loc-str
-syn keyword tl_keyword contained span-str special-operator-p special-var-p spl
-syn keyword tl_keyword contained splice split split* split-str
-syn keyword tl_keyword contained split-str-set sqrt square ssize-t
-syn keyword tl_keyword contained sspl sssucc ssucc starts-with
-syn keyword tl_keyword contained stat static-slot static-slot-ensure static-slot-home
-syn keyword tl_keyword contained static-slot-p static-slot-set stdlib str
-syn keyword tl_keyword contained str-buf str-d str-in6addr str-in6addr-net
-syn keyword tl_keyword contained str-inaddr str-inaddr-net str-seq str<
-syn keyword tl_keyword contained str<= str= str> str>=
-syn keyword tl_keyword contained stream-get-prop stream-set-prop streamp strerror
-syn keyword tl_keyword contained string-extend string-lt stringp strsignal
-syn keyword tl_keyword contained struct struct-from-args struct-from-plist struct-get-initfun
-syn keyword tl_keyword contained struct-get-postinitfun struct-set-initfun struct-set-postinitfun struct-type
-syn keyword tl_keyword contained struct-type-name struct-type-p structp sub
-syn keyword tl_keyword contained sub-buf sub-list sub-str sub-tree
-syn keyword tl_keyword contained sub-vec subtypep succ sum
-syn keyword tl_keyword contained super super-method suspend swap
-syn keyword tl_keyword contained symacrolet symbol-function symbol-macro symbol-name
-syn keyword tl_keyword contained symbol-package symbol-value symbolp symdiff
-syn keyword tl_keyword contained symlink sys:%backpatch-high16% sys:%backpatch-low16% sys:%big-endian%
-syn keyword tl_keyword contained sys:%bin-op% sys:%bin-ops% sys:%block-using-funs% sys:%call-op%
-syn keyword tl_keyword contained sys:%const-foldable% sys:%const-foldable-funs% sys:%dbg-command-env% sys:%effect-free%
-syn keyword tl_keyword contained sys:%effect-free-funs% sys:%file-suff-rx% sys:%functional% sys:%functional-funs%
-syn keyword tl_keyword contained sys:%gcall-op% sys:%lev-bits% sys:%lev-size% sys:%max-lambda-fixed-args%
-syn keyword tl_keyword contained sys:%max-lev% sys:%max-lev-idx% sys:%max-sm-lev% sys:%max-sm-lev-idx%
-syn keyword tl_keyword contained sys:%max-v-lev% sys:%nary-ops% sys:%oc-code% sys:%oc-hash%
-syn keyword tl_keyword contained sys:%oc-list-builder% sys:%package-manip% sys:%param-info% sys:%quip-rand-state%
-syn keyword tl_keyword contained sys:%quips% sys:%shuffled-quips% sys:%sm-lev-bits% sys:%sm-lev-size%
-syn keyword tl_keyword contained sys:%test-funs% sys:%test-funs-neg% sys:%test-funs-ops% sys:%test-funs-pos%
-syn keyword tl_keyword contained sys:%test-inv% sys:%test-opcode% sys:%tlo-ver% sys:*dedup*
-syn keyword tl_keyword contained sys:*emit* sys:*eval* sys:*in-compilation-unit* sys:*load-recursive*
-syn keyword tl_keyword contained sys:*load-time* sys:*match-form* sys:*op-ctx* sys:*pl-env*
-syn keyword tl_keyword contained sys:*pl-form* sys:*trace-hash* sys:*trace-level* sys:*unchecked-calls*
-syn keyword tl_keyword contained sys:abscond* sys:abscond-from sys:analyze-argtypes sys:analyze-params
-syn keyword tl_keyword contained sys:apply sys:asm-error sys:assumed-fun sys:awk%--rng
-syn keyword tl_keyword contained sys:awk%--rng+ sys:awk%--rng- sys:awk%-rng+ sys:awk%rng+
-syn keyword tl_keyword contained sys:awk-code-move-check sys:awk-error sys:awk-expander sys:awk-fun-let
-syn keyword tl_keyword contained sys:awk-fun-shadowing-env sys:awk-mac-let sys:awk-redir sys:awk-test
-syn keyword tl_keyword contained sys:b* sys:b+ sys:b- sys:b/
-syn keyword tl_keyword contained sys:b< sys:b<= sys:b= sys:b=>
-syn keyword tl_keyword contained sys:b> sys:bad-slot-syntax sys:bind-mac-check sys:bind-mac-error
-syn keyword tl_keyword contained sys:bindable-check sys:bits sys:bits-to-obj sys:blk
-syn keyword tl_keyword contained sys:build-expander sys:build-key-list-expr sys:capture-cont sys:catch
-syn keyword tl_keyword contained sys:check sys:check-end sys:check-slot sys:check-struct
-syn keyword tl_keyword contained sys:check-sym sys:circref sys:compat sys:compile-and-match
-syn keyword tl_keyword contained sys:compile-as-match sys:compile-atom-match sys:compile-cons-structure sys:compile-exprs-match
-syn keyword tl_keyword contained sys:compile-file-conditionally sys:compile-hash-match sys:compile-loop-match sys:compile-match
-syn keyword tl_keyword contained sys:compile-new-var-match sys:compile-not-match sys:compile-or-match sys:compile-predicate-match
-syn keyword tl_keyword contained sys:compile-range-match sys:compile-require-match sys:compile-scan-match sys:compile-struct-match
-syn keyword tl_keyword contained sys:compile-var-match sys:compile-vec-match sys:compile-with-match sys:compiler-emit-warnings
-syn keyword tl_keyword contained sys:conv sys:conv-expand sys:conv-let sys:ctx-form
-syn keyword tl_keyword contained sys:ctx-name sys:dbg-all sys:dbg-backtrace sys:dbg-clear
-syn keyword tl_keyword contained sys:dbg-enable sys:dbg-restore sys:dbg-set sys:dbg-step
-syn keyword tl_keyword contained sys:debugger sys:dedup sys:dedup-labels sys:deffi-cb-expander
-syn keyword tl_keyword contained sys:define-method sys:defset-expander sys:defset-expander-simple sys:dig
-syn keyword tl_keyword contained sys:disassemble-cdf sys:dlib-expr sys:do-conv sys:do-copy-obj
-syn keyword tl_keyword contained sys:do-path-test sys:do-tweak-obj sys:doc-syms sys:dump-to-tlo
-syn keyword tl_keyword contained sys:dvbind sys:dwim-del sys:dwim-set sys:dyn-size
-syn keyword tl_keyword contained sys:each-match-expander sys:each-op sys:early-peephole sys:enc-small-op
-syn keyword tl_keyword contained sys:ensure-op-arg sys:env-to-let sys:eq-comparable sys:eql-comparable
-syn keyword tl_keyword contained sys:eval-err sys:expand-and sys:expand-bind-mac-params sys:expand-defmacro
-syn keyword tl_keyword contained sys:expand-defsymacro sys:expand-defun sys:expand-defvarl sys:expand-dohash
-syn keyword tl_keyword contained sys:expand-doloop sys:expand-each sys:expand-each-prod sys:expand-each-prod*
-syn keyword tl_keyword contained sys:expand-handle sys:expand-lambda-match sys:expand-params sys:expand-quasi
+syn keyword tl_keyword contained pendin perm pic pid-t
+syn keyword tl_keyword contained pinc pipe place-form-p placelet
+syn keyword tl_keyword contained placelet* plist-to-alist plusp poll
+syn keyword tl_keyword contained poll-err poll-in poll-nval poll-out
+syn keyword tl_keyword contained poll-pri poll-rdband poll-rdhup poll-wrband
+syn keyword tl_keyword contained poly pop portable-abs-path-p pos
+syn keyword tl_keyword contained pos-if pos-max pos-min posq
+syn keyword tl_keyword contained posql posqual pppred ppred
+syn keyword tl_keyword contained pprinl pprint pprof pred
+syn keyword tl_keyword contained prinl print prod prof
+syn keyword tl_keyword contained prog prog* prog1 prog2
+syn keyword tl_keyword contained progn promisep prop proper-list-p
+syn keyword tl_keyword contained proper-listp pset ptr ptr-in
+syn keyword tl_keyword contained ptr-in-d ptr-out ptr-out-d ptr-out-s
+syn keyword tl_keyword contained ptrdiff-t pub:txr-sym pure-rel-path-p purge-deferred-warning
+syn keyword tl_keyword contained push pushhash pushnew put-buf
+syn keyword tl_keyword contained put-byte put-carray put-char put-json
+syn keyword tl_keyword contained put-jsonl put-jsons put-line put-lines
+syn keyword tl_keyword contained put-obj put-string put-strings pwd
+syn keyword tl_keyword contained qquote qref quip quote
+syn keyword tl_keyword contained r$ r^ r^$ raise
+syn keyword tl_keyword contained rand random random-fixnum random-float
+syn keyword tl_keyword contained random-state-get-vec random-state-p range range*
+syn keyword tl_keyword contained range-regex rangep rassoc rassq
+syn keyword tl_keyword contained rassql rcomb rcons read
+syn keyword tl_keyword contained read-until-match readdir readlink real-time-stream-p
+syn keyword tl_keyword contained realpath record-adapter reduce-left reduce-right
+syn keyword tl_keyword contained ref refset regex-compile regex-from-trie
+syn keyword tl_keyword contained regex-parse regex-prefix-match regex-source regexp
+syn keyword tl_keyword contained register-exception-subtypes register-tentative-def regsub rehome-sym
+syn keyword tl_keyword contained reject rel-path relate release-deferred-warnings
+syn keyword tl_keyword contained remhash remove-if remove-if* remove-path
+syn keyword tl_keyword contained remove-path-rec remq remq* remql
+syn keyword tl_keyword contained remql* remqual remqual* rename-path
+syn keyword tl_keyword contained repeat replace replace-buf replace-list
+syn keyword tl_keyword contained replace-str replace-struct replace-tree-iter replace-vec
+syn keyword tl_keyword contained reset-struct rest ret retf
+syn keyword tl_keyword contained return return* return-from revappend
+syn keyword tl_keyword contained reverse rfind rfind-if right
+syn keyword tl_keyword contained rlcp rlcp-tree rlet rlist
+syn keyword tl_keyword contained rlist* rmdir rmember rmember-if
+syn keyword tl_keyword contained rmemq rmemql rmemqual rmismatch
+syn keyword tl_keyword contained rotate round round-rem rperm
+syn keyword tl_keyword contained rplaca rplacd rpoly rpos
+syn keyword tl_keyword contained rpos-if rposq rposql rposqual
+syn keyword tl_keyword contained rr rra rsearch rslot
+syn keyword tl_keyword contained rtld-deepbind rtld-global rtld-lazy rtld-local
+syn keyword tl_keyword contained rtld-nodelete rtld-noload rtld-now run
+syn keyword tl_keyword contained s-ifblk s-ifchr s-ifdir s-ififo
+syn keyword tl_keyword contained s-iflnk s-ifmt s-ifreg s-ifsock
+syn keyword tl_keyword contained s-irgrp s-iroth s-irusr s-irwxg
+syn keyword tl_keyword contained s-irwxo s-irwxu s-isgid s-isuid
+syn keyword tl_keyword contained s-isvtx s-iwgrp s-iwoth s-iwusr
+syn keyword tl_keyword contained s-ixgrp s-ixoth s-ixusr save-exe
+syn keyword tl_keyword contained sbit scan-until-match search search-regex
+syn keyword tl_keyword contained search-regst search-str search-str-tree second
+syn keyword tl_keyword contained seek-cur seek-end seek-set seek-stream
+syn keyword tl_keyword contained select self-load-path self-path seq-begin
+syn keyword tl_keyword contained seq-next seq-reset seqp set
+syn keyword tl_keyword contained set-diff set-hash-userdata set-indent set-indent-mode
+syn keyword tl_keyword contained set-key set-left set-max-depth set-max-length
+syn keyword tl_keyword contained set-package-fallback-list set-right set-sig-handler setegid
+syn keyword tl_keyword contained setenv seteuid setgid setgrent
+syn keyword tl_keyword contained setgroups sethash setitimer setlogmask
+syn keyword tl_keyword contained setpwent setresgid setresuid setuid
+syn keyword tl_keyword contained seventh sh sha256 sha256-begin
+syn keyword tl_keyword contained sha256-end sha256-hash sha256-stream shift
+syn keyword tl_keyword contained short shuffle shut-rd shut-rdwr
+syn keyword tl_keyword contained shut-wr sig-abrt sig-alrm sig-atomic-t
+syn keyword tl_keyword contained sig-bus sig-check sig-chld sig-cont
+syn keyword tl_keyword contained sig-fpe sig-hup sig-ill sig-int
+syn keyword tl_keyword contained sig-io sig-iot sig-kill sig-pipe
+syn keyword tl_keyword contained sig-poll sig-prof sig-pwr sig-quit
+syn keyword tl_keyword contained sig-segv sig-stkflt sig-stop sig-sys
+syn keyword tl_keyword contained sig-term sig-trap sig-tstp sig-ttin
+syn keyword tl_keyword contained sig-ttou sig-urg sig-usr1 sig-usr2
+syn keyword tl_keyword contained sig-vtalrm sig-winch sig-xcpu sig-xfsz
+syn keyword tl_keyword contained sign-extend signum sin sinh
+syn keyword tl_keyword contained sixth size-t size-vec sizeof
+syn keyword tl_keyword contained slet slot slotp slots
+syn keyword tl_keyword contained slotset sock-accept sock-bind sock-cloexec
+syn keyword tl_keyword contained sock-connect sock-dgram sock-family sock-listen
+syn keyword tl_keyword contained sock-nonblock sock-peer sock-recv-timeout sock-send-timeout
+syn keyword tl_keyword contained sock-set-peer sock-shutdown sock-stream sock-type
+syn keyword tl_keyword contained some sort sort-group source-loc
+syn keyword tl_keyword contained source-loc-str span-str special-operator-p special-var-p
+syn keyword tl_keyword contained spl splice split split*
+syn keyword tl_keyword contained split-str split-str-set sqrt square
+syn keyword tl_keyword contained ssize-t sspl sssucc ssucc
+syn keyword tl_keyword contained starts-with stat static-slot static-slot-ensure
+syn keyword tl_keyword contained static-slot-home static-slot-p static-slot-set stdlib
+syn keyword tl_keyword contained str str-buf str-d str-in6addr
+syn keyword tl_keyword contained str-in6addr-net str-inaddr str-inaddr-net str-seq
+syn keyword tl_keyword contained str< str<= str= str>
+syn keyword tl_keyword contained str>= stream-get-prop stream-set-prop streamp
+syn keyword tl_keyword contained strerror string-extend string-lt stringp
+syn keyword tl_keyword contained strsignal struct struct-from-args struct-from-plist
+syn keyword tl_keyword contained struct-get-initfun struct-get-postinitfun struct-set-initfun struct-set-postinitfun
+syn keyword tl_keyword contained struct-type struct-type-name struct-type-p structp
+syn keyword tl_keyword contained sub sub-buf sub-list sub-str
+syn keyword tl_keyword contained sub-tree sub-vec subtypep succ
+syn keyword tl_keyword contained sum super super-method suspend
+syn keyword tl_keyword contained swap symacrolet symbol-function symbol-macro
+syn keyword tl_keyword contained symbol-name symbol-package symbol-value symbolp
+syn keyword tl_keyword contained symdiff symlink sys:%backpatch-high16% sys:%backpatch-low16%
+syn keyword tl_keyword contained sys:%big-endian% sys:%bin-op% sys:%bin-ops% sys:%block-using-funs%
+syn keyword tl_keyword contained sys:%call-op% sys:%const-foldable% sys:%const-foldable-funs% sys:%dbg-command-env%
+syn keyword tl_keyword contained sys:%effect-free% sys:%effect-free-funs% sys:%file-suff-rx% sys:%functional%
+syn keyword tl_keyword contained sys:%functional-funs% sys:%gcall-op% sys:%lev-bits% sys:%lev-size%
+syn keyword tl_keyword contained sys:%max-lambda-fixed-args% sys:%max-lev% sys:%max-lev-idx% sys:%max-sm-lev%
+syn keyword tl_keyword contained sys:%max-sm-lev-idx% sys:%max-v-lev% sys:%nary-ops% sys:%oc-code%
+syn keyword tl_keyword contained sys:%oc-hash% sys:%oc-list-builder% sys:%package-manip% sys:%param-info%
+syn keyword tl_keyword contained sys:%quip-rand-state% sys:%quips% sys:%shuffled-quips% sys:%sm-lev-bits%
+syn keyword tl_keyword contained sys:%sm-lev-size% sys:%test-funs% sys:%test-funs-neg% sys:%test-funs-ops%
+syn keyword tl_keyword contained sys:%test-funs-pos% sys:%test-inv% sys:%test-opcode% sys:%tlo-ver%
+syn keyword tl_keyword contained sys:*dedup* sys:*emit* sys:*eval* sys:*in-compilation-unit*
+syn keyword tl_keyword contained sys:*load-recursive* sys:*load-time* sys:*match-form* sys:*op-ctx*
+syn keyword tl_keyword contained sys:*pl-env* sys:*pl-form* sys:*trace-hash* sys:*trace-level*
+syn keyword tl_keyword contained sys:*unchecked-calls* sys:abscond* sys:abscond-from sys:analyze-argtypes
+syn keyword tl_keyword contained sys:analyze-params sys:apply sys:asm-error sys:assumed-fun
+syn keyword tl_keyword contained sys:awk%--rng sys:awk%--rng+ sys:awk%--rng- sys:awk%-rng+
+syn keyword tl_keyword contained sys:awk%rng+ sys:awk-code-move-check sys:awk-error sys:awk-expander
+syn keyword tl_keyword contained sys:awk-fun-let sys:awk-fun-shadowing-env sys:awk-mac-let sys:awk-redir
+syn keyword tl_keyword contained sys:awk-test sys:b* sys:b+ sys:b-
+syn keyword tl_keyword contained sys:b/ sys:b< sys:b<= sys:b=
+syn keyword tl_keyword contained sys:b=> sys:b> sys:bad-slot-syntax sys:bind-mac-check
+syn keyword tl_keyword contained sys:bind-mac-error sys:bindable-check sys:bits sys:bits-to-obj
+syn keyword tl_keyword contained sys:blk sys:build-expander sys:build-key-list-expr sys:capture-cont
+syn keyword tl_keyword contained sys:catch sys:check sys:check-end sys:check-slot
+syn keyword tl_keyword contained sys:check-struct sys:check-sym sys:circref sys:compat
+syn keyword tl_keyword contained sys:compile-and-match sys:compile-as-match sys:compile-atom-match sys:compile-cons-structure
+syn keyword tl_keyword contained sys:compile-exprs-match sys:compile-file-conditionally sys:compile-hash-match sys:compile-loop-match
+syn keyword tl_keyword contained sys:compile-match sys:compile-new-var-match sys:compile-not-match sys:compile-or-match
+syn keyword tl_keyword contained sys:compile-predicate-match sys:compile-range-match sys:compile-require-match sys:compile-scan-match
+syn keyword tl_keyword contained sys:compile-struct-match sys:compile-var-match sys:compile-vec-match sys:compile-with-match
+syn keyword tl_keyword contained sys:compiler-emit-warnings sys:conv sys:conv-expand sys:conv-let
+syn keyword tl_keyword contained sys:ctx-form sys:ctx-name sys:dbg-all sys:dbg-backtrace
+syn keyword tl_keyword contained sys:dbg-clear sys:dbg-enable sys:dbg-restore sys:dbg-set
+syn keyword tl_keyword contained sys:dbg-step sys:debugger sys:dedup sys:dedup-labels
+syn keyword tl_keyword contained sys:deffi-cb-expander sys:define-method sys:defset-expander sys:defset-expander-simple
+syn keyword tl_keyword contained sys:dig sys:disassemble-cdf sys:dlib-expr sys:do-conv
+syn keyword tl_keyword contained sys:do-copy-obj sys:do-path-test sys:do-tweak-obj sys:doc-syms
+syn keyword tl_keyword contained sys:dump-to-tlo sys:dvbind sys:dwim-del sys:dwim-set
+syn keyword tl_keyword contained sys:dyn-size sys:each-match-expander sys:each-op sys:early-peephole
+syn keyword tl_keyword contained sys:enc-small-op sys:ensure-op-arg sys:env-to-let sys:eq-comparable
+syn keyword tl_keyword contained sys:eql-comparable sys:eval-err sys:expand-and sys:expand-bind-mac-params
+syn keyword tl_keyword contained sys:expand-defmacro sys:expand-defsymacro sys:expand-defun sys:expand-defvarl
+syn keyword tl_keyword contained sys:expand-dohash sys:expand-doloop sys:expand-each sys:expand-each-prod
+syn keyword tl_keyword contained sys:expand-each-prod* sys:expand-handle sys:expand-lambda-match sys:expand-params
+syn keyword tl_keyword contained sys:expand-pic sys:expand-pic-align sys:expand-pic-num sys:expand-quasi
syn keyword tl_keyword contained sys:expand-quasi-args sys:expand-quasi-match sys:expand-quasi-mods sys:expand-sym-ref
syn keyword tl_keyword contained sys:expr sys:extract-keys sys:extract-keys-p sys:fbind
syn keyword tl_keyword contained sys:fixed-point sys:flatten-or sys:fmt-flex sys:fmt-join
@@ -564,96 +566,97 @@ syn keyword tl_keyword contained sys:op-meta-p sys:op-rec-p sys:open-compile-str
syn keyword tl_keyword contained sys:operand-to-exp sys:operand-to-sym sys:opip-expand sys:opt-dash
syn keyword tl_keyword contained sys:opt-err sys:os-symbol sys:param-check sys:parse-compound-operand
syn keyword tl_keyword contained sys:parse-lambda-match-clause sys:parse-operand sys:pat-len sys:path-access
-syn keyword tl_keyword contained sys:path-examine sys:path-test-mode sys:path-test-type sys:pl-expand
-syn keyword tl_keyword contained sys:placelet-1 sys:print-backtrace sys:propagate-ancestor sys:propagate-perms
-syn keyword tl_keyword contained sys:prune-missing-inits sys:qquote sys:quasi sys:quasilist
-syn keyword tl_keyword contained sys:r-s-let-expander sys:reduce-constant sys:reduce-lisp sys:reduce-or
-syn keyword tl_keyword contained sys:reg-expand-nongreedy sys:reg-optimize sys:register-opcode sys:register-simple-accessor
-syn keyword tl_keyword contained sys:repl sys:rewrite sys:rewrite-case sys:rplaca
-syn keyword tl_keyword contained sys:rplacd sys:rslotset sys:rt-assert-fail sys:rt-defmacro
-syn keyword tl_keyword contained sys:rt-defsymacro sys:rt-defun sys:rt-defv sys:rt-defvarl
-syn keyword tl_keyword contained sys:rt-load-for sys:rt-pprof sys:set-hash-traversal-limit sys:set-macro-ancestor
-syn keyword tl_keyword contained sys:setq sys:setqf sys:simplify-or sys:slot-types
-syn keyword tl_keyword contained sys:small-op-p sys:small-op-to-sym sys:splice sys:static-slot-types
-syn keyword tl_keyword contained sys:str-inaddr-net-impl sys:struct-lit sys:subst sys:subst-preserve
-syn keyword tl_keyword contained sys:switch sys:sym-clobber-expander sys:sym-delete-expander sys:sym-update-expander
-syn keyword tl_keyword contained sys:system-symbol-p sys:top-fb sys:top-mb sys:top-vb
-syn keyword tl_keyword contained sys:tr* sys:trace sys:trace-canonicalize-name sys:trace-enter
-syn keyword tl_keyword contained sys:trace-leave sys:trace-redefine-check sys:tree-construct sys:trfm
-syn keyword tl_keyword contained sys:true-const-p sys:try-load sys:txr-case-impl sys:unquote
-syn keyword tl_keyword contained sys:untrace sys:upenv sys:uw-block sys:uw-captured-block
-syn keyword tl_keyword contained sys:uw-catch sys:uw-cont-copy sys:uw-eval sys:uw-expand
-syn keyword tl_keyword contained sys:uw-fcall sys:uw-guard sys:uw-handle sys:uw-menv
-syn keyword tl_keyword contained sys:var sys:var-pat-p sys:vars-check sys:vm-closure-desc
-syn keyword tl_keyword contained sys:vm-closure-entry sys:vm-desc-bytecode sys:vm-desc-datavec sys:vm-desc-nlevels
-syn keyword tl_keyword contained sys:vm-desc-nregs sys:vm-desc-symvec sys:vm-execute-toplevel sys:vm-make-desc
-syn keyword tl_keyword contained sys:wdwrap sys:when-exprs-match sys:with-dyn-lib-check syslog
-syn keyword tl_keyword contained system-package t tab0 tab1
-syn keyword tl_keyword contained tab2 tab3 tabdly tagbody
-syn keyword tl_keyword contained tailp take take-until take-while
-syn keyword tl_keyword contained tan tanh tb tc
-syn keyword tl_keyword contained tcdrain tcflow tcflush tcgetattr
-syn keyword tl_keyword contained tciflush tcioff tcioflush tcion
-syn keyword tl_keyword contained tcoflush tcooff tcoon tcsadrain
-syn keyword tl_keyword contained tcsaflush tcsanow tcsendbreak tcsetattr
-syn keyword tl_keyword contained tentative-def-exists tenth test-clear test-clear-dirty
-syn keyword tl_keyword contained test-dec test-dirty test-inc test-neq-set-indent-mode
-syn keyword tl_keyword contained test-set test-set-indent-mode tf third
-syn keyword tl_keyword contained throw throwf time time-fields-local
-syn keyword tl_keyword contained time-fields-utc time-nsec time-parse time-parse-local
-syn keyword tl_keyword contained time-parse-utc time-string-local time-string-utc time-struct-local
-syn keyword tl_keyword contained time-struct-utc time-t time-usec tmpfile
-syn keyword tl_keyword contained tnode to tofloat tofloatz
-syn keyword tl_keyword contained toint tointz tojson tok
-syn keyword tl_keyword contained tok-str tok-where tostop tostring
-syn keyword tl_keyword contained tostringp touch tprint trace
-syn keyword tl_keyword contained transpose tree tree-begin tree-bind
-syn keyword tl_keyword contained tree-case tree-clear tree-delete tree-delete-node
-syn keyword tl_keyword contained tree-find tree-insert tree-insert-node tree-lookup
-syn keyword tl_keyword contained tree-lookup-node tree-next tree-peek tree-reset
-syn keyword tl_keyword contained tree-root treep trie-add trie-compress
-syn keyword tl_keyword contained trie-lookup-begin trie-lookup-feed-char trie-value-at trim-left
-syn keyword tl_keyword contained trim-right trim-str true trunc
-syn keyword tl_keyword contained trunc-rem truncate-stream tuples txr-case
-syn keyword tl_keyword contained txr-exe-path txr-if txr-parse txr-path
-syn keyword tl_keyword contained txr-version txr-when typecase typedef
-syn keyword tl_keyword contained typeof typep ubit uchar
-syn keyword tl_keyword contained uid-t uint uint-buf uint-carray
-syn keyword tl_keyword contained uint-ptr-t uint16 uint32 uint64
-syn keyword tl_keyword contained uint8 ulong ulonglong umask
-syn keyword tl_keyword contained umeth umethod uname unget-byte
-syn keyword tl_keyword contained unget-char uni unintern union
-syn keyword tl_keyword contained union-get union-in union-members union-out
-syn keyword tl_keyword contained union-put uniq unique unless
-syn keyword tl_keyword contained unquote unsetenv until until*
-syn keyword tl_keyword contained untrace unuse-package unuse-sym unwind-protect
-syn keyword tl_keyword contained upcase-str upd update uref
-syn keyword tl_keyword contained url-decode url-encode use use-package
-syn keyword tl_keyword contained use-sym user-package ushort usl
-syn keyword tl_keyword contained usleep uslot utimes val
-syn keyword tl_keyword contained vdiscard vec vec-carray vec-list
-syn keyword tl_keyword contained vec-push vec-seq vec-set-length vecref
-syn keyword tl_keyword contained vector vector-list vectorp veof
-syn keyword tl_keyword contained veol veol2 verase vintr
-syn keyword tl_keyword contained vkill vlnext vm-fun-p vmin
-syn keyword tl_keyword contained void vquit vreprint vstart
-syn keyword tl_keyword contained vstop vsusp vswtc vt0
-syn keyword tl_keyword contained vt1 vtdly vtime vwerase
-syn keyword tl_keyword contained w-continued w-coredump w-exitstatus w-ifcontinued
-syn keyword tl_keyword contained w-ifexited w-ifsignaled w-ifstopped w-nohang
-syn keyword tl_keyword contained w-stopsig w-termsig w-untraced wait
-syn keyword tl_keyword contained wchar weave when when-match
-syn keyword tl_keyword contained whena whenlet where while
-syn keyword tl_keyword contained while* whilet width width-check
-syn keyword tl_keyword contained window-map window-mapdo window-mappend wint-t
-syn keyword tl_keyword contained with-clobber-expander with-compilation-unit with-delete-expander with-dyn-lib
-syn keyword tl_keyword contained with-gensyms with-hash-iter with-in-buf-stream with-in-string-byte-stream
-syn keyword tl_keyword contained with-in-string-stream with-objects with-out-buf-stream with-out-string-stream
-syn keyword tl_keyword contained with-out-strlist-stream with-resources with-slots with-stream
-syn keyword tl_keyword contained with-update-expander wrap wrap* wstr
-syn keyword tl_keyword contained wstr-d xcase yield yield-from
-syn keyword tl_keyword contained zap zarray zchar zero-fill
-syn keyword tl_keyword contained zerop zip znew
+syn keyword tl_keyword contained sys:path-examine sys:path-test-mode sys:path-test-type sys:pic-join-opt
+syn keyword tl_keyword contained sys:pl-expand sys:placelet-1 sys:print-backtrace sys:propagate-ancestor
+syn keyword tl_keyword contained sys:propagate-perms sys:prune-missing-inits sys:qquote sys:quasi
+syn keyword tl_keyword contained sys:quasilist sys:r-s-let-expander sys:reduce-constant sys:reduce-lisp
+syn keyword tl_keyword contained sys:reduce-or sys:reg-expand-nongreedy sys:reg-optimize sys:register-opcode
+syn keyword tl_keyword contained sys:register-simple-accessor sys:repl sys:rewrite sys:rewrite-case
+syn keyword tl_keyword contained sys:rplaca sys:rplacd sys:rslotset sys:rt-assert-fail
+syn keyword tl_keyword contained sys:rt-defmacro sys:rt-defsymacro sys:rt-defun sys:rt-defv
+syn keyword tl_keyword contained sys:rt-defvarl sys:rt-load-for sys:rt-pprof sys:set-hash-traversal-limit
+syn keyword tl_keyword contained sys:set-macro-ancestor sys:setq sys:setqf sys:simplify-or
+syn keyword tl_keyword contained sys:slot-types sys:small-op-p sys:small-op-to-sym sys:splice
+syn keyword tl_keyword contained sys:static-slot-types sys:str-inaddr-net-impl sys:struct-lit sys:subst
+syn keyword tl_keyword contained sys:subst-preserve sys:switch sys:sym-clobber-expander sys:sym-delete-expander
+syn keyword tl_keyword contained sys:sym-update-expander sys:system-symbol-p sys:top-fb sys:top-mb
+syn keyword tl_keyword contained sys:top-vb sys:tr* sys:trace sys:trace-canonicalize-name
+syn keyword tl_keyword contained sys:trace-enter sys:trace-leave sys:trace-redefine-check sys:transform-qquote
+syn keyword tl_keyword contained sys:tree-construct sys:trfm sys:true-const-p sys:try-load
+syn keyword tl_keyword contained sys:txr-case-impl sys:unquote sys:untrace sys:upenv
+syn keyword tl_keyword contained sys:uw-block sys:uw-captured-block sys:uw-catch sys:uw-cont-copy
+syn keyword tl_keyword contained sys:uw-eval sys:uw-expand sys:uw-fcall sys:uw-guard
+syn keyword tl_keyword contained sys:uw-handle sys:uw-menv sys:var sys:var-pat-p
+syn keyword tl_keyword contained sys:vars-check sys:vm-closure-desc sys:vm-closure-entry sys:vm-desc-bytecode
+syn keyword tl_keyword contained sys:vm-desc-datavec sys:vm-desc-nlevels sys:vm-desc-nregs sys:vm-desc-symvec
+syn keyword tl_keyword contained sys:vm-execute-toplevel sys:vm-make-desc sys:wdwrap sys:when-exprs-match
+syn keyword tl_keyword contained sys:with-dyn-lib-check syslog system-package t
+syn keyword tl_keyword contained tab0 tab1 tab2 tab3
+syn keyword tl_keyword contained tabdly tagbody tailp take
+syn keyword tl_keyword contained take-until take-while tan tanh
+syn keyword tl_keyword contained tb tc tcdrain tcflow
+syn keyword tl_keyword contained tcflush tcgetattr tciflush tcioff
+syn keyword tl_keyword contained tcioflush tcion tcoflush tcooff
+syn keyword tl_keyword contained tcoon tcsadrain tcsaflush tcsanow
+syn keyword tl_keyword contained tcsendbreak tcsetattr tentative-def-exists tenth
+syn keyword tl_keyword contained test-clear test-clear-dirty test-dec test-dirty
+syn keyword tl_keyword contained test-inc test-neq-set-indent-mode test-set test-set-indent-mode
+syn keyword tl_keyword contained tf third throw throwf
+syn keyword tl_keyword contained time time-fields-local time-fields-utc time-nsec
+syn keyword tl_keyword contained time-parse time-parse-local time-parse-utc time-string-local
+syn keyword tl_keyword contained time-string-utc time-struct-local time-struct-utc time-t
+syn keyword tl_keyword contained time-usec tmpfile tnode to
+syn keyword tl_keyword contained tofloat tofloatz toint tointz
+syn keyword tl_keyword contained tojson tok tok-str tok-where
+syn keyword tl_keyword contained tostop tostring tostringp touch
+syn keyword tl_keyword contained tprint trace transpose tree
+syn keyword tl_keyword contained tree-begin tree-bind tree-case tree-clear
+syn keyword tl_keyword contained tree-delete tree-delete-node tree-find tree-insert
+syn keyword tl_keyword contained tree-insert-node tree-lookup tree-lookup-node tree-next
+syn keyword tl_keyword contained tree-peek tree-reset tree-root treep
+syn keyword tl_keyword contained trie-add trie-compress trie-lookup-begin trie-lookup-feed-char
+syn keyword tl_keyword contained trie-value-at trim-left trim-right trim-str
+syn keyword tl_keyword contained true trunc trunc-rem truncate-stream
+syn keyword tl_keyword contained tuples txr-case txr-exe-path txr-if
+syn keyword tl_keyword contained txr-parse txr-path txr-version txr-when
+syn keyword tl_keyword contained typecase typedef typeof typep
+syn keyword tl_keyword contained ubit uchar uid-t uint
+syn keyword tl_keyword contained uint-buf uint-carray uint-ptr-t uint16
+syn keyword tl_keyword contained uint32 uint64 uint8 ulong
+syn keyword tl_keyword contained ulonglong umask umeth umethod
+syn keyword tl_keyword contained uname unget-byte unget-char uni
+syn keyword tl_keyword contained unintern union union-get union-in
+syn keyword tl_keyword contained union-members union-out union-put uniq
+syn keyword tl_keyword contained unique unless unquote unsetenv
+syn keyword tl_keyword contained until until* untrace unuse-package
+syn keyword tl_keyword contained unuse-sym unwind-protect upcase-str upd
+syn keyword tl_keyword contained update uref url-decode url-encode
+syn keyword tl_keyword contained use use-package use-sym user-package
+syn keyword tl_keyword contained ushort usl usleep uslot
+syn keyword tl_keyword contained utimes val vdiscard vec
+syn keyword tl_keyword contained vec-carray vec-list vec-push vec-seq
+syn keyword tl_keyword contained vec-set-length vecref vector vector-list
+syn keyword tl_keyword contained vectorp veof veol veol2
+syn keyword tl_keyword contained verase vintr vkill vlnext
+syn keyword tl_keyword contained vm-fun-p vmin void vquit
+syn keyword tl_keyword contained vreprint vstart vstop vsusp
+syn keyword tl_keyword contained vswtc vt0 vt1 vtdly
+syn keyword tl_keyword contained vtime vwerase w-continued w-coredump
+syn keyword tl_keyword contained w-exitstatus w-ifcontinued w-ifexited w-ifsignaled
+syn keyword tl_keyword contained w-ifstopped w-nohang w-stopsig w-termsig
+syn keyword tl_keyword contained w-untraced wait wchar weave
+syn keyword tl_keyword contained when when-match whena whenlet
+syn keyword tl_keyword contained where while while* whilet
+syn keyword tl_keyword contained width width-check window-map window-mapdo
+syn keyword tl_keyword contained window-mappend wint-t with-clobber-expander with-compilation-unit
+syn keyword tl_keyword contained with-delete-expander with-dyn-lib with-gensyms with-hash-iter
+syn keyword tl_keyword contained with-in-buf-stream with-in-string-byte-stream with-in-string-stream with-objects
+syn keyword tl_keyword contained with-out-buf-stream with-out-string-stream with-out-strlist-stream with-resources
+syn keyword tl_keyword contained with-slots with-stream with-update-expander wrap
+syn keyword tl_keyword contained wrap* wstr wstr-d xcase
+syn keyword tl_keyword contained yield yield-from zap zarray
+syn keyword tl_keyword contained zchar zero-fill zerop zip
+syn keyword tl_keyword contained znew
syn keyword txr_keyword contained accept all and assert
syn keyword txr_keyword contained bind block call cases
@@ -826,5 +829,5 @@ hi def link txr_jerr Error
let b:current_syntax = "lisp"
-set lispwords=ado,alet,align,alignof,ap,append-each,append-each*,append-each-prod,append-each-prod*,append-match-products,append-matches,aret,array,arraysize,assert,awk,bit,block,block*,bool,buf,buf-d,build,buildn,carray,caseq,caseq*,caseql,caseql*,casequal,casequal*,catch,catch*,catch**,collect-each,collect-each*,collect-each-prod,collect-each-prod*,compare-swap,compile-only,cond,conda,condlet,cptr,dec,defex,deffi,deffi-cb,deffi-cb-unsafe,deffi-sym,deffi-type,deffi-var,define-accessor,define-modify-macro,define-option-struct,define-param-expander,define-place-macro,defmacro,defmatch,defmeth,defpackage,defparm,defparml,defplace,defset,defstruct,defsymacro,defun,defun-match,defvar,defvarl,del,delay,do,dohash,doloop,doloop*,dotimes,each,each*,each-match,each-match-product,each-prod,each-prod*,elemsize,elemtype,enum,enumed,equot,eval-only,ffi,flet,flip,for,for*,fun,gen,go,gun,handle,handle*,handler-bind,hlet,hlet*,ido,if,if-match,ifa,iflet,ignerr,ignwarn,in-package,ip,json,keep-match-products,keep-matches,labels,lambda,lambda-match,lcons,ldo,let,let*,lnew*,load-for,load-time,lop,lset,mac-env-param-bind,mac-param-bind,macro-time,macrolet,match-case,mlet,new*,obtain,obtain*,obtain*-block,obtain-block,offsetof,op,pdec,pinc,placelet,placelet*,pop,pprof,prof,prog,prog*,prog1,prog2,progn,ptr,ptr-in,ptr-in-d,ptr-out,ptr-out-d,ptr-out-s,push,pushnew,ret,return,return-from,rlet,rslot,sbit,sizeof,slet,splice,struct,suspend,symacrolet,sys:abscond-from,sys:awk-fun-let,sys:awk-mac-let,sys:awk-redir,sys:blk,sys:catch,sys:conv,sys:dlib-expr,sys:dvbind,sys:each-op,sys:expr,sys:fbind,sys:fixed-point,sys:for-op,sys:l1-val,sys:lbind,sys:lisp1-value,sys:load-time-lit,sys:path-examine,sys:placelet-1,sys:rewrite-case,sys:splice,sys:struct-lit,sys:switch,sys:txr-case-impl,sys:unquote,sys:upenv,sys:var,sys:when-exprs-match,tagbody,tb,tc,test-clear,test-dec,test-inc,test-set,trace,tree-bind,tree-case,txr-case,txr-if,txr-when,typecase,typedef,ubit,union,unless,unquote,until,until*,untrace,unwind-protect,upd,uref,when,when-match,whena,whenlet,while,while*,whilet,with-clobber-expander,with-compilation-unit,with-delete-expander,with-dyn-lib,with-gensyms,with-hash-iter,with-in-buf-stream,with-in-string-byte-stream,with-in-string-stream,with-objects,with-out-buf-stream,with-out-string-stream,with-out-strlist-stream,with-resources,with-slots,with-stream,with-update-expander,yield,yield-from,zap,zarray,znew,:method,:function,:init,:postinit,:fini
+set lispwords=ado,alet,align,alignof,ap,append-each,append-each*,append-each-prod,append-each-prod*,append-match-products,append-matches,aret,array,arraysize,assert,awk,bit,block,block*,bool,buf,buf-d,build,buildn,carray,caseq,caseq*,caseql,caseql*,casequal,casequal*,catch,catch*,catch**,collect-each,collect-each*,collect-each-prod,collect-each-prod*,compare-swap,compile-only,cond,conda,condlet,cptr,dec,defex,deffi,deffi-cb,deffi-cb-unsafe,deffi-struct,deffi-sym,deffi-type,deffi-union,deffi-var,define-accessor,define-modify-macro,define-option-struct,define-param-expander,define-place-macro,defmacro,defmatch,defmeth,defpackage,defparm,defparml,defplace,defset,defstruct,defsymacro,defun,defun-match,defvar,defvarl,del,delay,do,dohash,doloop,doloop*,dotimes,each,each*,each-match,each-match-product,each-prod,each-prod*,elemsize,elemtype,enum,enumed,equot,eval-only,ffi,flet,flip,for,for*,fun,gen,go,gun,handle,handle*,handler-bind,hlet,hlet*,ido,if,if-match,ifa,iflet,ignerr,ignwarn,in-package,ip,json,keep-match-products,keep-matches,labels,lambda,lambda-match,lcons,ldo,let,let*,lnew*,load-for,load-time,lop,lset,mac-env-param-bind,mac-param-bind,macro-time,macrolet,match-case,mlet,new*,obtain,obtain*,obtain*-block,obtain-block,offsetof,op,pdec,pic,pinc,placelet,placelet*,pop,pprof,prof,prog,prog*,prog1,prog2,progn,ptr,ptr-in,ptr-in-d,ptr-out,ptr-out-d,ptr-out-s,push,pushnew,ret,return,return-from,rlet,rslot,sbit,sizeof,slet,splice,struct,suspend,symacrolet,sys:abscond-from,sys:awk-fun-let,sys:awk-mac-let,sys:awk-redir,sys:blk,sys:catch,sys:conv,sys:dlib-expr,sys:dvbind,sys:each-op,sys:expr,sys:fbind,sys:fixed-point,sys:for-op,sys:l1-val,sys:lbind,sys:lisp1-value,sys:load-time-lit,sys:path-examine,sys:placelet-1,sys:rewrite-case,sys:splice,sys:struct-lit,sys:switch,sys:txr-case-impl,sys:unquote,sys:upenv,sys:var,sys:when-exprs-match,tagbody,tb,tc,test-clear,test-dec,test-inc,test-set,trace,tree-bind,tree-case,txr-case,txr-if,txr-when,typecase,typedef,ubit,union,unless,unquote,until,until*,untrace,unwind-protect,upd,uref,when,when-match,whena,whenlet,while,while*,whilet,with-clobber-expander,with-compilation-unit,with-delete-expander,with-dyn-lib,with-gensyms,with-hash-iter,with-in-buf-stream,with-in-string-byte-stream,with-in-string-stream,with-objects,with-out-buf-stream,with-out-string-stream,with-out-strlist-stream,with-resources,with-slots,with-stream,with-update-expander,yield,yield-from,zap,zarray,znew,:method,:function,:init,:postinit,:fini
set comments=:@\;\;\;,:@\;\;,:@\;
diff --git a/y.tab.c.shipped b/y.tab.c.shipped
index 59ad07a0..f1e85135 100644
--- a/y.tab.c.shipped
+++ b/y.tab.c.shipped
@@ -851,32 +851,32 @@ static const yytype_uint16 yyrline[] =
779, 780, 782, 785, 788, 792, 795, 798, 806, 809,
815, 821, 828, 829, 830, 831, 832, 833, 837, 842,
845, 849, 852, 853, 855, 857, 860, 865, 874, 879,
- 882, 887, 892, 896, 902, 906, 914, 918, 922, 926,
- 931, 935, 948, 952, 954, 954, 958, 959, 960, 961,
- 963, 964, 969, 970, 975, 975, 980, 980, 985, 985,
- 988, 989, 991, 993, 997, 1001, 1010, 1012, 1016, 1023,
- 1034, 1035, 1037, 1040, 1044, 1048, 1049, 1055, 1056, 1057,
- 1058, 1062, 1067, 1071, 1076, 1080, 1084, 1085, 1086, 1090,
- 1091, 1092, 1095, 1098, 1099, 1102, 1104, 1109, 1112, 1112,
- 1116, 1116, 1120, 1120, 1123, 1123, 1126, 1129, 1131, 1135,
- 1137, 1143, 1144, 1146, 1147, 1148, 1149, 1150, 1151, 1152,
- 1153, 1154, 1155, 1156, 1157, 1158, 1159, 1160, 1161, 1162,
- 1164, 1164, 1168, 1168, 1172, 1172, 1176, 1176, 1179, 1182,
- 1183, 1185, 1186, 1188, 1189, 1190, 1191, 1192, 1193, 1194,
- 1195, 1196, 1197, 1198, 1199, 1200, 1201, 1202, 1203, 1204,
- 1206, 1206, 1210, 1210, 1214, 1214, 1218, 1221, 1227, 1231,
- 1237, 1238, 1241, 1242, 1243, 1243, 1246, 1249, 1250, 1253,
- 1254, 1255, 1258, 1261, 1266, 1270, 1276, 1279, 1280, 1281,
- 1282, 1285, 1286, 1287, 1290, 1291, 1292, 1293, 1294, 1301,
- 1302, 1304, 1305, 1306, 1307, 1308, 1309, 1310, 1311, 1315,
- 1316, 1319, 1320, 1321, 1324, 1326, 1327, 1328, 1329, 1330,
- 1331, 1332, 1333, 1334, 1335, 1336, 1337, 1340, 1354, 1355,
- 1359, 1360, 1362, 1366, 1379, 1381, 1385, 1390, 1391, 1394,
- 1398, 1400, 1404, 1405, 1406, 1408, 1415, 1416, 1418, 1419,
- 1422, 1423, 1424, 1425, 1428, 1429, 1430, 1432, 1436, 1437,
- 1438, 1440, 1446, 1448, 1451, 1456, 1458, 1462, 1463, 1470,
- 1471, 1472, 1473, 1474, 1475, 1476, 1477, 1478, 1479, 1481,
- 1483, 1485, 1487, 1489, 1491, 1493, 1498
+ 882, 887, 892, 896, 905, 909, 920, 924, 928, 932,
+ 937, 941, 957, 961, 963, 963, 967, 968, 969, 970,
+ 972, 973, 978, 979, 984, 984, 989, 989, 994, 994,
+ 997, 998, 1000, 1002, 1006, 1010, 1019, 1021, 1025, 1032,
+ 1043, 1044, 1046, 1049, 1053, 1057, 1058, 1064, 1065, 1066,
+ 1067, 1071, 1076, 1080, 1085, 1089, 1093, 1094, 1095, 1099,
+ 1100, 1101, 1104, 1107, 1108, 1111, 1113, 1118, 1121, 1121,
+ 1125, 1125, 1129, 1129, 1132, 1132, 1135, 1138, 1140, 1144,
+ 1146, 1152, 1153, 1155, 1156, 1157, 1158, 1159, 1160, 1161,
+ 1162, 1163, 1164, 1165, 1166, 1167, 1168, 1169, 1170, 1171,
+ 1173, 1173, 1177, 1177, 1181, 1181, 1185, 1185, 1188, 1191,
+ 1192, 1194, 1195, 1197, 1198, 1199, 1200, 1201, 1202, 1203,
+ 1204, 1205, 1206, 1207, 1208, 1209, 1210, 1211, 1212, 1213,
+ 1215, 1215, 1219, 1219, 1223, 1223, 1227, 1230, 1236, 1240,
+ 1246, 1247, 1250, 1251, 1252, 1252, 1255, 1258, 1259, 1262,
+ 1263, 1264, 1267, 1270, 1275, 1279, 1285, 1288, 1289, 1290,
+ 1291, 1294, 1295, 1296, 1299, 1300, 1301, 1302, 1303, 1310,
+ 1311, 1313, 1314, 1315, 1316, 1317, 1318, 1319, 1320, 1324,
+ 1325, 1328, 1329, 1330, 1333, 1335, 1336, 1337, 1338, 1339,
+ 1340, 1341, 1342, 1343, 1344, 1345, 1346, 1349, 1363, 1364,
+ 1368, 1369, 1371, 1375, 1388, 1390, 1394, 1399, 1400, 1403,
+ 1407, 1409, 1413, 1414, 1415, 1417, 1424, 1425, 1427, 1428,
+ 1431, 1432, 1433, 1434, 1437, 1438, 1439, 1441, 1445, 1446,
+ 1447, 1449, 1455, 1457, 1460, 1465, 1467, 1471, 1472, 1479,
+ 1480, 1481, 1482, 1483, 1484, 1485, 1486, 1487, 1488, 1490,
+ 1492, 1494, 1496, 1498, 1500, 1502, 1507
};
#endif
@@ -4967,7 +4967,10 @@ yyreduce:
/* Line 1806 of yacc.c */
#line 896 "parser.y"
- { if (parser->quasi_level > 0 && unquotes_occur((yyvsp[(2) - (2)].val), 0))
+ { if (parser->ignore)
+ (yyval.val) = nil;
+ else if (parser->quasi_level > 0 &&
+ unquotes_occur((yyvsp[(2) - (2)].val), 0))
(yyval.val) = rl(cons(hash_lit_s, (yyvsp[(2) - (2)].val)), num((yyvsp[(1) - (2)].lineno)));
else
(yyval.val) = rl(hash_construct(first((yyvsp[(2) - (2)].val)),
@@ -4978,7 +4981,7 @@ yyreduce:
case 214:
/* Line 1806 of yacc.c */
-#line 902 "parser.y"
+#line 905 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("hash literal")); }
break;
@@ -4986,10 +4989,13 @@ yyreduce:
case 215:
/* Line 1806 of yacc.c */
-#line 906 "parser.y"
- { if ((parser->quasi_level > 0 && unquotes_occur((yyvsp[(2) - (2)].val), 0)) ||
- (parser->read_unknown_structs &&
- !find_struct_type(first((yyvsp[(2) - (2)].val)))))
+#line 909 "parser.y"
+ { if (parser->ignore)
+ { (yyval.val) = nil; }
+ else if ((parser->quasi_level > 0 &&
+ unquotes_occur((yyvsp[(2) - (2)].val), 0)) ||
+ (parser->read_unknown_structs &&
+ !find_struct_type(first((yyvsp[(2) - (2)].val)))))
{ (yyval.val) = rl(cons(struct_lit_s, (yyvsp[(2) - (2)].val)), num((yyvsp[(1) - (2)].lineno))); }
else
{ val strct = make_struct_lit(first((yyvsp[(2) - (2)].val)),
@@ -5000,7 +5006,7 @@ yyreduce:
case 216:
/* Line 1806 of yacc.c */
-#line 914 "parser.y"
+#line 920 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("struct literal")); }
break;
@@ -5008,7 +5014,7 @@ yyreduce:
case 217:
/* Line 1806 of yacc.c */
-#line 918 "parser.y"
+#line 924 "parser.y"
{ if (length((yyvsp[(2) - (2)].val)) != two)
yyerr("range literal needs two elements");
{ val range = rcons(first((yyvsp[(2) - (2)].val)), second((yyvsp[(2) - (2)].val)));
@@ -5018,7 +5024,7 @@ yyreduce:
case 218:
/* Line 1806 of yacc.c */
-#line 922 "parser.y"
+#line 928 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("range literal")); }
break;
@@ -5026,7 +5032,7 @@ yyreduce:
case 219:
/* Line 1806 of yacc.c */
-#line 926 "parser.y"
+#line 932 "parser.y"
{ if (gt(length((yyvsp[(2) - (2)].val)), three))
yyerr("excess elements in tree node");
{ val tn = tnode(first((yyvsp[(2) - (2)].val)), second((yyvsp[(2) - (2)].val)),
@@ -5037,7 +5043,7 @@ yyreduce:
case 220:
/* Line 1806 of yacc.c */
-#line 931 "parser.y"
+#line 937 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("tree node literal")); }
break;
@@ -5045,9 +5051,12 @@ yyreduce:
case 221:
/* Line 1806 of yacc.c */
-#line 935 "parser.y"
- { if (parser->quasi_level > 0 && unquotes_occur((yyvsp[(2) - (2)].val), 0))
- (yyval.val) = rl(cons(tree_lit_s, (yyvsp[(2) - (2)].val)), num((yyvsp[(1) - (2)].lineno)));
+#line 941 "parser.y"
+ { if (parser->ignore)
+ { (yyval.val) = nil; }
+ else if (parser->quasi_level > 0 &&
+ unquotes_occur((yyvsp[(2) - (2)].val), 0))
+ { (yyval.val) = rl(cons(tree_lit_s, (yyvsp[(2) - (2)].val)), num((yyvsp[(1) - (2)].lineno))); }
else
{ val opts = first((yyvsp[(2) - (2)].val));
val key_fn_name = pop(&opts);
@@ -5064,7 +5073,7 @@ yyreduce:
case 222:
/* Line 1806 of yacc.c */
-#line 948 "parser.y"
+#line 957 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("tree node literal")); }
break;
@@ -5072,7 +5081,7 @@ yyreduce:
case 223:
/* Line 1806 of yacc.c */
-#line 952 "parser.y"
+#line 961 "parser.y"
{ (yyval.val) = list(json_s, quote_s, (yyvsp[(2) - (2)].val), nao);
end_of_json(scnr); }
break;
@@ -5080,14 +5089,14 @@ yyreduce:
case 224:
/* Line 1806 of yacc.c */
-#line 954 "parser.y"
+#line 963 "parser.y"
{ parser->quasi_level++; }
break;
case 225:
/* Line 1806 of yacc.c */
-#line 955 "parser.y"
+#line 964 "parser.y"
{ parser->quasi_level--;
end_of_json(scnr);
(yyval.val) = list(json_s, sys_qquote_s, (yyvsp[(4) - (4)].val), nao); }
@@ -5096,28 +5105,28 @@ yyreduce:
case 226:
/* Line 1806 of yacc.c */
-#line 958 "parser.y"
+#line 967 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 227:
/* Line 1806 of yacc.c */
-#line 959 "parser.y"
+#line 968 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 228:
/* Line 1806 of yacc.c */
-#line 960 "parser.y"
+#line 969 "parser.y"
{ (yyval.val) = null_string; }
break;
case 229:
/* Line 1806 of yacc.c */
-#line 961 "parser.y"
+#line 970 "parser.y"
{ (yyval.val) = (yyvsp[(2) - (3)].val);
rl((yyval.val), num(parser->lineno)); }
break;
@@ -5125,14 +5134,14 @@ yyreduce:
case 230:
/* Line 1806 of yacc.c */
-#line 963 "parser.y"
+#line 972 "parser.y"
{ (yyval.val) = vector(zero, nil); }
break;
case 231:
/* Line 1806 of yacc.c */
-#line 964 "parser.y"
+#line 973 "parser.y"
{ (yyval.val) = if3(vectorp((yyvsp[(2) - (3)].val)),
(yyvsp[(2) - (3)].val),
rl(cons(vector_lit_s,
@@ -5143,14 +5152,14 @@ yyreduce:
case 232:
/* Line 1806 of yacc.c */
-#line 969 "parser.y"
+#line 978 "parser.y"
{ (yyval.val) = make_hash(nil, nil, t); }
break;
case 233:
/* Line 1806 of yacc.c */
-#line 970 "parser.y"
+#line 979 "parser.y"
{ (yyval.val) = if3(hashp((yyvsp[(2) - (3)].val)),
(yyvsp[(2) - (3)].val),
rl(cons(hash_lit_s,
@@ -5161,14 +5170,14 @@ yyreduce:
case 234:
/* Line 1806 of yacc.c */
-#line 975 "parser.y"
+#line 984 "parser.y"
{ parser->quasi_level--; }
break;
case 235:
/* Line 1806 of yacc.c */
-#line 976 "parser.y"
+#line 985 "parser.y"
{ parser->quasi_level++;
end_of_json_unquote(scnr);
(yyval.val) = rl(rlc(list(sys_unquote_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
@@ -5178,14 +5187,14 @@ yyreduce:
case 236:
/* Line 1806 of yacc.c */
-#line 980 "parser.y"
+#line 989 "parser.y"
{ parser->quasi_level--; }
break;
case 237:
/* Line 1806 of yacc.c */
-#line 981 "parser.y"
+#line 990 "parser.y"
{ parser->quasi_level++;
end_of_json_unquote(scnr);
(yyval.val) = rl(rlc(list(sys_splice_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
@@ -5195,14 +5204,14 @@ yyreduce:
case 238:
/* Line 1806 of yacc.c */
-#line 985 "parser.y"
+#line 994 "parser.y"
{ parser_circ_def(parser, (yyvsp[(1) - (1)].val), unique_s); }
break;
case 239:
/* Line 1806 of yacc.c */
-#line 986 "parser.y"
+#line 995 "parser.y"
{ parser_circ_def(parser, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val));
(yyval.val) = (yyvsp[(3) - (3)].val); }
break;
@@ -5210,14 +5219,14 @@ yyreduce:
case 240:
/* Line 1806 of yacc.c */
-#line 988 "parser.y"
+#line 997 "parser.y"
{ (yyval.val) = parser_circ_ref(parser, (yyvsp[(1) - (1)].val)); }
break;
case 241:
/* Line 1806 of yacc.c */
-#line 989 "parser.y"
+#line 998 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("JSON string")); }
break;
@@ -5225,7 +5234,7 @@ yyreduce:
case 242:
/* Line 1806 of yacc.c */
-#line 991 "parser.y"
+#line 1000 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("JSON array")); }
break;
@@ -5233,7 +5242,7 @@ yyreduce:
case 243:
/* Line 1806 of yacc.c */
-#line 993 "parser.y"
+#line 1002 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("JSON hash")); }
break;
@@ -5241,7 +5250,7 @@ yyreduce:
case 244:
/* Line 1806 of yacc.c */
-#line 997 "parser.y"
+#line 1006 "parser.y"
{ (yyval.val) = if3(parser->quasi_level > 0 &&
unquotes_occur((yyvsp[(1) - (1)].val), 0),
cons((yyvsp[(1) - (1)].val), nil),
@@ -5251,7 +5260,7 @@ yyreduce:
case 245:
/* Line 1806 of yacc.c */
-#line 1001 "parser.y"
+#line 1010 "parser.y"
{ if (consp((yyvsp[(1) - (3)].val)))
{ (yyval.val) = cons((yyvsp[(3) - (3)].val), (yyvsp[(1) - (3)].val)); }
else if (parser->quasi_level > 0 &&
@@ -5266,7 +5275,7 @@ yyreduce:
case 246:
/* Line 1806 of yacc.c */
-#line 1010 "parser.y"
+#line 1019 "parser.y"
{ yyerr("missing comma in JSON array");
(yyval.val) = (yyvsp[(1) - (2)].val); }
break;
@@ -5274,7 +5283,7 @@ yyreduce:
case 247:
/* Line 1806 of yacc.c */
-#line 1012 "parser.y"
+#line 1021 "parser.y"
{ yybadtok(yychar, lit("JSON array"));
(yyval.val) = (yyvsp[(1) - (2)].val); }
break;
@@ -5282,7 +5291,7 @@ yyreduce:
case 248:
/* Line 1806 of yacc.c */
-#line 1016 "parser.y"
+#line 1025 "parser.y"
{ if (parser->quasi_level > 0 &&
(unquotes_occur((yyvsp[(1) - (3)].val), 0) ||
unquotes_occur((yyvsp[(3) - (3)].val), 0)))
@@ -5295,7 +5304,7 @@ yyreduce:
case 249:
/* Line 1806 of yacc.c */
-#line 1024 "parser.y"
+#line 1033 "parser.y"
{ if (consp((yyvsp[(1) - (5)].val)))
{ (yyval.val) = cons(list((yyvsp[(3) - (5)].val), (yyvsp[(5) - (5)].val), nao), (yyvsp[(1) - (5)].val)); }
else if (parser->quasi_level > 0 &&
@@ -5311,28 +5320,28 @@ yyreduce:
case 250:
/* Line 1806 of yacc.c */
-#line 1034 "parser.y"
+#line 1043 "parser.y"
{ yyerr("missing colon in JSON hash"); }
break;
case 251:
/* Line 1806 of yacc.c */
-#line 1036 "parser.y"
+#line 1045 "parser.y"
{ yyerr("missing comma in JSON hash"); }
break;
case 252:
/* Line 1806 of yacc.c */
-#line 1037 "parser.y"
+#line 1046 "parser.y"
{ yybadtok(yychar, lit("JSON hash")); }
break;
case 253:
/* Line 1806 of yacc.c */
-#line 1040 "parser.y"
+#line 1049 "parser.y"
{ if ((yyvsp[(1) - (1)].lexeme)[0] == ':' && (yyvsp[(1) - (1)].lexeme)[1] == 0)
{ (yyval.val) = nil; }
else
@@ -5342,21 +5351,21 @@ yyreduce:
case 254:
/* Line 1806 of yacc.c */
-#line 1044 "parser.y"
+#line 1053 "parser.y"
{ (yyval.val) = nil; }
break;
case 255:
/* Line 1806 of yacc.c */
-#line 1048 "parser.y"
+#line 1057 "parser.y"
{ (yyval.val) = rl((yyvsp[(2) - (3)].val), num((yyvsp[(1) - (3)].lineno))); }
break;
case 256:
/* Line 1806 of yacc.c */
-#line 1049 "parser.y"
+#line 1058 "parser.y"
{ val a = car((yyvsp[(3) - (4)].val));
val ur = uref_helper(parser, a);
if (ur == a)
@@ -5368,28 +5377,28 @@ yyreduce:
case 257:
/* Line 1806 of yacc.c */
-#line 1055 "parser.y"
+#line 1064 "parser.y"
{ (yyval.val) = nil; }
break;
case 258:
/* Line 1806 of yacc.c */
-#line 1056 "parser.y"
+#line 1065 "parser.y"
{ (yyval.val) = (yyvsp[(3) - (4)].val); }
break;
case 259:
/* Line 1806 of yacc.c */
-#line 1057 "parser.y"
+#line 1066 "parser.y"
{ (yyval.val) = (yyvsp[(3) - (4)].val); }
break;
case 260:
/* Line 1806 of yacc.c */
-#line 1058 "parser.y"
+#line 1067 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("expression")); }
break;
@@ -5397,7 +5406,7 @@ yyreduce:
case 261:
/* Line 1806 of yacc.c */
-#line 1062 "parser.y"
+#line 1071 "parser.y"
{ if (consp((yyvsp[(2) - (2)].val)))
(yyval.val) = rl(cons(expr_s, cons((yyvsp[(2) - (2)].val), nil)), num((yyvsp[(1) - (2)].lineno)));
else
@@ -5408,7 +5417,7 @@ yyreduce:
case 262:
/* Line 1806 of yacc.c */
-#line 1067 "parser.y"
+#line 1076 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("meta expression")); }
break;
@@ -5416,7 +5425,7 @@ yyreduce:
case 263:
/* Line 1806 of yacc.c */
-#line 1071 "parser.y"
+#line 1080 "parser.y"
{ if (consp((yyvsp[(2) - (2)].val)))
(yyval.val) = rl(cons(expr_s, cons((yyvsp[(2) - (2)].val), nil)), num((yyvsp[(1) - (2)].chr)));
else
@@ -5427,7 +5436,7 @@ yyreduce:
case 264:
/* Line 1806 of yacc.c */
-#line 1076 "parser.y"
+#line 1085 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("meta expression")); }
break;
@@ -5435,7 +5444,7 @@ yyreduce:
case 265:
/* Line 1806 of yacc.c */
-#line 1080 "parser.y"
+#line 1089 "parser.y"
{ val a = car((yyvsp[(3) - (4)].val));
val ur = uref_helper(parser, a);
(yyval.val) = rlcp_tree(cons(dwim_s,
@@ -5445,21 +5454,21 @@ yyreduce:
case 266:
/* Line 1806 of yacc.c */
-#line 1084 "parser.y"
+#line 1093 "parser.y"
{ (yyval.val) = rl(cons(dwim_s, (yyvsp[(2) - (3)].val)), num((yyvsp[(1) - (3)].lineno))); }
break;
case 267:
/* Line 1806 of yacc.c */
-#line 1085 "parser.y"
+#line 1094 "parser.y"
{ (yyval.val) = rl(cons(dwim_s, nil), num((yyvsp[(1) - (2)].lineno))); }
break;
case 268:
/* Line 1806 of yacc.c */
-#line 1086 "parser.y"
+#line 1095 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("DWIM expression")); }
break;
@@ -5467,28 +5476,28 @@ yyreduce:
case 272:
/* Line 1806 of yacc.c */
-#line 1095 "parser.y"
+#line 1104 "parser.y"
{ (yyval.val) = rlc(expand_meta((yyvsp[(1) - (1)].val), nil), (yyvsp[(1) - (1)].val)); }
break;
case 273:
/* Line 1806 of yacc.c */
-#line 1098 "parser.y"
+#line 1107 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 274:
/* Line 1806 of yacc.c */
-#line 1099 "parser.y"
+#line 1108 "parser.y"
{ (yyval.val) = nil; }
break;
case 275:
/* Line 1806 of yacc.c */
-#line 1102 "parser.y"
+#line 1111 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val)->c.cdr;
(yyvsp[(1) - (1)].val)->c.cdr = nil; }
break;
@@ -5496,7 +5505,7 @@ yyreduce:
case 276:
/* Line 1806 of yacc.c */
-#line 1105 "parser.y"
+#line 1114 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (3)].val)->c.cdr;
(yyvsp[(1) - (3)].val)->c.cdr = (yyvsp[(3) - (3)].val); }
break;
@@ -5504,7 +5513,7 @@ yyreduce:
case 277:
/* Line 1806 of yacc.c */
-#line 1109 "parser.y"
+#line 1118 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (1)].val), nil);
rlc((yyval.val), (yyvsp[(1) - (1)].val));
(yyval.val)->c.cdr = (yyval.val); }
@@ -5513,14 +5522,14 @@ yyreduce:
case 278:
/* Line 1806 of yacc.c */
-#line 1112 "parser.y"
+#line 1121 "parser.y"
{ parser->ignore = 1; }
break;
case 279:
/* Line 1806 of yacc.c */
-#line 1113 "parser.y"
+#line 1122 "parser.y"
{ parser->ignore = 0;
(yyval.val) = cons(nil, nil);
(yyval.val)->c.cdr = (yyval.val); }
@@ -5529,14 +5538,14 @@ yyreduce:
case 280:
/* Line 1806 of yacc.c */
-#line 1116 "parser.y"
+#line 1125 "parser.y"
{ parser->ignore = 1; }
break;
case 281:
/* Line 1806 of yacc.c */
-#line 1117 "parser.y"
+#line 1126 "parser.y"
{ parser->ignore = 0;
(yyval.val) = cons(nil, nil);
(yyval.val)->c.cdr = (yyval.val); }
@@ -5545,14 +5554,14 @@ yyreduce:
case 282:
/* Line 1806 of yacc.c */
-#line 1120 "parser.y"
+#line 1129 "parser.y"
{ parser->ignore = 1; }
break;
case 283:
/* Line 1806 of yacc.c */
-#line 1121 "parser.y"
+#line 1130 "parser.y"
{ parser->ignore = 0;
(yyval.val) = (yyvsp[(1) - (4)].val); }
break;
@@ -5560,14 +5569,14 @@ yyreduce:
case 284:
/* Line 1806 of yacc.c */
-#line 1123 "parser.y"
+#line 1132 "parser.y"
{ parser->ignore = 1; }
break;
case 285:
/* Line 1806 of yacc.c */
-#line 1124 "parser.y"
+#line 1133 "parser.y"
{ parser->ignore = 0;
(yyval.val) = (yyvsp[(1) - (5)].val); }
break;
@@ -5575,7 +5584,7 @@ yyreduce:
case 286:
/* Line 1806 of yacc.c */
-#line 1126 "parser.y"
+#line 1135 "parser.y"
{ uses_or2;
(yyval.val) = rlc(cons((yyvsp[(2) - (2)].val), (yyvsp[(1) - (2)].val)->c.cdr), or2((yyvsp[(2) - (2)].val), (yyvsp[(1) - (2)].val)->c.cdr));
(yyvsp[(1) - (2)].val)->c.cdr = (yyval.val); }
@@ -5584,7 +5593,7 @@ yyreduce:
case 287:
/* Line 1806 of yacc.c */
-#line 1129 "parser.y"
+#line 1138 "parser.y"
{ (yyval.val) = lastcons(rl((yyvsp[(2) - (2)].val), num((yyvsp[(1) - (2)].lineno))));
(yyval.val)->c.cdr = (yyvsp[(2) - (2)].val); }
break;
@@ -5592,7 +5601,7 @@ yyreduce:
case 288:
/* Line 1806 of yacc.c */
-#line 1132 "parser.y"
+#line 1141 "parser.y"
{ (yyval.val) = lastcons(rl((yyvsp[(3) - (3)].val), num((yyvsp[(2) - (3)].lineno))));
(yyval.val)->c.cdr = (yyvsp[(1) - (3)].val)->c.cdr;
(yyvsp[(1) - (3)].val)->c.cdr = (yyvsp[(3) - (3)].val); }
@@ -5601,7 +5610,7 @@ yyreduce:
case 289:
/* Line 1806 of yacc.c */
-#line 1135 "parser.y"
+#line 1144 "parser.y"
{ (yyval.val) = lastcons(rl((yyvsp[(2) - (2)].val), num((yyvsp[(1) - (2)].lineno))));
(yyval.val)->c.cdr = (yyvsp[(2) - (2)].val); }
break;
@@ -5609,7 +5618,7 @@ yyreduce:
case 290:
/* Line 1806 of yacc.c */
-#line 1138 "parser.y"
+#line 1147 "parser.y"
{ (yyval.val) = lastcons(rl((yyvsp[(3) - (3)].val), num((yyvsp[(2) - (3)].lineno))));
(yyval.val)->c.cdr = (yyvsp[(1) - (3)].val)->c.cdr;
(yyvsp[(1) - (3)].val)->c.cdr = (yyvsp[(3) - (3)].val); }
@@ -5618,14 +5627,14 @@ yyreduce:
case 291:
/* Line 1806 of yacc.c */
-#line 1143 "parser.y"
+#line 1152 "parser.y"
{ (yyval.val) = ifnign(symhlpr((yyvsp[(1) - (1)].lexeme), t)); }
break;
case 292:
/* Line 1806 of yacc.c */
-#line 1144 "parser.y"
+#line 1153 "parser.y"
{ (yyval.val) = cons(var_s, cons((yyvsp[(1) - (1)].val), nil));
rl((yyval.val), num(parser->lineno)); }
break;
@@ -5633,119 +5642,119 @@ yyreduce:
case 293:
/* Line 1806 of yacc.c */
-#line 1146 "parser.y"
+#line 1155 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 294:
/* Line 1806 of yacc.c */
-#line 1147 "parser.y"
+#line 1156 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 295:
/* Line 1806 of yacc.c */
-#line 1148 "parser.y"
+#line 1157 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 296:
/* Line 1806 of yacc.c */
-#line 1149 "parser.y"
+#line 1158 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 297:
/* Line 1806 of yacc.c */
-#line 1150 "parser.y"
+#line 1159 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 298:
/* Line 1806 of yacc.c */
-#line 1151 "parser.y"
+#line 1160 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 299:
/* Line 1806 of yacc.c */
-#line 1152 "parser.y"
+#line 1161 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 300:
/* Line 1806 of yacc.c */
-#line 1153 "parser.y"
+#line 1162 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 301:
/* Line 1806 of yacc.c */
-#line 1154 "parser.y"
+#line 1163 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 302:
/* Line 1806 of yacc.c */
-#line 1155 "parser.y"
+#line 1164 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 303:
/* Line 1806 of yacc.c */
-#line 1156 "parser.y"
+#line 1165 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 304:
/* Line 1806 of yacc.c */
-#line 1157 "parser.y"
+#line 1166 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 305:
/* Line 1806 of yacc.c */
-#line 1158 "parser.y"
+#line 1167 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 306:
/* Line 1806 of yacc.c */
-#line 1159 "parser.y"
+#line 1168 "parser.y"
{ (yyval.val) = rl((yyvsp[(2) - (2)].val), num((yyvsp[(1) - (2)].lineno))); }
break;
case 307:
/* Line 1806 of yacc.c */
-#line 1160 "parser.y"
+#line 1169 "parser.y"
{ (yyval.val) = rl(cons(quasilist_s, (yyvsp[(2) - (2)].val)), num((yyvsp[(1) - (2)].lineno))); }
break;
case 308:
/* Line 1806 of yacc.c */
-#line 1161 "parser.y"
+#line 1170 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 309:
/* Line 1806 of yacc.c */
-#line 1162 "parser.y"
+#line 1171 "parser.y"
{ (yyval.val) = rl(rlc(list(quote_s, (yyvsp[(2) - (2)].val), nao), (yyvsp[(2) - (2)].val)),
num(parser->lineno)); }
break;
@@ -5753,14 +5762,14 @@ yyreduce:
case 310:
/* Line 1806 of yacc.c */
-#line 1164 "parser.y"
+#line 1173 "parser.y"
{ parser->quasi_level++; }
break;
case 311:
/* Line 1806 of yacc.c */
-#line 1165 "parser.y"
+#line 1174 "parser.y"
{ parser->quasi_level--;
(yyval.val) = rl(rlc(list(sys_qquote_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
num(parser->lineno)); }
@@ -5769,14 +5778,14 @@ yyreduce:
case 312:
/* Line 1806 of yacc.c */
-#line 1168 "parser.y"
+#line 1177 "parser.y"
{ parser->quasi_level--; }
break;
case 313:
/* Line 1806 of yacc.c */
-#line 1169 "parser.y"
+#line 1178 "parser.y"
{ parser->quasi_level++;
(yyval.val) = rl(rlc(list(sys_unquote_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
num(parser->lineno)); }
@@ -5785,14 +5794,14 @@ yyreduce:
case 314:
/* Line 1806 of yacc.c */
-#line 1172 "parser.y"
+#line 1181 "parser.y"
{ parser->quasi_level--; }
break;
case 315:
/* Line 1806 of yacc.c */
-#line 1173 "parser.y"
+#line 1182 "parser.y"
{ parser->quasi_level++;
(yyval.val) = rl(rlc(list(sys_splice_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
num(parser->lineno)); }
@@ -5801,14 +5810,14 @@ yyreduce:
case 316:
/* Line 1806 of yacc.c */
-#line 1176 "parser.y"
+#line 1185 "parser.y"
{ parser_circ_def(parser, (yyvsp[(1) - (1)].val), unique_s); }
break;
case 317:
/* Line 1806 of yacc.c */
-#line 1177 "parser.y"
+#line 1186 "parser.y"
{ parser_circ_def(parser, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val));
(yyval.val) = (yyvsp[(3) - (3)].val); }
break;
@@ -5816,35 +5825,35 @@ yyreduce:
case 318:
/* Line 1806 of yacc.c */
-#line 1179 "parser.y"
+#line 1188 "parser.y"
{ (yyval.val) = parser_circ_ref(parser, (yyvsp[(1) - (1)].val)); }
break;
case 319:
/* Line 1806 of yacc.c */
-#line 1182 "parser.y"
+#line 1191 "parser.y"
{ (yyval.val) = uref_helper(parser, (yyvsp[(2) - (2)].val)); }
break;
case 320:
/* Line 1806 of yacc.c */
-#line 1183 "parser.y"
+#line 1192 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 321:
/* Line 1806 of yacc.c */
-#line 1185 "parser.y"
+#line 1194 "parser.y"
{ (yyval.val) = ifnign(symhlpr((yyvsp[(1) - (1)].lexeme), t)); }
break;
case 322:
/* Line 1806 of yacc.c */
-#line 1186 "parser.y"
+#line 1195 "parser.y"
{ (yyval.val) = cons(var_s, cons((yyvsp[(1) - (1)].val), nil));
rl((yyval.val), num(parser->lineno)); }
break;
@@ -5852,119 +5861,119 @@ yyreduce:
case 323:
/* Line 1806 of yacc.c */
-#line 1188 "parser.y"
+#line 1197 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 324:
/* Line 1806 of yacc.c */
-#line 1189 "parser.y"
+#line 1198 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 325:
/* Line 1806 of yacc.c */
-#line 1190 "parser.y"
+#line 1199 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 326:
/* Line 1806 of yacc.c */
-#line 1191 "parser.y"
+#line 1200 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 327:
/* Line 1806 of yacc.c */
-#line 1192 "parser.y"
+#line 1201 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 328:
/* Line 1806 of yacc.c */
-#line 1193 "parser.y"
+#line 1202 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 329:
/* Line 1806 of yacc.c */
-#line 1194 "parser.y"
+#line 1203 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 330:
/* Line 1806 of yacc.c */
-#line 1195 "parser.y"
+#line 1204 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 331:
/* Line 1806 of yacc.c */
-#line 1196 "parser.y"
+#line 1205 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 332:
/* Line 1806 of yacc.c */
-#line 1197 "parser.y"
+#line 1206 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 333:
/* Line 1806 of yacc.c */
-#line 1198 "parser.y"
+#line 1207 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 334:
/* Line 1806 of yacc.c */
-#line 1199 "parser.y"
+#line 1208 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 335:
/* Line 1806 of yacc.c */
-#line 1200 "parser.y"
+#line 1209 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 336:
/* Line 1806 of yacc.c */
-#line 1201 "parser.y"
+#line 1210 "parser.y"
{ (yyval.val) = rl((yyvsp[(2) - (2)].val), num((yyvsp[(1) - (2)].lineno))); }
break;
case 337:
/* Line 1806 of yacc.c */
-#line 1202 "parser.y"
+#line 1211 "parser.y"
{ (yyval.val) = rl(cons(quasilist_s, (yyvsp[(2) - (2)].val)), num((yyvsp[(1) - (2)].lineno))); }
break;
case 338:
/* Line 1806 of yacc.c */
-#line 1203 "parser.y"
+#line 1212 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 339:
/* Line 1806 of yacc.c */
-#line 1204 "parser.y"
+#line 1213 "parser.y"
{ (yyval.val) = rl(rlc(list(quote_s, (yyvsp[(2) - (2)].val), nao), (yyvsp[(2) - (2)].val)),
num(parser->lineno)); }
break;
@@ -5972,14 +5981,14 @@ yyreduce:
case 340:
/* Line 1806 of yacc.c */
-#line 1206 "parser.y"
+#line 1215 "parser.y"
{ parser->quasi_level++; }
break;
case 341:
/* Line 1806 of yacc.c */
-#line 1207 "parser.y"
+#line 1216 "parser.y"
{ parser->quasi_level--;
(yyval.val) = rl(rlc(list(sys_qquote_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
num(parser->lineno)); }
@@ -5988,14 +5997,14 @@ yyreduce:
case 342:
/* Line 1806 of yacc.c */
-#line 1210 "parser.y"
+#line 1219 "parser.y"
{ parser->quasi_level--; }
break;
case 343:
/* Line 1806 of yacc.c */
-#line 1211 "parser.y"
+#line 1220 "parser.y"
{ parser->quasi_level++;
(yyval.val) = rl(rlc(list(sys_unquote_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
num(parser->lineno)); }
@@ -6004,14 +6013,14 @@ yyreduce:
case 344:
/* Line 1806 of yacc.c */
-#line 1214 "parser.y"
+#line 1223 "parser.y"
{ parser->quasi_level--; }
break;
case 345:
/* Line 1806 of yacc.c */
-#line 1215 "parser.y"
+#line 1224 "parser.y"
{ parser->quasi_level++;
(yyval.val) = rl(rlc(list(sys_splice_s, (yyvsp[(3) - (3)].val), nao), (yyvsp[(3) - (3)].val)),
num(parser->lineno)); }
@@ -6020,7 +6029,7 @@ yyreduce:
case 346:
/* Line 1806 of yacc.c */
-#line 1218 "parser.y"
+#line 1227 "parser.y"
{ uses_or2;
(yyval.val) = rlc(list(rcons_s, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val), nao),
or2((yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val))); }
@@ -6029,7 +6038,7 @@ yyreduce:
case 347:
/* Line 1806 of yacc.c */
-#line 1222 "parser.y"
+#line 1231 "parser.y"
{ uses_or2;
(yyval.val) = rlc(list(rcons_s, (yyvsp[(1) - (4)].val),
uref_helper(parser, (yyvsp[(4) - (4)].val)),
@@ -6040,7 +6049,7 @@ yyreduce:
case 348:
/* Line 1806 of yacc.c */
-#line 1228 "parser.y"
+#line 1237 "parser.y"
{ uses_or2;
(yyval.val) = rlc(list(rcons_s, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val), nao),
or2((yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val))); }
@@ -6049,7 +6058,7 @@ yyreduce:
case 349:
/* Line 1806 of yacc.c */
-#line 1232 "parser.y"
+#line 1241 "parser.y"
{ uses_or2;
(yyval.val) = rlc(list(rcons_s, (yyvsp[(1) - (4)].val),
uref_helper(parser, (yyvsp[(4) - (4)].val)),
@@ -6060,14 +6069,14 @@ yyreduce:
case 350:
/* Line 1806 of yacc.c */
-#line 1237 "parser.y"
+#line 1246 "parser.y"
{ (yyval.val) = qref_helper(parser, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val)); }
break;
case 351:
/* Line 1806 of yacc.c */
-#line 1238 "parser.y"
+#line 1247 "parser.y"
{ (yyval.val) = qref_helper(parser,
cons(t, cons((yyvsp[(1) - (3)].val), nil)),
(yyvsp[(3) - (3)].val)); }
@@ -6076,28 +6085,28 @@ yyreduce:
case 352:
/* Line 1806 of yacc.c */
-#line 1241 "parser.y"
+#line 1250 "parser.y"
{ (yyval.val) = uref_helper(parser, (yyvsp[(2) - (2)].val)); }
break;
case 353:
/* Line 1806 of yacc.c */
-#line 1242 "parser.y"
+#line 1251 "parser.y"
{ (yyval.val) = uoref_helper(parser, (yyvsp[(2) - (2)].val)); }
break;
case 354:
/* Line 1806 of yacc.c */
-#line 1243 "parser.y"
+#line 1252 "parser.y"
{ parser_circ_def(parser, (yyvsp[(1) - (1)].val), unique_s); }
break;
case 355:
/* Line 1806 of yacc.c */
-#line 1244 "parser.y"
+#line 1253 "parser.y"
{ parser_circ_def(parser, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val));
(yyval.val) = (yyvsp[(3) - (3)].val); }
break;
@@ -6105,49 +6114,49 @@ yyreduce:
case 356:
/* Line 1806 of yacc.c */
-#line 1246 "parser.y"
+#line 1255 "parser.y"
{ (yyval.val) = parser_circ_ref(parser, (yyvsp[(1) - (1)].val)); }
break;
case 357:
/* Line 1806 of yacc.c */
-#line 1249 "parser.y"
+#line 1258 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 358:
/* Line 1806 of yacc.c */
-#line 1250 "parser.y"
+#line 1259 "parser.y"
{ (yyval.val) = nil; }
break;
case 359:
/* Line 1806 of yacc.c */
-#line 1253 "parser.y"
+#line 1262 "parser.y"
{ (yyval.val) = uref_helper(parser, (yyvsp[(2) - (2)].val)); }
break;
case 360:
/* Line 1806 of yacc.c */
-#line 1254 "parser.y"
+#line 1263 "parser.y"
{ (yyval.val) = uoref_helper(parser, (yyvsp[(2) - (2)].val)); }
break;
case 361:
/* Line 1806 of yacc.c */
-#line 1255 "parser.y"
+#line 1264 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 362:
/* Line 1806 of yacc.c */
-#line 1258 "parser.y"
+#line 1267 "parser.y"
{ (yyval.val) = regex_compile((yyvsp[(2) - (3)].val), nil);
end_of_regex(scnr);
rl((yyval.val), num(parser->lineno)); }
@@ -6156,7 +6165,7 @@ yyreduce:
case 363:
/* Line 1806 of yacc.c */
-#line 1261 "parser.y"
+#line 1270 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("regex"));
end_of_regex(scnr); }
@@ -6165,7 +6174,7 @@ yyreduce:
case 364:
/* Line 1806 of yacc.c */
-#line 1267 "parser.y"
+#line 1276 "parser.y"
{ (yyval.val) = regex_compile((yyvsp[(2) - (3)].val), nil);
end_of_regex(scnr);
rl((yyval.val), num(parser->lineno)); }
@@ -6174,7 +6183,7 @@ yyreduce:
case 365:
/* Line 1806 of yacc.c */
-#line 1271 "parser.y"
+#line 1280 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("regex"));
end_of_regex(scnr); }
@@ -6183,7 +6192,7 @@ yyreduce:
case 366:
/* Line 1806 of yacc.c */
-#line 1276 "parser.y"
+#line 1285 "parser.y"
{ (yyval.val) = if3(cdr((yyvsp[(1) - (1)].val)),
cons(compound_s, (yyvsp[(1) - (1)].val)),
car((yyvsp[(1) - (1)].val))); }
@@ -6192,84 +6201,84 @@ yyreduce:
case 367:
/* Line 1806 of yacc.c */
-#line 1279 "parser.y"
+#line 1288 "parser.y"
{ (yyval.val) = list(or_s, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val), nao); }
break;
case 368:
/* Line 1806 of yacc.c */
-#line 1280 "parser.y"
+#line 1289 "parser.y"
{ (yyval.val) = list(and_s, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val), nao); }
break;
case 369:
/* Line 1806 of yacc.c */
-#line 1281 "parser.y"
+#line 1290 "parser.y"
{ (yyval.val) = list(compl_s, (yyvsp[(2) - (2)].val), nao); }
break;
case 370:
/* Line 1806 of yacc.c */
-#line 1282 "parser.y"
+#line 1291 "parser.y"
{ (yyval.val) = nil; }
break;
case 371:
/* Line 1806 of yacc.c */
-#line 1285 "parser.y"
+#line 1294 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (1)].val), nil); }
break;
case 372:
/* Line 1806 of yacc.c */
-#line 1286 "parser.y"
+#line 1295 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (2)].val), (yyvsp[(2) - (2)].val)); }
break;
case 373:
/* Line 1806 of yacc.c */
-#line 1287 "parser.y"
+#line 1296 "parser.y"
{ (yyval.val) = list((yyvsp[(1) - (3)].val), list(compl_s, (yyvsp[(3) - (3)].val), nao), nao); }
break;
case 374:
/* Line 1806 of yacc.c */
-#line 1290 "parser.y"
+#line 1299 "parser.y"
{ (yyval.val) = list(zeroplus_s, (yyvsp[(1) - (2)].val), nao); }
break;
case 375:
/* Line 1806 of yacc.c */
-#line 1291 "parser.y"
+#line 1300 "parser.y"
{ (yyval.val) = list(oneplus_s, (yyvsp[(1) - (2)].val), nao); }
break;
case 376:
/* Line 1806 of yacc.c */
-#line 1292 "parser.y"
+#line 1301 "parser.y"
{ (yyval.val) = list(optional_s, (yyvsp[(1) - (2)].val), nao); }
break;
case 377:
/* Line 1806 of yacc.c */
-#line 1293 "parser.y"
+#line 1302 "parser.y"
{ (yyval.val) = list(nongreedy_s, (yyvsp[(1) - (3)].val), (yyvsp[(3) - (3)].val), nao); }
break;
case 378:
/* Line 1806 of yacc.c */
-#line 1294 "parser.y"
+#line 1303 "parser.y"
{ if (first((yyvsp[(2) - (3)].val)) == chr('^'))
{ if (rest((yyvsp[(2) - (3)].val)))
(yyval.val) = cons(cset_s, rest((yyvsp[(2) - (3)].val)));
@@ -6282,14 +6291,14 @@ yyreduce:
case 379:
/* Line 1806 of yacc.c */
-#line 1301 "parser.y"
+#line 1310 "parser.y"
{ (yyval.val) = cons(set_s, nil); }
break;
case 380:
/* Line 1806 of yacc.c */
-#line 1302 "parser.y"
+#line 1311 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("regex character class")); }
break;
@@ -6297,56 +6306,56 @@ yyreduce:
case 381:
/* Line 1806 of yacc.c */
-#line 1304 "parser.y"
+#line 1313 "parser.y"
{ (yyval.val) = wild_s; }
break;
case 382:
/* Line 1806 of yacc.c */
-#line 1305 "parser.y"
+#line 1314 "parser.y"
{ (yyval.val) = chr(']'); }
break;
case 383:
/* Line 1806 of yacc.c */
-#line 1306 "parser.y"
+#line 1315 "parser.y"
{ (yyval.val) = chr('-'); }
break;
case 384:
/* Line 1806 of yacc.c */
-#line 1307 "parser.y"
+#line 1316 "parser.y"
{ (yyval.val) = chr((yyvsp[(1) - (1)].chr)); }
break;
case 385:
/* Line 1806 of yacc.c */
-#line 1308 "parser.y"
+#line 1317 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 386:
/* Line 1806 of yacc.c */
-#line 1309 "parser.y"
+#line 1318 "parser.y"
{ (yyval.val) = list(compound_s, string_own((yyvsp[(1) - (1)].lexeme)), nao); }
break;
case 387:
/* Line 1806 of yacc.c */
-#line 1310 "parser.y"
+#line 1319 "parser.y"
{ (yyval.val) = (yyvsp[(2) - (3)].val); }
break;
case 388:
/* Line 1806 of yacc.c */
-#line 1311 "parser.y"
+#line 1320 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("regex subexpression")); }
break;
@@ -6354,133 +6363,133 @@ yyreduce:
case 389:
/* Line 1806 of yacc.c */
-#line 1315 "parser.y"
+#line 1324 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (1)].val), nil); }
break;
case 390:
/* Line 1806 of yacc.c */
-#line 1316 "parser.y"
+#line 1325 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (2)].val), (yyvsp[(2) - (2)].val)); }
break;
case 391:
/* Line 1806 of yacc.c */
-#line 1319 "parser.y"
+#line 1328 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 392:
/* Line 1806 of yacc.c */
-#line 1320 "parser.y"
+#line 1329 "parser.y"
{ (yyval.val) = chr((yyvsp[(1) - (1)].chr)); }
break;
case 393:
/* Line 1806 of yacc.c */
-#line 1321 "parser.y"
+#line 1330 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 394:
/* Line 1806 of yacc.c */
-#line 1324 "parser.y"
+#line 1333 "parser.y"
{ (yyval.val) = cons(chr((yyvsp[(1) - (3)].chr)), chr((yyvsp[(3) - (3)].chr))); }
break;
case 395:
/* Line 1806 of yacc.c */
-#line 1326 "parser.y"
+#line 1335 "parser.y"
{ (yyval.chr) = '?'; }
break;
case 396:
/* Line 1806 of yacc.c */
-#line 1327 "parser.y"
+#line 1336 "parser.y"
{ (yyval.chr) = '.'; }
break;
case 397:
/* Line 1806 of yacc.c */
-#line 1328 "parser.y"
+#line 1337 "parser.y"
{ (yyval.chr) = '*'; }
break;
case 398:
/* Line 1806 of yacc.c */
-#line 1329 "parser.y"
+#line 1338 "parser.y"
{ (yyval.chr) = '+'; }
break;
case 399:
/* Line 1806 of yacc.c */
-#line 1330 "parser.y"
+#line 1339 "parser.y"
{ (yyval.chr) = '('; }
break;
case 400:
/* Line 1806 of yacc.c */
-#line 1331 "parser.y"
+#line 1340 "parser.y"
{ (yyval.chr) = ')'; }
break;
case 401:
/* Line 1806 of yacc.c */
-#line 1332 "parser.y"
+#line 1341 "parser.y"
{ (yyval.chr) = '|'; }
break;
case 402:
/* Line 1806 of yacc.c */
-#line 1333 "parser.y"
+#line 1342 "parser.y"
{ (yyval.chr) = '~'; }
break;
case 403:
/* Line 1806 of yacc.c */
-#line 1334 "parser.y"
+#line 1343 "parser.y"
{ (yyval.chr) = '&'; }
break;
case 404:
/* Line 1806 of yacc.c */
-#line 1335 "parser.y"
+#line 1344 "parser.y"
{ (yyval.chr) = '%'; }
break;
case 405:
/* Line 1806 of yacc.c */
-#line 1336 "parser.y"
+#line 1345 "parser.y"
{ (yyval.chr) = '/'; }
break;
case 406:
/* Line 1806 of yacc.c */
-#line 1337 "parser.y"
+#line 1346 "parser.y"
{ (yyval.chr) = (yyvsp[(1) - (1)].chr); }
break;
case 407:
/* Line 1806 of yacc.c */
-#line 1340 "parser.y"
+#line 1349 "parser.y"
{ switch ((yyvsp[(1) - (1)].chr))
{ case 's':
(yyval.val) = space_k; break;
@@ -6499,7 +6508,7 @@ yyreduce:
case 409:
/* Line 1806 of yacc.c */
-#line 1355 "parser.y"
+#line 1364 "parser.y"
{ yyerr("newline expected after directive");
yyerrok; }
break;
@@ -6507,14 +6516,14 @@ yyreduce:
case 410:
/* Line 1806 of yacc.c */
-#line 1359 "parser.y"
+#line 1368 "parser.y"
{ (yyval.val) = null_string; }
break;
case 411:
/* Line 1806 of yacc.c */
-#line 1360 "parser.y"
+#line 1369 "parser.y"
{ (yyval.val) = (yyvsp[(2) - (3)].val);
rl((yyval.val), num(parser->lineno)); }
break;
@@ -6522,7 +6531,7 @@ yyreduce:
case 412:
/* Line 1806 of yacc.c */
-#line 1362 "parser.y"
+#line 1371 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("string literal")); }
break;
@@ -6530,7 +6539,7 @@ yyreduce:
case 413:
/* Line 1806 of yacc.c */
-#line 1366 "parser.y"
+#line 1375 "parser.y"
{ wchar_t ch;
val str = string_own((yyvsp[(2) - (2)].lexeme));
const wchar_t *cstr = c_str(str);
@@ -6549,7 +6558,7 @@ yyreduce:
case 414:
/* Line 1806 of yacc.c */
-#line 1379 "parser.y"
+#line 1388 "parser.y"
{ (yyval.val) = chr((yyvsp[(2) - (2)].chr));
end_of_char(scnr); }
break;
@@ -6557,7 +6566,7 @@ yyreduce:
case 415:
/* Line 1806 of yacc.c */
-#line 1381 "parser.y"
+#line 1390 "parser.y"
{ free((yyvsp[(2) - (2)].lexeme));
yyerrorf(scnr,
lit("invalid UTF-8 used as character name"),
@@ -6567,7 +6576,7 @@ yyreduce:
case 416:
/* Line 1806 of yacc.c */
-#line 1385 "parser.y"
+#line 1394 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar,
lit("character literal")); }
@@ -6576,14 +6585,14 @@ yyreduce:
case 417:
/* Line 1806 of yacc.c */
-#line 1390 "parser.y"
+#line 1399 "parser.y"
{ (yyval.val) = null_string; }
break;
case 418:
/* Line 1806 of yacc.c */
-#line 1391 "parser.y"
+#line 1400 "parser.y"
{ (yyval.val) = cons(quasi_s, (yyvsp[(2) - (3)].val));
rlc((yyval.val), (yyvsp[(2) - (3)].val));
rl((yyval.val), num(parser->lineno)); }
@@ -6592,7 +6601,7 @@ yyreduce:
case 419:
/* Line 1806 of yacc.c */
-#line 1394 "parser.y"
+#line 1403 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("quasistring")); }
break;
@@ -6600,7 +6609,7 @@ yyreduce:
case 420:
/* Line 1806 of yacc.c */
-#line 1398 "parser.y"
+#line 1407 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (1)].val), nil);
rl((yyval.val), num(parser->lineno)); }
break;
@@ -6608,7 +6617,7 @@ yyreduce:
case 421:
/* Line 1806 of yacc.c */
-#line 1400 "parser.y"
+#line 1409 "parser.y"
{ (yyval.val) = cons((yyvsp[(1) - (2)].val), (yyvsp[(2) - (2)].val));
rl((yyval.val), num(parser->lineno)); }
break;
@@ -6616,21 +6625,21 @@ yyreduce:
case 422:
/* Line 1806 of yacc.c */
-#line 1404 "parser.y"
+#line 1413 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 423:
/* Line 1806 of yacc.c */
-#line 1405 "parser.y"
+#line 1414 "parser.y"
{ (yyval.val) = (yyvsp[(1) - (1)].val); }
break;
case 424:
/* Line 1806 of yacc.c */
-#line 1406 "parser.y"
+#line 1415 "parser.y"
{ (yyval.val) = cons(var_s, cons((yyvsp[(1) - (1)].val), nil));
rl((yyval.val), num(parser->lineno)); }
break;
@@ -6638,7 +6647,7 @@ yyreduce:
case 425:
/* Line 1806 of yacc.c */
-#line 1408 "parser.y"
+#line 1417 "parser.y"
{ if (integerp((yyvsp[(2) - (2)].val)) || symbolp((yyvsp[(2) - (2)].val)))
(yyval.val) = rlcp_tree(cons(var_s, cons((yyvsp[(2) - (2)].val), nil)),
(yyvsp[(2) - (2)].val));
@@ -6649,14 +6658,14 @@ yyreduce:
case 426:
/* Line 1806 of yacc.c */
-#line 1415 "parser.y"
+#line 1424 "parser.y"
{ (yyval.val) = mkstring(one, chr((yyvsp[(1) - (1)].chr))); }
break;
case 427:
/* Line 1806 of yacc.c */
-#line 1416 "parser.y"
+#line 1425 "parser.y"
{ val ch = mkstring(one, chr((yyvsp[(1) - (2)].chr)));
(yyval.val) = string_extend(ch, (yyvsp[(2) - (2)].val)); }
break;
@@ -6664,63 +6673,63 @@ yyreduce:
case 428:
/* Line 1806 of yacc.c */
-#line 1418 "parser.y"
+#line 1427 "parser.y"
{ (yyval.val) = string_own((yyvsp[(1) - (1)].lexeme)); }
break;
case 429:
/* Line 1806 of yacc.c */
-#line 1419 "parser.y"
+#line 1428 "parser.y"
{ (yyval.val) = string_extend(string_own((yyvsp[(1) - (2)].lexeme)), (yyvsp[(2) - (2)].val)); }
break;
case 430:
/* Line 1806 of yacc.c */
-#line 1422 "parser.y"
+#line 1431 "parser.y"
{ (yyval.val) = mkstring(one, chr((yyvsp[(1) - (1)].chr))); }
break;
case 431:
/* Line 1806 of yacc.c */
-#line 1423 "parser.y"
+#line 1432 "parser.y"
{ (yyval.val) = string_extend((yyvsp[(1) - (2)].val), chr((yyvsp[(2) - (2)].chr))); }
break;
case 432:
/* Line 1806 of yacc.c */
-#line 1424 "parser.y"
+#line 1433 "parser.y"
{ (yyval.val) = string_own((yyvsp[(1) - (1)].lexeme)); }
break;
case 433:
/* Line 1806 of yacc.c */
-#line 1425 "parser.y"
+#line 1434 "parser.y"
{ (yyval.val) = string_extend((yyvsp[(1) - (2)].val), string_own((yyvsp[(2) - (2)].lexeme))); }
break;
case 434:
/* Line 1806 of yacc.c */
-#line 1428 "parser.y"
+#line 1437 "parser.y"
{ (yyval.val) = nil; }
break;
case 435:
/* Line 1806 of yacc.c */
-#line 1429 "parser.y"
+#line 1438 "parser.y"
{ (yyval.val) = (yyvsp[(2) - (2)].val); }
break;
case 436:
/* Line 1806 of yacc.c */
-#line 1430 "parser.y"
+#line 1439 "parser.y"
{ val word = (yyvsp[(1) - (2)].val);
(yyval.val) = rlc(cons(word, (yyvsp[(2) - (2)].val)), (yyvsp[(1) - (2)].val)); }
break;
@@ -6728,7 +6737,7 @@ yyreduce:
case 437:
/* Line 1806 of yacc.c */
-#line 1432 "parser.y"
+#line 1441 "parser.y"
{ (yyval.val) = nil;
yybadtok(yychar, lit("word list")); }
break;
@@ -6736,21 +6745,21 @@ yyreduce:
case 438:
/* Line 1806 of yacc.c */
-#line 1436 "parser.y"
+#line 1445 "parser.y"
{ (yyval.val) = nil; }
break;
case 439:
/* Line 1806 of yacc.c */
-#line 1437 "parser.y"
+#line 1446 "parser.y"
{ (yyval.val) = (yyvsp[(2) - (2)].val); }
break;
case 440:
/* Line 1806 of yacc.c */
-#line 1438 "parser.y"
+#line 1447 "parser.y"
{ val qword = cons(quasi_s, (yyvsp[(1) - (2)].val));
(yyval.val) = rlc(cons(qword, nil), (yyvsp[(1) - (2)].val)); }
break;
@@ -6758,7 +6767,7 @@ yyreduce:
case 441:
/* Line 1806 of yacc.c */
-#line 1442 "parser.y"
+#line 1451 "parser.y"
{ val qword = cons(quasi_s, (yyvsp[(1) - (3)].val));
(yyval.val) = rlc(cons(qword, (yyvsp[(3) - (3)].val)), (yyvsp[(1) - (3)].val)); }
break;
@@ -6766,7 +6775,7 @@ yyreduce:
case 442:
/* Line 1806 of yacc.c */
-#line 1446 "parser.y"
+#line 1455 "parser.y"
{ (yyval.val) = make_buf(zero, nil, nil);
end_of_buflit(scnr); }
break;
@@ -6774,7 +6783,7 @@ yyreduce:
case 443:
/* Line 1806 of yacc.c */
-#line 1448 "parser.y"
+#line 1457 "parser.y"
{ end_of_buflit(scnr);
buf_trim((yyvsp[(2) - (3)].val));
(yyval.val) = (yyvsp[(2) - (3)].val); }
@@ -6783,7 +6792,7 @@ yyreduce:
case 444:
/* Line 1806 of yacc.c */
-#line 1451 "parser.y"
+#line 1460 "parser.y"
{ yyerr("unterminated buffer literal");
end_of_buflit(scnr);
yyerrok; }
@@ -6792,7 +6801,7 @@ yyreduce:
case 445:
/* Line 1806 of yacc.c */
-#line 1456 "parser.y"
+#line 1465 "parser.y"
{ buf_put_u8((yyvsp[(1) - (2)].val), length_buf((yyval.val)), (yyvsp[(2) - (2)].val));
(yyval.val) = (yyvsp[(1) - (2)].val); }
break;
@@ -6800,7 +6809,7 @@ yyreduce:
case 446:
/* Line 1806 of yacc.c */
-#line 1458 "parser.y"
+#line 1467 "parser.y"
{ (yyval.val) = make_buf(zero, nil, num_fast(512));
buf_put_u8((yyval.val), zero, (yyvsp[(1) - (1)].val)); }
break;
@@ -6808,14 +6817,14 @@ yyreduce:
case 447:
/* Line 1806 of yacc.c */
-#line 1462 "parser.y"
+#line 1471 "parser.y"
{ (yyval.val) = num((yyvsp[(1) - (2)].chr) << 4 | (yyvsp[(2) - (2)].chr)); }
break;
case 448:
/* Line 1806 of yacc.c */
-#line 1463 "parser.y"
+#line 1472 "parser.y"
{ (yyval.val) = zero;
yyerr("unpaired digit in buffer literal");
yyerrok; }
@@ -6824,119 +6833,119 @@ yyreduce:
case 449:
/* Line 1806 of yacc.c */
-#line 1470 "parser.y"
+#line 1479 "parser.y"
{ (yyval.val) = mkexp(all_s, nil, num(parser->lineno)); }
break;
case 450:
/* Line 1806 of yacc.c */
-#line 1471 "parser.y"
+#line 1480 "parser.y"
{ (yyval.val) = mkexp(some_s, nil, num(parser->lineno)); }
break;
case 451:
/* Line 1806 of yacc.c */
-#line 1472 "parser.y"
+#line 1481 "parser.y"
{ (yyval.val) = mkexp(none_s, nil, num(parser->lineno)); }
break;
case 452:
/* Line 1806 of yacc.c */
-#line 1473 "parser.y"
+#line 1482 "parser.y"
{ (yyval.val) = mkexp(maybe_s, nil, num(parser->lineno)); }
break;
case 453:
/* Line 1806 of yacc.c */
-#line 1474 "parser.y"
+#line 1483 "parser.y"
{ (yyval.val) = mkexp(cases_s, nil, num(parser->lineno)); }
break;
case 454:
/* Line 1806 of yacc.c */
-#line 1475 "parser.y"
+#line 1484 "parser.y"
{ (yyval.val) = mkexp(and_s, nil, num(parser->lineno)); }
break;
case 455:
/* Line 1806 of yacc.c */
-#line 1476 "parser.y"
+#line 1485 "parser.y"
{ (yyval.val) = mkexp(or_s, nil, num(parser->lineno)); }
break;
case 456:
/* Line 1806 of yacc.c */
-#line 1477 "parser.y"
+#line 1486 "parser.y"
{ (yyval.val) = mkexp(try_s, nil, num(parser->lineno)); }
break;
case 457:
/* Line 1806 of yacc.c */
-#line 1478 "parser.y"
+#line 1487 "parser.y"
{ (yyval.val) = mkexp(finally_s, nil, num(parser->lineno)); }
break;
case 458:
/* Line 1806 of yacc.c */
-#line 1480 "parser.y"
+#line 1489 "parser.y"
{ (yyval.val) = mkexp(block_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 459:
/* Line 1806 of yacc.c */
-#line 1482 "parser.y"
+#line 1491 "parser.y"
{ (yyval.val) = mkexp(choose_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 460:
/* Line 1806 of yacc.c */
-#line 1484 "parser.y"
+#line 1493 "parser.y"
{ (yyval.val) = mkexp(collect_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 461:
/* Line 1806 of yacc.c */
-#line 1486 "parser.y"
+#line 1495 "parser.y"
{ (yyval.val) = mkexp(coll_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 462:
/* Line 1806 of yacc.c */
-#line 1488 "parser.y"
+#line 1497 "parser.y"
{ (yyval.val) = mkexp(gather_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 463:
/* Line 1806 of yacc.c */
-#line 1490 "parser.y"
+#line 1499 "parser.y"
{ (yyval.val) = mkexp(define_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 464:
/* Line 1806 of yacc.c */
-#line 1492 "parser.y"
+#line 1501 "parser.y"
{ (yyval.val) = mkexp(catch_s, (yyvsp[(2) - (3)].val), nil); }
break;
case 465:
/* Line 1806 of yacc.c */
-#line 1494 "parser.y"
+#line 1503 "parser.y"
{ (yyval.val) = mkexp(if_s,
cons((yyvsp[(2) - (5)].val),
cons((yyvsp[(3) - (5)].val), (yyvsp[(4) - (5)].val))),
@@ -6946,14 +6955,14 @@ yyreduce:
case 466:
/* Line 1806 of yacc.c */
-#line 1499 "parser.y"
+#line 1508 "parser.y"
{ yyerr("@(output) doesn't nest"); }
break;
/* Line 1806 of yacc.c */
-#line 6987 "y.tab.c"
+#line 6996 "y.tab.c"
default: break;
}
/* User semantic actions sometimes alter yychar, and that requires
@@ -7184,7 +7193,7 @@ yyreturn:
/* Line 2067 of yacc.c */
-#line 1503 "parser.y"
+#line 1512 "parser.y"
const int have_yydebug = YYDEBUG;