403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.217.5
Web Server : Apache
System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/cedet/srecode/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/cedet/srecode/srt-wy.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\207" [require semantic/lex semantic/wisent] 2)
#@64 The number of expected shift/reduce conflicts in this grammar.
(defconst srecode-template-wy--expected-conflicts nil (#$ . 166))
#@29 Table of language keywords.
(defconst srecode-template-wy--keyword-table (semantic-lex-make-keyword-table '(("set" . SET) ("show" . SHOW) ("macro" . MACRO) ("context" . CONTEXT) ("template" . TEMPLATE) ("sectiondictionary" . SECTIONDICTIONARY) ("section" . SECTION) ("end" . END) ("prompt" . PROMPT) ("default" . DEFAULT) ("defaultmacro" . DEFAULTMACRO) ("read" . READ) ("bind" . BIND)) '(("bind" summary "bind \"<letter>\"") ("read" summary "prompt <symbol> \"Describe Symbol: \" [default[macro] <lispsym>|\"valuetext\"] [read <lispsym>]") ("defaultmacro" summary "prompt <symbol> \"Describe Symbol: \" [default[macro] <lispsym>|\"valuetext\"] [read <lispsym>]") ("default" summary "prompt <symbol> \"Describe Symbol: \" [default[macro] <lispsym>|\"valuetext\"] [read <lispsym>]") ("prompt" summary "prompt <symbol> \"Describe Symbol: \" [default[macro] <lispsym>|\"valuetext\"] [read <lispsym>]") ("end" summary "section ... end") ("section" summary "section <name>\\n <dictionary entries>\\n end") ("sectiondictionary" summary "sectiondictionary <name>\\n <dictionary entries>") ("template" summary "template <name>\\n <template definition>") ("context" summary "context <name>") ("macro" summary "... macro \"string\" ...") ("show" summary "show <name>   ; to show a section") ("set" summary "set <name> <value>"))) (#$ . 301))
#@26 Table of lexical tokens.
(defconst srecode-template-wy--token-table (semantic-lex-make-type-table '(("number" (number)) ("string" (string)) ("symbol" (symbol)) ("property" (property)) ("separator" (TEMPLATE_BLOCK . "^----")) ("newline" (newline))) '(("number" :declared t) ("string" :declared t) ("symbol" :declared t) ("property" syntax ":\\(\\w\\|\\s_\\)*") ("property" :declared t) ("newline" :declared t) ("punctuation" syntax "\\s.+") ("punctuation" :declared t) ("keyword" :declared t))) (#$ . 1639))
#@15 Parser table.
(defconst srecode-template-wy--parse-table (byte-code "\300\301!\302\303\"\304M\210\302\305\"\306M\210\302\307\"\310M\210\302\311\"\312M\210\302\313\"\314M\210\302\315\"\316M\210\302\317\"\320M\210\302\321\"\322M\210\302\323\"\324M\210\302\325\"\326M\210\302\327\"\330M\210\302\331\"\332M\210\302\333\"\334M\210\302\335\"\336M\210\302\337\"\340M\210\302\341\"\342M\210\302\343\"\344M\210\302\345\"\346M\210\302\347\"\350M\210\302\351\"\352M\210\302\353\"\354M\210\302\355\"\356M\210\302\357\"\360M\210\302\361\"\362M\210\302\363\"\364M\210\302\365\"\366M\210\302\367\"\370M\210\302\371\"\372M\210\302\373\"\374M\210\302\375\"\376M\210\302\377\"\201@M\210\302\201A\"\201BM\210\302\201C\"\201DM\210\302\201E\"\201FM\210\302\201G\"\201HM\210\302\201I\"\201JM\210\302\201K\"\201LM\210\302\201M\"\201NM\210\302\201O\"\201PM\210\302\201Q\"\201RM\210\302\201S\"\201TM\210\302\201U\"\201VM\210\302\201W\"\201XM\210\302\201Y\"\201ZM\210\302\201[\"\201\\M\210\302\201]\"\201^M\210\302\201_\"\201`M\210\302\201a\"\201bM\210\201c\211\201d\201e\201f\201g\201h\201i\201j\257\201k\201lD\201m\201nD\201o\201pD\201q\201r\201s\201t\201u\201v\201w\201x\201y\201z\257\n\201{\201|D\201}\201~\313\"BC\201}\201~\317\f\"BC\201}\201~\323
\"BC\201}\201~\331\"BC\201}\201~\335\"BC\201\201\200\201\201\201\202F\201\203\201\204D\201\205\201\206D\201}\201~\303\"BC\201}\201~\201S\"BC\201}\201~\363\"BC\201}\201~\201A\"BC\201}\201~\347\"BC\201}\201~\201K\"BC\201}\201~\201Y\"BC\201}\201~\201_\"BC\201}\201~\337\"BC\201}\201~\365\"B\201\207D\201\210\201\211D\201\212\201\213D\201}\201~\201C\"BC\201\214\201\215D\201\216\201\217\201\220\201\221F\201}\201~\201E\"\"BC\201}\201~\201M#\"BC\201}\201~\367$\"BC\201}\201~\365%\"B\201\222D\201\223\201\224D\201}\201~\351'\"B\201\225\201\226E\201}\201~\201G(\"BC\201}\201~\201I)\"BC\201}\201~\371*\"BC\201}\201~\201O+\"BC\201}\201~\353,\"BC\201}\201~\201[-\"B\201\227D\201\230\201\231\201\232E\201\233\201\234D\201}\201~\3730\"B\201\235D\201\236\201\237D\201}\201~\3412\"BC\201}\201~\3253\"BC\201}\201~\3334\"BC\201}\201~\3435\"BC\201\240\201\241D\201\242\201\243D\201}\201~\201U8\"BC\201\244\201\245\201\246\201\247F\201}\201~\355:\"BC\201}\201~\345;\"BC\201\250\201\251D\201\252\201\253D\201\254\201\255D\201}\201~\357?\"BC\201}\201~\375@\"BC\201\256\201\257D\201\260\201\261D\201}\201~\305C\"B\201\262D\201}\201~\321D\"BC\201}\201~\201WE\"BC\201\263\201\264D\201}\201~\377G\"BC\201}\201~\307H\"B\201\265\201\266E\201\267\201\270\201\271\201\272\201\273\257\201\274\201\275D\201}\201~\315K\"BC\201}\201~\327L\"BC\201\276\201\277D\201}\201~\311N\"BC\201}\201~\201QO\"BC\201}\201~\201]P\"BC\201}\201~\201aQ\"BC\201}\201~\361R\"BC\201\300\201\301D\201\302\201\303D\201\304C&Q\201\305\201\306$\207" [obarray-make 13 intern #1="templatename:8" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #1# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #2="opt-bind:1" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #2# opt-bind 2] 9 "\n\n(fn STACK SP GOTOS)"] #3="flat-section-dictionary:0" #[771 "\303ZH@SH@\304ZSHA@HAAU\204M\2044\305\\\211\262HA@\262\202\211\204G\305Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\306\307\310Z\nHH\236A\305\\\262S\311!BBI\210I\210+\207" [$region $action $nterm 5 7 2 #3# flat-section-dictionary 8 read] 13 "\n\n(fn STACK SP GOTOS)"] #4="dictionary-entry:0" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262S\306!\211\211\203:\307@\310\n#\210\211A\262\202(\266\203BI\210I\210+\207" [$region $action $nterm #4# dictionary-entry 2 semantic--tag-expand semantic--tag-put-property reparse-symbol] 15 "\n\n(fn STACK SP GOTOS)"] #5="template_file:0" #[771 "SHA\303\304\305Z\nHH\236A\305\\\262S\306BI\210I\210+\207" [$region $action $nterm #5# template_file 2 nil] 9 "\n\n(fn STACK SP GOTOS)"] #6="flat-dictionary-entry:0" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262S\306!\211\211\203:\307@\310\n#\210\211A\262\202(\266\203BI\210I\210+\207" [$region $action $nterm #6# flat-dictionary-entry 2 semantic--tag-expand semantic--tag-put-property reparse-symbol] 15 "\n\n(fn STACK SP GOTOS)"] #7="template_file:1" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #7# template_file 2] 10 "\n\n(fn STACK SP GOTOS)"] #8="flat-dictionary-entry-list:0" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #8# flat-dictionary-entry-list 2] 9 "\n\n(fn STACK SP GOTOS)"] #9="template_file:2" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #9# template_file 2] 10 "\n\n(fn STACK SP GOTOS)"] #10="opt-default-fcn:0" #[771 "SH@\303ZSHA@HAAU\204G\204.\304\\\211\262HA@\262\202\211\204A\304Z\211\262HAA\262\202\262\202\205R\211\205RB\266\205\305\306\307Z\nHH\236A\304\\\262S\310!BI\210I\210+\207" [$region $action $nterm 3 2 #10# opt-default-fcn 4 read] 12 "\n\n(fn STACK SP GOTOS)"] #11="flat-dictionary-entry-list:1" #[771 "\303ZH@SH@\303ZSHA@HAAU\204M\2044\304\\\211\262HA@\262\202\211\204G\304Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\305\306\307Z\nHH\236A\304\\\262S\310\"BI\210I\210+\207" [$region $action $nterm 3 2 #11# flat-dictionary-entry-list 4 append] 13 "\n\n(fn STACK SP GOTOS)"] #12="template_file:3" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #12# template_file 2] 10 "\n\n(fn STACK SP GOTOS)"] #13="opt-default-fcn:1" #[771 "SH@\303ZSHA@HAAU\204G\204.\304\\\211\262HA@\262\202\211\204A\304Z\211\262HAA\262\202\262\202\205R\211\205RB\266\205\305\306\307Z\nHH\236A\304\\\262S\310!BI\210I\210+\207" [$region $action $nterm 3 2 #13# opt-default-fcn 4 read] 12 "\n\n(fn STACK SP GOTOS)"] #14="template_file:4" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #14# template_file 2] 10 "\n\n(fn STACK SP GOTOS)"] #15="templatename:0" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #15# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #16="section-dictionary-list:0" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #16# section-dictionary-list 2] 9 "\n\n(fn STACK SP GOTOS)"] #17="opt-default-fcn:2" #[771 "SH@\303ZSHA@HAAU\204G\204.\304\\\211\262HA@\262\202\211\204A\304Z\211\262HAA\262\202\262\202\205R\211\205RB\266\205\305\306\307Z\nHH\236A\304\\\262S\310\311!BBI\210I\210+\207" [$region $action $nterm 3 2 #17# opt-default-fcn 4 macro read] 12 "\n\n(fn STACK SP GOTOS)"] #18="prompt:0" #[771 "\304ZH@\305ZH@\306ZH@\307ZH@\310ZSHA@HAAU\204]\204D\311\\\211\262HA@\262\202+\211\204W\311Z\211\262HAA\262\202+\262\202+\205h\211\205hB\266\205\312\313\314Z\n	HH\236A\311\\\262S\313\315\316\n!\317\n\320\257\321!\322\211\257\266\203\211\204\255AA\211\203\265@AD\202\270ddD\244\262BI\210I\210+\207" [$region $action $nterm wisent-input 9 7 5 3 11 2 #18# prompt 12 :text read :default :read semantic-tag-make-plist nil] 19 "\n\n(fn STACK SP GOTOS)"] #19="templatename:1" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #19# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #20="opt-default-fcn:3" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #20# opt-default-fcn 2] 9 "\n\n(fn STACK SP GOTOS)"] #21="opt-dynamic-arguments:0" #[771 "\303ZH@SH@\303ZSHA@HAAU\204M\2044\304\\\211\262HA@\262\202\211\204G\304Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\305\306\307Z\nHH\236A\304\\\262SBBI\210I\210+\207" [$region $action $nterm 3 2 #21# opt-dynamic-arguments 4] 13 "\n\n(fn STACK SP GOTOS)"] #22="opt-read-fcn:0" #[771 "SH@\303ZSHA@HAAU\204G\204.\304\\\211\262HA@\262\202\211\204A\304Z\211\262HAA\262\202\262\202\205R\211\205RB\266\205\305\306\307Z\nHH\236A\304\\\262S\310!BI\210I\210+\207" [$region $action $nterm 3 2 #22# opt-read-fcn 4 read] 12 "\n\n(fn STACK SP GOTOS)"] #23="section-dictionary-list:1" #[771 "\303ZH@SH@\303ZSHA@HAAU\204M\2044\304\\\211\262HA@\262\202\211\204G\304Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\305\306\307Z\nHH\236A\304\\\262S\310C\"BI\210I\210+\207" [$region $action $nterm 3 2 #23# section-dictionary-list 4 append] 13 "\n\n(fn STACK SP GOTOS)"] #24="section-dictionary:0" #[771 "\303ZH@\304ZH@\305ZSHA@HAAU\204N\2045\306\\\211\262HA@\262\202\211\204H\306Z\211\262HAA\262\202\262\202\205Y\211\205YB\266\205\307\310\311Z\nHH\236A\306\\\262S\312!BBI\210I\210+\207" [$region $action $nterm 9 5 11 2 #24# section-dictionary 12 read] 13 "\n\n(fn STACK SP GOTOS)"] #25="templatename:2" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #25# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] "opt-dynamic-arguments:1" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil "opt-dynamic-arguments:1" opt-dynamic-arguments 2] 9 "\n\n(fn STACK SP GOTOS)"] #26="context:0" #[771 "\304ZH@\305ZSHA@HAAU\204H\204/\306\\\211\262HA@\262\202\211\204B\306Z\211\262HAA\262\202\262\202\205S\211\205SB\266\205\307\310\311Z\nHH\236A\306\\\262S\310\312\313!\312\211\257\266\203\211\204\211AA\211\203\221@AD\202\224ddD\244\262BI\210I\210+\207" [$region $action $nterm wisent-input 3 5 2 #26# context 6 nil semantic-tag-make-plist] 16 "\n\n(fn STACK SP GOTOS)"] #27="variable:0" #[771 "\304ZH@\305ZH@\306ZSHA@HAAU\204N\2045\307\\\211\262HA@\262\202\211\204H\307Z\211\262HAA\262\202\262\202\205Y\211\205YB\266\205\310\311\312Z\nHH\236A\307\\\262S\313\313\314\315\311\316\317&\266\204\211\204\227AA\211\203\237@AD\202\242ddD\244\262BI\210I\210+\207" [$region $action $nterm wisent-input 5 3 7 2 #27# variable 8 nil apply semantic-tag :type :default-value] 22 "\n\n(fn STACK SP GOTOS)"] #28="opt-read-fcn:1" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #28# opt-read-fcn 2] 9 "\n\n(fn STACK SP GOTOS)"] #29="section-dictionary-list:2" #[771 "\303ZH@SH@\303ZSHA@HAAU\204M\2044\304\\\211\262HA@\262\202\211\204G\304Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\305\306\307Z\nHH\236A\304\\\262S\310C\"BI\210I\210+\207" [$region $action $nterm 3 2 #29# section-dictionary-list 4 append] 13 "\n\n(fn STACK SP GOTOS)"] #30="template:0" #[771 "\304ZH@\305ZH@\306ZH@\307ZH@\310ZH@SH@\311Z	SHA@HAAU\204l\204S\312\\\211\262HA@\262\202:\211\204f\312Z\211\262HAA\262\202:\262\202:\205w\211\205wB\266\205\313\314\315Z\nHH\236A\312\\\262\nS	\316\n\317\320\321\322\257\323\324\325\326\327&\266\204\211\204\305AA\211\203\315@AD\202\320ddD\244\262BI\210\nI\210+\207" [$region $action $nterm wisent-input 15 13 9 7 5 17 2 #30# template 18 nil :documentation :code :dictionaries :binding apply semantic-tag function :type :arguments] 26 "\n\n(fn STACK SP GOTOS)"] #31="templatename:3" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #31# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #32="insertable-string:0" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262S\306!BI\210I\210+\207" [$region $action $nterm #32# insertable-string 2 read] 10 "\n\n(fn STACK SP GOTOS)"] #33="insertable-string-list:0" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SCBI\210I\210+\207" [$region $action $nterm #33# insertable-string-list 2] 10 "\n\n(fn STACK SP GOTOS)"] #34="insertable-string:1" #[771 "SH@\303ZSHA@HAAU\204G\204.\304\\\211\262HA@\262\202\211\204A\304Z\211\262HAA\262\202\262\202\205R\211\205RB\266\205\305\306\307Z\nHH\236A\304\\\262S\310\311!BBI\210I\210+\207" [$region $action $nterm 3 2 #34# insertable-string 4 macro read] 12 "\n\n(fn STACK SP GOTOS)"] #35="variable:1" #[771 "\304ZH@\305ZH@\306ZSHA@HAAU\204N\2045\307\\\211\262HA@\262\202\211\204H\307Z\211\262HAA\262\202\262\202\205Y\211\205YB\266\205\310\311\312Z\nHH\236A\307\\\262S\313C\313\314\315\311\316\317&\266\204\211\204\230AA\211\203\240@AD\202\243ddD\244\262BI\210I\210+\207" [$region $action $nterm wisent-input 5 3 7 2 #35# variable 8 nil apply semantic-tag :type :default-value] 22 "\n\n(fn STACK SP GOTOS)"] #36="templatename:4" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #36# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #37="variable:2" #[771 "\304ZH@\305ZSHA@HAAU\204H\204/\306\\\211\262HA@\262\202\211\204B\306Z\211\262HAA\262\202\262\202\205S\211\205SB\266\205\307\310\311Z\nHH\236A\306\\\262S\312\313\312\314\315\310\316\317&\266\204\211\204\217AA\211\203\227@AD\202\232ddD\244\262BI\210I\210+\207" [$region $action $nterm wisent-input 3 5 2 #37# variable 6 nil t apply semantic-tag :type :default-value] 21 "\n\n(fn STACK SP GOTOS)"] #38="insertable-string-list:1" #[771 "\303ZH@SH@\303ZSHA@HAAU\204M\2044\304\\\211\262HA@\262\202\211\204G\304Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\305\306\307Z\nHH\236A\304\\\262S\310C\"BI\210I\210+\207" [$region $action $nterm 3 2 #38# insertable-string-list 4 append] 13 "\n\n(fn STACK SP GOTOS)"] #39="dictionary-entry:1" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SCBI\210I\210+\207" [$region $action $nterm #39# dictionary-entry 2] 10 "\n\n(fn STACK SP GOTOS)"] #40="templatename:5" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #40# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #41="opt-string:0" #[771 "\303ZH@\303ZSHA@HAAU\204H\204/\304\\\211\262HA@\262\202\211\204B\304Z\211\262HAA\262\202\262\202\205S\211\205SB\266\205\305\306\307Z\nHH\236A\304\\\262S\310!BI\210I\210+\207" [$region $action $nterm 3 2 #41# opt-string 4 read] 12 "\n\n(fn STACK SP GOTOS)"] #42="dictionary-entry-list:0" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #42# dictionary-entry-list 2] 9 "\n\n(fn STACK SP GOTOS)"] #43="templatename:6" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #43# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #44="opt-string:1" #[771 "\303\304\305\211HH\236A\306\\\262S\303BI\210I\210+\207" [$region $action $nterm nil #44# opt-string 2] 9 "\n\n(fn STACK SP GOTOS)"] #45="dictionary-entry-list:1" #[771 "\303ZH@SH@\303ZSHA@HAAU\204M\2044\304\\\211\262HA@\262\202\211\204G\304Z\211\262HAA\262\202\262\202\205X\211\205XB\266\205\305\306\307Z\nHH\236A\304\\\262S\310\"BI\210I\210+\207" [$region $action $nterm 3 2 #45# dictionary-entry-list 4 append] 13 "\n\n(fn STACK SP GOTOS)"] #46="templatename:7" #[771 "SH@SHA\303\304\305Z\nHH\236A\305\\\262SBI\210I\210+\207" [$region $action $nterm #46# templatename 2] 10 "\n\n(fn STACK SP GOTOS)"] #47="opt-bind:0" #[771 "\303ZH@\304ZSHA@HAAU\204H\204/\305\\\211\262HA@\262\202\211\204B\305Z\211\262HAA\262\202\262\202\205S\211\205SB\266\205\306\307\310Z\nHH\236A\305\\\262S\311!BI\210I\210+\207" [$region $action $nterm 3 5 2 #47# opt-bind 6 read] 12 "\n\n(fn STACK SP GOTOS)"] vector (default . error) (SET . 1) (SHOW . 2) (CONTEXT . 3) (TEMPLATE . 4) (PROMPT . 5) (newline . 6) (default . error) (symbol . 11) (default . error) (symbol . 12) (default . error) (symbol . 13) (default . error) (SET . 14) (MACRO . 15) (CONTEXT . 16) (TEMPLATE . 17) (PROMPT . 18) (DEFAULT . 19) (DEFAULTMACRO . 20) (READ . 21) (symbol . 22) (default . error) (symbol . 24) default intern-soft (default . error) (MACRO . 25) (string . 26) (number . 27) (default . error) (newline . 30) (default . error) (newline . 31) (property . 32) (default . error) (string . 34) (default . error) (string . 35) (default . error) (newline . 36) (default . error) (MACRO . 25) (newline . 37) (string . 26) (property . 32) (default . error) (newline . 40) (DEFAULT . 41) (DEFAULTMACRO . 42) (string . 44) (default . error) (symbol . 46) (string . 47) (default . error) (string . 48) (READ . 49) (default . error) (newline . 51) (default . error) (symbol . 53) (default . error) (newline . 54) (default . error) (SECTIONDICTIONARY . 55) (SECTION . 56) (TEMPLATE_BLOCK . 57) (default . error) (string . 60) (default . error) (string . 61) (default . error) (newline . 62) (default . error) (newline . 63) (default . error) (newline . 64) (BIND . 65) (default . error) (string . 69) (SET . 1) (SHOW . 2) (default . error) (SET . 1) (SHOW . 2) (SECTION . 56) (END . 72) (default . error) (newline . 76) (default . error) (newline . 77) (default . error) ($EOI . 79) (default . error) ($EOI . 80) (default . accept) [((template . 10) (variable . 9) (prompt . 8) (context . 7) (template_file . 78)) nil nil nil ((templatename . 23)) nil nil nil nil nil nil ((insertable-string . 29) (insertable-string-list . 28)) nil nil nil nil nil nil nil nil nil nil nil ((opt-dynamic-arguments . 33)) nil nil nil nil ((insertable-string . 38)) nil nil nil ((opt-dynamic-arguments . 39)) nil ((opt-default-fcn . 43)) nil nil nil nil nil ((opt-string . 45)) nil nil ((opt-read-fcn . 50)) nil ((section-dictionary-list . 52)) nil nil nil nil nil nil ((section-dictionary . 59) (flat-section-dictionary . 58)) nil nil nil nil nil nil nil nil nil ((opt-bind . 66)) ((flat-dictionary-entry-list . 67)) ((dictionary-entry-list . 68)) nil nil ((flat-dictionary-entry . 71) (variable . 70)) ((dictionary-entry . 75) (section-dictionary . 74) (variable . 73)) nil nil nil nil nil nil nil nil nil nil nil nil] nil] 84) (#$ . 2152))
#@28 Setup the Semantic Parser.
(defalias 'srecode-template-wy--install-parser #[0 "\306\307!\210\310	\311\f\312\313\314\315\316$\207" [semantic-parser-name srecode-template-wy--parse-table semantic--parse-table semantic-debug-parser-source srecode-template-wy--keyword-table semantic-flex-keywords-obarray semantic-install-function-overrides ((semantic-parse-stream . wisent-parse-stream)) "LALR" "srecode-template.wy" add-hook wisent-discarding-token-functions wisent-collect-unmatched-syntax nil t srecode-template-wy--token-table semantic-lex-types-obarray] 5 (#$ . 21469)])
#@38 regexp analyzer for <number> tokens.
(defconst srecode-template-wy--<number>-regexp-analyzer '((looking-at semantic-lex-number-expression) (semantic-lex-push-token (semantic-lex-token 'number (match-beginning 0) (match-end 0)))) (#$ . 22057))
#@38 regexp analyzer for <number> tokens.
(defalias 'srecode-template-wy--<number>-regexp-analyzer #[0 "\306``dB\307\310\n!\2037\311\307\224\307\225BB
B\211@\211\211A@\247\204/\211AA\262\2023\211A\262A\262
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at number semantic-lex-number-expression] 6 (#$ . 22306)])
#@40 keyword analyzer for <keyword> tokens.
(defconst srecode-template-wy--<keyword>-keyword-analyzer '((and (looking-at "\\(\\sw\\|\\s_\\)+") (let ((#1=#:key (semantic-lex-keyword-p (match-string 0)))) (when #1# (semantic-lex-push-token (semantic-lex-token #1# (match-beginning 0) (match-end 0))))))) (#$ . 22760))
#@40 keyword analyzer for <keyword> tokens.
(defalias 'srecode-template-wy--<keyword>-keyword-analyzer #[0 "\306``dB\307\310\311!\203\\\312\307!\211\313
!\205'\211;\205'\314
\"\262\211\262\2051\211J\262\211\203[\211\307\224\307\225BB
B\211@\211\211A@\247\204S\211AA\262\202W\211A\262A\262\210
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at "\\(\\sw\\|\\s_\\)+" match-string obarrayp intern-soft semantic-flex-keywords-obarray] 6 (#$ . 23077)])
#@36 sexp analyzer for <string> tokens.
(defconst srecode-template-wy--<string>-sexp-analyzer '((looking-at "\\s\"") (semantic-lex-push-token (semantic-lex-token #1='string (point) (save-excursion (semantic-lex-unterminated-syntax-protection #1# (forward-sexp 1) (point)))))) (#$ . 23675))
#@36 sexp analyzer for <string> tokens.
(defalias 'srecode-template-wy--<string>-sexp-analyzer #[0 "\306``dB\307\310\311!\203e\312`\212\203'\203'\313\314!\210`\202E\31514\313\314!\210`0\202E\210\312@A#b\210`\211\262)BB
B\211@\211\211A@\247\204]\211AA\262\202a\211A\262A\262
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at "\\s\"" string forward-sexp 1 (error) debug-on-error semantic-lex-debug-analyzers semantic-lex-unterminated-syntax-end-function] 8 (#$ . 23966)])
#@40 regexp analyzer for <property> tokens.
(defconst srecode-template-wy--<property>-regexp-analyzer '((looking-at ":\\(\\w\\|\\s_\\)*") (semantic-lex-push-token (semantic-lex-token 'property (match-beginning 0) (match-end 0)))) (#$ . 24593))
#@40 regexp analyzer for <property> tokens.
(defalias 'srecode-template-wy--<property>-regexp-analyzer #[0 "\306``dB\307\310\311!\2036\312\307\224\307\225BB
B\211@\211\211A@\247\204.\211AA\262\2022\211A\262A\262
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at ":\\(\\w\\|\\s_\\)*" property] 6 (#$ . 24838)])
#@43 string analyzer for <punctuation> tokens.
(defconst srecode-template-wy--<punctuation>-string-analyzer '((looking-at "\\s.+") (semantic-lex-push-token (semantic-lex-token 'punctuation (match-beginning 0) (match-end 0)))) (#$ . 25289))
#@43 string analyzer for <punctuation> tokens.
(defalias 'srecode-template-wy--<punctuation>-string-analyzer #[0 "\306``dB\307\310\311!\2036\312\307\224\307\225BB
B\211@\211\211A@\247\204.\211AA\262\2022\211A\262A\262
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at "\\s.+" punctuation] 6 (#$ . 25530)])
#@38 regexp analyzer for <symbol> tokens.
(defconst srecode-template-wy--<symbol>-regexp-analyzer '((looking-at "\\(\\sw\\|\\s_\\)+") (semantic-lex-push-token (semantic-lex-token 'symbol (match-beginning 0) (match-end 0)))) (#$ . 25977))
#@38 regexp analyzer for <symbol> tokens.
(defalias 'srecode-template-wy--<symbol>-regexp-analyzer #[0 "\306``dB\307\310\311!\2036\312\307\224\307\225BB
B\211@\211\211A@\247\204.\211AA\262\2022\211A\262A\262
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at "\\(\\sw\\|\\s_\\)+" symbol] 6 (#$ . 26216)])
#@50 Detect and create a dynamic argument properties.
(defconst srecode-template-property-analyzer '((looking-at ":\\(\\w\\|\\s_\\)*") (semantic-lex-push-token (semantic-lex-token 'property (match-beginning 0) (match-end 0)))) (#$ . 26661))
#@50 Detect and create a dynamic argument properties.
(defalias 'srecode-template-property-analyzer #[0 "\306``dB\307\310\311!\2036\312\307\224\307\225BB
B\211@\211\211A@\247\204.\211AA\262\2022\211A\262A\262
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at ":\\(\\w\\|\\s_\\)*" property] 6 (#$ . 26903)])
#@43 Detect and create a template quote block.
(defconst srecode-template-separator-block '((looking-at "^----\n") (semantic-lex-push-token (semantic-lex-token 'TEMPLATE_BLOCK (match-end 0) (semantic-lex-unterminated-syntax-protection 'TEMPLATE_BLOCK (goto-char (match-end 0)) (re-search-forward "^----$") (match-beginning 0)))) (setq semantic-lex-end-point (point))) (#$ . 27351))
#@43 Detect and create a template quote block.
(defalias 'srecode-template-separator-block #[0 "\306``dB\307\310\311!\203p\312\307\225\203,\203,\307\225b\210\313\314!\210\307\224\202O\3151>\307\225b\210\313\314!\210\307\2240\202O\210\312@A#b\210`\211\262BB
B\211@\211\211A@\247\204f\211AA\262\202j\211A\262A\262`
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at "^----\n" TEMPLATE_BLOCK re-search-forward "^----$" (error) debug-on-error semantic-lex-debug-analyzers semantic-lex-unterminated-syntax-end-function] 8 (#$ . 27734)])
#@183 Lexical analyzer that handles SRecode Template buffers.
It ignores whitespace, newlines and comments.
See `semantic-lex' for more information.

(fn START END &optional DEPTH LENGTH)
(defalias 'wisent-srecode-template-lexer #[1026 "\306\307\310#\210`\306\211\211\311\206
<B=\306>dV\203.\312\313d#\210\314 p\315\316#\216\317?!\210b\210`W\203\372\203R	GX\203\372\320\321!\203\322\323\224\323\225BB	B\211@\211\211A@\247\204t\211AA\262\202x\211A\262A\262\202\236\320\324!\203\213\311\225\202\236\320\321!\203\227\311\225\202\236\320@!\203\311`\325\323!\210`=\203\262\326\327\330 \"\210\202\271n\203\271\331u\210`=\203\303\312\332!\210`\210\202\236\320\333!\2032\334\311\225A\203\351B\203\351\311\225b\210\335\336!\210\311\224\202\3371\373\311\225b\210\335\336!\210\311\2240\202\210\334C=@=A#b\210`\211\262BB	B\211@\211\211A@\247\204%\211AA\262\202)\211A\262A\262`\202\236\320\340!\203\207\341\311!\211\342D!\205M\211;\205M\343D\"\262\211\262\205W\211J\262\211\205\202\211\311\224\311\225BB	B\211@\211\211A@\247\204y\211AA\262\202}\211A\262A\262\211\262\204\236\320\344!\203\264\345\311\224\311\225BB	B\211@\211\211A@\247\204\251\211AA\262\202\255\211A\262A\262\202\236\320E!\203\342\346\311\224\311\225BB	B\211@\211\211A@\247\204\327\211AA\262\202\333\211A\262A\262\202\236\320\340!\203\347\311\224\311\225BB	B\211@\211\211A@\247\204\211AA\262\202\211A\262A\262\202\236\320\350!\203m\351`\212A\203*B\203*\352\323!\210`\202J\35317\352\323!\210`0\202J\210\351C=@=A#b\210`\211\262)BB	B\211@\211\211A@\247\204b\211AA\262\202f\211A\262A\262\202\236\320\354!\203\232\355\311\224\311\225BB	B\211@\211\211A@\247\204\217\211AA\262\202\223\211A\262A\262\202\236\312\356!\210=\203\253\312\357	@#\210\262b\210F\203\323\360 \204\315r\361G!q\210\212Gb\210\362 *\203\323\363F\364\"\210	@H\205\365\306C\315\365\"\216\203\353\211\366!\240\210\367\370\371\f#!)\262\266\202@)\266\n\2031\n\211A\242\211\211\203\372\373@A@#\210\n\211A\242\262\202@C=@=A#b\210`\211\266b\210	\237.\207" [semantic-lex-block-streams semantic-lex-token-stream semantic-lex-block-stack semantic-lex-end-point semantic-lex-current-depth semantic-lex-depth nil run-hook-with-args semantic-lex-reset-functions 0 error "wisent-srecode-template-lexer: end (%d) > point-max (%d)" syntax-table make-closure #[0 "r\301q\210\302\300!)\207" [V0 V1 set-syntax-table] 2] set-syntax-table looking-at "\\s-*\\(\n\\|\\s>\\)" newline 1 "\\s-+" forward-comment skip-syntax-forward "-.'" point-at-eol -1 "Strange comment syntax prevents lexical analysis" "^----\n" TEMPLATE_BLOCK re-search-forward "^----$" (error) "\\(\\sw\\|\\s_\\)+" match-string obarrayp intern-soft ":\\(\\w\\|\\s_\\)*" property number symbol "\\s\"" string forward-sexp (error) "\\s.+" punctuation "Unmatched Text during Lexical Analysis" "wisent-srecode-template-lexer: endless loop at %d, after %S" input-pending-p marker-buffer accept-process-output throw lex #[0 "\300\242\205	\301\300\242!\207" [V0 delete-overlay] 2] semantic-lex-highlight-token read-event format "%S :: Depth: %d :: SPC - continue" message "wisent-srecode-template-lexer: `%s' block from %S is unterminated" semantic-lex-maximum-depth semantic-lex-analysis-bounds parse-sexp-lookup-properties semantic-lex-syntax-table semantic-lex-comment-regex debug-on-error semantic-lex-debug-analyzers semantic-lex-unterminated-syntax-end-function semantic-flex-keywords-obarray semantic-lex-number-expression semantic-current-input-throw-symbol semantic--on-input-start-marker semantic-lex-debug] 16 (#$ . 28424)])
(provide 'srecode/srt-wy)

Youez - 2016 - github.com/yon3zu
LinuXploit