;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters, ;;; and so cannot be loaded into Emacs 22 or earlier. (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (string-lessp emacs-version "23") (error "`%s' was compiled for Emacs 23 or later" #$)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\303\304\305\306\304\307\310\307\311\307&\"\210\303\312\305\306\312\307\313\307\311\307&\"\210\303\314\305\306\314\307\315\307\311\307&\"\210\303\316\305\306\316\307\317\307\311\307&\"\210\303\320\305\306\320\307\321\307\311\307&\"\210\303\322\305\306\322\307\323\307\311\307&\"\210\303\324\305\306\324\307\325\307\311\307&\"\210\303\326\305\306\326\307\327\307\311\307&\"\210\303\330\305\306\330\307\331\307\311\307&\"\210\303\332\305\306\332\307\333\307\311\307&\"\210\303\334\305\306\334\307\335\307\311\307&\"\210\303\336\305\306\336\307\337\307\311\307&\"\210\303\340\305\306\340\307\341\307\311\307&\"\210\303\342\305\306\342\307\343\307\311\307&\"\210\303\344\305\306\344\307\345\307\311\307&\"\210\303\346\305\306\346\307\347\307\311\307&\"\210\303\350\305\306\350\307\351\307\311\307&\"\210\303\352\305\306\352\307\353\307\311\307&\"\210\303\354\305\306\354\307\355\307\311\307&\"\210\303\356\305\306\356\307\357\307\311\307&\"\210\303\360\305\306\360\307\361\307\311\307&\"\210\303\362\305\306\362\307\363\307\311\307&\"\210\303\364\305\306\364\307\365\307\311\307&\"\210\303\366\305\306\366\307\367\307\311\307&\"\210\370\371!\207" [require xr ert ert-set-test xr-basic record ert-test nil #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\304C\3351\336\336C0\202\351\307\240\210\211@AD\262\337C\311C\311\312\313\340\315\316!\341\"\342$\3431\312\313\314\315\316\n\n\n\n$\344\"\320$\216\321\242\"\240)0\202.\345\262\346\347\311$\210\240\262\210\204=\322\350 \351\352D\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #1="a\\$b\\\\c\\[\\]\\q" #2="a$b\\c[]q" signal #3=#:ert-form-evaluation-aborted-980 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #1#) #2#)) :form eql #3# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #4="\\(?:ab\\|c*d\\)?" #5=(opt (or "ab" (seq (zero-or-more "c") "d"))) #6=#:ert-form-evaluation-aborted-985 [(should (equal (xr #4#) '#5#)) :form eql #6# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #7=".+" #8=(one-or-more nonl) #9=#:ert-form-evaluation-aborted-990 [(should (equal (xr #7#) '#8#)) :form eql #9# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #10="b\\" #11=#:ert-form-evaluation-aborted-995 "\300\242\207" #48=[] 1 (error) [(should-error (xr #10#)) :form eql #11# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51="did not signal an error"] 15] :passed xr-repeat #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\301C\3351\344\303\304\336!)\337D0\202\357\307\240\210\211@AD\262\340C\311C\312\313\314\315\316$\341\"\320$\216\321\242\"\240)\204\322\242!\210\266\301C\3421*\303\304\343!)\344D0\2025\307\240\210\211@AD\262\345C\311C\312\313\314\315\316$\346\"\320$\216\321\242\"\240)\204\\\322\242!\210\266\301C\3471p\303\304\350!)\351D0\202{\307\240\210\211@AD\262\352C\311C\312\313\314\315\316$\353\"\320$\216\321\242\"\240)\204\242\322\242!\210\266\301C\3541\266\303\304\355!)\356D0\202\301\307\240\210\211@AD\262\357C\311C\312\313\314\315\316$\360\"\320$\216\321\242\"\240)\204\350\322\242!\210\266\301C\3611\374\303\304\362!)\363D0\202\307\240\210\211@AD\262\364C\311C\312\313\314\315\316$\365\"\320$\216\321\242\"\240)\204.\322\242!\210\266\301C\3661B\303\304\367!)\370D0\202M\307\240\210\211@AD\262\371C\311C\312\313\314\315\316$\372\"\320$\216\321\242\"\240)\204t\322\242!\210\266\301C\3731\210\303\304\374!)\375D0\202\223\307\240\210\211@AD\262\376C\311C\312\313\314\315\316$\377\"\320$\216\321\242\"\240)\204\272\322\242!\210\266\301C\201@1\324\303\304\201A!)\201BD0\202\337\307\240\210\211@AD\262\201CC\311C\312\313\314\315\316$\201D\"\320$\216\321\242\"\240)\204\n\322\242!\210\266\301C\201E1$\303\304\201F!)\201GD0\202/\307\240\210\211@AD\262\201HC\311C\312\313\314\315\316$\201I\"\320$\216\321\242\"\240)\204Z\322\242!\210\266\304C\201J1l\201KC0\202w\307\240\210\211@AD\262\201LC\311C\311\312\313\201M\315\316!\201N\"\201O$\201P1\271\312\313\314\315\316\n\n\n\n$\201Q\"\320$\216\321\242\"\240)0\202\316\201R\262\201S\201T\311$\210\240\262\210\204\343\322\201U \201V\201WD\"!\210\266\304C\201X1\365\201YC0\202\307\240\210\211@AD\262\201ZC\311C\311\312\313\201M\315\316!\201N\"\201O$\201[1B\312\313\314\315\316\n\n\n\n$\201\\\"\320$\216\321\242\"\240)0\202W\201R\262\201S\201T\311$\210\240\262\210\204l\322\201U \201V\201WD\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #12="\\(?:x?y\\)\\{3\\}" #13=(= 3 (opt "x") "y") signal #14=#:ert-form-evaluation-aborted-1002 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #12#) '#13#)) :form eql #14# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #15="\\(?:x?y\\)\\{3,8\\}" #16=(repeat 3 8 (opt "x") "y") #17=#:ert-form-evaluation-aborted-1007 [(should (equal (xr #15#) '#16#)) :form eql #17# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #18="\\(?:x?y\\)\\{3,\\}" #19=(>= 3 (opt "x") "y") #20=#:ert-form-evaluation-aborted-1012 [(should (equal (xr #18#) '#19#)) :form eql #20# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #21="\\(?:x?y\\)\\{,8\\}" #22=(repeat 0 8 (opt "x") "y") #23=#:ert-form-evaluation-aborted-1017 [(should (equal (xr #21#) '#22#)) :form eql #23# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #24="\\(?:xy\\)\\{4,4\\}" #25=(= 4 "xy") #26=#:ert-form-evaluation-aborted-1022 [(should (equal (xr #24#) '#25#)) :form eql #26# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #27="a\\{,\\}" #28=(zero-or-more "a") #29=#:ert-form-evaluation-aborted-1027 [(should (equal (xr #27#) '#28#)) :form eql #29# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #30="a\\{0\\}" #31=(repeat 0 0 "a") #32=#:ert-form-evaluation-aborted-1032 [(should (equal (xr #30#) '#31#)) :form eql #32# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #33="a\\{0,\\}" #34=(zero-or-more "a") #35=#:ert-form-evaluation-aborted-1037 [(should (equal (xr #33#) '#34#)) :form eql #35# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #36="a\\{0,0\\}" #37=(repeat 0 0 "a") #38=#:ert-form-evaluation-aborted-1042 [(should (equal (xr #36#) '#37#)) :form eql #38# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #39="a\\{\\}" #40=(repeat 0 0 "a") #41=#:ert-form-evaluation-aborted-1047 [(should (equal (xr #39#) '#40#)) :form eql #41# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #42="a\\{,1\\}" #43=(repeat 0 1 "a") #44=#:ert-form-evaluation-aborted-1052 [(should (equal (xr #42#) '#43#)) :form eql #44# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #45="a\\{1,\\}" #46=(>= 1 "a") #47=#:ert-form-evaluation-aborted-1057 [(should (equal (xr #45#) '#46#)) :form eql #47# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #49="a\\{3,2\\}" #50=#:ert-form-evaluation-aborted-1062 "\300\242\207" #48# 1 (error) [(should-error (xr #49#)) :form eql #50# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51# (error) #52="a\\{1,2,3\\}" #53=#:ert-form-evaluation-aborted-1069 (error) [(should-error (xr #52#)) :form eql #53# :value xr ert-explainer :explanation apply ert--signal-should-execution]] 15] xr-backref #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\304C\3301\230\331C0\202\243\307\240\210\211@AD\262\332C\311C\311\312\313\333\315\316!\334\"\335$\3361\331\312\313\314\315\316\n\n\n\n$\337\"\320$\216\321\242\"\240)0\202\350\340\262\341\342\311$\210\240\262\210\204\367\322\343 \344\345D\"!\210\266\304C\3461\347C0\202\307\240\210\211@AD\262\350C\311C\311\312\313\333\315\316!\334\"\335$\3511F\312\313\314\315\316\n\n\n\n$\352\"\320$\216\321\242\"\240)0\202U\340\262\341\342\311$\210\240\262\210\204d\322\343 \344\345D\"!\210\266\304C\3531r\354C0\202}\307\240\210\211@AD\262\355C\311C\311\312\313\333\315\316!\334\"\335$\3561\263\312\313\314\315\316\n\n\n\n$\357\"\320$\216\321\242\"\240)0\202\302\340\262\341\342\311$\210\240\262\210\204\321\322\343 \344\345D\"!\210\266\301C\3601\345\303\304\361!)\362D0\202\360\307\240\210\211@AD\262\363C\311C\312\313\314\315\316$\364\"\320$\216\321\242\"\240)\204\322\242!\210\266\304C\3651%\366C0\2020\307\240\210\211@AD\262\367C\311C\311\312\313\333\315\316!\334\"\335$\3701f\312\313\314\315\316\n\n\n\n$\371\"\320$\216\321\242\"\240)0\202u\340\262\341\342\311$\210\240\262\210\204\204\322\343 \344\345D\"!\210\266\304C\3721\222\373C0\202\235\307\240\210\211@AD\262\374C\311C\311\312\313\333\315\316!\334\"\335$\3751\323\312\313\314\315\316\n\n\n\n$\376\"\320$\216\321\242\"\240)0\202\342\340\262\341\342\311$\210\240\262\210\204\361\322\343 \344\345D\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #54="\\(ab\\)\\(?3:cd\\)\\1\\3" #55=(seq (group "ab") (group-n 3 "cd") (backref 1) (backref 3)) signal #56=#:ert-form-evaluation-aborted-1076 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #54#) '#55#)) :form eql #56# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #57="\\01" #58="01" #59=#:ert-form-evaluation-aborted-1081 [(should (equal (xr #57#) #58#)) :form eql #59# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #60="\\(?abc\\)" #61=#:ert-form-evaluation-aborted-1086 "\300\242\207" #48# 1 (error) [(should-error (xr #60#)) :form eql #61# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51# (error) #62="\\(?2\\)" #63=#:ert-form-evaluation-aborted-1093 (error) [(should-error (xr #62#)) :form eql #63# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #64="\\(?0:xy\\)" #65=#:ert-form-evaluation-aborted-1100 (error) [(should-error (xr #64#)) :form eql #65# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #66="\\(?29:xy\\)" #67=(group-n 29 "xy") #68=#:ert-form-evaluation-aborted-1107 [(should (equal (xr #66#) '#67#)) :form eql #68# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #69="\\(c?" #70=#:ert-form-evaluation-aborted-1112 (error) [(should-error (xr #69#)) :form eql #70# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #71="xy\\)" #72=#:ert-form-evaluation-aborted-1119 (error) [(should-error (xr #71#)) :form eql #72# :value xr ert-explainer :explanation apply ert--signal-should-execution]] 15] xr-misc #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\304C\3231R\324C0\202]\307\240\210\211@AD\262\325C\311C\311\312\313\326\315\316!\327\"\330$\3311\223\312\313\314\315\316\n\n\n\n$\332\"\320$\216\321\242\"\240)0\202\242\333\262\334\335\311$\210\240\262\210\204\261\322\336 \337\340D\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #73="^.\\w\\W\\`\\'\\=\\b\\B\\<\\>\\_<\\_>$" #74=(seq bol nonl wordchar not-wordchar bos eos point word-boundary not-word-boundary bow eow symbol-start symbol-end eol) signal #75=#:ert-form-evaluation-aborted-1126 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #73#) '#74#)) :form eql #75# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #76="\\_a" #77=#:ert-form-evaluation-aborted-1131 "\300\242\207" #48# 1 (error) [(should-error (xr #76#)) :form eql #77# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51#] 15] xr-syntax #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\304C\3351\336\336C0\202\351\307\240\210\211@AD\262\337C\311C\311\312\313\340\315\316!\341\"\342$\3431\312\313\314\315\316\n\n\n\n$\344\"\320$\216\321\242\"\240)0\202.\345\262\346\347\311$\210\240\262\210\204=\322\350 \351\352D\"!\210\266\304C\3531K\354C0\202V\307\240\210\211@AD\262\355C\311C\311\312\313\340\315\316!\341\"\342$\3561\214\312\313\314\315\316\n\n\n\n$\357\"\320$\216\321\242\"\240)0\202\233\345\262\346\347\311$\210\240\262\210\204\252\322\350 \351\352D\"!\210\266\304C\3601\270\361C0\202\303\307\240\210\211@AD\262\362C\311C\311\312\313\340\315\316!\341\"\342$\3631\371\312\313\314\315\316\n\n\n\n$\364\"\320$\216\321\242\"\240)0\202\345\262\346\347\311$\210\240\262\210\204\322\350 \351\352D\"!\210\266\304C\3651%\366C0\2020\307\240\210\211@AD\262\367C\311C\311\312\313\340\315\316!\341\"\342$\3701f\312\313\314\315\316\n\n\n\n$\371\"\320$\216\321\242\"\240)0\202u\345\262\346\347\311$\210\240\262\210\204\204\322\350 \351\352D\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #78="\\s-\\s \\sw\\sW\\s_\\s.\\s(\\s)\\s\"" #79=(seq (syntax whitespace) (syntax whitespace) (syntax word) (syntax word) (syntax symbol) (syntax punctuation) (syntax open-parenthesis) (syntax close-parenthesis) (syntax string-quote)) signal #80=#:ert-form-evaluation-aborted-1138 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #78#) '#79#)) :form eql #80# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #81="\\s\\\\s/\\s$\\s'\\s<\\s>\\s!\\s|" #82=(seq (syntax escape) (syntax character-quote) (syntax paired-delimiter) (syntax expression-prefix) (syntax comment-start) (syntax comment-end) (syntax comment-delimiter) (syntax string-delimiter)) #83=#:ert-form-evaluation-aborted-1143 [(should (equal (xr #81#) '#82#)) :form eql #83# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #84="\\S-\\S<" #85=(seq (not (syntax whitespace)) (not (syntax comment-start))) #86=#:ert-form-evaluation-aborted-1148 [(should (equal (xr #84#) '#85#)) :form eql #86# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #87="\\s" #88=#:ert-form-evaluation-aborted-1153 "\300\242\207" #48# 1 (error) [(should-error (xr #87#)) :form eql #88# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51# (error) #89="\\S" #90=#:ert-form-evaluation-aborted-1160 (error) [(should-error (xr #89#)) :form eql #90# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #91="\\sq" #92=#:ert-form-evaluation-aborted-1167 (error) [(should-error (xr #91#)) :form eql #92# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #93="\\Sq" #94=#:ert-form-evaluation-aborted-1174 (error) [(should-error (xr #93#)) :form eql #94# :value xr ert-explainer :explanation apply ert--signal-should-execution]] 15] xr-category #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\301C\3351\344\303\304\336!)\337D0\202\357\307\240\210\211@AD\262\340C\311C\312\313\314\315\316$\341\"\320$\216\321\242\"\240)\204\322\242!\210\266\301C\3421*\303\304\343!)\344D0\2025\307\240\210\211@AD\262\345C\311C\312\313\314\315\316$\346\"\320$\216\321\242\"\240)\204\\\322\242!\210\266\301C\3471p\303\304\350!)\351D0\202{\307\240\210\211@AD\262\352C\311C\312\313\314\315\316$\353\"\320$\216\321\242\"\240)\204\242\322\242!\210\266\301C\3541\266\303\304\355!)\356D0\202\301\307\240\210\211@AD\262\357C\311C\312\313\314\315\316$\360\"\320$\216\321\242\"\240)\204\350\322\242!\210\266\304C\3611\366\362C0\202\307\240\210\211@AD\262\363C\311C\311\312\313\364\315\316!\365\"\366$\36717\312\313\314\315\316\n\n\n\n$\370\"\320$\216\321\242\"\240)0\202F\371\262\372\373\311$\210\240\262\210\204U\322\374 \375\376D\"!\210\266\304C\3771e\201@C0\202p\307\240\210\211@AD\262\201AC\311C\311\312\313\364\315\316!\365\"\366$\201B1\254\312\313\314\315\316\n\n\n\n$\201C\"\320$\216\321\242\"\240)0\202\273\371\262\372\373\311$\210\240\262\210\204\312\322\374 \375\376D\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #95="\\c0\\c1\\c2\\c3\\c4\\c5\\c6\\c7\\c8\\c9\\c<\\c>" #96=(seq (category consonant) (category base-vowel) (category upper-diacritical-mark) (category lower-diacritical-mark) (category tone-mark) (category symbol) (category digit) (category vowel-modifying-diacritical-mark) (category vowel-sign) (category semivowel-lower) (category not-at-end-of-line) (category not-at-beginning-of-line)) signal #97=#:ert-form-evaluation-aborted-1181 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #95#) '#96#)) :form eql #97# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #98="\\cA\\cC\\cG\\cH\\cI\\cK\\cN\\cY\\c^" #99=(seq (category alpha-numeric-two-byte) (category chinese-two-byte) (category greek-two-byte) (category japanese-hiragana-two-byte) (category indian-two-byte) (category japanese-katakana-two-byte) (category korean-hangul-two-byte) (category cyrillic-two-byte) (category combining-diacritic)) #100=#:ert-form-evaluation-aborted-1186 [(should (equal (xr #98#) '#99#)) :form eql #100# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #101="\\ca\\cb\\cc\\ce\\cg\\ch\\ci\\cj\\ck\\cl\\co\\cq\\cr" #102=(seq (category ascii) (category arabic) (category chinese) (category ethiopic) (category greek) (category korean) (category indian) (category japanese) (category japanese-katakana) (category latin) (category lao) (category tibetan) (category japanese-roman)) #103=#:ert-form-evaluation-aborted-1191 [(should (equal (xr #101#) '#102#)) :form eql #103# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #104="\\ct\\cv\\cw\\cy\\c|" #105=(seq (category thai) (category vietnamese) (category hebrew) (category cyrillic) (category can-break)) #106=#:ert-form-evaluation-aborted-1196 [(should (equal (xr #104#) '#105#)) :form eql #106# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #107="\\C2\\C^" #108=(seq (not (category upper-diacritical-mark)) (not (category combining-diacritic))) #109=#:ert-form-evaluation-aborted-1201 [(should (equal (xr #107#) '#108#)) :form eql #109# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #110="\\cR\\C.\\cL\\C " #111=(seq (category strong-right-to-left) (not (category base)) (category strong-left-to-right) (not (category space-for-indent))) #112=#:ert-form-evaluation-aborted-1206 [(should (equal (xr #110#) '#111#)) :form eql #112# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #113="\\c%\\C+" #114=(seq (category 37) (not (category 43))) #115=#:ert-form-evaluation-aborted-1211 [(should (equal (xr #113#) '#114#)) :form eql #115# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #116="\\c" #117=#:ert-form-evaluation-aborted-1216 "\300\242\207" #48# 1 (error) [(should-error (xr #116#)) :form eql #117# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51# (error) #118="\\C" #119=#:ert-form-evaluation-aborted-1223 (error) [(should-error (xr #118#)) :form eql #119# :value xr ert-explainer :explanation apply ert--signal-should-execution]] 15] xr-lazy #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\301C\3351\344\303\304\336!)\337D0\202\357\307\240\210\211@AD\262\340C\311C\312\313\314\315\316$\341\"\320$\216\321\242\"\240)\204\322\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #120="\\(?:a.\\)*?" #121=(*\? "a" nonl) signal #122=#:ert-form-evaluation-aborted-1230 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #120#) '#121#)) :form eql #122# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #123="\\(?:a.\\)+?" #124=(+\? "a" nonl) #125=#:ert-form-evaluation-aborted-1235 [(should (equal (xr #123#) '#124#)) :form eql #125# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #126="\\(?:a.\\)??" #127=(63 "a" nonl) #128=#:ert-form-evaluation-aborted-1240 [(should (equal (xr #126#) '#127#)) :form eql #128# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #129="\\(?:.\\(a+\\(?:b+?c*\\)?\\)??\\)*" #130=(zero-or-more nonl (63 (group (one-or-more "a") (opt (+\? "b") (zero-or-more "c"))))) #131=#:ert-form-evaluation-aborted-1245 [(should (equal (xr #129#) '#130#)) :form eql #131# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 13] xr-char-classes #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\301C\3351\344\303\304\336!)\337D0\202\357\307\240\210\211@AD\262\340C\311C\312\313\314\315\316$\341\"\320$\216\321\242\"\240)\204\322\242!\210\266\301C\3421*\303\304\343!)\344D0\2025\307\240\210\211@AD\262\345C\311C\312\313\314\315\316$\346\"\320$\216\321\242\"\240)\204\\\322\242!\210\266\301C\3471p\303\304\350!)\351D0\202{\307\240\210\211@AD\262\352C\311C\312\313\314\315\316$\353\"\320$\216\321\242\"\240)\204\242\322\242!\210\266\301C\3541\266\303\304\355!)\356D0\202\301\307\240\210\211@AD\262\357C\311C\312\313\314\315\316$\360\"\320$\216\321\242\"\240)\204\350\322\242!\210\266\301C\3611\374\303\304\362!)\363D0\202\307\240\210\211@AD\262\364C\311C\312\313\314\315\316$\365\"\320$\216\321\242\"\240)\204.\322\242!\210\266\301C\3661B\303\304\367!)\370D0\202M\307\240\210\211@AD\262\371C\311C\312\313\314\315\316$\372\"\320$\216\321\242\"\240)\204t\322\242!\210\266\301C\3731\210\303\304\374!)\375D0\202\223\307\240\210\211@AD\262\376C\311C\312\313\314\315\316$\377\"\320$\216\321\242\"\240)\204\272\322\242!\210\266\301C\201@1\324\303\304\201A!)\201BD0\202\337\307\240\210\211@AD\262\201CC\311C\312\313\314\315\316$\201D\"\320$\216\321\242\"\240)\204\n\322\242!\210\266\301C\201E1$\303\304\201F!)\201GD0\202/\307\240\210\211@AD\262\201HC\311C\312\313\314\315\316$\201I\"\320$\216\321\242\"\240)\204Z\322\242!\210\266\301C\201J1t\303\304\201K!)\201LD0\202\307\240\210\211@AD\262\201MC\311C\312\313\314\315\316$\201N\"\320$\216\321\242\"\240)\204\252\322\242!\210\266\301C\201O1\304\303\304\201P!)\201QD0\202\317\307\240\210\211@AD\262\201RC\311C\312\313\314\315\316$\201S\"\320$\216\321\242\"\240)\204\372\322\242!\210\266\301C\201T1\303\304\201U!)\201VD0\202\307\240\210\211@AD\262\201WC\311C\312\313\314\315\316$\201X\"\320$\216\321\242\"\240)\204J\322\242!\210\266\301C\201Y1d\303\304\201Z!)\201[D0\202o\307\240\210\211@AD\262\201\\C\311C\312\313\314\315\316$\201]\"\320$\216\321\242\"\240)\204\232\322\242!\210\266\301C\201^1\264\303\304\201_!)\201`D0\202\277\307\240\210\211@AD\262\201aC\311C\312\313\314\315\316$\201b\"\320$\216\321\242\"\240)\204\352\322\242!\210\266\304C\201c1\374\201dC0\202\307\240\210\211@AD\262\201eC\311C\311\312\313\201f\315\316!\201g\"\201h$\201i1I\312\313\314\315\316\n\n\n\n$\201j\"\320$\216\321\242\"\240)0\202^\201k\262\201l\201m\311$\210\240\262\210\204s\322\201n \201o\201pD\"!\210\266\304C\201q1\205\201rC0\202\220\307\240\210\211@AD\262\201sC\311C\311\312\313\201f\315\316!\201g\"\201h$\201t1\322\312\313\314\315\316\n\n\n\n$\201u\"\320$\216\321\242\"\240)0\202\347\201k\262\201l\201m\311$\210\240\262\210\204\374\322\201n \201o\201pD\"!\210\266\304C\201v1\201wC0\202\307\240\210\211@AD\262\201xC\311C\311\312\313\201f\315\316!\201g\"\201h$\201y1[\312\313\314\315\316\n\n\n\n$\201z\"\320$\216\321\242\"\240)0\202p\201k\262\201l\201m\311$\210\240\262\210\204\205\322\201n \201o\201pD\"!\210\266\304C\201{1\227\201|C0\202\242\307\240\210\211@AD\262\201}C\311C\311\312\313\201f\315\316!\201g\"\201h$\201~1\344\312\313\314\315\316\n\n\n\n$\201\"\320$\216\321\242\"\240)0\202\371\201k\262\201l\201m\311$\210\240\262\210\204\322\201n \201o\201pD\"!\210\266\301C\201\2001(\303\304\201\201!)\201\202D0\2023\307\240\210\211@AD\262\201\203C\311C\312\313\314\315\316$\201\204\"\320$\216\321\242\"\240)\204^\322\242!\210\266\301C\201\2051x\303\304\201\206!)\201\207D0\202\203\307\240\210\211@AD\262\201\210C\311C\312\313\314\315\316$\201\211\"\320$\216\321\242\"\240)\204\256\322\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #132="[[:alnum:][:blank:]][[:alpha:]][[:cntrl:][:digit:]]" #133=(seq (any alnum blank) alpha (any cntrl digit)) signal #134=#:ert-form-evaluation-aborted-1250 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #132#) '#133#)) :form eql #134# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #135="[^[:lower:][:punct:]][^[:space:]]" #136=(seq (not (any lower punct)) (not space)) #137=#:ert-form-evaluation-aborted-1255 [(should (equal (xr #135#) '#136#)) :form eql #137# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #138="^[a-z]*" #139=(seq bol (zero-or-more (any "a-z"))) #140=#:ert-form-evaluation-aborted-1260 [(should (equal (xr #138#) '#139#)) :form eql #140# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #141="some[.]thing" #142="some.thing" #143=#:ert-form-evaluation-aborted-1265 [(should (equal (xr #141#) #142#)) :form eql #143# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #144="[^]-c]" #145=(not (any "]-c")) #146=#:ert-form-evaluation-aborted-1270 [(should (equal (xr #144#) '#145#)) :form eql #146# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #147="[-^]" #148=(any "^-") #149=#:ert-form-evaluation-aborted-1275 [(should (equal (xr #147#) '#148#)) :form eql #149# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #150="[a-z-+/*%0-4[:xdigit:]]" #151=(any "0-4a-z" "%*+/-" xdigit) #152=#:ert-form-evaluation-aborted-1280 [(should (equal (xr #150#) '#151#)) :form eql #152# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #153="[^]A-Za-z-]*" #154=(zero-or-more (not (any "A-Za-z" "]-"))) #155=#:ert-form-evaluation-aborted-1285 [(should (equal (xr #153#) '#154#)) :form eql #155# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #156="[+*%A-Ka-k0-3${-}]" #157=(any "0-3A-Ka-k{-}" "$%*+") #158=#:ert-form-evaluation-aborted-1290 [(should (equal (xr #156#) '#157#)) :form eql #158# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #159="[^\\\\o][A-\\\\][A-\\\\-a]" #160=(seq (not (any "\\o")) (any "A-\\") (any "A-a")) #161=#:ert-form-evaluation-aborted-1295 [(should (equal (xr #159#) '#160#)) :form eql #161# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #162="[^A-FFGI-LI-Mb-da-eg-ki-ns-tz-v]" #163=(not (any "A-FI-Ma-eg-ns-t" "G")) #164=#:ert-form-evaluation-aborted-1300 [(should (equal (xr #162#) '#163#)) :form eql #164# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #165="[z-a][^z-a]" #166=(seq (any) anything) #167=#:ert-form-evaluation-aborted-1305 [(should (equal (xr #165#) '#166#)) :form eql #167# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #168="[[:alpha]]" #169=(seq (any ":[ahlp") "]") #170=#:ert-form-evaluation-aborted-1310 [(should (equal (xr #168#) '#169#)) :form eql #170# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #171="[:alpha:]" #172=(any ":ahlp") #173=#:ert-form-evaluation-aborted-1315 [(should (equal (xr #171#) '#172#)) :form eql #173# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #174="[[:digit:]-z]" #175=(any "z-" digit) #176=#:ert-form-evaluation-aborted-1320 [(should (equal (xr #174#) '#175#)) :form eql #176# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #177="[A-[:digit:]]" #178=(seq (any "A-[" ":dgit") "]") #179=#:ert-form-evaluation-aborted-1325 [(should (equal (xr #177#) '#178#)) :form eql #179# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #180="[^\n]" nonl #181=#:ert-form-evaluation-aborted-1330 [(should (equal (xr #180#) 'nonl)) :form eql #181# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #182="[[::]]" #183=#:ert-form-evaluation-aborted-1335 "\300\242\207" #48# 1 (error) [(should-error (xr #182#)) :form eql #183# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51# (error) #184="[[:=:]]" #185=#:ert-form-evaluation-aborted-1342 (error) [(should-error (xr #184#)) :form eql #185# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #186="[[:letter:]]" #187=#:ert-form-evaluation-aborted-1349 (error) [(should-error (xr #186#)) :form eql #187# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #188="[a-f" #189=#:ert-form-evaluation-aborted-1356 (error) [(should-error (xr #188#)) :form eql #189# :value xr ert-explainer :explanation apply ert--signal-should-execution] (error) #190="[aaaaaa][bananabanana][aaaa-cccc][a-ca-ca-c]" #191=(seq "a" (any "abn") (any "a-c") (any "a-c")) #192=#:ert-form-evaluation-aborted-1363 [(should (equal (xr #190#) '#191#)) :form eql #192# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #193="[a-fb-gc-h][a-fc-kh-p]" #194=(seq (any "a-h") (any "a-p")) #195=#:ert-form-evaluation-aborted-1368 [(should (equal (xr #193#) '#194#)) :form eql #195# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 15] xr-empty #[0 "\301C\3021\303\304\305!)\305D0\202\306\240\210\211@AD\262\307C\310C\311\312\313\314\315$\316\"\317$\216\320\242\"\240)\204D\321\242!\210\266\301C\3221X\303\304\323!)\324D0\202c\306\240\210\211@AD\262\325C\310C\311\312\313\314\315$\326\"\317$\216\320\242\"\240)\204\212\321\242!\210\266\301C\3271\236\303\304\330!)\331D0\202\251\306\240\210\211@AD\262\332C\310C\311\312\313\314\315$\333\"\317$\216\320\242\"\240)\204\320\321\242!\210\266\301C\3341\344\303\304\335!)\336D0\202\357\306\240\210\211@AD\262\337C\310C\311\312\313\314\315$\340\"\317$\216\320\242\"\240)\204\321\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #196="" signal #197=#:ert-form-evaluation-aborted-1373 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #196#) #196#)) :form eql #197# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #198="a\\|" #199=(or "a" #196#) #200=#:ert-form-evaluation-aborted-1378 [(should (equal (xr #198#) '#199#)) :form eql #200# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #201="\\|a" #202=(or #196# "a") #203=#:ert-form-evaluation-aborted-1383 [(should (equal (xr #201#) '#202#)) :form eql #203# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #204="a\\|\\|b" #205=(or "a" #196# "b") #206=#:ert-form-evaluation-aborted-1388 [(should (equal (xr #204#) '#205#)) :form eql #206# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 13] xr-anything #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #207="\\(?:.\\|\n\\)?\\(\n\\|.\\)*" #208=(seq (opt anything) (zero-or-more (group anything))) signal #209=#:ert-form-evaluation-aborted-1393 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #207#) '#208#)) :form eql #209# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail] 13] xr-real #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #210="\\*\\*\\* EOOH \\*\\*\\*\n" #211="*** EOOH ***\n" signal #212=#:ert-form-evaluation-aborted-1398 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #210#) #211#)) :form eql #212# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #213="\\<\\(catch\\|finally\\)\\>[^_]" #214=(seq bow (group (or "catch" "finally")) eow (not (any "_"))) #215=#:ert-form-evaluation-aborted-1403 [(should (equal (xr #213#) '#214#)) :form eql #215# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #216="[ \n]*:\\([^:]+\\|$\\)" #217=(seq (zero-or-more (any " \n ")) ":" (group (or (one-or-more (not (any ":"))) eol))) #218=#:ert-form-evaluation-aborted-1408 [(should (equal (xr #216#) '#217#)) :form eql #218# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 13] xr-edge-cases #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\266\301C\3301\236\303\304\331!)\332D0\202\251\307\240\210\211@AD\262\333C\311C\312\313\314\315\316$\334\"\320$\216\321\242\"\240)\204\320\322\242!\210\266\301C\3351\344\303\304\336!)\337D0\202\357\307\240\210\211@AD\262\340C\311C\312\313\314\315\316$\341\"\320$\216\321\242\"\240)\204\322\242!\210\266\301C\3421*\303\304\343!)\344D0\2025\307\240\210\211@AD\262\345C\311C\312\313\314\315\316$\346\"\320$\216\321\242\"\240)\204\\\322\242!\210\266\301C\3471p\303\304\350!)\351D0\202{\307\240\210\211@AD\262\352C\311C\312\313\314\315\316$\353\"\320$\216\321\242\"\240)\204\242\322\242!\210\266\301C\3541\266\303\304\355!)\356D0\202\301\307\240\210\211@AD\262\357C\311C\312\313\314\315\316$\360\"\320$\216\321\242\"\240)\204\350\322\242!\210\266\301C\3611\374\303\304\362!)\363D0\202\307\240\210\211@AD\262\364C\311C\312\313\314\315\316$\365\"\320$\216\321\242\"\240)\204.\322\242!\210\266\301C\3661B\303\304\367!)\370D0\202M\307\240\210\211@AD\262\371C\311C\312\313\314\315\316$\372\"\320$\216\321\242\"\240)\204t\322\242!\210\266\301C\3731\210\303\304\374!)\375D0\202\223\307\240\210\211@AD\262\376C\311C\312\313\314\315\316$\377\"\320$\216\321\242\"\240)\204\272\322\242!\210\266\301C\201@1\324\303\304\201A!)\201BD0\202\337\307\240\210\211@AD\262\201CC\311C\312\313\314\315\316$\201D\"\320$\216\321\242\"\240)\204\n\322\242!\210\266\301C\201E1$\303\304\201F!)\201GD0\202/\307\240\210\211@AD\262\201HC\311C\312\313\314\315\316$\201I\"\320$\216\321\242\"\240)\204Z\322\242!\210\266\301C\201J1t\303\304\201K!)\201LD0\202\307\240\210\211@AD\262\201MC\311C\312\313\314\315\316$\201N\"\320$\216\321\242\"\240)\204\252\322\242!\210\266\301C\201O1\304\303\304\201P!)\201QD0\202\317\307\240\210\211@AD\262\201RC\311C\312\313\314\315\316$\201S\"\320$\216\321\242\"\240)\204\372\322\242!\210\266\301C\201T1\303\304\201U!)\201VD0\202\307\240\210\211@AD\262\201WC\311C\312\313\314\315\316$\201X\"\320$\216\321\242\"\240)\204J\322\242!\210\266\301C\201Y1d\303\304\201Z!)\201[D0\202o\307\240\210\211@AD\262\201\\C\311C\312\313\314\315\316$\201]\"\320$\216\321\242\"\240)\204\232\322\242!\210\266\301C\201^1\264\303\304\201_!)\201`D0\202\277\307\240\210\211@AD\262\201aC\311C\312\313\314\315\316$\201b\"\320$\216\321\242\"\240)\204\352\322\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #219="^a^b\\(?:^c^\\|^d^\\|e^\\)^" #220=(seq bol "a^b" (or (seq bol "c^") (seq bol "d^") "e^") "^") signal #221=#:ert-form-evaluation-aborted-1413 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #219#) '#220#)) :form eql #221# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #222="$a$b\\(?:$c$\\|$d$\\|$e$\\)$" #223=(seq "$a$b" (or (seq "$c" eol) (seq "$d" eol) (seq "$e" eol)) eol) #224=#:ert-form-evaluation-aborted-1418 [(should (equal (xr #222#) '#223#)) :form eql #224# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #225="*a\\|*b\\(*c\\)" #226=(or "*a" (seq "*b" (group "*c"))) #227=#:ert-form-evaluation-aborted-1423 [(should (equal (xr #225#) '#226#)) :form eql #227# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #228="+a\\|+b\\(+c\\)" #229=(or "+a" (seq "+b" (group "+c"))) #230=#:ert-form-evaluation-aborted-1428 [(should (equal (xr #228#) '#229#)) :form eql #230# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #231="?a\\|?b\\(^?c\\)" #232=(or "?a" (seq "?b" (group bol "?c"))) #233=#:ert-form-evaluation-aborted-1433 [(should (equal (xr #231#) '#232#)) :form eql #233# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #234="^**" #235=(seq bol (zero-or-more "*")) #236=#:ert-form-evaluation-aborted-1438 [(should (equal (xr #234#) '#235#)) :form eql #236# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #237="^+" #238=(seq bol "+") #239=#:ert-form-evaluation-aborted-1443 [(should (equal (xr #237#) '#238#)) :form eql #239# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #240="^?" #241=(seq bol "?") #242=#:ert-form-evaluation-aborted-1448 [(should (equal (xr #240#) '#241#)) :form eql #242# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #243="*?a\\|^??b" #244=(or (seq (opt "*") "a") (seq bol (opt "?") "b")) #245=#:ert-form-evaluation-aborted-1453 [(should (equal (xr #243#) '#244#)) :form eql #245# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #246="^\\{xy" #247=(seq bol "{xy") #248=#:ert-form-evaluation-aborted-1458 [(should (equal (xr #246#) '#247#)) :form eql #248# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #249="\\{2,3\\}" #250="{2,3}" #251=#:ert-form-evaluation-aborted-1463 [(should (equal (xr #249#) #250#)) :form eql #251# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #252="\\(?:^\\)*" #253=(zero-or-more bol) #254=#:ert-form-evaluation-aborted-1468 [(should (equal (xr #252#) '#253#)) :form eql #254# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #255="\\(?:^\\)\\{3\\}" #256=(= 3 bol) #257=#:ert-form-evaluation-aborted-1473 [(should (equal (xr #255#) '#256#)) :form eql #257# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #258="\\^+" #259=(one-or-more "^") #260=#:ert-form-evaluation-aborted-1478 [(should (equal (xr #258#) '#259#)) :form eql #260# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #261="\\c^?" #262=(opt (category combining-diacritic)) #263=#:ert-form-evaluation-aborted-1483 [(should (equal (xr #261#) '#262#)) :form eql #263# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #264="a^*" #265=(seq "a" (zero-or-more "^")) #266=#:ert-form-evaluation-aborted-1488 [(should (equal (xr #264#) '#265#)) :form eql #266# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #267="a^\\{2,7\\}" #268=(seq "a" (repeat 2 7 "^")) #269=#:ert-form-evaluation-aborted-1493 [(should (equal (xr #267#) '#268#)) :form eql #269# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 13] xr-simplify #[0 "\301C\3021\303\304\305!)\306D0\202\307\240\210\211@AD\262\310C\311C\312\313\314\315\316$\317\"\320$\216\321\242\"\240)\204D\322\242!\210\266\301C\3231X\303\304\324!)\325D0\202c\307\240\210\211@AD\262\326C\311C\312\313\314\315\316$\327\"\320$\216\321\242\"\240)\204\212\322\242!\210\210\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #270="a\\(?:b?\\(?:c.\\)d*\\)e" #271=(seq "a" (opt "b") "c" nonl (zero-or-more "d") "e") signal #272=#:ert-form-evaluation-aborted-1498 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #270#) '#271#)) :form eql #272# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #273="a\\(?:b\\(?:c.d\\)e\\)f" #274=(seq "abc" nonl "def") #275=#:ert-form-evaluation-aborted-1503 [(should (equal (xr #273#) '#274#)) :form eql #275# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 13] xr-pretty #[0 "\302C\3031\304\305\306!)\307D0\202\310\240\210\211@AD\262\311C\312C\313\314\315\316\317$\320\"\321$\216\322\242\"\240)\204D\323\242!\210\266\302C\3241X\304\305\325!)\326D0\202c\310\240\210\211@AD\262\327C\312C\313\314\315\316\317$\330\"\321$\216\322\242\"\240)\204\212\323\242!\210\266\302C\3311\236\304\305\332!)\333D0\202\251\310\240\210\211@AD\262\334C\312C\313\314\315\316\317$\335\"\321$\216\322\242\"\240)\204\320\323\242!\210\266\302C\3361\344\304\305\337!)\340D0\202\357\310\240\210\211@AD\262\341C\312C\313\314\315\316\317$\342\"\321$\216\322\242\"\240)\204\323\242!\210\266\302C\3431*\304\305\344!)\345D0\2025\310\240\210\211@AD\262\346C\312C\313\314\315\316\317$\347\"\321$\216\322\242\"\240)\204\\\323\242!\210\266\302C\3501p\304\305\351!)\352D0\202{\310\240\210\211@AD\262\353C\312C\313\314\315\316\317$\354\"\321$\216\322\242\"\240)\204\242\323\242!\210\266\302C\3551\266\304\305\356!)\357D0\202\301\310\240\210\211@AD\262\360C\312C\313\314\315\316\317$\361\"\321$\216\322\242\"\240)\204\350\323\242!\210\266\302C\3621\374\304\305\363!)\364D0\202\310\240\210\211@AD\262\365C\312C\313\314\315\316\317$\366\"\321$\216\322\242\"\240)\204.\323\242!\210\266\302C\3671B\304\305\370!)\371D0\202M\310\240\210\211@AD\262\372C\312C\313\314\315\316\317$\373\"\321$\216\322\242\"\240)\204t\323\242!\210\266\302C\3741\210\304\305\375!)\376D0\202\223\310\240\210\211@AD\262\377C\312C\313\314\315\316\317$\201@\"\321$\216\322\242\"\240)\204\274\323\242!\210\266\302C\201A1\326\304\305\201B!)\201CD0\202\341\310\240\210\211@AD\262\201DC\312C\313\314\315\316\317$\201E\"\321$\216\322\242\"\240)\204\f\323\242!\210\266\302C\201F1&\304\305\201G!)\201HD0\2021\310\240\210\211@AD\262\201IC\312C\313\314\315\316\317$\201J\"\321$\216\322\242\"\240)\204\\\323\242!\210\266\302C\201K1v\304\305\201L!)\201MD0\202\201\310\240\210\211@AD\262\201NC\312C\313\314\315\316\317$\201O\"\321$\216\322\242\"\240)\204\254\323\242!\210\266\302C\201P1\306\304\305\201Q!)\201RD0\202\321\310\240\210\211@AD\262\201SC\312C\313\314\315\316\317$\201T\"\321$\216\322\242\"\240)\204\374\323\242!\210\266\302C\201U1\304\305\201V!)\201WD0\202!\310\240\210\211@AD\262\201XC\312C\313\314\315\316\317$\201Y\"\321$\216\322\242\"\240)\204L\323\242!\210\266\312\302C\201Z1h\304\305\201[!)\201\\D0\202s\310\240\210\211@AD\262\201]C\312C\313\314\315\316\317$\201^\"\321$\216\322\242\"\240)\204\236\323\242!\210\266\201_\201`!r\211q\210\313\314\201a\316\317!\201b\"\201c$\216\302C\201d1\325\304\201e\201f!)\312D0\202\340\310\240\210\211@AD\262\201gC\312C\313\314\315\316\317$\201h\"\321$\216\322\242\"\240)\204 \323\242!\210\266\302C\201i1$\304\201j )\201kD0\202/\310\240\210\211@AD\262\201lC\312C\313\314\315\316\317$\201m\"\321$\216\322\242\"\240)\204Z\323\242!\210\266*\210\201_\201`!r\211q\210\313\314\201a\316\317!\201n\"\201c$\216\302C\201o1\223\304\201p\201q!)\312D0\202\236\310\240\210\211@AD\262\201rC\312C\313\314\315\316\317$\201s\"\321$\216\322\242\"\240)\204\311\323\242!\210\266\302C\201t1\342\304\201j )\201uD0\202\355\310\240\210\211@AD\262\201vC\312C\313\314\315\316\317$\201w\"\321$\216\322\242\"\240)\204\323\242!\210\210\211\242\262\266\202*\262)\207" [signal-hook-function indent-tabs-mode equal (error) ert--should-signal-hook xr-pp-rx-to-str #276="A \n \200B\377" #277="\"A\\e\\r\\n\\t\\x00 \\x7f\\200B\\xff\\x02\"\n" signal #278=#:ert-form-evaluation-aborted-1508 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr-pp-rx-to-str #276#) #277#)) :form eql #278# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #279=(63 nonl) #280="(?? nonl)\n" #281=#:ert-form-evaluation-aborted-1513 [(should (equal (xr-pp-rx-to-str '#279#) #280#)) :form eql #281# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #282=(32 32) #283="(? ?\\s)\n" #284=#:ert-form-evaluation-aborted-1518 [(should (equal (xr-pp-rx-to-str '#282#) #283#)) :form eql #284# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #285=(+\? (*\? 42)) #286="(+? (*? ?*))\n" #287=#:ert-form-evaluation-aborted-1523 [(should (equal (xr-pp-rx-to-str '#285#) #286#)) :form eql #287# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #288=(seq "a" 97 32 10 34 92 48 0 127) #289="(seq \"a\" ?a ?\\s ?\\n ?\\\" ?\\\\ ?0 #x00 #x7f)\n" #290=#:ert-form-evaluation-aborted-1528 [(should (equal (xr-pp-rx-to-str '#288#) #289#)) :form eql #290# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #291=(category 81) #292="(category ?Q)\n" #293=#:ert-form-evaluation-aborted-1533 [(should (equal (xr-pp-rx-to-str '#291#) #292#)) :form eql #293# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #294=(any 97 10 40 92 128 197 937 4194176 32) #295="(any ?a ?\\n ?\\( ?\\\\ #x80 ?Å ?Ω #x3fff80 ?\\s)\n" #296=#:ert-form-evaluation-aborted-1538 [(should (equal (xr-pp-rx-to-str '#294#) #295#)) :form eql #296# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #297=(any (48 . 57)) #298="(any (?0 . ?9))\n" #299=#:ert-form-evaluation-aborted-1543 [(should (equal (xr-pp-rx-to-str '#297#) #298#)) :form eql #299# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #300=(repeat 42 97) #301="(repeat 42 ?a)\n" #302=#:ert-form-evaluation-aborted-1548 [(should (equal (xr-pp-rx-to-str '#300#) #301#)) :form eql #302# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #303=(repeat 10 13 98) #304="(repeat 10 13 ?b)\n" #305=#:ert-form-evaluation-aborted-1553 [(should (equal (xr-pp-rx-to-str '#303#) #304#)) :form eql #305# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #306=(** 9 32 99) #307="(** 9 32 ?c)\n" #308=#:ert-form-evaluation-aborted-1558 [(should (equal (xr-pp-rx-to-str '#306#) #307#)) :form eql #308# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #309=(= 3 100) #310="(= 3 ?d)\n" #311=#:ert-form-evaluation-aborted-1563 [(should (equal (xr-pp-rx-to-str '#309#) #310#)) :form eql #311# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #312=(>= 8 101) #313="(>= 8 ?e)\n" #314=#:ert-form-evaluation-aborted-1568 [(should (equal (xr-pp-rx-to-str '#312#) #313#)) :form eql #314# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #315=(group-n 7 102) #316="(group-n 7 ?f)\n" #317=#:ert-form-evaluation-aborted-1573 [(should (equal (xr-pp-rx-to-str '#315#) #316#)) :form eql #317# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #318=(backref 12 103) #319="(backref 12 ?g)\n" #320=#:ert-form-evaluation-aborted-1578 [(should (equal (xr-pp-rx-to-str '#318#) #319#)) :form eql #320# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #321=(seq (1+ nonl (or "a" (not (any space)))) (* (32 (not cntrl) blank (| nonascii "abcdef")))) "(seq (1+ nonl\n (or \"a\"\n (not (any space))))\n (* (? (not cntrl)\n blank\n (| nonascii \"abcdef\"))))\n" #322=#:ert-form-evaluation-aborted-1583 [(should (equal (xr-pp-rx-to-str '#321#) (concat "(seq (1+ nonl\n" " (or \"a\"\n" " (not (any space))))\n" " (* (? (not cntrl)\n" " blank\n" " (| nonascii \"abcdef\"))))\n"))) :form eql #322# :value equal ert-explainer :explanation apply ert--signal-should-execution] generate-new-buffer " *temp*" "\301\300!\205 \302\300!\207" [buffer-name kill-buffer] 2 (error) xr-pp #323=".?\\|b+" #324=#:ert-form-evaluation-aborted-1588 [(should (equal (xr-pp #323#) nil)) :form eql #324# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) buffer-string "(or (opt nonl)\n (one-or-more \"b\"))\n" #325=#:ert-form-evaluation-aborted-1593 [(should (equal (buffer-string) (concat "(or (opt nonl)\n" " (one-or-more \"b\"))\n"))) :form eql #325# :value equal ert-explainer :explanation apply ert--signal-should-execution] [buffer-name kill-buffer] (error) xr-skip-set-pp #326="^ac-nq\\-u" #327=#:ert-form-evaluation-aborted-1598 [(should (equal (xr-skip-set-pp #326#) nil)) :form eql #327# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #328="(not (any \"c-n\" \"aqu-\"))\n" #329=#:ert-form-evaluation-aborted-1603 [(should (equal (buffer-string) #328#)) :form eql #329# :value equal ert-explainer :explanation apply ert--signal-should-execution]] 14] xr-dialect #[0 "\301C\3021\303\304\305\306\")\307D0\202\310\240\210\211@AD\262\311C\312C\313\314\315\316\317$\320\"\321$\216\322\242\"\240)\204E\323\242!\210\266\301C\3241Z\303\304\305\325\")\326D0\202e\310\240\210\211@AD\262\327C\312C\313\314\315\316\317$\330\"\321$\216\322\242\"\240)\204\214\323\242!\210\266\301C\3311\241\303\304\305\332\")\333D0\202\254\310\240\210\211@AD\262\334C\312C\313\314\315\316\317$\335\"\321$\216\322\242\"\240)\204\323\323\242!\210\266\301C\3361\350\303\304\305\337\")\340D0\202\363\310\240\210\211@AD\262\341C\312C\313\314\315\316\317$\342\"\321$\216\322\242\"\240)\204\323\242!\210\266\301C\3431/\303\304\344\306\")\345D0\202:\310\240\210\211@AD\262\346C\312C\313\314\315\316\317$\347\"\321$\216\322\242\"\240)\204a\323\242!\210\266\301C\3501v\303\304\344\325\")\351D0\202\201\310\240\210\211@AD\262\352C\312C\313\314\315\316\317$\353\"\321$\216\322\242\"\240)\204\250\323\242!\210\266\301C\3541\275\303\304\344\332\")\355D0\202\310\310\240\210\211@AD\262\356C\312C\313\314\315\316\317$\357\"\321$\216\322\242\"\240)\204\357\323\242!\210\266\301C\3601\303\304\344\337\")\361D0\202\310\240\210\211@AD\262\362C\312C\313\314\315\316\317$\363\"\321$\216\322\242\"\240)\2046\323\242!\210\266\304C\3641E\365\366D0\202P\310\240\210\211@AD\262\367C\312C\312\313\314\370\316\317!\371\"\372$\3731\206\313\314\315\316\317\n\n\n\n$\374\"\321$\216\322\242\"\240)0\202\225\375\262\376\377\312$\210\240\262\210\204\252\323\201@ \201A\201BD\"!\210\266\211\242\262\207" [signal-hook-function equal (error) ert--should-signal-hook xr #330="a*b+c?d\\{2,5\\}\\(e\\|f\\)[gh][^ij]" medium #331=(seq (zero-or-more "a") (one-or-more "b") (opt "c") (repeat 2 5 "d") (group (or "e" "f")) (any "gh") (not (any "ij"))) signal #332=#:ert-form-evaluation-aborted-1608 nil make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr #330# 'medium) '#331#)) :form eql #332# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) verbose #333=(seq (zero-or-more "a") (one-or-more "b") (zero-or-one "c") (repeat 2 5 "d") (group (or "e" "f")) (any "gh") (not (any "ij"))) #334=#:ert-form-evaluation-aborted-1613 [(should (equal (xr "a*b+c?d\\{2,5\\}\\(e\\|f\\)[gh][^ij]" 'verbose) '#333#)) :form eql #334# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) brief #335=(seq (0+ "a") (1+ "b") (opt "c") (repeat 2 5 "d") (group (or "e" "f")) (any "gh") (not (any "ij"))) #336=#:ert-form-evaluation-aborted-1618 [(should (equal (xr "a*b+c?d\\{2,5\\}\\(e\\|f\\)[gh][^ij]" 'brief) '#335#)) :form eql #336# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) terse #337=(: (* "a") (+ "b") (32 "c") (** 2 5 "d") (group (| "e" "f")) (in "gh") (not (in "ij"))) #338=#:ert-form-evaluation-aborted-1623 [(should (equal (xr "a*b+c?d\\{2,5\\}\\(e\\|f\\)[gh][^ij]" 'terse) '#337#)) :form eql #338# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #339="^\\`\\<.\\>\\'$" #340=(seq bol bos bow nonl eow eos eol) #341=#:ert-form-evaluation-aborted-1628 [(should (equal (xr #339# 'medium) '#340#)) :form eql #341# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #342=(seq line-start string-start word-start not-newline word-end string-end line-end) #343=#:ert-form-evaluation-aborted-1633 [(should (equal (xr "^\\`\\<.\\>\\'$" 'verbose) '#342#)) :form eql #343# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #344=(seq bol bos bow nonl eow eos eol) #345=#:ert-form-evaluation-aborted-1638 [(should (equal (xr "^\\`\\<.\\>\\'$" 'brief) '#344#)) :form eql #345# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #346=(: bol bos bow nonl eow eos eol) #347=#:ert-form-evaluation-aborted-1643 [(should (equal (xr "^\\`\\<.\\>\\'$" 'terse) '#346#)) :form eql #347# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #348="a" asdf #349=#:ert-form-evaluation-aborted-1648 "\300\242\207" #48# 1 (error) [(should-error (xr #348# 'asdf)) :form eql #349# :value xr ert-explainer :explanation apply ert--signal-should-execution] t ert--should-error-handle-error error append :fail-reason #51#] 15] xr-lint #[0 "\302\303C\3041\305\306\307!)\310D0\202\311\240\210\211@AD\262\312C\310C\313\314\315\316\317$\320\"\321$\216\322\242\"\240)\204F\323\242!\210\266\303C\3241Z\305\306\325!)\326D0\202e\311\240\210\211@AD\262\327C\310C\313\314\315\316\317$\330\"\321$\216\322\242\"\240)\204\214\323\242!\210\266\303C\3311\240\305\306\332!)\333D0\202\253\311\240\210\211@AD\262\334C\310C\313\314\315\316\317$\335\"\321$\216\322\242\"\240)\204\322\323\242!\210\266\303C\3361\346\305\306\337!)\340D0\202\361\311\240\210\211@AD\262\341C\310C\313\314\315\316\317$\342\"\321$\216\322\242\"\240)\204\323\242!\210\266\303C\3431,\305\306\344!)\345D0\2027\311\240\210\211@AD\262\346C\310C\313\314\315\316\317$\347\"\321$\216\322\242\"\240)\204^\323\242!\210\266\303C\3501r\305\306\351!)\352D0\202}\311\240\210\211@AD\262\353C\310C\313\314\315\316\317$\354\"\321$\216\322\242\"\240)\204\244\323\242!\210\266\303C\3551\270\305\306\356!)\357D0\202\303\311\240\210\211@AD\262\360C\310C\313\314\315\316\317$\361\"\321$\216\322\242\"\240)\204\352\323\242!\210\266\303C\3621\376\305\306\363!)\310D0\202 \311\240\210\211@AD\262\364C\310C\313\314\315\316\317$\365\"\321$\216\322\242\"\240)\2040\323\242!\210\266\303C\3661D\305\306\367!)\370D0\202O\311\240\210\211@AD\262\371C\310C\313\314\315\316\317$\372\"\321$\216\322\242\"\240)\204v\323\242!\210\266\303C\3731\212\305\306\374!)\375D0\202\225\311\240\210\211@AD\262\376C\310C\313\314\315\316\317$\377\"\321$\216\322\242\"\240)\204\274\323\242!\210\266\303C\201@1\326\305\306\201A!)\201BD0\202\341\311\240\210\211@AD\262\201CC\310C\313\314\315\316\317$\201D\"\321$\216\322\242\"\240)\204\f\323\242!\210\266\303C\201E1&\305\306\201F!)\201GD0\2021\311\240\210\211@AD\262\201HC\310C\313\314\315\316\317$\201I\"\321$\216\322\242\"\240)\204\\\323\242!\210\266\303C\201J1v\305\306\201K!)\201LD0\202\201\311\240\210\211@AD\262\201MC\310C\313\314\315\316\317$\201N\"\321$\216\322\242\"\240)\204\254\323\242!\210\266\303C\201O1\304\305\306\201P!)\310D0\202\317\311\240\210\211@AD\262\201QC\310C\313\314\315\316\317$\201R\"\321$\216\322\242\"\240)\204\372\323\242!\210\266\303C\201S1\305\306\201T!)\201UD0\202\311\240\210\211@AD\262\201VC\310C\313\314\315\316\317$\201W\"\321$\216\322\242\"\240)\204J\323\242!\210\266\303C\201X1d\305\306\201Y!)\201ZD0\202o\311\240\210\211@AD\262\201[C\310C\313\314\315\316\317$\201\\\"\321$\216\322\242\"\240)\204\232\323\242!\210\266\303C\201]1\264\305\306\201^!)\201_D0\202\277\311\240\210\211@AD\262\201`C\310C\313\314\315\316\317$\201a\"\321$\216\322\242\"\240)\204\352\323\242!\210\266\303C\201b1\305\306\201c!)\201dD0\202\311\240\210\211@AD\262\201eC\310C\313\314\315\316\317$\201f\"\321$\216\322\242\"\240)\204:\323\242!\210\266\303C\201g1T\305\306\201h!)\201iD0\202_\311\240\210\211@AD\262\201jC\310C\313\314\315\316\317$\201k\"\321$\216\322\242\"\240)\204\212\323\242!\210\266\303C\201l1\244\305\306\201m!)\201nD0\202\257\311\240\210\211@AD\262\201oC\310C\313\314\315\316\317$\201p\"\321$\216\322\242\"\240)\204\332\323\242!\210\266\303C\201q1\362\305\306\201r!)\310D0\202\375\311\240\210\211@AD\262\201sC\310C\313\314\315\316\317$\201t\"\321$\216\322\242\"\240)\204(\323\242!\210\266\303C\201u1@\305\306\201v!)\310D0\202K\311\240\210\211@AD\262\201wC\310C\313\314\315\316\317$\201x\"\321$\216\322\242\"\240)\204v\323\242!\210\266\303C\201y1\220\305\306\201z!)\201{D0\202\233\311\240\210\211@AD\262\201|C\310C\313\314\315\316\317$\201}\"\321$\216\322\242\"\240)\204\306\323\242!\210\266\303C\201~1\340\305\306\201!)\201\200D0\202\353\311\240\210\211@AD\262\201\201C\310C\313\314\315\316\317$\201\202\"\321$\216\322\242\"\240)\204\323\242!\210\266\303C\201\20310\305\306\201\204!)\201\205D0\202;\311\240\210\211@AD\262\201\206C\310C\313\314\315\316\317$\201\207\"\321$\216\322\242\"\240)\204f\323\242!\210\266\303C\201\2101\200\305\306\201\211!)\201\212D0\202\213\311\240\210\211@AD\262\201\213C\310C\313\314\315\316\317$\201\214\"\321$\216\322\242\"\240)\204\266\323\242!\210\210\211\242\262\266\202)\207" [text-quoting-style signal-hook-function grave equal (error) ert--should-signal-hook xr-lint #350="^a*\\[\\?\\$\\(b\\{3\\}\\|c\\)[^]\\a-d^-]$" nil signal #351=#:ert-form-evaluation-aborted-1655 make-byte-code 0 "\303\304C\305\300\242\301BD\244\306\302\242\307\"?\205\310\302\242D\244\311\312N\211\205%\313\314\301\"D\262\244\240\210\315\303\242!\207" vconcat vector [(should (equal (xr-lint #350#) nil)) :form eql #351# :value equal ert-explainer :explanation apply ert--signal-should-execution] 7 apply ert-fail (error) #352="a^b$c" #353=((1 . "Unescaped literal `^'") (3 . "Unescaped literal `$'")) #354=#:ert-form-evaluation-aborted-1660 [(should (equal (xr-lint #352#) '#353#)) :form eql #354# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #355="^**$" #356=((1 . "Unescaped literal `*'")) #357=#:ert-form-evaluation-aborted-1665 [(should (equal (xr-lint #355#) '#356#)) :form eql #357# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #358="a[\\\\[]b[d-g.d-g]c" #359=((3 . "Duplicated `\\' inside character alternative") (12 . "Duplicated `d-g' inside character alternative")) #360=#:ert-form-evaluation-aborted-1670 [(should (equal (xr-lint #358#) '#359#)) :form eql #360# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #361="\\{\\(+\\|?\\)\\[\\]\\}\\ " #362=((0 . "Escaped non-special character `{'") (4 . "Unescaped literal `+'") (7 . "Unescaped literal `?'") (14 . "Escaped non-special character `}'") (16 . "Escaped non-special character `\\t'")) #363=#:ert-form-evaluation-aborted-1675 [(should (equal (xr-lint #361#) '#362#)) :form eql #363# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #364="\\}\\w\\a\\b\\%" #365=((0 . "Escaped non-special character `}'") (4 . "Escaped non-special character `a'") (8 . "Escaped non-special character `%'")) #366=#:ert-form-evaluation-aborted-1680 [(should (equal (xr-lint #364#) '#365#)) :form eql #366# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #367="a?+b+?\\(?:c*\\)*d\\{3\\}+e*?\\{2,5\\}" #368=((2 . "Repetition of option") (14 . "Repetition of repetition") (25 . "Repetition of repetition")) #369=#:ert-form-evaluation-aborted-1685 [(should (equal (xr-lint #367#) '#368#)) :form eql #369# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #370="\\(?:a+\\)?" #371=#:ert-form-evaluation-aborted-1690 [(should (equal (xr-lint #370#) nil)) :form eql #371# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #372="\\(a*\\)*\\(b+\\)*\\(c*\\)?\\(d+\\)?" #373=((6 . "Repetition of repetition") (13 . "Repetition of repetition") (20 . "Optional repetition")) #374=#:ert-form-evaluation-aborted-1695 [(should (equal (xr-lint #372#) '#373#)) :form eql #374# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #375="\\(a?\\)+\\(b?\\)?" #376=((6 . "Repetition of option") (13 . "Optional option")) #377=#:ert-form-evaluation-aborted-1700 [(should (equal (xr-lint #375#) '#376#)) :form eql #377# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #378="\\(e*\\)\\{3\\}" #379=((6 . "Repetition of repetition")) #380=#:ert-form-evaluation-aborted-1705 [(should (equal (xr-lint #378#) '#379#)) :form eql #380# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #381="\\(a?\\)\\{4,7\\}" #382=((6 . "Repetition of option")) #383=#:ert-form-evaluation-aborted-1710 [(should (equal (xr-lint #381#) '#382#)) :form eql #383# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #384="[]-Qa-fz-t]" #385=((1 . "Reversed range `]-Q' matches nothing") (7 . "Reversed range `z-t' matches nothing")) #386=#:ert-form-evaluation-aborted-1715 [(should (equal (xr-lint #384#) '#385#)) :form eql #386# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #387="[z-a][^z-a]" #388=#:ert-form-evaluation-aborted-1720 [(should (equal (xr-lint #387#) nil)) :form eql #388# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #389="[^A-FFGI-LI-Mb-da-eg-ki-ns-t33-7]" #390=((5 . "Character `F' included in range `A-F'") (10 . "Ranges `I-L' and `I-M' overlap") (16 . "Ranges `a-e' and `b-d' overlap") (22 . "Ranges `g-k' and `i-n' overlap") (25 . "Two-character range `s-t'") (29 . "Character `3' included in range `3-7'")) #391=#:ert-form-evaluation-aborted-1725 [(should (equal (xr-lint #389#) '#390#)) :form eql #391# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #392="[a[:digit:]b[:punct:]c[:digit:]]" #393=((22 . "Duplicated character class `[:digit:]'")) #394=#:ert-form-evaluation-aborted-1730 [(should (equal (xr-lint #392#) '#393#)) :form eql #394# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #395="a*\\|b+\\|\\(?:a\\)*" #396=((8 . "Duplicated alternative branch")) #397=#:ert-form-evaluation-aborted-1735 [(should (equal (xr-lint #395#) '#396#)) :form eql #397# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #398="a\\{,\\}" #399=((1 . "Uncounted repetition")) #400=#:ert-form-evaluation-aborted-1740 [(should (equal (xr-lint #398#) '#399#)) :form eql #400# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #401="a\\{\\}" #402=((1 . "Implicit zero repetition")) #403=#:ert-form-evaluation-aborted-1745 [(should (equal (xr-lint #401#) '#402#)) :form eql #403# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #404="[0-9[|]*/]" #405=((4 . "Suspect `[' in char alternative")) #406=#:ert-form-evaluation-aborted-1750 [(should (equal (xr-lint #404#) '#405#)) :form eql #406# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #407="[^][-].]" #408=#:ert-form-evaluation-aborted-1755 [(should (equal (xr-lint #407#) nil)) :form eql #408# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #409="[0-1]" #410=#:ert-form-evaluation-aborted-1760 [(should (equal (xr-lint #409#) nil)) :form eql #410# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #411="[^]-][]-^]" #412=((6 . "Two-character range `]-^'")) #413=#:ert-form-evaluation-aborted-1765 [(should (equal (xr-lint #411#) '#412#)) :form eql #413# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #414="[-A-Z][A-Z-][A-Z-a][^-A-Z][]-a][A-Z---.]" #415=((16 . "Literal `-' not first or last in character alternative")) #416=#:ert-form-evaluation-aborted-1770 [(should (equal (xr-lint #414#) '#415#)) :form eql #416# :value equal ert-explainer :explanation apply ert--signal-should-execution] (error) #417="\\'*\\