nano-clean-pkg 0.0.1

data/rouge-5.0.0/lib/rouge/lexers/sas.rb

@@ -0,0 +1,562 @@
+# -*- coding: utf-8 -*- #
+
+module Rouge
+  module Lexers
+    class SAS < RegexLexer
+      title "SAS"
+      desc "SAS (Statistical Analysis Software)"
+      tag 'sas'
+      filenames '*.sas'
+      mimetypes 'application/x-sas', 'application/x-stat-sas', 'application/x-sas-syntax'
+
+      def self.data_step_statements
+        # from Data step statements - SAS 9.4 Statements reference
+        # http://support.sas.com/documentation/cdl/en/lestmtsref/68024/PDF/default/lestmtsref.pdf
+        @data_step_statements ||= Set.new %w(
+          ABORT ARRAY ATTRIB BY CALL CARDS CARDS4 CATNAME CHECKPOINT
+          EXECUTE_ALWAYS CONTINUE DATA DATALINES DATALINES4 DELETE DESCRIBE
+          DISPLAY DM DO UNTIL WHILE DROP END ENDSAS ERROR EXECUTE FILE FILENAME
+          FOOTNOTE FORMAT GO TO IF THEN ELSE INFILE INFORMAT INPUT
+          KEEP LABEL LEAVE LENGTH LIBNAME LINK LIST LOCK LOSTCARD MERGE
+          MISSING MODIFY OPTIONS OUTPUT PAGE PUT PUTLOG REDIRECT REMOVE RENAME
+          REPLACE RESETLINE RETAIN RETURN RUN SASFILE SELECT SET SKIP STOP
+          SYSECHO TITLE UPDATE WHERE WINDOW X
+         )
+      # label:
+      # Sum
+      end
+
+      def self.sas_functions
+        # from SAS 9.4 Functions and CALL Routines reference
+        # http://support.sas.com/documentation/cdl/en/lefunctionsref/67960/PDF/default/lefunctionsref.pdf
+        @sas_functions ||= Set.new %w(
+          ABS ADDR ADDRLONG AIRY ALLCOMB ALLPERM ANYALNUM ANYALPHA ANYCNTRL
+          ANYDIGIT ANYFIRST ANYGRAPH ANYLOWER ANYNAME ANYPRINT ANYPUNCT
+          ANYSPACE ANYUPPER ANYXDIGIT ARCOS ARCOSH ARSIN ARSINH ARTANH ATAN
+          ATAN2 ATTRC ATTRN BAND BETA BETAINV BLACKCLPRC BLACKPTPRC
+          BLKSHCLPRC BLKSHPTPRC BLSHIFT BNOT BOR BRSHIFT BXOR BYTE CAT CATQ
+          CATS CATT CATX CDF CEIL CEILZ CEXIST CHAR CHOOSEC CHOOSEN CINV
+          CLOSE CMISS CNONCT COALESCE COALESCEC COLLATE COMB COMPARE COMPBL
+          COMPFUZZ COMPGED COMPLEV COMPOUND COMPRESS CONSTANT CONVX CONVXP
+          COS COSH COT COUNT COUNTC COUNTW CSC CSS CUMIPMT CUMPRINC CUROBS
+          CV DACCDB DACCDBSL DACCSL DACCSYD DACCTAB DAIRY DATDIF DATE
+          DATEJUL DATEPART DATETIME DAY DCLOSE DCREATE DEPDB DEPDBSL DEPSL
+          DEPSYD DEPTAB DEQUOTE DEVIANCE DHMS DIF DIGAMMA DIM DINFO DIVIDE
+          DNUM DOPEN DOPTNAME DOPTNUM DOSUBL DREAD DROPNOTE DSNAME
+          DSNCATLGD DUR DURP EFFRATE ENVLEN ERF ERFC EUCLID EXIST EXP FACT
+          FAPPEND FCLOSE FCOL FCOPY FDELETE FETCH FETCHOBS FEXIST FGET
+          FILEEXIST FILENAME FILEREF FINANCE FIND FINDC FINDW FINFO FINV
+          FIPNAME FIPNAMEL FIPSTATE FIRST FLOOR FLOORZ FMTINFO FNONCT FNOTE
+          FOPEN FOPTNAME FOPTNUM FPOINT FPOS FPUT FREAD FREWIND FRLEN FSEP
+          FUZZ FWRITE GAMINV GAMMA GARKHCLPRC GARKHPTPRC GCD GEODIST
+          GEOMEAN GEOMEANZ GETOPTION GETVARC GETVARN GRAYCODE HARMEAN
+          HARMEANZ HBOUND HMS HOLIDAY HOLIDAYCK HOLIDAYCOUNT HOLIDAYNAME
+          HOLIDAYNX HOLIDAYNY HOLIDAYTEST HOUR HTMLDECODE HTMLENCODE
+          IBESSEL IFC IFN INDEX INDEXC INDEXW INPUT INPUTC INPUTN INT
+          INTCINDEX INTCK INTCYCLE INTFIT INTFMT INTGET INTINDEX INTNX
+          INTRR INTSEAS INTSHIFT INTTEST INTZ IORCMSG IPMT IQR IRR JBESSEL
+          JULDATE JULDATE7 KURTOSIS LAG LARGEST LBOUND LCM LCOMB LEFT
+          LENGTH LENGTHC LENGTHM LENGTHN LEXCOMB LEXCOMBI LEXPERK LEXPERM
+          LFACT LGAMMA LIBNAME LIBREF LOG LOG1PX LOG10 LOG2 LOGBETA LOGCDF
+          LOGISTIC LOGPDF LOGSDF LOWCASE LPERM LPNORM MAD MARGRCLPRC
+          MARGRPTPRC MAX MD5 MDY MEAN MEDIAN MIN MINUTE MISSING MOD
+          MODEXIST MODULE MODULEC MODULEN MODZ MONTH MOPEN MORT MSPLINT
+          MVALID N NETPV NLITERAL NMISS NOMRATE NORMAL NOTALNUM NOTALPHA
+          NOTCNTRL NOTDIGIT NOTE NOTFIRST NOTGRAPH NOTLOWER NOTNAME
+          NOTPRINT NOTPUNCT NOTSPACE NOTUPPER NOTXDIGIT NPV NVALID NWKDOM
+          OPEN ORDINAL PATHNAME PCTL PDF PEEK PEEKC PEEKCLONG PEEKLONG PERM
+          PMT POINT POISSON PPMT PROBBETA PROBBNML PROBBNRM PROBCHI PROBF
+          PROBGAM PROBHYPR PROBIT PROBMC PROBNEGB PROBNORM PROBT PROPCASE
+          PRXCHANGE PRXMATCH PRXPAREN PRXPARSE PRXPOSN PTRLONGADD PUT PUTC
+          PUTN PVP QTR QUANTILE QUOTE RANBIN RANCAU RAND RANEXP RANGAM
+          RANGE RANK RANNOR RANPOI RANTBL RANTRI RANUNI RENAME REPEAT
+          RESOLVE REVERSE REWIND RIGHT RMS ROUND ROUNDE ROUNDZ SAVING
+          SAVINGS SCAN SDF SEC SECOND SHA256 SHA256HEX SHA256HMACHEX SIGN
+          SIN SINH SKEWNESS SLEEP SMALLEST SOAPWEB SOAPWEBMETA
+          SOAPWIPSERVICE SOAPWIPSRS SOAPWS SOAPWSMETA SOUNDEX SPEDIS SQRT
+          SQUANTILE STD STDERR STFIPS STNAME STNAMEL STRIP SUBPAD SUBSTR
+          SUBSTRN SUM SUMABS SYMEXIST SYMGET SYMGLOBL SYMLOCAL SYSEXIST
+          SYSGET SYSMSG SYSPARM SYSPROCESSID SYSPROCESSNAME SYSPROD SYSRC
+          SYSTEM TAN TANH TIME TIMEPART TIMEVALUE TINV TNONCT TODAY
+          TRANSLATE TRANSTRN TRANWRD TRIGAMMA TRIM TRIMN TRUNC TSO TYPEOF
+          TZONEID TZONENAME TZONEOFF TZONES2U TZONEU2S UNIFORM UPCASE
+          URLDECODE URLENCODE USS UUIDGEN VAR 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 VTYPE VTYPEX VVALUE VVALUEX WEEK
+          WEEKDAY WHICHC WHICHN WTO YEAR YIELDP YRDIF YYQ ZIPCITY
+          ZIPCITYDISTANCE ZIPFIPS ZIPNAME ZIPNAMEL ZIPSTATE
+         )
+      end
+
+      def self.sas_macro_statements
+        # from SAS 9.4 Macro Language Reference
+        # Chapter 12
+        @sas_macro_statements ||= Set.new %w(
+          %COPY %DISPLAY %GLOBAL %INPUT %LET %MACRO %PUT %SYMDEL %SYSCALL
+          %SYSEXEC %SYSLPUT %SYSMACDELETE %SYSMSTORECLEAR %SYSRPUT %WINDOW
+          %ABORT %DO %TO %UNTIL %WHILE %END %GOTO %IF %THEN %ELSE %LOCAL
+          %RETURN
+          %INCLUDE %LIST %RUN
+        )
+        # Omitted:
+        # %label: Identifies the destination of a %GOTO statement.
+        # %MEND
+      end
+
+      def self.sas_macro_functions
+        # from SAS 9.4 Macro Language Reference
+        # Chapter 12
+
+        @sas_macro_functions ||= Set.new %w(
+          %BQUOTE %NRBQUOTE %EVAL %INDEX %LENGTH %QUOTE %NRQUOTE %SCAN
+          %QSCAN %STR %NRSTR %SUBSTR %QSUBSTR %SUPERQ %SYMEXIST %SYMGLOBL
+          %SYMLOCAL %SYSEVALF %SYSFUNC %QSYSFUNC %SYSGET %SYSMACEXEC
+          %SYSMACEXIST %SYSMEXECDEPTH %SYSMEXECNAME %SYSPROD %UNQUOTE
+          %UPCASE %QUPCASE
+        )
+      end
+
+      def self.sas_auto_macro_vars
+        # from SAS 9.4 Macro Language Reference
+        # Chapter 12
+
+        @sas_auto_macro_vars ||= Set.new %w(
+          &SYSADDRBITS &SYSBUFFR &SYSCC &SYSCHARWIDTH &SYSCMD &SYSDATASTEPPHASE &SYSDATE
+          &SYSDATE9 &SYSDAY &SYSDEVIC &SYSDMG &SYSDSN &SYSENCODING &SYSENDIAN &SYSENV
+          &SYSERR &SYSERRORTEXT &SYSFILRC &SYSHOSTINFOLONG &SYSHOSTNAME &SYSINDEX
+          &SYSINFO &SYSJOBID &SYSLAST &SYSLCKRC &SYSLIBRC &SYSLOGAPPLNAME &SYSMACRONAME
+          &SYSMENV &SYSMSG &SYSNCPU &SYSNOBS &SYSODSESCAPECHAR &SYSODSPATH &SYSPARM
+          &SYSPBUFF &SYSPRINTTOLIST &SYSPRINTTOLOG &SYSPROCESSID &SYSPROCESSMODE
+          &SYSPROCESSNAME &SYSPROCNAME &SYSRC &SYSSCP &SYSSCPL &SYSSITE &SYSSIZEOFLONG
+          &SYSSIZEOFPTR &SYSSIZEOFUNICODE &SYSSTARTID &SYSSTARTNAME &SYSTCPIPHOSTNAME
+          &SYSTIME &SYSTIMEZONE &SYSTIMEZONEIDENT &SYSTIMEZONEOFFSET &SYSUSERID &SYSVER
+          &SYSVLONG &SYSVLONG4 &SYSWARNINGTEXT
+        )
+      end
+
+      def self.proc_keywords
+        # Create a hash with keywords for common PROCs, keyed by PROC name
+        @proc_keywords ||= {}
+
+        @proc_keywords["SQL"] ||= Set.new %w(
+          ALTER TABLE CONNECT CREATE INDEX VIEW DELETE DESCRIBE DISCONNECT DROP EXECUTE
+          INSERT RESET SELECT UPDATE VALIDATE ADD CONSTRAINT FOREIGN KEY PRIMARY
+          MODIFY LIKE AS ORDER BY USING FROM INTO SET VALUES DISTINCT UNIQUE
+          WHERE GROUP HAVING LEFT RIGHT INNER JOIN ON
+        )
+        # from SAS 9.4 SQL Procedure User's Guide
+
+        @proc_keywords["MEANS"] ||= Set.new %w(
+          BY CLASS FREQ ID OUTPUT OUT TYPES VAR WAYS WEIGHT
+          ATTRIB FORMAT LABEL WHERE
+          DESCENDING NOTSORTED
+          NOTHREADS NOTRAP PCTLDEF SUMSIZE THREADS CLASSDATA COMPLETETYPES
+          EXCLUSIVE MISSING FW MAXDEC NONOBS NOPRINT ORDER FORMATTED
+          UNFORMATTED PRINT PRINTALLTYPES PRINTIDVARS STACKODSOUTPUT
+          CHARTYPE DESCENDTYPES IDMIN
+          ALPHA EXCLNPWGT QMARKERS QMETHOD QNTLDEF VARDEF
+          CLM CSS CV KURTOSIS KURT LCLM MAX MEAN MIN MODE N
+          NMISS RANGE SKEWNESS SKEW STDDEV STD STDERR SUM SUMWGT UCLM USS
+          MEDIAN P50 Q1 P25 Q3 P75 P1 P90 P5 P95 P10 P99 P20 P30 P40 P60 P70
+          P80 QRANGE
+          PROBT PRT T
+          ASCENDING GROUPINTERNAL MLF PRELOADFMT
+          MAXID AUTOLABEL AUTONAME KEEPLEN LEVELS NOINHERIT
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["DATASETS"] ||= Set.new %w(
+          AGE APPEND ATTRIB AUDIT CHANGE CONTENTS COPY DELETE EXCHANGE
+          EXCLUDE FORMAT IC CREATE REACTIVATE INDEX CENTILES INFORMAT
+          INITIATE LABEL LOG MODIFY REBUILD RENAME REPAIR RESUME SAVE SELECT
+          SUSPEND TERMINATE USER_VAR XATTR ADD OPTIONS REMOVE SET
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["SORT"] ||= Set.new %w(
+          BY DESCENDING KEY ASCENDING ASC DESC DATECOPY FORCE OVERWRITE
+          PRESORTED SORTSIZE TAGSORT DUPOUT OUT UNIQUEOUT NODUPKEY NOUNIQUEKEY
+          NOTHREADS THREADS EQUALS NOEQUALS
+          ATTRIB FORMAT LABEL WHERE
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["PRINT"] ||= Set.new %w(
+          BY DESCENDING NOTSORTED PAGEBY SUMBY ID STYLE SUM VAR CONTENTS DATA
+          GRANDTOTAL_LABEL HEADING LABEL SPLIT SUMLABEL NOSUMLABEL
+          BLANKLINE COUNT DOUBLE N NOOBS OBS ROUND
+          ROWS UNIFORM WIDTH
+          ATTRIB FORMAT WHERE
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["APPEND"] ||= Set.new %w(
+          BASE APPENDVER DATA ENCRYPTKEY FORCE GETSORT NOWARN
+          ATTRIB FORMAT LABEL WHERE
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["TRANSPOSE"] ||= Set.new %w(
+          DELIMITER LABEL LET NAME OUT PREFIX SUFFIX BY DESCENDING NOTSORTED
+          COPY ID IDLABEL VAR INDB
+          ATTRIB FORMAT WHERE
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["FREQ"] ||= Set.new %w(
+          BY EXACT OUTPUT TABLES TEST WEIGHT
+          COMPRESS DATA FORMCHAR NLEVELS NOPRINT ORDER PAGE FORMATTED FREQ
+          INTERNAL
+          AGREE BARNARD BINOMIAL BIN CHISQ COMOR EQOR ZELEN FISHER JT KAPPA
+          KENTB TAUB LRCHI MCNEM MEASURES MHCHI OR ODDSRATIO PCHI PCORR RELRISK
+          RISKDIFF SCORR SMDCR SMDRC STUTC TAUC TREND WTKAP WTKAPPA
+          OUT AJCHI ALL BDCHI CMH CMH1 CMH2 CMHCOR CMHGA CMHRMS COCHQ CONTGY
+          CRAMV EQKAP EQWKP GAMMA GS GAILSIMON LAMCR LAMDAS LAMRC LGOR LGRRC1
+          LGRRC2 MHOR MHRRC1 MHRRC2 N NMISS PHI PLCORR RDIF1 RDIF2 RISKDIFF1
+          RISKDIFF2 RRC1 RELRISK1 RRC2 RELRISK2 RSK1 RISK1 RSK11 RISK11 RSK12
+          RISK12 RSK21 RISK21 RSK22 RISK22 TSYMM BOWKER U UCR URC
+          CELLCHI2 CUMCOL DEVIATION EXPECTED MISSPRINT PEARSONREF PRINTWKTS
+          SCOROUT SPARSE STDRES TOTPCT
+          CONTENTS CROSSLIST FORMAT LIST MAXLEVELS NOCOL NOCUM NOFREQ NOPERCENT NOROW NOSPARSE NOWARN PLOTS OUTCUM OUTEXPECT OUTPCT
+          ZEROS
+        )
+        # from Base SAS 9.4 Procedures Guide: Statistical Procedures, Fourth Edition
+
+        @proc_keywords["CORR"] ||= Set.new %w(
+          BY FREQ ID PARTIAL VAR WEIGHT WITH
+          DATA OUTH OUTK OUTP OUTPLC OUTPLS OUTS
+          EXCLNPWGHT FISHER HOEFFDING KENDALL NOMISS PEARSON POLYCHORIC
+          POLYSERIAL ALPHA COV CSSCP SINGULAR SSCP VARDEF PLOTS MATRIX SCATTER
+          BEST NOCORR NOPRINT NOPROB NOSIMPLE RANK
+        )
+        # from Base SAS 9.4 Procedures Guide: Statistical Procedures, Fourth Edition
+
+        @proc_keywords["REPORT"] ||= Set.new %w(
+          BREAK BY DESCENDING NOTSORTED COLUMN COMPUTE STYLE LINE ENDCOMP
+          CALL DEFINE _ROW_ FREQ RBREAK WEIGHT
+          ATTRIB FORMAT LABEL WHERE
+          DATA NOALIAS NOCENTER NOCOMPLETECOLS NOCOMPLETEROWS NOTHREADS
+          NOWINDOWS OUT PCTLDEF THREADS WINDOWS COMPLETECOLS
+          COMPLETEROWS CONTENTS SPANROWS COMMAND HELP PROMPT
+          BOX BYPAGENO CENTER COLWIDTH FORMCHAR LS MISSING PANELS PS
+          PSPACE SHOWALL SPACING WRAP EXCLNPWGT QMARKERS QMETHOD QNTLDEF VARDEF
+          NAMED NOHEADER SPLIT HEADLINE HEADSKIP LIST NOEXEC OUTREPT PROFILE
+          REPORT
+          COLOR DOL DUL OL PAGE SKIP SUMMARIZE SUPPRESS UL
+          BLINK HIGHLIGHT RVSVIDEO MERGE REPLACE URL URLBP URLP
+          AFTER BEFORE _PAGE_ LEFT RIGHT CHARACTER LENGTH
+          EXCLUSIVE MLF ORDER FORMATTED INTERNAL PRELOADFMT
+          WIDTH
+          ACROSS ANALYSIS COMPUTED DISPLAY GROUP FLOW ID NOPRINT NOZERO
+          CSS CV MAX MEAN MIN MODE N NMISS PCTN PCTSUM RANGE STD STDERR SUM
+          SUMWGT USS VAR
+          MEDIAN P50 Q1 P25 Q3 P75 P1 P90 P5 P95 P10 P99 P20 P30 P40 P60 P70
+          P80 QRANGE
+          PROBT PRT T
+        )
+        # from BASE SAS 9.4 Procedures Guide, Fifth Edition
+
+        @proc_keywords["METALIB"] ||= Set.new %w(
+          OMR DBAUTH DBUSER DBPASSWORD EXCLUDE SELECT READ FOLDER FOLDERID
+          IMPACT_LIMIT NOEXEC PREFIX REPORT UPDATE_RULE DELETE NOADD NODELDUP
+          NOUPDATE
+          LIBID LIBRARY LIBURI
+          TYPE DETAIL SUMMARY
+        )
+        # from SAS 9.4 Language Interfaces to Metadata, Third Edition
+
+        @proc_keywords["GCHART"] ||= Set.new %w(
+          DATA ANNOTATE GOUT IMAGEMAP BLOCK HBAR HBAR3D VBAR VBAR3D PIE PIE3D
+          DONUT STAR ANNO
+          BY NOTE FORMAT LABEL WHERE
+          BLOCKMAX CAXIS COUTLINE CTEXT LEGEND NOHEADING NOLEGEND PATTERNID
+          GROUP MIDPOINT SUBGROUP WOUTLINE DESCRIPTION NAME DISCRETE LEVELS
+          OLD MISSING HTML_LEGEND HTML URL FREQ G100 SUMVAR TYPE
+          CAUTOREF CERROR CFRAME CLM CREF FRAME NOFRAME GSPACE IFRAME
+          IMAGESTYLE TILE FIT LAUTOREF NOSYMBOL SHAPE SPACE
+          SUBOUTSIDE WAUTOREF WIDTH WREF
+          ASCENDING AUTOREF CLIPREF DESCENDING FRONTREF GAXIS MAXIS MINOR
+          NOAXIS NOBASEREF NOZERO RANGE AXIS REF CFREQ CFREQLABEL NONE CPERCENT
+          CPERCENTLABEL ERRORBAR BARS BOTH TOP FREQLABEL INSIDE MEAN MEANLABEL
+          NOSTATS OUTSIDE PERCENT PERCENTLABEL PERCENTSUM SUM
+          CFILL DETAIL_RADIUS EXPLODE FILL SOLID X INVISIBLE
+          RADIUS DETAIL_THRESHOLD DETAIL_PERCENT DETAIL_SLICE
+          DETAIL_VALUE DONUTPCT ACROSS DOWN NOGROUPHEADING
+          MATCHCOLOR OTHERCOLOR OTHERLABEL ARROW PLABEL PPERCENT SLICE
+          VALUE
+          ANGLE CLOCKWISE JSTYLE
+          NOCONNECT STARMAX STARMIN
+        )
+        # from SAS GRAPH 9.4 Reference, Fourth Edition
+
+        @proc_keywords["GPLOT"] ||= Set.new %w(
+          DATA ANNOTATE GOUT IMAGEMAP UNIFORM BUBBLE BUBBLE2 PLOT PLOT2
+          BCOLOR BFILL BFONT BLABEL BSCALE AREA RADIUS BSIZE DESCRIPTION NAME
+          AUTOHREF CAUTOHREF CHREF HAXIS HMINOR HREF HREVERSE HZERO LAUTOHREF
+          LHREF WAUTOHREF WHREF HTML URL
+          CAXIS CFRAME CTEXT DATAORDER FRAME NOFRAME FRONTREF GRID IFRAME
+          IMAGESTYLE TILE FIT NOAXIS
+          AUTOVREF CAUTOVREF CVREF LAUTOVREF LVREF VAXIS VMINOR VREF VREVERSE
+          VZERO WAUTOVREF WVREF
+          CBASELINE COUTLINE
+          AREAS LEGEND NOLASTAREA NOLEGEND OVERLAY REGEQN SKIPMISS
+        )
+        # from SAS GRAPH 9.4 Reference, Fourth Edition
+
+        @proc_keywords["REG"] ||= Set.new %w(
+          MODEL BY FREQ ID VAR WEIGHT ADD CODE DELETE MTEST OUTPUT PAINT
+          PLOT PRINT REFIT RESTRICT REWEIGHT STORE TEST
+        )
+        # from SAS/STAT 15.1 User's Guide
+
+        @proc_keywords["SGPLOT"] ||= Set.new %w(
+          STYLEATTRS BAND X Y UPPER LOWER BLOCK BUBBLE DENSITY DOT DROPLINE
+          ELLIPSE ELLIPSEPARM FRINGE GRADLEGEND HBAR HBARBASIC HBARPARM
+          HBOX HEATMAP HEATMAPPARM HIGHLOW HISTOGRAM HLINE INSET KEYLEGEND
+          LINEPARM LOESS NEEDLE PBSPLINE POLYGON REFLINE REG SCATTER SERIES
+          SPLINE STEP SYMBOLCHAR SYMBOLIMAGE TEXT VBAR VBARBASIC VBARPARM
+          VBOX VECTOR VLINE WATERFALL XAXIS X2AXIS XAXISTABLE YAXIS Y2AXIS
+          YAXISTABLE
+        )
+
+        # from ODS Graphics: Procedures Guide, Sixth Edition
+        return @proc_keywords
+      end
+
+      def self.sas_proc_names
+        # from SAS Procedures by Name
+        # http://support.sas.com/documentation/cdl/en/allprodsproc/68038/HTML/default/viewer.htm#procedures.htm
+
+        @sas_proc_names ||= Set.new %w(
+          ACCESS ACECLUS ADAPTIVEREG ALLELE ANOM ANOVA APPEND APPSRV ARIMA
+          AUTHLIB AUTOREG BCHOICE BOM BOXPLOT BTL BUILD CALENDAR CALIS CALLRFC
+          CANCORR CANDISC CAPABILITY CASECONTROL CATALOG CATMOD CDISC
+          CHART CIMPORT CLP CLUSTER COMPARE COMPILE COMPUTAB CONTENTS CONVERT
+          COPULA COPY CORR CORRESP COUNTREG CPM CPORT CUSUM CV2VIEW DATEKEYS
+          DATASETS DATASOURCE DB2EXT DB2UTIL DBCSTAB DBF DBLOAD DELETE DIF
+          DISCRIM DISPLAY DISTANCE DMSRVADM DMSRVDATASVC DMSRVPROCESSSVC
+          DOCUMENT DOWNLOAD DQLOCLST DQMATCH DQSCHEME DS2 DTREE ENTROPY ESM
+          EXPAND EXPLODE EXPORT FACTEX FACTOR FAMILY FASTCLUS FCMP FEDSQL FMM
+          FONTREG FORECAST FORMAT FORMS FREQ FSBROWSE FSEDIT FSLETTER FSLIST
+          FSVIEW G3D G3GRID GA GAM GAMPL GANNO GANTT GAREABAR GBARLINE GCHART
+          GCONTOUR GDEVICE GEE GENESELECT GENMOD GEOCODE GFONT GINSIDE GIS GKPI
+          GLIMMIX GLM GLMMOD GLMPOWER GLMSELECT GMAP GOPTIONS GPLOT GPROJECT
+          GRADAR GREDUCE GREMOVE GREPLAY GROOVY GSLIDE GTILE HADOOP HAPLOTYPE
+          HDMD HPBIN HPCANDISC HPCDM HPCOPULA HPCORR HPCOUNTREG HPDMDB HPDS2
+          HPFMM HPGENSELECT HPIMPUTE HPLMIXED HPLOGISTIC HPMIXED HPNLMOD
+          HPPANEL HPPLS HPPRINCOMP HPQUANTSELECT HPQLIM HPREG HPSAMPLE
+          HPSEVERITY HPSPLIT HPSUMMARY HTSNP HTTP ICLIFETEST ICPHREG IML IMPORT
+          IMSTAT IMXFER INBREED INFOMAPS INTPOINT IOMOPERATE IRT ISHIKAWA ITEMS
+          JAVAINFO JSON KDE KRIGE2D LASR LATTICE LIFEREG LIFETEST LOAN
+          LOCALEDATA LOESS LOGISTIC LP LUA MACONTROL MAPIMPORT MCMC MDC MDDB
+          MDS MEANS METADATA METALIB METAOPERATE MI MIANALYZE MIGRATE MIXED
+          MODECLUS MODEL MSCHART MULTTEST MVPDIAGNOSE MVPMODEL MVPMONITOR
+          NESTED NETDRAW NETFLOW NLIN NLMIXED NLP NPAR1WAY ODSLIST ODSTABLE
+          ODSTEXT OLAP OLAPCONTENTS OLAPOPERATE OPERATE OPTEX OPTGRAPH OPTIONS
+          OPTLOAD OPTLP OPTLSO OPTMILP OPTMODEL OPTNET OPTQP OPTSAVE ORTHOREG
+          PANEL PARETO PDLREG PDS PDSCOPY PHREG PLAN PLM PLOT PLS PM PMENU
+          POWER PRESENV PRINCOMP PRINQUAL PRINT PRINTTO PROBIT PROTO PRTDEF
+          PRTEXP PSMOOTH PWENCODE QDEVICE QLIM QUANTLIFE QUANTREG QUANTSELECT
+          QUEST RANK RAREEVENTS RDC RDPOOL RDSEC RECOMMEND REG REGISTRY RELEASE
+          RELIABILITY REPORT RISK ROBUSTREG RSREG SCAPROC SCORE SEQDESIGN
+          SEQTEST SERVER SEVERITY SGDESIGN SGPANEL SGPLOT SGRENDER SGSCATTER
+          SHEWHART SIM2D SIMILARITY SIMLIN SIMNORMAL SOAP SORT SOURCE SPECTRA
+          SPP SQL SQOOP SSM STANDARD STATESPACE STDIZE STDRATE STEPDISC STP
+          STREAM SUMMARY SURVEYFREQ SURVEYIMPUTE SURVEYLOGISTIC SURVEYMEANS
+          SURVEYPHREG SURVEYREG SURVEYSELECT SYSLIN TABULATE TAPECOPY TAPELABEL
+          TEMPLATE TIMEDATA TIMEID TIMEPLOT TIMESERIES TPSPLINE TRANSPOSE
+          TRANSREG TRANTAB TREE TSCSREG TTEST UCM UNIVARIATE UPLOAD VARCLUS
+          VARCOMP VARIOGRAM VARMAX VASMP X11 X12 X13 XSL
+        )
+      end
+
+      state :basics do
+        # Rules to be parsed before the keywords (which are different depending
+        # on the context)
+
+        rule %r/\s+/m, Text
+
+        # Single-line comments (between * and ;) - these can actually go onto multiple lines
+        # case 1 - where it starts a line
+        rule %r/^\s*%?\*[^;]*;/m, Comment::Single
+        # case 2 - where it follows the previous statement on the line (after a semicolon)
+        rule %r/(;)(\s*)(%?\*[^;]*;)/m do
+          groups Punctuation, Text, Comment::Single
+        end
+
+        # True multiline comments!
+        rule %r(/[*].*?[*]/)m, Comment::Multiline
+
+        # date/time constants (Language Reference pp91-2)
+        rule %r/'[0-9a-z]+?'d/i, Literal::Date
+        rule %r/'.+?'dt/i, Literal::Date
+        rule %r/'[0-9:]+?([a|p]m)?'t/i, Literal::Date
+
+        rule %r/'/, Str::Single, :single_string
+        rule %r/"/, Str::Double, :double_string
+        rule %r/&[a-z0-9_&.]+/i, Name::Variable
+
+        # numeric constants (Language Reference p91)
+        rule %r/\d[0-9a-f]*x/i, Num::Hex
+        rule %r/\d[0-9e\-.]+/i, Num # scientific notation
+
+        # auto variables from DATA step (Language Reference p46, p37)
+        rule %r/\b(_n_|_error_|_file_|_infile_|_msg_|_iorc_|_cmd_)\b/i, Name::Builtin::Pseudo
+
+        # auto variable list names
+        rule %r/\b(_character_|_numeric_|_all_)\b/i, Name::Builtin
+
+        # datalines/cards etc
+        rule %r/\b(datalines|cards)(\s*)(;)/i do
+          groups Keyword, Text, Punctuation
+          push :datalines
+        end
+        rule %r/\b(datalines4|cards4)(\s*)(;)/i do
+          groups Keyword, Text, Punctuation
+          push :datalines4
+        end
+
+
+        # operators (Language Reference p96)
+        rule %r(\*\*|[\*/\+-]), Operator
+        rule %r/[^¬~]?=:?|[<>]=?:?/, Operator
+        rule %r/\b(eq|ne|gt|lt|ge|le|in)\b/i, Operator::Word
+        rule %r/[&|!¦¬∘~]/, Operator
+        rule %r/\b(and|or|not)\b/i, Operator::Word
+        rule %r/(<>|><)/, Operator # min/max
+        rule %r/\|\|/, Operator # concatenation
+
+        # The OF operator should also be highlighted (Language Reference p49)
+        rule %r/\b(of)\b/i, Operator::Word
+        rule %r/\b(like)\b/i, Operator::Word # Language Ref p181
+
+        rule %r/\d+/, Num::Integer
+
+        rule %r/\$/, Keyword::Type
+
+        # Macro definitions
+        rule %r/(%macro|%mend)(\s*)(\w+)/i do
+          groups Keyword, Text, Name::Function
+        end
+        rule %r/%mend/, Keyword
+
+        rule %r/%\w+/ do |m|
+          if self.class.sas_macro_statements.include? m[0].upcase
+            token Keyword
+          elsif self.class.sas_macro_functions.include? m[0].upcase
+            token Keyword
+          else
+            token Name
+          end
+        end
+      end
+
+      state :basics2 do
+        # Rules to be parsed after the keywords (which are different depending
+        # on the context)
+
+        # Missing values (Language Reference p81)
+        rule %r/\s\.[;\s]/, Keyword::Constant # missing
+        rule %r/\s\.[a-z_]/, Name::Constant # user-defined missing
+
+        rule %r/[\(\),;:\{\}\[\]\\\.]/, Punctuation
+
+        rule %r/@/, Str::Symbol # line hold specifiers
+        rule %r/\?/, Str::Symbol # used for format modifiers
+
+        rule %r/[^\s]+/, Text # Fallback for anything we haven't matched so far
+      end
+
+      state :root do
+        mixin :basics
+
+        # PROC definitions
+        rule %r!(proc)(\s+)(\w+)!ix do |m|
+          @proc_name = m[3].upcase
+          puts "    proc name: #{@proc_name}" if @debug
+          if self.class.sas_proc_names.include? @proc_name
+            groups Keyword, Text, Keyword
+          else
+            groups Keyword, Text, Name
+          end
+
+          push :proc
+        end
+
+        # Data step definitions
+        rule %r/(data)(\s+)([\w\.]+)/i do
+          groups Keyword, Text, Name::Variable
+        end
+        # Libname definitions
+        rule %r/(libname)(\s+)(\w+)/i do
+          groups Keyword, Text, Name::Variable
+        end
+
+        rule %r/\w+/ do |m|
+          if self.class.data_step_statements.include? m[0].upcase
+            token Keyword
+          elsif self.class.sas_functions.include? m[0].upcase
+            token Keyword
+          else
+            token Name
+          end
+        end
+
+         mixin :basics2
+      end
+
+
+      state :single_string do
+        rule %r/''/, Str::Escape
+        rule %r/'/, Str::Single, :pop!
+        rule %r/[^']+/, Str::Single
+      end
+
+      state :double_string do
+        rule %r/&[a-z0-9_&]+\.?/i, Str::Interpol
+        rule %r/""/, Str::Escape
+        rule %r/"/, Str::Double, :pop!
+
+        rule %r/[^&"]+/, Str::Double
+        # Allow & to be used as character if not already matched as macro variable
+        rule %r/&/, Str::Double
+      end
+
+      state :datalines do
+        rule %r/[^;]/, Literal::String::Heredoc
+        rule %r/;/, Punctuation, :pop!
+      end
+
+      state :datalines4 do
+        rule %r/;{4}/, Punctuation, :pop!
+        rule %r/[^;]/, Literal::String::Heredoc
+        rule %r/;{,3}/, Literal::String::Heredoc
+      end
+
+
+      # PROCS
+      state :proc do
+        rule %r/(quit|run)/i, Keyword, :pop!
+
+        mixin :basics
+        rule %r/\w+/ do |m|
+          if self.class.data_step_statements.include? m[0].upcase
+            token Keyword
+          elsif self.class.sas_functions.include? m[0].upcase
+            token Keyword
+          elsif self.class.proc_keywords.has_key?(@proc_name) and self.class.proc_keywords[@proc_name].include? m[0].upcase
+            token Keyword
+          else
+            token Name
+          end
+        end
+
+         mixin :basics2
+      end
+
+    end #class SAS
+  end #module Lexers
+end #module Rouge