|
33 | 33 | . |
34 | 34 | (symbol) @function) |
35 | 35 |
|
| 36 | +(list |
| 37 | + . |
| 38 | + (symbol) @function.builtin |
| 39 | + (#any-of? @function.builtin |
| 40 | + "caar" "cadr" "call-with-input-file" "call-with-output-file" "cdar" "cddr" "list" |
| 41 | + "open-input-file" "open-output-file" "with-input-from-file" "with-output-to-file" "*" "+" "-" |
| 42 | + "/" "<" "<=" "=" ">" ">=" "abs" "acos" "angle" "append" "apply" "asin" "assoc" "assq" "assv" |
| 43 | + "atan" "boolean?" "caaaar" "caaadr" "caaar" "caadar" "caaddr" "caadr" "cadaar" "cadadr" "cadar" |
| 44 | + "caddar" "cadddr" "caddr" "call-with-current-continuation" "call-with-values" "car" "cdaaar" |
| 45 | + "cdaadr" "cdaar" "cdadar" "cdaddr" "cdadr" "cddaar" "cddadr" "cddar" "cdddar" "cddddr" "cdddr" |
| 46 | + "cdr" "ceiling" "char->integer" "char-alphabetic?" "char-ci<=?" "char-ci<?" "char-ci=?" |
| 47 | + "char-ci>=?" "char-ci>?" "char-downcase" "char-lower-case?" "char-numeric?" "char-ready?" |
| 48 | + "char-upcase" "char-upper-case?" "char-whitespace?" "char<=?" "char<?" "char=?" "char>=?" |
| 49 | + "char>?" "char?" "close-input-port" "close-output-port" "complex?" "cons" "cos" |
| 50 | + "current-error-port" "current-input-port" "current-output-port" "denominator" "display" |
| 51 | + "dynamic-wind" "eof-object?" "eq?" "equal?" "eqv?" "eval" "even?" "exact->inexact" "exact?" "exp" |
| 52 | + "expt" "floor" "flush-output" "for-each" "force" "gcd" "imag-part" "inexact->exact" "inexact?" |
| 53 | + "input-port?" "integer->char" "integer?" "interaction-environment" "lcm" "length" "list->string" |
| 54 | + "list->vector" "list-ref" "list-tail" "list?" "load" "log" "magnitude" "make-polar" |
| 55 | + "make-rectangular" "make-string" "make-vector" "map" "max" "member" "memq" "memv" "min" "modulo" |
| 56 | + "negative?" "newline" "not" "null-environment" "null?" "number->string" "number?" "numerator" |
| 57 | + "odd?" "output-port?" "pair?" "peek-char" "positive?" "procedure?" "quotient" "rational?" |
| 58 | + "rationalize" "read" "read-char" "real-part" "real?" "remainder" "reverse" "round" |
| 59 | + "scheme-report-environment" "set-car!" "set-cdr!" "sin" "sqrt" "string" "string->list" |
| 60 | + "string->number" "string->symbol" "string-append" "string-ci<=?" "string-ci<?" "string-ci=?" |
| 61 | + "string-ci>=?" "string-ci>?" "string-copy" "string-fill!" "string-length" "string-ref" |
| 62 | + "string-set!" "string<=?" "string<?" "string=?" "string>=?" "string>?" "string?" "substring" |
| 63 | + "symbol->string" "symbol?" "tan" "transcript-off" "transcript-on" "truncate" "values" "vector" |
| 64 | + "vector->list" "vector-fill!" "vector-length" "vector-ref" "vector-set!" "vector?" "write" |
| 65 | + "write-char" "zero?")) |
| 66 | + |
36 | 67 | ; special forms |
37 | 68 |
|
38 | 69 | (list |
|
105 | 136 | "syntax-rules" "unquote" "begin" "quote" "let-syntax" "and" "if" "quasiquote" "letrec" "delay" |
106 | 137 | "or" "when" "unless" "identifier-syntax" "assert" "library" "export" "import" "rename" "only" |
107 | 138 | "except" "prefix" "define-values")) |
108 | | - |
109 | | -(list |
110 | | - . |
111 | | - (symbol) @function.builtin |
112 | | - (#any-of? @function.builtin |
113 | | - "caar" "cadr" "call-with-input-file" "call-with-output-file" "cdar" "cddr" "list" |
114 | | - "open-input-file" "open-output-file" "with-input-from-file" "with-output-to-file" "*" "+" "-" |
115 | | - "/" "<" "<=" "=" ">" ">=" "abs" "acos" "angle" "append" "apply" "asin" "assoc" "assq" "assv" |
116 | | - "atan" "boolean?" "caaaar" "caaadr" "caaar" "caadar" "caaddr" "caadr" "cadaar" "cadadr" "cadar" |
117 | | - "caddar" "cadddr" "caddr" "call-with-current-continuation" "call-with-values" "car" "cdaaar" |
118 | | - "cdaadr" "cdaar" "cdadar" "cdaddr" "cdadr" "cddaar" "cddadr" "cddar" "cdddar" "cddddr" "cdddr" |
119 | | - "cdr" "ceiling" "char->integer" "char-alphabetic?" "char-ci<=?" "char-ci<?" "char-ci=?" |
120 | | - "char-ci>=?" "char-ci>?" "char-downcase" "char-lower-case?" "char-numeric?" "char-ready?" |
121 | | - "char-upcase" "char-upper-case?" "char-whitespace?" "char<=?" "char<?" "char=?" "char>=?" |
122 | | - "char>?" "char?" "close-input-port" "close-output-port" "complex?" "cons" "cos" |
123 | | - "current-error-port" "current-input-port" "current-output-port" "denominator" "display" |
124 | | - "dynamic-wind" "eof-object?" "eq?" "equal?" "eqv?" "eval" "even?" "exact->inexact" "exact?" "exp" |
125 | | - "expt" "floor" "flush-output" "for-each" "force" "gcd" "imag-part" "inexact->exact" "inexact?" |
126 | | - "input-port?" "integer->char" "integer?" "interaction-environment" "lcm" "length" "list->string" |
127 | | - "list->vector" "list-ref" "list-tail" "list?" "load" "log" "magnitude" "make-polar" |
128 | | - "make-rectangular" "make-string" "make-vector" "map" "max" "member" "memq" "memv" "min" "modulo" |
129 | | - "negative?" "newline" "not" "null-environment" "null?" "number->string" "number?" "numerator" |
130 | | - "odd?" "output-port?" "pair?" "peek-char" "positive?" "procedure?" "quotient" "rational?" |
131 | | - "rationalize" "read" "read-char" "real-part" "real?" "remainder" "reverse" "round" |
132 | | - "scheme-report-environment" "set-car!" "set-cdr!" "sin" "sqrt" "string" "string->list" |
133 | | - "string->number" "string->symbol" "string-append" "string-ci<=?" "string-ci<?" "string-ci=?" |
134 | | - "string-ci>=?" "string-ci>?" "string-copy" "string-fill!" "string-length" "string-ref" |
135 | | - "string-set!" "string<=?" "string<?" "string=?" "string>=?" "string>?" "string?" "substring" |
136 | | - "symbol->string" "symbol?" "tan" "transcript-off" "transcript-on" "truncate" "values" "vector" |
137 | | - "vector->list" "vector-fill!" "vector-length" "vector-ref" "vector-set!" "vector?" "write" |
138 | | - "write-char" "zero?")) |
0 commit comments