Directory:~$ /home/lmsyaran/public_html/j3/media/editors/codemirror/mode/sas/

Upload File

[Home] [System Details] [Kill Me]

!(function(a){"object"==typeof
exports&&"object"==typeof
module?a(require("../../lib/codemirror")):"function"==typeof
define&&define.amd?define(["../../lib/codemirror"],a):a(CodeMirror)})((function(a){"use
strict";a.defineMode("sas",(function(){function
a(a,b,d){if(d)for(var e=b.split("
"),f=0;f<e.length;f++)c[e[f]]={style:a,state:d}}function b(a,b){var
g=a.next();if("/"===g&&a.eat("*"))return
b.continueComment=!0,"comment";if(!0===b.continueComment)return"*"===g&&"/"===a.peek()?(a.next(),b.continueComment=!1):a.skipTo("*")?(a.skipTo("*"),a.next(),a.eat("/")&&(b.continueComment=!1)):a.skipToEnd(),"comment";if("*"==g&&a.column()==a.indentation())return
a.skipToEnd(),"comment";var
h=g+a.peek();if(!('"'!==g&&"'"!==g||b.continueString))return
b.continueString=g,"string";if(b.continueString)return
b.continueString==g?b.continueString=null:a.skipTo(b.continueString)?(a.next(),b.continueString=null):a.skipToEnd(),"string";if(null!==b.continueString&&a.eol())return
a.skipTo(b.continueString)||a.skipToEnd(),"string";if(/[\d\.]/.test(g))return"."===g?a.match(/^[0-9]+([eE][\-+]?[0-9]+)?/):"0"===g?a.match(/^[xX][0-9a-fA-F]+/)||a.match(/^0[0-7]+/):a.match(/^[0-9]*\.?[0-9]*([eE][\-+]?[0-9]+)?/),"number";if(e.test(g+a.peek()))return
a.next(),"operator";if(d.hasOwnProperty(h)){if(a.next(),"
"===a.peek())return d[h.toLowerCase()]}else
if(f.test(g))return"operator";var
i;if(null!=a.match(/[%&;\w]+/,!1)){if(i=g+a.match(/[%&;\w]+/,!0),/&/.test(i))return"variable"}else
i=g;if(b.nextword)return
a.match(/[\w]+/),"."===a.peek()&&a.skipTo("
"),b.nextword=!1,"variable-2";if(i=i.toLowerCase(),b.inDataStep){if("run;"===i||a.match(/run\s;/))return
b.inDataStep=!1,"builtin";if(i&&"."===a.next())return/\w/.test(a.peek())?"variable-2":"variable";if(i&&c.hasOwnProperty(i)&&(-1!==c[i].state.indexOf("inDataStep")||-1!==c[i].state.indexOf("ALL"))){a.start<a.pos&&a.backUp(a.pos-a.start);for(var
j=0;j<i.length;++j)a.next();return
c[i].style}}if(b.inProc){if("run;"===i||"quit;"===i)return
b.inProc=!1,"builtin";if(i&&c.hasOwnProperty(i)&&(-1!==c[i].state.indexOf("inProc")||-1!==c[i].state.indexOf("ALL")))return
a.match(/[\w]+/),c[i].style}return
b.inMacro?"%mend"===i?(";"===a.peek()&&a.next(),b.inMacro=!1,"builtin"):i&&c.hasOwnProperty(i)&&(-1!==c[i].state.indexOf("inMacro")||-1!==c[i].state.indexOf("ALL"))?(a.match(/[\w]+/),c[i].style):"atom":i&&c.hasOwnProperty(i)?(a.backUp(1),a.match(/[\w]+/),"data"===i&&!1===/=/.test(a.peek())?(b.inDataStep=!0,b.nextword=!0,"builtin"):"proc"===i?(b.inProc=!0,b.nextword=!0,"builtin"):"%macro"===i?(b.inMacro=!0,b.nextword=!0,"builtin"):/title[1-9]/.test(i)?"def":"footnote"===i?(a.eat(/[1-9]/),"def"):!0===b.inDataStep&&-1!==c[i].state.indexOf("inDataStep")?c[i].style:!0===b.inProc&&-1!==c[i].state.indexOf("inProc")?c[i].style:!0===b.inMacro&&-1!==c[i].state.indexOf("inMacro")?c[i].style:-1!==c[i].state.indexOf("ALL")?c[i].style:null):null}var
c={},d={eq:"operator",lt:"operator",le:"operator",gt:"operator",ge:"operator",in:"operator",ne:"operator",or:"operator"},e=/(<=|>=|!=|<>)/,f=/[=\(:\),{}.*<>+\-\/^\[\]]/;return
a("def","stack pgm view source debug nesting
nolist",["inDataStep"]),a("def","if while
until for do do; end end; then else
cancel",["inDataStep"]),a("def","label format
_n_ _error_",["inDataStep"]),a("def","ALTER
BUFNO BUFSIZE CNTLLEV COMPRESS DLDMGACTION ENCRYPT ENCRYPTKEY
EXTENDOBSCOUNTER GENMAX GENNUM INDEX LABEL OBSBUF OUTREP PW PWREQ READ
REPEMPTY REPLACE REUSE ROLE SORTEDBY SPILL TOBSNO TYPE WRITE FILECLOSE
FIRSTOBS IN OBS POINTOBS WHERE WHEREUP IDXNAME IDXWHERE DROP KEEP
RENAME",["inDataStep"]),a("def","filevar
finfo finv fipname fipnamel fipstate first firstobs
floor",["inDataStep"]),a("def","varfmt
varinfmt varlabel varlen varname varnum varray varrayx vartype verify
vformat vformatd vformatdx vformatn vformatnx vformatw vformatwx vformatx
vinarray vinarrayx vinformat vinformatd vinformatdx vinformatn vinformatnx
vinformatw vinformatwx vinformatx vlabel vlabelx vlength vlengthx vname
vnamex vnferr vtype vtypex
weekday",["inDataStep"]),a("def","zipfips
zipname zipnamel
zipstate",["inDataStep"]),a("def","put putc
putn",["inDataStep"]),a("builtin","data
run",["inDataStep"]),a("def","data",["inProc"]),a("def","%if
%end %end; %else %else; %do %do;
%then",["inMacro"]),a("builtin","proc run;
quit; libname filename %macro %mend option
options",["ALL"]),a("def","footnote title
libname ods",["ALL"]),a("def","%let %put
%global %sysfunc %eval
",["ALL"]),a("variable","&sysbuffr
&syscc &syscharwidth &syscmd &sysdate &sysdate9
&sysday &sysdevic &sysdmg &sysdsn &sysencoding
&sysenv &syserr &syserrortext &sysfilrc &syshostname
&sysindex &sysinfo &sysjobid &syslast &syslckrc
&syslibrc &syslogapplname &sysmacroname &sysmenv
&sysmsg &sysncpu &sysodspath &sysparm &syspbuff
&sysprocessid &sysprocessname &sysprocname &sysrc
&sysscp &sysscpl &sysscpl &syssite &sysstartid
&sysstartname &systcpiphostname &systime &sysuserid
&sysver &sysvlong &sysvlong4
&syswarningtext",["ALL"]),a("def","source2
nosource2 page pageno
pagesize",["ALL"]),a("def","_all_ _character_
_cmd_ _freq_ _i_ _infile_ _last_ _msg_ _null_ _numeric_ _temporary_ _type_
abort abs addr adjrsq airy alpha alter altlog altprint and arcos array
arsin as atan attrc attrib attrn authserver autoexec awscontrol awsdef
awsmenu awsmenumerge awstitle backward band base betainv between blocksize
blshift bnot bor brshift bufno bufsize bxor by byerr byline byte calculated
call cards cards4 catcache cbufno cdf ceil center cexist change chisq cinv
class cleanup close cnonct cntllev coalesce codegen col collate collin
column comamid comaux1 comaux2 comdef compbl compound compress config
continue convert cos cosh cpuid create cross crosstab css curobs cv daccdb
daccdbsl daccsl daccsyd dacctab dairy datalines datalines4 datejul datepart
datetime day dbcslang dbcstype dclose ddfm ddm delete delimiter depdb
depdbsl depsl depsyd deptab dequote descending descript design= device
dflang dhms dif digamma dim dinfo display distinct dkricond dkrocond dlm
dnum do dopen doptname doptnum dread drop dropnote dsname dsnferr echo else
emaildlg emailid emailpw emailserver emailsys encrypt end endsas engine eof
eov erf erfc error errorcheck errors exist exp fappend fclose fcol fdelete
feedback fetch fetchobs fexist fget file fileclose fileexist filefmt
filename fileref  fmterr fmtsearch fnonct fnote font fontalias  fopen
foptname foptnum force formatted formchar formdelim formdlim forward fpoint
fpos fput fread frewind frlen from fsep fuzz fwrite gaminv gamma getoption
getvarc getvarn go goto group gwindow hbar hbound helpenv helploc hms
honorappearance hosthelp hostprint hour hpct html hvar ibessel ibr id if
index indexc indexw initcmd initstmt inner input inputc inputn inr insert
int intck intnx into intrr invaliddata irr is jbessel join juldate keep
kentb kurtosis label lag last lbound leave left length levels lgamma lib 
library libref line linesize link list log log10 log2 logpdf logpmf logsdf
lostcard lowcase lrecl ls macro macrogen maps mautosource max maxdec maxr
mdy mean measures median memtype merge merror min minute missing missover
mlogic mod mode model modify month mopen mort mprint mrecall msglevel
msymtabmax mvarsize myy n nest netpv new news nmiss no nobatch nobs nocaps
nocardimage nocenter nocharcode nocmdmac nocol nocum nodate nodbcs
nodetails nodmr nodms nodmsbatch nodup nodupkey noduplicates noechoauto
noequals noerrorabend noexitwindows nofullstimer noicon noimplmac noint
nolist noloadlist nomiss nomlogic nomprint nomrecall nomsgcase nomstored
nomultenvappl nonotes nonumber noobs noovp nopad nopercent noprint
noprintinit normal norow norsasuser nosetinit  nosplash nosymbolgen note
notes notitle notitles notsorted noverbose noxsync noxwait npv null number
numkeys nummousekeys nway obs  on open     order ordinal otherwise out
outer outp= output over ovp p(1 5 10 25 50 75 90 95 99) pad pad2  paired
parm parmcards path pathdll pathname pdf peek peekc pfkey pmf point poisson
poke position printer probbeta probbnml probchi probf probgam probhypr
probit probnegb probnorm probsig probt procleave prt ps  pw pwreq qtr quote
r ranbin rancau random ranexp rangam range ranks rannor ranpoi rantbl
rantri ranuni rcorr read recfm register regr remote remove rename repeat
repeated replace resolve retain return reuse reverse rewind right round
rsquare rtf rtrace rtraceloc s s2 samploc sasautos sascontrol sasfrscr
sasmsg sasmstore sasscript sasuser saving scan sdf second select selection
separated seq serror set setcomm setot sign simple sin sinh siteinfo
skewness skip sle sls sortedby sortpgm sortseq sortsize soundex  spedis
splashlocation split spool sqrt start std stderr stdin stfips stimer stname
stnamel stop stopover sub subgroup subpopn substr sum sumwgt symbol
symbolgen symget symput sysget sysin sysleave sysmsg sysparm sysprint
sysprintfont sysprod sysrc system t table tables tan tanh tapeclose
tbufsize terminal test then timepart tinv  tnonct to today tol tooldef
totper transformout translate trantab tranwrd trigamma trim trimn trunc
truncover type unformatted uniform union until upcase update user usericon
uss validate value var  weight when where while wincharset window work
workinit workterm write wsum xsync xwait yearcutoff yes yyq  min
max",["inDataStep","inProc"]),a("operator","and
not
",["inDataStep","inProc"]),{startState:function(){return{inDataStep:!1,inProc:!1,inMacro:!1,nextword:!1,continueString:null,continueComment:!1}},token:function(a,c){return
a.eatSpace()?null:b(a,c)},blockCommentStart:"/*",blockCommentEnd:"*/"}})),a.defineMIME("text/x-sas","sas")}));