| Server IP : 127.0.0.1 / Your IP : 216.73.216.109 Web Server : Apache/2.4.54 (Win64) OpenSSL/1.1.1q PHP/8.1.10 System : Windows NT DESKTOP-E5T4RUN 10.0 build 19045 (Windows 10) AMD64 User : SERVERWEB ( 0) PHP Version : 8.1.10 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/cygwin64/lib/python3.9/site-packages/pygments/lexers/__pycache__/ |
Upload File : |
a
SҼaO( � @ s d dl Z d dlmZmZmZmZmZ d dlmZm Z m
Z
mZmZm
Z
mZmZmZmZ d dlmZ g d�ZG dd� de�ZG dd � d e�ZG d
d� de�ZG dd
� d
e�ZG dd� de�ZG dd� de�ZG dd� de�ZG dd� de�ZG dd� de�ZG dd� de�ZdS )� N)�
RegexLexer�include�bygroups�words�default)
�Text�Comment�Operator�Keyword�Name�String�Number�Punctuation�Literal�Error)�PythonLexer)
�SchemeLexer�CommonLispLexer�HyLexer�RacketLexer�NewLispLexer�EmacsLispLexer� ShenLexer� CPSALexer�XtlangLexer�FennelLexerc @ sF e Zd ZdZddgZddgZddgZdZd Zd
Z de
jfde
jd
fde
dfde
fde
fdejfdejfdefde ejfdejfdejfdefdd�dd� eD �� efde ejfde ejfdd�d d� eD �� ejfd!e ejfe ejfd"efd#efgde
jd$fd%e
jd&fd'e
jfd(e
jfgd)e
d$fd*e
d&fd+e
fgd,�Zd-S ).r ZScheme�schemeZscmz*.scmz*.ssz
text/x-schemezapplication/x-scheme)�lambda�define�if�else�cond�and�or�case�let�let*�letrec�begin�do�delay�set!�=>�quote�
quasiquote�unquote�unquote-splicing�
define-syntax�
let-syntax�
letrec-syntax�syntax-rules)��*�+�-�/�<�<=�=�>�>=�abs�acos�angle�append�apply�asin�assoc�assq�assv�atan�boolean?�caaaar�caaadr�caaar�caadar�caaddr�caadr�caar�cadaar�cadadr�cadar�caddar�cadddr�caddr�cadr�call-with-current-continuation�call-with-input-file�call-with-output-file�call-with-values�call/cc�car�cdaaar�cdaadr�cdaar�cdadar�cdaddr�cdadr�cdar�cddaar�cddadr�cddar�cdddar�cddddr�cdddr�cddr�cdr�ceiling�
char->integer�char-alphabetic?�
char-ci<=?� char-ci<?� char-ci=?�
char-ci>=?� char-ci>?�
char-downcase�char-lower-case?�
char-numeric?�char-ready?�char-upcase�char-upper-case?�char-whitespace?�char<=?�char<?�char=?�char>=?�char>?�char?�close-input-port�close-output-port�complex?�cons�cos�current-input-port�current-output-port�denominator�display�dynamic-wind�eof-object?�eq?�equal?�eqv?�eval�even?�exact->inexact�exact?�exp�expt�floor�for-each�force�gcd� imag-part�inexact->exact�inexact?�input-port?�
integer->char�integer?�interaction-environment�lcm�length�list�list->string�list->vector�list-ref� list-tail�list?�load�log� magnitude�
make-polar�make-rectangular�make-string�make-vector�map�max�member�memq�memv�min�modulo� negative?�newline�not�null-environment�null?�number->string�number?� numerator�odd?�open-input-file�open-output-file�output-port?�pair?� peek-char�port?� positive?�
procedure?�quotient� rational?�rationalize�read� read-char� real-part�real?� remainder�reverse�round�scheme-report-environment�set-car!�set-cdr!�sin�sqrt�string�string->list�string->number�string->symbol�
string-append�string-ci<=?�string-ci<?�string-ci=?�string-ci>=?�string-ci>?�string-copy�string-fill!�
string-length�
string-ref�string-set!� string<=?�string<?�string=?� string>=?�string>?�string?� substring�symbol->string�symbol?�tan�transcript-off�
transcript-on�truncate�values�vector�vector->list�vector-fill!�
vector-length�
vector-ref�vector-set!�vector?�with-input-from-file�with-output-to-file�write�
write-char�zero?�[\w!$%&*+,/:<=>?@^~|-]+�;.*$�#\|�multiline-commentz#;\s*\(�commented-formz#!r6rs�\s+�
-?\d+\.\d+�-?\d+�"(\\\\|\\[^\\]|[^"\\])*"�'�'