;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303!\204\300\304!\210\300\305!\210\300\306!\207" [require make-regexp boundp c-emacs-features cc-vars comint ess-trns] 2) #@203 Help section keys. `key' indicates the keystroke to use to search for the section heading `string' in an Stata help file. `string' is used as part of a regexp-search, and so specials should be quoted.  (defconst ess-help-STA-sec-keys-alist '((100 . "Description") (101 . "Examples") (111 . "Options") (115 . "Also see") (83 . "Syntax") (114 . "Remarks") (116 . "Title")) (#$ . 242)) #@57 Reg(ular) Ex(pression) of section headers in help file. (defconst ess-help-STA-sec-regex "^[A-Z a-z]+:?\n-+\\|http:" (#$ . 631)) #@30 Syntax table for Stata code. (defvar STA-syntax-table (byte-code "\301 \302\303\304#\210\302\305\304#\210\302\306\307#\210\302\310\311#\210\302\312\313#\210\302\314\315#\210\302\316\317#\210\302\320\317#\210\302\321\304#\210\302\322\304#\210\302\323\304#\210\302\324\304#\210\302\325\304#\210\302\326\304#\210\302\327\304#\210\302\330\304#\210\302\331\304#\210)\207" [tbl make-syntax-table modify-syntax-entry 92 "." 36 96 "('" 39 ")`" 47 ". 124b" 42 ". 23" 10 "> b" 13 43 45 61 37 60 62 38 124 126] 4) (#$ . 766)) #@129 Create font lock keywords for Stata syntax. This is from the ado-mode of Bill Rising , and uses make-regexp. (defalias 'ado-set-font-lock-keywords #[nil "\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\257=\207" [("\\(^\\*!.*\\)" (1 font-lock-keyword-face)) ("^\\(pr\\(\\|o\\(\\|g\\(\\|r\\(\\|am?\\)\\)\\)\\)\\)[ ]+\\(d\\([ei]\\|ef\\(\\|i\\(\\|ne?\\)\\)\\|ir\\|rop\\)\\|l\\(\\|i\\(\\|st?\\)\\)\\)[ ]+\\([_a-z]+[_a-z0-9]*\\)" (1 font-lock-keyword-face) (6 font-lock-type-face nil) (12 font-lock-keyword-face nil)) ("\\(^[ ]*version\\)[ ]*\\(1.0 2.0 2.1 3.0 3.1 4.0 5.0 6 6.0\\)" (1 font-lock-reference-face) (2 font-lock-type-face)) ("^\\(end\\|pause\\)[ /t]*.*$" (1 font-lock-keyword-face)) ("\\(^[ ]*#delimit\\)\\s-*\\(\\(cr\\|;\\)\\s-*$\\)" (1 font-lock-reference-face) (2 font-lock-type-face nil)) ("\\(^[ ]*set\\)[ ]+\\([bdglrt]\\|ANSI\\|IBM\\|adosize\\|be\\(\\|ep?\\)\\|c\\(hecksum\\|ontents\\)\\|di\\(\\|s\\(\\|p\\(\\|l\\(\\|ay?\\)\\)\\)\\)\\|gr\\(\\|a\\(\\|p\\(\\|h\\(\\|i\\(\\|cs?\\)\\)\\)\\)\\)\\|help\\|l\\([eo]\\|ev\\(\\|el?\\)\\|inesize\\|og\\)\\|m\\(a\\(t\\(\\|s\\(\\|i\\(\\|ze?\\)\\)\\)\\|x\\(obs\\|var\\)\\)\\|em\\(\\|o\\(\\|ry?\\)\\)\\|o\\(\\|re?\\)\\)\\|o\\(bs\\|u\\(\\|t\\(\\|p\\(\\|ut?\\)\\)\\)\\)\\|pagesize\\|rm\\(\\|sg?\\)\\|s\\(e\\(\\|e\\(\\|d0?\\)\\)\\|hell\\)\\|t\\([ery]\\|ex\\(\\|t\\(\\|s\\(\\|i\\(\\|ze?\\)\\)\\)\\)\\|ra\\(\\|ce?\\)\\|ype?\\)\\|vi\\(deo\\|r\\(\\|t\\(\\|u\\(\\|al?\\)\\)\\)\\)\\)[ ]*\\([a-zA-Z0-9]*\\)" (1 font-lock-reference-face) (2 font-lock-reference-face t) (43 font-lock-type-face)) ("[ ]+\\(cons\\(\\|t\\(\\|r\\(\\|a\\(\\|i\\(\\|nt?\\)\\)\\)\\)\\)\\)[ ]+\\([dl]\\|d\\([ei]\\|ef\\(\\|i\\(\\|ne?\\)\\)\\|ir\\|rop\\)\\|li\\(\\|st?\\)\\)\\b" (1 font-lock-reference-face) (7 font-lock-type-face)) ("[ ]+\\(conf\\(\\|i\\(\\|rm?\\)\\)\\)[ ]+\\([efnv]\\|ex\\(\\|i\\(\\|s\\(\\|t\\(\\|e\\(\\|n\\(\\|ce?\\)\\)\\)\\)\\)\\)\\|fi\\(\\|le?\\)\\|nu\\(\\|m\\(\\|b\\(\\|er?\\)\\)\\)\\|va\\(\\|r\\(\\|i\\(\\|a\\(\\|b\\(\\|le?\\)\\)\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face)) ("[ ]+\\(conf\\(\\|i\\(\\|rm?\\)\\)\\)[ ]+\\(integer\\)[ ]+\\(n\\(\\|u\\(\\|m\\(\\|b\\(\\|er?\\)\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face) (5 font-lock-type-face)) ("[ ]+\\(conf\\(\\|i\\(\\|rm?\\)\\)\\)[ ]+\\(n\\(\\|ew?\\)\\)[ ]+\\([fv]\\|fi\\(\\|le?\\)\\|va\\(\\|r\\(\\|i\\(\\|a\\(\\|b\\(\\|le?\\)\\)\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face) (6 font-lock-type-face)) ("[ ]+\\(conf\\(\\|i\\(\\|rm?\\)\\)\\)[ ]+\\(byte\\|double\\|float\\|int\\|long\\|numeric\\|str\\(\\|i\\(\\|ng?\\)\\)\\)[ ]+\\(v\\(\\|a\\(\\|r\\(\\|i\\(\\|a\\(\\|b\\(\\|le?\\)\\)\\)\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face) (7 font-lock-type-face)) ("[ ]+\\(conf\\(\\|i\\(\\|rm?\\)\\)\\)[ ]+\\(str\\)[1-9]+[0-9]*[ ]+\\(v\\(\\|a\\(\\|r\\(\\|i\\(\\|a\\(\\|b\\(\\|le?\\)\\)\\)\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face) (5 font-lock-type-face)) ("[ ]+\\(est\\(\\|i\\(\\|m\\(\\|a\\(\\|t\\(\\|es?\\)\\)\\)\\)\\)\\)[ ]+\\([hu]\\|clear\\|d\\(i\\(\\|[rs]\\|sp\\(\\|l\\(\\|ay?\\)\\)\\)\\|rop\\)\\|ho\\(\\|ld?\\)\\|l\\(i\\(\\|st?\\)\\|oc\\(\\|al?\\)\\)\\|mat\\(\\|r\\(\\|ix?\\)\\)\\|post\\|repost\\|sca\\(\\|l\\(\\|ar?\\)\\)\\|un\\(\\|h\\(\\|o\\(\\|ld?\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (7 font-lock-type-face)) ("[ ]+\\(gph\\)[ ]+\\(arc\\|box\\|cl\\(ear\\|ose\\)\\|font\\|line\\|open\\|p\\(en\\|oint\\)\\|text\\|v\\(line\\|po\\(int\\|ly\\)\\|text\\)\\)\\b" (1 font-lock-reference-face) (2 font-lock-type-face)) ("[ ]+\\(mat\\(\\|r\\(\\|ix?\\)\\)\\)[ ]+\\([dl]\\|ac\\(\\|c\\(\\|um?\\)\\)\\|c\\(loname\\|ol\\([en]\\|eq\\|na\\(\\|m\\(\\|es\\)\\)\\)\\)\\|d\\(ef\\(\\|i\\(\\|ne?\\)\\)\\|i\\(\\|r\\|spCns\\)\\|rop\\(\\| _all\\)\\)\\|glsa\\(\\|c\\(\\|c\\(\\|um?\\)\\)\\)\\|li\\(\\|st?\\)\\|m\\(akeCns\\|lout?\\)\\|post\\|row\\([en]\\|eq\\|na\\(\\|m\\(\\|es?\\)\\)\\)\\|s\\(co\\(\\|re?\\)\\|ub\\(\\|s\\(\\|t\\(\\|i\\(\\|t\\(\\|u\\(\\|te?\\)\\)\\)\\)\\)\\)\\|vd\\|yme\\(\\|i\\(\\|g\\(\\|en?\\)\\)\\)\\)\\|veca\\(\\|c\\(\\|c\\(\\|um?\\)\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face)) ("[ ]+\\(ml\\)[ ]+\\([bfq]\\|be\\(\\|g\\(\\|in?\\)\\)\\|c\\(heck\\|ount\\)\\|d\\([ei]\\|ep\\(\\|n\\(\\|a\\(\\|m\\(\\|es?\\)\\)\\)\\)\\|is\\(\\|p\\(\\|l\\(\\|ay?\\)\\)\\)\\)\\|fu\\(\\|n\\(\\|c\\(\\|t\\(\\|i\\(\\|on?\\)\\)\\)\\)\\)\\|gr\\(\\|a\\(\\|ph?\\)\\)\\|init\\|m\\([elo]\\|ax\\(\\|i\\(\\|m\\(\\|i\\(\\|ze?\\)\\)\\)\\)\\|et\\(\\|h\\(\\|od?\\)\\)\\|lo\\(\\|ut?\\)\\|od\\(\\|el?\\)\\)\\|p\\([lo]\\|lot?\\|ost?\\)\\|qu\\(\\|e\\(\\|ry?\\)\\)\\|re\\(\\|p\\(\\|o\\(\\|rt?\\)\\)\\)\\|s\\([ae]\\|am\\(\\|p\\(\\|le?\\)\\)\\|ea\\(\\|r\\(\\|ch?\\)\\)\\)\\|trace\\)\\b" (1 font-lock-reference-face) (2 font-lock-type-face)) ("[ ]+\\(net\\)[ ]+\\([dq]\\|cd\\|de\\(\\|s\\(\\|c\\(\\|r\\(\\|i\\(\\|be?\\)\\)\\)\\)\\)\\|from\\|get\\|install\\|link\\|qu\\(\\|e\\(\\|ry?\\)\\)\\)\\b" (1 font-lock-reference-face) (2 font-lock-type-face)) ("[ ]+\\(net\\)[ ]+\\(set\\)[ ]+\\(ado\\|other\\)\\b" (1 font-lock-reference-face) (2 font-lock-reference-face) (3 font-lock-type-face)) ("[ ]+\\(ado\\)[ ]+\\(d\\(\\|e\\(\\|s\\(\\|c\\(\\|r\\(\\|i\\(\\|be?\\)\\)\\)\\)\\)\\|ir\\)\\|uninstall\\)\\b" (1 font-lock-reference-face) (2 font-lock-type-face)) ("[ ]+\\(reshape\\)[ ]+\\([ij]\\|clear\\|error\\|long\\|wide\\|xij?\\)\\b" (1 font-lock-keyword-face) (2 font-lock-type-face)) ("[ ]+\\(ret\\(\\|u\\(\\|rn?\\)\\)\\)[ ]+\\(add\\|clear\\|local\\|matrix\\|scalar\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face)) ("[ ]+\\(sret\\(\\|u\\(\\|rn?\\)\\)\\)[ ]+\\(clear\\|local\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face)) ("[ ]+\\(sts\\)[ ]+\\([glt]\\|g\\(en\\(\\|e\\(\\|r\\(\\|a\\(\\|te?\\)\\)\\)\\)\\|r\\(\\|a\\(\\|ph?\\)\\)\\)\\|li\\(\\|st?\\)\\|te\\(\\|st?\\)\\)\\b" (1 font-lock-reference-face) (2 font-lock-type-face)) ("[ ]+\\(sw\\)[ ]+\\(c\\(loglog\\|nreg\\|ox\\)\\|ereg\\|g\\(amma\\|lm\\|ompertz\\)\\|hetprob\\|l\\(logist\\|normal\\|ogi\\(stic\\|t\\)\\)\\|o\\(logit\\|probit\\)\\|p\\(oisson\\|robit\\)\\|qreg\\|reg\\(\\|r\\(\\|e\\(\\|ss?\\)\\)\\)\\|scobit\\|tobit\\|weibull\\)\\b" (1 font-lock-reference-face) (2 font-lock-type-face)) ("[ ]+\\(win\\(\\|d\\(\\|ow?\\)\\)\\)[ ]+\\([dl]\\|d\\(i\\(\\|[ar]\\|al\\(\\|og?\\)\\)\\|rop\\)\\|f\\([os]\\|op\\(\\|en?\\)\\|sa\\(\\|ve?\\)\\)\\|list\\|push\\|stop\\(\\|b\\(\\|ox?\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face)) ("[ ]+\\(win\\(\\|d\\(\\|ow?\\)\\)\\)[ ]+\\(c\\(\\|o\\(\\|n\\(\\|t\\(\\|r\\(\\|ol?\\)\\)\\)\\)\\)\\)\\(button\\|c\\(heck\\|lear\\)\\|edit\\|m\\(combo\\|simple\\)\\|rad\\(begin\\|end\\|io\\)\\|s\\(combo\\|simple\\|tatic\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-reference-face) (10 font-lock-type-face)) ("[ ]+\\(win\\(\\|d\\(\\|ow?\\)\\)\\)[ ]+\\(man\\(\\|a\\(\\|ge?\\)\\)\\)[ ]+\\(forward\\|minimize\\|pr\\(efs \\(default\\|load\\|save\\)\\|int \\(graph\\|log\\)\\)\\|restore\\|update variable\\)\\b" (1 font-lock-reference-face) (4 font-lock-reference-face) (7 font-lock-type-face)) ("[ ]+\\(win\\(\\|d\\(\\|ow?\\)\\)\\)[ ]+\\(m\\(\\|e\\(\\|nu?\\)\\)\\)[ ]+\\(append \\(popout\\|s\\(eparator\\|tring\\)\\)\\|clear\\|popout\\|set\\)\\b" (1 font-lock-reference-face) (4 font-lock-reference-face) (7 font-lock-type-face)) ("[ ]+\\(xwin\\(\\|d\\(\\|ow?\\)\\)\\)[ ]+\\(d\\([ei]\\|ef\\(\\|i\\(\\|ne?\\)\\)\\|ir\\|rop\\)\\|l\\(\\|i\\(\\|st?\\)\\)\\)\\b" (1 font-lock-reference-face) (4 font-lock-type-face)) ("^[ ]+\\(c\\(ap\\(\\|t\\(\\|u\\(\\|re?\\)\\)\\)\\|har\\)\\|e\\(\\|rr\\(\\|or?\\)\\|x\\(\\|it?\\)\\)\\|par\\(\\|se?\\)\\|set\\)\\b" (1 font-lock-reference-face)) ("\\b\\(_\\(crcswxx\\|huber\\|qreg\\|robust\\)\\|a\\([ns]\\|cprplot\\|d\\(just\\|opath\\)\\|lpha\\|no\\(\\|va?\\)\\|r\\(ch\\|eg\\|ima\\)\\|ss\\(\\|e\\(\\|rt?\\)\\)\\|vplots?\\)\\|b\\([ery]\\|cskew0\\|eep?\\|i\\(probit\\|testi?\\)\\|logit\\|oxcox\\|probit\\|r\\(eak\\|ier\\|o\\(\\|w\\(\\|se?\\)\\)\\)\\|s\\(qreg\\|tat\\)\\)\\|c\\([cfist]\\|a\\(non\\|t\\)\\|c\\(hart\\|i\\)\\|entile\\|ii\\|lo\\(g\\(i\\(\\|tp?\\)\\|log\\)\\|se\\)\\|mdtool\\|n\\(r\\(\\|eg?\\)\\|sreg\\)\\|o\\([rux]\\|debook\\|mpare\\|py\\|r\\([cr]\\|r\\(e\\(\\|l\\(\\|a\\(\\|te?\\)\\)\\)\\|gram\\)\\)\\|unt?\\)\\|prplot\\|si\\|t\\(set\\|tost\\)\\|u\\(mul\\|sum\\)\\)\\)\\b" (1 font-lock-reference-face)) ("[ ]+\\(d\\(\\|[eios]\\|es\\(\\|c\\(\\|r\\(\\|i\\(\\|be?\\)\\)\\)\\)\\|f\\(beta\\|uller\\)\\|i\\([rs]\\|sp\\(\\|_\\(res\\|s\\)\\|l\\(\\|ay?\\)\\)\\)\\|otplot\\|probit\\|stdize\\|wstat\\)\\|e\\(ivreg\\|q\\|reg\\)\\|f\\(ac\\(\\|t\\(\\|or?\\)\\)\\|it\\|or\\|predict\\|racp\\(lot\\|oly\\)\\|sl\\)\\)\\b" (1 font-lock-reference-face)) ("[ ]+\\(g\\(ettoken\\|l\\(adder\\|m\\(\\|pred\\)\\|ogit\\)\\|nbreg\\|ompertz\\|p\\(h\\(dot\\|pen\\)\\|robit\\)\\|r\\(aph\\|eigen\\|meanby\\)\\)\\|h\\(a\\(dimvo\\|usman\\)\\|e\\(ck\\(man\\|prob\\)\\|t\\(prob\\|test\\)\\)\\|i\\(lite\\|st\\)\\|lu\\|otel\\)\\|i\\(is\\|n\\(s\\(\\|p\\(\\|e\\(\\|ct?\\)\\)\\)\\|t\\(eg\\|reg\\)\\)\\|qreg\\|ri?\\|stdize\\|vreg\\)\\|k\\(ap\\(\\|pa\\|wgt\\)\\|density\\|sm\\(\\|irnov\\)\\|tau\\|wallis\\)\\)\\b" (1 font-lock-reference-face)) ("[ ]+\\([ln]\\|l\\([iosv]\\|adder\\|fit\\|i\\(n\\(com\\|ktest\\)\\|st?\\)\\|o\\([go]\\|gi\\(\\|stic\\|t\\)\\|neway\\|ok\\(\\|for\\|up?\\)\\)\\|predict\\|r\\(oc\\|test\\)\\|s\\(ens\\|tat\\)\\|table\\|vr2plot\\)\\|m\\(a\\(n\\|tcproc\\)\\|cci?\\|eans\\|log\\(\\|it?\\)\\|ore?\\|vreg\\|x_param\\)\\|n\\([lo]\\|breg\\|ew\\(ey\\|s\\)\\|linit\\|o\\(i\\(\\|s\\(\\|i\\(\\|ly?\\)\\)\\)\\|tes?\\)\\|ptrend\\|umlist\\)\\|o\\(log\\(\\|i\\(\\|tp?\\)\\)\\|n\\(\\|e\\(\\|w\\(\\|ay?\\)\\)\\)\\|prob\\(\\|i\\(\\|tp?\\)\\)\\|rth\\(og\\|poly\\)\\|vtest\\)\\)\\b" (1 font-lock-reference-face)) ("[ ]+\\(p\\(ac\\|c\\(h\\(art\\|i\\)\\|orr\\)\\|ergram\\|l\\(\\|ot?\\)\\|norm\\|ois\\(gof\\|son\\)\\|perron\\|r\\(ais\\|ob\\(\\|it?\\)\\|testi?\\)\\|w\\(corr\\|d\\)\\)\\|q\\(\\|chi\\|norm\\|qplot\\|reg\\|u\\(\\|[ei]\\|a\\(dchk\\|ntile\\)\\|ery?\\|ie\\(\\|t\\(\\|ly?\\)\\)\\)\\)\\|r\\(anksum\\|chart\\|e\\(g\\(\\|[3r]\\|dw\\|ph\\|re\\(\\|ss?\\)\\)\\|shape\\)\\|ot\\(\\|a\\(\\|te?\\)\\)\\|reg\\|un\\(\\|test\\)\\|v\\(fplot\\|pplot\\)\\)\\)\\b" (1 font-lock-reference-face)) ("[ ]+\\(s\\([tu]\\|ampsi\\|co\\(\\|bit\\|nfirm\\|re?\\)\\|dtesti?\\|e\\(arch\\|rrbar\\)\\|francia\\|he\\(ll\\(\\|tool\\)\\|whart\\)\\|ign\\(rank\\|test\\)\\|ktest\\|log\\|p\\(earman\\|ikeplt\\)\\|qreg\\|t\\(_\\(ct\\|is\\|show\\)\\|c\\(ox\\(\\|km\\)\\|urv\\)\\|des\\|e\\(m\\|reg\\)\\|ir\\|m[ch]\\|ph\\(plot\\|test\\)\\|r\\(ate\\|eg\\)\\|s\\(\\|et?\\|um\\)\\|vary\\|weib\\)\\|u\\(m\\(\\|m\\(\\|a\\(\\|r\\(\\|i\\(\\|ze?\\)\\)\\)\\)\\)\\|reg\\)\\|vy\\(des\\|i\\(ntrg\\|vreg\\)\\|l\\(c\\|ogit\\)\\|m\\(ean\\|log\\)\\|o\\(log\\|prob\\)\\|p\\(ois\\|ro\\(bt\\|p\\)\\)\\|r\\(atio\\|eg\\)\\|set\\|t\\(ab\\|est\\|otal\\)\\)\\|wilk\\|y\\(m\\(m\\(etry\\|i\\)\\|plot\\)\\|ntax\\|sdir\\)\\)\\)\\b" (1 font-lock-reference-face)) ("[ ]+\\(t\\([aey]\\|ab\\(\\|[12iu]\\|disp\\|le\\|ul\\(\\|a\\(\\|te?\\)\\)\\)\\|es\\(\\|t\\(\\|nl\\|parm\\)\\)\\|is\\|o\\(b\\(\\|it?\\)\\|ken\\(\\|i\\(\\|ze?\\)\\)\\|uch\\)\\|s\\(report\\|set\\|unab\\)\\|testi?\\|ype?\\)\\|u\\(nab\\|sing\\)\\|v\\(ce\\|erinst\\|if\\|wls\\)\\|w\\(eibull\\|h\\(ich\\|o\\)\\|ntest[bq]\\)\\|x\\(c\\(hart\\|orr\\)\\|t\\(clog\\|des\\|g\\(ee\\|ls\\)\\|haus\\|intreg\\|logit\\|nbreg\\|p\\(ois\\|robit\\)\\|r\\(chh\\|eg\\)\\|sum\\|t\\(ab\\|est0\\|obit\\|rans\\)\\)\\)\\|zi\\(nb\\|p\\)\\)\\b" (1 font-lock-reference-face)) ("^[ ]*\\sw+[ ]*\\(if\\)\\b" (1 font-lock-reference-face t t)) ("^[ ]*\\(if\\|while\\)[ ]+.*{" (1 font-lock-reference-face t t)) ("^[ ]*\\(else\\)[ ]*{" (1 font-lock-reference-face)) ("\\(^[ ]*l\\b\\)" (1 font-lock-reference-face)) ("[ ]+\\(byte\\|double\\|float\\|int\\|long\\|max\\(obs\\|var\\)\\|str[1-9]+[0-9]?\\|width\\)[ ]+" (1 font-lock-type-face)) ("^[ ]+\\(local\\)+[ ]+\\(exp\\|i[fn]\\|options\\|using\\|varlist\\|weight\\)\\b" (2 font-lock-type-face nil t t)) ("[ ]+\\(_\\([cnr]\\|co\\(\\|n\\(\\|t\\(\\|i\\(\\|n\\(\\|ue?\\)\\)\\)\\)\\)\\|ne\\(\\|w\\(\\|l\\(\\|i\\(\\|ne?\\)\\)\\)\\)\\|quote\\|re\\(\\|q\\(\\|u\\(\\|e\\(\\|st?\\)\\)\\)\\)\\)\\)\\b" (1 font-lock-type-face)) ("[ ]+\\(_\\([ds]\\|col\\(\\|u\\(\\|mn?\\)\\)\\|dup?\\|sk\\(\\|ip?\\)\\)\\)([1-9]+[0-9]*)\\b" (1 font-lock-type-face)) ("\\bin[ ]+\\([bgrwy]\\|bl\\(\\|ue?\\)\\|gr\\(\\|e\\(\\|en?\\)\\)\\|red?\\|wh\\(\\|i\\(\\|te?\\)\\)\\|ye\\(\\|l\\(\\|l\\(\\|ow?\\)\\)\\)\\)\\b" (1 font-lock-type-face)) ("[ ]+\\(lab\\(\\|el?\\)\\)[ ]+\\(d\\([aei]\\|ata?\\|ef\\(\\|i\\(\\|ne?\\)\\)\\|ir\\|rop\\)\\|l\\(\\|i\\(\\|st?\\)\\)\\|save\\|va\\([lr]\\|lu\\(\\|es?\\)\\|ri\\(\\|a\\(\\|b\\(\\|le?\\)\\)\\)\\)\\)[ ]" (1 font-lock-reference-face t) (3 font-lock-type-face nil t t)) ("\\b\\(_p\\(ctile\\|redict\\)\\|a\\(order\\|ppend\\)\\|b\\(cskew0\\|s\\(\\|ample\\|trap\\)\\)\\|c\\(d\\|hdir\\|lear\\|o\\(mpress\\|n\\(tract\\|vert\\)\\)\\|ross\\)\\|d\\(ec\\(\\|o\\(\\|de?\\)\\)\\|iscard\\|rop\\|ydx\\)\\|e\\([dn]\\|dit?\\|gen\\|nc\\(\\|o\\(\\|de?\\)\\)\\|rase\\|xpand\\)\\|f\\(illin\\|orm\\(\\|at?\\)\\|rac\\(gen\\|pred\\)\\)\\|g\\(\\|e\\(\\|n\\(\\|e\\(\\|r\\(\\|a\\(\\|te?\\)\\)\\)\\)\\)\\|sort\\)\\|i\\(mpute\\|n\\(fi\\(le\\|x\\)\\|put\\|sheet\\|teg\\)\\|polate\\)\\|joinby\\|keep\\|lnskew0\\)\\b" (1 font-lock-keyword-face)) ("\\b\\(m\\(a\\(rk\\(\\|out\\|sample\\)\\|tname\\)\\|er\\(\\|ge?\\)\\|k\\(dir\\|mat\\|spline\\)\\|l\\(eval\\|matsum\\|sum\\|vecsum\\)\\|o\\(dify\\|ve?\\)\\|v\\(decode\\|encode\\)\\)\\|n\\(lpred\\|obreak\\)\\|o\\(rder\\|u\\(\\|t\\(\\|[fs]\\|fi\\(\\|le?\\)\\|sh\\(\\|e\\(\\|et?\\)\\)\\)\\)\\)\\|p\\(ctile\\|ost\\(\\|close\\|file\\)\\|re\\(\\|d\\(\\|i\\(\\|ct?\\)\\)\\|serve\\)\\)\\|r\\(ange\\|e\\(c\\(ast\\|ode\\)\\|n\\(\\|a\\(\\|me?\\)\\|pfix\\)\\|place\\|store\\)\\|m\\)\\|s\\([ao]\\|a\\(mple\\|ppend\\|ve?\\)\\|drop\\|eparate\\|i\\(mul\\|nfile\\)\\|m\\(erge\\|ooth\\)\\|napspan\\|ort?\\|s\\(ave\\|ort\\)\\|t\\(ack\\|base\\|fill\\|gen\\|join\\|split\\|toc[ct]\\)\\|use\\|vmat\\)\\|ts\\(fill\\|revar\\)\\|u\\(\\|se?\\)\\|x\\(i:?\\|pose\\|t\\(data\\|ile\\|pred\\)\\)\\)\\b" (1 font-lock-keyword-face)) ("^[ ]*\\(global\\|local\\|scalar\\)\\(\\([ ]+[a-zA-Z_]+[a-zA-Z_0-9]*\\b\\)?\\)" (1 font-lock-reference-face) (2 font-lock-variable-name-face t)) ("^[ ]*\\(temp\\(file\\|name\\|var\\)\\)\\(\\([ ]+[a-zA-Z_]+[a-zA-Z_0-9`']*\\)+\\)" (1 font-lock-reference-face) (3 font-lock-type-face t)) ("[^a-zA-Z]\\(_\\([Nn]\\|merge\\|pi\\|rc\\)\\)[^a-zA-Z]" (1 font-lock-variable-name-face)) ("\\(_result([1-9]+)\\)" (1 font-lock-variable-name-face)) ("\\(\\$[a-zA-Z_*]+[a-zA-Z_0-9]*\\)" (1 font-lock-variable-name-face t)) ("`+\\([a-zA-Z_`*]+[a-zA-Z_0-9]*\\)'+" (1 font-lock-variable-name-face t)) ("[ ]*\\(ma\\(\\|c\\(\\|ro?\\)\\)\\)[ ]+\\([ls]\\|d\\([ei]\\|ef\\(\\|ine\\)\\|ir\\|rop\\)\\|li\\(\\|st?\\)\\|sh\\(\\|i\\(\\|ft?\\)\\)\\)[ ]+" (1 font-lock-reference-face) (4 font-lock-type-face)) ("\\b\\([dehmqrswy]\\|Binomial\\|_caller\\|a\\(bs\\|cos\\|sin\\|tan\\|utocode\\)\\|binorm\\|c\\(hiprob\\|o\\(mb\\|nd\\|s\\)\\)\\|d\\(a\\(te\\|y\\)\\|igamma\\|o\\([wy]\\|f[hmqwy]\\)\\)\\|exp\\|f\\(loat\\|prob\\)\\|g\\(ammap\\|et\\|roup\\)\\|h\\(alfyear\\(\\|ly\\)\\|ofd\\)\\|i\\(beta\\|n\\(dex\\|t\\|v\\(binomial\\|chi\\|fprob\\|gammap\\|n\\(chi\\|orm\\)\\|t\\)\\)\\)\\|l\\(ength\\|n\\(\\|fact\\|gamma\\)\\|o\\(g\\(\\|10\\)\\|wer\\)\\|trim\\)\\|m\\(a\\(trix\\|x\\)\\|dy\\|i\\(n\\|ssing\\)\\|o\\(d\\|fd\\|nth\\(\\|ly\\)\\)\\)\\|n\\(chi\\|orm\\(d\\|prob\\)\\|pnchi\\)\\|q\\(ofd\\|uarter\\(\\|ly\\)\\)\\|r\\(e\\(al\\|code\\|ldif\\|play\\|turn\\)\\|ound\\|trim\\)\\|s\\(calar\\|i\\(gn\\|n\\)\\|qrt\\|tring\\|u\\(bstr\\|m\\)\\)\\|t\\(an\\|prob\\|ri\\(gamma\\|m\\)\\)\\|u\\(niform0?\\|pper\\)\\|w\\(eek\\(\\|ly\\)\\|ofd\\)\\|y\\([hmqw]\\|ear\\(\\|ly\\)\\|ofd\\)\\)(" (1 font-lock-reference-face t)) ("\\b\\(_\\(b\\|coef\\|se\\)\\)\\[" (1 font-lock-reference-face t)) ("[, ]+\\(b\\(ands\\|y\\)\\|connect\\|density\\|gap\\|iterate\\|ltolerance\\|margin\\|psize\\|saving\\|t\\(label\\|olerance\\)\\|x\\(label\\|scale\\)\\|y\\(label\\|scale\\)\\)(" (1 font-lock-type-face t)) ("[ ]*egen[ ]+.*=[ ]*\\(count\\|diff\\|fill\\|group\\|iqr\\|m\\(ax?\\|e\\(an\\|dian\\)\\|in\\|tr\\)\\|pctile\\|r\\(ank\\|first\\|last\\|m\\(ax\\|ean\\|i\\(n\\|ss\\)\\)\\|obs\\|s\\(d\\|um\\)\\)\\|s\\(d\\|td\\|um\\)\\)(.*)" (1 font-lock-reference-face t)) ("[ ]*\\(_\\(addext\\|br\\(c\\(kado\\|lean\\)\\|dlog\\)\\|ck\\(bad\\|du\\(nno\\|pl\\)\\|miss\\|ok\\|warn\\)\\|delimit\\|filenm\\|lookup\\|mk_ck\\)\\|a\\(ddnote\\|nypath\\|utolab\\)\\|c\\(heckvar\\|k\\(1icd9\\|icd9\\)\\)\\|d\\(at\\(etoe\\|tomdy\\)\\|en2dem\\|ishis\\|tapath\\|upclean\\)\\|e\\(cho\\|xdupbil\\|zip2hsa\\)\\|g\\(et\\(date\\|lbl\\|names\\|obs\\)\\|plur\\)\\|i\\(cd9\\|s\\(file\\|sorted\\)\\)\\|julto\\([ef]\\|mdy\\)\\|knowndup\\|l\\(abeldir\\|inker\\)\\|m\\(a\\(kewide\\|rkit\\)\\|issize\\|pcounts\\)\\|no\\(dups\\|tefile\\)\\|prov2zip\\|q\\(colsum\\|order\\)\\|r\\(andom\\|e\\(ad\\(raw\\|zip\\)\\|part\\)\\)\\|s\\(etup\\|tdrate\\)\\|timeslot\\|wdat\\(etoe\\|omdy\\)\\|zip2ezip\\)\\b" (1 font-lock-function-name-face))] 61 (#$ . 1307) nil]) #@75 Set the Stata mode font-lock keywords to Bill Rising's ado-mode keywords. (defvar ess-STA-mode-font-lock-defaults (ado-set-font-lock-keywords) (#$ . 18498)) #@60 General options for editing Stata do and ado source files. (defvar STA-editing-alist '((paragraph-start concat "[ \f]*$\\|" page-delimiter) (paragraph-separate concat "[ \f]*$\\|" page-delimiter) (paragraph-ignore-fill-prefix . t) (require-final-newline . mode-require-final-newline) (comment-column . 40) (indent-line-function quote ess-indent-line) (parse-sexp-ignore-comments . t) (ess-style . ess-default-style) (ess-local-process-name) (ess-mode-syntax-table . STA-syntax-table) (font-lock-defaults quote (ess-STA-mode-font-lock-defaults nil nil ((46 . "w"))))) (#$ . 18661)) #@41 *Switches to apply to stata invocation. (defvar stata-switches "-q" (#$ . -19250)) #@44 File to read on startup (nil for no file). (defvar stata-profile "~/.stataprofile" (#$ . 19339)) (byte-code "\300\301\302\303#\210\304\301\302\305#\210\300\306\307\303#\210\304\306\307\310#\207" [defalias stata-help ess-display-help-on-object nil make-obsolete "ESS[15.09]" stata-lookup ess-display-help-apropos "ESS[16.03]"] 4) #@38 Stata variable list in other buffer. (defalias 'stata-variables #[nil "\306\307!\211\203\310!\202\311\312!\313\211\313 q\210\314!\310!\315\316!!\212\2042\311\312!\210\317 \210\320\321!\204?\311\322!\210\212\323\324\325!\"\210\326\327\"\210\325q\210\313\330 \210\331\332\"\210\333!\210\334 q\210\323 \"\210\316!\f\313\223\210\326\n\"\210*\335\325!\210db-\207" [stata-process stata-buffer oldpf oldpb oldpm buffer-read-only get-process "stata" process-buffer error "Stata is not running." nil process-filter marker-position process-mark beginning-of-line looking-at ". " "Stata not ready." set-process-buffer get-buffer-create "*stata variables*" set-process-filter inferior-ess-ordinary-filter erase-buffer process-send-string "desc \n " stata-prompt-wait t display-buffer] 5 (#$ . 19674) nil]) (defalias 'stata-watch-for-menu-filter #[(proc string) "\302\303\"\203\f\304 \"\207\305 \"\207" [string proc string-match "^!!!window!!!" stata-handle-menu-code comint-output-filter] 3]) (defalias 'stata-handle-menu-code #[(proc string) "p\303\216\304\305\n!q\210`\306\n!U\212\306\n!b\210\307c\210\306\n!`\304\223\210) \205*\306\n!b+\207" [old-buffer moving proc #[nil "q\207" [old-buffer] 1] nil process-buffer process-mark "Handling menu code\n"] 3]) #@105 Wait for a prompt to appear at BOL of current buffer. PROC is the stata process. Does not change point. (defalias 'stata-prompt-wait #[(proc &optional start-of-output) "\204e\212\302 \303\304#\210\305\306 !!b\210\307 \210`W\203 b\210\310\311!?\205*\202)\207" [start-of-output proc accept-process-output 0 50 marker-position process-mark beginning-of-line looking-at "^. "] 4 (#$ . 20965)]) #@146 Major mode for displaying Stata help in a read-only buffer. Active commands are Help (\[stata-help]) and hyperlink (\[stata-rehelp] or mouse-2). (defalias 'stata-help-mode #[nil "\303\304\305\211\207" [major-mode mode-name buffer-read-only stata-help-mode "Stata help" t] 2 (#$ . 21372) nil]) (defvar ess-STA-delimit-do-file "delimit-do.do") (defalias 'ess-STA-delimit-do #[nil "\212\302\303 \304 \"\305 !q\210ed|\210\306\307\261\210\310 \311\"\210\312\313\314\315 \"\"*\207" [commands ess-STA-delimit-do-file buffer-substring-no-properties region-beginning region-end get-buffer-create "#delimit ;\n" "\n#delimit cr\n" write-file nil comint-send-string "Stata" format "do %s \n"] 5]) (provide 'ess-stata-lang)