zyAdmin/node_modules/monaco-editor/dev/vs/basic-languages/scheme/scheme.js

/*---------------------------------------------------------------------------------------------
 *  Copyright (c) Microsoft Corporation. All rights reserved.
 *  Licensed under the MIT License. See License.txt in the project root for license information.
 *--------------------------------------------------------------------------------------------*/
define('vs/basic-languages/scheme/scheme',["require", "exports"], function (require, exports) {
    "use strict";
    Object.defineProperty(exports, "__esModule", { value: true });
    exports.language = exports.conf = void 0;
    exports.conf = {
        comments: {
            lineComment: ';',
            blockComment: ['#|', '|#']
        },
        brackets: [
            ['(', ')'],
            ['{', '}'],
            ['[', ']']
        ],
        autoClosingPairs: [
            { open: '{', close: '}' },
            { open: '[', close: ']' },
            { open: '(', close: ')' },
            { open: '"', close: '"' }
        ],
        surroundingPairs: [
            { open: '{', close: '}' },
            { open: '[', close: ']' },
            { open: '(', close: ')' },
            { open: '"', close: '"' }
        ]
    };
    exports.language = {
        defaultToken: '',
        ignoreCase: true,
        tokenPostfix: '.scheme',
        brackets: [
            { open: '(', close: ')', token: 'delimiter.parenthesis' },
            { open: '{', close: '}', token: 'delimiter.curly' },
            { open: '[', close: ']', token: 'delimiter.square' }
        ],
        keywords: [
            'case',
            'do',
            'let',
            'loop',
            'if',
            'else',
            'when',
            'cons',
            'car',
            'cdr',
            'cond',
            'lambda',
            'lambda*',
            'syntax-rules',
            'format',
            'set!',
            'quote',
            'eval',
            'append',
            'list',
            'list?',
            'member?',
            'load'
        ],
        constants: ['#t', '#f'],
        operators: ['eq?', 'eqv?', 'equal?', 'and', 'or', 'not', 'null?'],
        tokenizer: {
            root: [
                [/#[xXoObB][0-9a-fA-F]+/, 'number.hex'],
                [/[+-]?\d+(?:(?:\.\d*)?(?:[eE][+-]?\d+)?)?/, 'number.float'],
                [
                    /(?:\b(?:(define|define-syntax|define-macro))\b)(\s+)((?:\w|\-|\!|\?)*)/,
                    ['keyword', 'white', 'variable']
                ],
                { include: '@whitespace' },
                { include: '@strings' },
                [
                    /[a-zA-Z_#][a-zA-Z0-9_\-\?\!\*]*/,
                    {
                        cases: {
                            '@keywords': 'keyword',
                            '@constants': 'constant',
                            '@operators': 'operators',
                            '@default': 'identifier'
                        }
                    }
                ]
            ],
            comment: [
                [/[^\|#]+/, 'comment'],
                [/#\|/, 'comment', '@push'],
                [/\|#/, 'comment', '@pop'],
                [/[\|#]/, 'comment']
            ],
            whitespace: [
                [/[ \t\r\n]+/, 'white'],
                [/#\|/, 'comment', '@comment'],
                [/;.*$/, 'comment']
            ],
            strings: [
                [/"$/, 'string', '@popall'],
                [/"(?=.)/, 'string', '@multiLineString']
            ],
            multiLineString: [
                [/[^\\"]+$/, 'string', '@popall'],
                [/[^\\"]+/, 'string'],
                [/\\./, 'string.escape'],
                [/"/, 'string', '@popall'],
                [/\\$/, 'string']
            ]
        }
    };
});