[ { "path": ".gitattributes", "content": "* -text\r\n**.cxx text\r\n**.cpp text\r\n**.c text\r\n**.h text\r\n**.hpp text\r\n**.m text\r\n**.mm text\r\n**.iface text\r\n**.template text\r\n**.mk text\r\n**.mk text\r\n**.py text\r\n**.rc text\r\n**.css text\r\n**.html text\r\n**.bat text\r\n**.bsh text\r\n**.zsh text\r\n**.mak text\r\n**.def text\r\n**.manifest text\r\n**.properties text\r\n**.props text\r\n**.session text\r\n**.styled text\r\n**.folded text\r\n**.adoc text\r\n**.asp text\r\n**.aspx text\r\n**.php text\r\n**.vb text\r\n**.vbs text\r\n**.ans text\r\n**.asm text\r\n**.cob text\r\n**.cmake text\r\n**.d text\r\n**.dart text\r\n**.diff text\r\n**.erl text\r\n**.f text\r\n**.forth text\r\n**.gd text\r\n**.gui text\r\n**.iss text\r\n**.jl text\r\n**.json text\r\n**.lua text\r\n**.m3 text\r\n**.matlab text\r\n**.ml text\r\n**.nim text\r\n**.nix text\r\n**.octave text\r\n**.p text\r\n**.pas text\r\n**.pl text\r\n**.p6 text\r\n**.ps1 text\r\n**.r text\r\n**.rb text\r\n**.roff text\r\n**.rs text\r\n**.snx text\r\n**.sql text\r\n**.st text\r\n**.tcl text\r\n**.toml text\r\n**.tsql text\r\n**.err text\r\n**.mms text\r\n**.tex text\r\n**.fs text\r\n**.vh text\r\n**.vhd text\r\n**.x12 text\r\n**.xml text\r\n**.yaml text\r\n**.zig text\r\n**.md text\r\n**.txt text\r\n**.pch text\r\n**.hg* text\r\n**.dsp text\r\n**.pbxproj text\r\n**.plist text\r\n**.xcworkspacedata text\r\n**.pro text\r\n**.gen text\r\n**makefile text\r\n**.bmp binary\r\n**.cur binary\r\n**.ico binary\r\n**.jpg binary\r\n**.png binary\r\n**.sh text eol=lf\r\ntgzsrc text eol=lf\r\n" }, { "path": ".github/workflows/build-check-macos.yml", "content": "name: \"Build and check Lexilla on macOS\"\n\non: [push]\n\njobs:\n build:\n\n runs-on: macos-latest\n\n strategy:\n matrix:\n cpp_compiler: [clang++]\n\n steps:\n - uses: actions/checkout@v6\n - name: Cache Scintilla\n id: cache-scintilla\n uses: actions/cache@v5\n with:\n path: scintilla\n key: ${{ runner.os }}-scintilla\n - name: Install Scintilla source\n if: steps.cache-scintilla.outputs.cache-hit != 'true'\n run: |\n (mkdir scintilla)\n (cd .. && wget --no-verbose https://www.scintilla.org/scintilla500.zip)\n (unzip ../scintilla500.zip -d scintilla)\n - name: Copy Scintilla\n run: |\n (cp -r scintilla/scintilla/ ../scintilla)\n - name: Unit Test\n run: (cd test/unit && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN) test)\n - name: Build Lexilla\n run: (cd src && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN))\n - uses: actions/upload-artifact@v6\n with:\n name: liblexilla.dylib\n path: bin/liblexilla.dylib\n - name: Test lexing and folding\n run: (cd test && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN) test)\n - name: Check metadata\n run: |\n (cd test/Metadata && make CXX=${{matrix.cpp_compiler}})\n (cd test/Metadata && ./Metadata -check)\n - name: CheckLexilla C Example\n run: (cd examples/CheckLexilla && make DEBUG=1 --jobs=$(getconf _NPROCESSORS_ONLN) check)\n - name: SimpleLexer Example\n run: (cd examples/SimpleLexer && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN) check)\n" }, { "path": ".github/workflows/build-check-win32.yml", "content": "name: \"Build and check Lexilla on Win32 with Visual C++\"\n\non: [push]\n\njobs:\n # Compile for amd64 and cross-compile for arm64. Tests run only for amd64.\n build:\n\n runs-on: windows-latest\n\n strategy:\n matrix:\n arch:\n - amd64\n - amd64_arm64\n env:\n TEST: ${{ matrix.arch == 'amd64' && 'test' || '' }}\n steps:\n - uses: actions/checkout@v6\n - name: Preparing nmake\n uses: ilammy/msvc-dev-cmd@v1\n with:\n arch: ${{ matrix.arch }}\n - name: Cache Scintilla\n id: cache-scintilla\n uses: actions/cache@v5\n with:\n path: scintilla\n key: ${{ runner.os }}-scintilla\n - name: Install Scintilla source\n if: steps.cache-scintilla.outputs.cache-hit != 'true'\n run: |\n pwd\n New-Item -Name \"scintilla\" -Type Directory -Force\n cd scintilla\n curl --fail --location --show-error --retry 3 -O https://www.scintilla.org/scintilla500.zip\n ls\n 7z x scintilla500.zip\n cd ..\n - name: Copy Scintilla\n run: |\n xcopy /s scintilla\\scintilla\\ ..\\scintilla\\\n - name: Unit Test\n run: |\n cd test/unit\n nmake -f test.mak DEBUG=1 $env:TEST\n cd ../..\n - name: Build Lexilla\n run: |\n cd src\n nmake -f lexilla.mak DEBUG=1\n cd ..\n - uses: actions/upload-artifact@v6\n with:\n name: lexilla${{ matrix.arch == 'amd64_arm64' && '-arm64' || '' }}.dll\n path: bin/lexilla.dll\n - name: Test lexing and folding\n run: |\n cd test\n nmake -f testlexers.mak DEBUG=1 $env:TEST\n cd ..\n - name: Check metadata\n if: matrix.arch == 'amd64'\n run: |\n cd test/Metadata\n cl Metadata.cxx ../../access/LexillaAccess.cxx -EHsc -std:c++17 -I ../../include -I ../../access -I ../../../scintilla/include -Fe: Metadata\n ./Metadata -check\n cd ../..\n - name: CheckLexilla C Example\n if: matrix.arch == 'amd64'\n run: |\n cd examples/CheckLexilla\n cl -MP CheckLexilla.c -I ../../include -Fe: CheckLexilla\n .\\CheckLexilla.exe\n cd ../..\n - name: SimpleLexer Example\n run: |\n cd examples/SimpleLexer\n cl -MP -std:c++17 -EHsc -LD -I ../../../scintilla/include -I ../../include -I ../../lexlib SimpleLexer.cxx ../../lexlib/*.cxx\n cd ../..\n" }, { "path": ".github/workflows/build-check.yml", "content": "name: \"Build and check Lexilla on Linux\"\n\non: [push]\n\njobs:\n build:\n\n runs-on: ubuntu-latest\n\n strategy:\n matrix:\n cpp_compiler: [g++, clang++]\n\n steps:\n - uses: actions/checkout@v6\n - name: Cache Scintilla\n id: cache-scintilla\n uses: actions/cache@v5\n with:\n path: scintilla\n key: ${{ runner.os }}-scintilla\n - name: Install Scintilla source\n if: steps.cache-scintilla.outputs.cache-hit != 'true'\n run: |\n (mkdir scintilla)\n (cd .. && wget --no-verbose https://www.scintilla.org/scintilla500.zip)\n (unzip ../scintilla500.zip -d scintilla)\n - name: Copy Scintilla\n run: |\n (cp -r scintilla/scintilla/ ../scintilla)\n - name: Unit Test\n run: (cd test/unit && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN) test)\n - name: Build Lexilla\n run: (cd src && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN))\n - uses: actions/upload-artifact@v6\n with:\n name: liblexilla-${{matrix.cpp_compiler}}.so\n path: bin/liblexilla.so\n overwrite: true\n - name: Test lexing and folding\n run: (cd test && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN) test)\n - name: Check metadata\n run: |\n (cd test/Metadata && make CXX=${{matrix.cpp_compiler}})\n (cd test/Metadata && ./Metadata -check)\n - name: CheckLexilla C Example\n run: (cd examples/CheckLexilla && make DEBUG=1 --jobs=$(getconf _NPROCESSORS_ONLN) check)\n - name: SimpleLexer Example\n run: (cd examples/SimpleLexer && make DEBUG=1 CXX=${{matrix.cpp_compiler}} --jobs=$(getconf _NPROCESSORS_ONLN) check)\n" }, { "path": ".gitignore", "content": "*.o\n*.a\n*.lib\n*.obj\n*.iobj\n__pycache__\n*.pyc\n*.dll\n*.so\n*.dylib\n*.framework\n*.pyd\n*.exe\n*.exp\n*.lib\n*.pdb\n*.ipdb\n*.res\n*.bak\n*.sbr\n*.suo\n*.aps\n*.sln\n*.vcxproj.*\n*.idb\n*.bsc\n*.intermediate.manifest\n*.lastbuildstate\n*.nativecodeanalysis.xml\n*.cache\n*.ilk\n*.ncb\n*.tlog\n*.sdf\ngtk/*.plist\nwin32/*.plist\n*.opt\n*.plg\n*.pbxbtree\n*.mode1v3\n*.pbxuser\n*.pbproj\n*.tgz\n*.log\n*.xcbkptlist\n*.xcuserstate\nxcuserdata/\n*.xcsettings\nxcschememanagement.plist\n.DS_Store\ntest/TestLexers\nRelease\nDebug\nx64\nARM64\ncocoa/build\ncocoa/ScintillaFramework/build\ncocoa/ScintillaTest/build\nmacosx/SciTest/build\n*.cppcheck\n*.pro.user\n.qmake.stash\ncov-int\n.vs\nmeson-private\nmeson-logs\nbuild.ninja\n.ninja*\ncompile_commands.json\n.vscode/\nVTune Profiler Results/\n" }, { "path": ".travis.yml", "content": "# Build Lexilla with gcc and clang on Linux, macOS, and Windows\r\n# Test Lexilla with gcc and clang on Linux and macOS \r\n# Windows has older versions of libraries so can't compile std::filesystem\r\n# with gcc or std::string::starts_with with clang.\r\n# On macOS, gcc is a synonym for clang so exclude gcc.\r\nos:\r\n - linux\r\n - osx\r\n - windows\r\n\r\ndist: focal\r\n\r\nosx_image: xcode12.3\r\n\r\nlanguage: cpp\r\n\r\njobs:\r\n exclude:\r\n - os: osx\r\n compiler: gcc\r\n\r\ninstall:\r\n - cd ..\r\n - wget --no-verbose https://www.scintilla.org/scintilla500.zip\r\n - if [ \"$TRAVIS_OS_NAME\" = \"windows\" ]; then 7z x scintilla500.zip ; else unzip scintilla500.zip ; fi\r\n - cd lexilla\r\n\r\ncompiler:\r\n - gcc\r\n - clang\r\n\r\nscript:\r\n - if [ \"$TRAVIS_OS_NAME\" = \"windows\" ]; then MAKER=\"mingw32-make windir=1\" ; else MAKER=\"make\" ; fi\r\n - (cd src && $MAKER DEBUG=1)\r\n - cd test\r\n - if [ \"$TRAVIS_OS_NAME\" != \"windows\" ]; then make DEBUG=1 test ; fi\r\n - (cd unit && $MAKER DEBUG=1 test)\r\n - cd ..\r\n - cd examples\r\n - (cd CheckLexilla && $MAKER DEBUG=1 check)\r\n - (cd SimpleLexer && $MAKER DEBUG=1 check)\r\n - cd ..\r\n" }, { "path": "CONTRIBUTING", "content": "Lexilla is on GitHub at https://github.com/ScintillaOrg/lexilla\r\n\r\nBugs, fixes and features should be posted to the Issue Tracker\r\nhttps://github.com/ScintillaOrg/lexilla/issues\r\n\r\nAI-generated code and issues are often low quality and difficult to understand\r\nso should not be posted.\r\n\r\nPatches should include test cases. Add a test case file in \r\nlexilla/test/examples/ and run the test program in \r\nlexilla/test.\r\nThe result will be new files with \".styled.new\" and \".folded.new\"\r\nappended containing lexing or folding results.\r\nFor lexing, there are brace surrounded style numbers for each style\r\nstart as markup:\r\n{5}import{0} {11}contextlib{0}\r\n\r\nFor folding, there are 4 columns of folding results preceding the example text:\r\n 2 400 0 + --[[ coding:UTF-8\r\n 0 402 0 | comment ]]\r\nSee the test/README file for more explanation of the folding results.\r\n\r\nTo build lexilla and the tests with gcc there are Windows batch\r\nand Unix shell files scripts/RunTest.bat scripts/RunTest.sh.\r\nCheck the result of the .new files and, if correct, rename replacing\r\n\".styled.new\" with \".styled\" and \".folded.new\" with \".folded\".\r\nRun the tests again and success should be reported.\r\nInclude the .styled and .folded files in the patch.\r\nIncluding test cases ensures that the change won't be undone by\r\nother changes in the future and clarifies the intentions of the author.\r\n\r\nEither send unified diffs (or patch files) or zip archives with whole files.\r\nMercurial/Git patch files are best as they include author information and commit\r\nmessages.\r\n\r\nQuestions should go to the scintilla-interest mailing list\r\nhttps://groups.google.com/forum/#!forum/scintilla-interest\r\n\r\nCode should follow the guidelines at\r\nhttps://www.scintilla.org/SciCoding.html\r\n\r\nLexilla is on GitHub so use its facilities rather than SourceForge which is\r\nthe home of Scintilla.\r\nThe neilh @ scintilla.org account receives much spam and is only checked\r\noccasionally. Almost all Scintilla mail should go to the mailing list.\r\n" }, { "path": "License.txt", "content": "License for Lexilla, Scintilla, and SciTE\n\nCopyright 1998-2021 by Neil Hodgson \n\nAll Rights Reserved\n\nPermission to use, copy, modify, and distribute this software and its\ndocumentation for any purpose and without fee is hereby granted,\nprovided that the above copyright notice appear in all copies and that\nboth that copyright notice and this permission notice appear in\nsupporting documentation.\n\nNEIL HODGSON DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS\nSOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY\nAND FITNESS, IN NO EVENT SHALL NEIL HODGSON BE LIABLE FOR ANY\nSPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES\nWHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,\nWHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER\nTORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE\nOR PERFORMANCE OF THIS SOFTWARE." }, { "path": "README", "content": "README for Lexilla library.\r\n\r\nThe Lexilla library contains a set of lexers and folders that provides support for\r\nprogramming, mark-up, and data languages for the Scintilla source code editing\r\ncomponent.\r\n\r\nLexilla is made available as both a shared library and static library.\r\nThe shared library is called liblexilla.so / liblexilla.dylib / lexilla.dll on Linux / macOS /\r\nWindows.\r\nThe static library is called liblexilla.a when built with GCC or Clang and liblexilla.lib\r\nwhen built with MSVC.\r\n\r\nLexilla is developed on Windows, Linux, and macOS and requires a C++17 compiler.\r\nIt may work on other Unix platforms like BSD but that is not a development focus.\r\nMSVC 2019.4, GCC 9.0, Clang 9.0, and Apple Clang 11.0 are known to work.\r\n\r\nMSVC is only available on Windows.\r\n\r\nGCC and Clang work on Windows and Linux.\r\n\r\nOn macOS, only Apple Clang is available.\r\n\r\nLexilla requires some headers from Scintilla to build and expects a directory named\r\n\"scintilla\" containing a copy of Scintilla 5+ to be a peer of the Lexilla top level\r\ndirectory conventionally called \"lexilla\".\r\n\r\nTo use GCC, run lexilla/src/makefile:\r\n\tmake\r\n\r\nTo use Clang, run lexilla/src/makefile:\r\n\tmake CLANG=1\r\nOn macOS, CLANG is set automatically so this can just be\r\n\tmake\r\n\r\nTo use MSVC, run lexilla/src/lexilla.mak:\r\n\tnmake -f lexilla.mak\r\n\r\nTo build a debugging version of the library, add DEBUG=1 to the command:\r\n\tmake DEBUG=1\r\n\t\r\nThe built libraries are copied into lexilla/bin.\r\n\r\nLexilla relies on a list of lexers from the lexilla/lexers directory. If any changes are\r\nmade to the set of lexers then source and build files can be regenerated with the\r\nlexilla/scripts/LexillaGen.py script which requires Python 3 and is tested with 3.7+.\r\nUnix:\r\n\tpython3 LexillaGen.py\r\nWindows:\r\n\tpyw LexillaGen.py\r\n" }, { "path": "access/LexillaAccess.cxx", "content": "// SciTE - Scintilla based Text Editor\n/** @file LexillaAccess.cxx\n ** Interface to loadable lexers.\n ** Maintains a list of lexer library paths and CreateLexer functions.\n ** If list changes then load all the lexer libraries and find the functions.\n ** When asked to create a lexer, call each function until one succeeds.\n **/\n// Copyright 2019 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n\n#include \n#include \n#include \n#include \n\n#if !defined(_WIN32)\n#include \n#else\n#include \n#endif\n\n#include \"ILexer.h\"\n\n#include \"Lexilla.h\"\n\n#include \"LexillaAccess.h\"\n\nnamespace {\n\n#if defined(_WIN32)\nusing Function = FARPROC;\nusing Module = HMODULE;\nconstexpr const char *pathSeparator = \"\\\\\";\n#else\nusing Function = void *;\nusing Module = void *;\nconstexpr const char *pathSeparator = \"/\";\n#endif\n\n/// Generic function to convert from a Function(void* or FARPROC) to a function pointer.\n/// This avoids undefined and conditionally defined behaviour.\ntemplate\nT FunctionPointer(Function function) noexcept {\n\tstatic_assert(sizeof(T) == sizeof(function));\n\tT fp {};\n\tmemcpy(&fp, &function, sizeof(T));\n\treturn fp;\n}\n\n#if defined(_WIN32)\n\nstd::wstring WideStringFromUTF8(std::string_view sv) {\n\tconst int sLength = static_cast(sv.length());\n\tconst int cchWide = ::MultiByteToWideChar(CP_UTF8, 0, sv.data(), sLength, nullptr, 0);\n\tstd::wstring sWide(cchWide, 0);\n\t::MultiByteToWideChar(CP_UTF8, 0, sv.data(), sLength, sWide.data(), cchWide);\n\treturn sWide;\n}\n\n#endif\n\n// Turn off deprecation checks as LexillaAccess deprecates its wrapper over\n// the deprecated LexerNameFromID. Thus use within LexillaAccess is intentional.\n#if defined(__GNUC__) || defined(__clang__)\n#pragma GCC diagnostic ignored \"-Wdeprecated-declarations\"\n#else\n#pragma warning(disable: 4996)\n#endif\n\nstd::string directoryLoadDefault;\nstd::string lastLoaded;\n\nstruct LexLibrary {\n\tLexilla::CreateLexerFn fnCL;\n\tLexilla::LexerNameFromIDFn fnLNFI;\n\tLexilla::GetLibraryPropertyNamesFn fnGLPN;\n\tLexilla::SetLibraryPropertyFn fnSLP;\n\tstd::string nameSpace;\n};\nstd::vector libraries;\n\nstd::vector lexers;\nstd::vector libraryProperties;\n\nFunction FindSymbol(Module m, const char *symbol) noexcept {\n#if defined(_WIN32)\n\treturn ::GetProcAddress(m, symbol);\n#else\n\treturn dlsym(m, symbol);\n#endif\n}\n\nLexilla::CreateLexerFn pCreateLexerDefault = nullptr;\n\nbool NameContainsDot(std::string_view path) noexcept {\n\tfor (std::string_view::const_reverse_iterator it = path.crbegin();\n\t it != path.crend(); ++it) {\n\t\tif (*it == '.')\n\t\t\treturn true;\n\t\tif (*it == '/' || *it == '\\\\')\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nconstexpr bool HasPrefix(std::string_view s, std::string_view prefix) noexcept {\n\treturn (s.size() >= prefix.size()) && (prefix == s.substr(0, prefix.size()));\n}\n\n}\n\nvoid Lexilla::SetDefault(CreateLexerFn pCreate) noexcept {\n\tpCreateLexerDefault = pCreate;\n}\n\nvoid Lexilla::SetDefaultDirectory(std::string_view directory) {\n\tdirectoryLoadDefault = directory;\n}\n\nbool Lexilla::Load(std::string_view sharedLibraryPaths) {\n\tif (sharedLibraryPaths == lastLoaded) {\n\t\treturn !libraries.empty();\n\t}\n\n\tstd::string_view paths = sharedLibraryPaths;\n\tlexers.clear();\n\n\tlibraries.clear();\n\twhile (!paths.empty()) {\n\t\tconst size_t separator = paths.find_first_of(';');\n\t\tstd::string path(paths.substr(0, separator));\n\t\tif (separator == std::string::npos) {\n\t\t\tpaths.remove_prefix(paths.size());\n\t\t} else {\n\t\t\tpaths.remove_prefix(separator + 1);\n\t\t}\n\t\tif (path == \".\") {\n\t\t\tif (directoryLoadDefault.empty()) {\n\t\t\t\tpath = \"\";\n\t\t\t} else {\n\t\t\t\tpath = directoryLoadDefault;\n\t\t\t\tpath += pathSeparator;\n\t\t\t}\n\t\t\tpath += LEXILLA_LIB;\n\t\t}\n\t\tif (!NameContainsDot(path)) {\n\t\t\t// No '.' in name so add extension\n\t\t\tpath.append(LEXILLA_EXTENSION);\n\t\t}\n#if defined(_WIN32)\n\t\t// Convert from UTF-8 to wide characters\n\t\tstd::wstring wsPath = WideStringFromUTF8(path);\n\t\tModule lexillaDL = ::LoadLibraryW(wsPath.c_str());\n#else\n\t\tModule lexillaDL = dlopen(path.c_str(), RTLD_LAZY);\n#endif\n\t\tif (lexillaDL) {\n\t\t\tGetLexerCountFn fnLexerCount = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_GETLEXERCOUNT));\n\t\t\tGetLexerNameFn fnLexerName = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_GETLEXERNAME));\n\t\t\tif (fnLexerCount && fnLexerName) {\n\t\t\t\tconst int nLexers = fnLexerCount();\n\t\t\t\tfor (int i = 0; i < nLexers; i++) {\n\t\t\t\t\tconstexpr size_t lengthName = 200;\n\t\t\t\t\tchar name[lengthName]{};\n\t\t\t\t\tfnLexerName(i, name, sizeof(name));\n\t\t\t\t\tlexers.emplace_back(name);\n\t\t\t\t}\n\t\t\t}\n\t\t\tCreateLexerFn fnCL = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_CREATELEXER));\n\t\t\tLexerNameFromIDFn fnLNFI = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_LEXERNAMEFROMID));\n\t\t\tGetLibraryPropertyNamesFn fnGLPN = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_GETLIBRARYPROPERTYNAMES));\n\t\t\tSetLibraryPropertyFn fnSLP = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_SETLIBRARYPROPERTY));\n\t\t\tGetNameSpaceFn fnGNS = FunctionPointer(\n\t\t\t\tFindSymbol(lexillaDL, LEXILLA_GETNAMESPACE));\n\t\t\tstd::string nameSpace;\n\t\t\tif (fnGNS) {\n\t\t\t\tnameSpace = fnGNS();\n\t\t\t\tnameSpace += LEXILLA_NAMESPACE_SEPARATOR;\n\t\t\t}\n\t\t\tLexLibrary lexLib {\n\t\t\t\tfnCL,\n\t\t\t\tfnLNFI,\n\t\t\t\tfnGLPN,\n\t\t\t\tfnSLP,\n\t\t\t\tnameSpace\n\t\t\t};\n\t\t\tlibraries.push_back(lexLib);\n\t\t}\n\t}\n\tlastLoaded = sharedLibraryPaths;\n\n\tstd::set nameSet;\n\tfor (const LexLibrary &lexLib : libraries) {\n\t\tif (lexLib.fnGLPN) {\n\t\t\tconst char *cpNames = lexLib.fnGLPN();\n\t\t\tif (cpNames) {\n\t\t\t\tstd::string_view names = cpNames;\n\t\t\t\twhile (!names.empty()) {\n\t\t\t\t\tconst size_t separator = names.find_first_of('\\n');\n\t\t\t\t\tstd::string name(names.substr(0, separator));\n\t\t\t\t\tnameSet.insert(name);\n\t\t\t\t\tif (separator == std::string::npos) {\n\t\t\t\t\t\tnames.remove_prefix(names.size());\n\t\t\t\t\t} else {\n\t\t\t\t\t\tnames.remove_prefix(separator + 1);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t}\n\t// Standard Lexilla does not have any properties so can't be added to set.\n\tlibraryProperties = std::vector(nameSet.begin(), nameSet.end());\n\n\treturn !libraries.empty();\n}\n\nScintilla::ILexer5 *Lexilla::MakeLexer(std::string_view languageName) {\n\tstd::string sLanguageName(languageName);\t// Ensure NUL-termination\n\t// First, try to match namespace then name suffix\n\tfor (const LexLibrary &lexLib : libraries) {\n\t\tif (lexLib.fnCL && !lexLib.nameSpace.empty()) {\n\t\t\tif (HasPrefix(languageName, lexLib.nameSpace)) {\n\t\t\t\tScintilla::ILexer5 *pLexer = lexLib.fnCL(sLanguageName.substr(lexLib.nameSpace.size()).c_str());\n\t\t\t\tif (pLexer) {\n\t\t\t\t\treturn pLexer;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t}\n\t// If no match with namespace, try to just match name\n\tfor (const LexLibrary &lexLib : libraries) {\n\t\tif (lexLib.fnCL) {\n\t\t\tScintilla::ILexer5 *pLexer = lexLib.fnCL(sLanguageName.c_str());\n\t\t\tif (pLexer) {\n\t\t\t\treturn pLexer;\n\t\t\t}\n\t\t}\n\t}\n\tif (pCreateLexerDefault) {\n\t\treturn pCreateLexerDefault(sLanguageName.c_str());\n\t}\n#if defined(LEXILLA_STATIC)\n\tScintilla::ILexer5 *pLexer = CreateLexer(sLanguageName.c_str());\n\tif (pLexer) {\n\t\treturn pLexer;\n\t}\n#endif\n\treturn nullptr;\n}\n\nstd::vector Lexilla::Lexers() {\n\treturn lexers;\n}\n\nstd::string Lexilla::NameFromID(int identifier) {\n\tfor (const LexLibrary &lexLib : libraries) {\n\t\tif (lexLib.fnLNFI) {\n\t\t\tconst char *name = lexLib.fnLNFI(identifier);\n\t\t\tif (name) {\n\t\t\t\treturn name;\n\t\t\t}\n\t\t}\n\t}\n\treturn {};\n}\n\nstd::vector Lexilla::LibraryProperties() {\n\treturn libraryProperties;\n}\n\nvoid Lexilla::SetProperty(const char *key, const char *value) {\n\tfor (const LexLibrary &lexLib : libraries) {\n\t\tif (lexLib.fnSLP) {\n\t\t\tlexLib.fnSLP(key, value);\n\t\t}\n\t}\n\t// Standard Lexilla does not have any properties so don't set.\n}\n" }, { "path": "access/LexillaAccess.h", "content": "// SciTE - Scintilla based Text Editor\n/** @file LexillaAccess.h\n ** Interface to loadable lexers.\n ** This does not depend on SciTE code so can be copied out into other projects.\n **/\n// Copyright 2019 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#ifndef LEXILLAACCESS_H\n#define LEXILLAACCESS_H\n\nnamespace Lexilla {\n\n// Directory to load default Lexilla from, commonly the directory of the application.\nvoid SetDefaultDirectory(std::string_view directory);\n\n// Specify CreateLexer when statically linked so no hard dependency in LexillaAccess\n// so it doesn't have to be built in two forms - static and dynamic.\nvoid SetDefault(CreateLexerFn pCreate) noexcept;\n\n// sharedLibraryPaths is a ';' separated list of shared libraries to load.\n// On Win32 it is treated as UTF-8 and on Unix it is passed to dlopen directly.\n// Return true if any shared libraries are loaded.\nbool Load(std::string_view sharedLibraryPaths);\n\nScintilla::ILexer5 *MakeLexer(std::string_view languageName);\n\nstd::vector Lexers();\n[[deprecated]] std::string NameFromID(int identifier);\nstd::vector LibraryProperties();\nvoid SetProperty(const char *key, const char *value);\n\n}\n\n#endif\n" }, { "path": "access/README", "content": "README for access directory.\r\n\r\nLexillaAccess is a module that simplifies using multiple libraries that follow the Lexilla protocol.\r\n\r\nIt can be compiled into a Lexilla client application.\r\n\r\nApplications with complex needs can copy the code and customise it to meet their requirements.\r\n\r\nThis module is not meant to be compiled into Lexilla.\r\n" }, { "path": "bin/empty.txt", "content": "This empty files ensures that the directory is created." }, { "path": "cppcheck.suppress", "content": "// File to suppress cppcheck warnings for files that will not be fixed.\r\n// Does not suppress warnings where an additional occurrence of the warning may be of interest.\r\n// Configured for cppcheck 2.20\r\n\r\n// Just a report of how many checkers are run\r\ncheckersReport\r\n\r\n// This just warns that cppcheck isn't exhaustive and it still appears in exhaustive mode\r\nnormalCheckLevelMaxBranches\r\n\r\n// Coding style is to use assignments in constructor when there are many\r\n// members to initialize or the initialization is complex or has comments.\r\nuseInitializationList\r\n\r\n// These may be interesting but its not clear without examining each instance closely\r\n// Would have to ensure that any_of/all_of has same early/late exits as current code and\r\n// produces same result on empty collections\r\nuseStlAlgorithm\r\n\r\n// Common for lexer object destructors\r\nmissingOverride\r\n\r\n// Some non-explicit constructors are used for conversions or are private to lexers\r\nnoExplicitConstructor\r\n\r\n// The performance cost of by-value passing is often small and using a reference decreases\r\n// code legibility.\r\npassedByValue\r\n\r\n// cppcheck 2.11 can't find system headers on Win32.\r\nmissingIncludeSystem\r\n\r\n// Passing temporary string into hidden object creator functions: they do not hold the argument\r\nreturnDanglingLifetime:lexilla/access/LexillaAccess.cxx\r\n\r\n// Used from other projects\r\nunusedFunction:lexilla/access/LexillaAccess.cxx\r\nunusedFunction:lexilla/src/Lexilla.cxx\r\n\r\n// cppcheck 2.11 limits checking of complex functions unless --check-level=exhaustive but that\r\n// only finds one false issue in LexRuby\r\ncheckLevelNormal:lexilla/lexers/LexBash.cxx\r\ncheckLevelNormal:lexilla/lexers/LexCPP.cxx\r\ncheckLevelNormal:lexilla/lexers/LexHTML.cxx\r\ncheckLevelNormal:lexilla/lexers/LexPerl.cxx\r\ncheckLevelNormal:lexilla/lexers/LexRuby.cxx\r\n\r\n// Physically but not logically const.\r\nconstVariablePointer:lexilla/examples/CheckLexilla/CheckLexilla.c\r\n\r\n// cppcheck appears to be incorrectly determining control flow: target_end is used after write\r\nunreadVariable:lexilla/lexers/LexRuby.cxx\r\n\r\n// Suppress most lexer warnings since the lexers are maintained by others\r\nredundantCondition:lexilla/lexers/LexA68k.cxx\r\nconstParameterReference:lexilla/lexers/LexAbaqus.cxx\r\nconstParameterReference:lexilla/lexers/LexAda.cxx\r\nconstParameterReference:lexilla/lexers/LexAsciidoc.cxx\r\nconstParameterCallback:lexilla/lexers/LexAsn1.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexAU3.cxx\r\nshadowVariable:lexilla/lexers/LexAU3.cxx\r\nconstParameterReference:lexilla/lexers/LexBaan.cxx\r\nunreadVariable:lexilla/lexers/LexBaan.cxx\r\nvariableScope:lexilla/lexers/LexBaan.cxx\r\nconstParameterPointer:lexilla/lexers/LexBaan.cxx\r\nconstParameterReference:lexilla/lexers/LexBash.cxx\r\nvariableScope:lexilla/lexers/LexBash.cxx\r\nconstVariable:lexilla/lexers/LexBasic.cxx\r\nconstParameterReference:lexilla/lexers/LexBullant.cxx\r\nconstParameterReference:lexilla/lexers/LexCLW.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexCLW.cxx\r\nvariableScope:lexilla/lexers/LexCmake.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexCmake.cxx\r\nconstParameterReference:lexilla/lexers/LexCmake.cxx\r\nconstParameterReference:lexilla/lexers/LexCOBOL.cxx\r\nconstVariablePointer:lexilla/lexers/LexCOBOL.cxx\r\nconstParameterReference:lexilla/lexers/LexCoffeeScript.cxx\r\nconstParameterPointer:lexilla/lexers/LexCoffeeScript.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexCoffeeScript.cxx\r\nconstVariableReference:lexilla/lexers/LexConf.cxx\r\nconstParameterReference:lexilla/lexers/LexCPP.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexCPP.cxx\r\nvariableScope:lexilla/lexers/LexCSS.cxx\r\nconstVariablePointer:lexilla/lexers/LexCSS.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexDataflex.cxx\r\nconstParameterReference:lexilla/lexers/LexDataflex.cxx\r\nvariableScope:lexilla/lexers/LexDataflex.cxx\r\nconstParameterReference:lexilla/lexers/LexDart.cxx\r\nfunctionStatic:lexilla/lexers/LexDart.cxx\r\nfunctionStatic:lexilla/lexers/LexDMIS.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexECL.cxx\r\nvariableScope:lexilla/lexers/LexECL.cxx\r\nconstParameter:lexilla/lexers/LexEDIFACT.cxx\r\nconstParameterPointer:lexilla/lexers/LexEDIFACT.cxx\r\nfunctionStatic:lexilla/lexers/LexEDIFACT.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexEiffel.cxx\r\nvariableScope:lexilla/lexers/LexErlang.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexErlang.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexEScript.cxx\r\nconstParameter:lexilla/lexers/LexFortran.cxx\r\nconstParameterReference:lexilla/lexers/LexFortran.cxx\r\nredundantContinue:lexilla/lexers/LexFortran.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexFSharp.cxx\r\nvariableScope:lexilla/lexers/LexFSharp.cxx\r\nconstParameterReference:lexilla/lexers/LexGAP.cxx\r\nconstParameterReference:lexilla/lexers/LexGDScript.cxx\r\nvariableScope:lexilla/lexers/LexGui4Cli.cxx\r\nconstParameterReference:lexilla/lexers/LexHaskell.cxx\r\nconstParameterReference:lexilla/lexers/LexHex.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexHex.cxx\r\nconstVariable:lexilla/lexers/LexHollywood.cxx\r\nvariableScope:lexilla/lexers/LexInno.cxx\r\nconstVariableReference:lexilla/lexers/LexInno.cxx\r\nconstParameterPointer:lexilla/lexers/LexJulia.cxx\r\nconstParameterReference:lexilla/lexers/LexJulia.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexJulia.cxx\r\nunreadVariable:lexilla/lexers/LexJulia.cxx\r\nvariableScope:lexilla/lexers/LexJulia.cxx\r\nvariableScope:lexilla/lexers/LexLaTeX.cxx\r\nconstParameterReference:lexilla/lexers/LexLaTeX.cxx\r\nconstParameterReference:lexilla/lexers/LexLisp.cxx\r\nconstParameterPointer:lexilla/lexers/LexMagik.cxx\r\nconstParameterReference:lexilla/lexers/LexMagik.cxx\r\nconstParameterPointer:lexilla/lexers/LexMatlab.cxx\r\nconstParameterReference:lexilla/lexers/LexMatlab.cxx\r\nunreadVariable:lexilla/lexers/LexMatlab.cxx\r\nvariableScope:lexilla/lexers/LexMatlab.cxx\r\nvariableScope:lexilla/lexers/LexMetapost.cxx\r\nconstParameterReference:lexilla/lexers/LexModula.cxx\r\nduplicateBreak:lexilla/lexers/LexModula.cxx\r\nvariableScope:lexilla/lexers/LexModula.cxx\r\nconstParameterReference:lexilla/lexers/LexMPT.cxx\r\nvariableScope:lexilla/lexers/LexMSSQL.cxx\r\nshadowArgument:lexilla/lexers/LexMySQL.cxx\r\nconstParameterReference:lexilla/lexers/LexNim.cxx\r\nconstParameterReference:lexilla/lexers/LexNimrod.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexNimrod.cxx\r\nvariableScope:lexilla/lexers/LexNimrod.cxx\r\nfunctionStatic:lexilla/lexers/LexNix.cxx\r\nvariableScope:lexilla/lexers/LexNsis.cxx\r\nconstParameterReference:lexilla/lexers/LexNsis.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexNsis.cxx\r\nvariableScope:lexilla/lexers/LexOpal.cxx\r\nconstParameterReference:lexilla/lexers/LexOpal.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexOpal.cxx\r\nconstParameterReference:lexilla/lexers/LexOScript.cxx\r\nconstParameterReference:lexilla/lexers/LexPascal.cxx\r\nvariableScope:lexilla/lexers/LexPB.cxx\r\nconstParameterReference:lexilla/lexers/LexPerl.cxx\r\nconstVariableReference:lexilla/lexers/LexPerl.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexPerl.cxx\r\nfunctionStatic:lexilla/lexers/LexPerl.cxx\r\nconstParameterReference:lexilla/lexers/LexPLM.cxx\r\nconstParameterReference:lexilla/lexers/LexPO.cxx\r\nvariableScope:lexilla/lexers/LexPO.cxx\r\nconstVariablePointer:lexilla/lexers/LexPOV.cxx\r\nconstParameterReference:lexilla/lexers/LexPython.cxx\r\nshadowVariable:lexilla/lexers/LexPowerPro.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexPowerPro.cxx\r\nvariableScope:lexilla/lexers/LexProgress.cxx\r\nconstParameterReference:lexilla/lexers/LexProgress.cxx\r\nconstParameterReference:lexilla/lexers/LexRaku.cxx\r\nvariableScope:lexilla/lexers/LexRaku.cxx\r\nfunctionStatic:lexilla/lexers/LexRaku.cxx\r\nredundantInitialization:lexilla/lexers/LexRegistry.cxx\r\nconstParameterReference:lexilla/lexers/LexRuby.cxx\r\nconstParameterReference:lexilla/lexers/LexRust.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexScriptol.cxx\r\nconstParameterReference:lexilla/lexers/LexScriptol.cxx\r\nconstParameterReference:lexilla/lexers/LexSINEX.cxx\r\nvariableScope:lexilla/lexers/LexSINEX.cxx\r\nconstParameterPointer:lexilla/lexers/LexSmalltalk.cxx\r\nvariableScope:lexilla/lexers/LexSpecman.cxx\r\nunreadVariable:lexilla/lexers/LexSpice.cxx\r\nconstParameterReference:lexilla/lexers/LexSpice.cxx\r\nfunctionStatic:lexilla/lexers/LexSQL.cxx\r\nconstParameterReference:lexilla/lexers/LexSTTXT.cxx\r\nconstParameterReference:lexilla/lexers/LexTACL.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexTACL.cxx\r\nvariableScope:lexilla/lexers/LexTACL.cxx\r\nclarifyCalculation:lexilla/lexers/LexTADS3.cxx\r\nconstParameterReference:lexilla/lexers/LexTADS3.cxx\r\nconstParameterReference:lexilla/lexers/LexTAL.cxx\r\nvariableScope:lexilla/lexers/LexTAL.cxx\r\nconstVariableReference:lexilla/lexers/LexTCL.cxx\r\nconstParameterPointer:lexilla/lexers/LexTCMD.cxx\r\ninvalidscanf:lexilla/lexers/LexTCMD.cxx\r\nconstParameterReference:lexilla/lexers/LexTeX.cxx\r\nvariableScope:lexilla/lexers/LexTeX.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexVB.cxx\r\nconstParameterReference:lexilla/lexers/LexVerilog.cxx\r\nvariableScope:lexilla/lexers/LexVerilog.cxx\r\nbadBitmaskCheck:lexilla/lexers/LexVerilog.cxx\r\nuselessCallsSubstr:lexilla/lexers/LexVerilog.cxx\r\nduplicateCondition:lexilla/lexers/LexVerilog.cxx\r\nconstParameterReference:lexilla/lexers/LexVHDL.cxx\r\nconstVariable:lexilla/lexers/LexVHDL.cxx\r\nshadowVariable:lexilla/lexers/LexVHDL.cxx\r\nunreadVariable:lexilla/lexers/LexVHDL.cxx\r\nvariableScope:lexilla/lexers/LexVHDL.cxx\r\nunreadVariable:lexilla/lexers/LexVisualProlog.cxx\r\nvariableScope:lexilla/lexers/LexVisualProlog.cxx\r\nshiftTooManyBitsSigned:lexilla/lexers/LexVisualProlog.cxx\r\nbitwiseOnBoolean:lexilla/lexers/LexVisualProlog.cxx\r\niterateByValue:lexilla/lexers/LexVisualProlog.cxx\r\nfunctionStatic:lexilla/lexers/LexVisualProlog.cxx\r\nunreadVariable:lexilla/lexers/LexX12.cxx\r\nconstVariableReference:lexilla/lexers/LexX12.cxx\r\nconstParameterPointer:lexilla/lexers/LexX12.cxx\r\nuselessCallsSubstr:lexilla/lexers/LexX12.cxx\r\nconstParameterReference:lexilla/lexers/LexYAML.cxx\r\nknownConditionTrueFalse:lexilla/lexers/LexYAML.cxx\r\n\r\n// These are due to Accessor::IndentAmount not declaring the callback as taking a const.\r\n// Changing this could cause problems for downstream projects.\r\nconstParameterCallback:lexilla/lexers/LexEiffel.cxx\r\nconstParameterCallback:lexilla/lexers/LexGDScript.cxx\r\nconstParameterCallback:lexilla/lexers/LexPython.cxx\r\nconstParameterCallback:lexilla/lexers/LexScriptol.cxx\r\nconstParameterCallback:lexilla/lexers/LexVB.cxx\r\n\r\nconstVariableReference:lexilla/lexers/LexA68k.cxx\r\nconstVariableReference:lexilla/lexers/LexAPDL.cxx\r\nconstVariableReference:lexilla/lexers/LexASY.cxx\r\nconstVariableReference:lexilla/lexers/LexAVE.cxx\r\nconstVariableReference:lexilla/lexers/LexAVS.cxx\r\nconstVariableReference:lexilla/lexers/LexAU3.cxx\r\nconstVariableReference:lexilla/lexers/LexAsn1.cxx\r\nconstVariableReference:lexilla/lexers/LexBibTeX.cxx\r\nconstVariableReference:lexilla/lexers/LexCaml.cxx\r\nconstVariableReference:lexilla/lexers/LexCLW.cxx\r\nconstVariableReference:lexilla/lexers/LexCmake.cxx\r\nconstVariableReference:lexilla/lexers/LexCOBOL.cxx\r\nconstVariableReference:lexilla/lexers/LexCoffeeScript.cxx\r\nconstVariableReference:lexilla/lexers/LexCsound.cxx\r\nconstVariableReference:lexilla/lexers/LexCSS.cxx\r\nconstVariableReference:lexilla/lexers/LexCrontab.cxx\r\nconstVariableReference:lexilla/lexers/LexDataflex.cxx\r\nconstVariableReference:lexilla/lexers/LexDMAP.cxx\r\nconstVariableReference:lexilla/lexers/LexECL.cxx\r\nconstVariableReference:lexilla/lexers/LexEiffel.cxx\r\nconstVariableReference:lexilla/lexers/LexEScript.cxx\r\nconstVariableReference:lexilla/lexers/LexErlang.cxx\r\nconstVariableReference:lexilla/lexers/LexFlagship.cxx\r\nconstVariableReference:lexilla/lexers/LexForth.cxx\r\nconstVariableReference:lexilla/lexers/LexFortran.cxx\r\nconstVariableReference:lexilla/lexers/LexGAP.cxx\r\nconstVariableReference:lexilla/lexers/LexGui4Cli.cxx\r\nconstVariableReference:lexilla/lexers/LexKix.cxx\r\nconstVariableReference:lexilla/lexers/LexKVIrc.cxx\r\nconstVariableReference:lexilla/lexers/LexLout.cxx\r\nconstVariableReference:lexilla/lexers/LexMagik.cxx\r\nconstVariableReference:lexilla/lexers/LexMatlab.cxx\r\nconstVariableReference:lexilla/lexers/LexMetapost.cxx\r\nconstVariableReference:lexilla/lexers/LexMMIXAL.cxx\r\nconstVariableReference:lexilla/lexers/LexMSSQL.cxx\r\nconstVariableReference:lexilla/lexers/LexNsis.cxx\r\nconstVariableReference:lexilla/lexers/LexOpal.cxx\r\nconstVariableReference:lexilla/lexers/LexPOV.cxx\r\nconstVariableReference:lexilla/lexers/LexPB.cxx\r\nconstVariableReference:lexilla/lexers/LexPowerPro.cxx\r\nconstVariableReference:lexilla/lexers/LexPS.cxx\r\nconstVariableReference:lexilla/lexers/LexRebol.cxx\r\nconstVariableReference:lexilla/lexers/LexSAS.cxx\r\nconstVariableReference:lexilla/lexers/LexSML.cxx\r\nconstVariableReference:lexilla/lexers/LexSorcus.cxx\r\nconstVariableReference:lexilla/lexers/LexSpecman.cxx\r\nconstVariableReference:lexilla/lexers/LexStata.cxx\r\nconstVariableReference:lexilla/lexers/LexTACL.cxx\r\nconstVariableReference:lexilla/lexers/LexTADS3.cxx\r\nconstVariableReference:lexilla/lexers/LexTAL.cxx\r\nconstVariableReference:lexilla/lexers/LexTCMD.cxx\r\nconstVariableReference:lexilla/lexers/LexTeX.cxx\r\nconstVariableReference:lexilla/lexers/LexVHDL.cxx\r\n\r\n// Suppress everything in test example files\r\n*:lexilla/test/examples/*\r\n\r\n// Suppress everything in catch.hpp as won't be changing\r\n*:lexilla/test/unit/catch.hpp\r\n// cppcheck gives up inside catch.hpp\r\n*:lexilla/test/unit/UnitTester.cxx\r\n*:lexilla/test/unit/unitTest.cxx\r\n\r\n// cppcheck fails REQUIRE from Catch\r\ncomparisonOfFuncReturningBoolError:lexilla/test/unit/*.cxx\r\n\r\n// cppcheck fails SECTION from Catch\r\nsyntaxError:lexilla/test/unit/*.cxx\r\n\r\n// Tests often test things that are always true\r\nknownConditionTrueFalse:lexilla/test/unit/testCharacterSet.cxx\r\n\r\n// unread/unused variables and overwritten without read in tests\r\nunreadVariable:lexilla/test/unit/*.cxx\r\nunusedVariable:lexilla/test/unit/*.cxx\r\nredundantInitialization:lexilla/test/unit/*.cxx\r\n\r\n// doesn't understand cppcheck generated functions\r\nunusedFunction:lexilla/test/unit/*.cxx\r\n\r\n// argv has a standardised type\r\nconstParameter:lexilla/examples/CheckLexilla/CheckLexilla.c\r\n" }, { "path": "delbin.bat", "content": "@del /S /Q *.a *.aps *.bsc *.dll *.dsw *.exe *.idb *.ilc *.ild *.ilf *.ilk *.ils *.lib *.map *.ncb *.obj *.o *.opt *.ipdb *.pdb *.plg *.res *.sbr *.tds *.exp *.tlog *.lastbuildstate >NUL:\n" }, { "path": "doc/Lexilla.html", "content": "\n\n\n \n \n \n \n \n \n \n \n \n \n \n Lexilla\n \n \n \n \n \n \n \n \n \n \n \n
\n \n A library of language lexers for use with Scintilla\n \n Release version 5.4.9
\n Site last modified April 29 2026\n 		\n  \n
\n \n \n \n \n
\n  \n
\n
    \n
  • Version 5.4.9 improves Assembler, C++, F#, LaTeX, Pascal, and Ruby.
    • \n
  • Version 5.4.8 improves Batch, Forth, JavaScript, and JSON.
    • \n
  • Version 5.4.7 adds EscapeSequence lexer escseq. Improves Errorlist, Makefile, Perl, and Progress.
    • \n
  • Version 5.4.6 adds SINEX lexer. Improves Errorlist, Progress, and Python.
    • \n
  • Version 5.4.5 improves Dart, Makefile, Nix, TOML, and Zig.
    • \n
\n \n\n

\n Lexilla is a free library of language\n lexers that can be used with the Scintilla\n editing component.\n It comes with complete source code and a license that\n permits use in any free project or commercial product.\n

\n

\n Originally, this functionality was incorporated inside Scintilla.\n It has been extracted as a separate project to make it easier for contributors to work on\n support for new languages and to fix bugs in existing lexers.\n It also defines a protocol where projects can implement their own lexers and distribute\n them as they wish.\n

\n

\n Current development requires a recent C++ compiler that supports C++17.\n The testing framework uses some C++20 features but the basic library only uses C++17.\n

\n

\n Lexilla is currently available for Intel Win32, macOS, and Linux compatible operating\n systems. It has been run on Windows 10, macOS 10.13+, and on Ubuntu 20.04 but is likely\n to run on earlier systems as it has no GUI functionality.\n

\n

\n You can download Lexilla.\n

\n

\n The source code can be downloaded via Git at GitHub\n\tLexilla project page.
\n git clone https://github.com/ScintillaOrg/lexilla\n

\n

Current repository status:
\n
\n
\n \n

\n

\n Related sites.\n

\n

\n Bugs and other issues.\n

\n

\n History and contribution credits.\n

\n

\n Questions and comments about Lexilla should be directed to the\n scintilla-interest\n mailing list,\n which is for discussion of Scintilla and related projects, their bugs and future features.\n This is a low traffic list, averaging less than 20 messages per week.\n To avoid spam, only list members can write to the list.\n New versions of Lexilla are announced on scintilla-interest.\n
\n

\n \n\n\n" }, { "path": "doc/LexillaDoc.html", "content": "\n\n\n\n \n \n \n \n\n Lexilla Documentation\n \n\n \n \n\n \n \n \n \n\n \n \n
\"LexillaLexilla
\n\n

Lexilla Documentation

\n\n

Last edited 21 April 2021 NH

\n\n

Introduction

\n\n

Lexilla is a library containing lexers for use with Scintilla. It can be either a static library\n that is linked into an application or a shared library that is loaded at runtime.

\n\n

Lexilla does not interact with the display so there is no need to compile it for a\n particular GUI toolkit. Therefore there can be a common library shared by applications using\n different GUI toolkits. In some circumstances there may need to be both 32-bit and 64-bit versions\n on one system to match different applications.

\n\n

Different extensions are commonly used for shared libraries: .so on Linux, .dylib on macOS, and .DLL on Windows.\n

\n\n

The Lexilla protocol

\n\n

A set of functions is defined by Lexilla for use by applications. Libraries that provide these functions\n can be used as a replacement for Lexilla or to add new lexers beyond those provided by Lexilla.

\n\n

The Lexilla protocol is a superset of the external lexer protocol and defines these functions that may be exported from a shared library:
\n int GetLexerCount()
\n void GetLexerName(unsigned int index, char *name, int buflength)
\n LexerFactoryFunction GetLexerFactory(unsigned int index)
\n ILexer5 *CreateLexer(const char *name)
\n const char *LexerNameFromID(int identifier)
\n const char *GetLibraryPropertyNames()
\n void SetLibraryProperty(const char *key, const char *value)
\n const char *GetNameSpace()\n

\n\n

ILexer5 is defined by Scintilla in include/ILexer.h as the interface provided by lexers which is called by Scintilla.\n Many clients do not actually need to call methods on ILexer5 - they just take the return from CreateLexer and plug it\n straight into Scintilla so it can be treated as a machine pointer (void *).\n

\n\n

LexerFactoryFunction is defined as a function that takes no arguments and returns an ILexer5 *:\n ILexer5 *(*LexerFactoryFunction)() but this can be ignored by most client code.\n

\n\n

The Lexilla protocol is a superset of the earlier external lexer protocol that defined the first 3 functions\n (GetLexerCount, GetLexerName, GetLexerFactory)\n so Lexilla can be loaded by applications that support that protocol.\n GetLexerFactory will rarely be used now as it is easier to call CreateLexer.\n

\n\n

CreateLexer is the main call that will create a lexer for a particular language. The returned lexer can then be\n set as the current lexer in Scintilla by calling\n SCI_SETILEXER.

\n\n

LexerNameFromID is an optional function that returns the name for a lexer identifier.\n LexerNameFromID(SCLEX_CPP) → \"cpp\".\n This is a temporary affordance to make it easier to convert applications to using Lexilla.\n Applications should move to using lexer names instead of IDs.\n This function is deprecated, showing warnings with some compilers, and will be removed in a future version of Lexilla.

\n\n

SetLibraryProperty and GetLibraryPropertyNames\n are optional functions that can be\n defined if a library requires initialisation before calling other methods.\n For example, a lexer library that reads language definitions from XML files may require that the\n directory containing these files be set before a call to CreateLexer.\n SetLibraryProperty(\"definitions.directory\", \"/usr/share/xeditor/language-definitions\")\n If a library implements SetLibraryProperty then it may also provide a set of valid property names with\n GetLibraryPropertyNames that can then be used by the application to define configuration file property\n names or user interface elements for options dialogs.

\n\n

GetNameSpace is an optional function that returns a namespace string\n that can be used to disambiguate lexers with the same name from different providers.\n If Lexilla and XMLLexers both provide a \"cpp\" lexer than a request for \"cpp\" may be satisfied by either but \"xmllexers.cpp\"\n unambiguously refers to the \"cpp\" lexer from XMLLexers.

\n\n

Building Lexilla

\n\n

Before using Lexilla it must be built or downloaded.

\n

Lexilla requires some headers from Scintilla to build and expects a directory named\n \"scintilla\" containing a copy of Scintilla 5+ to be a peer of the Lexilla top level\n directory conventionally called \"lexilla\".

\n\n
To build Lexilla, in the lexilla/src directory, run make (for gcc or clang)
\n
make
\n
or nmake for MSVC
\n
nmake -f lexilla.mak
\n
\n\n
After building Lexilla, its test suite can be run with make/nmake in the lexilla/test directory. For gcc or clang
\n
make test
\n or for MSVC
\n
nmake -f testlexers.mak test
\n
Each test case should show \"Lexing ...\" and errors will display a diagnostic, commonly showing\n a difference between the actual and expected result:
\n C:\\u\\hg\\lexilla\\test\\examples\\python\\x.py:1: is different\n
\n\n

There are also RunTest.sh / RunTest.bat scripts in the scripts directory to build Lexilla and then build and run the tests.\n These both use gcc/clang, not MSVC.

\n\n

There are Microsoft Visual C++ and Xcode projects that can be used to build Lexilla.\n For Visual C++: src/Lexilla.vcxproj. For Xcode: src/Lexilla/Lexilla.xcodeproj.\n There is also test/TestLexers.vcxproj to build the tests with Visual C++.

\n\n

Using Lexilla

\n\n

Definitions for using Lexilla from C and C++ are included in lexilla/include/Lexilla.h.\n For C++, scintilla/include/ILexer.h should be included before Lexilla.h as the\n ILexer5 type is used.\n For C, ILexer.h should not be included as C does not understand it and from C,\n void* is used instead of ILexer5*.\n

\n\n

For many applications the main Lexilla operations are loading the Lexilla library, creating a\n lexer and using that lexer in Scintilla.\n Applications need to define the location (or locations) they expect\n to find Lexilla or libraries that support the Lexilla protocol.\n They also need to define how they request particular lexers, perhaps with a mapping from\n file extensions to lexer names.

\n\n

From C - CheckLexilla

\n\n

An example C program for accessing Lexilla is provided in lexilla/examples/CheckLexilla.\n Build with make and run with make check.\n

\n\n

From C++ - LexillaAccess

\n\n

A C++ module, LexillaAccess.cxx / LexillaAccess.h is provided in lexilla/access.\n This can either be compiled into the application when it is sufficient\n or the source code can be copied into the application and customized when the application has additional requirements\n (such as checking code signatures).\n SciTE uses LexillaAccess.

\n\n

LexillaAccess supports loading multiple shared libraries implementing the Lexilla protocol at one time.

\n\n

From Qt

\n\n

For Qt, use either LexillaAccess from above or Qt's QLibrary class. With 'Call' defined to call Scintilla APIs.
\n \n#if _WIN32
\n    typedef void *(__stdcall *CreateLexerFn)(const char *name);
\n#else
\n    typedef void *(*CreateLexerFn)(const char *name);
\n#endif
\n    QFunctionPointer fn = QLibrary::resolve(\"lexilla\", \"CreateLexer\");
\n    void *lexCpp = ((CreateLexerFn)fn)(\"cpp\");
\n    Call(SCI_SETILEXER, 0, (sptr_t)(void *)lexCpp);
\n

\n\n

Applications may discover the set of lexers provided by a library by first calling\n GetLexerCount to find the number of lexers implemented in the library then looping over calling\n GetLexerName with integers 0 to GetLexerCount()-1.

\n\n

Applications may set properties on a library by calling SetLibraryProperty if provided.\n This may be needed for initialisation so should before calling GetLexerCount or CreateLexer.\n A set of property names may be available from GetLibraryPropertyNames if provided.\n It returns a string pointer where the string contains a list of property names separated by '\\n'.\n It is up to applications to define how properties are defined and persisted in its user interface\n and configuration files.

\n\n

Modifying or adding lexers

\n\n

Lexilla can be modified or a new library created that can be used to replace or augment Lexilla.

\n\n

Lexer libraries that provide the same functions as Lexilla may provide lexers for use by Scintilla,\n augmenting or replacing those provided by Lexilla.\n To allow initialisation of lexer libraries, a SetLibraryProperty(const char *key, const char *value)\n may optionally be implemented. For example, a lexer library that uses XML based lexer definitions may\n be provided with a directory to search for such definitions.\n Lexer libraries should ignore any properties that they do not understand.\n The set of properties supported by a lexer library is specified as a '\\n' separated list of property names by\n an optional const char *GetLibraryPropertyNames() function.\n

\n\n

Lexilla and its contained lexers can be tested with the TestLexers program in lexilla/test.\n Read lexilla/test/README for information on building and using TestLexers.

\n\n

An example of a simple lexer housed in a shared library that is compatible with the\n Lexilla protocol can be found in lexilla/examples/SimpleLexer. It is implemented in C++.\n Build with make and check by running CheckLexilla against it with\n make check.\n

\n\n \n\n\n" }, { "path": "doc/LexillaDownload.html", "content": "\n\n\n \n \n \n \n \n \n Download Lexilla\n \n \n \n \n \n \n \n \n
\n \"Scintilla\n \n Download\n Lexilla\n
\n \n \n \n \n
\n \n\tWindows  \n\t\n GTK/Linux  \n\t\n
\n

\n Download.\n

\n

\n The license for using Lexilla is similar to that of Python\n containing very few restrictions.\n

\n

\n Release 5.4.9\n

\n

\n Source Code\n

\n The source code package contains all of the source code for Lexilla but no binary\n\texecutable code and is available in\n
    \n
  • zip format (1.5M) commonly used on Windows
    • \n
  • tgz format (1.1M) commonly used on Linux and compatible operating systems
    • \n
\n Instructions for building on both Windows and Linux are included in the readme file.\n

\n Windows Executable Code\n

\n There is no download available containing only the Lexilla DLL.\n However, it is included in the SciTE\n executable full download as Lexilla.DLL.\n

\n SciTE is a good demonstration of Lexilla.\n

\n

\n Previous versions can be downloaded from the history\n page.\n

\n \n\n" }, { "path": "doc/LexillaHistory.html", "content": "\n\n\n \n \n \n \n \n \n Lexilla\n \n \n \n \n \n \n \n \n \n
\n \"Scintilla\n \n Lexilla\n
\n

History of Lexilla

\n

\n Lexilla was originally code that was part of the Scintilla project.\n Thus it shares much of the history and contributors of Scintilla before it was extracted as its own project.\n

\n Releases\n

Contributors

\n

\n Thanks to all the people that have contributed patches, bug reports and suggestions.\n

\n

\n Source code and documentation have been contributed by\n

\n \n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n\t\n \n\t\n\t\n\t\n \n
Atsuo IshimotoMark HammondFrancois Le CoguiecDale Nagata
Ralf ReinhardtPhilippe LhosteAndrew McKinlayStephan R. A. Deibel
Hans EckardtVassili BourdoMaksim LinRobin Dunn
John EhresmanSteffen GoeldnerDeepak S.DevelopMentor
Yann GaillardAubin PaulJason DiamondAhmad Baitalmal
Paul WinwoodMaxim BaranovRagnar HøjlandChristian Obrecht
Andreas NeukoetterAdam GatesSteve LhommeFerdinand Prantl
Jan DriesMarkus GritschTahir KaracaAhmad Zawawi
Laurent le TynevezWalter BraeuAshley CambrellGarrett Serack
Holger SchmidtActiveStateJames LarcombeAlexey Yutkin
Jan HercekRichard PeclEdward K. ReamValery Kondakoff
Smári McCarthyClemens WyssSimon SteeleSerge A. Baranov
Xavier NodetWilly DevauxDavid ClainBrendon Yenson
Vamsi PotluruPraveen AmbekarAlan KnowlesKengo Jinno
Valentin ValchevMarcos E. WurziusMartin AldersonRobert Gustavsson
José FonsecaHolger KiemesFrancis IrvingScott Kirkwood
Brian QuinlanUbiMichael R. DuerigDeepak T
Don Paul BeletskyGerhard KalabOlivier DagenaisJosh Wingstrom
Bruce DodsonSergey KoshcheyevChuan-jian ShenShane Caraveo
Alexander ScripnikRyan ChristiansonMartin SteffensenJakub Vrána
The Black HorusBernd KreussThomas LauerMike Lansdaal
Yukihiro NakaiJochen TuchtGreg SmithSteve Schoettler
Mauritius ThinnesDarren SchroederPedro GuerreiroSteven te Brinke
Dan PetittBiswapesh ChattopadhyayKein-Hong ManPatrizio Bekerle
Nigel HathawayHrishikesh DesaiSergey PuljajevMathias Rauen
Angelo MandatoDenis SureauKaspar SchiessChristoph Hösler
João Paulo F FariasRon SchofieldStefan WosnikMarius Gheorghe
Naba KumarSean O'DellStefanos TogoulidisHans Hagen
Jim CapeRoland WalterBrian MosherNicholas Nemtsev
Roy WoodPeter-Henry ManderRobert BoucherChristoph Dalitz
April WhiteS. UmarTrent MickFilip Yaghob
Avi YegudinVivi OrunitiaManfred BeckerDimitris Keletsekis
YuigaDavide ScolaJason BoggsReinhold Niesner
Jos van der ZandePescumaPavol BosikJohannes Schmid
Blair McGlashanMikael HultgrenFlorian BalmerHadar Raz
Herr PfarrerBen KeyGene BarryNiki Spahiev
Carsten SperberPhil ReidIago RubioRégis Vaquette
Massimo CoràElias PschernigChris JonesJosiah Reynolds
Robert Roessler rftp.comSteve DonovanJan Martin PettersenSergey Philippov
BorujoaMichael OwensFranck MarciaMassimo Maria Ghisalberti
Frank WunderlichJosepmaria RocaTobias EngvallSuzumizaki Kimitaka
Michael CartmellPascal HurniAndreRandy Butler
Georg RitterMichael GoffioulBen HarperAdam Strzelecki
Kamen StanevSteve MenardOliver YeohEric Promislow
Joseph GalbraithJeffrey RenArmel AsselinJim Pattee
Friedrich VedderSebastian PippingAndre ArpinStanislav Maslovski
Martin StoneFabien ProriolmimirNicola Civran
SnowMitchell ForalPieter HoltzhausenWaldemar Augustyn
Jason HaslamSebastian SteinlechnerChris RickardRob McMullen
Stefan SchwendelerCristian AdamNicolas ChachereauIstvan Szollosi
Xie RenhuiEnrico TrögerTodd WhitemanYuval Papish
instantonSergio LucatoVladVRODmitry Maslov
chupakabraJuan Carlos Arevalo BaezaNick TreleavenStephen Stagg
Jean-Paul IribarrenTim GerundtSam HarwellBoris
Jason OsterGertjan KloostermanalexbodnSergiu Dotenco
Anders KarlssonozlooperMarko NjezicEugen Bitter
Christoph BaumannChristopher BeanSergey KishchenkoKai Liu
Andreas RumpfJames MoffattYuzhou XinNic Jansma
Evan JonesMike LischkeEric KiddmaXmo
David SeverwrightJon StraitOliver KiddleEtienne Girondel
Haimag RenAndrey MoskalyovXaviToby Inkster
Eric ForgeotColomban WendlingNeoJordan Russell
Farshid LashkariSam RawlinsMichael MullinCarlos SS
vimMartial DemolinsTino WeinkaufJérôme Laforge
Udo LechnerMarco FaldaDariusz KnocińskiBen Fisher
Don GobinJohn YeungAdobeElizabeth A. Irizarry
Mike SchroederMorten MacFlyJaime GimenoThomas Linder Puls
Artyom ZuikovGerritOccam's RazorBen Bluemel
David WolfendaleChris AngelicoMarat DukhanStefan Weil
Rex ConnRoss McKayBruno BarbieriGordon Smith
dimitarSébastien GranjouxzenikoJames Ribe
Markus NißlMartin PanterMark YenPhilippe Elsass
Dimitar ZhekovFan YangDenis Shelomovskijdarmar
John VellaChinh NguyenSakshi VermaJoel B. Mohler
IsiledhelVidya WasiG. HuByron Hawkins
AlphaJohn DonoghuekudahIgor Shaula
Pavel BulochkinYosef Or BoczkoBrian GriffinÖzgür Emir
NeomiOmegaPhilSiegeLordErik
TJFMark RobinsonThomas Martitzfelix
Christian WaltherEbbenRobert GiesekeMike M
nkmathewAndreas TscharnerLee Wilmottjohnsonj
VicenteNick GravgaardIan GoldbyHolger Stenger
danselmiMat BerchtoldMichael StaszewskiBaurzhan Muftakhidinov
Erik AngelinYusuf Ramazan KaragözMarkus HeidelbergJoe Mueller
Mika AttilaJoMazMMarkus MoserStefan Küng
Jiří TechetJonathan HuntSerg StetsukJordan Jueckstock
Yury DubinskySam HocevarLuyomiMatt Gilarde
Mark CJohannes SasongkofstirlitzRobin Haberkorn
Pavel SountsovDirk LorenzenKasper B. GraversenChris Mayo
Van de BuggerTse Kit YamSmartShare SystemsMorten Brørup
Alexey DenisovJustin DaileyoirfeodentA-R-C-A
Roberto RossiKenny LiuIain Clarkedesto
John FlatnessThorsten KaniBernhard M. WiedemannBaldur Karlsson
Martin KleusbergJannickZufu LiuSimon Sobisch
Georger AraújoTobias KühneDimitar RadevLiang Bai
Gunter KönigsmannNicholai BenalalUnifaceRaghda Morsy
Giuseppe CorbelliAndreas RönnquistHenrik HankLuke Rasmussen
PhilippmaboroshinGokul KrishnanJohn Horigan
jj5Jad AltahanAndrea RicchiJuarez Rudsatz
Wil van AntwerpenHodong KimMichael ConradDejan Budimir
Andreas FalkenhahnMark ReayDavid ShumanMcLoo
Shmuel ZeigermanChris GrahamHugues LarrivePrakash Sahni
Michel Sauvarduhf7gnombatDerek Brown
Robert Di PardoriQQYX HaoBertrand Lacoste
Ivan UstûžaninRainer Kottenhofffeitoivsl7
Michael HeathAntonio CebriánDavid Yu YangArkadiusz Michalski
Red_McdbdevAndrey SmolyakovKnut Leimbert
German AizekTsuyoshi MiyakeMartin SchäferRainRat
Henrik S. JohansenEkopalypseHoTschirAhmet Sait
Franck ReinquinPeter C. JonesStefan Löffler
\n

Releases

\n

\n Release 5.5.0\n

\n \n

\n Release 5.4.9\n

\n
    \n\t
  • \n\tReleased 29 April 2026.\n\t
    • \n\t
  • \n\tAssembler: Add SCE_ASM_STRINGBACKQUOTE for NASM `back-quoted strings`.\n\tIssue #220.\n\t
    • \n\t
  • \n\tC++: Fold for '#pragma region' and '#pragma endregion'.\n\tIssue #324.\n\t
    • \n\t
  • \n\tF#: Allow '!' for async keywords.\n\tIssue #352.\n\t
    • \n\t
  • \n\tF#: Stabilize styling of long strings.\n\tIssue #353.\n\t
    • \n\t
  • \n\tF#: Fold long strings with fold.fsharp.quotes.\n\tIssue #354.\n\t
    • \n\t
  • \n\tLaTeX: Fix bug when \"\\\" at end of file.\n\tIssue #355,\n\tPull request #356.\n\t
    • \n\t
  • \n\tPascal: New SCE_PAS_MULTILINESTRING for multi-line triple-quoted strings.\n\tIssue #321.\n\t
    • \n\t
  • \n\tRuby: Fix bug when \"?\\\" at end of file.\n\tIssue #355,\n\tPull request #357.\n\t
    • \n
\n

\n Release 5.4.8\n

\n
    \n\t
  • \n\tReleased 26 March 2026.\n\t
    • \n\t
  • \n\tBatch: Remove line length limitation and change to an object lexer.\n\tIssue #228.\n\t
    • \n\t
  • \n\tForth: Treat \\r\\n line ends the same as \\n. This makes testing easier.\n\tIssue #349.\n\t
    • \n\t
  • \n\tForth: Allow more Forth words to be symbols or begin with a symbol.\n\tRequire whitespace around line comment tokens,\n\tsimilar to the left-hand parenthesis of stream comments.\n\tIssue #351.\n\t
    • \n\t
  • \n\tJavaScript: in cpp lexer, add lexer.cpp.enable.preprocessor and lexer.cpp.allow.hashes properties.\n\tThis allows disabling preprocessor recognition (as JavaScript doesn't have a preprocessor) and\n\trecognizing private elements that start with a #.\n\tIssue #48.\n\t
    • \n\t
  • \n\tJSON: Fix escaped quote in SCE_JSON_URI.\n\tIssue #72.\n\t
    • \n
\n

\n Release 5.4.7\n

\n
    \n\t
  • \n\tReleased 25 February 2026.\n\t
    • \n\t
  • \n\tTest a single lexer or multiple directories by specifying as command line arguments to TestLexers.\n\tPull request #344.\n\t
    • \n\t
  • \n\tLexer added for escape sequences \"escseq\".\n\tPull request #336.\n\t
    • \n\t
  • \n\tErrorlist: Fix reset escape sequence to set style SCE_ERR_DEFAULT (0) instead of SCE_ERR_ES_BLACK.\n\tIssue #333.\n\t
    • \n\t
  • \n\tMakefile: Recognize comments in more situations.\n\tIssue #40.\n\t
    • \n\t
  • \n\tPerl: Handle 'method' the same as 'sub' for special cases.\n\tIssue #342,\n\tPull request #343.\n\t
    • \n\t
  • \n\tProgress: Add SCE_ABL_ANNOTATION and SCE_ABL_TYPEDANNOTATION styles.\n\tPull request #346.\n\t
    • \n
\n

\n Release 5.4.6\n

\n
    \n\t
  • \n\tReleased 10 November 2025.\n\t
    • \n\t
  • \n\tLexer added for SINEX \"sinex\".\n\tPull request #329.\n\t
    • \n\t
  • \n\tUpdate character categories to Unicode 16.\n\tFeature #1569.\n\t
    • \n\t
  • \n\tErrorlist: Allow \"bright\" ANSI sequences (ESC[90m - ESC[97m).\n\tPull request #332.\n\t
    • \n\t
  • \n\tProgress: Treat '.' as part of compound identifiers instead of as an operator between identifiers.\n\tPull request #316.\n\t
    • \n\t
  • \n\tPython: Support t-strings t\\\"var={var}\\\" added by Python 3.14.\n\tPull request #328.\n\t
    • \n
\n

\n Release 5.4.5\n

\n
    \n\t
  • \n\tReleased 8 June 2025.\n\t
    • \n\t
  • \n\tDart: Add error state SCE_DART_STRINGEOL for unterminated string.\n\tPull request #315.\n\t
    • \n\t
  • \n\tMakefile: Add a keyword list to makefile lexer to highlight GNU Make directives like 'ifdef' and 'vpath' as\n\tSCE_MAKE_PREPROCESSOR since these are similar to NMAKE directives like '!IFDEF'.\n\t
    • \n\t
  • \n\tNix: Add error state SCE_NIX_STRINGEOL for unterminated string.\n\tPull request #315.\n\t
    • \n\t
  • \n\tTOML: Add error state SCE_TOML_STRINGEOL for unterminated string.\n\tPull request #315.\n\t
    • \n\t
  • \n\tZig: Add error state SCE_ZIG_STRINGEOL for unterminated string.\n\tPull request #315.\n\t
    • \n
\n

\n Release 5.4.4\n

\n
    \n\t
  • \n\tReleased 2 April 2025.\n\t
    • \n\t
  • \n\tFix building for ARM64.\n\tPull request #308.\n\t
    • \n
\n

\n Release 5.4.3\n

\n
    \n\t
  • \n\tReleased 25 February 2025.\n\t
    • \n\t
  • \n\tC++: Fix evaluation of != in preprocessor condition.\n\tIssue #299.\n\t
    • \n\t
  • \n\tModula-3: Allow digits in uppercase identifiers.\n\tIssue #297.\n\t
    • \n\t
  • \n\tPascal: Fix asm style extending past end.\n\tIssue #295.\n\t
    • \n\t
  • \n\tPython: Fix detection of attributes and decorators.\n\tIssue #294,\n\tPull request #302.\n\t
    • \n\t
  • \n\tRuby: Implement substyles for identifiers SCE_RB_IDENTIFIER.\n\t
    • \n\t
  • \n\tRuby: Recognize name as SCE_RB_DEFNAME in def when `::` used as well as `.`.\n\tIssue #300.\n\t
    • \n
\n

\n Release 5.4.2\n

\n
    \n\t
  • \n\tReleased 18 December 2024.\n\t
    • \n\t
  • \n\tUpdate to Unicode 15.1.\n\tIssue #285.\n\t
    • \n\t
  • \n\tLexer added for Nix \"nix\".\n\tPull request #282.\n\t
    • \n\t
  • \n\tJavaScript: Use correct SCE_HJA_TEMPLATELITERAL style for server-side template literals in\n\tHTML instead of client-side style.\n\tIssue #286.\n\t
    • \n\t
  • \n\tJavaScript: Use correct SCE_HJ_SYMBOLS style for '.' after regex instead of SCE_HJ_WORD.\n\tPrevent empty word assertion when non-word character after regex flag.\n\tIssue #289.\n\t
    • \n\t
  • \n\tPHP: Fix unstable lexing with substyled keyword and unterminated string.\n\tIssue #288.\n\t
    • \n\t
  • \n\tRust: Add C string and raw C string literal styles SCE_RUST_CSTRING and SCE_RUST_CSTRINGR.\n\tPull request #292,\n\tIssue #268.\n\t
    • \n\t
  • \n\tTOML: Don't treat keys without values as errors.\n\tPull request #283.\n\t
    • \n\t
  • \n\tZig: Add SCE_ZIG_IDENTIFIER_STRING for identifiers expressed as strings.\n\tPull request #287.\n\t
    • \n
\n

\n Release 5.4.1\n

\n
    \n\t
  • \n\tReleased 19 October 2024.\n\t
    • \n\t
  • \n\tLexer added for Dart \"dart\".\n\tPull request #265,\n\tPull request #275.\n\t
    • \n\t
  • \n\tLexer added for troff / nroff \"troff\".\n\tPull request #264.\n\t
    • \n\t
  • \n\tLexer added for Zig \"zig\".\n\tPull request #267.\n\t
    • \n\t
  • \n\tC++: Fix crash for empty documentation comment keyword where '<' occurs at line end.\n\t
    • \n\t
  • \n\tF#: Include EOLs in the style range of SCE_FSHARP_COMMENTLINE.\n\tStabilizes EOL detection when folding line comment groups.\n\tIssue #276.\n\t
    • \n\t
  • \n\tF#: Fix per-line folding in F# documents.\n\tIssue #277.\n\t
    • \n\t
  • \n\tHTML: Improve SGML/DTD lexing.\n\tDon't terminate SGML when > inside quoted string.\n\tLex both [ and ] as SCE_H_SGML_DEFAULT.\n\tNested sections handled instead of switching to SCE_H_SGML_ERROR.\n\tIssue #272.\n\t
    • \n\t
  • \n\tJavaScript: New SCE_HJ_TEMPLATELITERAL and SCE_HJA_TEMPLATELITERAL\n\tstyles for template literals when lexer is hypertext, or xml.\n\tIssue #280.\n\t
    • \n\t
  • \n\tPHP: Fix failure to recognize PHP start \"<?php' at end of document.\n\tCaused by not capping retrieval range at document end causing no text to be retrieved.\n\tIssue #269.\n\t
    • \n\t
  • \n\tSmalltalk: Fix scaled decimal numbers without decimal separator.\n\tPull request #274.\n\t
    • \n
\n

\n Release 5.4.0\n

\n
    \n\t
  • \n\tReleased 21 August 2024.\n\t
    • \n\t
  • \n\tInside Lexilla, LexerModule instances are now const.\n\tThis will require changes to applications that modify Lexilla.cxx, which\n\tmay be done to add custom lexers.\n\t
    • \n\t
  • \n\tLexer added for TOML \"toml\".\n\t
    • \n\t
  • \n\tBash: Handle backslash in heredoc delimiter.\n\tIssue #257.\n\t
    • \n\t
  • \n\tProgress: Fix lexing of nested comments.\n\tPull request #258.\n\t
    • \n\t
  • \n\tForce lower-casing of case-insensitive keyword lists so keywords match in some lexers.\n\tIssue #259.\n\t
    • \n
\n

\n Release 5.3.3\n

\n
    \n\t
  • \n\tReleased 22 July 2024.\n\t
    • \n\t
  • \n\tASP: Control whether ASP is enabled for XML and HTML with\n\tlexer.xml.allow.asp and lexer.html.allow.asp.\n\tIssue #252.\n\t
    • \n\t
  • \n\tJavaScript: Recognize regular expressions at start or after '>' in JavaScript when lexer is cpp,\n\thypertext, or xml.\n\tIssue #250,\n\tBug #918.\n\t
    • \n\t
  • \n\tJavaScript: Recognize initial #! 'shebang' line as a comment in standalone files.\n\tIssue #253.\n\t
    • \n\t
  • \n\tLua: Fix non-ASCII identifiers joined with '.' or ':'.\n\tIssue #242.\n\t
    • \n\t
  • \n\tLua: Fix folding for multi-line SCE_LUA_LITERALSTRING and SCE_LUA_COMMENT\n\twhen performed incrementally.\n\tIssue #247.\n\t
    • \n\t
  • \n\tPHP: Control whether PHP is enabled for XML and HTML with\n\tlexer.xml.allow.php and lexer.html.allow.php.\n\tIssue #252.\n\t
    • \n
\n

\n Release 5.3.2\n

\n
    \n\t
  • \n\tReleased 23 April 2024.\n\t
    • \n\t
  • \n\tCOBOL: Stop string literal continuing over line end.\n\tIssue #229.\n\t
    • \n\t
  • \n\tCOBOL: Stop doc comment assigning different styles to \\r and \\n at line end.\n\tIssue #229.\n\t
    • \n\t
  • \n\tCOBOL: Recognize keywords that start with 'V'.\n\tIssue #230.\n\t
    • \n\t
  • \n\tCOBOL: Recognize comments after tag or that start with '/'.\n\tIssue #231.\n\t
    • \n\t
  • \n\tHTML: Implement substyles for tags, attributes, and identifiers\n\tSCE_H_TAG, SCE_H_ATTRIBUTE, SCE_HJ_WORD, SCE_HJA_WORD, SCE_HB_WORD, SCE_HP_WORD, SCE_HPHP_WORD.\n\t
    • \n\t
  • \n\tHTML: Implement context-sensitive attributes. \"tag.attribute\" matches \"attribute\" only inside \"tag\".\n\t
    • \n\t
  • \n\tHTML: Match standard handling of comments.\n\tIssue #232.\n\t
    • \n\t
  • \n\tLua: Implement substyles for identifiers SCE_LUA_IDENTIFIER.\n\t
    • \n\t
  • \n\tRuby: Allow non-ASCII here-doc delimiters.\n\tIssue #234.\n\t
    • \n\t
  • \n\tRuby: Allow modifier if, unless, while and until after heredoc delimiter.\n\tIssue #236.\n\t
    • \n\t
  • \n\tRust: Recognize raw identifiers.\n\tIssue #239,\n\tPull request #240.\n\t
    • \n
\n

\n Release 5.3.1\n

\n
    \n\t
  • \n\tReleased 5 March 2024.\n\t
    • \n\t
  • \n\tAssembler: After comments, treat \\r\\n line ends the same as \\n. This makes testing easier.\n\t
    • \n\t
  • \n\tBash: Fix folding when line changed to/from comment and previous line is comment.\n\tIssue #224.\n\t
    • \n\t
  • \n\tBatch: Fix handling ':' next to keywords.\n\tIssue #222.\n\t
    • \n\t
  • \n\tJavaScript: in cpp lexer, add lexer.cpp.backquoted.strings=2 mode to treat ` back-quoted\n\tstrings as template literals which allow embedded ${expressions}.\n\tIssue #94.\n\t
    • \n\t
  • \n\tPython: fix lexing of rb'' and rf'' strings.\n\tIssue #223,\n\tPull request #227.\n\t
    • \n\t
  • \n\tRuby: fix lexing of methods on numeric literals like '3.times' so the '.' and method name do not appear in numeric style.\n\tIssue #225.\n\t
    • \n
\n

\n Release 5.3.0\n

\n
    \n\t
  • \n\tReleased 27 December 2023.\n\t
    • \n\t
  • \n\tFix calling AddStaticLexerModule by defining as C++ instead of C which matches header.\n\tBug #2421.\n\t
    • \n\t
  • \n\tBash: Fix shift operator << incorrectly recognized as here-doc.\n\tIssue #215.\n\t
    • \n\t
  • \n\tBash: Fix termination of '${' with first unquoted '}' instead of nesting.\n\tIssue #216.\n\t
    • \n\t
  • \n\tHTML: JavaScript double-quoted strings may escape line end with '\\'.\n\tIssue #214.\n\t
    • \n\t
  • \n\tLua: recognize --- doc comments.\n\tDefined by LDoc.\n\tDoes not recognize --[[-- doc comments which seem less common.\n\t
    • \n
\n

\n Release 5.2.9\n

\n
    \n\t
  • \n\tReleased 18 November 2023.\n\t
    • \n\t
  • \n\tXcode build settings changed to avoid problems with Xcode 15.0.\n\t
    • \n
\n

\n Release 5.2.8\n

\n
    \n\t
  • \n\tReleased 5 November 2023.\n\t
    • \n\t
  • \n\tPython: Update f-string handling to match PEP 701 and Python 3.12.\n\tControlled with property lexer.python.strings.f.pep.701.\n\tIssue #150,\n\tPull request #209.\n\t
    • \n\t
  • \n\tR: Fix escape sequence highlighting with change of for loop to while loop.\n\tIssue #206,\n\tPull request #207.\n\t
    • \n\t
  • \n\tMinimum supported macOS release increased to 10.13.\n\t
    • \n
\n

\n Release 5.2.7\n

\n
    \n\t
  • \n\tReleased 22 September 2023.\n\t
    • \n\t
  • \n\tFix building on Windows with non-English environment.\n\tPull request #200.\n\t
    • \n\t
  • \n\tBash: fix line continuation for comments and when multiple backslashes at line end.\n\tIssue #195.\n\t
    • \n\t
  • \n\tBash: treat += as operator and, inside arithmetic expressions, treat ++ and -- as operators.\n\tIssue #197.\n\t
    • \n\t
  • \n\tBash: improve backslash handling inside backquoted command substitution and fix $ at end of backtick expression.\n\tIssue #194.\n\t
    • \n\t
  • \n\tBash: treat words that are similar to numbers but invalid wholly as identifiers.\n\tIssue #199.\n\t
    • \n\t
  • \n\tBash: consistently handle '-' options at line start and after '|' as identifiers.\n\tIssue #202.\n\t
    • \n\t
  • \n\tBash: handle '-' options differently in [ single ] and [[ double ]] bracket constructs.\n\tIssue #203.\n\t
    • \n\t
  • \n\tF#: improve speed of folding long lines.\n\tIssue #198.\n\t
    • \n\t
  • \n\tHTML: fix invalid entity at line end and terminate invalid entity before invalid character.\n\tIssue #192.\n\t
    • \n
\n

\n Release 5.2.6\n

\n
    \n\t
  • \n\tReleased 26 July 2023.\n\t
    • \n\t
  • \n\tInclude empty word list names in value returned by DescribeWordListSets and SCI_DESCRIBEKEYWORDSETS.\n\tIssue #175,\n\tPull request #176.\n\t
    • \n\t
  • \n\tBash: style here-doc end delimiters as SCE_SH_HERE_DELIM instead of SCE_SH_HERE_Q.\n\tIssue #177.\n\t
    • \n\t
  • \n\tBash: allow '$' as last character in string.\n\tIssue #180,\n\tPull request #181.\n\t
    • \n\t
  • \n\tBash: fix state after expansion. Highlight all numeric and file test operators.\n\tDon't highlight dash in long option as operator.\n\tIssue #182,\n\tPull request #183.\n\t
    • \n\t
  • \n\tBash: strict checking of special parameters ($*, $@, $$, ...) with property lexer.bash.special.parameter to specify\n\tvalid parameters.\n\tIssue #184,\n\tPull request #186.\n\t
    • \n\t
  • \n\tBash: recognize keyword before redirection operators (< and >).\n\tIssue #188,\n\tPull request #189.\n\t
    • \n\t
  • \n\tErrorlist: recognize Bash diagnostic messages.\n\t
    • \n\t
  • \n\tHTML: allow ASP block to terminate inside line comment.\n\tIssue #185.\n\t
    • \n\t
  • \n\tHTML: fix folding with JSP/ASP.NET <%-- comment.\n\tIssue #191.\n\t
    • \n\t
  • \n\tHTML: fix incremental styling of multi-line ASP.NET directive.\n\tIssue #191.\n\t
    • \n\t
  • \n\tMatlab: improve arguments blocks.\n\tAdd support for multiple arguments blocks.\n\tPrevent \"arguments\" from being keyword in function declaration line.\n\tFix semicolon handling.\n\tPull request #179.\n\t
    • \n\t
  • \n\tVisual Prolog: add support for embedded syntax with SCE_VISUALPROLOG_EMBEDDED\n\tand SCE_VISUALPROLOG_PLACEHOLDER.
    \n\tStyling of string literals changed with no differentiation between literals with quotes and those\n\tthat are prefixed with \"@\".\n\tQuote characters are in a separate style (SCE_VISUALPROLOG_STRING_QUOTE)\n\tto contents (SCE_VISUALPROLOG_STRING).
    \n\tSCE_VISUALPROLOG_CHARACTER, SCE_VISUALPROLOG_CHARACTER_TOO_MANY,\n\tSCE_VISUALPROLOG_CHARACTER_ESCAPE_ERROR, SCE_VISUALPROLOG_STRING_EOL_OPEN,\n\tand SCE_VISUALPROLOG_STRING_VERBATIM_SPECIAL were removed (replaced with\n\tSCE_VISUALPROLOG_UNUSED[1-5]).\n\tPull request #178.\n\t
    • \n
\n

\n Release 5.2.5\n

\n
    \n\t
  • \n\tReleased 31 May 2023.\n\t
    • \n\t
  • \n\tAdd CharacterSetArray constructor without setBase initial argument for common case\n\twhere this is setNone and the initialSet argument completely defines the characters.\n\tThis shortens and clarifies use of CharacterSetArray.\n\t
    • \n\t
  • \n\tBash: implement highlighting inside quoted elements and here-docs.\n\tControlled with properties lexer.bash.styling.inside.string, lexer.bash.styling.inside.backticks,\n\tlexer.bash.styling.inside.parameter, and lexer.bash.styling.inside.heredoc.\n\tIssue #154,\n\tIssue #153,\n\tFeature #1033.\n\t
    • \n\t
  • \n\tBash: add property lexer.bash.command.substitution to choose how to style command substitutions.\n\t0 → SCE_SH_BACKTICKS;\n\t1 → surrounding \"$(\" and \")\" as operators and contents styled as bash code;\n\t2 → use distinct styles (base style + 64) for contents.\n\tChoice (2) is a provisional feature and details may change before it is finalized.\n\tIssue #153.\n\t
    • \n\t
  • \n\tBash: fix nesting of parameters (SCE_SH_PARAM) like ${var/$sub/\"${rep}}\"}.\n\tIssue #154.\n\t
    • \n\t
  • \n\tBash: fix single character special parameters like $? by limiting style.\n\tIssue #154.\n\t
    • \n\t
  • \n\tBash: treat \"$$\" as special parameter and end scalars before \"$\".\n\tIssue #154.\n\t
    • \n\t
  • \n\tBash: treat \"<<\" in arithmetic contexts as left bitwise shift operator instead of here-doc.\n\tIssue #137.\n\t
    • \n\t
  • \n\tBatch: style SCE_BAT_AFTER_LABEL used for rest of line after label which is not executed.\n\tIssue #148.\n\t
    • \n\t
  • \n\tF#: Lex interpolated verbatim strings as verbatim.\n\tIssue #156.\n\t
    • \n\t
  • \n\tVB: allow multiline strings when lexer.vb.strings.multiline set.\n\tIssue #151.\n\t
    • \n
\n

\n Release 5.2.4\n

\n
    \n\t
  • \n\tReleased 13 March 2023.\n\t
    • \n\t
  • \n\tC++: Fix failure to recognize keywords containing upper case.\n\tIssue #149.\n\t
    • \n\t
  • \n\tGDScript: Support % and $ node paths.\n\tIssue #145,\n\tPull request #146.\n\t
    • \n
\n

\n Release 5.2.3\n

\n
    \n\t
  • \n\tReleased 8 March 2023.\n\t
    • \n\t
  • \n\tAdd scripts/PromoteNew.bat script to promote .new files after checking.\n\t
    • \n\t
  • \n\tMakefile: Remove 1024-byte line length limit..\n\t
    • \n\t
  • \n\tRuby: Add new lexical classes for % literals SCE_RB_STRING_W (%w non-interpolable string array),\n\tSCE_RB_STRING_I (%i non-interpolable symbol array),\n\tSCE_RB_STRING_QI (%I interpolable symbol array),\n\tand SCE_RB_STRING_QS (%s symbol).\n\tIssue #124.\n\t
    • \n\t
  • \n\tRuby: Disambiguate %= which may be a quote or modulo assignment.\n\tIssue #124,\n\tBug #1255,\n\tBug #2182.\n\t
    • \n\t
  • \n\tRuby: Fix additional fold level for single character in SCE_RB_STRING_QW.\n\tIssue #132.\n\t
    • \n\t
  • \n\tRuby: Set SCE_RB_HERE_QQ for unquoted and double-quoted heredocs and\n\tSCE_RB_HERE_QX for backticks-quoted heredocs.\n\tIssue #134.\n\t
    • \n\t
  • \n\tRuby: Recognise #{} inside SCE_RB_HERE_QQ and SCE_RB_HERE_QX.\n\tIssue #134.\n\t
    • \n\t
  • \n\tRuby: Improve regex and heredoc recognition.\n\tIssue #136.\n\t
    • \n\t
  • \n\tRuby: Highlight #@, #@@ and #$ style interpolation.\n\tIssue #140.\n\t
    • \n\t
  • \n\tRuby: Fix folding for multiple heredocs started on one line.\n\tFix folding when there is a space after heredoc opening delimiter.\n\tIssue #135.\n\t
    • \n\t
  • \n\tYAML: Remove 1024-byte line length limit.\n\t
    • \n
\n

\n Release 5.2.2\n

\n
    \n\t
  • \n\tReleased 8 February 2023.\n\t
    • \n\t
  • \n\tC++: Fix keywords that start with non-ASCII. Also affects other lexers.\n\tIssue #130.\n\t
    • \n\t
  • \n\tMatlab: Include more prefix and suffix characters in numeric literals.\n\tIssue #120.\n\t
    • \n\t
  • \n\tMatlab: More accurate treatment of line ends inside strings. Matlab and Octave are different here.\n\tIssue #18.\n\t
    • \n\t
  • \n\tModula-3: Don't treat identifier suffix that matches keyword as keyword.\n\tIssue #129.\n\t
    • \n\t
  • \n\tModula-3: Fix endless loop in folder.\n\tIssue #128.\n\t
    • \n\t
  • \n\tModula-3: Fix access to lines beyond document end in folder.\n\tIssue #131.\n\t
    • \n\t
  • \n\tPython: Don't highlight match and case as keywords in contexts where they probably aren't used as keywords.\n\tPull request #122.\n\t
    • \n\t
  • \n\tX12: Support empty envelopes.\n\tBug #2369.\n\t
    • \n
\n

\n Release 5.2.1\n

\n
    \n\t
  • \n\tReleased 6 December 2022.\n\t
    • \n\t
  • \n\tUpdate to Unicode 14.\n\tFeature #1461.\n\t
    • \n\t
  • \n\tChange default compilation optimization option to favour speed over space.\n\t-O2 for MSVC and -O3 for gcc and clang.\n\t
    • \n\t
  • \n\tBatch: Fix comments starting inside strings.\n\tIssue #115.\n\t
    • \n\t
  • \n\tF#: Lex signed numeric literals more accurately.\n\tIssue #110,\n\tIssue #111.\n\t
    • \n\t
  • \n\tF#: Add specifiers for 64-bit integer and floating point literals.\n\tIssue #112.\n\t
    • \n\t
  • \n\tMarkdown: Stop styling numbers at line start in PRECHAR style.\n\tIssue #117.\n\t
    • \n\t
  • \n\tPowerShell: Recognise numeric literals more accurately.\n\tIssue #118.\n\t
    • \n
\n

\n Release 5.2.0\n

\n
    \n\t
  • \n\tReleased 12 October 2022.\n\t
    • \n\t
  • \n\tPowerShell: End comment before \\r carriage return so \\r and \\n in same\n\tSCE_POWERSHELL_DEFAULT style.\n\tPull request #99.\n\t
    • \n\t
  • \n\tPowerShell: Fix character truncation bug that lead to 'ġ' styled as an operator since its low 8 bits\n\tare equal to '!'.\n\t
    • \n\t
  • \n\tR: Support hexadecimal, float exponent and number suffix.\n\tIssue #101.\n\t
    • \n\t
  • \n\tR: Highlight backticks.\n\tPull request #102.\n\t
    • \n\t
  • \n\tR: Highlight raw strings.\n\tIssue #100.\n\t
    • \n\t
  • \n\tR: Optionally highlight escape sequences in strings.\n\tIssue #100.\n\t
    • \n\t
  • \n\tFix early truncation from LexAccessor::GetRange and LexAccessor::GetRangeLowered.\n\tIssue #17.\n\t
    • \n
\n

\n Release 5.1.9\n

\n
    \n\t
  • \n\tReleased 27 August 2022.\n\t
    • \n\t
  • \n\tJulia: Parse unicode forall and exists as identifiers #42314.\n\tPull request #98.\n\t
    • \n\t
  • \n\tJulia: Parse apostrophe as char and not adjoint after exclamation.\n\tIssue #97,\n\tPull request #98.\n\t
    • \n\t
  • \n\tProperties: Don't set header flag for empty section.\n\tIssue #96.\n\t
    • \n
\n

\n Release 5.1.8\n

\n
    \n\t
  • \n\tReleased 10 July 2022.\n\t
    • \n\t
  • \n\tF#: Recognize nested comments in F#.\n\tIssue #93.\n\t
    • \n\t
  • \n\tMS SQL: Recognize nested comments in Transact-SQL.\n\tIssue #87.\n\t
    • \n\t
  • \n\tMS SQL: Preference data types more consistently to not depend on how lexing is broken\n\tup into segments. This is needed because there are keywords that are both data type\n\tnames and function names such as 'CHAR'.\n\tIssue #90.\n\t
    • \n\t
  • \n\tPowerShell: Fix single quoted strings to not treat backtick as escape.\n\tPull request #92.\n\t
    • \n\t
  • \n\tVisual Prolog: Treat \\r\\n line ends the same as \\n. This makes testing easier.\n\tAdd test case.\n\tIssue #83.\n\t
    • \n\t
  • \n\tVisual Prolog: Allow disabling verbatim strings.\n\tPull request #89.\n\t
    • \n\t
  • \n\tVisual Prolog: Support backquoted strings.\n\tPull request #89.\n\t
    • \n
\n

\n Release 5.1.7\n

\n
    \n\t
  • \n\tReleased 22 May 2022.\n\t
    • \n\t
  • \n\tAdd LexAccessor::StyleIndexAt to retrieve style values as unsigned to handle styles > 127 better.\n\tIssue #61.\n\t
    • \n\t
  • \n\tAssociate more than one file extension with a setting for testing.\n\tIssue #81.\n\t
    • \n\t
  • \n\tCMake: Fix folding of \"ElseIf\".\n\tIssue #77,\n\tPull request #78,\n\tBug #2213.\n\t
    • \n\t
  • \n\tHTML: Fix folding of JavaScript doc comments.\n\tBug #2219.\n\t
    • \n\t
  • \n\tMatlab: add \"classdef\" and \"spmd\" to folding keywords.\n\tPull request #70.\n\t
    • \n\t
  • \n\tMatlab: handle \"arguments\" contextual keyword.\n\tPull request #70.\n\t
    • \n\t
  • \n\tMatlab: improve support of class definition syntax.\n\tPull request #75.\n\t
    • \n\t
  • \n\tRaku: fix escape detection.\n\tPull request #76.\n\t
    • \n\t
  • \n\tRuby: fix character sequence \"?\\\\#\" to not include '#' in SCE_RB_NUMBER as only second '\\' is quoted.\n\tIssue #69.\n\t
    • \n\t
  • \n\tRuby: improve styling of ternary expressions as commonly used.\n\tIssue #69.\n\t
    • \n\t
  • \n\tVHDL: support folding for VHDL 08 else-generate and case-generate.\n\tPull request #80.\n\t
    • \n
\n

\n Release 5.1.6\n

\n
    \n\t
  • \n\tReleased 31 March 2022.\n\t
    • \n\t
  • \n\tImplement conditional statements \"if\" and \"match\", comparison function \"$(=\", and \"FileNameExt\"\n\tproperty in TestLexers to allow varying lexer properties over different files.\n\tIssue #62.\n\t
    • \n\t
  • \n\tAdd LexAccessor::BufferStyleAt to retrieve style values to simplify logic and\n\timprove performance.\n\tIssue #54.\n\t
    • \n\t
  • \n\tMarkdown: Optionally style all of Markdown header lines.\n\tEnabled with lexer.markdown.header.eolfill=1.\n\tIssue #60.\n\t
    • \n\t
  • \n\tRuby: Fix operator method styling so next word not treated as method name.\n\tIssue #65.\n\t
    • \n\t
  • \n\tRuby: Fix folding for Ruby 3 endless method definition.\n\tIssue #65.\n\t
    • \n\t
  • \n\tRuby: Fold string array SCE_RB_STRING_QW.\n\tIssue #65.\n\t
    • \n\t
  • \n\tRuby: Fix final \\n in indented heredoc to be SCE_RB_HERE_Q.\n\tIssue #66.\n\t
    • \n\t
  • \n\tRuby: Fix heredoc recognition when '.' and ',' used in method calls and after SCE_RB_GLOBAL.\n\tClassify word after heredoc delimiter instead of styling as keyword.\n\tIssue #67.\n\t
    • \n\t
  • \n\tRuby: Improve method highlighting so method name is styled as SCE_RB_DEFNAME and class/object\n\tis styled appropriately.\n\tIssue #68.\n\t
    • \n
\n

\n Release 5.1.5\n

\n
    \n\t
  • \n\tReleased 9 February 2022.\n\t
    • \n\t
  • \n\tBash: Treat \\r\\n line ends the same as \\n. This makes testing easier.\n\tIssue #57.\n\t
    • \n\t
  • \n\tBatch: Recognise \"::\" comments when second command on line.\n\tBug #2304.\n\t
    • \n\t
  • \n\tF#: Recognise format specifiers in interpolated strings and %B for binary.\n\tIssue #46.\n\t
    • \n\t
  • \n\tF#: More accurate line-based folding.\n\tIssue #56.\n\t
    • \n\t
  • \n\tHTML: Fix folding inside script blocks.\n\tIssue #47,\n\tIssue #53.\n\t
    • \n\t
  • \n\tInno Setup: Fix multiline comments in code.\n\tIssue #44.\n\t
    • \n\t
  • \n\tPython: Add attribute style with properties lexer.python.identifier.attributes and\n\tlexer.python.decorator.attributes.\n\tPull request #49.\n\t
    • \n\t
  • \n\tAllow choice of object file directory with makefile by setting DIR_O.\n\tIssue #50.\n\t
    • \n
\n

\n Release 5.1.4\n

\n
    \n\t
  • \n\tReleased 7 December 2021.\n\t
    • \n\t
  • \n\tAdd AsciiDoc lexer.\n\tPull request #39.\n\t
    • \n\t
  • \n\tAdd GDScript lexer.\n\tSome behaviour and lexical states may change before this lexer is stable.\n\tPull request #41.\n\t
    • \n\t
  • \n\tFix strings ending in escaped '\\' in F#.\n\tIssue #38.\n\t
    • \n\t
  • \n\tBetter handling of bad terminators and folding for X12.\n\tFeature #1420.\n\t
    • \n
\n

\n Release 5.1.3\n

\n
    \n\t
  • \n\tReleased 8 November 2021.\n\t
    • \n\t
  • \n\tFix parsing of 128-bit integer literals in Rust.\n\tIssue #33.\n\t
    • \n\t
  • \n\tFix different styles between \\r and \\n at end of line comments for Rust.\n\tIssue #34.\n\t
    • \n\t
  • \n\tFor Rust, don't go past end when file ends with unterminated block comment.\n\tIssue #35.\n\t
    • \n
\n

\n Release 5.1.2\n

\n
    \n\t
  • \n\tReleased 23 September 2021.\n\t
    • \n\t
  • \n\tImplement conditional group rules in CSS.\n\tIssue #25,\n\tPull request #28.\n\t
    • \n\t
  • \n\tAllow F# triple-quoted strings to interpolate string literals.\n\tIssue #21.\n\t
    • \n\t
  • \n\tHighlight F# printf specifiers in type-checked interpolated strings.\n\tIssue #24.\n\t
    • \n\t
  • \n\tFix styling for Inno Setup scripts handling unterminated strings,\n\tmessage sections, and avoid terminating comments between CR and LF.\n\tPull request #29.\n\tFeature #1415.\n\t
    • \n\t
  • \n\tFix Markdown hang when document ends with \"`\", \"*\", \"_\", or similar.\n\tIssue #23.\n\t
    • \n\t
  • \n\tTreat '.' as an operator instead of part of a word for PHP.\n\tIssue #22.\n\tBug #2225.\n\t
    • \n\t
  • \n\tCheck PHP numeric literals, showing invalid values with default style instead of numeric.\n\tIssue #20.\n\t
    • \n\t
  • \n\tFor PHP, recognize start of comment after numeric literal.\n\tIssue #20.\n\tBug #2143.\n\t
    • \n\t
  • \n\tFor PHP, recognize PHP code within JavaScript strings.\n\tPull request #27.\n\t
    • \n
\n

\n Release 5.1.1\n

\n
    \n\t
  • \n\tReleased 26 July 2021.\n\t
    • \n\t
  • \n\tOn 32-bit Win32 using Visual C++ projects, stop exported functions ending with @n causing failures with GetProcAddress.\n\t
    • \n\t
  • \n\tFixed crash when calling TagsOfStyle on C++ lexer after allocating substyles.\n\t
    • \n\t
  • \n\tFixed folding for Julia which could be inconsistent depending on range folded.\n\tAdded SCE_JULIA_KEYWORD4 and SCE_JULIA_TYPEOPERATOR lexical styles and\n\tchanged keyword set 4 from \"Raw string literals\" to \"Built in functions\".\n\tProperty lexer.julia.string.interpolation removed.\n\tUpdated set of characters for identifiers.\n\tPull request #13.\n\t
    • \n\t
  • \n\tFixed Markdown emphasis spans to only be recognized when closed in same paragraph.\n\tBug #1216.\n\t
    • \n\t
  • \n\tFixed Markdown code block to terminate when end marker is indented.\n\tDisplay all of end marker in code block style.\n\tOnly recognize inline code when closed in same paragraph.\n\tBug #2247.\n\t
    • \n\t
  • \n\tFixed Matlab to not allow escape sequences in double-quoted strings.\n\tIssue #18.\n\t
    • \n\t
  • \n\tSupport flexible heredoc and nowdoc syntax for PHP.\n\tIssue #19.\n\t
    • \n\t
  • \n\tEnabled '_' digit separator in numbers for PHP.\n\tIssue #19.\n\t
    • \n\t
  • \n\tStop styling attributes as comments for PHP.\n\tIssue #19.\n\t
    • \n
\n

\n Release 5.1.0\n

\n
    \n\t
  • \n\tReleased 23 June 2021.\n\t
    • \n\t
  • \n\tThis is a stable release. The Lexilla protocol should remain compatible through 5.x releases.\n\t
    • \n\t
  • \n\tFixed bugs with styling Erlang by handling \\n and \\r\\n line endings consistently.\n\t
    • \n\t
  • \n\tFixed folding for F# open statements and for strings that contain comment prefixes.\n\t
    • \n\t
  • \n\tFormat specifiers lexed in F# strings.\n\t
    • \n\t
  • \n\tFixed folding for ASP files where scripts were treated inconsistently when '<%' was included\n\tor not included in range examined.\n\t
    • \n\t
  • \n\tFixed folding of Raku heredocs that start with \"q:to\" or \"qq:to\".\n\t
    • \n\t
  • \n\tFixed folding at end of Ruby files where these is no final new line.\n\t
    • \n\t
  • \n\tMade folding of Tcl files more consistent by always treating completely empty lines as whitespace.\n\t
    • \n\t
  • \n\tFixed styling of \"a:b\" with no spaces in YAML as a single piece of text instead of a key-value pair.\n\tPull request #15.\n\t
    • \n
\n

\n Release 5.0.3\n

\n
    \n\t
  • \n\tReleased 2 June 2021.\n\t
    • \n\t
  • \n\tAdd namespace feature with GetNameSpace function.\n\t
    • \n\t
  • \n\tAdd Julia lexer.\n\tFeature #1380.\n\t
    • \n\t
  • \n\tFix transition to comment for --> inside JavaScript string.\n\tBug #2207.\n\t
    • \n\t
  • \n\tFix variable expansion in Batch.\n\tIssue #4.\n\t
    • \n\t
  • \n\tFix empty link titles in Markdown.\n\tBug #2235.\n\tAlso fix detection of whether the previous line had content which treated '\\n' and '\\r\\n' line endings differently.\n\t
    • \n\t
  • \n\tRemove nested comment and long string support as these were removed from Lua.\n\tBug #2205.\n\t
    • \n\t
  • \n\tUpdate to Unicode 13.\n\tFeature #1379.\n\t
    • \n\t
  • \n\tAddStaticLexerModule function adds a static lexer to Lexilla's list.\n\t
    • \n\t
  • \n\tOn Win32 enable hardware-enforced stack protection.\n\tFeature #1405.\n\t
    • \n\t
  • \n\tOn 32-bit Win32 using g++, stop exported functions ending with @n causing failures with GetProcAddress.\n\tIssue #10.\n\t
    • \n
\n

\n Release 5.0.2\n

\n
    \n\t
  • \n\tReleased 23 April 2021.\n\t
    • \n\t
  • \n\tFix assertion in cpp lexer handling of preprocessor.\n\tEmpty preprocessor statement '#' caused preprocessor history to be stored on incorrect line number.\n\tDangling #else or #elif without corresponding #if led to inconsistent state.\n\tChange treatment of empty preprocessor statement to set subsequent line end characters in\n\tpreprocessor style as this is more consistent with other preprocessor directives and avoids\n\tdifferences between \\n and \\r\\n line ends.\n\tBug #2245.\n\t
    • \n
\n

\n Release 5.0.1\n

\n
    \n\t
  • \n\tReleased 9 April 2021.\n\t
    • \n\t
  • \n\tAdd LexerNameFromID function to Lexilla protocol as optional and temporary to\n\thelp applications migrate to Lexilla.\n\tIt is marked deprecated and will be removed in a future release.\n\t
    • \n\t
  • \n\tThe cpp lexer supports XML styled comment doc keywords.\n\tPull request #2.\n\t
    • \n\t
  • \n\tThe errorlist lexer detects NMAKE fatal errors and Microsoft linker errors as SCE_ERR_MS.\n\t
    • \n
\n

\n Release 5.0.0\n

\n
    \n\t
  • \n\tReleased 5 March 2021.\n\t
    • \n\t
  • \n\tFirst version that separates Lexilla from Scintilla.\n\tEach of the 3 projects now has a separate history page but history before 5.0.0 remains combined.\n\t
    • \n\t
  • \n\tLexer added for F#.\n\t
    • \n
\n

\n Lexilla became a separate project at this point.\n

\n

\n Release 4.4.6\n

\n
    \n\t
  • \n\tReleased 1 December 2020.\n\t
    • \n\t
  • \n\tFix building with Xcode 12.\n\tBug #2187.\n\t
    • \n
\n

\n Release 4.4.5\n

\n
    \n\t
  • \n\tReleased 11 September 2020.\n\t
    • \n\t
  • \n\tLexilla interface supports setting initialisation properties on lexer libraries with\n\tSetLibraryProperty and GetLibraryPropertyNames functions.\n\tThese are called by SciTE which will forward properties to lexer libraries that are prefixed with\n\t\"lexilla.context.\".\n\t
    • \n\t
  • \n\tAllow cross-building for GTK by choosing pkg-config.\n\tBug #2189.\n\t
    • \n\t
  • \n\tOn GTK, allow setting CPPFLAGS (and LDFLAGS for SciTE) to support hardening.\n\tBug #2191.\n\t
    • \n\t
  • \n\tChanged SciTE's indent.auto mode to set tab size to indent size when file uses tabs for indentation.\n\tBug #2198.\n\t
    • \n\t
  • \n\tFix position of marker symbols for SC_MARGIN_RTEXT which were being moved based on\n\twidth of text.\n\t
    • \n\t
  • \n\tFixed bug on Win32 where cursor was flickering between hand and text over an\n\tindicator with hover style.\n\tBug #2170.\n\t
    • \n\t
  • \n\tFixed bug where hovered indicator was not returning to non-hover\n\tappearance when mouse moved out of window or into margin.\n\tBug #2193.\n\t
    • \n\t
  • \n\tFixed bug where a hovered INDIC_TEXTFORE indicator was not applying the hover\n\tcolour to the whole range.\n\tBug #2199.\n\t
    • \n\t
  • \n\tFixed bug where gradient indicators were not showing hovered appearance.\n\t
    • \n\t
  • \n\tFixed bug where layout caching was ineffective.\n\tBug #2197.\n\t
    • \n\t
  • \n\tFor SciTE, don't show the output pane for quiet jobs.\n\tFeature #1365.\n\t
    • \n\t
  • \n\tSupport command.quiet for SciTE on GTK.\n\tFeature #1365.\n\t
    • \n\t
  • \n\tFixed a bug in SciTE with stack balance when a syntax error in the Lua startup script\n\tcaused continuing failures to find functions after the syntax error was corrected.\n\tBug #2176.\n\t
    • \n\t
  • \n\tAdded method for iterating through multiple vertical edges: SCI_GETMULTIEDGECOLUMN.\n\tFeature #1350.\n\t
    • \n
\n

\n Release 4.4.4\n

\n
    \n\t
  • \n\tReleased 21 July 2020.\n\t
    • \n\t
  • \n\tEnd of line annotations implemented.\n\tBug #2141.\n\t
    • \n\t
  • \n\tAdd SCI_BRACEMATCHNEXT API.\n\tFeature #1368.\n\t
    • \n\t
  • \n\tThe latex lexer supports lstlisting environment that is similar to verbatim.\n\tFeature #1358.\n\t
    • \n\t
  • \n\tFor SciTE on Linux, place liblexilla.so and libscintilla.so in /usr/lib/scite.\n\tBug #2184.\n\t
    • \n\t
  • \n\tRound SCI_TEXTWIDTH instead of truncating as this may be more accurate when sizing application\n\telements to match text.\n\tFeature #1355.\n\t
    • \n\t
  • \n\tDisplay DEL control character as visible \"DEL\" block like other control characters.\n\tFeature #1369.\n\t
    • \n\t
  • \n\tAllow caret width to be up to 20 pixels.\n\tFeature #1361.\n\t
    • \n\t
  • \n\tSciTE on Windows adds create.hidden.console option to stop console window flashing\n\twhen Lua script calls os.execute or io.popen.\n\t
    • \n\t
  • \n\tFix translucent rectangle drawing on Qt. When drawing a translucent selection, there were edge\n\tartifacts as the calls used were drawing outlines over fill areas. Make bottom and right borders on\n\tINDIC_ROUNDBOX be same intensity as top and left.\n\tReplaced some deprecated Qt calls with currently supported calls.\n\t
    • \n\t
  • \n\tFix printing on Windows to use correct text size.\n\tBug #2185.\n\t
    • \n\t
  • \n\tFix bug on Win32 where calling WM_GETTEXT for more text than in document could return\n\tless text than in document.\n\t
    • \n\t
  • \n\tFixed a bug in SciTE with Lua stack balance causing failure to find\n\tfunctions after reloading script.\n\tBug #2176.\n\t
    • \n
\n

\n Release 4.4.3\n

\n
    \n\t
  • \n\tReleased 3 June 2020.\n\t
    • \n\t
  • \n\tFix syntax highlighting for SciTE on Windows by setting executable directory for loading Lexilla.\n\tBug #2181.\n\t
    • \n
\n

\n Release 4.4.2\n

\n
    \n\t
  • \n\tReleased 2 June 2020.\n\t
    • \n\t
  • \n\tOn Cocoa using Xcode changed Lexilla.dylib install path to @rpath as would otherwise try /usr/lib which\n\twon't work for sandboxed applications.\n\t
    • \n\t
  • \n\tOn Cocoa using Xcode made work on old versions of macOS by specifying deployment target as 10.8\n\tinstead of 10.15.\n\t
    • \n\t
  • \n\tOn Win32 fix static linking of Lexilla by specifying calling convention in Lexilla.h.\n\t
    • \n\t
  • \n\tSciTE now uses default shared library extension even when directory contains '.'.\n\t
    • \n
\n

\n Release 4.4.0\n

\n
    \n\t
  • \n\tReleased 1 June 2020.\n\t
    • \n\t
  • \n\tAdded Xcode project files for Lexilla and Scintilla with no lexers (cocoa/Scintilla).\n\t
    • \n\t
  • \n\tFor GTK, build a shared library with no lexers libscintilla.so or libscintilla.dll.\n\t
    • \n\t
  • \n\tLexilla used as a shared library for most builds of SciTE except for the single file executable on Win32.\n\tOn GTK, Scintilla shared library used.\n\tLexillaLibrary code can be copied out of SciTE for other applications that want to interface to Lexilla.\n\t
    • \n\t
  • \n\tConstants in Scintilla.h can be disabled with SCI_DISABLE_AUTOGENERATED.\n\t
    • \n\t
  • \n\tImplement per-monitor DPI Awareness on Win32 so both Scintilla and SciTE\n\twill adapt to the display scale when moved between monitors.\n\tApplications should forward WM_DPICHANGED to Scintilla.\n\tBug #2171,\n\tBug #2063.\n\t
    • \n\t
  • \n\tOptimized performance when opening huge files.\n\tFeature #1347.\n\t
    • \n\t
  • \n\tAdd Appearance and Contrast properties to SciTE that allow customising visuals for dark mode and\n\thigh contrast modes.\n\t
    • \n\t
  • \n\tFixed bug in Batch lexer where a single character line with a single character line end continued\n\tstate onto the next line.\n\t
    • \n\t
  • \n\tAdded SCE_ERR_GCC_EXCERPT style for GCC 9 diagnostics in errorlist lexer.\n\t
    • \n\t
  • \n\tFixed buffer over-read bug with absolute references in MMIXAL lexer.\n\tBug #2019.\n\t
    • \n\t
  • \n\tFixed bug with GTK on recent Linux distributions where underscores were invisible.\n\tBug #2173.\n\t
    • \n\t
  • \n\tFixed GTK on Linux bug when pasting from closed application.\n\tBug #2175.\n\t
    • \n\t
  • \n\tFixed bug in SciTE with Lua stack balance.\n\tBug #2176.\n\t
    • \n\t
  • \n\tFor macOS, SciTE reverts to running python (2) due to python3 not being available in the sandbox.\n\t
    • \n
\n

\n Release 4.3.3\n

\n
    \n\t
  • \n\tReleased 27 April 2020.\n\t
    • \n\t
  • \n\tAdded Visual Studio project files for Lexilla and Scintilla with no lexers.\n\t
    • \n\t
  • \n\tAdd methods for iterating through the marker handles and marker numbers on a line:\n\tSCI_MARKERHANDLEFROMLINE and SCI_MARKERNUMBERFROMLINE.\n\tFeature #1344.\n\t
    • \n\t
  • \n\tAssembler lexers asm and as can change comment character with lexer.as.comment.character property.\n\tFeature #1314.\n\t
    • \n\t
  • \n\tFix brace styling in Batch lexer so that brace matching works.\n\tBug #1624,\n\tBug #1906,\n\tBug #1997,\n\tBug #2065.\n\t
    • \n\t
  • \n\tChange Perl lexer to style all line ends of comment lines in comment line style.\n\tPreviously, the last character was in default style which made the characters in\n\t\\r\\n line ends have mismatching styles.\n\tBug #2164.\n\t
    • \n\t
  • \n\tWhen a lexer has been set with SCI_SETILEXER, fix SCI_GETLEXER and avoid\n\tsending SCN_STYLENEEDED notifications.\n\t
    • \n\t
  • \n\tOn Win32 fix handling Japanese IME input when both GCS_COMPSTR and\n\tGCS_RESULTSTR set.\n\t
    • \n\t
  • \n\tWith Qt on Win32 add support for line copy format on clipboard, compatible with Visual Studio.\n\tBug #2167.\n\t
    • \n\t
  • \n\tOn Qt with default encoding (ISO 8859-1) fix bug where 'µ' (Micro Sign) case-insensitively matches '?'\n\tBug #2168.\n\t
    • \n\t
  • \n\tOn GTK with Wayland fix display of windowed IME.\n\tBug #2149.\n\t
    • \n\t
  • \n\tFor Python programs, SciTE defaults to running python3 on Unix and pyw on Windows which will run\n\tthe most recently installed Python in many cases.\n\tSet the \"python.command\" property to override this.\n\tScripts distributed with Scintilla and SciTE are checked with Python 3 and may not work with Python 2.\n\t
    • \n
\n

\n Release 4.3.2\n

\n
    \n\t
  • \n\tReleased 6 March 2020.\n\t
    • \n\t
  • \n\tOn Win32 fix new bug that treated all dropped text as rectangular.\n\t
    • \n
\n

\n Release 4.3.1\n

\n
    \n\t
  • \n\tReleased 4 March 2020.\n\t
    • \n\t
  • \n\tAdd default argument for StyleContext::GetRelative.\n\tFeature #1336.\n\t
    • \n\t
  • \n\tFix drag and drop between different encodings on Win32 by always providing CF_UNICODETEXT only.\n\tBug #2151.\n\t
    • \n\t
  • \n\tAutomatically scroll while dragging text.\n\tFeature #497.\n\t
    • \n\t
  • \n\tOn Win32, the numeric keypad with Alt pressed can be used to enter characters by number.\n\tThis can produce unexpected results in non-numlock mode when function keys are assigned.\n\tPotentially problematic keys like Alt+KeypadUp are now ignored.\n\tBug #2152.\n\t
    • \n\t
  • \n\tCrash fixed with Direct2D on Win32 when updating driver.\n\tBug #2138.\n\t
    • \n\t
  • \n\tFor SciTE on Win32, fix crashes when Lua script closes application.\n\tBug #2155.\n\t
    • \n
\n

\n Release 4.3.0\n

\n
    \n\t
  • \n\tReleased 16 January 2020.\n\t
    • \n\t
  • \n\tLexers made available as Lexilla library.\n\tTestLexers program with tests for Lexilla and lexers added in lexilla/test.\n\t
    • \n\t
  • \n\tSCI_SETILEXER implemented to use lexers from Lexilla or other sources.\n\t
    • \n\t
  • \n\tILexer5 interface defined provisionally to support use of Lexilla.\n\tThe details of this interface may change before being stabilised in Scintilla 5.0.\n\t
    • \n\t
  • \n\tSCI_LOADLEXERLIBRARY implemented on Cocoa.\n\t
    • \n\t
  • \n\tBuild Scintilla with SCI_EMPTYCATALOGUE to avoid making lexers available.\n\t
    • \n\t
  • \n\tLexer and folder added for Raku language.\n\tFeature #1328.\n\t
    • \n\t
  • \n\tDon't clear clipboard before copying text with Qt.\n\tBug #2147.\n\t
    • \n\t
  • \n\tOn Win32, remove support for CF_TEXT clipboard format as Windows will convert to\n\tCF_UNICODETEXT.\n\t
    • \n\t
  • \n\tImprove IME behaviour on GTK.\n\tSet candidate position for windowed IME.\n\tImprove location of candidate window.\n\tPrevent movement of candidate window while typing.\n\tBug #2135.\n\t
    • \n
\n

\n Release 4.2.3\n

\n
    \n\t
  • \n\tReleased 11 December 2019.\n\t
    • \n\t
  • \n\tFix failure in SciTE's Complete Symbol command.\n\t
    • \n
\n

\n Release 4.2.2\n

\n
    \n\t
  • \n\tReleased 7 December 2019.\n\t
    • \n\t
  • \n\tMove rather than grow selection when insertion at start.\n\tBug #2140.\n\t
    • \n\t
  • \n\tAllow target to have virtual space.\n\tAdd methods for finding the virtual space at start and end of multiple selections.\n\tFeature #1316.\n\t
    • \n\t
  • \n\tSciTE on Win32 adds mouse button \"Forward\" and \"Backward\" key definitions for use in\n\tproperties like user.shortcuts.\n\tFeature #1317.\n\t
    • \n\t
  • \n\tLexer and folder added for Hollywood language.\n\tFeature #1324.\n\t
    • \n\t
  • \n\tHTML lexer treats custom tags from HTML5 as known tags. These contain \"-\" like \"custom-tag\".\n\tFeature #1299.\n\t
    • \n\t
  • \n\tHTML lexer fixes bug with some non-alphabetic characters in unknown tags.\n\tFeature #1320.\n\t
    • \n\t
  • \n\tFix bug in properties file lexer where long lines were only styled for the first 1024 characters.\n\tBug #1933.\n\t
    • \n\t
  • \n\tRuby lexer recognizes squiggly heredocs.\n\tFeature #1326.\n\t
    • \n\t
  • \n\tAvoid unnecessary IME caret movement on Win32.\n\tFeature #1304.\n\t
    • \n\t
  • \n\tClear IME state when switching language on Win32.\n\tBug #2137.\n\t
    • \n\t
  • \n\tFixed drawing of translucent rounded rectangles on Win32 with Direct2D.\n\tBug #2144.\n\t
    • \n\t
  • \n\tSetting rectangular selection made faster.\n\tBug #2130.\n\t
    • \n\t
  • \n\tSciTE reassigns *.s extension to the GNU Assembler language from the S+ statistical language.\n\t
    • \n
\n

\n Release 4.2.1\n

\n
    \n\t
  • \n\tReleased 24 October 2019.\n\t
    • \n\t
  • \n\tAdd SCI_SETTABMINIMUMWIDTH to set the minimum width of tabs.\n\tThis allows minimaps or overviews to be laid out to match the full size editing view.\n\tBug #2118.\n\t
    • \n\t
  • \n\tSciTE enables use of SCI_ commands in user.context.menu.\n\t
    • \n \t
  • \n\tXML folder adds fold.xml.at.tag.open option to fold tags at the start of the tag \"<\" instead of the end \">\".\n\tBug #2128.\n\t
    • \n \t
  • \n\tMetapost lexer fixes crash with 'interface=none' comment.\n\tBug #2129.\n\t
    • \n \t
  • \n\tPerl lexer supports indented here-docs.\n\tBug #2121.\n\t
    • \n \t
  • \n\tPerl folder folds qw arrays.\n\tFeature #1306.\n\t
    • \n \t
  • \n\tTCL folder can turn off whitespace flag by setting fold.compact property to 0.\n\tBug #2131.\n\t
    • \n \t
  • \n\tOptimize setting up keyword lists in lexers.\n\tFeature #1305.\n\t
    • \n\t
  • \n\tUpdated case conversion and character categories to Unicode 12.1.\n\tFeature #1315.\n\t
    • \n \t
  • \n\tOn Win32, stop the IME candidate window moving unnecessarily and position it better.
    \n\tStop candidate window overlapping composition text and taskbar.
    \n\tPosition candidate window closer to composition text.
    \n\tStop candidate window moving while typing.
    \n\tAlign candidate window to target part of composition text.
    \n\tStop Google IME on Windows 7 moving while typing.
    \n\tBug #2120.\n\tFeature #1300.\n\t
    • \n
\n

\n Release 4.2.0\n

\n
    \n\t
  • \n\tReleased 5 July 2019.\n\t
    • \n \t
  • \n\tScintilla.iface adds line and pointer types, increases use of the position type, uses enumeration\n\ttypes in methods and properties, and adds enumeration aliases to produce better CamelCase\n\tidentifiers.\n\tFeature #1297.\n\t
    • \n \t
  • \n\tSource of input (direct / IME composition / IME result) reported in SCN_CHARADDED so applications\n\tcan treat temporary IME composition input differently.\n\tBug #2038.\n\t
    • \n \t
  • \n\tLexer added for DataFlex.\n\tFeature #1295.\n\t
    • \n \t
  • \n\tMatlab lexer now treats keywords as case-sensitive.\n\tBug #2112.\n\t
    • \n \t
  • \n\tSQL lexer fixes single quoted strings where '\" (quote, double quote) was seen as continuing the string.\n\tBug #2098.\n\t
    • \n \t
  • \n\tPlatform layers should use InsertCharacter method to perform keyboard and IME input, replacing\n\tAddCharUTF method.\n\tFeature #1293.\n\t
    • \n \t
  • \n\tAdd CARETSTYLE_BLOCK_AFTER option to always display block caret after selection.\n\tBug #1924.\n\t
    • \n \t
  • \n\tOn Win32, limit text returned from WM_GETTEXT to the length specified in wParam.\n\tThis could cause failures when using assistive technologies like NVDA.\n\tBug #2110,\n\tBug #2114.\n\t
    • \n \t
  • \n\tFix deletion of isolated invalid bytes.\n\tBug #2116.\n\t
    • \n \t
  • \n\tFix position of line caret when overstrike caret set to block.\n\tBug #2106.\n\t
    • \n
\n

\n Release 4.1.7\n

\n
    \n\t
  • \n\tReleased 13 June 2019.\n\t
    • \n\t
  • \n\tFixes an incorrect default setting in SciTE which caused multiple visual features to fail to display.\n\t
    • \n
\n

\n Release 4.1.6\n

\n
    \n\t
  • \n\tReleased 10 June 2019.\n\t
    • \n\t
  • \n\tFor Visual C++ 2019, /std:c++latest now includes some C++20 features so switch to /std:c++17.\n\t
    • \n\t
  • \n\tSciTE supports editing files larger than 2 gigabytes when built as a 64-bit application.\n\t
    • \n \t
  • \n\tLexer added for X12.\n\tFeature #1280.\n\t
    • \n \t
  • \n\tCMake folder folds function - endfunction.\n\tFeature #1289.\n\t
    • \n \t
  • \n\tVB lexer adds support for VB2017 binary literal &B and digit separators 123_456.\n\tFeature #1288.\n\t
    • \n\t
  • \n\tImproved performance of line folding code on large files when no folds are contracted.\n\tThis improves the time taken to open or close large files.\n\t
    • \n\t
  • \n\tFix bug where changing identifier sets in lexers preserved previous identifiers.\n\t
    • \n\t
  • \n\tFixed bug where changing to Unicode would rediscover line end positions even if still\n\tsticking to ASCII (not Unicode NEL, LS, PS) line ends.\n\tOnly noticeable on huge files with over 100,000 lines.\n\t
    • \n \t
  • \n\tChanged behaviour of SCI_STYLESETCASE(*,SC_CASE_CAMEL) so that it only treats 'a-zA-Z'\n\tas word characters because this covers the feature's intended use (viewing case-insensitive ASCII-only\n\tkeywords in a specified casing style) and simplifies the behaviour and code.\n\tFeature #1238.\n\t
    • \n \t
  • \n\tIn SciTE added Camel case option \"case:c\" for styles to show keywords with initial capital.\n\t
    • \n
\n

\n Release 4.1.5\n

\n
    \n\t
  • \n\tReleased 17 April 2019.\n\t
    • \n \t
  • \n\tOn Win32, removed special handling of non-0 wParam to WM_PAINT.\n\t
    • \n \t
  • \n\tImplement high-priority idle on Win32 to make redraw smoother and more efficient.\n\t
    • \n\t
  • \n\tAdd vertical bookmark symbol SC_MARK_VERTICALBOOKMARK.\n\tFeature #1276.\n\t
    • \n \t
  • \n\tSet default fold display text SCI_SETDEFAULTFOLDDISPLAYTEXT(text).\n\tFeature #1272.\n\t
    • \n \t
  • \n\tAdd SCI_SETCHARACTERCATEGORYOPTIMIZATION API to optimize speed\n\tof character category features like determining whether a character is a space or number\n\tat the expense of memory.\n\tFeature #1259.\n\t
    • \n \t
  • \n\tImprove the styling of numbers in Nim.\n\tFeature #1268.\n\t
    • \n \t
  • \n\tFix exception when inserting DBCS text.\n\tBug #2093.\n\t
    • \n\t
  • \n\tImprove performance of accessibility on GTK.\n\tBug #2094.\n\t
    • \n \t
  • \n\tFix text reported for deletion with accessibility on GTK.\n\tBug #2095.\n\t
    • \n \t
  • \n\tFix flicker when inserting primary selection on GTK.\n\tBug #2087.\n\t
    • \n \t
  • \n\tSupport coloured text in Windows 8.1+.\n\tFeature #1277.\n\t
    • \n \t
  • \n\tAvoid potential long hangs with idle styling for huge documents on Cocoa and GTK.\n\t
    • \n
\n

\n Release 4.1.4\n

\n
    \n\t
  • \n\tReleased 7 March 2019.\n\t
    • \n\t
  • \n\tCalltips implemented on Qt.\n\tBug #1548.\n\t
    • \n \t
  • \n\tBlock caret in overtype mode SCI_SETCARETSTYLE(caretStyle | CARETSTYLE_OVERSTRIKE_BLOCK).\n\tFeature #1217.\n\t
    • \n \t
  • \n\tSciTE supports changing caret style via caret.style property.\n\tFeature #1264.\n\t
    • \n \t
  • \n\tLexer added for .NET's Common Intermediate Language CIL.\n\tFeature #1265.\n\t
    • \n \t
  • \n\tThe C++ lexer, with styling.within.preprocessor on, now interprets \"(\" in preprocessor \"#if(\"\n\tas an operator instead of part of the directive. This improves folding as well which could become\n\tunbalanced.\n\t
    • \n \t
  • \n\tFix raw strings in Nim.\n\tFeature #1253.\n\t
    • \n \t
  • \n\tFix inconsistency with dot styling in Nim.\n\tFeature #1260.\n\t
    • \n \t
  • \n\tEnhance the styling of backticks in Nim.\n\tFeature #1261.\n\t
    • \n \t
  • \n\tEnhance raw string identifier styling in Nim.\n\tFeature #1262.\n\t
    • \n \t
  • \n\tFix fold behaviour with comments in Nim.\n\tFeature #1254.\n\t
    • \n \t
  • \n\tFix TCL lexer recognizing '\"' after \",\" inside a bracketed substitution.\n\tBug #1947.\n\t
    • \n \t
  • \n\tFix garbage text from SCI_MOVESELECTEDLINESUP and SCI_MOVESELECTEDLINESDOWN\n\tfor rectangular or thin selection by performing no action.\n\tBug #2078.\n\t
    • \n \t
  • \n\tEnsure container notified if Insert pressed when caret off-screen.\n\tBug #2083.\n\t
    • \n \t
  • \n\tFix memory leak when checking running instance on GTK.\n\tFeature #1267.\n\t
    • \n\t
  • \n\tPlatform layer font cache removed on Win32 as there is a platform-independent cache.\n\t
    • \n\t
  • \n\tSciTE for GTK easier to build on macOS.\n\tBug #2084.\n\t
    • \n
\n

\n Release 4.1.3\n

\n
    \n\t
  • \n\tReleased 10 January 2019.\n\t
    • \n\t
  • \n\tAdd SCI_SETCOMMANDEVENTS API to allow turning off command events as they\n\tcan be a significant performance cost.\n\t
    • \n\t
  • \n\tImprove efficiency of idle wrapping by wrapping in blocks as large as possible while\n\tstill remaining responsive.\n\t
    • \n\t
  • \n\tUpdated case conversion and character categories to Unicode 11.\n\t
    • \n\t
  • \n\tErrorlist lexer recognizes negative line numbers as some programs show whole-file\n\terrors occurring on line -1.\n\tSciTE's parsing of diagnostics also updated to handle this case.\n\t
    • \n \t
  • \n\tAdded \"nim\" lexer (SCLEX_NIM) for the Nim language which was previously called Nimrod.\n\tFor compatibility, the old \"nimrod\" lexer is still present but is deprecated and will be removed at the\n\tnext major version.\n\tFeature #1242.\n\t
    • \n \t
  • \n\tThe Bash lexer implements substyles for multiple sets of keywords and supports SCI_PROPERTYNAMES.\n\tBug #2054.\n\t
    • \n \t
  • \n\tThe C++ lexer interprets continued preprocessor lines correctly by reading all of\n\tthe logical line.\n\tBug #2062.\n\t
    • \n \t
  • \n\tThe C++ lexer interprets preprocessor arithmetic expressions containing multiplicative and additive\n\toperators correctly by following operator precedence rules.\n\tBug #2069.\n\t
    • \n \t
  • \n\tThe EDIFACT lexer handles message groups as well as messages.\n\tFeature #1247.\n\t
    • \n \t
  • \n\tFor SciTE's Find in Files, allow case-sensitivity and whole-word options when running\n\ta user defined command.\n\tBug #2053.\n\t
    • \n\t
  • \n\tNotify with SC_UPDATE_SELECTION when user performs a multiple selection add.\n\t
    • \n\t
  • \n\tOn macOS 10.14 Cocoa, fix incorrect horizontal offset.\n\tBug #2022.\n\t
    • \n\t
  • \n\tOn Cocoa, fix a crash that occurred when entering a dead key diacritic then a character\n\tthat can not take that diacritic, such as option+e (acute accent) followed by g.\n\tBug #2061.\n\t
    • \n\t
  • \n\tOn Cocoa, use dark info bar background when system is set to Dark Appearance.\n\tBug #2055.\n\t
    • \n\t
  • \n\tFixed a crash on Cocoa in bidirectional mode where some patterns of invalid UTF-8\n\tcaused failures to create Unicode strings.\n\t
    • \n\t
  • \n\tSCI_MARKERADD returns -1 for invalid lines as documented instead of 0.\n\tBug #2051.\n\t
    • \n\t
  • \n\tImprove performance of text insertion when Unicode line indexing off.\n\t
    • \n\t
  • \n\tFor Qt on Windows, stop specifying -std:c++latest as that is no longer needed\n\tto enable C++17 with MSVC 2017 and Qt 5.12 and it caused duplicate flag warnings.\n\t
    • \n\t
  • \n\tOn Linux, enable Lua to access dynamic libraries.\n\tBug #2058.\n\t
    • \n
\n

\n Release 4.1.2\n

\n
    \n\t
  • \n\tReleased 2 October 2018.\n\t
    • \n\t
  • \n\tC++ lexer fixes evaluation of \"#elif\".\n\tBug #2045.\n\t
    • \n\t
  • \n\tMarkdown lexer fixes highlighting of non-ASCII characters in links.\n\t
    • \n\t
  • \n\tSciTE on Win32 drops menukey feature, makes Del key work again in find and replace strips\n\tand disables F5 while command running.\n\tBug #2044.\n\t
    • \n
\n

\n Release 4.1.1\n

\n
    \n\t
  • \n\tReleased 9 September 2018.\n\t
    • \n\t
  • \n\tOptional indexing of line starts in UTF-8 documents by UTF-32 code points and UTF-16 code units added.\n\tThis can improve performance for clients that provide UTF-32 or UTF-16 interfaces or that need to interoperate\n\twith UTF-32 or UTF-16 components.\n\t
    • \n\t
  • \n\tLexers added for SAS and Stata.\n\tFeature #1185.\n\t
    • \n\t
  • \n\tShell folder folds \"if\", \"do\", and \"case\".\n\tFeature #1144.\n\t
    • \n\t
  • \n\tSciTE's menukey feature implemented on Windows.\n\t
    • \n\t
  • \n\tFor SciTE on Windows, user defined strip lists are now scrollable.\n\tCursor no longer flickers in edit and combo boxes.\n\tFocus in and out events occur for combo boxes.\n\t
    • \n\t
  • \n\tFix a leak in the bidirectional code on Win32.\n\t
    • \n\t
  • \n\tFix crash on Win32 when switching technology to default after setting bidirectional mode.\n\t
    • \n\t
  • \n\tFix margin cursor on Cocoa to point more accurately.\n\t
    • \n\t
  • \n\tFix SciTE crash on GTK+ when using director interface.\n\t
    • \n
\n

\n Release 4.1.0\n

\n
    \n\t
  • \n\tReleased 19 June 2018.\n\t
    • \n\t
  • \n\tExperimental and incomplete support added for bidirectional text on Windows using DirectWrite and Cocoa for\n\tUTF-8 documents by calling SCI_SETBIDIRECTIONAL(SC_BIDIRECTIONAL_L2R).\n\tThis allows documents that contain Arabic or Hebrew to be edited more easily in a way that is similar\n\tto other editors.\n\t
    • \n\t
  • \n\tINDIC_GRADIENT and INDIC_GRADIENTCENTRE indicator types added.\n\tINDIC_GRADIENT starts with a specified colour and alpha at top of line and fades\n\tto fully transparent at bottom.\n\tINDIC_GRADIENTCENTRE starts with a specified colour and alpha at centre of line and fades\n\tto fully transparent at top and bottom.\n\t
    • \n\t
  • \n\tWrap indent mode SC_WRAPINDENT_DEEPINDENT added which indents two tabs from previous line.\n\t
    • \n\t
  • \n\tIndicators are drawn for line end characters when displayed.\n\t
    • \n\t
  • \n\tMost invalid bytes in DBCS encodings are displayed as blobs to make problems clear\n\tand ensure something is shown.\n\t
    • \n\t
  • \n\tOn Cocoa, invalid text in DBCS encodings will be interpreted through the\n\tsingle-byte MacRoman encoding as that will accept any byte.\n\t
    • \n\t
  • \n\tDiff lexer adds styles for diffs containing patches.\n\t
    • \n\t
  • \n\tCrashes fixed on macOS for invalid DBCS characters when dragging text,\n\tchanging case of text, case-insensitive searching, and retrieving text as UTF-8.\n\t
    • \n\t
  • \n\tRegular expression crash fixed on macOS when linking to libstdc++.\n\t
    • \n\t
  • \n\tSciTE on GTK+, when running in single-instance mode, now forwards all command line arguments\n\tto the already running instance.\n\tThis allows \"SciTE filename -goto:line\" to work.\n\t
    • \n
\n

\n Release 4.0.5\n

\n
    \n\t
  • \n\tReleased 10 May 2018.\n\t
    • \n\t
  • \n\tAdd experimental SC_DOCUMENTOPTION_TEXT_LARGE option to accommodate documents larger than\n\t2 GigaBytes.\n\t
    • \n\t
  • \n\tAdditional print option SC_PRINT_SCREENCOLOURS prints with the same colours used on screen\n\tincluding line numbers.\n\t
    • \n\t
  • \n\tSciTE can read settings in EditorConfig format when enabled with editor.config.enable property.\n\t
    • \n\t
  • \n\tEDIFACT lexer adds property lexer.edifact.highlight.un.all to highlight all UN* segments.\n\tFeature #1166.\n\t
    • \n\t
  • \n\tFortran folder understands \"change team\" and \"endteam\".\n\tFeature #1216.\n\t
    • \n\t
  • \n\tSet the last X chosen when SCI_REPLACESEL called to ensure macros work\n\twhen text insertion followed by caret up or down.\n\t
    • \n\t
  • \n\tBugs fixed in regular expression searches in Scintilla where some matches did not occur in an\n\teffort to avoid infinite loops when replacing on empty matches like \"^\" and \"$\".\n\tApplications should always handle empty matches in a way that avoids infinite loops, commonly\n\tby incrementing the search position after replacing an empty match.\n\tSciTE fixes a bug where replacing \"^\" always matched on the first line even when it was an\n\t\"in selection\" replace and the selection started after the line start.\n\t
    • \n\t
  • \n\tBug fixed in SciTE where invalid numeric properties could crash.\n\t
    • \n\t
  • \n\tRuntime warnings fixed with SciTE on GTK after using Find in Files.\n\t
    • \n\t
  • \n\tSciTE on Windows find and replace strips place caret at end of text after search.\n\t
    • \n\t
  • \n\tBug fixed with SciTE on macOS where corner debris appeared in the margin when scrolling.\n\tFixed by not completely hiding the status bar so the curved corner is no longer part of the\n\tscrolling region.\n\tBy default, 4 pixels of the status bar remain visible and this can be changed with\n\tthe statusbar.minimum.height property or turned off if the debris are not a problem by\n\tsetting the property to 0.\n\t
    • \n
\n

\n Release 4.0.4\n

\n
    \n\t
  • \n\tReleased 10 April 2018.\n\t
    • \n\t
  • \n\tOn Win32, the standard makefiles build a libscintilla static library as well as the existing dynamic libraries.\n\tThe statically linked version of SciTE, Sc1, links to this static library. A new file, ScintillaDLL.cxx, provides\n\tthe DllMain function required for a stand-alone Scintilla DLL. Build and project files should include this\n\tfile when producing a DLL and omit it when producing a static library or linking Scintilla statically.\n\tThe STATIC_BUILD preprocessor symbol is no longer used.\n\t
    • \n\t
  • \n\tOn Win32, Direct2D support is no longer automatically detected during build.\n\tDISABLE_D2D may still be defined to remove Direct2D features.\n\t
    • \n\t
  • \n\tIn some cases, invalid UTF-8 is handled in a way that is a little friendlier.\n\tFor example, when copying to the clipboard on Windows, an invalid lead byte will be copied as the\n\tequivalent ISO 8859-1 character and will not hide the following byte.\n\tFeature #1211.\n\t
    • \n\t
  • \n\tLexer added for the Maxima computer algebra language.\n\tFeature #1210.\n\t
    • \n\t
  • \n\tFix hang in Lua lexer when lexing a label up to the terminating \"::\".\n\tBug #1999.\n\t
    • \n\t
  • \n\tLua lexer matches identifier chains with dots and colons.\n\tBug #1952.\n\t
    • \n\t
  • \n\tFor rectangular selections, pressing Home or End now moves the caret to the Home or End\n\tposition instead of the limit of the rectangular selection.\n\t
    • \n\t
  • \n\tFix move-extends-selection mode for rectangular and line selections.\n\t
    • \n\t
  • \n\tOn GTK+, change lifetime of selection widget to avoid runtime warnings.\n\t
    • \n\t
  • \n\tFix building on Mingw/MSYS to perform file copies and deletions.\n\tBug #1993.\n\t
    • \n\t
  • \n\tSciTE can match a wider variety of file patterns where '*' is in the middle of\n\tthe pattern and where there are multiple '*'.\n\tA '?' matches any single character.\n\t
    • \n\t
  • \n\tSciTE on Windows can execute Python scripts directly by name when on path.\n\tFeature #1209.\n\t
    • \n\t
  • \n\tSciTE on Windows Find in Files checks for cancel after every 10,000 lines read so\n\tcan be stopped on huge files.\n\t
    • \n\t
  • \n\tSciTE remembers entered values in lists in more cases for find, replace and find in files.\n\tBug #1715.\n\t
    • \n
\n

\n Release 4.0.3\n

\n
    \n\t
  • \n\tReleased 12 February 2018.\n\t
    • \n\t
  • \n\tFeatures from C++14 and C++17 are used more often, with build files now specifying\n\tc++17, gnu++17, c++1z, or std:c++latest (MSVC).\n\tRequires Microsoft Visual C++ 2017.5, GCC 7, Xcode 9.2 or Clang 4.0 or newer.\n\t
    • \n\t
  • \n\tSCI_CREATEDOCUMENT adds a bytes argument to allocate memory for an initial size.\n\tSCI_CREATELOADER and SCI_CREATEDOCUMENT add a documentOption argument to\n\tallow choosing different document capabilities.\n\t
    • \n\t
  • \n\tAdd SC_DOCUMENTOPTION_STYLES_NONE option to stop allocating memory for styles.\n\t
    • \n\t
  • \n\tAdd SCI_GETMOVEEXTENDSSELECTION to allow applications to add more\n\tcomplex selection commands.\n\t
    • \n\t
  • \n\tSciTE property bookmark.symbol allows choosing symbol used for bookmarks.\n\tFeature #1208.\n\t
    • \n\t
  • \n\tImprove VHDL lexer's handling of character literals and escape characters in strings.\n\t
    • \n\t
  • \n\tFix double tap word selection on Windows 10 1709 Fall Creators Update.\n\tBug #1983.\n\t
    • \n\t
  • \n\tFix closing autocompletion lists on Cocoa for macOS 10.13 where the window\n\twas emptying but staying visible.\n\tBug #1981.\n\t
    • \n\t
  • \n\tFix drawing failure on Cocoa with animated find indicator in large files with macOS 10.12\n\tby disabling animation.\n\t
    • \n\t
  • \n\tSciTE on GTK+ installs its desktop file as non-executable and supports the common\n\tLDLIBS make variable.\n\tBug #1989,\n\tBug #1990.\n\t
    • \n\t
  • \n\tSciTE shows correct column number when caret in virtual space.\n\tBug #1991.\n\t
    • \n\t
  • \n\tSciTE preserves selection positions when saving with strip.trailing.spaces\n\tand virtual space turned on.\n\tBug #1992.\n\t
    • \n
\n

\n Release 4.0.2\n

\n
    \n\t
  • \n\tReleased 26 October 2017.\n\t
    • \n\t
  • \n\tFix HTML lexer handling of Django so that nesting a {{ }} or {% %}\n\tDjango tag inside of a {# #} Django comment does not break highlighting of rest of file\n\t
    • \n\t
  • \n\tThe Matlab folder now treats \"while\" as a fold start.\n\tBug #1985.\n\t
    • \n\t
  • \n\tFix failure on Cocoa with animated find indicator in large files with macOS 10.13\n\tby disabling animation on 10.13.\n\t
    • \n\t
  • \n\tFix Cocoa hang when Scintilla loaded from SMB share on macOS 10.13.\n\tBug #1979.\n\t
    • \n
\n

\n Release 4.0.1\n

\n
    \n\t
  • \n\tReleased 23 October 2017.\n\t
    • \n\t
  • \n\tThe ILoader interface is defined in its own header ILoader.h as it is not\n\trelated to lexing so doesn't belong in ILexer.h.\n\t
    • \n\t
  • \n\tThe Scintilla namespace is always active for internal symbols and for the lexer interfaces\n\tILexer4 and IDocument.\n\t
    • \n\t
  • \n\tThe Baan lexer checks that matches to 3rd set of keywords are function calls and leaves as identifiers if not.\n\tBaan lexer and folder support #context_on / #context_off preprocessor feature.\n\t
    • \n\t
  • \n\tThe C++ lexer improved preprocessor conformance.
    \n\tDefault value of 0 for undefined preprocessor symbols.
    \n\t#define A is treated as #define A 1.
    \n\t\"defined A\" removes \"A\" before replacing \"defined\" with value.\n\tBug #1966.\n\t
    • \n\t
  • \n\tThe Python folder treats triple-quoted f-strings like triple-quoted strings.\n\tBug #1977.\n\t
    • \n\t
  • \n\tThe SQL lexer uses sql.backslash.escapes for double quoted strings.\n\tBug #1968.\n\t
    • \n\t
  • \n\tMinor undefined behaviour fixed.\n\tBug #1978.\n\t
    • \n\t
  • \n\tOn Cocoa, improve scrolling on macOS 10.12.\n\tBug #1885.\n\t
    • \n\t
  • \n\tOn Cocoa, fix line selection by clicking in the margin when scrolled.\n\tBug #1971.\n\t
    • \n
\n

\n Release 4.0.0\n

\n
    \n\t
  • \n\tReleased 16 August 2017.\n\t
    • \n\t
  • \n\tThis is an unstable release with changes to interfaces used for lexers and platform access.\n\tSome more changes may occur to internal and external interfaces before stability is regained with 4.1.0.\n\t
    • \n\t
  • \n\tUses C++14 features. Requires Microsoft Visual C++ 2017, GCC 7, and Clang 4.0 or newer.\n\t
    • \n\t
  • \n\tSupport dropped for GTK+ versions before 2.24.\n\t
    • \n\t
  • \n\tThe lexer interfaces ILexer and ILexerWithSubStyles, along with additional style metadata methods, were merged into ILexer4.\n\tMost lexers will need to be updated to match the new interfaces.\n\t
    • \n\t
  • \n\tThe IDocumentWithLineEnd interface was merged into IDocument.\n\t
    • \n\t
  • \n\tThe platform layer interface has changed with unused methods removed, a new mechanism for\n\treporting events, removal of methods that take individual keyboard modifiers, and removal of old timer methods.\n\t
    • \n\t
  • \n\tStyle metadata may be retrieved from lexers that support this through the SCI_GETNAMEDSTYLES, SCI_NAMEOFSTYLE,\n\tSCI_TAGSOFSTYLE, and SCI_DESCRIPTIONOFSTYLE APIs.\n\t
    • \n\t
  • \n\tThe Cocoa platform layer uses Automatic Reference Counting (ARC).\n\t
    • \n\t
  • \n\tThe default encoding in Scintilla is UTF-8.\n\t
    • \n\t
  • \n\tAn SCN_AUTOCSELECTIONCHANGE notification is sent when items are highlighted in an autocompletion or user list.\n\t
    • \n\t
  • \n\tThe data parameter to ILoader::AddData made const.\n\tBug #1955.\n\t
    • \n\t
  • \n\tSciTE's embedded Lua interpreter updated to Lua 5.3.\n\t
    • \n\t
  • \n\tSciTE allows event handlers to be arbitrary callables, not just functions.\n\tFeature #1190.\n\t
    • \n\t
  • \n\tSciTE allows user.shortcuts to be defined with symbolic Scintilla messages like\n\t'Ctrl+L|SCI_LINEDELETE|'.\n\t
    • \n\t
  • \n\tThe Matlab lexer treats 'end' as a number rather than a keyword when used as an index.\n\tThis also stops incorrect folding.\n\tBug #1951.\n\t
    • \n\t
  • \n\tThe Matlab folder implements \"fold\", \"fold.comment\", and \"fold.compact\" properties.\n\tBug #1965.\n\t
    • \n\t
  • \n\tThe Rust lexer recognizes 'usize' numeric literal suffixes.\n\tBug #1919.\n\t
    • \n\t
  • \n\tEnsure redraw when application changes overtype mode so caret change visible even when not blinking.\n\tNotify application with SC_UPDATE_SELECTION when overtype changed - previously\n\tsent SC_UPDATE_CONTENT.\n\t
    • \n\t
  • \n\tFix drawing failure when in wrap mode for delete to start/end of line which\n\taffects later lines but did not redraw them.\n\tAlso fixed drawing for wrap mode on GTK+ 2.x.\n\tBug #1949.\n\t
    • \n\t
  • \n\tOn GTK+ fix drawing problems including incorrect scrollbar redrawing and flickering of text.\n\tBug #1876.\n\t
    • \n\t
  • \n\tOn Linux, both for GTK+ and Qt, the default modifier key for rectangular selection is now Alt.\n\tThis is the same as Windows and macOS.\n\tThis was changed from Ctrl as window managers are less likely to intercept Alt+Drag for\n\tmoving windows than in the past.\n\t
    • \n\t
  • \n\tOn Cocoa, fix doCommandBySelector but avoid double effect of 'delete'\n\tkey.\n\tBug #1958.\n\t
    • \n\t
  • \n\tOn Qt, the updateUi signal includes the 'updated' flags.\n\tNo updateUi signal is sent for focus in events.\n\tThese changes make Qt behave more like the other platforms.\n\t
    • \n\t
  • \n\tOn Qt, dropping files on Scintilla now fires the SCN_URIDROPPED notification\n\tinstead of inserting text.\n\t
    • \n\t
  • \n\tOn Qt, focus changes send the focusChanged signal.\n\tBug #1957.\n\t
    • \n\t
  • \n\tOn Qt, mouse tracking is reenabled when the window is reshown.\n\tBug #1948.\n\t
    • \n\t
  • \n\tOn Windows, the DirectWrite modes SC_TECHNOLOGY_DIRECTWRITEDC and\n\tSC_TECHNOLOGY_DIRECTWRITERETAIN are no longer provisional.\n\t
    • \n\t
  • \n\tSciTE on macOS fixes a crash when platform-specific and platform-independent\n\tsession restoration clashed.\n\tBug #1960.\n\t
    • \n\t
  • \n\tSciTE on GTK+ implements find.close.on.find.\n\tBug #1152,\n\tBug #1254,\n\tBug #1762,\n\tFeature #849.\n\t
    • \n
\n

\n Release 3.7.6\n

\n
    \n\t
  • \n\tReleased 8 August 2017.\n\t
    • \n\t
  • \n\tThis is the first release of the\n\tlong term branch\n\twhich avoids using features from C++14 or later in order to support older systems.\n\t
    • \n\t
  • \n\tThe Baan lexer correctly highlights numbers when followed by an operator.\n\t
    • \n\t
  • \n\tOn Cocoa, fix a bug with retrieving encoded bytes.\n\t
    • \n
\n

\n Release 3.7.5\n

\n
    \n\t
  • \n\tReleased 26 May 2017.\n\t
    • \n\t
  • \n\tThis is the final release of SciTE 3.x.\n\t
    • \n\t
  • \n\tSupport dropped for Microsoft Visual C++ 2013 due to increased use of C++11 features.\n\t
    • \n\t
  • \n\tAdded a caret line frame as an alternative visual for highlighting the caret line.\n\t
    • \n\t
  • \n\tAdded \"Reverse Selected Lines\" feature.\n\t
    • \n\t
  • \n\tSciTE adds \"Select All Bookmarks\" command.\n\t
    • \n\t
  • \n\tSciTE adds a save.path.suggestion setting to suggest a file name when saving an\n\tunnamed buffer.\n\t
    • \n\t
  • \n\tUpdated case conversion and character categories to Unicode 9.\n\t
    • \n\t
  • \n\tThe Baan lexer recognizes numeric literals in a more compliant manner including\n\thexadecimal numbers and exponentials.\n\t
    • \n\t
  • \n\tThe Bash lexer recognizes strings in lists in more cases.\n\tBug #1944.\n\t
    • \n\t
  • \n\tThe Fortran lexer recognizes a preprocessor line after a line continuation &.\n\tBug #1935.\n\t
    • \n\t
  • \n\tThe Fortran folder can fold comments.\n\tBug #1936.\n\t
    • \n\t
  • \n\tThe PowerShell lexer recognizes escaped quotes in strings.\n\tBug #1929.\n\t
    • \n\t
  • \n\tThe Python lexer recognizes identifiers more accurately when they include non-ASCII characters.\n\t
    • \n\t
  • \n\tThe Python folder treats comments at the end of the file as separate from the preceding structure.\n\t
    • \n\t
  • \n\tThe YAML lexer recognizes comments in more situations and styles a\n\t\"...\" line like a \"---\" line.\n\tBug #1931.\n\t
    • \n\t
  • \n\tUpdate scroll bar when annotations added, removed, or visibility changed.\n\tFeature #1187.\n\t
    • \n\t
  • \n\tCanceling modes with the Esc key preserves a rectangular selection.\n\tBug #1940.\n\t
    • \n\t
  • \n\tBuilds are made with a sorted list of lexers to be more reproducible.\n\tBug #1946.\n\t
    • \n\t
  • \n\tOn Cocoa, a leak of mouse tracking areas was fixed.\n\t
    • \n\t
  • \n\tOn Cocoa, the autocompletion is 4 pixels wider to avoid text truncation.\n\t
    • \n\t
  • \n\tOn Windows, stop drawing a focus rectangle on the autocompletion list and\n\traise the default list length to 9 items.\n\t
    • \n\t
  • \n\tSciTE examines at most 1 MB of a file to automatically determine indentation\n\tfor indent.auto to avoid a lengthy pause when loading very large files.\n\t
    • \n\t
  • \n\tSciTE user interface uses lighter colours and fewer 3D elements to match current desktop environments.\n\t
    • \n\t
  • \n\tSciTE sets buffer dirty and shows message when file deleted if load.on.activate on.\n\t
    • \n\t
  • \n\tSciTE on Windows Find strip Find button works in incremental no-close mode.\n\tBug #1926.\n\t
    • \n
\n

\n Release 3.7.4\n

\n
    \n\t
  • \n\tReleased 21 March 2017.\n\t
    • \n\t
  • \n\tRequires a C++11 compiler. GCC 4.8 and MSVC 2015 are supported.\n\t
    • \n\t
  • \n\tSupport dropped for Windows NT 4.\n\t
    • \n\t
  • \n\tAccessibility support may be queried with SCI_GETACCESSIBILITY.\n\tOn GTK+, accessibility may be disabled by calling SCI_SETACCESSIBILITY.\n\t
    • \n\t
  • \n\tLexer added for \"indent\" language which is styled as plain text but folded by indentation level.\n\t
    • \n\t
  • \n\tThe Progress ABL lexer handles nested comments where comment starts or ends\n\tare adjacent like \"/*/*\" or \"*/*/\".\n\t
    • \n\t
  • \n\tIn the Python lexer, improve f-string support.\n\tAdd support for multiline expressions in triple quoted f-strings.\n\tHandle nested \"()\", \"[]\", and \"{}\" in f-string expressions and terminate expression colouring at \":\" or \"!\".\n\tEnd f-string if ending quote is seen in a \"{}\" expression.\n\tFix terminating single quoted f-string at EOL.\n\tBug #1918.\n\t
    • \n\t
  • \n\tThe VHDL folder folds an \"entity\" on the first line of the file.\n\t
    • \n\t
  • \n\tFor IMEs, do not clear selected text when there is no composition text to show.\n\t
    • \n\t
  • \n\tFix to crash with fold tags where line inserted at start.\n\t
    • \n\t
  • \n\tFix to stream selection mode when moving caret up or down.\n\tBug #1905.\n\t
    • \n\t
  • \n\tDrawing fixes for fold tags include fully drawing lines and not overlapping some\n\tdrawing and ensuring edges and mark underlines are visible.\n\t
    • \n\t
  • \n\tFix Cocoa failure to display accented character chooser for European\n\tlanguages by partially reverting a change made to prevent a crash with\n\tChinese input by special-casing the Cangjie input source.\n\tBug #1881.\n\t
    • \n\t
  • \n\tFix potential problems with IME on Cocoa when document contains invalid\n\tUTF-8.\n\t
    • \n\t
  • \n\tFix crash on Cocoa with OS X 10.9 due to accessibility API not available.\n\tBug #1915.\n\t
    • \n\t
  • \n\tImproved speed of accessibility code on GTK+ by using additional memory\n\tas a cache.\n\tBug #1910.\n\t
    • \n\t
  • \n\tFix crash in accessibility code on GTK+ < 3.3.6 caused by previous bug fix.\n\tBug #1907.\n\t
    • \n\t
  • \n\tFix to prevent double scrolling on GTK+ with X11.\n\tBug #1901.\n\t
    • \n\t
  • \n\tSciTE on GTK+ adds an \"accessibility\" property to allow disabling accessibility\n\ton GTK+ as an optimization.\n\t
    • \n\t
  • \n\tSciTE on GTK+ has changed file chooser behaviour for some actions:\n\toverwriting an existing file shows a warning;\n\tthe default session file name \"SciTE.session\" is shown and a \"*.session\" filter is applied;\n\tappropriate filters are applied when exporting;\n\tthe current file name is displayed in \"Save As\" even when that file no longer exists.\n\t
    • \n\t
  • \n\tSciTE fixed a bug where, on GTK+, when the output pane had focus, menu commands\n\tperformed by mouse were sent instead to the edit pane.\n\t
    • \n\t
  • \n\tSciTE on Windows 8+ further restricts the paths searched for DLLs to the application\n\tand system directories which may prevent some binary planting attacks.\n\t
    • \n\t
  • \n\tFix failure to load Direct2D on Windows when used on old versions of Windows.\n\tBug #1653.\n\t
    • \n
\n

\n Release 3.7.3\n

\n
    \n\t
  • \n\tReleased 19 February 2017.\n\t
    • \n\t
  • \n\tDisplay block caret over the character at the end of a selection to be similar\n\tto other editors.\n\t
    • \n\t
  • \n\tIn SciTE can choose colours for fold markers.\n\tFeature #1172.\n\t
    • \n\t
  • \n\tIn SciTE can hide buffer numbers in tabs.\n\tFeature #1173.\n\t
    • \n\t
  • \n\tThe Diff lexer recognizes deleted lines that start with \"--- \".\n\t
    • \n\t
  • \n\tThe Lua lexer requires the first line to start with \"#!\" to be treated as a shebang comment,\n\tnot just \"#\".\n\tBug #1900.\n\t
    • \n\t
  • \n\tThe Matlab lexer requires block comment start and end to be alone on a line.\n\tBug #1902.\n\t
    • \n\t
  • \n\tThe Python lexer supports f-strings with new styles, allows Unicode identifiers,\n\tand no longer allows @1 to be a decorator.\n\tBug #1848.\n\t
    • \n\t
  • \n\tFix folding inconsistency when fold header added above a folded part.\n\tAvoid unnecessary unfolding when a deletion does not include a line end.\n\tBug #1896.\n\t
    • \n\t
  • \n\tFix finalization crash on Cocoa.\n\tBug #1909.\n\t
    • \n\t
  • \n\tSciTE on GTK+ can have a wide divider between the panes with the\n\tsplit.wide property.\n\t
    • \n\t
  • \n\tFix display of autocompletion lists and calltips on GTK+ 3.22 on Wayland.\n\tNewer APIs used on GTK+ 3.22 as older APIs were deprecated.\n\t
    • \n\t
  • \n\tFix crash in accessibility code on GTK+ due to signal receipt after destruction.\n\tBug #1907.\n\t
    • \n\t
  • \n\tMake trackpad scrolling work on Wayland.\n\tBug #1901.\n\t
    • \n
\n

\n Release 3.7.2\n

\n
    \n\t
  • \n\tReleased 30 December 2016.\n\t
    • \n\t
  • \n\tMinimize redrawing for SCI_SETSELECTIONN* APIs.\n\tBug #1888.\n\t
    • \n\t
  • \n\tUse more precision to allow selecting individual lines in files with\n\tmore than 16.7 million lines.\n\t
    • \n\t
  • \n\tFor Qt 5, define QT_WS_MAC or QT_WS_X11 on those platforms.\n\tBug #1887.\n\t
    • \n\t
  • \n\tFor Cocoa, fix crash on view destruction with macOS 10.12.2.\n\tBug #1891.\n\t
    • \n\t
  • \n\tFix crash on GTK+ <3.8 due to incorrect lifetime of accessibility object.\n\tMore accurate reporting of attribute ranges and deletion lengths for accessibility.\n\t
    • \n\t
  • \n\tIn SciTE, if a Lua script causes a Scintilla failure exception, display error\n\tmessage in output pane instead of exiting.\n\tBug #1773.\n\t
    • \n
\n

\n Release 3.7.1\n

\n
    \n\t
  • \n\tReleased 4 December 2016.\n\t
    • \n\t
  • \n\tThe Scintilla namespace is no longer applied to struct definitions in Scintilla.h even\n\twhen SCI_NAMESPACE defined.\n\tClient code should not define SCI_NAMESPACE.\n\t
    • \n\t
  • \n\tStructure names in Scintilla.h without prefixes are deprecated and will now only\n\tbe usable with INCLUDE_DEPRECATED_FEATURES defined.
    \n\tUse the newer names with the \"Sci_\" prefix:
    \n\tCharacterRange → Sci_CharacterRange
    \n\tTextRange → Sci_TextRange
    \n\tTextToFind → Sci_TextToFind
    \n\tRangeToFormat → Sci_RangeToFormat
    \n\tNotifyHeader → Sci_NotifyHeader\n\t
    • \n\t
  • \n\tPreviously deprecated features SC_CP_DBCS, SCI_SETUSEPALETTE. and SCI_GETUSEPALETTE\n\thave been removed and can no longer be used in client code.\n\t
    • \n\t
  • \n\tSingle phase drawing SC_PHASES_ONE is deprecated along with the\n\tSCI_SETTWOPHASEDRAW and SCI_GETTWOPHASEDRAW messages.\n\t
    • \n\t
  • \n\tAccessibility support allowing screen readers to work added on GTK+ and Cocoa.\n\t
    • \n\t
  • \n\tTextual tags may be displayed to the right on folded lines with SCI_TOGGLEFOLDSHOWTEXT.\n\tThis is commonly something like \"{ ... }\" or \"<tr>...</tr>\".\n\tIt is displayed with the STYLE_FOLDDISPLAYTEXT style and may have a box drawn around it\n\twith SCI_FOLDDISPLAYTEXTSETSTYLE.\n\t
    • \n\t
  • \n\tA mouse right-click over the margin may send an SCN_MARGINRIGHTCLICK event.\n\tThis only occurs when popup menus are turned off.\n\tSCI_USEPOPUP now has three states: SC_POPUP_NEVER, SC_POPUP_ALL, or SC_POPUP_TEXT.\n\t
    • \n\t
  • \n\tINDIC_POINT and INDIC_POINTCHARACTER indicators added to display small arrows\n\tunderneath positions or characters.\n\t
    • \n\t
  • \n\tAdded alternate appearance for visible tabs which looks like a horizontal line.\n\tControlled with SCI_SETTABDRAWMODE.\n\tFeature #1165.\n\t
    • \n\t
  • \n\tOn Cocoa, a modulemap file is included to allow Scintilla to be treated as a module.\n\tThis makes it easier to use Scintilla from the Swift language.\n\t
    • \n\t
  • \n\tBaan folder accommodates sections and lexer fixes definition of SCE_BAAN_FUNCDEF.\n\t
    • \n\t
  • \n\tEDIFACT lexer and folder added.\n\tFeature #1166.\n\t
    • \n\t
  • \n\tJSON folder fixed where it didn't resume folding with the correct fold level.\n\t
    • \n\t
  • \n\tMatlab folder based on syntax instead of indentation so more accurate.\n\tBug #1692.\n\t
    • \n\t
  • \n\tYAML lexer fixed style of references and keywords when followed by a comment.\n\tBug #1872.\n\t
    • \n\t
  • \n\tMargin click to select line now clears rectangular and additional selections.\n\t
    • \n\t
  • \n\tFixed a NULL access bug on GTK+ where the scrollbars could be used during destruction.\n\tBug #1873.\n\t
    • \n\t
  • \n\tA potential bug on GTK+ fixed where asynchronous clipboard could be delivered after its\n\ttarget Scintilla instance was destroyed.\n\t
    • \n\t
  • \n\tCocoa IME made more compliant with documented behaviour to avoid bugs that caused\n\thuge allocations.\n\tBug #1881.\n\t
    • \n\t
  • \n\tOn Win32 fix EM_SETSEL to match Microsoft documentation..\n\tBug #1886.\n\t
    • \n\t
  • \n\tSciTE on GTK+ allows localizing tool bar tool tips.\n\tFeature #1167.\n\t
    • \n\t
  • \n\tSciTE on Windows restores focus to edit pane after closing user strip.\n\t
    • \n\t
  • \n\tSciTE measures files larger that 2 GB which allows it to refuse to open huge files more consistently\n\tand to show better warning messages.\n\t
    • \n
\n

\n Release 3.7.0\n

\n
    \n\t
  • \n\tReleased 16 October 2016.\n\t
    • \n\t
  • \n\tWord selection, navigation, and manipulation is now performed on characters instead of bytes\n\tleading to more natural behaviour for multi-byte encodings like UTF-8.\n\tFor UTF-8 characters 0x80 and above, classification into word; punctuation; space; or line-end\n\tis based on the Unicode general category of the character and is not customizable.\n\tBug #1832.\n\t
    • \n\t
  • \n\tTwo enums changed in Scintilla.iface which may lead to changed bindings.\n\tThere were 2 FontQuality enums and the first is now PhasesDraw.\n\tThe prefix for FoldAction was SC_FOLDACTION and is now SC_FOLDACTION_\n\twhich is similar to other enums.\n\tThese changes do not affect the standard C/C++ binding.\n\t
    • \n\t
  • \n\tEDGE_MULTILINE and SCI_MULTIEDGEADDLINE added to allow displaying multiple\n\tvertical edges simultaneously.\n\t
    • \n\t
  • \n\tThe number of margins can be changed with SCI_SETMARGINS.\n\t
    • \n\t
  • \n\tMargin type SC_MARGIN_COLOUR added so that the application may\n\tchoose any colour for a margin with SCI_SETMARGINBACKN.\n\t
    • \n\t
  • \n\tOn Win32, mouse wheel scrolling can be restricted to only occur when the mouse is\n\twithin the window.\n\t
    • \n\t
  • \n\tThe WordList class in lexlib used by lexers adds an InListAbridged method for\n\tmatching keywords that have particular prefixes and/or suffixes.\n\t
    • \n\t
  • \n\tThe Baan lexer was changed significantly with more lexical states, keyword sets,\n\tand support for abridged keywords.\n\t
    • \n\t
  • \n\tThe CoffeeScript lexer styles interpolated code in strings.\n\tBug #1865.\n\t
    • \n\t
  • \n\tThe Progress lexer \"progress\" has been replaced with a new lexer \"abl\"\n\t(Advanced Business Language)\n\twith a different set of lexical states and more functionality.\n\tThe lexical state prefix has changed from SCE_4GL_ to SCE_ABL_.\n\tFeature #1143.\n\t
    • \n\t
  • \n\tThe PowerShell lexer understands the grave accent escape character.\n\tBug #1868.\n\t
    • \n\t
  • \n\tThe YAML lexer recognizes inline comments.\n\tBug #1660.\n\t
    • \n\t
  • \n\tSciTE on Windows can retain coloured selection when inactive with\n\tselection.always.visible property.\n\t
    • \n\t
  • \n\tSciTE on Windows adds a state to close.on.find to close the find strip when\n\ta match is found.\n\t
    • \n\t
  • \n\tFix caret position after left or right movement with rectangular selection.\n\tBug #1861.\n\t
    • \n\t
  • \n\tIn SciTE, optional prefix argument added to scite.ConstantName method.\n\tBug #1860.\n\t
    • \n\t
  • \n\tOn Cocoa, include ILexer.h in the public headers of the framework.\n\tBug #1855.\n\t
    • \n\t
  • \n\tOn Cocoa, allow subclass of SCIContentView to set cursor.\n\tBug #1863.\n\t
    • \n\t
  • \n\tOn Cocoa, recognize the numeric keypad '+', '-', and '/' keys as\n\tSCK_ADD, SCK_SUBTRACT, and SCK_DIVIDE.\n\tBug #1867.\n\t
    • \n\t
  • \n\tOn GTK+ 3.21+ fix incorrect font size in auto-completion list.\n\tBug #1859.\n\t
    • \n\t
  • \n\tFix SciTE crash when command.mode ends with comma.\n\tBug #1857.\n\t
    • \n\t
  • \n\tSciTE on Windows has a full size toolbar icon for \"Close\".\n\t
    • \n
\n

\n Release 3.6.7\n

\n
    \n\t
  • \n\tReleased 4 September 2016.\n\t
    • \n\t
  • \n\tC++11 range-based for loops used in SciTE so GCC 4.6 is now the minimum supported version.\n\t
    • \n\t
  • \n\tSC_CHARSET_DEFAULT now means code page 1252 on Windows unless a code page is set.\n\tThis prevents unexpected behaviour and crashes on East Asian systems where default locales are commonly DBCS.\n\tProjects which want to default to DBCS code pages in East Asian locales should set the code page and\n\tcharacter set explicitly.\n\t
    • \n\t
  • \n\tSCVS_NOWRAPLINESTART option stops left arrow from wrapping to the previous line.\n\tMost commonly wanted when virtual space is used.\n\tBug #1648.\n\t
    • \n\t
  • \n\tThe C++ lexer can fold on #else and #elif with the fold.cpp.preprocessor.at.else property.\n\tBug #210.\n\t
    • \n\t
  • \n\tThe errorlist lexer detects warnings from Visual C++ which do not contain line numbers.\n\t
    • \n\t
  • \n\tThe HTML lexer no longer treats \"<?\" inside a string in a script as potentially starting an XML document.\n\tBug #767.\n\t
    • \n\t
  • \n\tThe HTML lexer fixes a problem resuming at a script start where the starting state continued\n\tpast where it should.\n\tBug #1849.\n\t
    • \n\t
  • \n\tWhen inserting spaces for virtual space and the position is in indentation and tabs are enabled\n\tfor indentation then use tabs.\n\tBug #1850.\n\t
    • \n\t
  • \n\tFix fold expand when some child text not styled.\n\tCaused by fixes for Bug #1799.\n\tBug #1842.\n\t
    • \n\t
  • \n\tFix key binding bug on Cocoa for control+.\n\tBug #1854.\n\t
    • \n\t
  • \n\tFix scroll bar size warnings on GTK+ caused by #1831.\n\tBug #1851.\n\t
    • \n\t
  • \n\tSmall fixes for GTK+ makefile.\n\tBug #1844.\n\tBug #1845.\n\tBug #1846.\n\t
    • \n\t
  • \n\tFix SciTE indentation after code like \"void function () {}\".\n\t
    • \n\t
  • \n\tFix SciTE global regex replace of \"^\" with something which missed the line after empty\n\tlines with LF line ends.\n\tBug #1839.\n\t
    • \n\t
  • \n\tFix SciTE on GTK+ 3.20 bug where toggle buttons on find and replace strips\n\tdid not show active state.\n\tBug #1853.\n\t
    • \n
\n

\n Release 3.6.6\n

\n
    \n\t
  • \n\tReleased 24 May 2016.\n\t
    • \n\t
  • \n\tC++ 11 <regex> support built by default. Can be disabled by defining NO_CXX11_REGEX.\n\t
    • \n\t
  • \n\tSciTE_USERHOME environment variable allows separate location for writeable properties files.\n\tFeature #965.\n\t
    • \n\t
  • \n\tGObject introspection supports notify and command events.\n\t
    • \n\t
  • \n\tThe Progress lexer now allows comments preceded by a tab.\n\t
    • \n\t
  • \n\tScripts reading Scintilla.iface file include comments for enu and lex definitions.\n\tBug #1829.\n\t
    • \n\t
  • \n\tFix crashes on GTK+ if idle work active when destroyed.\n\tBug #1827.\n\t
    • \n\t
  • \n\tFixed bugs when used on GTK+ 3.20.\n\tBug #1825.\n\tBug #1831.\n\t
    • \n\t
  • \n\tFix SciTE search field background with dark theme on GTK+ 2.x.\n\tBug #1826.\n\t
    • \n\t
  • \n\tFixed bug on Win32 that allowed resizing autocompletion from bottom when it was\n\tlocated above the caret.\n\t
    • \n\t
  • \n\tOn Win32, when using a screen reader and selecting text using Shift+Arrow,\n\tfix bug when scrolling made the caret stay at the same screen location\n\tso the screen reader did not speak the added or removed selection.\n\t
    • \n
\n

\n Release 3.6.5\n

\n
    \n\t
  • \n\tReleased 26 April 2016.\n\t
    • \n\t
  • \n\tJSON lexer added.\n\tFeature #1140.\n\t
    • \n\t
  • \n\tThe C++ lexer fixes a bug with multi-line strings with line continuation where the string style\n\toverflowed after an edit.\n\tBug #1824.\n\t
    • \n\t
  • \n\tThe Python lexer treats '@' as an operator except when it is the first visible character on a line.\n\tThis is for Python 3.5.\n\t
    • \n\t
  • \n\tThe Rust lexer allows '?' as an operator.\n\tFeature #1146.\n\t
    • \n\t
  • \n\tDoubled size of compiled regex buffer.\n\tBug #1822.\n\t
    • \n\t
  • \n\tFor GTK+, the Super modifier key can be used in key bindings.\n\tFeature #1142.\n\t
    • \n\t
  • \n\tFor GTK+, fix some crashes when using multiple threads.\n\t
    • \n\t
  • \n\tPlatform layer font cache removed on GTK+ as platform-independent caches are used.\n\tThis avoids the use of thread locking and initialization of threads so any GTK+\n\tapplications that rely on Scintilla initializing threads will have to do that themselves.\n\t
    • \n\t
  • \n\tSciTE bug fixed with exported HTML where extra line shown.\n\tBug #1816.\n\t
    • \n\t
  • \n\tSciTE on Windows fixes bugs with pop-up menus in the find and replace strips.\n\tFor the replace strip, menu choices change the state.\n\tFor the find strip, menu choices are reflected in the appearance of their corresponding buttons.\n\t
    • \n\t
  • \n\tSciTE on Windows on high DPI displays fixes the height of edit boxes in user strips.\n\t
    • \n
\n

\n Release 3.6.4\n

\n
    \n\t
  • \n\tReleased 13 March 2016.\n\t
    • \n\t
  • \n\tSciTE allows setting the autocompletion type separator character.\n\t
    • \n\t
  • \n\tThe C++ folder folds code on '(' and ')' to allow multi-line calls to be folded.\n\tFeature #1138.\n\t
    • \n\t
  • \n\tFor the HTML lexer, limit the extent of Mako line comments to finish before\n\tthe line end characters.\n\t
    • \n\t
  • \n\tFolds unfolded when two fold regions are merged by either deleting an intervening line\n\tor changing its fold level by adding characters.\n\tThis was fixed both in Scintilla and in SciTE's equivalent code.\n\tBug #1799.
    \n\t
    • \n\t
  • \n\tThe Progress lexer supports hexadecimal numeric literals,\n\tsingle-line comments, abbreviated keywords and\n\textends nested comments to unlimited levels.\n\t
    • \n\t
  • \n\tRuby lexer treats alternate hash key syntax \"key:\" as a symbol.\n\tBug #1810.\n\t
    • \n\t
  • \n\tRust lexer handles bracketed Unicode string escapes like \"\\u{123abc}\".\n\tBug #1809.\n\t
    • \n\t
  • \n\tFor GTK+ on Windows fix 64-bit build which was broken in 3.6.3.\n\t
    • \n\t
  • \n\tFor Qt, release builds have assertions turned off.\n\t
    • \n\t
  • \n\tFor Qt on Windows, fix compilation failure for Qt 4.x.\n\t
    • \n\t
  • \n\tIME target range displayed on Qt for OS X.\n\t
    • \n\t
  • \n\tOn Windows, make clipboard operations more robust by retrying OpenClipboard if it fails\n\tas this may occur when another application has opened the clipboard.\n\t
    • \n\t
  • \n\tOn Windows back out change that removed use of def file to ensure\n\tScintilla_DirectFunction exported without name mangling.\n\tBug #1813.\n\t
    • \n\t
  • \n\tOn GTK+ and Qt over Win32 in Korean fix bug caused by last release's word input change.\n\t
    • \n\t
  • \n\tFor SciTE, more descriptive error messages are displayed when there are problems loading the\n\tLua startup script.\n\tFeature #1139.\n\t
    • \n
\n

\n Release 3.6.3\n

\n
    \n\t
  • \n\tReleased 18 January 2016.\n\t
    • \n\t
  • \n\tAllow painting without first styling all visible text then styling in the background\n\tusing idle-time. This helps performance when scrolling down in very large documents.\n\tCan also incrementally style after the visible area to the end of the document so that\n\tthe document is already styled when the user scrolls to it.\n\t
    • \n\t
  • \n\tSupport GObject introspection on GTK+.\n\t
    • \n\t
  • \n\tSciTE supports pasting to each selection with the selection.multipaste setting.\n\tFeature #1123.\n\t
    • \n\t
  • \n\tSciTE can optionally display a read-only indicator on tabs and in the Buffers menu.\n\t
    • \n\t
  • \n\tBash lexer flags incomplete here doc delimiters as syntax errors.\n\tBug #1789.
    \n\tSupport added for using '#' in non-comment ways as is possible with zsh.\n\tBug #1794.
    \n\tRecognize more characters as here-doc delimiters.\n\tBug #1778.\n\t
    • \n\t
  • \n\tErrorlist lexer highlights warning messages from the Microsoft linker.\n\t
    • \n\t
  • \n\tErrorlist lexer fixes bug with final line in escape sequence recognition mode.\n\t
    • \n\t
  • \n\tLua lexer includes '&' and '|' bitwise operators for Lua 5.3.\n\tBug #1790.\n\t
    • \n\t
  • \n\tPerl lexer updated for Perl 5.20 and 5.22.
    \n\tAllow '_' for subroutine prototypes.\n\tBug #1791.
    \n\tDouble-diamond operator <<>>.
    \n\tHexadecimal floating point literals.
    \n\tRepetition in list assignment.\n\tBug #1793.
    \n\tHighlight changed subroutine prototype syntax for Perl 5.20.\n\tBug #1797.
    \n\tFix module ::-syntax when special characters such as 'x' are used.
    \n\tAdded ' and \" detection as prefix chars for x repetition operator.\n\tBug #1800.\n\t
    • \n\t
  • \n\tVisual Prolog lexer recognizes numbers more accurately and allows non-ASCII verbatim\n\tquoting characters.\n\tFeature #1130.\n\t
    • \n\t
  • \n\tSend SCN_UPDATEUI with SC_UPDATE_SELECTION when the application changes multiple\n\tselection.\n\t
    • \n\t
  • \n\tExpand folded areas before deleting fold header line.\n\tBug #1796.\n\t
    • \n\t
  • \n\tTreat Unicode line ends like common line ends when maintaining fold state.\n\t
    • \n\t
  • \n\tHighlight whole run for hover indicator when wrapped.\n\tBug #1784.\n\t
    • \n\t
  • \n\tOn Cocoa, fix crash when autocompletion list closed during scroll bounce-back.\n\tBug #1788.\n\t
    • \n\t
  • \n\tOn Windows, fix non-BMP input through WM_CHAR and allow WM_UNICHAR to work\n\twith non-BMP characters and on non-Unicode documents.\n\tBug #1779.\n\t
    • \n\t
  • \n\tOn Windows using DirectWrite, for ligatures and other character clusters,\n\tdisplay caret and selections part-way through clusters so that the caret doesn't stick\n\tto the end of the cluster making it easier to understand editing actions.\n\t
    • \n\t
  • \n\tOn Windows, Scintilla no longer uses a .DEF file during linking as it duplicates\n\tsource code directives.\n\t
    • \n\t
  • \n\tOn GTK+ and Qt, Korean input by word fixed.\n\t
    • \n\t
  • \n\tOn GTK+, Qt, and Win32 block IME input when document is read-only or any selected text\n\tis protected.\n\t
    • \n\t
  • \n\tOn GTK+ on OS X, fix warning during destruction.\n\tBug #1777.\n\t
    • \n\t
  • \n\tFix SciTE crashes when using LPEG lexers.\n\t
    • \n
\n

\n Release 3.6.2\n

\n
    \n\t
  • \n\tReleased 6 November 2015.\n\t
    • \n\t
  • \n\tWhitespace may be made visible just in indentation.\n\t
    • \n\t
  • \n\tWhitespace dots are centred when larger than 1 pixel.\n\t
    • \n\t
  • \n\tThe Scintilla framework on Cocoa now contains version numbers.\n\t
    • \n\t
  • \n\tSciTE's standard properties collect values from all active .properties file to produce the Language menu\n\tand the file types pull-down in the File open dialog.\n\t
    • \n\t
  • \n\tThe single executable version of SciTE, Sc1, uses 'module' statements within its embedded\n\tproperties. This makes it act more like the full distribution allowing languages to be turned on\n\tand off by setting imports.include and imports.exclude.\n\tThe default imports.exclude property adds eiffel, erlang, ps, and pov so these languages are\n\tturned off by default.\n\t
    • \n\t
  • \n\tSciTE adds an output.blank.margin.left property to allow setting the output pane\n\tmargin to a different width than the edit pane.\n\t
    • \n\t
  • \n\tCoffeeScript lexer highlights ranges correctly.\n\tBug #1765.\n\t
    • \n\t
  • \n\tMarkdown lexer treats line starts consistently to always highlight *foo* or similar at line start.\n\tBug #1766.\n\t
    • \n\t
  • \n\tOptimize marker redrawing by only drawing affected lines when markers shown in the text.\n\t
    • \n\t
  • \n\tOn Cocoa, timers and idling now work in modal dialogs. This also stops some crashes.\n\t
    • \n\t
  • \n\tOn Cocoa, fix crashes when deleting a ScintillaView. These crashes could occur when scrolling\n\tat the time the ScintillaView was deleted although there may have been other cases.\n\t
    • \n\t
  • \n\tOn GTK+ 2.x, fix height of lines in autocompletion lists.\n\tBug #1774.\n\t
    • \n\t
  • \n\tFix bug with SCI_LINEENDDISPLAY where the caret moved to the next document line instead of the\n\tend of the display line.\n\tBug #1772.\n\t
    • \n\t
  • \n\tReport error (SC_STATUS_FAILURE) when negative length passed to SCI_SETSTYLING.\n\tBug #1768.\n\t
    • \n\t
  • \n\tWhen SC_MARK_UNDERLINE is not assigned to a margin, stop drawing the whole line.\n\t
    • \n\t
  • \n\tWhen reverting an untitled document in SciTE, just clear it with no message about a file.\n\tBug #1764.\n\t
    • \n\t
  • \n\tSciTE on GTK+ allows use of Ctrl+A (Select All) inside find and replace strips.\n\tBug #1769.\n\t
    • \n
\n

\n Release 3.6.1\n

\n
    \n\t
  • \n\tReleased 15 September 2015.\n\t
    • \n\t
  • \n\tThe oldest version of GTK+ supported now is 2.18 and for glib it is 2.22.\n\t
    • \n\t
  • \n\tOn GTK+, SC_CHARSET_OEM866 added to allow editing Russian files encoded in code page 866.\n\tFeature #1019.\n\t
    • \n\t
  • \n\tOn Windows, reconversion is performed when requested by the IME.\n\t
    • \n\t
  • \n\tCoffeeScript lexer adds lexical class for instance properties and fixes some cases of regex highlighting.\n\tBug #1749.\n\t
    • \n\t
  • \n\tThe errorlist lexer understands some ANSI escape sequences to change foreground colour and intensity.\n\tThis is sufficient to colour diagnostic output from gcc and clang when -fdiagnostics-color set.\n\t
    • \n\t
  • \n\tThe errorlist lexer allows the line number to be 0 in GCC errors as some tools report whole file\n\terrors as line 0.\n\t
    • \n\t
  • \n\tMySql lexer fixes empty comments /**/ so the comment state does not continue.\n\t
    • \n\t
  • \n\tVHDL folder supports \"protected\" keyword.\n\t
    • \n\t
  • \n\tTreat CRLF line end as two characters in SCI_COUNTCHARACTERS.\n\tBug #1757.\n\t
    • \n\t
  • \n\tOn GTK+ 3.x, fix height of lines in autocompletion lists to match the font.\n\tSwitch from deprecated style calls to CSS styling.\n\tRemoved setting list colours on GTK+ 3.16+ as no longer appears needed.\n\t
    • \n\t
  • \n\tOn GTK+, avoid \"Invalid rectangle passed\" warning messages by never reporting the client\n\trectangle with a negative width or height.\n\tBug #1743.\n\t
    • \n\t
  • \n\tOn Cocoa, copy Sci_Position.h into the framework so clients can build.\n\t
    • \n\t
  • \n\tOn Cocoa fix bug with drag and drop that could lead to crashes.\n\tBug #1751.\n\t
    • \n\t
  • \n\tFix SciTE disk exhaustion bug by reporting failures when writing files.\n\tBug #1760.\n\t
    • \n\t
  • \n\tFix find strip in SciTE on Windows XP to be visible.\n\t
    • \n\t
  • \n\tSciTE on Windows changes the way it detects that a tool has finished executing to ensure all output data\n\tfrom the process is read.\n\t
    • \n\t
  • \n\tSciTE on Windows improves the time taken to read output from tools that produce a large amount\n\tof output by a factor of around 10.\n\t
    • \n\t
  • \n\tOn GTK+ the keyboard command for View | End of Line was changed to Ctrl+Shift+N\n\tto avoid clash with Search | Selection Add Next.\n\tBug #1750.\n\t
    • \n
\n

\n Release 3.6.0\n

\n
    \n\t
  • \n\tReleased 3 August 2015.\n\t
    • \n\t
  • \n\tExternal interfaces use the Sci_Position and Sci_PositionU typedefs instead of int and unsigned int\n\tto allow for changes to a 64-bit interface on 64-bit platforms in the future.\n\tApplications and external lexers should start using the new type names so that\n\tthey will be compatible when the 64-bit change occurs.\n\tThere is also Sci_PositionCR (long) for use in the Sci_CharacterRange struct which will\n\talso eventually become 64-bit.\n\t
    • \n\t
  • \n\tMultiple selection now works over more key commands.\n\tThe new multiple-selection handling commands include horizontal movement and selection commands,\n\tline up and down movement and selection commands, word and line deletion commands, and\n\tline end insertion.\n\tThis change in behaviours is conditional on setting the SCI_SETADDITIONALSELECTIONTYPING property.\n\t
    • \n\t
  • \n\tAutocompletion lists send an SCN_AUTOCCOMPLETED notification after the text has been inserted.\n\tFeature #1109.\n\t
    • \n\t
  • \n\tThe case mode style attribute can now be SC_CASE_CAMEL.\n\t
    • \n\t
  • \n\tThe Python lexer supports substyles for identifiers.\n\t
    • \n\t
  • \n\tSciTE adds support for substyles.\n\t
    • \n\t
  • \n\tSciTE's Export as RTF and Copy as RTF commands support UTF-8.\n\t
    • \n\t
  • \n\tSciTE can display autocompletion on all IME input with ime.autocomplete property.\n\t
    • \n\t
  • \n\tSciTE properties files now discard trailing white space on variable names.\n\t
    • \n\t
  • \n\tCalling SCI_SETIDENTIFIERS resets styling to ensure any added identifier are highlighted.\n\t
    • \n\t
  • \n\tAvoid candidate box randomly popping up away from edit pane with (especially\n\tJapanese) IME input.\n\t
    • \n\t
  • \n\tOn Cocoa fix problems with positioning of autocompletion lists near screen edge\n\tor under dock. Cancel autocompletion when window moved.\n\tBug #1740.\n\t
    • \n\t
  • \n\tFix drawing problem when control characters are in a hidden style as they then\n\thave a zero width rectangle to draw but modify that rectangle in a way that\n\tclears some pixels.\n\t
    • \n\t
  • \n\tReport error when attempt to resize buffer to more than 2GB with SC_STATUS_FAILURE.\n\t
    • \n\t
  • \n\tFix bug on GTK+ with scroll bars leaking.\n\tBug #1742.\n\t
    • \n\t
  • \n\tLexOthers.cxx file split into one file per lexer: LexBatch, LexDiff,\n\tLexErrorList, LexMake, LexNull, and LexProps.\n\t
    • \n\t
  • \n\tSciTE exporters handle styles > 127 correctly now.\n\t
    • \n\t
  • \n\tSciTE on Windows can scale window element sizes based on the system DPI setting.\n\t
    • \n\t
  • \n\tSciTE implements find.in.files.close.on.find on all platforms, not just Windows.\n\t
    • \n
\n

\n Release 3.5.7\n

\n
    \n\t
  • \n\tReleased 20 June 2015.\n\t
    • \n\t
  • \n\tAdded SCI_MULTIPLESELECTADDNEXT to add the next occurrence of the main selection within the\n\ttarget to the set of selections as main. If the current selection is empty then select word around caret.\n\tSCI_MULTIPLESELECTADDEACH adds each occurrence of the main selection within the\n\ttarget to the set of selections.\n\t
    • \n\t
  • \n\tSciTE adds \"Selection Add Next\" and \"Selection Add Each\" commands to the Search menu.\n\t
    • \n\t
  • \n\tAdded SCI_ISRANGEWORD to determine if the parameters are at the start and end of a word.\n\t
    • \n\t
  • \n\tAdded SCI_TARGETWHOLEDOCUMENT to set the target to the whole document.\n\t
    • \n\t
  • \n\tVerilog lexer recognizes protected regions and the folder folds protected regions.\n\t
    • \n\t
  • \n\tA performance problem with markers when deleting many lines was fixed.\n\tBug #1733.\n\t
    • \n\t
  • \n\tOn Cocoa fix crash when ScintillaView destroyed if no autocompletion ever displayed.\n\tBug #1728.\n\t
    • \n\t
  • \n\tOn Cocoa fix crash in drag and drop.\n\t
    • \n\t
  • \n\tOn GTK+ 3.4+, when there are both horizontal and vertical scrollbars, draw the lower-right corner\n\tso that it does not appear black when text selected.\n\tBug #1611.\n\t
    • \n\t
  • \n\tFixed most calls deprecated in GTK+ 3.16. Does not fix style override calls\n\tas they are more complex.\n\t
    • \n\t
  • \n\tSciTE on GTK+ 3.x uses a different technique for highlighting the search strip when there is\n\tno match which is more compatible with future and past versions and different themes.\n\t
    • \n
\n

\n Release 3.5.6\n

\n
    \n\t
  • \n\tReleased 26 May 2015.\n\t
    • \n\t
  • \n\tOn Qt, use fractional positioning calls and avoid rounding to ensure consistency.\n\t
    • \n\t
  • \n\tSCI_TARGETASUTF8 and SCI_ENCODEDFROMUTF8 implemented on\n\tWin32 as well as GTK+ and Cocoa.\n\t
    • \n\t
  • \n\tC++ lexer fixes empty backquoted string.\n\tBug #1711.\n\t
    • \n\t
  • \n\tC++ lexer fixes #undef directive.\n\tBug #1719.\n\t
    • \n\t
  • \n\tFortran folder fixes handling of \"selecttype\" and \"selectcase\".\n\tBug #1724.\n\t
    • \n\t
  • \n\tVerilog folder folds interface definitions.\n\t
    • \n\t
  • \n\tVHDL folder folds units declarations and fixes a case insensitivity bug with not treating \"IS\" the same as \"is\".\n\t
    • \n\t
  • \n\tFix bug when drawing text margins in buffered mode which would use default\n\tencoding instead of chosen encoding.\n\tBug #1703.\n\t
    • \n\t
  • \n\tFix bug with Korean Hanja conversions in DBCS encoding on Windows.\n\t
    • \n\t
  • \n\tFix for reading a UTF-16 file in SciTE where a non-BMP character is split over a read buffer boundary.\n\tBug #1710.\n\t
    • \n\t
  • \n\tFix bug on GTK+ 2.x for Windows where there was an ABI difference between\n\tcompiler version.\n\tBug #1726.\n\t
    • \n\t
  • \n\tFix undo bug on Cocoa that could lose data..\n\t
    • \n\t
  • \n\tFix link error on Windows when SCI_NAMESPACE used.\n\t
    • \n\t
  • \n\tFix exporting from SciTE when using Scintillua for lexing.\n\t
    • \n\t
  • \n\tSciTE does not report twice that a search string can not be found when \"Replace\" pressed.\n\tBug #1716.\n\t
    • \n\t
  • \n\tSciTE on GTK+ 3.x disables arrow in search combo when no entries.\n\tBug #1717.\n\t
    • \n
\n

\n Release 3.5.5\n

\n
    \n\t
  • \n\tReleased 17 April 2015.\n\t
    • \n\t
  • \n\tScintilla on Windows is now always a wide character window so SCI_SETKEYSUNICODE has no effect\n\tand SCI_GETKEYSUNICODE always returns true. These APIs are deprecated and should not be called.\n\t
    • \n\t
  • \n\tThe wxWidgets-specific ascent member of Font has been removed which breaks\n\tcompatibility with current wxStyledTextCtrl.\n\tBug #1682.\n\t
    • \n\t
  • \n\tIME on Qt supports multiple carets and behaves more like other platforms.\n\t
    • \n\t
  • \n\tAlways use inline IME on GTK+ for Korean.\n\t
    • \n\t
  • \n\tSQL lexer fixes handling of '+' and '-' in numbers so the '-' in '1-1' is seen as an operator and for\n\t'1--comment' the comment is recognized.\n\t
    • \n\t
  • \n\tTCL lexer reverts change to string handling.\n\tBug #1642.\n\t
    • \n\t
  • \n\tVerilog lexer fixes bugs with macro styling.\n\tVerilog folder fixes bugs with `end completing an `if* instead of `endif and fold.at.else, and implements\n\tfolding at preprocessor `else.\n\t
    • \n\t
  • \n\tVHDL lexer supports extended identifiers.\n\t
    • \n\t
  • \n\tFix bug on Cocoa where the calltip would display incorrectly when\n\tswitching calltips and the new calltip required a taller window.\n\t
    • \n\t
  • \n\tFix leak on Cocoa with autocompletion lists.\n\tBug #1706.\n\t
    • \n\t
  • \n\tFix potential crash on Cocoa with drag and drop.\n\tBug #1709.\n\t
    • \n\t
  • \n\tFix bug on Windows when compiling with MinGW-w64 which caused text to not be drawn\n\twhen in wrap mode.\n\tBug #1705.\n\t
    • \n\t
  • \n\tFix SciTE bug with missing file open filters and add hex to excluded set of properties files so that its\n\tsettings don't appear.\n\tBug #1707.\n\t
    • \n\t
  • \n\tFix SciTE bug where files without extensions like \"makefile\" were not highlighted correctly.\n\t
    • \n
\n

\n Release 3.5.4\n

\n
    \n\t
  • \n\tReleased 8 March 2015.\n\t
    • \n\t
  • \n\tIndicators may have a different colour and style when the mouse is over them or the caret is moved into them.\n\t
    • \n\t
  • \n\tAn indicator may display in a large variety of colours with the SC_INDICFLAG_VALUEFORE\n\tflag taking the colour from the indicator's value, which may differ for every character, instead of its\n\tforeground colour attribute.\n\t
    • \n\t
  • \n\tOn Cocoa, additional IME methods implemented so that more commands are enabled.\n\tFor Japanese: Reverse Conversion, Convert to Related Character, and Search Similar Kanji\n\tcan now be performed.\n\tThe global definition hotkey Command+Control+D and the equivalent three finger tap gesture\n\tcan be used.\n\t
    • \n\t
  • \n\tMinimum version of Qt supported is now 4.8 due to the use of QElapsedTimer::nsecsElapsed.\n\t
    • \n\t
  • \n\tOn Windows, for Korean, the VK_HANJA key is implemented to choose Hanja for Hangul and\n\tto convert from Hanja to Hangul.\n\t
    • \n\t
  • \n\tC++ lexer adds lexer.cpp.verbatim.strings.allow.escapes option that allows verbatim (@\") strings\n\tto contain escape sequences. This should remain off (0) for C# and be turned on (1) for Objective C.\n\t
    • \n\t
  • \n\tRust lexer accepts new 'is'/'us' integer suffixes instead of 'i'/'u'.\n\tBug #1098.\n\t
    • \n\t
  • \n\tRuby folder can fold multiline comments.\n\tBug #1697.\n\t
    • \n\t
  • \n\tSQL lexer fixes a bug with the q-quote operator.\n\t
    • \n\t
  • \n\tTCL lexer fixes a bug with some strings.\n\tBug #1642.\n\t
    • \n\t
  • \n\tVerilog lexer handles escaped identifiers that begin with \\ and end with space like \\reset* .\n\tVerilog folder fixes one bug with inconsistent folding when fold.comment is on and another\n\twith typedef class statements creating a fold point, expecting an endclass statement.\n\t
    • \n\t
  • \n\tVHDL folder fixes hang in folding when document starts with \"entity\".\n\t
    • \n\t
  • \n\tAdd new indicators INDIC_COMPOSITIONTHIN, INDIC_FULLBOX, and INDIC_TEXTFORE.\n\tINDIC_COMPOSITIONTHIN is a thin underline that mimics the appearance of non-target segments in OS X IME.\n\tINDIC_FULLBOX is similar to INDIC_STRAIGHTBOX but covers the entire character area which means that\n\tindicators with this style on contiguous lines may touch. INDIC_TEXTFORE changes the text foreground colour.\n\t
    • \n\t
  • \n\tFix adaptive scrolling speed for GTK+ on OS X with GTK Quartz backend (as opposed to X11 backend).\n\tBug #1696.\n\t
    • \n\t
  • \n\tFix position of autocompletion and calltips on Cocoa when there were two screens stacked vertically.\n\t
    • \n\t
  • \n\tFix crash in SciTE when saving large files in background when closing application.\n\tBug #1691.\n\t
    • \n\t
  • \n\tFix decoding of MSVC warnings in SciTE so that files in the C:\\Program Files (x86)\\ directory can be opened.\n\tThis is a common location of system include files.\n\t
    • \n\t
  • \n\tFix compilation failure of C++11 <regex> on Windows using gcc.\n\t
    • \n
\n

\n Release 3.5.3\n

\n
    \n\t
  • \n\tReleased 20 January 2015.\n\t
    • \n\t
  • \n\tSupport removed for Windows 95, 98, and ME.\n\t
    • \n\t
  • \n\tLexers added for Motorola S-Record files, Intel hex files, and Tektronix extended hex files with folding for Intel hex files.\n\tFeature #1091.\n\tFeature #1093.\n\tFeature #1095.\n\tFeature #1096.\n\t
    • \n\t
  • \n\tC++ folder allows folding on square brackets '['.\n\tFeature #1087.\n\t
    • \n\t
  • \n\tShell lexer fixes three issues with here-documents.\n\tBug #1672.\n\t
    • \n\t
  • \n\tVerilog lexer highlights doc comment keywords; has separate styles for input, output, and inout ports\n\t(lexer.verilog.portstyling); fixes a bug in highlighting numbers; can treat upper-case identifiers as\n\tkeywords (lexer.verilog.allupperkeywords); and can use different styles for code that is inactive due\n\tto preprocessor commands (lexer.verilog.track.preprocessor, lexer.verilog.update.preprocessor).\n\t
    • \n\t
  • \n\tWhen the calltip window is taller than the Scintilla window, leave it in a\n\tposition that avoids overlapping the Scintilla text.\n\t
    • \n\t
  • \n\tWhen a text margin is displayed, for annotation lines, use the background colour of the base line.\n\t
    • \n\t
  • \n\tOn Windows GDI, assume font names are encoded in UTF-8. This matches the Direct2D code path.\n\t
    • \n\t
  • \n\tFix paste for GTK+ on OS X.\n\tBug #1677.\n\t
    • \n\t
  • \n\tReverted a fix on Qt where Qt 5.3 has returned to the behaviour of 4.x.\n\tBug #1575.\n\t
    • \n\t
  • \n\tWhen the mouse is on the line between margin and text changed to treat as within text.\n\tThis makes the PLAT_CURSES character cell platform work better.\n\t
    • \n\t
  • \n\tFix a crash in SciTE when the command line is just \"-close:\".\n\tBug #1675.\n\t
    • \n\t
  • \n\tFix unexpected dialog in SciTE on Windows when the command line has a quoted filename then ends with a space.\n\tBug #1673.\n\t
    • \n\t
  • \n\tOn Windows and GTK+, use indicators for inline IME.\n\t
    • \n\t
  • \n\tSciTE shuts down quicker when there is no user-written OnClose function and no directors are attached.\n\t
    • \n
\n

\n Release 3.5.2\n

\n
    \n\t
  • \n\tReleased 2 December 2014.\n\t
    • \n\t
  • \n\tFor OS X Cocoa switch C++ runtime to libc++ to enable use of features that will never\n\tbe added to libstdc++ including those part of C++11.\n\tScintilla will now run only on OS X 10.7 or later and only in 64-bit mode.\n\t
    • \n\t
  • \n\tInclude support for using C++11 <regex> for regular expression searches.\n\tEnabling this requires rebuilding Scintilla with a non-default option.\n\tThis is a provisional feature and may change API before being made permanent.\n\t
    • \n\t
  • \n\tAllocate indicators used for Input Method Editors after 31 which was the previous limit of indicators to\n\tensure no clash between the use of indicators for IME and for the application.\n\t
    • \n\t
  • \n\tANNOTATION_INDENTED added which is similar to ANNOTATION_BOXED in terms of positioning\n\tbut does not show a border.\n\tFeature #1086.\n\t
    • \n\t
  • \n\tAllow platform overrides for drawing tab arrows, wrap markers, and line markers.\n\tSize of double click detection area is a variable.\n\tThese enable better visuals and behaviour for PLAT_CURSES as it is character cell based.\n\t
    • \n\t
  • \n\tCoffeeScript lexer fixes \"/*\" to not be a comment.\n\tBug #1420.\n\t
    • \n\t
  • \n\tVHDL folder fixes \"block\" keyword.\n\tBug #1664.\n\t
    • \n\t
  • \n\tPrevent caret blinking when holding down Delete key.\n\tBug #1657.\n\t
    • \n\t
  • \n\tOn Windows, allow right click selection in popup menu.\n\tFeature #1080.\n\t
    • \n\t
  • \n\tOn Windows, only call ShowCaret in GDI mode as it interferes with caret drawing when using Direct2D.\n\tBug #1643.\n\t
    • \n\t
  • \n\tOn Windows, another DirectWrite mode SC_TECHNOLOGY_DIRECTWRITEDC added\n\twhich may avoid drawing failures in some circumstances by drawing into a GDI DC.\n\tThis feature is provisional and may be changed or removed if a better solution is found.\n\t
    • \n\t
  • \n\tOn Windows, avoid processing mouse move events where the mouse has not moved as these can\n\tcause unexpected dwell start notifications.\n\tBug #1670.\n\t
    • \n\t
  • \n\tFor GTK+ on Windows, avoid extra space when pasting from external application.\n\t
    • \n\t
  • \n\tOn GTK+ 2.x allow Scintilla to be used inside tool tips by changing when preedit window created.\n\tBug #1662.\n\t
    • \n\t
  • \n\tSupport MinGW compilation under Linux.\n\tFeature #1077.\n\t
    • \n
\n

\n Release 3.5.1\n

\n
    \n\t
  • \n\tReleased 30 September 2014.\n\t
    • \n\t
  • \n\tBibTeX lexer added.\n\tFeature #1071.\n\t
    • \n\t
  • \n\tSQL lexer supports the q-quote operator as SCE_SQL_QOPERATOR(24).\n\t
    • \n\t
  • \n\tVHDL lexer supports block comments.\n\tBug #1527.\n\t
    • \n\t
  • \n\tVHDL folder fixes case where \"component\" used before name.\n\tBug #613.\n\t
    • \n\t
  • \n\tRestore fractional pixel tab positioning which was truncated to whole pixels in 3.5.0.\n\tBug #1652.\n\t
    • \n\t
  • \n\tAllow choice between windowed and inline IME on some platforms.\n\t
    • \n\t
  • \n\tOn GTK+ cache autocomplete window to avoid platform bug where windows\n\twere sometimes lost.\n\tBug #1649.\n\t
    • \n\t
  • \n\tOn GTK+ size autocomplete window more accurately.\n\t
    • \n\t
  • \n\tOn Windows only unregister windows classes registered.\n\tBug #1639.\n\t
    • \n\t
  • \n\tOn Windows another DirectWrite mode SC_TECHNOLOGY_DIRECTWRITERETAIN added\n\twhich may avoid drawing failures on some cards and drivers.\n\tThis feature is provisional and may be changed or removed if a better solution is found.\n\t
    • \n\t
  • \n\tOn Windows support the Visual Studio 2010+ clipboard format that indicates a line copy.\n\tBug #1636.\n\t
    • \n\t
  • \n\tSciTE session files remember the scroll position.\n\t
    • \n
\n

\n Release 3.5.0\n

\n
    \n\t
  • \n\tReleased 13 August 2014.\n\t
    • \n\t
  • \n\tText may share space vertically so that extreme ascenders and descenders are\n\tnot cut off by calling SCI_SETPHASESDRAW(SC_PHASES_MULTIPLE).\n\t
    • \n\t
  • \n\tSeparate timers are used for each type of periodic activity and they are turned on and off\n\tas required. This saves power as there are fewer wake ups.\n\tOn recent releases of OS X Cocoa and Windows, coalescing timers are used to further\n\tsave power.\n\tBug #1086.\n\tBug #1532.\n\t
    • \n\t
  • \n\tExplicit tab stops may be set for each line.\n\t
    • \n\t
  • \n\tOn Windows and GTK+, when using Korean input methods, IME composition is moved from a\n\tseparate window into the Scintilla window.\n\t
    • \n\t
  • \n\tSciTE adds a \"Clean\" command to the \"Tools\" menu which is meant to be bound to a command like\n\t\"make clean\".\n\t
    • \n\t
  • \n\tLexer added for Windows registry files.\n\t
    • \n\t
  • \n\tHTML lexer fixes a crash with SGML after a Mako comment.\n\tBug #1622.\n\t
    • \n\t
  • \n\tKiXtart lexer adds a block comment state.\n\tFeature #1053.\n\t
    • \n\t
  • \n\tMatlab lexer fixes transpose operations like \"X{1}'\".\n\tBug #1629.\n\t
    • \n\t
  • \n\tRuby lexer fixes bugs with the syntax of symbols including allowing a symbol to end with '?'.\n\tBug #1627.\n\t
    • \n\t
  • \n\tRust lexer supports byte string literals, naked CR can be escaped in strings, and files starting with\n\t\"#![\" are not treated as starting with a hashbang comment.\n\tFeature #1063.\n\t
    • \n\t
  • \n\tBug fixed where style data was stale when deleting a rectangular selection.\n\t
    • \n\t
  • \n\tBug fixed where annotations disappeared when SCI_CLEARDOCUMENTSTYLE called.\n\t
    • \n\t
  • \n\tBug fixed where selection not redrawn after SCI_DELWORDRIGHT.\n\tBug #1633.\n\t
    • \n\t
  • \n\tChange the function prototypes to be complete for functions exported as \"C\".\n\tBug #1618.\n\t
    • \n\t
  • \n\tFix a memory leak on GTK+ with autocompletion lists.\n\tBug #1638.\n\t
    • \n\t
  • \n\tOn GTK+, use the full character width for the overstrike caret for multibyte characters.\n\t
    • \n\t
  • \n\tOn Qt, set list icon size to largest icon. Add padding on OS X.\n\tBug #1634.\n\t
    • \n\t
  • \n\tOn Qt, fix building on FreeBSD 9.2.\n\tBug #1635.\n\t
    • \n\t
  • \n\tOn Qt, add a get_character method on the document.\n\tFeature #1064.\n\t
    • \n\t
  • \n\tOn Qt, add SCI_* for methods to ScintillaConstants.py.\n\tFeature #1065.\n\t
    • \n\t
  • \n\tSciTE on GTK+ crash fixed with Insert Abbreviation command.\n\t
    • \n\t
  • \n\tFor SciTE with read-only files and are.you.sure=0 reenable choice to save to another\n\tlocation when using Save or Close commands.\n\t
    • \n\t
  • \n\tFix SciTE bug where toggle bookmark did not work after multiple lines with bookmarks merged.\n\tBug #1617.\n\t
    • \n
\n

\n Release 3.4.4\n

\n
    \n\t
  • \n\tReleased 3 July 2014.\n\t
    • \n\t
  • \n\tStyle byte indicators removed. They were deprecated in 2007. Standard indicators should be used instead.\n\tSome elements used by lexers no longer take number of bits or mask arguments so lexers may need to be\n\tupdated for LexAccessor::StartAt, LexAccessor::SetFlags (removed), LexerModule::LexerModule.\n\t
    • \n\t
  • \n\tWhen multiple selections are active, autocompletion text may be inserted at each selection with new\n\tSCI_AUTOCSETMULTI method.\n\t
    • \n\t
  • \n\tC++ lexer fixes crash for \"#define x(\".\n\tBug #1614.\n\t
    • \n\t
  • \n\tC++ lexer fixes raw string recognition so that R\"xxx(blah)xxx\" is styled as SCE_C_STRINGRAW.\n\t
    • \n\t
  • \n\tThe Postscript lexer no longer marks token edges with indicators as this used style byte indicators.\n\t
    • \n\t
  • \n\tThe Scriptol lexer no longer displays indicators for poor indentation as this used style byte indicators.\n\t
    • \n\t
  • \n\tTCL lexer fixes names of keyword sets.\n\tBug #1615.\n\t
    • \n\t
  • \n\tShell lexer fixes fold matching problem caused by \"<<<\".\n\tBug #1605.\n\t
    • \n\t
  • \n\tFix bug where indicators were not removed when fold highlighting on.\n\tBug #1604.\n\t
    • \n\t
  • \n\tFix bug on Cocoa where emoji were treated as being zero width.\n\t
    • \n\t
  • \n\tFix crash on GTK+ with Ubuntu 12.04 and overlay scroll bars.\n\t
    • \n\t
  • \n\tAvoid creating a Cairo context when measuring text on GTK+ as future versions of GTK+\n\tmay prohibit calling gdk_cairo_create except inside drawing handlers. This prohibition may\n\tbe required on Wayland.\n\t
    • \n\t
  • \n\tOn Cocoa, the registerNotifyCallback method is now marked as deprecated so client code that\n\tuses it will display an error message.\n\tClient code should use the delegate mechanism or subclassing instead.\n\tThe method will be removed in the next version.\n\t
    • \n\t
  • \n\tOn Cocoa, package Scintilla more in compliance with platform conventions.\n\tOnly publish public headers in the framework headers directory.\n\tOnly define the Scintilla namespace in Scintilla.h when compiling as C++.\n\tUse the Cocoa NS_ENUM and NS_OPTIONS macros for exposed enumerations.\n\tHide internal methods from public headers.\n\tThese changes are aimed towards publishing Scintilla as a module which will allow it to\n\tbe used from the Swift programming language, although more changes will be needed here.\n\t
    • \n\t
  • \n\tFix crash in SciTE when stream comment performed at line end.\n\tBug #1610.\n\t
    • \n\t
  • \n\tFor SciTE on Windows, display error message when common dialogs fail.\n\tBug #156.\n\t
    • \n\t
  • \n\tFor SciTE on GTK+ fix bug with initialization of toggle buttons in find and replace strips.\n\tBug #1612.\n\t
    • \n
\n

\n Release 3.4.3\n

\n
    \n\t
  • \n\tReleased 27 May 2014.\n\t
    • \n\t
  • \n\tFix hangs and crashes in DLL at shutdown on Windows when using Direct2D.\n\t
    • \n
\n

\n Release 3.4.2\n

\n
    \n\t
  • \n\tReleased 22 May 2014.\n\t
    • \n\t
  • \n\tInsertions can be filtered or modified by calling SCI_CHANGEINSERTION inside a handler for\n\tSC_MOD_INSERTCHECK.\n\t
    • \n\t
  • \n\tDMIS lexer added. DMIS is a language for coordinate measuring machines.\n\tFeature #1049.\n\t
    • \n\t
  • \n\tLine state may be displayed in the line number margin to aid in debugging lexing and folding with\n\tSC_FOLDFLAG_LINESTATE (128).\n\t
    • \n\t
  • \n\tC++ lexer understands more preprocessor statements. #if defined SYMBOL is understood.\n\tSome macros with arguments can be understood and these may be predefined in keyword set 4\n\t(keywords5 for SciTE)\n\twith syntax similar to CHECKVERSION(x)=(x<3).\n\tFeature #1051.\n\t
    • \n\t
  • \n\tC++ lexer can highlight task marker keywords in comments as SCE_C_TASKMARKER.\n\t
    • \n\t
  • \n\tC++ lexer can optionally highlight escape sequences in strings as SCE_C_ESCAPESEQUENCE.\n\t
    • \n\t
  • \n\tC++ lexer supports Go back quoted raw string literals with lexer.cpp.backquoted.strings option.\n\tFeature #1047.\n\t
    • \n\t
  • \n\tSciTE performs word and search match highlighting as an idle task to improve interactivity\n\tand allow use of these features on large files.\n\t
    • \n\t
  • \n\tBug fixed on Cocoa where previous caret lines were visible.\n\tBug #1593.\n\t
    • \n\t
  • \n\tBug fixed where caret remained invisible when period set to 0.\n\tBug #1592.\n\t
    • \n\t
  • \n\tFixed display flashing when scrolling with GTK+ 3.10.\n\tBug #1567.\n\t
    • \n\t
  • \n\tFixed calls and constants deprecated in GTK+ 3.10.\n\t
    • \n\t
  • \n\tFixed bug on Windows where WM_GETTEXT did not provide data in UTF-16 for Unicode window.\n\tBug #685.\n\t
    • \n\t
  • \n\tFor SciTE, protect access to variables used by threads with a mutex to prevent data races.\n\t
    • \n\t
  • \n\tFor SciTE on GTK+ fix thread object leaks.\n\tDisplay the version of GTK+ compiled against in the about box.\n\t
    • \n\t
  • \n\tFor SciTE on GTK+ 3.10, fix the size of the tab bar's content and use\n\tfreedesktop.org standard icon names where possible.\n\t
    • \n\t
  • \n\tFor SciTE on Windows, fix bug where invoking help resubmitted the\n\trunning program.\n\tBug #272.\n\t
    • \n\t
  • \n\tSciTE's highlight current word feature no longer matches the selection when it contains space.\n\t
    • \n\t
  • \n\tFor building SciTE in Visual C++, the win\\SciTE.vcxproj project file should be used.\n\tThe boundscheck directory and its project and solution files have been removed.\n\t
    • \n
\n

\n Release 3.4.1\n

\n
    \n\t
  • \n\tReleased 1 April 2014.\n\t
    • \n\t
  • \n\tDisplay Unicode line ends as [LS], [PS], and [NEL] blobs.\n\t
    • \n\t
  • \n\tBug fixed where cursor down failed on wrapped lines.\n\tBug #1585.\n\t
    • \n\t
  • \n\tCaret positioning changed a little to appear inside characters less often by\n\trounding the caret position to the pixel grid instead of truncating.\n\tBug #1588.\n\t
    • \n\t
  • \n\tBug fixed where automatic indentation wrong when caret in virtual space.\n\tBug #1586.\n\t
    • \n\t
  • \n\tBug fixed on Windows where WM_LBUTTONDBLCLK was no longer sent to window.\n\tBug #1587.\n\t
    • \n\t
  • \n\tBug fixed with SciTE on Windows XP where black stripes appeared inside the find and\n\treplace strips.\n\t
    • \n\t
  • \n\tCrash fixed in SciTE with recursive properties files.\n\tBug #1507.\n\t
    • \n\t
  • \n\tBug fixed with SciTE where Ctrl+E before an unmatched end brace jumps to file start.\n\tBug #315.\n\t
    • \n\t
  • \n\tFixed scrolling on Cocoa to avoid display glitches and be smoother.\n\t
    • \n\t
  • \n\tFixed crash on Cocoa when character composition used when autocompletion list active.\n\t
    • \n
\n

\n Release 3.4.0\n

\n
    \n\t
  • \n\tReleased 22 March 2014.\n\t
    • \n\t
  • \n\tThe Unicode line ends and substyles features added as provisional in 3.2.5 are now finalized.\n\tThere are now no provisional features.\n\t
    • \n\t
  • \n\tAdded wrap mode SC_WRAP_WHITESPACE which only wraps on whitespace, not on style changes.\n\t
    • \n\t
  • \n\tSciTE find and replace strips can perform incremental searching and temporary highlighting of all\n\tmatches with the find.strip.incremental, replace.strip.incremental, and find.indicator.incremental settings.\n\t
    • \n\t
  • \n\tSciTE default settings changed to use strips for find and replace and to draw with Direct2D and\n\tDirectWrite on Windows.\n\t
    • \n\t
  • \n\tSciTE on Windows scales image buttons on the find and replace strips to match the current system scale factor.\n\t
    • \n\t
  • \n\tAdditional assembler lexer variant As(SCLEX_AS) for Unix assembly code which uses '#' for comments and\n\t';' to separate statements.\n\t
    • \n\t
  • \n\tFix Coffeescript lexer for keyword style extending past end of word.\n\tAlso fixes styling 0...myArray.length all as a number.\n\tBug #1583.\n\t
    • \n\t
  • \n\tFix crashes and other bugs in Fortran folder by removing folding of do-label constructs.\n\t
    • \n\t
  • \n\tDeleting a whole line deletes the annotations on that line instead of the annotations on the next line.\n\tBug #1577.\n\t
    • \n\t
  • \n\tChanged position of tall calltips to prefer lower half of screen to cut off end instead of start.\n\t
    • \n\t
  • \n\tFix Qt bug where double click treated as triple click.\n\tBug #1575.\n\t
    • \n\t
  • \n\tOn Qt, selecting an item in an autocompletion list that is not currently visible positions it at the top.\n\t
    • \n\t
  • \n\tFix bug on Windows when resizing autocompletion list with only short strings caused the list to move.\n\t
    • \n\t
  • \n\tOn Cocoa reduce scrollable height by one line to fix bugs with moving caret\n\tup or down.\n\t
    • \n\t
  • \n\tOn Cocoa fix calltips which did not appear when they were created in an off-screen position.\n\t
    • \n
\n

\n Release 3.3.9\n

\n
    \n\t
  • \n\tReleased 31 January 2014.\n\t
    • \n\t
  • \n\tFix 3.3.8 bug where external lexers became inaccessible.\n\tBug #1574.\n\t
    • \n
\n

\n Release 3.3.8\n

\n
    \n\t
  • \n\tReleased 28 January 2014.\n\t
    • \n\t
  • \n\tDropSelectionN API added to drop a selection from a multiple selection.\n\t
    • \n\t
  • \n\tCallTipSetPosStart API added to change the position at which backspacing removes the calltip.\n\t
    • \n\t
  • \n\tSC_MARK_BOOKMARK marker symbol added which looks like bookmark ribbons used in\n\tbook reading applications.\n\t
    • \n\t
  • \n\tBasic lexer highlights hex, octal, and binary numbers in FreeBASIC which use the prefixes\n\t&h, &o and &b respectively.\n\tFeature #1041.\n\t
    • \n\t
  • \n\tC++ lexer fixes bug where keyword followed immediately by quoted string continued\n\tkeyword style.\n\tBug #1564.\n\t
    • \n\t
  • \n\tMatlab lexer treats '!' differently for Matlab and Octave languages.\n\tBug #1571.\n\t
    • \n\t
  • \n\tRust lexer improved with nested comments, more compliant doc-comment detection,\n\toctal literals, NUL characters treated as valid, and highlighting of raw string literals and float literals fixed.\n\tFeature #1038.\n\tBug #1570.\n\t
    • \n\t
  • \n\tOn Qt expose the EOLMode on the document object.\n\t
    • \n\t
  • \n\tFix hotspot clicking where area was off by half a character width.\n\tBug #1562.\n\t
    • \n\t
  • \n\tTweaked scroll positioning by either 2 pixels or 1 pixel when caret is at left or right of view\n\tto ensure caret is inside visible area.\n\t
    • \n\t
  • \n\tSend SCN_UPDATEUI with SC_UPDATE_SELECTION for Shift+Tab inside text.\n\t
    • \n\t
  • \n\tOn Windows update the system caret position when scrolling to help screen readers\n\tsee the scroll quickly.\n\t
    • \n\t
  • \n\tOn Cocoa, GTK+, and Windows/Direct2D draw circles more accurately so that\n\tcircular folding margin markers appear circular, of consistent size, and centred.\n\tMake SC_MARK_ARROWS drawing more even.\n\tFix corners of SC_MARK_ROUNDRECT with Direct2D to be similar to other platforms.\n\t
    • \n\t
  • \n\tSciTE uses a bookmark ribbon symbol for bookmarks as it scales better to higher resolutions\n\tthan the previous blue gem bitmap.\n\t
    • \n\t
  • \n\tSciTE will change the width of margins while running when the margin.width and fold.margin.width\n\tproperties are changed.\n\t
    • \n\t
  • \n\tSciTE on Windows can display a larger tool bar with the toolbar.large property.\n\t
    • \n\t
  • \n\tSciTE displays a warning message when asked to open a directory.\n\tBug #1568.\n\t
    • \n
\n

\n Release 3.3.7\n

\n
    \n\t
  • \n\tReleased 12 December 2013.\n\t
    • \n\t
  • \n\tLexer added for DMAP language.\n\tFeature #1026.\n\t
    • \n\t
  • \n\tBasic lexer supports multiline comments in FreeBASIC.\n\tFeature #1023.\n\t
    • \n\t
  • \n\tBash lexer allows '#' inside words..\n\tBug #1553.\n\t
    • \n\t
  • \n\tC++ lexer recognizes C++11 user-defined literals and applies lexical class SCE_C_USERLITERAL.\n\t
    • \n\t
  • \n\tC++ lexer allows single quote characters as digit separators in numeric literals like 123'456 as this is\n\tincluded in C++14.\n\t
    • \n\t
  • \n\tC++ lexer fixes bug with #include statements without \" or > terminating filename.\n\tBug #1538.\n\t
    • \n\t
  • \n\tC++ lexer fixes split of Doxygen keywords @code{.fileExtension} and @param[in,out].\n\tBug #1551.\n\t
    • \n\t
  • \n\tC++ lexer styles Doxygen keywords at end of document.\n\t
    • \n\t
  • \n\tCmake lexer fixes bug with empty comments.\n\tBug #1550.\n\t
    • \n\t
  • \n\tFortran folder improved. Treats \"else\" as fold header.\n\tFeature #962.\n\t
    • \n\t
  • \n\tFix bug with adjacent instances of the same indicator with different values where only the first was drawn.\n\tBug #1560.\n\t
    • \n\t
  • \n\tFor DirectWrite, use the GDI ClearType gamma value for SC_EFF_QUALITY_LCD_OPTIMIZED as\n\tthis results in text that is similar in colour intensity to GDI.\n\tFor the duller default DirectWrite ClearType text appearance, use SC_EFF_QUALITY_DEFAULT.\n\tFeature #887.\n\t
    • \n\t
  • \n\tFix another problem with drawing on Windows with Direct2D when returning from lock screen.\n\tThe whole window is redrawn as just redrawing the initially required area left other areas black.\n\t
    • \n\t
  • \n\tWhen scroll width is tracked, take width of annotation lines into account.\n\t
    • \n\t
  • \n\tFor Cocoa on OS X 10.9, responsive scrolling is supported.\n\t
    • \n\t
  • \n\tOn Cocoa, apply font quality setting to line numbers.\n\tBug #1544.\n\t
    • \n\t
  • \n\tOn Cocoa, clicking in margin now sets focus.\n\tBug #1542.\n\t
    • \n\t
  • \n\tOn Cocoa, correct cursor displayed in margin after showing dialog.\n\t
    • \n\t
  • \n\tOn Cocoa, multipaste mode now works.\n\tBug #1541.\n\t
    • \n\t
  • \n\tOn GTK+, chain up to superclass finalize so that all finalization is performed.\n\tBug #1549.\n\t
    • \n\t
  • \n\tOn GTK+, fix horizontal scroll bar range to not be double the needed width.\n\tBug #1546.\n\t
    • \n\t
  • \n\tOn OS X GTK+, report control key as SCI_META for mouse down events.\n\t
    • \n\t
  • \n\tOn Qt, bug fixed with drawing of scrollbars, where previous contents were not drawn over with some\n\tthemes.\n\t
    • \n\t
  • \n\tOn Qt, bug fixed with finding monitor rectangle which could lead to autocomplete showing at wrong location.\n\t
    • \n\t
  • \n\tSciTE fix for multiple message boxes when failing to save a file with save.on.deactivate.\n\tBug #1540.\n\t
    • \n\t
  • \n\tSciTE on GTK+ fixes SIGCHLD handling so that Lua scripts can determine the exit status of processes\n\tthey start.\n\tBug #1557.\n\t
    • \n\t
  • \n\tSciTE on Windows XP fixes bad display of find and replace values when using strips.\n\t
    • \n
\n

\n Release 3.3.6\n

\n
    \n\t
  • \n\tReleased 15 October 2013.\n\t
    • \n\t
  • \n\tAdded functions to help convert between substyles and base styles and between secondary and primary styles.\n\tSCI_GETSTYLEFROMSUBSTYLE finds the base style of substyles.\n\tCan be used to treat all substyles of a style equivalent to that style.\n\tSCI_GETPRIMARYSTYLEFROMSTYLE finds the primary style of secondary styles.\n\tStyleFromSubStyle and PrimaryStyleFromStyle methods were added to ILexerWithSubStyles so each lexer can implement these.\n\t
    • \n\t
  • \n\tLexer added for Rust language.\n\tFeature #1024.\n\t
    • \n\t
  • \n\tAvoid false matches in errorlist lexer which is used for the SciTE output pane\n\tby stricter checking of ctags lines.\n\t
    • \n\t
  • \n\tPerl lexer fixes bugs with multi-byte characters, including in HEREDOCs and PODs.\n\tBug #1528.\n\t
    • \n\t
  • \n\tSQL folder folds 'create view' statements.\n\tFeature #1020.\n\t
    • \n\t
  • \n\tVisual Prolog lexer updated with better support for string literals and Unicode.\n\tFeature #1025.\n\t
    • \n\t
  • \n\tFor SCI_SETIDENTIFIERS, \\t, \\r, and \\n are allowed as well as space between identifiers.\n\tBug #1521.\n\t
    • \n\t
  • \n\tGaining and losing focus is now reported as a notification with the code set to SCN_FOCUSIN\n\tor SCN_FOCUSOUT.\n\tThis allows clients to uniformly use notifications instead of commands.\n\tSince there is no longer a need for commands they will be deprecated in a future version.\n\tClients should switch any code that currently uses SCEN_SETFOCUS or SCEN_KILLFOCUS.\n\t
    • \n\t
  • \n\tOn Cocoa, clients should use the delegate mechanism or subclass ScintillaView in preference\n\tto registerNotifyCallback: which will be deprecated in the future.\n\t
    • \n\t
  • \n\tOn Cocoa, the ScintillaView.h header hides internal implementation details from Platform.h and ScintillaCocoa.h.\n\tInnerView was renamed to SCIContentView and MarginView was renamed to SCIMarginView.\n\tdealloc removed from @interface.\n\t
    • \n\t
  • \n\tOn Cocoa, clients may customize SCIContentView by subclassing both SCIContentView and ScintillaView\n\tand implementing the contentViewClass class method on the ScintillaView subclass to return the class of\n\tthe SCIContentView subclass.\n\t
    • \n\t
  • \n\tOn Cocoa, fixed appearance of alpha rectangles to use specified alpha and colour for outline as well as corner size.\n\tThis makes INDIC_STRAIGHTBOX and INDIC_ROUNDBOX look correct.\n\t
    • \n\t
  • \n\tOn Cocoa, memory leak fixed for MarginView.\n\t
    • \n\t
  • \n\tOn Cocoa, make drag and drop work when destination view is empty.\n\tBug #1534.\n\t
    • \n\t
  • \n\tOn Cocoa, drag image fixed when view scrolled.\n\t
    • \n\t
  • \n\tOn Cocoa, SCI_POSITIONFROMPOINTCLOSE fixed when view scrolled.\n\tFeature #1021.\n\t
    • \n\t
  • \n\tOn Cocoa, don't send selection change notification when scrolling.\n\tBug #1522.\n\t
    • \n\t
  • \n\tOn Qt, turn off idle events on destruction to prevent repeatedly calling idle.\n\t
    • \n\t
  • \n\tQt bindings in ScintillaEdit changed to use signed first parameter.\n\t
    • \n\t
  • \n\tCompilation errors fixed on Windows and GTK+ with SCI_NAMESPACE.\n\t
    • \n\t
  • \n\tOn Windows, building with gcc will check if Direct2D headers are available and enable Direct2D if they are.\n\t
    • \n\t
  • \n\tAvoid attempts to redraw empty areas when lexing beyond the currently visible lines.\n\t
    • \n\t
  • \n\tControl more attributes of indicators in SciTE with find.mark.indicator and highlight.current.word.indicator\n\tproperties.\n\t
    • \n\t
  • \n\tFix SciTE bug with buffers becoming read-only.\n\tBug #1525.\n\t
    • \n\t
  • \n\tFix linking SciTE on non-Linux Unix systems with GNU toolchain by linking to libdl.\n\tBug #1523.\n\t
    • \n\t
  • \n\tOn Windows, SciTE's Incremental Search displays match failures by changing the background colour\n\tinstead of not adding the character that caused failure.\n\t
    • \n\t
  • \n\tFix SciTE on GTK+ 3.x incremental search to change foreground colour when no match as\n\tchanging background colour is difficult.\n\t
    • \n
\n

\n Release 3.3.5\n

\n
    \n\t
  • \n\tReleased 31 August 2013.\n\t
    • \n\t
  • \n\tCharacters may be represented by strings.\n\tIn Unicode mode C1 control characters are represented by their mnemonics.\n\t
    • \n\t
  • \n\tAdded SCI_POSITIONRELATIVE to optimize navigation by character.\n\t
    • \n\t
  • \n\tOption to allow mouse selection to switch to rectangular by pressing Alt after start of gesture.\n\tFeature #1007.\n\t
    • \n\t
  • \n\tLexer added for KVIrc script.\n\tFeature #1008.\n\t
    • \n\t
  • \n\tBash lexer fixed quoted HereDoc delimiters.\n\tBug #1500.\n\t
    • \n\t
  • \n\tMS SQL lexer fixed ';' to appear as an operator.\n\tBug #1509.\n\t
    • \n\t
  • \n\tStructured Text lexer fixed styling of enumeration members.\n\tBug #1508.\n\t
    • \n\t
  • \n\tFixed bug with horizontal caret position when margin changed.\n\tBug #1512.\n\t
    • \n\t
  • \n\tFixed bug on Cocoa where coordinates were relative to text subview instead of whole view.\n\t
    • \n\t
  • \n\tEnsure selection redrawn correctly in two cases.\n\tWhen switching from stream to rectangular selection with Alt+Shift+Up.\n\tWhen reducing the range of an additional selection by moving mouse up.\n\tFeature #1007.\n\t
    • \n\t
  • \n\tCopy and paste of rectangular selections compatible with Borland Delphi IDE on Windows.\n\tFeature #1002.\n\tBug #1513.\n\t
    • \n\t
  • \n\tInitialize extended styles to the default style.\n\t
    • \n\t
  • \n\tOn Windows, fix painting on an explicit HDC when first paint attempt abandoned.\n\t
    • \n\t
  • \n\tQt bindings in ScintillaEdit made to work on 64-bit Unix systems.\n\t
    • \n\t
  • \n\tEasier access to printing on Qt with formatRange method.\n\t
    • \n\t
  • \n\tFixed SciTE failure to save initial buffer in single buffer mode.\n\tBug #1339.\n\t
    • \n\t
  • \n\tFixed compilation problem with Visual C++ in non-English locales.\n\tBug #1506.\n\t
    • \n\t
  • \n\tDisable Direct2D when compiling with MinGW gcc on Windows because of changes in the recent MinGW release.\n\t
    • \n\t
  • \n\tSciTE crash fixed for negative line.margin.width.\n\tBug #1504.\n\t
    • \n\t
  • \n\tSciTE fix for infinite dialog boxes when failing to automatically save a file.\n\tBug #1503.\n\t
    • \n\t
  • \n\tSciTE settings buffered.draw, two.phase.draw, and technology are applied to the\n\toutput pane as well as the edit pane.\n\t
    • \n
\n

\n Release 3.3.4\n

\n
    \n\t
  • \n\tReleased 19 July 2013.\n\t
    • \n\t
  • \n\tHandling of UTF-8 and DBCS text in lexers improved with methods ForwardBytes and\n\tGetRelativeCharacter added to StyleContext.\n\tBug #1483.\n\t
    • \n\t
  • \n\tFor Unicode text, case-insensitive searching and making text upper or lower case is now\n\tcompliant with Unicode standards on all platforms and is much faster for non-ASCII characters.\n\t
    • \n\t
  • \n\tA CategoriseCharacter function was added to return the Unicode general category of a character\n\twhich can be useful in lexers.\n\t
    • \n\t
  • \n\tOn Cocoa, the LCD Optimized font quality level turns font smoothing on.\n\t
    • \n\t
  • \n\tSciTE 'immediate' subsystem added to allow scripts that work while tools are executed.\n\t
    • \n\t
  • \n\tFont quality exposed in SciTE as font.quality setting.\n\t
    • \n\t
  • \n\tOn Cocoa, message:... methods simplify direct access to Scintilla and avoid call layers..\n\t
    • \n\t
  • \n\tA68K lexer updated.\n\t
    • \n\t
  • \n\tCoffeeScript lexer fixes a bug with comment blocks.\n\tBug #1495\n\t
    • \n\t
  • \n\tECL lexer regular expression code fixed.\n\tBug #1491.\n\t
    • \n\t
  • \n\terrorlist lexer only recognizes Perl diagnostics when there is a filename between\n\t\"at\" and \"line\". Had been triggering for MSVC errors containing \"at line\".\n\t
    • \n\t
  • \n\tHaskell lexer fixed to avoid unnecessary full redraws.\n\tDon't highlight CPP inside comments when styling.within.preprocessor is on.\n\tBug #1459.\n\t
    • \n\t
  • \n\tLua lexer fixes bug in labels with UTF-8 text.\n\tBug #1483.\n\t
    • \n\t
  • \n\tPerl lexer fixes bug in string interpolation with UTF-8 text.\n\tBug #1483.\n\t
    • \n\t
  • \n\tFixed bugs with case conversion when the result was longer or shorter than the original text.\n\tCould access past end of string potentially crashing.\n\tSelection now updated to result length.\n\t
    • \n\t
  • \n\tFixed bug where data being inserted and removed was not being reported in\n\tnotification messages. Bug was introduced in 3.3.2.\n\t
    • \n\t
  • \n\tWord wrap bug fixed where the last line could be shown twice.\n\t
    • \n\t
  • \n\tWord wrap bug fixed for lines wrapping too short on Windows and GTK+.\n\t
    • \n\t
  • \n\tWord wrap performance improved.\n\t
    • \n\t
  • \n\tMinor memory leak fixed.\n\tBug #1487.\n\t
    • \n\t
  • \n\tOn Cocoa, fixed insertText: method which was broken when implementing a newer protocol.\n\t
    • \n\t
  • \n\tOn Cocoa, fixed a crash when performing string folding for bytes that do not represent a character\n\tin the current encoding.\n\t
    • \n\t
  • \n\tOn Qt, fixed layout problem when QApplication construction delayed.\n\t
    • \n\t
  • \n\tOn Qt, find_text reports failure with -1 as first element of return value.\n\t
    • \n\t
  • \n\tFixed SciTE on GTK+ bug where a tool command could be performed using the keyboard while one was\n\talready running leading to confusion and crashes.\n\tBug #1486.\n\t
    • \n\t
  • \n\tFixed SciTE bug in Copy as RTF which was limited to first 32 styles.\n\tBug #1011.\n\t
    • \n\t
  • \n\tFixed SciTE on Windows user strip height when the system text scaling factor is 125% or 150%.\n\t
    • \n\t
  • \n\tCompile time checks for Digital Mars C++ removed.\n\t
    • \n\t
  • \n\tVisual C++ 2013 supported.\n\tBug #1492.\n\t
    • \n\t
  • \n\tPython scripts used for building and maintenance improved and moved into scripts directory.\n\t
    • \n\t
  • \n\tTesting scripts now work on Linux using Qt and PySide.\n\t
    • \n\t
  • \n\tTk platform defined.\n\tImplementation for Tk will be available separately from main Scintilla distribution.\n\t
    • \n
\n

\n Release 3.3.3\n

\n
    \n\t
  • \n\tReleased 2 June 2013.\n\t
    • \n\t
  • \n\tLexer and folder added for Structured Text language.\n\tFeature #959.\n\t
    • \n\t
  • \n\tOut of bounds access fixed for GTK+.\n\tBug #1480.\n\t
    • \n\t
  • \n\tCrash fixed for GTK+ on Windows paste.\n\t
    • \n\t
  • \n\tBug fixed with incorrect event copying on GTK+ 3.x.\n\tBug #1481.\n\t
    • \n\t
  • \n\tBug fixed with right to left locales, like Hebrew, on GTK+.\n\tBug #1477.\n\t
    • \n\t
  • \n\tBug fixed with undo grouping of tab and backtab commands.\n\tBug #1478.\n\t
    • \n
\n

\n Release 3.3.2\n

\n
    \n\t
  • \n\tReleased 22 May 2013.\n\t
    • \n\t
  • \n\tBasic implementations of common folding methods added to Scintilla to make it\n\teasier for containers to implement folding.\n\t
    • \n\t
  • \n\tAdd indicator INDIC_COMPOSITIONTHICK, a thick low underline, to mimic an\n\tappearance used for Asian language input composition.\n\t
    • \n\t
  • \n\tOn Cocoa, implement font quality setting.\n\tFeature #988.\n\t
    • \n\t
  • \n\tOn Cocoa, implement automatic enabling of commands and added clear command.\n\tFeature #987.\n\t
    • \n\t
  • \n\tC++ lexer adds style for preprocessor doc comment.\n\tFeature #990.\n\t
    • \n\t
  • \n\tHaskell lexer and folder improved. Separate mode for literate Haskell \"literatehaskell\" SCLEX_LITERATEHASKELL.\n\tBug #1459 .\n\t
    • \n\t
  • \n\tLaTeX lexer bug fixed for Unicode character following '\\'.\n\tBug #1468 .\n\t
    • \n\t
  • \n\tPowerShell lexer recognizes here strings and doccomment keywords.\n\t#region folding added.\n\tFeature #985.\n\t
    • \n\t
  • \n\tFix multi-typing when two carets are located in virtual space on one line so that spaces\n\tare preserved.\n\t
    • \n\t
  • \n\tFixes to input composition on Cocoa and implementation of accented character input through\n\tpress and hold. Set selection correctly so that changes to pieces of composition text are easier to perform.\n\tRestore undo collection after a sequence of composition actions.\n\tComposition popups appear near input.\n\t
    • \n\t
  • \n\tFix lexer problem where no line end was seen at end of document.\n\t
    • \n\t
  • \n\tFix crash on Cocoa when view deallocated.\n\tBug #1466.\n\t
    • \n\t
  • \n\tFix Qt window positioning to not assume the top right of a monitor is at 0, 0.\n\t
    • \n\t
  • \n\tFix Qt to not track mouse when widget is hidden.\n\t
    • \n\t
  • \n\tQt now supports Qt 5.0.\n\tBug #1448.\n\t
    • \n\t
  • \n\tFix drawing on Windows with Direct2D when returning from lock screen.\n\tThe render target had to be recreated and an area would be black since the drawing was not retried.\n\t
    • \n\t
  • \n\tFix display of DBCS documents on Windows Direct2D/DirectWrite with default character set.\n\t
    • \n\t
  • \n\tFor SciTE on Windows, fixed most-recently-used menu when files opened through check.if.already.opened.\n\t
    • \n\t
  • \n\tIn SciTE, do not call OnSave twice when files saved asynchronously.\n\t
    • \n\t
  • \n\tScintilla no longer builds with Visual C++ 6.0.\n\t
    • \n
\n

\n Release 3.3.1\n

\n
    \n\t
  • \n\tReleased 11 April 2013.\n\t
    • \n\t
  • \n\tAutocompletion lists can now appear in priority order or be sorted by Scintilla.\n\tFeature #981.\n\t
    • \n\t
  • \n\tMost lexers now lex an extra NUL byte at the end of the\n\tdocument which makes it more likely they will classify keywords at document end correctly.\n\tBug #574,\n\tBug #588.\n\t
    • \n\t
  • \n\tHaskell lexer improved in several ways.\n\tBug #1459.\n\t
    • \n\t
  • \n\tMatlab/Octave lexer recognizes block comments and ... comments.\n\tBug #1414.\n\t
    • \n\t
  • \n\tRuby lexer crash fixed with keyword at start of document.\n\t
    • \n\t
  • \n\tThe PLAT_NCURSES platform now called PLAT_CURSES as may work on other implementations.\n\t
    • \n\t
  • \n\tBug on Cocoa fixed where input composition with multiple selection or virtual space selection\n\tcould make undo stop working.\n\t
    • \n\t
  • \n\tDirect2D/DirectWrite mode on Windows now displays documents in non-Latin1 8-bit encodings correctly.\n\t
    • \n\t
  • \n\tCharacter positioning corrected in Direct2D/DirectWrite mode on Windows to avoid text moving and cutting off\n\tlower parts of characters.\n\t
    • \n\t
  • \n\tPosition of calltip and autocompletion lists fixed on Cocoa.\n\t
    • \n\t
  • \n\tWhile regular expression search in DBCS text is still not working, matching partial characters is now avoided\n\tby moving end of match to end of character.\n\t
    • \n
\n

\n Release 3.3.0\n

\n
    \n\t
  • \n\tReleased 30 March 2013.\n\t
    • \n\t
  • \n\tOverlay scrollers and kinetic scrolling implemented on Cocoa.\n\t
    • \n\t
  • \n\tTo improve display smoothness, styling and UI Update notifications will, when possible, be performed in\n\ta high-priority idle task on Cocoa instead of during painting.\n\tPerforming these jobs inside painting can cause paints to be abandoned and a new paint scheduled.\n\tOn GTK+, the high-priority idle task is used in more cases.\n\t
    • \n\t
  • \n\tSCI_SCROLLRANGE added to scroll the view to display a range of text.\n\tIf the whole range can not be displayed, priority is given to one end.\n\t
    • \n\t
  • \n\tC++ lexer no longer recognizes raw (R\"\") strings when the first character after \"\n\tis invalid.\n\tBug #1454.\n\t
    • \n\t
  • \n\tHTML lexer recognizes JavaScript RegEx literals in more contexts.\n\tBug #1412.\n\t
    • \n\t
  • \n\tFixed automatic display of folded text when return pressed at end of fold header and\n\tfirst folded line was blank.\n\tBug #1455.\n\t
    • \n\t
  • \n\tSCI_VISIBLEFROMDOCLINE fixed to never return a line beyond the document end.\n\t
    • \n\t
  • \n\tSCI_LINESCROLL fixed for a negative column offset.\n\tBug #1450.\n\t
    • \n\t
  • \n\tOn GTK+, fix tab markers so visible if indent markers are visible.\n\tBug #1453.\n\t
    • \n
\n

\n Release 3.2.5\n

\n
    \n\t
  • \n\tReleased 26 February 2013.\n\t
    • \n\t
  • \n\tTo allow cooperation between different uses of extended (beyond 255) styles they should be allocated\n\tusing SCI_ALLOCATEEXTENDEDSTYLES.\n\t
    • \n\t
  • \n\tFor Unicode documents, lexers that use StyleContext will retrieve whole characters\n\tinstead of bytes.\n\tLexAccessor provides a LineEnd method which can be a more efficient way to\n\thandle line ends and can enable Unicode line ends.\n\t
    • \n\t
  • \n\tThe C++ lexer understands the #undef directive when determining preprocessor definitions.\n\tFeature #978.\n\t
    • \n\t
  • \n\tThe errorlist lexer recognizes gcc include path diagnostics that appear before an error.\n\t
    • \n\t
  • \n\tFolding implemented for GetText (PO) translation language.\n\tBug #1437.\n\t
    • \n\t
  • \n\tHTML lexer does not interrupt comment style for processing instructions.\n\tBug #1447.\n\t
    • \n\t
  • \n\tFix SciTE forgetting caret x-position when switching documents.\n\tBug #1442.\n\t
    • \n\t
  • \n\tFixed bug where vertical scrollbar thumb appeared at beginning of document when\n\tscrollbar shown.\n\tBug #1446.\n\t
    • \n\t
  • \n\tFixed brace-highlighting bug on OS X 10.8 where matching brace is on a different line.\n\t
    • \n\t
  • \n\tProvisional features\n\tare new features that may change or be removed if they cause problems but should become\n\tpermanent if they work well.\n\tFor this release Unicode line ends and\n\tsubstyles\n\tare provisional features.\n\t
    • \n
\n

\n Release 3.2.4\n

\n
    \n\t
  • \n\tReleased 17 January 2013.\n\t
    • \n\t
  • \n\tCaret line highlight can optionally remain visible when window does not have focus.\n\tFeature #964.\n\t
    • \n\t
  • \n\tDelegate mechanism for notifications added on Cocoa.\n\t
    • \n\t
  • \n\tNUL characters in selection are copied to clipboard as spaces to avoid truncating\n\tat the NUL.\n\tBug #1289.\n\t
    • \n\t
  • \n\tC++ lexer fixes problem with showing inactive sections when preprocessor lines contain trailing comment.\n\tBug #1413.\n\t
    • \n\t
  • \n\tC++ lexer fixes problem with JavaScript regular expressions with '/' in character ranges.\n\tBug #1415.\n\t
    • \n\t
  • \n\tLaTeX folder added.\n\tFeature #970.\n\t
    • \n\t
  • \n\tLaTeX lexer improves styling of math environments.\n\tFeature #970.\n\t
    • \n\t
  • \n\tMySQL lexer implements hidden commands.\n\t
    • \n\t
  • \n\tOnly produce a single undo step when autocompleting a single word.\n\tBug #1421.\n\t
    • \n\t
  • \n\tFixed crash when printing lines longer than 8000 characters.\n\tBug #1430.\n\t
    • \n\t
  • \n\tFixed problem in character movement extends selection mode where reversing\n\tdirection collapsed the selection.\n\t
    • \n\t
  • \n\tMemory issues fixed on Cocoa, involving object ownership,\n\tlifetime of timers, and images held by the info bar.\n\tBug #1436.\n\t
    • \n\t
  • \n\tCocoa key binding for Alt+Delete changed to delete previous word to be more compatible with\n\tplatform standards.\n\t
    • \n\t
  • \n\tFixed crash on Cocoa with scrollbar when there is no scrolling possible.\n\tBug #1416.\n\t
    • \n\t
  • \n\tOn Cocoa with retina display fixed positioning of autocompletion lists.\n\t
    • \n\t
  • \n\tFixed SciTE on Windows failure to run a batch file with a name containing a space by\n\tquoting the path in the properties file.\n\tBug #1423.\n\t
    • \n\t
  • \n\tFixed scaling bug when printing on GTK+.\n\tBug #1427.\n\t
    • \n\t
  • \n\tSciTE on GTK toolbar.detachable feature removed.\n\t
    • \n\t
  • \n\tFixed some background saving bugs in SciTE.\n\tBug #1366.\n\tBug #1339.\n\t
    • \n
\n

\n Release 3.2.3\n

\n
    \n\t
  • \n\tReleased 21 October 2012.\n\t
    • \n\t
  • \n\tImprove speed when performing multiple searches.\n\t
    • \n\t
  • \n\tSciTE adds definition of PLAT_UNIX for both PLAT_GTK and PLAT_MAC to allow consolidation of\n\tsettings valid on all Unix variants.\n\t
    • \n\t
  • \n\tSignal autoCompleteCancelled added on Qt.\n\t
    • \n\t
  • \n\tBash lexer supports nested delimiter pairs.\n\tFeature #3569352.\n\tBug #1515556.\n\tBug #3008483.\n\tBug #3512208.\n\tBug #3515392.\n\t
    • \n\t
  • \n\tFor C/C++, recognize exponent in floating point hexadecimal literals.\n\tBug #3576454.\n\t
    • \n\t
  • \n\tFor C #include statements, do not treat // in the path as a comment.\n\tBug #3519260.\n\t
    • \n\t
  • \n\tLexer for GetText translations (PO) improved with additional styles and single instance limitation fixed.\n\t
    • \n\t
  • \n\tRuby for loop folding fixed.\n\tBug #3240902.\n\tBug #3567391.\n\t
    • \n\t
  • \n\tRuby recognition of here-doc after class or instance variable fixed.\n\tBug #3567809.\n\t
    • \n\t
  • \n\tSQL folding of loop and case fixed.\n\tBug #3567905.\n\t
    • \n\t
  • \n\tSQL folding of case with assignment fixed.\n\tBug #3571820.\n\t
    • \n\t
  • \n\tFix hang when removing all characters from indicator at end of document.\n\t
    • \n\t
  • \n\tFix failure of \\xhh in regular expression search for values greater than 0x79.\n\t
    • \n\t
  • \n\tOn Cocoa on OS X 10.8, fix inverted drawing of find indicator.\n\t
    • \n\t
  • \n\tOn Cocoa, fix double drawing when horizontal scroll range small and user swipes horizontally.\n\t
    • \n\t
  • \n\tOn Cocoa, remove incorrect setting of save point when reading information through 'string' and 'selectedString'.\n\t
    • \n\t
  • \n\tOn Cocoa, fix incorrect memory management of infoBar.\n\t
    • \n\t
  • \n\tOn GTK+ 3 Ubuntu, fix crash when drawing margin.\n\t
    • \n\t
  • \n\tOn ncurses, fix excessive spacing with italics line end.\n\t
    • \n\t
  • \n\tOn Windows, search for D2D1.DLL and DWRITE.DLL in system directory to avoid loading from earlier\n\tin path where could be planted by malware.\n\t
    • \n
\n

\n Release 3.2.2\n

\n
    \n\t
  • \n\tReleased 31 August 2012.\n\t
    • \n\t
  • \n\tRetina display support for Cocoa. Text size fixed.\n\tScale factor for images implemented so they can be displayed in high definition.\n\t
    • \n\t
  • \n\tImplement INDIC_SQUIGGLEPIXMAP as a faster version of INDIC_SQUIGGLE.\n\tAvoid poor drawing at right of INDIC_SQUIGGLE.\n\tAlign INDIC_DOTBOX to pixel grid for full intensity.\n\t
    • \n\t
  • \n\tImplement SCI_GETSELECTIONEMPTY API.\n\tBug #3543121.\n\t
    • \n\t
  • \n\tAdded SCI_VCHOMEDISPLAY and SCI_VCHOMEDISPLAYEXTEND key commands.\n\tFeature #3561433.\n\t
    • \n\t
  • \n\tAllow specifying SciTE Find in Files directory with find.in.directory property.\n\tFeature #3558594.\n\t
    • \n\t
  • \n\tOverride SciTE global strip.trailing.spaces with strip.trailing.spaces by pattern files.\n\tFeature #3556320.\n\t
    • \n\t
  • \n\tFix long XML script tag handling in XML lexer.\n\tBug #3534190.\n\t
    • \n\t
  • \n\tFix rectangular selection range after backspace.\n\tBug #3543097.\n\t
    • \n\t
  • \n\tSend SCN_UPDATEUI with SC_UPDATE_SELECTION for backspace in virtual space.\n\tBug #3543121.\n\t
    • \n\t
  • \n\tAvoid problems when calltip highlight range is negative.\n\tBug #3545938.\n\t
    • \n\t
  • \n\tOn Cocoa, fix image drawing code so that image is not accessed after being freed\n\tand is drawn in the correct location.\n\t
    • \n\t
  • \n\tOn Cocoa, limit horizontal touch scrolling to existing established width.\n\t
    • \n\t
  • \n\tOn Cocoa, decrease sensitivity of pinch-zoom.\n\t
    • \n\t
  • \n\tFix Cocoa drawing where style changes were not immediately visible.\n\t
    • \n\t
  • \n\tFix Cocoa memory leak due to reference cycle.\n\t
    • \n\t
  • \n\tFix Cocoa bug where notifications were sent after Scintilla was freed.\n\t
    • \n\t
  • \n\tSciTE on OS X user shortcuts treats \"Ctrl+D\" as equivalent to \"Ctrl+d\".\n\t
    • \n\t
  • \n\tOn Windows, saving SciTE's Lua startup script causes it to run.\n\t
    • \n\t
  • \n\tLimit time allowed to highlight current word in SciTE to 0.25 seconds to remain responsive.\n\t
    • \n\t
  • \n\tFixed SciTE read-only mode to stick with buffer.\n\t
    • \n\t
  • \n\tFor SciTE on Windows, enable Ctrl+Z, Ctrl+X, and Ctrl+C (Undo, Cut, and Copy) in the\n\teditable fields of find and replace strips\n\t
    • \n\t
  • \n\tRemove limit on logical line length in SciTE .properties files.\n\tBug #3544312.\n\t
    • \n\t
  • \n\tImprove performance of SciTE Save As command.\n\t
    • \n\t
  • \n\tFix SciTE crash with empty .properties files. Bug #3545938.\n\tBug #3555308.\n\t
    • \n\t
  • \n\tFix repeated letter in SciTE calltips.\n\tBug #3545938.\n\t
    • \n\t
  • \n\tRefine build time checking for Direct2D and DirectWrite.\n\t
    • \n\t
  • \n\tAvoid potential build problems on Windows with MultiMon.h by explicitly checking for multi-monitor APIs.\n\t
    • \n\t
  • \n\tAutomatically disable themed drawing in SciTE when building on Windows 2000.\n\tReenable building for Windows NT 4 on NT 4 .\n\t
    • \n\t
  • \n\tAdded ncurses platform definitions. Implementation is maintained separately as\n\tScinterm.\n\t
    • \n
\n

\n Release 3.2.1\n

\n
    \n\t
  • \n\tReleased 14 July 2012.\n\t
    • \n\t
  • \n\tIn Scintilla.iface, specify features as properties instead of functions where possible and fix some enumerations.\n\t
    • \n\t
  • \n\tIn SciTE Lua scripts, string properties in Scintilla API can be retrieved as well as set using property notation.\n\t
    • \n\t
  • \n\tAdded character class APIs: SCI_SETPUNCTUATIONCHARS, SCI_GETWORDCHARS, SCI_GETWHITESPACECHARS,\n\tand SCI_GETPUNCTUATIONCHARS.\n\tFeature #3529805.\n\t
    • \n\t
  • \n\tLess/Hss support added to CSS lexer.\n\tFeature #3532413.\n\t
    • \n\t
  • \n\tC++ lexer style SCE_C_PREPROCESSORCOMMENT added for stream comments in preprocessor.\n\tBug #3487406.\n\t
    • \n\t
  • \n\tFix incorrect styling of inactive code in C++ lexer.\n\tBug #3533036.\n\t
    • \n\t
  • \n\tFix incorrect styling by C++ lexer after empty lines in preprocessor style.\n\t
    • \n\t
  • \n\tC++ lexer option \"lexer.cpp.allow.dollars\" fixed so can be turned off after being on.\n\tBug #3541461.\n\t
    • \n\t
  • \n\tFortran fixed format lexer fixed to style comments from column 73.\n\tBug #3540486.\n\t
    • \n\t
  • \n\tFortran folder folds CRITICAL .. END CRITICAL.\n\tBug #3540486.\n\t
    • \n\t
  • \n\tFortran lexer fixes styling after comment line ending with '&'.\n\tBug #3087226.\n\t
    • \n\t
  • \n\tFortran lexer styles preprocessor lines so they do not trigger incorrect folding.\n\tBug #2906275.\n\t
    • \n\t
  • \n\tFortran folder fixes folding of nested ifs.\n\tBug #2809176.\n\t
    • \n\t
  • \n\tHTML folder fixes folding of CDATA when fold.html.preprocessor=0.\n\tBug #3540491.\n\t
    • \n\t
  • \n\tOn Cocoa, fix autocompletion font lifetime issue and row height computation.\n\t
    • \n\t
  • \n\tIn 'choose single' mode, autocompletion will close an existing list if asked to display a single entry list.\n\t
    • \n\t
  • \n\tFixed SCI_MARKERDELETE to only delete one marker per call.\n\tBug #3535806.\n\t
    • \n\t
  • \n\tProperly position caret after undoing coalesced delete operations.\n\tBug #3523326.\n\t
    • \n\t
  • \n\tEnsure margin is redrawn when SCI_MARGINSETSTYLE called.\n\t
    • \n\t
  • \n\tFix clicks in first pixel of margins to send SCN_MARGINCLICK.\n\t
    • \n\t
  • \n\tFix infinite loop when drawing block caret for a zero width space character at document start.\n\t
    • \n\t
  • \n\tCrash fixed for deleting negative range.\n\t
    • \n\t
  • \n\tFor characters that overlap the beginning of their space such as italics descenders and bold serifs, allow start\n\tof text to draw 1 pixel into margin.\n\tBug #699587.\n\tBug #3537799.\n\t
    • \n\t
  • \n\tFixed problems compiling Scintilla for Qt with GCC 4.7.1 x64.\n\t
    • \n\t
  • \n\tFixed problem with determining GTK+ sub-platform caused when adding Qt support in 3.2.0.\n\t
    • \n\t
  • \n\tFix incorrect measurement of untitled file in SciTE on Linux leading to message \"File ...' is 2147483647 bytes long\".\n\tBug #3537764.\n\t
    • \n\t
  • \n\tIn SciTE, fix open of selected filename with line number to go to that line.\n\t
    • \n\t
  • \n\tFix problem with last visible buffer closing in SciTE causing invisible buffers to be active.\n\t
    • \n\t
  • \n\tAvoid blinking of SciTE's current word highlight when output pane changes.\n\t
    • \n\t
  • \n\tSciTE properties files can be longer than 60K.\n\t
    • \n
\n

\n Release 3.2.0\n

\n
    \n\t
  • \n\tReleased 1 June 2012.\n\t
    • \n\t
  • \n\tPlatform layer added for the Qt open-source cross-platform application and user interface framework\n\tfor development in C++ or in Python with the PySide bindings for Qt.\n\t
    • \n\t
  • \n\tDirect access provided to the document bytes for ranges within Scintilla.\n\tThis is similar to the existing SCI_GETCHARACTERPOINTER API but allows for better performance.\n\t
    • \n\t
  • \n\tCtrl+Double Click and Ctrl+Triple Click add the word or line to the set of selections.\n\tFeature #3520037.\n\t
    • \n\t
  • \n\tA SCI_DELETERANGE API was added for deleting a range of text.\n\t
    • \n\t
  • \n\tLine wrap markers may now be drawn in the line number margin.\n\tFeature #3518198.\n\t
    • \n\t
  • \n\tSciTE on OS X adds option to hide hidden files in the open dialog box.\n\t
    • \n\t
  • \n\tLexer added for OScript language.\n\tFeature #3523197.\n\t
    • \n\t
  • \n\tLexer added for Visual Prolog language.\n\tFeature #3523018.\n\t
    • \n\t
  • \n\tUTF-8 validity is checked more stringently and consistently. All 66 non-characters are now treated as invalid.\n\t
    • \n\t
  • \n\tHTML lexer bug fixed with inconsistent highlighting for PHP when attribute on separate line from tag.\n\tBug #3520027.\n\t
    • \n\t
  • \n\tHTML lexer bug fixed for JavaScript block comments.\n\tBug #3520032.\n\t
    • \n\t
  • \n\tAnnotation drawing bug fixed when box displayed with different colours on different lines.\n\tBug #3519872.\n\t
    • \n\t
  • \n\tOn Windows with Direct2D, fix drawing with 125% and 150% DPI system settings.\n\t
    • \n\t
  • \n\tVirtual space selection bug fixed for rectangular selections.\n\tBug #3519246.\n\t
    • \n\t
  • \n\tReplacing multiple selection with newline changed to only affect main selection.\n\tBug #3522251.\n\t
    • \n\t
  • \n\tReplacing selection with newline changed to group deletion and insertion as a single undo action.\n\tBug #3522250.\n\t
    • \n\t
  • \n\tAuto-completion lists on GTK+ 3 set height correctly instead of showing too few lines.\n\t
    • \n\t
  • \n\tMouse wheel scrolling changed to avoid GTK+ bug in recent distributions.\n\t
    • \n\t
  • \n\tIME bug on Windows fixed for horizontal jump.\n\tBug #3529728.\n\t
    • \n\t
  • \n\tSciTE case-insensitive autocompletion filters equal identifiers better.\n\tCalltip arrows work with bare word identifiers.\n\tBug #3517810.\n\t
    • \n\t
  • \n\tSciTE bug fixed where shbang lines not setting file type when switching\n\tto file loaded in background.\n\t
    • \n\t
  • \n\tSciTE on GTK+ shows open and save dialogs with the directory of the current file displayed.\n\t
    • \n
\n

\n Release 3.1.0\n

\n
    \n\t
  • \n\tReleased 20 April 2012.\n\t
    • \n\t
  • \n\tAnimated find indicator added on Cocoa.\n\t
    • \n\t
  • \n\tButtons can be made default in SciTE user strips.\n\t
    • \n\t
  • \n\tSciTE allows find and replace histories to be saved in session.\n\t
    • \n\t
  • \n\tOption added to allow case-insensitive selection in auto-completion lists.\n\tBug #3516538.\n\t
    • \n\t
  • \n\tReplace \\0 by complete found text in regular expressions.\n\tFeature #3510979.\n\t
    • \n\t
  • \n\tFixed single quoted strings in bash lexer.\n\tBug #3512208.\n\t
    • \n\t
  • \n\tIncorrect highlighting fixed in C++ lexer for continued lines.\n\tBug #3509317.\n\t
    • \n\t
  • \n\tHang fixed in diff lexer.\n\tBug #3508602.\n\t
    • \n\t
  • \n\tFolding improved for SQL CASE/MERGE statement.\n\tBug #3503277.\n\t
    • \n\t
  • \n\tFix extra drawing of selection inside word wrap indentation.\n\tBug #3515555.\n\t
    • \n\t
  • \n\tFix problem with determining the last line that needs styling when drawing.\n\tBug #3514882.\n\t
    • \n\t
  • \n\tFix problems with drawing in margins.\n\tBug #3514882.\n\t
    • \n\t
  • \n\tFix printing crash when using Direct2D to display on-screen.\n\tBug #3513946.\n\t
    • \n\t
  • \n\tFix SciTE bug where background.*.size disabled restoration of bookmarks and positions from session.\n\tBug #3514885.\n\t
    • \n\t
  • \n\tFixed the Move Selected Lines command when last line does not end with a line end character.\n\tBug #3511023.\n\t
    • \n\t
  • \n\tFix word wrap indentation printing to use printer settings instead of screen settings.\n\tBug #3512961.\n\t
    • \n\t
  • \n\tFix SciTE bug where executing an empty command prevented executing further commands\n\tBug #3512976.\n\t
    • \n\t
  • \n\tFix SciTE bugs with focus in user strips and made strips more robust with invalid definitions.\n\t
    • \n\t
  • \n\tSuppress SciTE regular expression option when searching with find next selection.\n\tBug #3510985.\n\t
    • \n\t
  • \n\tSciTE Find in Files command matches empty pattern to all files.\n\tFeature #3495918.\n\t
    • \n\t
  • \n\tFix scroll with mouse wheel on GTK+.\n\tBug #3501321.\n\t
    • \n\t
  • \n\tFix column finding method so that tab is counted correctly.\n\tBug #3483713.\n\t
    • \n
\n

\n Release 3.0.4\n

\n
    \n\t
  • \n\tReleased 8 March 2012.\n\t
    • \n\t
  • \n\tSciTE scripts can create user interfaces as strips.\n\t
    • \n\t
  • \n\tSciTE can save files automatically in the background.\n\t
    • \n\t
  • \n\tPinch zoom implemented on Cocoa.\n\t
    • \n\t
  • \n\tECL lexer added.\n\tFeature #3488209.\n\t
    • \n\t
  • \n\tCPP lexer fixes styling after document comment keywords.\n\tBug #3495445.\n\t
    • \n\t
  • \n\tPascal folder improves handling of some constructs.\n\tFeature #3486385.\n\t
    • \n\t
  • \n\tXML lexer avoids entering a bad mode due to complex preprocessor instructions.\n\tBug #3488060.\n\t
    • \n\t
  • \n\tDuplicate command is always remembered as a distinct command for undo.\n\tBug #3495836.\n\t
    • \n\t
  • \n\tSciTE xml.auto.close.tags no longer closes with PHP code similar to <a $this->\n\tBug #3488067.\n\t
    • \n\t
  • \n\tFix bug where setting an indicator for the whole document would fail.\n\tBug #3487440.\n\t
    • \n\t
  • \n\tCrash fixed for SCI_MOVESELECTEDLINESDOWN with empty vertical selection.\n\tBug #3496403.\n\t
    • \n\t
  • \n\tDifferences between buffered and unbuffered mode on Direct2D eliminated.\n\tBug #3495791.\n\t
    • \n\t
  • \n\tFont leading implemented for Direct2D to improve display of character blobs.\n\tBug #3494744.\n\t
    • \n\t
  • \n\tFractional widths used for line numbers, character markers and other situations.\n\tBug #3494492.\n\t
    • \n\t
  • \n\tTranslucent rectangles drawn using Direct2D with sharper corners.\n\tBug #3494492.\n\t
    • \n\t
  • \n\tRGBA markers drawn sharper when centred using Direct2D.\n\tBug #3494202.\n\t
    • \n\t
  • \n\tRGBA markers are drawn centred when taller than line.\n\tBug #3494184.\n\t
    • \n\t
  • \n\tImage marker drawing problem fixed for markers taller than line.\n\tBug #3493503.\n\t
    • \n\t
  • \n\tMarkers are drawn horizontally off-centre based on margin type instead of dimensions.\n\tBug #3488696.\n\t
    • \n\t
  • \n\tFold tail markers drawn vertically centred.\n\tFeature #3488289.\n\t
    • \n\t
  • \n\tOn Windows, Scintilla is more responsive in wrap mode.\n\tBug #3487397.\n\t
    • \n\t
  • \n\tUnimportant \"Gdk-CRITICAL\" messages are no longer displayed.\n\tBug #3488481.\n\t
    • \n\t
  • \n\tSciTE on Windows Find in Files sets focus to dialog when already created; allows opening dialog when a job is running.\n\tBug #3480635.\n\tBug #3486657.\n\t
    • \n\t
  • \n\tFixed problems with multiple clicks in margin and with mouse actions combined with virtual space.\n\tBug #3484370.\n\t
    • \n\t
  • \n\tFixed bug with using page up and down and not returning to original line.\n\tBug #3485669.\n\t
    • \n\t
  • \n\tDown arrow with wrapped text no longer skips lines.\n\tBug #1776560.\n\t
    • \n\t
  • \n\tFix problem with dwell ending immediately due to word wrap.\n\tBug #3484416.\n\t
    • \n\t
  • \n\tWrapped lines are rewrapped more consistently while resizing window.\n\tBug #3484179.\n\t
    • \n\t
  • \n\tSelected line ends are highlighted more consistently.\n\tBug #3484330.\n\t
    • \n\t
  • \n\tFix grey background on files that use shbang to choose language.\n\tBug #3482777.\n\t
    • \n\t
  • \n\tFix failure messages from empty commands in SciTE.\n\tBug #3480645.\n\t
    • \n\t
  • \n\tRedrawing reduced for some marker calls.\n\tFeature #3493530.\n\t
    • \n\t
  • \n\tMatch brace and select brace commands work in SciTE output pane.\n\tFeature #3486598.\n\t
    • \n\t
  • \n\tPerforming SciTE \"Show Calltip\" command when a calltip is already visible shows the next calltip.\n\tFeature #3487017.\n\t
    • \n\t
  • \n\tSciTE allows saving file even when file unchanged.\n\tFeature #3486654.\n\t
    • \n\t
  • \n\tSciTE allows optional use of character escapes in calltips.\n\tFeature #3495239.\n\t
    • \n\t
  • \n\tSciTE can open file:// URLs with Ctrl+Shift+O.\n\tFeature #3495389.\n\t
    • \n\t
  • \n\tKey modifiers updated for GTK+ on OS X to match upstream changes.\n\t
    • \n\t
  • \n\tSciTE hang when marking all occurrences of regular expressions fixed.\n\t
    • \n
\n

\n Release 3.0.3\n

\n
    \n\t
  • \n\tReleased 28 January 2012.\n\t
    • \n\t
  • \n\tPrinting works on GTK+ version 2.x as well as 3.x.\n\t
    • \n\t
  • \n\tLexer added for the AviSynth language.\n\tFeature #3475611.\n\t
    • \n\t
  • \n\tLexer added for the Take Command / TCC scripting language.\n\tFeature #3462462.\n\t
    • \n\t
  • \n\tCSS lexer gains support for SCSS.\n\tFeature #3268017.\n\t
    • \n\t
  • \n\tCPP lexer fixes problems in the preprocessor structure caused by continuation lines.\n\tBug #3458508.\n\t
    • \n\t
  • \n\tErrorlist lexer handles column numbers for GCC format diagnostics.\n\tIn SciTE, Next Message goes to column where this can be decoded from GCC format diagnostics.\n\tFeature #3453075.\n\t
    • \n\t
  • \n\tHTML folder fixes spurious folds on some tags.\n\tBug #3459262.\n\t
    • \n\t
  • \n\tRuby lexer fixes bug where '=' at start of file caused whole file to appear as a comment.\n\tBug #3452488.\n\t
    • \n\t
  • \n\tSQL folder folds blocks of single line comments.\n\tFeature #3467425.\n\t
    • \n\t
  • \n\tOn Windows using Direct2D, defer invalidation of render target until completion of painting to avoid failures.\n\t
    • \n\t
  • \n\tFurther support of fractional positioning. Spaces, tabs, and single character tokens can take fractional space\n\tand wrapped lines are positioned taking fractional positions into account.\n\tBug #3471998.\n\t
    • \n\t
  • \n\tOn Windows using Direct2D, fix extra carets appearing.\n\tBug #3471998.\n\t
    • \n\t
  • \n\tFor autocompletion lists Page Up and Down move by the list height instead of by 5 lines.\n\tBug #3455493.\n\t
    • \n\t
  • \n\tFor SCI_LINESCROLLDOWN/UP don't select into virtual space.\n\tBug #3451681.\n\t
    • \n\t
  • \n\tFix fold highlight not being fully drawn.\n\tBug #3469936.\n\t
    • \n\t
  • \n\tFix selection margin appearing black when starting in wrap mode.\n\t
    • \n\t
  • \n\tFix crash when changing end of document after adding an annotation.\n\tBug #3476637.\n\t
    • \n\t
  • \n\tFix problems with building to make RPMs.\n\tBug #3476149.\n\t
    • \n\t
  • \n\tFix problem with building on GTK+ where recent distributions could not find gmodule.\n\tBug #3469056.\n\t
    • \n\t
  • \n\tFix problem with installing SciTE on GTK+ due to icon definition in .desktop file including an extension.\n\tBug #3476117.\n\t
    • \n\t
  • \n\tFix SciTE bug where new buffers inherited some properties from previously opened file.\n\tBug #3457060.\n\t
    • \n\t
  • \n\tFix focus when closing tab in SciTE with middle click. Focus moves to edit pane instead of staying on tab bar.\n\tBug #3440142.\n\t
    • \n\t
  • \n\tFor SciTE on Windows fix bug where Open Selected Filename for URL would append a file extension.\n\tFeature #3459185.\n\t
    • \n\t
  • \n\tFor SciTE on Windows fix key handling of control characters in Parameters dialog so normal editing (Ctrl+C, ...) works.\n\tBug #3459345.\n\t
    • \n\t
  • \n\tFix SciTE bug where files became read-only after saving. Drop the \"*\" dirty marker after save completes.\n\tBug #3467432.\n\t
    • \n\t
  • \n\tFor SciTE handling of diffs with \"+++\" and \"---\" lines, also handle case where not followed by tab.\n\tGo to correct line for diff \"+++\" message.\n\tBug #3467143.\n\tBug #3467178.\n\t
    • \n\t
  • \n\tSciTE on GTK+ now performs threaded actions even on GTK+ versions before 2.12.\n\t
    • \n
\n

\n Release 3.0.2\n

\n
    \n\t
  • \n\tReleased 9 December 2011.\n\t
    • \n\t
  • \n\tSciTE saves files in the background without blocking the user interface.\n\t
    • \n\t
  • \n\tPrinting implemented in SciTE on GTK+ 3.x.\n\t
    • \n\t
  • \n\tILoader interface for background loading finalized and documented.\n\t
    • \n\t
  • \n\tCoffeeScript lexer added.\n\t
    • \n\t
  • \n\tC++ lexer fixes crash with \"#if defined( XXX 1\".\n\t
    • \n\t
  • \n\tCrash with Direct2D on Windows fixed.\n\t
    • \n\t
  • \n\tBackspace removing protected range fixed.\n\tBug #3445911.\n\t
    • \n\t
  • \n\tCursor setting failure on Windows when screen saver on fixed.\n\tBug #3438780.\n\t
    • \n\t
  • \n\tSciTE on GTK+ hang fixed with -open:file option.\n\tBug #3441980.\n\t
    • \n\t
  • \n\tFailure to evaluate shbang fixed in SciTE.\n\tBug #3441801.\n\t
    • \n\t
  • \n\tSciTE failure to treat files starting with \"<?xml\" as XML fixed.\n\tBug #3440718.\n\t
    • \n\t
  • \n\tMade untitled tab saveable when created by closing all files.\n\tBug #3440244.\n\t
    • \n\t
  • \n\tSciTE crash fixed when using Scintillua.\n\t
    • \n\t
  • \n\tSciTE revert command fixed so that undo works on individual actions instead of undoing to revert point.\n\t
    • \n\t
  • \n\tFocus loss in SciTE when opening a recent file fixed.\n\tBug #3440142.\n\t
    • \n\t
  • \n\tFixed SciTE SelLength property to measure characters instead of bytes.\n\tBug #3283519.\n\t
    • \n
\n

\n Release 3.0.1\n

\n
    \n\t
  • \n\tReleased 15 November 2011.\n\t
    • \n\t
  • \n\tSciTE on Windows now runs Lua scripts directly on the main thread instead of starting them on a\n\tsecondary thread and then moving back to the main thread.\n\t
    • \n\t
  • \n\tHighlight \"else\" as a keyword for TCL in the same way as other languages.\n\tBug #1836954.\n\t
    • \n\t
  • \n\tFix problems with setting fonts for autocompletion lists on Windows where\n\tfont handles were copied and later deleted causing a system default font to be used.\n\t
    • \n\t
  • \n\tFix font size used on Windows for Asian language input methods which sometimes led to IME not being visible.\n\tBug #3436753.\n\t
    • \n\t
  • \n\tFixed polygon drawing on Windows so fold symbols are visible again.\n\tBug #3433558.\n\t
    • \n\t
  • \n\tChanged background drawing on GTK+ to allow for fractional character positioning as occurs on OS X\n\tas this avoids faint lines at lexeme boundaries.\n\t
    • \n\t
  • \n\tEnsure pixmaps allocated before painting as there was a crash when Scintilla drew without common initialization calls.\n\tBug #3432354.\n\t
    • \n\t
  • \n\tFixed SciTE on Windows bug causing wrong caret position after indenting a selection.\n\tBug #3433433.\n\t
    • \n\t
  • \n\tFixed SciTE session saving to store buffer position matching buffer.\n\tBug #3434372.\n\t
    • \n\t
  • \n\tFixed leak of document objects in SciTE.\n\t
    • \n\t
  • \n\tRecognize URL characters '?' and '%' for Open Selected command in SciTE.\n\tBug #3429409.\n\t
    • \n
\n

\n Release 3.0.0\n

\n
    \n\t
  • \n\tReleased 1 November 2011.\n\t
    • \n\t
  • \n\tCarbon platform support removed. OS X applications should switch to Cocoa.\n\t
    • \n\t
  • \n\tOn Windows Vista or newer, drawing may be performed with Direct2D and DirectWrite instead of GDI.\n\t
    • \n\t
  • \n\tCairo is now used for all drawing on GTK+. GDK drawing was removed.\n\t
    • \n\t
  • \n\tPaletted display support removed.\n\t
    • \n\t
  • \n\tFractional font sizes can be specified.\n\t
    • \n\t
  • \n\tDifferent weights of text supported on some platforms instead of just normal and bold.\n\t
    • \n\t
  • \n\tSub-pixel character positioning supported.\n\t
    • \n\t
  • \n\tSciTE loads files in the background without blocking the user interface.\n\t
    • \n\t
  • \n\tSciTE can display diagnostic messages interleaved with the text of files immediately after the\n\tline referred to by the diagnostic.\n\t
    • \n\t
  • \n\tNew API to see if all lines are visible which can be used to optimize processing fold structure notifications.\n\t
    • \n\t
  • \n\tScrolling optimized by avoiding invalidation of fold margin when redrawing whole window.\n\t
    • \n\t
  • \n\tOptimized SCI_MARKERNEXT.\n\t
    • \n\t
  • \n\tC++ lexer supports Pike hash quoted strings when turned on with lexer.cpp.hashquoted.strings.\n\t
    • \n\t
  • \n\tFixed incorrect line height with annotations in wrapped mode when there are multiple views.\n\tBug #3388159.\n\t
    • \n\t
  • \n\tCalltips may be displayed above the text as well as below.\n\tBug #3410830.\n\t
    • \n\t
  • \n\tFor huge files SciTE only examines the first megabyte for newline discovery.\n\t
    • \n\t
  • \n\tSciTE on GTK+ removes the fileselector.show.hidden property and check box as this was buggy and GTK+ now\n\tsupports an equivalent feature.\n\tBug #3413630.\n\t
    • \n\t
  • \n\tSciTE on GTK+ supports mnemonics in dynamic menus.\n\t
    • \n\t
  • \n\tSciTE on GTK+ displays the user's home directory as '~' in menus to make them shorter.\n\t
    • \n
\n

\n Release 2.29\n

\n
    \n\t
  • \n\tReleased 16 September 2011.\n\t
    • \n\t
  • \n\tTo automatically discover the encoding of a file when opening it, SciTE can run a program set with command.discover.properties.\n\tFeature #3324341.\n\t
    • \n\t
  • \n\tCairo always used for drawing on GTK+.\n\t
    • \n\t
  • \n\tThe set of properties files imported by SciTE can be controlled with the properties imports.include and imports.exclude.\n\tThe import statement has been extended to allow \"import *\".\n\tThe properties files for some languages are no longer automatically loaded by default. The properties files affected are\n\tavenue, baan, escript, lot, metapost, and mmixal.\n\t
    • \n\t
  • \n\tC++ lexer fixed a bug with raw strings being recognized too easily.\n\tBug #3388122.\n\t
    • \n\t
  • \n\tLaTeX lexer improved with more states and fixes to most outstanding bugs.\n\tBug #1493111.\n\tBug #1856356.\n\tBug #3081692.\n\t
    • \n\t
  • \n\tLua lexer updates for Lua 5.2 beta with goto labels and \"\\z\" string escape.\n\tFeature #3386330.\n\t
    • \n\t
  • \n\tPerl string styling highlights interpolated variables.\n\tFeature #3394258.\n\tBug #3076629.\n\t
    • \n\t
  • \n\tPerl lexer updated for Perl 5.14.0 with 0X and 0B numeric literal prefixes, break keyword and \"+\" supported in subroutine prototypes.\n\tFeature #3388802.\n\t
    • \n\t
  • \n\tPerl bug fixed with CRLF line endings.\n\t
    • \n\t
  • \n\tMarkdown lexer fixed to not change state with \"_\" in middle of word.\n\tBug #3398184.\n\t
    • \n\t
  • \n\tCocoa restores compatibility with OS X 10.5.\n\t
    • \n\t
  • \n\tMouse pointer changes over selection to an arrow near start when scrolled horizontally.\n\tBug #3389055.\n\t
    • \n\t
  • \n\tIndicators that finish at the end of the document no longer expand when text is appended.\n\tBug #3378718.\n\t
    • \n\t
  • \n\tSparseState merge fixed to check if other range is empty.\n\tBug #3387053.\n\t
    • \n\t
  • \n\tOn Windows, autocompletion lists will scroll instead of document when mouse wheel spun.\n\tFeature #3403600.\n\t
    • \n\t
  • \n\tSciTE performs more rapid polling for command completion so will return faster and report more accurate times.\n\t
    • \n\t
  • \n\tSciTE resizes panes proportionally when switched between horizontal and vertical layout.\n\tFeature #3376784.\n\t
    • \n\t
  • \n\tSciTE on GTK+ opens multiple files into a single instance more reliably.\n\tBug #3363754.\n\t
    • \n
\n

\n Release 2.28\n

\n
    \n\t
  • \n\tReleased 1 August 2011.\n\t
    • \n\t
  • \n\tGTK+ Cairo support works back to GTK+ version 2.8. Requires changing Scintilla source code to enable before GTK+ 2.22.\n\tBug #3322351.\n\t
    • \n\t
  • \n\tTranslucent images in RGBA format can be used for margin markers and in autocompletion lists.\n\t
    • \n\t
  • \n\tINDIC_DOTBOX added as a translucent dotted rectangular indicator.\n\t
    • \n\t
  • \n\tAsian text input using IME works for GTK+ 3.x and GTK+ 2.x with Cairo.\n\t
    • \n\t
  • \n\tOn GTK+, IME works for Ctrl+Shift+U Unicode input in Scintilla. For SciTE, Ctrl+Shift+U is still Make Selection Uppercase.\n\t
    • \n\t
  • \n\tKey bindings for GTK+ on OS X made compatible with Cocoa port and platform conventions.\n\t
    • \n\t
  • \n\tCocoa port supports different character encodings, improves scrolling performance and drag image appearance.\n\tThe control ID is included in WM_COMMAND notifications. Text may be deleted by dragging to the trash.\n\tScrollToStart and ScrollToEnd key commands added to simplify implementation of standard OS X Home and End\n\tbehaviour.\n\t
    • \n\t
  • \n\tSciTE on GTK+ uses a paned widget to contain the edit and output panes instead of custom code.\n\tThis allows the divider to be moved easily on GTK+ 3 and its appearance follows GTK+ conventions more closely.\n\t
    • \n\t
  • \n\tSciTE builds and installs on BSD.\n\tBug #3324644.\n\t
    • \n\t
  • \n\tCobol supports fixed format comments.\n\tBug #3014850.\n\t
    • \n\t
  • \n\tMako template language block syntax extended and ## comments recognized.\n\tFeature #3325178.\n\tBug #3318818.\n\t
    • \n\t
  • \n\tFolding of Mako template language within HTML fixed.\n\tBug #3324563.\n\t
    • \n\t
  • \n\tPython lexer has lexer.python.keywords2.no.sub.identifiers option to avoid highlighting second set of\n\tkeywords following '.'.\n\tBug #3325333.\n\t
    • \n\t
  • \n\tPython folder fixes bug where fold would not extend to final line.\n\tBug #3349157.\n\t
    • \n\t
  • \n\tSciTE treats LPEG lexers the same as script lexers by setting all 8 style bits.\n\t
    • \n\t
  • \n\tFor Cocoa, crashes with unsupported font variants and memory leaks for colour objects fixed.\n\t
    • \n\t
  • \n\tShift-JIS lead byte ranges modified to match Windows.\n\t
    • \n\t
  • \n\tMouse pointer changes over selection to an arrow more consistently.\n\tBug #3315756.\n\t
    • \n\t
  • \n\tBug fixed with annotations beyond end of document.\n\tBug #3347268.\n\t
    • \n\t
  • \n\tIncorrect drawing fixed for combination of background colour change and translucent selection.\n\tBug #3377116.\n\t
    • \n\t
  • \n\tLexers initialized correctly when started at position other than start of line.\n\tBug #3377148.\n\t
    • \n\t
  • \n\tFold highlight drawing fixed for some situations.\n\tBug #3323015.\n\tBug #3323805.\n\t
    • \n\t
  • \n\tCase insensitive search fixed for cases where folded character uses fewer bytes than base character.\n\tBug #3362038.\n\t
    • \n\t
  • \n\tSciTE bookmark.alpha setting fixed.\n\tBug #3373907.\n\t
    • \n
\n

\n Release 2.27\n

\n
    \n\t
  • \n\tReleased 20 June 2011.\n\t
    • \n\t
  • \n\tOn recent GTK+ 2.x versions when using Cairo, bug fixed where wrong colours were drawn.\n\t
    • \n\t
  • \n\tSciTE on GTK+ slow performance in menu maintenance fixed.\n\tBug #3315233.\n\t
    • \n\t
  • \n\tCocoa platform supports 64-bit builds and uses only non-deprecated APIs.\n\tAsian Input Method Editors are supported.\n\tAutocompletion lists and calltips implemented.\n\tControl identifier used in notifications.\n\t
    • \n\t
  • \n\tOn Cocoa, rectangular selection now uses Option/Alt key to be compatible with Apple Human\n\tInterface Guidelines and other applications.\n\tThe Control key is reported with an SCMOD_META modifier bit.\n\t
    • \n\t
  • \n\tAPI added for setting and retrieving the identifier number used in notifications.\n\t
    • \n\t
  • \n\tSCI_SETEMPTYSELECTION added to set selection without scrolling or redrawing more than needed.\n\tFeature #3314877.\n\t
    • \n\t
  • \n\tAdded new indicators. INDIC_DASH and INDIC_DOTS are variants of underlines.\n\tINDIC_SQUIGGLELOW indicator added as shorter alternative to INDIC_SQUIGGLE for small fonts.\n\tBug #3314591\n\t
    • \n\t
  • \n\tMargin line selection can be changed to select display lines instead of document lines.\n\tBug #3312763.\n\t
    • \n\t
  • \n\tOn Windows, SciTE can perform reverse searches by pressing Shift+Enter\n\tin the Find or Replace strips or dialogs.\n\t
    • \n\t
  • \n\tMatlab lexer does not special case '\\' in single quoted strings.\n\tBug #948757\n\tBug #1755950\n\tBug #1888738\n\tBug #3316852.\n\t
    • \n\t
  • \n\tVerilog lexer supports SystemVerilog folding and keywords.\n\t
    • \n\t
  • \n\tFont leak fixed.\n\tBug #3306156.\n\t
    • \n\t
  • \n\tAutomatic scrolling works for long wrapped lines.\n\tBug #3312763.\n\t
    • \n\t
  • \n\tMultiple typing works for cases where selections collapse together.\n\tBug #3309906.\n\t
    • \n\t
  • \n\tFold expanded when needed in word wrap mode.\n\tBug #3291579.\n\t
    • \n\t
  • \n\tBug fixed with edge drawn in wrong place on wrapped lines.\n\tBug #3314807.\n\t
    • \n\t
  • \n\tBug fixed with unnecessary scrolling for SCI_GOTOLINE.\n\tBug #3303406.\n\t
    • \n\t
  • \n\tBug fixed where extra step needed to undo SCI_CLEAR in virtual space.\n\tBug #3159691.\n\t
    • \n\t
  • \n\tRegular expression search fixed for \\$ on last line of search range.\n\tBug #3313746.\n\t
    • \n\t
  • \n\tSciTE performance improved when switching to a tab with a very large file.\n\tBug #3311421.\n\t
    • \n\t
  • \n\tOn Windows, SciTE advanced search remembers the \"Search only in this style\" setting.\n\tBug #3313344.\n\t
    • \n\t
  • \n\tOn GTK+, SciTE opens help using \"xdg-open\" instead of \"netscape\" as \"netscape\" no longer commonly installed.\n\tBug #3314377.\n\t
    • \n\t
  • \n\tSciTE script lexers can use 256 styles.\n\t
    • \n\t
  • \n\tSciTE word highlight works for words containing DBCS characters.\n\tBug #3315173.\n\t
    • \n\t
  • \n\tCompilation fixed for wxWidgets.\n\tBug #3306156.\n\t
    • \n
\n

\n Release 2.26\n

\n
    \n\t
  • \n\tReleased 25 May 2011.\n\t
    • \n\t
  • \n\tFolding margin symbols can be highlighted for the current folding block.\n\tFeature #3147069.\n\t
    • \n\t
  • \n\tSelected lines can be moved up or down together.\n\tFeature #3304850.\n\t
    • \n\t
  • \n\tSciTE can highlight all occurrences of the current word or selected text.\n\tFeature #3291636.\n\t
    • \n\t
  • \n\tExperimental GTK+ 3.0 support: build with \"make GTK3=1\".\n\t
    • \n\t
  • \n\tINDIC_STRAIGHTBOX added. Is similar to INDIC_ROUNDBOX but without rounded corners.\n\tBug #3290435.\n\t
    • \n\t
  • \n\tCan show brace matching and mismatching with indicators instead of text style.\n\tTranslucency of outline can be altered for INDIC_ROUNDBOX and INDIC_STRAIGHTBOX.\n\tFeature #3290434.\n\t
    • \n\t
  • \n\tSciTE can automatically indent python by examining previous line for scope-starting ':' with indent.python.colon.\n\t
    • \n\t
  • \n\tBatch file lexer allows braces '(' or ')' inside variable names.\n\t
    • \n\t
  • \n\tThe cpp lexer only recognizes Vala triple quoted strings when lexer.cpp.triplequoted.strings property is set.\n\tBug #3239234.\n\t
    • \n\t
  • \n\tMake file lexer treats a variable with a nested variable like $(f$(qx)b) as one variable.\n\tBug #3298223.\n\t
    • \n\t
  • \n\tFolding bug fixed for JavaScript with nested PHP.\n\tBug #3193530.\n\t
    • \n\t
  • \n\tHTML lexer styles Django's {# #} comments.\n\tBug #3013798.\n\t
    • \n\t
  • \n\tHTML lexer styles JavaScript regular expression correctly for /abc/i.test('abc');.\n\tBug #3209108.\n\t
    • \n\t
  • \n\tInno Setup Script lexer now works properly when it restarts from middle of [CODE] section.\n\tBug #3283880.\n\tBug #3129044.\n\t
    • \n\t
  • \n\tLua lexer updated for Lua 5.2 with hexadecimal floating-point numbers and '\\*' whitespace escaping in strings.\n\tFeature #3243811.\n\t
    • \n\t
  • \n\tPerl folding folds \"here doc\"s and adds options fold.perl.at.else and fold.perl.comment.explicit. Fold structure for Perl fixed.\n\tFeature #3112671.\n\tBug #3265401.\n\t
    • \n\t
  • \n\tPython lexer supports cpdef keyword for Cython.\n\tBug #3279728.\n\t
    • \n\t
  • \n\tSQL folding option lexer.sql.fold.at.else renamed to fold.sql.at.else.\n\tBug #3271474.\n\t
    • \n\t
  • \n\tSQL lexer no longer treats ';' as terminating a comment.\n\tBug #3196071.\n\t
    • \n\t
  • \n\tText drawing and measurement segmented into smaller runs to avoid platform bugs.\n\tBug #3277449.\n\tBug #3165743.\n\t
    • \n\t
  • \n\tSciTE on Windows adds temp.files.sync.load property to open dropped temporary files synchronously as they may\n\tbe removed before they can be opened asynchronously.\n\tBug #3072009.\n\t
    • \n\t
  • \n\tBug fixed with indentation guides ignoring first line in SC_IV_LOOKBOTH mode.\n\tBug #3291317.\n\t
    • \n\t
  • \n\tBugs fixed in backward regex search.\n\tBug #3292659.\n\t
    • \n\t
  • \n\tBugs with display of folding structure fixed for wrapped lines and where there is a fold header but no body.\n\tBug #3291579.\n\tBug #3265401.\n\t
    • \n\t
  • \n\tSciTE on Windows cursor changes to an arrow now when over horizontal splitter near top of window.\n\tBug #3286620.\n\t
    • \n\t
  • \n\tFixed default widget size problem on GTK+.\n\tBug #3267892.\n\t
    • \n\t
  • \n\tFixed font size when using Cairo on GTK+.\n\tBug #3272662.\n\t
    • \n\t
  • \n\tFixed primary selection and cursor issues on GTK+ when unrealized then realized.\n\tBug #3256153.\n\t
    • \n\t
  • \n\tRight click now cancels selection on GTK+ like on Windows.\n\tBug #3235190.\n\t
    • \n\t
  • \n\tSciTE on GTK+ implements z-order buffer switching like on Windows.\n\tBug #3228384.\n\t
    • \n\t
  • \n\tImprove selection position after SciTE Insert Abbreviation command when abbreviation expansion includes '|'.\n\t
    • \n
\n

\n Release 2.25\n

\n
    \n\t
  • \n\tReleased 21 March 2011.\n\t
    • \n\t
  • \n\tSparseState class makes it easier to write lexers which have to remember complex state between lines.\n\t
    • \n\t
  • \n\tVisual Studio project (.dsp) files removed. The make files should be used instead as described in the README.\n\t
    • \n\t
  • \n\tModula 3 lexer added along with SciTE support.\n\tFeature #3173374.\n\t
    • \n\t
  • \n\tAsm, Basic, and D lexers add extra folding properties.\n\t
    • \n\t
  • \n\tRaw string literals for C++0x supported in C++ lexer.\n\t
    • \n\t
  • \n\tTriple-quoted strings used in Vala language supported in C++ lexer.\n\tFeature #3177601.\n\t
    • \n\t
  • \n \tThe errorlist lexer used in SciTE's output pane colours lines that start with '<' as diff deletions.\n\tFeature #3172878.\n\t
    • \n\t
  • \n \tThe Fortran lexer correctly folds type-bound procedures from Fortran 2003.\n\t
    • \n\t
  • \n\tLPeg lexer support‎ improved in SciTE.\n\t
    • \n\t
  • \n\tSciTE on Windows-64 fixes for menu localization and Lua scripts.\n\tBug #3204502.\n\t
    • \n\t
  • \n\tSciTE on Windows avoids locking folders when using the open or save dialogs.\n\tBug #1795484.\n\t
    • \n\t
  • \n\tDiff lexer fixes problem where diffs of diffs producing lines that start with \"----\".\n\tBug #3197952.\n\t
    • \n\t
  • \n\tBug fixed when searching upwards in Chinese code page 936.\n\tBug #3176271.\n\t
    • \n\t
  • \n\tOn Cocoa, translucent drawing performed as on other platforms instead of 2.5 times less translucent.\n\t
    • \n\t
  • \n\tPerformance issue and potential bug fixed on GTK+ with caret line for long lines.\n\t
    • \n
\n

\n Release 2.24\n

\n
    \n\t
  • \n\tReleased 3 February 2011.\n\t
    • \n\t
  • \n\tFixed memory leak in GTK+ Cairo code.\n\tFeature #3157655.\n\t
    • \n\t
  • \n\tInsert Abbreviation dialog added to SciTE on GTK+.\n\t
    • \n\t
  • \n\tSCN_UPDATEUI notifications received when window scrolled. An 'updated' bit mask indicates which\n\ttypes of update have occurred from SC_UPDATE_SELECTION, SC_UPDATE_CONTENT, SC_UPDATE_H_SCROLL\n\tor SC_UPDATE_V_SCROLL.\n\tFeature #3125977.\n\t
    • \n\t
  • \n\tOn Windows, to ensure reverse arrow cursor matches platform default, it is now generated by\n\treflecting the platform arrow cursor.\n\tFeature #3143968.\n\t
    • \n\t
  • \n\tCan choose mouse cursor used in margins.\n\tFeature #3161326.\n\t
    • \n\t
  • \n\tOn GTK+, SciTE sets a mime type of text/plain in its .desktop file so that it will appear in the shell context menu.\n\tFeature #3137126.\n\t
    • \n\t
  • \n\tBash folder handles here docs.\n\tFeature #3118223.\n\t
    • \n\t
  • \n\tC++ folder adds fold.cpp.syntax.based, fold.cpp.comment.multiline, fold.cpp.explicit.start, fold.cpp.explicit.end,\n\tand fold.cpp.explicit.anywhere properties to allow more control over folding and choice of explicit fold markers.\n\t
    • \n\t
  • \n\tC++ lexer fixed to always handle single quote strings continued past a line end.\n\tBug #3150522.\n\t
    • \n\t
  • \n\tRuby folder handles here docs.\n\tFeature #3118224.\n\t
    • \n\t
  • \n\tSQL lexer allows '.' to be part of words.\n\tFeature #3103129.\n\t
    • \n\t
  • \n\tSQL folder handles case statements in more situations.\n\tFeature #3135027.\n\t
    • \n\t
  • \n\tSQL folder adds fold points inside expressions based on bracket structure.\n\tFeature #3165488.\n\t
    • \n\t
  • \n\tSQL folder drops fold.sql.exists property as 'exists' is handled automatically.\n\tBug #3164194.\n\t
    • \n\t
  • \n\tSciTE only forwards properties to lexers when they have been explicitly set so the defaults set by lexers are used\n\trather than 0.\n\t
    • \n\t
  • \n\tMouse double click word selection chooses the word around the character under the mouse rather than\n\tthe inter-character position under the mouse. This makes double clicking select what the user is pointing\n\tat and avoids selecting adjacent non-word characters.\n\tBug #3111174.\n\t
    • \n\t
  • \n\tFixed mouse double click to always perform word select, not line select.\n\tBug #3143635.\n\t
    • \n\t
  • \n\tRight click cancels autocompletion.\n\tBug #3144531.\n\t
    • \n\t
  • \n\tFixed multiPaste to work when additionalSelectionTyping off.\n\tBug #3126221.\n\t
    • \n\t
  • \n\tFixed virtual space problems when text modified at caret.\n\tBug #3154986.\n\t
    • \n\t
  • \n\tFixed memory leak in lexer object code.\n\tBug #3133672.\n\t
    • \n\t
  • \n\tFixed SciTE on GTK+ search failure when using regular expression.\n\tBug #3156217.\n\t
    • \n\t
  • \n\tAvoid unnecessary full window redraw for SCI_GOTOPOS.\n\tFeature #3146650.\n\t
    • \n\t
  • \n\tAvoid unnecessary redraw when indicator fill range makes no real change.\n\t
    • \n
\n

\n Release 2.23\n

\n
    \n\t
  • \n\tReleased 7 December 2010.\n\t
    • \n\t
  • \n\tOn GTK+ version 2.22 and later, drawing is performed with Cairo rather than GDK.\n\tThis is in preparation for GTK+ 3.0 which will no longer support GDK drawing.\n\tThe appearance of some elements will be different with Cairo as it is anti-aliased and uses sub-pixel positioning.\n\tCairo may be turned on for GTK+ versions before 2.22 by defining USE_CAIRO although this has not\n\tbeen extensively tested.\n\t
    • \n\t
  • \n\tNew lexer a68k for Motorola 68000 assembler.\n\tFeature #3101598.\n\t
    • \n\t
  • \n\tBorland C++ is no longer supported for building Scintilla or SciTE on Windows.\n\t
    • \n\t
  • \n\tPerformance improved when creating large rectangular selections.\n\t
    • \n\t
  • \n\tPHP folder recognizes #region and #endregion comments.\n\tFeature #3101624.\n\t
    • \n\t
  • \n\tSQL lexer has a lexer.sql.numbersign.comment option to turn off use of '#' comments\n\tas these are a non-standard feature only available in some implementations.\n\tFeature #3098071.\n\t
    • \n\t
  • \n\tSQL folder recognizes case statements and understands the fold.at.else property.\n\tBug #3104091.\n\tBug #3107362.\n\t
    • \n\t
  • \n\tSQL folder fixes bugs with end statements when fold.sql.only.begin=1.\n\tBug #3104091.\n\t
    • \n\t
  • \n\tSciTE on Windows bug fixed with multi-line tab bar not adjusting correctly when maximizing and demaximizing.\n\tBug #3097517.\n\t
    • \n\t
  • \n\tCrash fixed on GTK+ when Scintilla widget destroyed while it still has an outstanding style idle pending.\n\t
    • \n\t
  • \n\tBug fixed where searching backwards in DBCS text (code page 936 or similar) failed to find occurrences at the start of the line.\n\tBug #3103936.\n\t
    • \n\t
  • \n\tSciTE on Windows supports Unicode file names when executing help applications with winhelp and htmlhelp subsystems.\n\t
    • \n
\n

\n Release 2.22\n

\n
    \n\t
  • \n\tReleased 27 October 2010.\n\t
    • \n\t
  • \n\tSciTE includes support for integrating with Scintillua which allows lexers to be implemented in Lua as a\n\tParsing Expression Grammar (PEG).\n\t
    • \n\t
  • \n\tRegular expressions allow use of '?' for non-greedy matches or to match 0 or 1 instances of an item.\n\t
    • \n\t
  • \n\tSCI_CONTRACTEDFOLDNEXT added to allow rapid retrieval of folding state.\n\t
    • \n\t
  • \n\tSCN_HOTSPOTRELEASECLICK notification added which is similar to SCN_HOTSPOTCLICK but occurs\n\twhen the mouse is released.\n\tFeature #3082409.\n\t
    • \n\t
  • \n\tCommand added for centring current line in window.\n\tFeature #3064696.\n\t
    • \n\t
  • \n\tSciTE performance improved by not examining document for line ends when switching buffers and not\n\tstoring folds when folding turned off.\n\t
    • \n\t
  • \n\tBug fixed where scrolling to ensure the caret is visible did not take into account all pixels of the line.\n\tBug #3081721.\n\t
    • \n\t
  • \n\tBug fixed for autocompletion list overlapping text when WS_EX_CLIENTEDGE used.\n\tBug #3079778.\n\t
    • \n\t
  • \n\tAfter autocompletion, the caret's X is updated.\n\tBug #3079114.\n\t
    • \n\t
  • \n\tOn Windows, default to the system caret blink time.\n\tFeature #3079784.\n\t
    • \n\t
  • \n\tPgUp/PgDn fixed to allow virtual space.\n\tBug #3077452.\n\t
    • \n\t
  • \n\tCrash fixed when AddMark and AddMarkSet called with negative argument.\n\tBug #3075074.\n\t
    • \n\t
  • \n\tDwell notifications fixed so that they do not occur when the mouse is outside Scintilla.\n\tBug #3073481.\n\t
    • \n\t
  • \n\tBash lexer bug fixed for here docs starting with <<-.\n\tBug #3063822.\n\t
    • \n\t
  • \n\tC++ lexer bug fixed for // comments that are continued onto a second line by a \\.\n\tBug #3066031.\n\t
    • \n\t
  • \n\tC++ lexer fixes wrong highlighting for float literals containing +/-.\n\tBug #3058924.\n\t
    • \n\t
  • \n\tJavaScript lexer recognize regexes following return keyword.‎\n\tBug #3062287.\n\t
    • \n\t
  • \n\tRuby lexer handles % quoting better and treats range dots as operators in 1..2 and 1...2.\n\tRuby folder handles \"if\" keyword used as a modifier even when it is separated from the modified statement by an escaped new line.\n\tBug #2093767.\n\tBug #3058496.\n\t
    • \n\t
  • \n\tBug fixed where upwards search failed with DBCS code pages.\n\tBug #3065912.\n\t
    • \n\t
  • \n\tSciTE has a default Lua startup script name distributed in SciTEGlobal.properties.\n\tNo error message is displayed if this file does not exist.\n\t
    • \n\t
  • \n\tSciTE on Windows tab control height is calculated better.\n\tBug #2635702.\n\t
    • \n\t
  • \n\tSciTE on Windows uses better themed check buttons in find and replace strips.\n\t
    • \n\t
  • \n\tSciTE on Windows fixes bug with Find strip appearing along with Incremental Find strip.\n\t
    • \n\t
  • \n\tSciTE setting find.close.on.find added to allow preventing the Find dialog from closing.\n\t
    • \n\t
  • \n\tSciTE on Windows attempts to rerun commands that fail by prepending them with \"cmd.exe /c\".\n\tThis allows commands built in to the command processor like \"dir\" to run.\n\t
    • \n
\n

\n Release 2.21\n

\n
    \n\t
  • \n\tReleased 1 September 2010.\n\t
    • \n\t
  • \n\tAsian Double Byte Character Set (DBCS) support improved.\n\tCase insensitive search works and other operations are much faster.\n\tBug #2999125,\n\tBug #2774616,\n\tBug #2991942,\n\tBug #3005688.\n\t
    • \n\t
  • \n\tScintilla on GTK+ uses only non-deprecated APIs (for GTK+ 2.20) except for GdkFont and GdkFont use can be disabled\n\twith the preprocessor symbol DISABLE_GDK_FONT.\n\t
    • \n\t
  • \n\tIDocument interface used by lexers adds BufferPointer and GetLineIndentation methods.\n\t
    • \n\t
  • \n\tOn Windows, clicking sets focus before processing the click or sending notifications.\n\t
    • \n\t
  • \n\tBug on OS X (macosx platform) fixed where drag/drop overwrote clipboard.\n\tBug #3039732.\n\t
    • \n\t
  • \n\tGTK+ drawing bug when the view was horizontally scrolled more than 32000 pixels fixed.\n\t
    • \n\t
  • \n\tSciTE bug fixed with invoking Complete Symbol from output pane.\n\tBug #3050957.\n\t
    • \n\t
  • \n\tBug fixed where it was not possible to disable folding.\n\tBug #3040649.\n\t
    • \n\t
  • \n\tBug fixed with pressing Enter on a folded fold header line not opening the fold.\n\tBug #3043419.\n\t
    • \n\t
  • \n\tSciTE 'Match case' option in find and replace user interfaces changed to 'Case sensitive' to allow use of 'v'\n\trather than 'c' as the mnemonic.\n\t
    • \n\t
  • \n\tSciTE displays stack trace for Lua when error occurs..\n\tBug #3051397.\n\t
    • \n\t
  • \n\tSciTE on Windows fixes bug where double clicking on error message left focus in output pane.\n\tBug #1264835.\n\t
    • \n\t
  • \n\tSciTE on Windows uses SetDllDirectory to avoid a security problem.\n\t
    • \n\t
  • \n\tC++ lexer crash fixed with preprocessor expression that looked like division by 0.\n\tBug #3056825.\n\t
    • \n\t
  • \n\tHaskell lexer improved.\n\tFeature #3039490.\n\t
    • \n\t
  • \n\tHTML lexing fixed around Django {% %} tags.\n\tBug #3034853.\n\t
    • \n\t
  • \n\tHTML JavaScript lexing fixed when line end escaped.\n\tBug #3038381.\n\t
    • \n\t
  • \n\tHTML lexer stores line state produced by a line on that line rather than on the next line.\n\t
    • \n\t
  • \n\tMarkdown lexer fixes infinite loop.\n\tBug #3045386.\n\t
    • \n\t
  • \n\tMySQL folding bugs with END statements fixed.\n\tBug #3031742.\n\t
    • \n\t
  • \n\tPowerShell lexer allows '_' as a word character.\n\tFeature #3042228.\n\t
    • \n\t
  • \n\tSciTE on GTK+ abandons processing of subsequent commands if a command.go.needs command fails.\n\t
    • \n\t
  • \n\tWhen SciTE is closed, all buffers now receive an OnClose call.\n\tBug #3033857.\n\t
    • \n
\n

\n Release 2.20\n

\n
    \n\t
  • \n\tReleased 30 July 2010.\n\t
    • \n\t
  • \n\tLexers are implemented as objects so that they may retain extra state.\n\tThe interfaces defined for this are tentative and may change before the next release.\n\tCompatibility classes allow current lexers compiled into Scintilla to run with few changes.\n\tThe interface to external lexers has changed and existing external lexers will need to have changes\n\tmade and be recompiled.\n\tA single lexer object is attached to a document whereas previously lexers were attached to views\n\twhich could lead to different lexers being used for split views with confusing results.\n\t
    • \n\t
  • \n\tC++ lexer understands the preprocessor enough to grey-out inactive code due to conditional compilation.\n\t
    • \n\t
  • \n\tSciTE can use strips within the main window for find and replace rather than dialogs.\n\tOn Windows SciTE always uses a strip for incremental search.\n\t
    • \n\t
  • \n\tLexer added for Txt2Tags language.\n\tFeature #3018736.\n\t
    • \n\t
  • \n\tSticky caret feature enhanced with additional SC_CARETSTICKY_WHITESPACE mode .\n\tFeature #3027559.\n\t
    • \n\t
  • \n\tBash lexer implements basic parsing of compound commands and constructs.\n\tFeature #3033135.\n\t
    • \n\t
  • \n\tC++ folder allows disabling explicit fold comments.\n\t
    • \n\t
  • \n\tPerl folder works for array blocks, adjacent package statements, nested PODs, and terminates package folding at __DATA__, ^D and ^Z.\n\tFeature #3030887.\n\t
    • \n\t
  • \n\tPowerShell lexer supports multiline <# .. #> comments and adds 2 keyword classes.\n\tFeature #3015176.\n\t
    • \n\t
  • \n\tLexing performed incrementally when needed by wrapping to make user interface more responsive.\n\t
    • \n\t
  • \n\tSciTE setting replaceselection:yes works on GTK+.\n\t
    • \n\t
  • \n\tSciTE Lua scripts calling io.open or io.popen on Windows have arguments treated as UTF-8 and converted to Unicode\n\tso that non-ASCII file paths will work. Lua files with non-ASCII paths run.\n\tBug #3016951.\n\t
    • \n\t
  • \n\tCrash fixed when searching for empty string.\n\tBug #3017572.\n\t
    • \n\t
  • \n\tBugs fixed with folding and lexing when Enter pressed at start of line.\n\tBug #3032652.\n\t
    • \n\t
  • \n\tBug fixed with line selection mode not affecting selection range.\n\tBug #3021480.\n\t
    • \n\t
  • \n\tBug fixed where indicator alpha was limited to 100 rather than 255.\n\tBug #3021473.\n\t
    • \n\t
  • \n\tBug fixed where changing annotation did not cause automatic redraw.\n\t
    • \n\t
  • \n\tRegular expression bug fixed when a character range included non-ASCII characters.\n\t
    • \n\t
  • \n\tCompilation failure with recent compilers fixed on GTK+.\n\tBug #3022027.\n\t
    • \n\t
  • \n\tBug fixed on Windows with multiple monitors where autocomplete pop up would appear off-screen\n\tor straddling monitors.\n\tBug #3017512.\n\t
    • \n\t
  • \n\tSciTE on Windows bug fixed where changing directory to a Unicode path failed.\n\tBug #3011987.\n\t
    • \n\t
  • \n\tSciTE on Windows bug fixed where combo boxes were not allowing Unicode characters.\n\tBug #3012986.\n\t
    • \n\t
  • \n\tSciTE on GTK+ bug fixed when dragging files into SciTE on KDE.\n\tBug #3026555.\n\t
    • \n\t
  • \n\tSciTE bug fixed where closing untitled file could lose data if attempt to name file same as another buffer.\n\tBug #3011680.\n\t
    • \n\t
  • \n\tCOBOL number masks now correctly highlighted.\n\tBug #3012164.\n\t
    • \n\t
  • \n\tPHP comments can include <?PHP without triggering state change.\n\tBug #2854183.\n\t
    • \n\t
  • \n\tVHDL lexer styles unclosed string correctly.\n\tBug #3029627.\n\t
    • \n\t
  • \n\tMemory leak fixed in list boxes on GTK+.\n\tBug #3007669.\n\t
    • \n
\n

\n Release 2.12\n

\n
    \n\t
  • \n\tReleased 1 June 2010.\n\t
    • \n\t
  • \n\tDrawing optimizations improve speed and fix some visible flashing when scrolling.\n\t
    • \n\t
  • \n\tCopy Path command added to File menu in SciTE.\n\tFeature #2986745.\n\t
    • \n\t
  • \n\tOptional warning displayed by SciTE when saving a file which has been modified by another process.\n\tFeature #2975041.\n\t
    • \n\t
  • \n\tFlagship lexer for xBase languages updated to follow the language much more closely.\n\tFeature #2992689.\n\t
    • \n\t
  • \n\tHTML lexer highlights Django templates in more regions.\n\tFeature #3002874.\n\t
    • \n\t
  • \n\tDropping files on SciTE on Windows, releases the drag object earlier and opens the files asynchronously,\n\tleading to smoother user experience.\n\tFeature #2986724.\n\t
    • \n\t
  • \n\tSciTE HTML exports take the Use Monospaced Font setting into account.\n\t
    • \n\t
  • \n\tSciTE window title \"[n of m]\" localized.\n\t
    • \n\t
  • \n\tWhen new line inserted at start of line, markers are moved down.\n\tBug #2986727.\n\t
    • \n\t
  • \n\tOn Windows, dropped text has its line ends converted, similar to pasting.\n\tBug #3005328.\n\t
    • \n\t
  • \n\tFixed bug with middle-click paste in block select mode where text was pasted next to selection rather than at cursor.\n\tBug #2984460.\n\t
    • \n\t
  • \n\tFixed SciTE crash where a style had a size parameter without a value.\n\tBug #3003834.\n\t
    • \n\t
  • \n\tDebug assertions in multiple lexers fixed.\n\tBug #3000566.\n\t
    • \n\t
  • \n\tCSS lexer fixed bug where @font-face displayed incorrectly\n\tBug #2994224.\n\t
    • \n\t
  • \n\tCSS lexer fixed bug where open comment caused highlighting error.\n\tBug #1683672.\n\t
    • \n\t
  • \n\tShell file lexer fixed highlight glitch with here docs where the first line is a comment.\n\tBug #2830239.\n\t
    • \n\t
  • \n\tBug fixed in SciTE openpath property that caused Open Selected File to fail to open the selected file.\n\t
    • \n\t
  • \n\tBug fixed in SciTE FileExt property when file name with no extension evaluated to whole path.\n\t
    • \n\t
  • \n\tFixed SciTE on Windows printing bug where the $(CurrentTime), $(CurrentPage) variables were not expanded.\n\tBug #2994612.\n\t
    • \n\t
  • \n\tSciTE compiles for 64-bit Windows and runs without crashing.\n\tBug #2986312.\n\t
    • \n\t
  • \n\tFull Screen mode in Windows Vista/7 improved to hide Start button and size borders a little better.\n\tBug #3002813.\n\t
    • \n
\n

\n Release 2.11\n

\n
    \n\t
  • \n\tReleased 9 April 2010.\n\t
    • \n\t
  • \n\tFixes compatibility of Scintilla.h with the C language.\n\t
    • \n\t
  • \n\tWith a rectangular selection SCI_GETSELECTIONSTART and SCI_GETSELECTIONEND return limits of the\n\trectangular selection rather than the limits of the main selection.\n\t
    • \n\t
  • \n\tWhen SciTE on Windows is minimized to tray, only takes a single click to restore rather than a double click.\n\tFeature #981917.\n\t
    • \n
\n

\n Release 2.10\n

\n
    \n\t
  • \n\tReleased 4 April 2010.\n\t
    • \n\t
  • \n\tVersion 1.x of GTK+ is no longer supported.\n\t
    • \n\t
  • \n\tSciTE is no longer supported on Windows 95, 98 or ME.\n\t
    • \n\t
  • \n\tCase-insensitive search works for non-ASCII characters in UTF-8 and 8-bit encodings.\n\tNon-regex search in DBCS encodings is always case-sensitive.\n\t
    • \n\t
  • \n\tNon-ASCII characters may be changed to upper and lower case.\n\t
    • \n\t
  • \n\tSciTE on Windows can access all files including those with names outside the user's preferred character encoding.\n\t
    • \n\t
  • \n\tSciTE may be extended with lexers written in Lua.\n\t
    • \n\t
  • \n\tWhen there are multiple selections, the paste command can go either to the main selection or to each\n\tselection. This is controlled with SCI_SETMULTIPASTE.\n\t
    • \n\t
  • \n\tMore forms of bad UTF-8 are detected including overlong sequences, surrogates, and characters outside\n\tthe valid range. Bad UTF-8 bytes are now displayed as 2 hex digits preceded by 'x'.\n\t
    • \n\t
  • \n\tSCI_GETTAG retrieves the value of captured expressions within regular expression searches.\n\t
    • \n\t
  • \n\tDjango template highlighting added to the HTML lexer.\n\tFeature #2974889.\n\t
    • \n\t
  • \n\tVerilog line comments can be folded.\n\t
    • \n\t
  • \n\tSciTE on Windows allows specifying a filter for the Save As dialog.\n\tFeature #2943445.\n\t
    • \n\t
  • \n\tBug fixed when multiple selection disabled where rectangular selections could be expanded into multiple selections.\n\tBug #2948260.\n\t
    • \n\t
  • \n\tBug fixed when document horizontally scrolled and up/down-arrow did not return to the same\n\tcolumn after horizontal scroll occurred.\n\tBug #2950799.\n\t
    • \n\t
  • \n\tBug fixed to remove hotspot highlight when mouse is moved out of the document. Windows only fix.\n\tBug #2951353.\n\t
    • \n\t
  • \n\tR lexer now performs case-sensitive check for keywords.\n\tBug #2956543.\n\t
    • \n\t
  • \n\tBug fixed on GTK+ where text disappeared when a wrap occurred.\n\tBug #2958043.\n\t
    • \n\t
  • \n\tBug fixed where regular expression replace cannot escape the '\\' character by using '\\\\'.\n\tBug #2959876.\n\t
    • \n\t
  • \n\tBug fixed on GTK+ when virtual space disabled, middle-click could still paste text beyond end of line.\n\tBug #2971618.\n\t
    • \n\t
  • \n\tSciTE crash fixed when double clicking on a malformed error message in the output pane.\n\tBug #2976551.\n\t
    • \n\t
  • \n\tImproved performance on GTK+ when changing parameters associated with scroll bars to the same value.\n\tBug #2964357.\n\t
    • \n\t
  • \n\tFixed bug with pressing Shift+Tab with a rectangular selection so that it performs an un-indent\n\tsimilar to how Tab performs an indent.\n\t
    • \n
\n

\n Release 2.03\n

\n
    \n\t
  • \n\tReleased 14 February 2010.\n\t
    • \n\t
  • \n\tAdded SCI_SETFIRSTVISIBLELINE to match SCI_GETFIRSTVISIBLELINE.\n\t
    • \n\t
  • \n\tErlang lexer extended set of numeric bases recognized; separate style for module:function_name; detects\n\tbuilt-in functions, known module attributes, and known preprocessor instructions; recognizes EDoc and EDoc macros;\n\tseparates types of comments.\n\tBug #2942448.\n\t
    • \n\t
  • \n\tPython lexer extended with lexer.python.strings.over.newline option that allows non-triple-quoted strings to extend\n\tpast line ends. This allows use of the Ren'Py language.\n\tFeature #2945550.\n\t
    • \n\t
  • \n\tFixed bugs with cursor movement after deleting a rectangular selection.\n\tBug #2942131.\n\t
    • \n\t
  • \n\tFixed bug where calling SCI_SETSEL when there is a rectangular selection left\n\tthe additional selections selected.\n\tBug #2947064.\n\t
    • \n\t
  • \n\tFixed macro recording bug where not all bytes in multi-byte character insertions were reported through\n\tSCI_REPLACESEL.\n\t
    • \n\t
  • \n\tFixed SciTE bug where using Ctrl+Enter followed by Ctrl+Space produced an autocompletion list\n\twith only a single line containing all the identifiers.\n\t
    • \n\t
  • \n\tFixed SciTE on GTK+ bug where running a tool made the user interface completely unresponsive.\n\t
    • \n\t
  • \n\tFixed SciTE on Windows Copy to RTF bug.\n\tBug #2108574.\n\t
    • \n
\n

\n Release 2.02\n

\n
    \n\t
  • \n\tReleased on 25 January 2010.\n\t
    • \n\t
  • \n\tMarkdown lexer added.\n\tFeature #2844081.\n\t
    • \n\t
  • \n\tOn GTK+, include code that understands the ranges of lead bytes for code pages 932, 936, and 950\n\tso that most Chinese and Japanese text can be used on systems that are not set to the corresponding locale.\n\t
    • \n\t
  • \n\tAllow changing the size of dots in visible whitespace using SCI_SETWHITESPACESIZE.\n\tFeature #2839427.\n\t
    • \n\t
  • \n\tAdditional carets can be hidden with SCI_SETADDITIONALCARETSVISIBLE.\n\t
    • \n\t
  • \n\tCan choose anti-aliased, non-anti-aliased or lcd-optimized text using SCI_SETFONTQUALITY.\n\t
    • \n\t
  • \n\tRetrieve the current selected text in the autocompletion list with SCI_AUTOCGETCURRENTTEXT.\n\t
    • \n\t
  • \n\tRetrieve the name of the current lexer with SCI_GETLEXERLANGUAGE.\n\t
    • \n\t
  • \n\tProgress 4GL lexer improves handling of comments in preprocessor declaration.\n\tFeature #2902206.\n\t
    • \n\t
  • \n\tHTML lexer extended to handle Mako template language.\n\t
    • \n\t
  • \n\tSQL folder extended for SQL Anywhere \"EXISTS\" and \"ENDIF\" keywords.\n\tFeature #2887524.\n\t
    • \n\t
  • \n\tSciTE adds APIPath and AbbrevPath variables.\n\t
    • \n\t
  • \n\tSciTE on GTK+ uses pipes instead of temporary files for running tools. This should be more secure.\n\t
    • \n\t
  • \n\tFixed crash when calling SCI_STYLEGETFONT for a style which does not have a font set.\n\tBug #2857425.\n\t
    • \n\t
  • \n\tFixed crash caused by not having sufficient styles allocated after choosing a lexer.\n\tBug #2881279.\n\t
    • \n\t
  • \n\tFixed crash in SciTE using autocomplete word when word characters includes space.\n\tBug #2840141.\n\t
    • \n\t
  • \n\tFixed bug with handling upper-case file extensions SciTE on GTK+.\n\t
    • \n\t
  • \n\tFixed SciTE loading files from sessions with folded folds where it would not\n\tbe scrolled to the correct location.\n\tBug #2882775.\n\t
    • \n\t
  • \n\tFixed SciTE loading files from sessions when file no longer exists.\n\tBug #2883437.\n\t
    • \n\t
  • \n\tFixed SciTE export to HTML using the wrong background colour.\n\t
    • \n\t
  • \n\tFixed crash when adding an annotation and then adding a new line after the annotation.\n\tBug #2929708.\n\t
    • \n\t
  • \n\tFixed crash in SciTE setting a property to nil from Lua.\n\t
    • \n\t
  • \n\tSCI_GETSELTEXT fixed to return correct length.\n\tBug #2929441.\n\t
    • \n\t
  • \n\tFixed text positioning problems with selection in some circumstances.\n\t
    • \n\t
  • \n\tFixed text positioning problems with ligatures on GTK+.\n\t
    • \n\t
  • \n\tFixed problem pasting into rectangular selection with caret at bottom caused text to go from the caret down\n\trather than replacing the selection.\n\t
    • \n\t
  • \n\tFixed problem replacing in a rectangular selection where only the final line was changed.\n\t
    • \n\t
  • \n\tFixed inability to select a rectangular area using Alt+Shift+Click at both corners.\n\tBug #2899746.\n\t
    • \n\t
  • \n\tFixed problem moving to start/end of a rectangular selection with left/right key.\n\tBug #2871358.\n\t
    • \n\t
  • \n\tFixed problem with Select All when there's a rectangular selection.\n\tBug #2930488.\n\t
    • \n\t
  • \n\tFixed SCI_LINEDUPLICATE on a rectangular selection to not produce multiple discontinuous selections.\n\t
    • \n\t
  • \n\tVirtual space removed when performing delete word left or delete line left.\n\tVirtual space converted to real space for delete word right.\n\tPreserve virtual space when pressing Delete key.\n\tBug #2882566.\n\t
    • \n\t
  • \n\tFixed problem where Shift+Alt+Down did not move through wrapped lines.\n\tBug #2871749.\n\t
    • \n\t
  • \n\tFixed incorrect background colour when using coloured lines with virtual space.\n\tBug #2914691.\n\t
    • \n\t
  • \n\tFixed failure to display wrap symbol for SC_WRAPVISUALFLAGLOC_END_BY_TEXT.\n\tBug #2936108.\n\t
    • \n\t
  • \n\tFixed blank background colour with EOLFilled style on last line.\n\tBug #2890105.\n\t
    • \n\t
  • \n\tFixed problem in VB lexer with keyword at end of file.\n\tBug #2901239.\n\t
    • \n\t
  • \n\tFixed SciTE bug where double clicking on a tab closed the file.\n\t
    • \n\t
  • \n\tFixed SciTE brace matching commands to only work when the caret is next to the brace, not when\n\tit is in virtual space.\n\tBug #2885560.\n\t
    • \n\t
  • \n\tFixed SciTE on Windows Vista to access files in the Program Files directory rather than allow Windows\n\tto virtualize access.\n\tBug #2916685.\n\t
    • \n\t
  • \n\tFixed NSIS folder to handle keywords that start with '!'.\n\tBug #2872157.\n\t
    • \n\t
  • \n\tChanged linkage of Scintilla_LinkLexers to \"C\" so that it can be used by clients written in C.\n\tBug #2844718.\n\t
    • \n
\n

\n Release 2.01\n

\n
    \n\t
  • \n\tReleased on 19 August 2009.\n\t
    • \n\t
  • \n\tFix to positioning rectangular paste when viewing line ends.\n\t
    • \n\t
  • \n\tDon't insert new lines and indentation for line ends at end of rectangular paste.\n\t
    • \n\t
  • \n\tWhen not in additional selection typing mode, cutting a rectangular selection removes all of the selected text.\n\t
    • \n\t
  • \n\tRectangular selections are copied to the clipboard in document order, not in the order of selection.\n\t
    • \n\t
  • \n\tSCI_SETCURRENTPOS and SCI_SETANCHOR work in rectangular mode.\n\t
    • \n\t
  • \n\tOn GTK+, drag and drop to a later position in the document now drops at the position.\n\t
    • \n\t
  • \n\tFix bug where missing property did not use default value.\n\t
    • \n
\n

\n Release 2.0\n

\n
    \n\t
  • \n\tReleased on 11 August 2009.\n\t
    • \n\t
  • \n\tMultiple pieces of text can be selected simultaneously by holding control while dragging the mouse.\n\tTyping, backspace and delete may affect all selections together.\n\t
    • \n\t
  • \n\tVirtual space allows selecting beyond the last character on a line.\n\t
    • \n\t
  • \n\tSciTE on GTK+ path bar is now optional and defaults to off.\n\t
    • \n\t
  • \n\tMagikSF lexer recognizes numbers correctly.\n\t
    • \n\t
  • \n\tFolding of Python comments and blank lines improved. Bug #210240.\n\t
    • \n\t
  • \n\tBug fixed where background colour of last character in document leaked past that character.\n\t
    • \n\t
  • \n\tCrash fixed when adding marker beyond last line in document. Bug #2830307.\n\t
    • \n\t
  • \n\tResource leak fixed in SciTE for Windows when printing fails. Bug #2816524.\n\t
    • \n\t
  • \n\tBug fixed on Windows where the system caret was destroyed during destruction when another window\n\twas using the system caret. Bug #2830223.\n\t
    • \n\t
  • \n\tBug fixed where indentation guides were drawn over text when the indentation used a style with a different\n\tspace width to the default style.\n\t
    • \n\t
  • \n\tSciTE bug fixed where box comment added a bare line feed rather than the chosen line end. Bug #2818104.\n\t
    • \n\t
  • \n\tReverted fix that led to wrapping whole document when displaying the first line of the document.\n\t
    • \n\t
  • \n\tExport to LaTeX in SciTE fixed to work in more cases and not use as much space. Bug #1286548.\n\t
    • \n\t
  • \n\tBug fixed where EN_CHANGE notification was sent when performing a paste operation in a\n\tread-only document. Bug #2825485.\n\t
    • \n\t
  • \n\tRefactored code so that Scintilla exposes less of its internal implementation and uses the C++ standard\n\tlibrary for some basic collections. Projects that linked to Scintilla's SString or PropSet classes\n\tshould copy this code from a previous version of Scintilla or from SciTE.\n\t
    • \n
\n

\n Release 1.79\n

\n
    \n\t
  • \n\tReleased on 1 July 2009.\n\t
    • \n\t
  • \n\tMemory exhaustion and other exceptions handled by placing an error value into the\n\tstatus property rather than crashing.\n\tScintilla now builds with exception handling enabled and requires exception handling to be enabled.
    \n\tThis is a major change and application developers should consider how they will deal with Scintilla exhausting\n\tmemory since Scintilla may not be in a stable state.\n\t
    • \n\t
  • \n\tDeprecated APIs removed. The symbols removed are:\n\t
      \n
    • SCI_SETCARETPOLICY
      • \n
    • CARET_CENTER
      • \n
    • CARET_XEVEN
      • \n
    • CARET_XJUMPS
      • \n
    • SC_FOLDFLAG_BOX
      • \n
    • SC_FOLDLEVELBOXHEADERFLAG
      • \n
    • SC_FOLDLEVELBOXFOOTERFLAG
      • \n
    • SC_FOLDLEVELCONTRACTED
      • \n
    • SC_FOLDLEVELUNINDENT
      • \n
    • SCN_POSCHANGED
      • \n
    • SCN_CHECKBRACE
      • \n
    • SCLEX_ASP
      • \n
    • SCLEX_PHP
      • \n
    \n\t
    • \n\t
  • \n\tCocoa platform added.\n\t
    • \n\t
  • \n\tNames of struct types in Scintilla.h now start with \"Sci_\" to avoid possible clashes with platform\n\tdefinitions. Currently, the old names still work but these will be phased out.\n\t
    • \n\t
  • \n\tWhen lines are wrapped, subsequent lines may be indented to match the indent of the initial line,\n\tor one more indentation level. Feature #2796119.\n\t
    • \n\t
  • \n\tAPIs added for finding the character at a point rather than an inter-character position. Feature #2646738.\n\t
    • \n\t
  • \n\tA new marker SC_MARK_BACKGROUND_UNDERLINE is drawn in the text area as an underline\n\tthe full width of the window.\n\t
    • \n\t
  • \n\tBatch file lexer understands variables surrounded by '!'.\n\t
    • \n\t
  • \n\tCAML lexer also supports SML.\n\t
    • \n\t
  • \n\tD lexer handles string and numeric literals more accurately. Feature #2793782.\n\t
    • \n\t
  • \n\tForth lexer is now case-insensitive and better supports numbers like $hex and %binary. Feature #2804894.\n\t
    • \n\t
  • \n\tLisp lexer treats '[', ']', '{', and '}' as balanced delimiters which is common usage. Feature #2794989.\n\t
    \n\tIt treats keyword argument names as being equivalent to symbols. Feature #2794901.\n\t
    • \n\t
  • \n\tPascal lexer bug fixed to prevent hang when 'interface' near beginning of file. Bug #2802863.\n\t
    • \n\t
  • \n\tPerl lexer bug fixed where previous lexical states persisted causing \"/\" special case styling and\n\tsubroutine prototype styling to not be correct. Bug #2809168.\n\t
    • \n\t
  • \n\tXML lexer fixes bug where Unicode entities like '&—' were broken into fragments. Bug #2804760.\n\t
    • \n\t
  • \n\tSciTE on GTK+ enables scrolling the tab bar on recent versions of GTK+. Feature #2061821.\n\t
    • \n\t
  • \n\tSciTE on Windows allows tab bar tabs to be reordered by drag and drop.\n\t
    • \n\t
  • \n\tUnit test script for Scintilla on Windows included with source code.\n\t
    • \n\t
  • \n\tUser defined menu items are now localized when there is a matching translation.\n\t
    • \n\t
  • \n\tWidth of icon column of autocompletion lists on GTK+ made more consistent.\n\t
    • \n\t
  • \n\tBug with slicing UTF-8 text into character fragments when there is a sequence of 100 or more 3 byte characters. Bug #2780566.\n\t
    • \n\t
  • \n\tFolding bugs introduced in 1.78 fixed. Some of the fix was generic and there was also a specific fix for C++.\n\t
    • \n\t
  • \n\tBug fixed where a rectangular paste was not padding the line with sufficient spaces to align the pasted text.\n\t
    • \n\t
  • \n\tBug fixed with showing all text on each line of multi-line annotations when styling the whole annotation using SCI_ANNOTATIONSETSTYLE. Bug #2789430.\n\t
    • \n
\n

\n Release 1.78\n

\n
    \n\t
  • \n\tReleased on 28 April 2009.\n\t
    • \n\t
  • \n\tAnnotation lines may be added to each line.\n\t
    • \n\t
  • \n\tA text margin may be defined with different text on each line.\n\t
    • \n\t
  • \n\tApplication actions may be added to the undo history.\n\t
    • \n\t
  • \n\tCan query the symbol defined for a marker.\n\tAn available symbol added for applications to indicate that plugins may allocate a marker.\n\t
    • \n\t
  • \n\tCan increase the amount of font ascent and descent.\n\t
    • \n\t
  • \n\tCOBOL lexer added. Feature #2127406.\n\t
    • \n\t
  • \n\tNimrod lexer added. Feature #2642620.\n\t
    • \n\t
  • \n\tPowerPro lexer added. Feature #2195308.\n\t
    • \n\t
  • \n\tSML lexer added. Feature #2710950.\n\t
    • \n\t
  • \n\tSORCUS Installation file lexer added. Feature #2343375.\n\t
    • \n\t
  • \n\tTACL lexer added. Feature #2127406.\n\t
    • \n\t
  • \n\tTAL lexer added. Feature #2127406.\n\t
    • \n\t
  • \n\tRewritten Pascal lexer with improved folding and other fixes. Feature #2190650.\n\t
    • \n\t
  • \n\tINDIC_ROUNDBOX translucency level can be modified. Feature #2586290.\n\t
    • \n\t
  • \n\tC++ lexer treats angle brackets in #include directives as quotes when styling.within.preprocessor. Bug #2551033.\n\t
    • \n\t
  • \n\tInno Setup lexer is sensitive to whether within the [Code] section and handles comments better. Bug #2552973.\n\t
    • \n\t
  • \n\tHTML lexer does not go into script mode when script tag is self-closing.\n\t
    • \n\t
  • \n\tHTML folder fixed where confused by comments when fold.html.preprocessor off. Bug #2532774.\n\t
    • \n\t
  • \n\tPerl lexer fixes problem with string matching caused by line endings. Bug #2648342.\n\t
    • \n\t
  • \n\tProgress lexer fixes problem with \"last-event:function\" phrase. Bug #2483619.\n\t
    • \n\t
  • \n\tProperties file lexer extended to handle RFC2822 text when lexer.props.allow.initial.spaces on.\n\t
    • \n\t
  • \n\tPython lexer adds options for Python 3 and Cython.\n\t
    • \n\t
  • \n\tShell lexer fixes heredoc problem caused by line endings. Bug #2635257.\n\t
    • \n\t
  • \n\tTeX lexer handles comment at end of line correctly. Bug #2698766.\n\t
    • \n\t
  • \n\tSciTE retains selection range when performing a replace selection command. Feature #2339160.\n\t
    • \n\t
  • \n\tSciTE definition of word characters fixed to match documentation. Bug #2464531.\n\t
    • \n\t
  • \n\tSciTE on GTK+ performing Search or Replace when dialog already shown now brings dialog to foreground.\n\tBug #2634224.\n\t
    • \n\t
  • \n\tFixed encoding bug with calltips on GTK+.\n\t
    • \n\t
  • \n\tBlock caret drawn in correct place on wrapped lines. Bug #2126144.\n\t
    • \n\t
  • \n\tCompilation for 64 bit Windows works using MinGW. Bug #2515578.\n\t
    • \n\t
  • \n\tIncorrect memory freeing fixed on OS X.\n\tBug #2354098,\n\tBug #2671749.\n\t
    • \n\t
  • \n\tSciTE on GTK+ crash fixed on startup when child process exits before initialization complete.\n\tBug #2716987.\n\t
    • \n\t
  • \n\tCrash fixed when AutoCompleteGetCurrent called with no active autocompletion.\n\t
    • \n\t
  • \n\tFlickering diminished when pressing Tab. Bug #2723006.\n\t
    • \n\t
  • \n\tNamespace compilation issues with GTK+ on OS X fixed.\n\t
    • \n\t
  • \n\tIncreased maximum length of SciTE's Language menu on GTK+ to 100 items. Bug #2528241.\n\t
    • \n\t
  • \n\tFixed incorrect Python lexing for multi-line continued strings. Bug #2450963.\n\t
    • \n
\n

\n Release 1.77\n

\n
    \n\t
  • \n\tReleased on 18 October 2008.\n\t
    • \n\t
  • \n\tDirect temporary access to Scintilla's text buffer to allow simple efficient interfacing\n\tto libraries like regular expression libraries.\n\t
    • \n\t
  • \n\tScintilla on Windows can interpret keys as Unicode even when a narrow character\n\twindow with SCI_SETKEYSUNICODE.\n\t
    • \n\t
  • \n\tNotification sent when autocompletion cancelled.\n\t
    • \n\t
  • \n\tMySQL lexer added.\n\t
    • \n\t
  • \n\tLexer for gettext .po files added.\n\t
    • \n\t
  • \n\tAbaqus lexer handles program structure more correctly.\n\t
    • \n\t
  • \n\tAssembler lexer works with non-ASCII text.\n\t
    • \n\t
  • \n\tC++ lexer allows mixed case doc comment tags.\n\t
    • \n\t
  • \n\tCSS lexer updated and works with non-ASCII.\n\t
    • \n\t
  • \n\tDiff lexer adds style for changed lines, handles subversion diffs better and\n\tfixes styling and folding for lines containing chunk dividers (\"---\").\n\t
    • \n\t
  • \n\tFORTRAN lexer accepts more styles of compiler directive.\n\t
    • \n\t
  • \n\tHaskell lexer allows hexadecimal literals.\n\t
    • \n\t
  • \n\tHTML lexer improves PHP and JavaScript folding.\n\tPHP heredocs, nowdocs, strings and comments processed more accurately.\n\tInternet Explorer's non-standard >comment< tag supported.\n\tScript recognition in XML can be controlled with lexer.xml.allow.scripts property.\n\t
    • \n\t
  • \n\tLua lexer styles last character correctly.\n\t
    • \n\t
  • \n\tPerl lexer update.\n\t
    • \n\t
  • \n\tComment folding implemented for Ruby.\n\t
    • \n\t
  • \n\tBetter TeX folding.\n\t
    • \n\t
  • \n\tVerilog lexer updated.\n\t
    • \n\t
  • \n\tWindows Batch file lexer handles %~ and %*.\n\t
    • \n\t
  • \n\tYAML lexer allows non-ASCII text.\n\t
    • \n\t
  • \n\tSciTE on GTK+ implements \"Replace in Buffers\" in advanced mode.\n\t
    • \n\t
  • \n\tThe extender OnBeforeSave method can override the default file saving behaviour by retuning true.\n\t
    • \n\t
  • \n\tWindow position and recent files list may be saved into the session file.\n\t
    • \n\t
  • \n\tRight button press outside the selection moves the caret.\n\t
    • \n\t
  • \n\tSciTE load.on.activate works when closing a document reveals a changed document.\n\t
    • \n\t
  • \n\tSciTE bug fixed where eol.mode not used for initial buffer.\n\t
    • \n\t
  • \n\tSciTE bug fixed where a file could be saved as the same name as another\n\tbuffer leading to confusing behaviour.\n\t
    • \n\t
  • \n\tFixed display bug for long lines in same style on Windows.\n\t
    • \n\t
  • \n\tFixed SciTE crash when finding matching preprocessor command used on some files.\n\t
    • \n\t
  • \n\tDrawing performance improved for files with many blank lines.\n\t
    • \n\t
  • \n\tFolding bugs fixed where changing program text produced a decrease in fold level on a fold header line.\n\t
    • \n\t
  • \n\tClearing document style now clears all indicators.\n\t
    • \n\t
  • \n\tSciTE's embedded Lua updated to 5.1.4.\n\t
    • \n\t
  • \n\tSciTE will compile with versions of GTK+ before 2.8 again.\n\t
    • \n\t
  • \n\tSciTE on GTK+ bug fixed where multiple files not opened.\n\t
    • \n\t
  • \n\tBug fixed with SCI_VCHOMEWRAP and SCI_VCHOMEWRAPEXTEND on white last line.\n\t
    • \n\t
  • \n\tRegular expression bug fixed where \"^[^(]+$\" matched empty lines.\n\t
    • \n
\n

\n Release 1.76\n

\n
    \n\t
  • \n\tReleased on 16 March 2008.\n\t
    • \n\t
  • \n\tSupport for PowerShell.\n\t
    • \n\t
  • \n\tLexer added for Magik.\n\t
    • \n\t
  • \n\tDirector extension working on GTK+.\n\t
    • \n\t
  • \n\tDirector extension may set focus to SciTE through \"focus:\" message on GTK+.\n\t
    • \n\t
  • \n\tC++ folder handles final line better in some cases.\n\t
    • \n\t
  • \n\tSCI_COPYALLOWLINE added which is similar to SCI_COPY except that if the selection is empty then\n\tthe line holding the caret is copied. On Windows an extra clipboard format allows pasting this as a whole\n\tline before the current selection. This behaviour is compatible with Visual Studio.\n\t
    • \n\t
  • \n\tOn Windows, the horizontal scroll bar can handle wider files.\n\t
    • \n\t
  • \n\tOn Windows, a system palette leak was fixed. Should not affect many as palette mode is rarely used.\n\t
    • \n\t
  • \n\tInstall command on GTK+ no longer tries to set explicit owner.\n\t
    • \n\t
  • \n\tPerl lexer handles defined-or operator \"//\".\n\t
    • \n\t
  • \n\tOctave lexer fixes \"!=\" operator.\n\t
    • \n\t
  • \n\tOptimized selection change drawing to not redraw as much when not needed.\n\t
    • \n\t
  • \n\tSciTE on GTK+ no longer echoes Lua commands so is same as on Windows.\n\t
    • \n\t
  • \n\tAutomatic vertical scrolling limited to one line at a time so is not too fast.\n\t
    • \n\t
  • \n\tCrash fixed when line states set beyond end of line states. This occurred when lexers did not\n\tset a line state for each line.\n\t
    • \n\t
  • \n\tCrash in SciTE on Windows fixed when search for 513 character string fails.\n\t
    • \n\t
  • \n\tSciTE disables translucent features on Windows 9x due to crashes reported when using translucency.\n\t
    • \n\t
  • \n\tBug fixed where whitespace background was not seen on wrapped lines.\n\t
    • \n
\n

\n Release 1.75\n

\n
    \n\t
  • \n\tReleased on 22 November 2007.\n\t
    • \n\t
  • \n\tSome WordList and PropSet functionality moved from Scintilla to SciTE.\n\tProjects that link to Scintilla's code for these classes may need to copy\n\tcode from SciTE.\n\t
    • \n\t
  • \n\tBorland C++ can no longer build Scintilla.\n\t
    • \n\t
  • \n\tInvalid bytes in UTF-8 mode are displayed as hex blobs. This also prevents crashes due to\n\tpassing invalid UTF-8 to platform calls.\n\t
    • \n\t
  • \n\tIndentation guides enhanced to be visible on completely empty lines when possible.\n\t
    • \n\t
  • \n\tThe horizontal scroll bar may grow to match the widest line displayed.\n\t
    • \n\t
  • \n\tAllow autocomplete pop ups to appear outside client rectangle in some cases.\n\t
    • \n\t
  • \n\tWhen line state changed, SC_MOD_CHANGELINESTATE modification notification sent and\n\tmargin redrawn.\n\t
    • \n\t
  • \n\tSciTE scripts can access the menu command values IDM_*.\n\t
    • \n\t
  • \n\tSciTE's statement.end property has been implemented again.\n\t
    • \n\t
  • \n\tSciTE shows paths and matches in different styles for Find In Files.\n\t
    • \n\t
  • \n\tIncremental search in SciTE for Windows is modeless to make it easier to exit.\n\t
    • \n\t
  • \n\tFolding performance improved.\n\t
    • \n\t
  • \n\tSciTE for GTK+ now includes a Browse button in the Find In Files dialog.\n\t
    • \n\t
  • \n\tOn Windows versions that support Unicode well, Scintilla is a wide character window\n\twhich allows input for some less common languages like Armenian, Devanagari,\n\tTamil, and Georgian. To fully benefit, applications should use wide character calls.\n\t
    • \n\t
  • \n\tLua function names are exported from SciTE to allow some extension libraries to work.\n\t
    • \n\t
  • \n\tLexers added for Abaqus, Ansys APDL, Asymptote, and R.\n\t
    • \n\t
  • \n\tSCI_DELWORDRIGHTEND added for closer compatibility with GTK+ entry widget.\n\t
    • \n\t
  • \n\tThe styling buffer may now use all 8 bits in each byte for lexical states with 0 bits for indicators.\n\t
    • \n\t
  • \n\tMultiple characters may be set for SciTE's calltip.<lexer>.parameters.start property.\n\t
    • \n\t
  • \n\tBash lexer handles octal literals.\n\t
    • \n\t
  • \n\tC++/JavaScript lexer recognizes regex literals in more situations.\n\t
    • \n\t
  • \n\tHaskell lexer fixed for quoted strings.\n\t
    • \n\t
  • \n\tHTML/XML lexer does not notice XML indicator if there is\n\tnon-whitespace between the \"<?\" and \"XML\".\n\tASP problem fixed where </ is used inside a comment.\n\t
    • \n\t
  • \n\tError messages from Lua 5.1 are recognized.\n\t
    • \n\t
  • \n\tFolding implemented for Metapost.\n\t
    • \n\t
  • \n\tPerl lexer enhanced for handling minus-prefixed barewords,\n\tunderscores in numeric literals and vector/version strings,\n\t^D and ^Z similar to __END__,\n\tsubroutine prototypes as a new lexical class,\n\tformats and format blocks as new lexical classes, and\n\t'/' suffixed keywords and barewords.\n\t
    • \n\t
  • \n\tPython lexer styles all of a decorator in the decorator style rather than just the name.\n\t
    • \n\t
  • \n\tYAML lexer styles colons as operators.\n\t
    • \n\t
  • \n\tFixed SciTE bug where undo would group together multiple separate modifications.\n\t
    • \n\t
  • \n\tBug fixed where setting background colour of calltip failed.\n\t
    • \n\t
  • \n\tSciTE allows wildcard suffixes for file pattern based properties.\n\t
    • \n\t
  • \n\tSciTE on GTK+ bug fixed where user not prompted to save untitled buffer.\n\t
    • \n\t
  • \n\tSciTE bug fixed where property values from one file were not seen by lower priority files.\n\t
    • \n\t
  • \n\tBug fixed when showing selection with a foreground colour change which highlighted\n\tan incorrect range in some positions.\n\t
    • \n\t
  • \n\tCut now invokes SCN_MODIFYATTEMPTRO notification.\n\t
    • \n\t
  • \n\tBug fixed where caret not shown at beginning of wrapped lines.\n\tCaret made visible in some cases after wrapping and scroll bar updated after wrapping.\n\t
    • \n\t
  • \n\tModern indicators now work on wrapped lines.\n\t
    • \n\t
  • \n\tSome crashes fixed for 64-bit GTK+.\n\t
    • \n\t
  • \n\tOn GTK+ clipboard features improved for VMWare tools copy and paste.\n\tSciTE exports the clipboard more consistently on shut down.\n\t
    • \n
\n

\n Release 1.74\n

\n
    \n\t
  • \n\tReleased on 18 June 2007.\n\t
    • \n\t
  • \n\tOS X support.\n\t
    • \n\t
  • \n\tIndicators changed to be a separate data structure allowing more indicators. Storing indicators in high bits\n\tof styling bytes is deprecated and will be removed in the next version.\n\t
    • \n\t
  • \n\tUnicode support extended to all Unicode characters not just the Basic Multilingual Plane.\n\t
    • \n\t
  • \n\tPerformance improved on wide lines by breaking long runs in a single style into shorter segments.\n\t
    • \n\t
  • \n\tPerformance improved by caching layout of short text segments.\n\t
    • \n\t
  • \n\tSciTE includes Lua 5.1.\n\t
    • \n\t
  • \n\tCaret may be displayed as a block.\n\t
    • \n\t
  • \n\tLexer added for GAP.\n\t
    • \n\t
  • \n\tLexer added for PL/M.\n\t
    • \n\t
  • \n\tLexer added for Progress.\n\t
    • \n\t
  • \n\tSciTE session files have changed format to be like other SciTE .properties files\n\tand now use the extension .session.\n\tBookmarks and folds may optionally be saved in session files.\n\tSession files created with previous versions of SciTE will not load into this version.\n\t
    • \n\t
  • \n\tSciTE's extension and scripting interfaces add OnKey, OnDwellStart, and OnClose methods.\n\t
    • \n\t
  • \n\tOn GTK+, copying to the clipboard does not include the text/urilist type since this caused problems when\n\tpasting into Open Office.\n\t
    • \n\t
  • \n\tOn GTK+, Scintilla defaults caret blink rate to platform preference.\n\t
    • \n\t
  • \n\tDragging does not start until the mouse has been dragged a certain amount.\n\tThis stops spurious drags when just clicking inside the selection.\n\t
    • \n\t
  • \n\tBug fixed where brace highlight not shown when caret line background set.\n\t
    • \n\t
  • \n\tBug fixed in Ruby lexer where out of bounds access could occur.\n\t
    • \n\t
  • \n\tBug fixed in XML folding where tags were not being folded because they are singletons in HTML.\n\t
    • \n\t
  • \n\tBug fixed when many font names used.\n\t
    • \n\t
  • \n\tLayout bug fixed on GTK+ where fonts have ligatures available.\n\t
    • \n\t
  • \n\tBug fixed with SCI_LINETRANSPOSE on a blank line.\n\t
    • \n\t
  • \n\tSciTE hang fixed when using UNC path with directory properties feature.\n\t
    • \n\t
  • \n\tBug on Windows fixed by examining dropped text for Unicode even in non-Unicode mode so it\n\tcan work when source only provides Unicode or when using an encoding different from the\n\tsystem default.\n\t
    • \n\t
  • \n\tSciTE bug on GTK+ fixed where Stop Executing did not work when more than a single process started.\n\t
    • \n\t
  • \n\tSciTE bug on GTK+ fixed where mouse wheel was not switching between buffers.\n\t
    • \n\t
  • \n\tMinor line end fix to PostScript lexer.\n\t
    • \n
\n

\n Release 1.73\n

\n
    \n\t
  • \n\tReleased on 31 March 2007.\n\t
    • \n\t
  • \n\tSciTE adds a Directory properties file to configure behaviour for files in a directory and its subdirectories.\n\t
    • \n\t
  • \n\tStyle changes may be made during text modification events.\n\t
    • \n\t
  • \n\tRegular expressions recognize \\d, \\D, \\s, \\S, \\w, \\W, and \\xHH.\n\t
    • \n\t
  • \n\tSupport for cmake language added.\n\t
    • \n\t
  • \n\tMore Scintilla properties can be queried.\n\t
    • \n\t
  • \n\tEdge line drawn under text.\n\t
    • \n\t
  • \n\tA savesession command added to SciTE director interface.\n\t
    • \n\t
  • \n\tSciTE File | Encoding menu item names changed to be less confusing.\n\t
    • \n\t
  • \n\tSciTE on GTK+ dialog buttons reordered to follow guidelines.\n\t
    • \n\t
  • \n\tSciTE on GTK+ removed GTK+ 1.x compatible file dialog code.\n\t
    • \n\t
  • \n\tSciTE on GTK+ recognizes key names KeypadMultiply and KeypadDivide.\n\t
    • \n\t
  • \n\tBackground colour of line wrapping visual flag changed to STYLE_DEFAULT.\n\t
    • \n\t
  • \n\tMakefile lexing enhanced for ':=' operator and when lines start with tab.\n\t
    • \n\t
  • \n\tTADS3 lexer and folder improved.\n\t
    • \n\t
  • \n\tSCN_DOUBLECLICK notification may set SCI_SHIFT, SCI_CTRL, and SCI_ALT flags on modifiers field.\n\t
    • \n\t
  • \n\tSlow folding of large constructs in Python fixed.\n\t
    • \n\t
  • \n\tMSSQL folding fixed to be case-insensitive and fold at more keywords.\n\t
    • \n\t
  • \n\tSciTE's brace matching works better for HTML.\n\t
    • \n\t
  • \n\tDetermining API list items checks for specified parameters start character before default '('.\n\t
    • \n\t
  • \n\tHang fixed in HTML lexer.\n\t
    • \n\t
  • \n\tBug fixed in with LineTranspose command where markers could move to different line.\n\t
    • \n\t
  • \n\tMemory released when buffer completely emptied.\n\t
    • \n\t
  • \n\tIf translucency not available on Windows, draw rectangular outline instead.\n\t
    • \n\t
  • \n\tBash lexer handles \"-x\" in \"--x-includes...\" better.\n\t
    • \n\t
  • \n\tAutoIt3 lexer fixes string followed by '+'.\n\t
    • \n\t
  • \n\tLinesJoin fixed where it stopped early due to not adjusting for inserted spaces..\n\t
    • \n\t
  • \n\tStutteredPageDown fixed when lines wrapped.\n\t
    • \n\t
  • \n\tFormatRange fixed to not double count line number width which could lead to a large space.\n\t
    • \n\t
  • \n\tSciTE Export As PDF and Latex commands fixed to format floating point numbers with '.' even in locales\n\tthat use ','.\n\t
    • \n\t
  • \n\tSciTE bug fixed where File | New could produce buffer with contents of previous file when using read-only mode.\n\t
    • \n\t
  • \n\tSciTE retains current scroll position when switching buffers and fold.on.open set.\n\t
    • \n\t
  • \n\tSciTE crash fixed where '*' used to invoke parameters dialog.\n\t
    • \n\t
  • \n\tSciTE bugs when writing large UCS-2 files fixed.\n\t
    • \n\t
  • \n\tBug fixed when scrolling inside a SCN_PAINTED event by invalidating window\n\trather than trying to perform synchronous painting.\n\t
    • \n\t
  • \n\tSciTE for GTK+ View | Full Screen works on recent versions of GTK+.\n\t
    • \n\t
  • \n\tSciTE for Windows enables and disables toolbar commands correctly.\n\t
    • \n
\n

\n Release 1.72\n

\n
    \n\t
  • \n\tReleased on 15 January 2007.\n\t
    • \n\t
  • \n\tPerformance of per-line data improved.\n\t
    • \n\t
  • \n\tSC_STARTACTION flag set on the first modification notification in an undo\n\ttransaction to help synchronize the container's undo stack with Scintilla's.\n\t
    • \n\t
  • \n\tOn GTK+ drag and drop defaults to move rather than copy.\n\t
    • \n\t
  • \n\tScintilla supports extending appearance of selection to right hand margin.\n\t
    • \n\t
  • \n\tIncremental search available on GTK+.\n\t
    • \n\t
  • \n\tSciTE Indentation Settings dialog available on GTK+ and adds a \"Convert\" button.\n\t
    • \n\t
  • \n\tFind in Files can optionally ignore binary files or directories that start with \".\".\n\t
    • \n\t
  • \n\tLexer added for \"D\" language.\n\t
    • \n\t
  • \n\tExport as HTML shows folding with underline lines and +/- symbols.\n\t
    • \n\t
  • \n\tRuby lexer interprets interpolated strings as expressions.\n\t
    • \n\t
  • \n\tLua lexer fixes some cases of numeric literals.\n\t
    • \n\t
  • \n\tC++ folder fixes bug with \"@\" in doc comments.\n\t
    • \n\t
  • \n\tNSIS folder handles !if and related commands.\n\t
    • \n\t
  • \n\tInno setup lexer adds styling for single and double quoted strings.\n\t
    • \n\t
  • \n\tMatlab lexer handles backslashes in string literals correctly.\n\t
    • \n\t
  • \n\tHTML lexer fixed to allow \"?>\" in comments in Basic script.\n\t
    • \n\t
  • \n\tAdded key codes for Windows key and Menu key.\n\t
    • \n\t
  • \n\tLua script method scite.MenuCommand(x) performs a menu command.\n\t
    • \n\t
  • \n\tSciTE bug fixed with box comment command near start of file setting selection to end of file.\n\t
    • \n\t
  • \n\tSciTE on GTK+, fixed loop that occurred with automatic loading for an unreadable file.\n\t
    • \n\t
  • \n\tSciTE asks whether to save files when Windows shuts down.\n\t
    • \n\t
  • \n\tSave Session on Windows now defaults the extension to \"ses\".\n\t
    • \n\t
  • \n\tBug fixed with single character keywords.\n\t
    • \n\t
  • \n\tFixed infinite loop for SCI_GETCOLUMN for position beyond end of document.\n\t
    • \n\t
  • \n\tFixed failure to accept typing on Solaris/GTK+ when using default ISO-8859-1 encoding.\n\t
    • \n\t
  • \n\tFixed warning from Lua in SciTE when creating a new buffer when already have\n\tmaximum number of buffers open.\n\t
    • \n\t
  • \n\tCrash fixed with \"%%\" at end of batch file.\n\t
    • \n
\n

\n Release 1.71\n

\n
    \n\t
  • \n\tReleased on 21 August 2006.\n\t
    • \n\t\n\t
  • \n\tDouble click notification includes line and position.\n\t
    • \n\t
  • \n\tVB lexer bugs fixed for preprocessor directive below a comment or some other states and\n\tto use string not closed style back to the starting quote when there are internal doubled quotes.\n\t
    • \n\t
  • \n\tC++ lexer allows identifiers to contain '$' and non-ASCII characters such as UTF-8.\n\tThe '$' character can be disallowed with lexer.cpp.allow.dollars=0.\n\t
    • \n\t
  • \n\tPerl lexer allows UTF-8 identifiers and has some other small improvements.\n\t
    • \n\t
  • \n\tSciTE's $(CurrentWord) uses word.characters.<filepattern> to define the word\n\trather than a hardcoded list of word characters.\n\t
    • \n\t
  • \n\tSciTE Export as HTML adds encoding information for UTF-8 file and fixes DOCTYPE.\n\t
    • \n\t
  • \n\tSciTE session and .recent files default to the user properties directory rather than global\n\tproperties directory.\n\t
    • \n\t
  • \n\tLeft and right scroll events handled correctly on GTK+ and horizontal scroll bar has more sensible\n\tdistances for page and arrow clicks.\n\t
    • \n\t
  • \n\tSciTE on GTK+ tab bar fixed to work on recent versions of GTK+.\n\t
    • \n\t
  • \n\tOn GTK+, if the approximate character set conversion is unavailable, a second attempt is made\n\twithout approximations. This may allow keyboard input and paste to work on older systems.\n\t
    • \n\t
  • \n\tSciTE on GTK+ can redefine the Insert key.\n\t
    • \n\t
  • \n\tSciTE scripting interface bug fixed where some string properties could not be changed.\n\t
    • \n
\n

\n Release 1.70\n

\n
    \n\t
  • \n\tReleased on 20 June 2006.\n\t
    • \n\t
  • \n\tOn GTK+, character set conversion is performed using an option that allows approximate conversions rather\n\tthan failures when a character can not be converted. This may lead to similar characters being inserted or\n\twhen no similar character is available a '?' may be inserted.\n\t
    • \n\t
  • \n\tOn GTK+, the internationalized IM (Input Method) feature is used for all typed input for all character sets.\n\t
    • \n\t
  • \n\tScintilla has new margin types SC_MARGIN_BACK and SC_MARGIN_FORE that use the default\n\tstyle's background and foreground colours (normally white and black) as the background to the margin.\n\t
    • \n\t
  • \n\tScintilla/GTK+ allows file drops on Windows when drop is of type DROPFILES_DND\n\tas well as text/uri-list.\n\t
    • \n\t
  • \n\tCode page can only be set to one of the listed valid values.\n\t
    • \n\t
  • \n\tText wrapping fixed for cases where insertion was not wide enough to trigger\n\twrapping before being styled but was after styling.\n\t
    • \n\t
  • \n\tSciTE find marks are removed before printing or exporting to avoid producing incorrect styles.\n\t
    • \n
\n

\n Release 1.69\n

\n
    \n\t
  • \n\tReleased on 29 May 2006.\n\t
    • \n\t
  • \n\tSciTE supports z-order based buffer switching on Ctrl+Tab.\n\t
    • \n\t
  • \n\tTranslucent support for selection and whole line markers.\n\t
    • \n\t
  • \n\tSciTE may have per-language abbreviations files.\n\t
    • \n\t
  • \n\tSupport for Spice language.\n\t
    • \n\t
  • \n\tOn GTK+ autocompletion lists are optimized and use correct selection colours.\n\t
    • \n\t
  • \n\tOn GTK+ the URI data type is preferred in drag and drop so that applications\n\twill see files dragged from the shell rather than dragging the text of the file name\n\tinto the document.\n\t
    • \n\t
  • \n\tIncreased number of margins to 5.\n\t
    • \n\t
  • \n\tBasic lexer allows include directive $include: \"file name\".\n\t
    • \n\t
  • \n\tSQL lexer no longer bases folding on indentation.\n\t
    • \n\t
  • \n\tLine ends are transformed when copied to clipboard on\n\tWindows/GTK+2 as well as Windows/GTK+ 1.\n\t
    • \n\t
  • \n\tLexing code masks off the indicator bits on the start style before calling the lexer\n\tto avoid confusing the lexer when an application has used an indicator.\n\t
    • \n\t
  • \n\tSciTE savebefore:yes only saves the file when it has been changed.\n\t
    • \n\t
  • \n\tSciTE adds output.initial.hide setting to allow setting the size of the output pane\n\twithout it showing initially.\n\t
    • \n\t
  • \n\tSciTE on Windows Go To dialog allows line number with more digits.\n\t
    • \n\t
  • \n\tBug in HTML lexer fixed where a segment of PHP could switch scripting language\n\tbased on earlier text on that line.\n\t
    • \n\t
  • \n\tMemory bug fixed when freeing regions on GTK+.\n\tOther minor bugs fixed on GTK+.\n\t
    • \n\t
  • \n\tDeprecated GTK+ calls in Scintilla replaced with current calls.\n\t
    • \n\t
  • \n\tFixed a SciTE bug where closing the final buffer, if read-only, left the text present in an\n\tuntitled buffer.\n\t
    • \n\t
  • \n\tBug fixed in bash lexer that prevented folding.\n\t
    • \n\t
  • \n\tCrash fixed in bash lexer when backslash at end of file.\n\t
    • \n\t
  • \n\tCrash on recent releases of GTK+ 2.x avoided by changing default font from X\n\tcore font to Pango font \"!Sans\".\n\t
    • \n\t
  • \n\tFix for SciTE properties files where multiline properties continued over completely blank lines.\n\t
    • \n\t
  • \n\tBug fixed in SciTE/GTK+ director interface where more data available than\n\tbuffer size.\n\t
    • \n\t
  • \n\tMinor visual fixes to SciTE splitter on GTK+.\n\t
    • \n
\n

\n Release 1.68\n

\n
    \n\t
  • \n\tReleased on 9 March 2006.\n\t
    • \n\t
  • \n\tTranslucent drawing implemented for caret line and box indicators.\n\t
    • \n\t
  • \n\tLexer specifically for TCL is much more accurate than reusing C++ lexer.\n\t
    • \n\t
  • \n\tSupport for Inno Setup scripts.\n\t
    • \n\t
  • \n\tSupport for Opal language.\n\t
    • \n\t
  • \n\tCalltips may use a new style, STYLE_CALLTIP which allows choosing a\n\tdifferent font for calltips.\n\t
    • \n\t
  • \n\tPython lexer styles comments on decorators.\n\t
    • \n\t
  • \n\tHTML lexer refined handling of \"?>\" and \"%>\" within server\n\tside scripts.\n\t
    • \n\t
  • \n\tBatch file lexer improved.\n\t
    • \n\t
  • \n\tEiffel lexer doesn't treat '.' as a name character.\n\t
    • \n\t
  • \n\tLua lexer handles length operator, #, and hex literals.\n\t
    • \n\t
  • \n\tProperties file lexer has separate style for keys.\n\t
    • \n\t
  • \n\tPL/SQL folding improved.\n\t
    • \n\t
  • \n\tSciTE Replace dialog always searches in forwards direction.\n\t
    • \n\t
  • \n\tSciTE can detect language of file from initial #! line.\n\t
    • \n\t
  • \n\tSciTE on GTK+ supports output.scroll=2 setting.\n\t
    • \n\t
  • \n\tSciTE can perform an import a properties file from the command line.\n\t
    • \n\t
  • \n\tSet of word characters used for regular expression \\< and \\>.\n\t
    • \n\t
  • \n\tBug fixed with SCI_COPYTEXT stopping too early.\n\t
    • \n\t
  • \n\tBug fixed with splitting lines so that all lines are split.\n\t
    • \n\t
  • \n\tSciTE calls OnSwitchFile when closing one buffer causes a switch to another.\n\t
    • \n\t
  • \n\tSciTE bug fixed where properties were being reevaluated without good reason\n\tafter running a macro.\n\t
    • \n\t
  • \n\tCrash fixed when clearing document with some lines contracted in word wrap mode.\n\t
    • \n\t
  • \n\tPalette expands as more entries are needed.\n\t
    • \n\t
  • \n\tSCI_POSITIONFROMPOINT returns more reasonable value when close to\n\tlast text on a line.\n\t
    • \n\t
  • \n\tOn Windows, long pieces of text may be drawn in segments if they fail to draw\n\tas a whole.\n\t
    • \n\t
  • \n\tBug fixed with bad drawing when some visual changes made inside SCN_UPDATEUI\n\tnotification.\n\t
    • \n\t
  • \n\tSciTE bug fixed with groupundo setting.\n\t
    • \n
\n

\n Release 1.67\n

\n
    \n\t
  • \n\tReleased on 17 December 2005.\n\t
    • \n\t
  • \n\tScintilla checks the paint region more accurately when seeing if an area is being\n\trepainted. Platform layer implementations may need to change for this to take\n\teffect. This fixes some drawing and styling bugs. Also optimized some parts of\n\tmarker code to only redraw the line of the marker rather than whole of the margin.\n\t
    • \n\t
  • \n\tQuoted identifier style for SQL. SQL folding performed more simply.\n\t
    • \n\t
  • \n\tRuby lexer improved to better handle here documents and non-ASCII\n\tcharacters.\n\t
    • \n\t
  • \n\tLua lexer supports long string and block comment syntax from Lua 5.1.\n\t
    • \n\t
  • \n\tBash lexer handles here documents better.\n\t
    • \n\t
  • \n\tJavaScript lexing recognizes regular expressions more accurately and includes flag\n\tcharacters in the regular expression style. This is both in JavaScript files and when\n\tJavaScript is embedded in HTML.\n\t
    • \n\t
  • \n\tScintilla API provided to reveal how many style bits are needed for the\n\tcurrent lexer.\n\t
    • \n\t
  • \n\tSelection duplicate added.\n\t
    • \n\t
  • \n\tScintilla API for adding a set of markers to a line.\n\t
    • \n\t
  • \n\tDBCS encodings work on Windows 9x.\n\t
    • \n\t
  • \n\tConvention defined for property names to be used by lexers and folders\n\tso they can be automatically discovered and forwarded from containers.\n\t
    • \n\t
  • \n\tDefault bookmark in SciTE changed to a blue sphere image.\n\t
    • \n\t
  • \n\tSciTE stores the time of last asking for a save separately for each buffer\n\twhich fixes bugs with automatic reloading.\n\t
    • \n\t
  • \n\tOn Windows, pasted text has line ends converted to current preference.\n\tGTK+ already did this.\n\t
    • \n\t
  • \n\tKid template language better handled by HTML lexer by finishing ASP Python\n\tmode when a ?> is found.\n\t
    • \n\t
  • \n\tSciTE counts number of characters in a rectangular selection correctly.\n\t
    • \n\t
  • \n\t64-bit compatibility improved. One change that may affect user code is that\n\tthe notification message header changed to include a pointer-sized id field\n\tto match the current Windows definition.\n\t
    • \n\t
  • \n\tEmpty ranges can no longer be dragged.\n\t
    • \n\t
  • \n\tCrash fixed when calls made that use layout inside the painted notification.\n\t
    • \n\t
  • \n\tBug fixed where Scintilla created pixmap buffers that were too large leading\n\tto failures when many instances used.\n\t
    • \n\t
  • \n\tSciTE sets the directory of a new file to the directory of the currently\n\tactive file.\n\t
    • \n\t
  • \n\tSciTE allows choosing a code page for the output pane.\n\t
    • \n\t
  • \n\tSciTE HTML exporter no longer honours monospaced font setting.\n\t
    • \n\t
  • \n\tLine layout cache in page mode caches the line of the caret. An assertion is\n\tnow used to ensure that the layout reentrancy problem that caused this\n\tis easier to find.\n\t
    • \n\t
  • \n\tSpeed optimized for long lines and lines containing many control characters.\n\t
    • \n\t
  • \n\tBug fixed in brace matching in DBCS files where byte inside character\n\tis same as brace.\n\t
    • \n\t
  • \n\tIndent command does not indent empty lines.\n\t
    • \n\t
  • \n\tSciTE bug fixed for commands that operate on files with empty extensions.\n\t
    • \n\t
  • \n\tSciTE bug fixed where monospaced option was copied for subsequently opened files.\n\t
    • \n\t
  • \n\tSciTE on Windows bug fixed in the display of a non-ASCII search string\n\twhich can not be found.\n\t
    • \n\t
  • \n\tBugs fixed with nested calls displaying a new calltip while one is already\n\tdisplayed.\n\t
    • \n\t
  • \n\tBug fixed when styling PHP strings.\n\t
    • \n\t
  • \n\tBug fixed when styling C++ continued preprocessor lines.\n\t
    • \n\t
  • \n\tSciTE bug fixed where opening file from recently used list reset choice of\n\tlanguage.\n\t
    • \n\t
  • \n\tSciTE bug fixed when compiled with NO_EXTENSIONS and\n\tclosing one file closes the application.\n\t
    • \n\t
  • \n\tSciTE crash fixed for error messages that look like Lua messages but aren't\n\tin the same order.\n\t
    • \n\t
  • \n\tRemaining fold box support deprecated. The symbols SC_FOLDLEVELBOXHEADERFLAG,\n SC_FOLDLEVELBOXFOOTERFLAG, SC_FOLDLEVELCONTRACTED,\n SC_FOLDLEVELUNINDENT, and SC_FOLDFLAG_BOX are deprecated.\n\t
    • \n
\n

\n Release 1.66\n

\n
    \n\t
  • \n\tReleased on 26 August 2005.\n\t
    • \n\t
  • \n\tNew, more ambitious Ruby lexer.\n\t
    • \n\t
  • \n\tSciTE Find in Files dialog has options for matching case and whole words which are\n\tenabled when the internal find command is used.\n\t
    • \n\t
  • \n\tSciTE output pane can display automatic completion after \"$(\" typed.\n\tAn initial \">\" on a line is ignored when Enter pressed.\n\t
    • \n\t
  • \n\tC++ lexer recognizes keywords within line doc comments. It continues styles over line\n\tend characters more consistently so that eolfilled style can be used for preprocessor lines\n\tand line comments.\n\t
    • \n\t
  • \n\tVB lexer improves handling of file numbers and date literals.\n\t
    • \n\t
  • \n\tLua folder handles repeat until, nested comments and nested strings.\n\t
    • \n\t
  • \n\tPOV lexer improves handling of comment lines.\n\t
    • \n\t
  • \n\tAU3 lexer and folder updated. COMOBJ style added.\n\t
    • \n\t
  • \n\tBug fixed with text display on GTK+ with Pango 1.8.\n\t
    • \n\t
  • \n\tCaret painting avoided when not focused.\n\t
    • \n\t
  • \n\tSciTE on GTK+ handles file names used to reference properties as case-sensitive.\n\t
    • \n\t
  • \n\tSciTE on GTK+ Save As and Export commands set the file name field.\n\tOn GTK+ the Export commands modify the file name in the same way as on Windows.\n\t
    • \n\t
  • \n\tFixed SciTE problem where confirmation was not displaying when closing a file where all\n\tcontents had been deleted.\n\t
    • \n\t
  • \n\tMiddle click on SciTE tab now closes correct buffer on Windows when tool bar is visible.\n\t
    • \n\t
  • \n\tSciTE bugs fixed where files contained in directory that includes '.' character.\n\t
    • \n\t
  • \n\tSciTE bug fixed where import in user options was reading file from directory of\n\tglobal options.\n\t
    • \n\t
  • \n\tSciTE calltip bug fixed where single line calltips had arrow displayed incorrectly.\n\t
    • \n\t
  • \n\tSciTE folding bug fixed where empty lines were shown for no reason.\n\t
    • \n\t
  • \n\tBug fixed where 2 byte per pixel XPM images caused crash although they are still not\n\tdisplayed.\n\t
    • \n\t
  • \n\tAutocompletion list size tweaked.\n\t
    • \n
\n

\n Release 1.65\n

\n
    \n\t
  • \n\tReleased on 1 August 2005.\n\t
    • \n\t
  • \n\tFreeBasic support.\n\t
    • \n\t
  • \n\tSciTE on Windows handles command line arguments\n\t\"-\" (read standard input into buffer),\n\t\"--\" (read standard input into output pane) and\n\t\"-@\" (read file names from standard input and open each).\n\t
    • \n\t
  • \n\tSciTE includes a simple implementation of Find in Files which is used if no find.command is set.\n\t
    • \n\t
  • \n\tSciTE can close tabs with a mouse middle click.\n\t
    • \n\t
  • \n\tSciTE includes a save.all.for.build setting.\n\t
    • \n\t
  • \n\tFolder for MSSQL.\n\t
    • \n\t
  • \n\tBatch file lexer understands more of the syntax and the behaviour of built in commands.\n\t
    • \n\t
  • \n\tPerl lexer handles here docs better; disambiguates barewords, quote-like delimiters, and repetition operators;\n\thandles Pods after __END__; recognizes numbers better; and handles some typeglob special variables.\n\t
    • \n\t
  • \n\tLisp adds more lexical states.\n\t
    • \n\t
  • \n\tPHP allows spaces after <<<.\n\t
    • \n\t
  • \n\tTADS3 has a simpler set of states and recognizes identifiers.\n\t
    • \n\t
  • \n\tAvenue elseif folds better.\n\t
    • \n\t
  • \n\tErrorlist lexer treats lines starting with '+++' and '---' as separate\n\tstyles from '+' and '-' as they indicate file names in diffs.\n\t
    • \n\t
  • \n\tSciTE error recognizer handles file paths in extra explanatory lines from MSVC\n\tand in '+++' and '---' lines from diff.\n\t
    • \n\t
  • \n\tBugs fixed in SciTE and Scintilla folding behaviour when text pasted before\n\tfolded text caused unnecessary\n\tunfolding and cutting text could lead to text being irretrievably hidden.\n\t
    • \n\t
  • \n\tSciTE on Windows uses correct font for dialogs and better font for tab bar\n\tallowing better localization\n\t
    • \n\t
  • \n\tWhen Windows is used with a secondary monitor before the primary\n\tmonitor, autocompletion lists are not forced onto the primary monitor.\n\t
    • \n\t
  • \n\tScintilla calltip bug fixed where down arrow setting wrong value in notification\n\tif not in first line. SciTE bug fixed where second arrow only shown on multiple line\n\tcalltip and was therefore misinterpreting the notification value.\n\t
    • \n\t
  • \n\tLexers will no longer be re-entered recursively during, for example, fold level setting.\n\t
    • \n\t
  • \n\tUndo of typing in overwrite mode undoes one character at a time rather than requiring a removal\n\tand addition step for each character.\n\t
    • \n\t
  • \n\tEM_EXSETSEL(0,-1) fixed.\n\t
    • \n\t
  • \n\tBug fixed where part of a rectangular selection was not shown as selected.\n\t
    • \n\t
  • \n\tAutocomplete window size fixed.\n\t
    • \n
\n

\n Release 1.64\n

\n
    \n\t
  • \n\tReleased on 6 June 2005.\n\t
    • \n\t
  • \n\tTADS3 support\n\t
    • \n\t
  • \n\tSmalltalk support.\n\t
    • \n\t
  • \n\tRebol support.\n\t
    • \n\t
  • \n\tFlagship (Clipper / XBase) support.\n\t
    • \n\t
  • \n\tCSound support.\n\t
    • \n\t
  • \n\tSQL enhanced to support SQL*Plus.\n\t
    • \n\t
  • \n\tSC_MARK_FULLRECT margin marker fills the whole marker margin for marked\n\tlines with a colour.\n\t
    • \n\t
  • \n\tPerformance improved for some large undo and redo operations and modification flags\n\tadded in notifications.\n\t
    • \n\t
  • \n\tSciTE adds command equivalents for fold margin mouse actions.\n\t
    • \n\t
  • \n\tSciTE adds OnUpdateUI to set of events that can be handled by a Lua script.\n\t
    • \n\t
  • \n\tProperties set in Scintilla can be read.\n\t
    • \n\t
  • \n\tGTK+ SciTE exit confirmation adds Cancel button.\n\t
    • \n\t
  • \n\tMore accurate lexing of numbers in PHP and Caml.\n\t
    • \n\t
  • \n\tPerl can fold POD and package sections. POD verbatim section style.\n\tGlobbing syntax recognized better.\n\t
    • \n\t
  • \n\tContext menu moved slightly on GTK+ so that it will be under the mouse and will\n\tstay open if just clicked rather than held.\n\t
    • \n\t
  • \n\tRectangular selection paste works the same whichever direction the selection was dragged in.\n\t
    • \n\t
  • \n\tEncodedFromUTF8 handles -1 length argument as documented.\n\t
    • \n\t
  • \n\tUndo and redo can cause SCN_MODIFYATTEMPTRO notifications.\n\t
    • \n\t
  • \n\tIndicators display correctly when they start at the second character on a line.\n\t
    • \n\t
  • \n\tSciTE Export As HTML uses standards compliant CSS.\n\t
    • \n\t
  • \n\tSciTE automatic indentation handles keywords for indentation better.\n\t
    • \n\t
  • \n\tSciTE fold.comment.python property removed as does not work.\n\t
    • \n\t
  • \n\tFixed problem with character set conversion when pasting on GTK+.\n\t
    • \n\t
  • \n\tSciTE default character set changed from ANSI_CHARSET to DEFAULT_CHARSET.\n\t
    • \n\t
  • \n\tFixed crash when creating empty autocompletion list.\n\t
    • \n\t
  • \n\tAutocomplete window size made larger under some conditions to make truncation less common.\n\t
    • \n\t
  • \n\tBug fixed where changing case of a selection did not affect initial character of lines\n\tin multi-byte encodings.\n\t
    • \n\t
  • \n\tBug fixed where rectangular selection not displayed after Alt+Shift+Click.\n\t
    • \n
\n

\n Release 1.63\n

\n
    \n\t
  • \n\tReleased on 4 April 2005.\n\t
    • \n\t
  • \n\tAutocompletion on Windows changed to use pop up window, be faster,\n\tallow choice of maximum width and height, and to highlight only the text of the\n\tselected item rather than both the text and icon if any.\n\t
    • \n\t
  • \n\tExtra items can be added to the context menu in SciTE.\n\t
    • \n\t
  • \n\tCharacter wrap mode in Scintilla helps East Asian languages.\n\t
    • \n\t
  • \n\tLexer added for Haskell.\n\t
    • \n\t
  • \n\tObjective Caml support.\n\t
    • \n\t
  • \n\tBlitzBasic and PureBasic support.\n\t
    • \n\t
  • \n\tCSS support updated to handle CSS2.\n\t
    • \n\t
  • \n\tC++ lexer is more selective about document comment keywords.\n\t
    • \n\t
  • \n\tAutoIt 3 lexer improved.\n\t
    • \n\t
  • \n\tLua lexer styles end of line characters on comment and preprocessor\n\tlines so that the eolfilled style can be applied to them.\n\t
    • \n\t
  • \n\tNSIS support updated for line continuations, box comments, SectionGroup and\n\tPageEx, and with more up-to-date properties.\n\t
    • \n\t
  • \n\tClarion lexer updated to perform folding and have more styles.\n\t
    • \n\t
  • \n\tSQL lexer gains second set of keywords.\n\t
    • \n\t
  • \n\tErrorlist lexer recognizes Borland Delphi error messages.\n\t
    • \n\t
  • \n\tMethod added for determining number of visual lines occupied by a document\n\tline due to wrapping.\n\t
    • \n\t
  • \n\tSticky caret mode does not modify the preferred caret x position when typing\n\tand may be useful for typing columns of text.\n\t
    • \n\t
  • \n\tDwell end notification sent when scroll occurs.\n\t
    • \n\t
  • \n\tOn GTK+, Scintilla requisition height is screen height rather than large fixed value.\n\t
    • \n\t
  • \n\tCase insensitive autocompletion prefers exact case match.\n\t
    • \n\t
  • \n\tSCI_PARADOWN and SCI_PARAUP treat lines containing only white\n\tspace as empty and handle text hidden by folding.\n\t
    • \n\t
  • \n\tScintilla on Windows supports WM_PRINTCLIENT although there are some\n\tlimitations.\n\t
    • \n\t
  • \n\tSCN_AUTOCSELECTION notification sent when user selects from autoselection list.\n\t
    • \n\t
  • \n\tSciTE's standard properties file sets buffers to 10, uses Pango fonts on GTK+ and\n\thas dropped several languages to make the menu fit on screen.\n\t
    • \n\t
  • \n\tSciTE's encoding cookie detection loosened so that common XML files will load\n\tin UTF-8 if that is their declared encoding.\n\t
    • \n\t
  • \n\tSciTE on GTK+ changes menus and toolbars to not be detachable unless turned\n\ton with a property. Menus no longer tear off. The toolbar may be set to use the\n\tdefault theme icons rather than SciTE's set. Changed key for View | End of Line\n\tbecause of a conflict. Language menu can contain more items.\n\t
    • \n\t
  • \n\tSciTE on GTK+ 2.x allows the height and width of the file open file chooser to\n\tbe set, for the show hidden files check box to be set from an option and for it\n\tto be opened in the directory of the current file explicitly. Enter key works in\n\tsave chooser.\n\t
    • \n\t
  • \n\tScintilla lexers should no longer see bits in style bytes that are outside the set\n\tthey modify so should be able to correctly lex documents where the container\n\thas used indicators.\n\t
    • \n\t
  • \n\tSciTE no longer asks to save before performing a revert.\n\t
    • \n\t
  • \n\tSciTE director interface adds a reloadproperties command to reload properties\n\tfrom files.\n\t
    • \n\t
  • \n\tAllow build on CYGWIN platform.\n\t
    • \n\t
  • \n\tAllow use from LccWin compiler.\n\t
    • \n\t
  • \n\tSCI_COLOURISE for SCLEX_CONTAINER causes a\n\tSCN_STYLENEEDED notification.\n\t
    • \n\t
  • \n\tBugs fixed in lexing of HTML/ASP/JScript.\n\t
    • \n\t
  • \n\tFix for folding becoming confused.\n\t
    • \n\t
  • \n\tOn Windows, fixes for Japanese Input Method Editor and for 8 bit Katakana\n\tcharacters.\n\t
    • \n\t
  • \n\tFixed buffer size bug avoided when typing long words by making buffer bigger.\n\t
    • \n\t
  • \n\tUndo after automatic indentation more sensible.\n\t
    • \n\t
  • \n\tSciTE menus on GTK+ uses Shift and Ctrl rather than old style abbreviations.\n\t
    • \n\t
  • \n\tSciTE full screen mode on Windows calculates size more correctly.\n\t
    • \n\t
  • \n\tSciTE on Windows menus work better with skinning applications.\n\t
    • \n\t
  • \n\tSearching bugs fixed.\n\t
    • \n\t
  • \n\tColours reallocated when changing image using SCI_REGISTERIMAGE.\n\t
    • \n\t
  • \n\tCaret stays visible when Enter held down.\n\t
    • \n\t
  • \n\tUndo of automatic indentation more reasonable.\n\t
    • \n\t
  • \n\tHigh processor usage fixed in background wrapping under some\n\tcircumstances.\n\t
    • \n\t
  • \n\tCrashing bug fixed on AMD64.\n\t
    • \n\t
  • \n\tSciTE crashing bug fixed when position.height or position.width not set.\n\t
    • \n\t
  • \n\tCrashing bug on GTK+ fixed when setting cursor and window is NULL.\n\t
    • \n\t
  • \n\tCrashing bug on GTK+ preedit window fixed.\n\t
    • \n\t
  • \n\tSciTE crashing bug fixed in incremental search on Windows ME.\n\t
    • \n\t
  • \n\tSciTE on Windows has an optional find and replace dialogs that can search through\n\tall buffers and search within a particular style number.\n\t
    • \n
\n

\n Release 1.62\n

\n
    \n\t
  • \n\tReleased on 31 October 2004.\n\t
    • \n\t
  • \n\tLexer added for ASN.1.\n\t
    • \n\t
  • \n\tLexer added for VHDL.\n\t
    • \n\t
  • \n\tOn Windows, an invisible system caret is used to allow screen readers to determine\n\twhere the caret is. The visible caret is still drawn by the painting code.\n\t
    • \n\t
  • \n\tOn GTK+, Scintilla has methods to read the target as UTF-8 and to convert\n\ta string from UTF-8 to the document encoding. This eases integration with\n\tcontainers that use the UTF-8 encoding which is the API encoding for GTK+ 2.\n\t
    • \n\t
  • \n\tSciTE on GTK+2 and Windows NT/2000/XP allows search and replace of Unicode text.\n\t
    • \n\t
  • \n\tSciTE calltips allow setting the characters used to start and end parameter lists and\n\tto separate parameters.\n\t
    • \n\t
  • \n\tFindColumn method converts a line and column into a position, taking into account\n\ttabs and multi-byte characters.\n\t
    • \n\t
  • \n\tOn Windows, when Scintilla copies text to the clipboard as Unicode, it avoids\n\tadding an ANSI copy as the system will automatically convert as required in\n\ta context-sensitive manner.\n\t
    • \n\t
  • \n\tSciTE indent.auto setting automatically determines indent.size and use.tabs from\n\tdocument contents.\n\t
    • \n\t
  • \n\tSciTE defines a CurrentMessage property that holds the most recently selected\n\toutput pane message.\n\t
    • \n\t
  • \n\tSciTE Lua scripting enhanced with\n\t
      \n\t
    • A Lua table called 'buffer' is associated with each buffer and can be used to\n\tmaintain buffer-specific state.
      • \n\t
    • A 'scite' object allows interaction with the application such as opening\n\tfiles from script.
      • \n\t
    • Dynamic properties can be reset by assigning nil to a given key in\n\tthe props table.
      • \n\t
    • An 'OnClear' event fires whenever properties and extension scripts are\n\tabout to be reloaded.
      • \n\t
    • On Windows, loadlib is enabled and can be used to access Lua\n\tbinary modules / DLLs.
    \n\t
    • \n\t
  • \n\tSciTE Find in Files on Windows can be used in a modeless way and gains a '..'\n\tbutton to move up to the parent directory. It is also wider so that longer paths\n\tcan be seen.\n\t
    • \n\t
  • \n\tClose buttons added to dialogs in SciTE on Windows.\n\t
    • \n\t
  • \n\tSciTE on GTK+ 2 has a \"hidden files\" check box in file open dialog.\n\t
    • \n\t
  • \n\tSciTE use.monospaced setting removed. More information in the\n\tFAQ.\n\t
    • \n\t
  • \n\tAPDL lexer updated with more lexical classes\n\t
    • \n\t
  • \n\tAutoIt3 lexer updated.\n\t
    • \n\t
  • \n\tAda lexer fixed to support non-ASCII text.\n\t
    • \n\t
  • \n\tCpp lexer now only matches exactly three slashes as starting a doc-comment so that\n\tlines of slashes are seen as a normal comment.\n\tLine ending characters are appear in default style on preprocessor and single line\n\tcomment lines.\n\t
    • \n\t
  • \n\tCSS lexer updated to support CSS2 including second set of keywords.\n\t
    • \n\t
  • \n\tErrorlist lexer now understands Java stack trace lines.\n\t
    • \n\t
  • \n\tSciTE's handling of HTML Tidy messages jumps to column as well as line indicated.\n\t
    • \n\t
  • \n\tLisp lexer allows multiline strings.\n\t
    • \n\t
  • \n\tLua lexer treats .. as an operator when between identifiers.\n\t
    • \n\t
  • \n\tPHP lexer handles 'e' in numerical literals.\n\t
    • \n\t
  • \n\tPowerBasic lexer updated for macros and optimized.\n\t
    • \n\t
  • \n\tProperties file folder changed to leave lines before a header at the base level\n\tand thus avoid a vertical line when using connected folding symbols.\n\t
    • \n\t
  • \n\tGTK+ on Windows version uses Alt for rectangular selection to be compatible with\n\tplatform convention.\n\t
    • \n\t
  • \n\tSciTE abbreviations file moved from system directory to user directory\n\tso each user can have separate abbreviations.\n\t
    • \n\t
  • \n\tSciTE on GTK+ has improved .desktop file and make install support that may\n\tlead to better integration with system shell.\n\t
    • \n\t
  • \n\tDisabling of themed background drawing on GTK+ extended to all cases.\n\t
    • \n\t
  • \n\tSciTE date formatting on Windows performed with the user setting rather than the\n\tsystem setting.\n\t
    • \n\t
  • \n\tGTK+ 2 redraw while scrolling fixed.\n\t
    • \n\t
  • \n\tRecursive property definitions are safer, avoiding expansion when detected.\n\t
    • \n\t
  • \n\tSciTE thread synchronization for scripts no longer uses HWND_MESSAGE\n\tso is compatible with older versions of Windows.\n\tOther Lua scripting bugs fixed.\n\t
    • \n\t
  • \n\tSciTE on Windows localization of menu accelerators changed to be compatible\n\twith alternative UI themes.\n\t
    • \n\t
  • \n\tSciTE on Windows full screen mode now fits better when menu different height\n\tto title bar height.\n\t
    • \n\t
  • \n\tSC_MARK_EMPTY marker is now invisible and does not change the background\n\tcolour.\n\t
    • \n\t
  • \n\tBug fixed in HTML lexer to allow use of <?xml in strings in scripts without\n\ttriggering xml mode.\n\t
    • \n\t
  • \n\tBug fixed in SciTE abbreviation expansion that could break indentation or crash.\n\t
    • \n\t
  • \n\tBug fixed when searching for a whole word string that ends one character before\n\tend of document.\n\t
    • \n\t
  • \n\tDrawing bug fixed when indicators drawn on wrapped lines.\n\t
    • \n\t
  • \n\tBug fixed when double clicking a hotspot.\n\t
    • \n\t
  • \n\tBug fixed where autocompletion would remove typed text if no match found.\n\t
    • \n\t
  • \n\tBug fixed where display does not scroll when inserting in long wrapped line.\n\t
    • \n\t
  • \n\tBug fixed where SCI_MARKERDELETEALL would only remove one of the markers\n\ton a line that contained multiple markers with the same number.\n\t
    • \n\t
  • \n\tBug fixed where markers would move when converting line endings.\n\t
    • \n\t
  • \n\tBug fixed where SCI_LINEENDWRAP would move too far when line ends are visible.\n\t
    • \n\t
  • \n\tBugs fixed where calltips with unicode or other non-ASCII text would display\n\tincorrectly.\n\t
    • \n\t
  • \n\tBug fixed in determining if at save point after undoing from save point and then\n\tperforming changes.\n\t
    • \n\t
  • \n\tBug fixed on GTK+ using unsupported code pages where extraneous text could\n\tbe drawn.\n\t
    • \n\t
  • \n\tBug fixed in drag and drop code on Windows where dragging from SciTE to\n\tFirefox could hang both applications.\n\t
    • \n\t
  • \n\tCrashing bug fixed on GTK+ when no font allocation succeeds.\n\t
    • \n\t
  • \n\tCrashing bug fixed when autocompleting word longer than 1000 characters.\n\t
    • \n\t
  • \n\tSciTE crashing bug fixed when both Find and Replace dialogs shown by disallowing\n\tthis situation.\n\t
    • \n
\n

\n Release 1.61\n

\n
    \n\t
  • \n\tReleased on 29 May 2004.\n\t
    • \n\t
  • \n\tImprovements to selection handling on GTK+.\n\t
    • \n\t
  • \n\tSciTE on GTK+ 2.4 uses the improved file chooser which allows\n\tfile extension filters, multiple selection, and remembers favourite\n\tdirectories.\n\t
    • \n\t
  • \n\tSciTE Load Session and Save Session commands available on GTK+.\n\t
    • \n\t
  • \n\tSciTE lists Lua Startup Script in Options menu when loaded.\n\t
    • \n\t
  • \n\tIn SciTE, OnUserListSelection can be implemented in Lua.\n\t
    • \n\t
  • \n\tSciTE on Windows has a context menu on the file tabs.\n\t
    • \n\t
  • \n\tSQL lexer allows '#' comments and optionally '\\' quoting inside strings.\n\t
    • \n\t
  • \n\tMssql lexer improved.\n\t
    • \n\t
  • \n\tAutoIt3 lexer updated.\n\t
    • \n\t
  • \n\tPerl lexer recognizes regular expression use better.\n\t
    • \n\t
  • \n\tErrorlist lexer understands Lua tracebacks and copes with findstr\n\toutput for file names that end with digits.\n\t
    • \n\t
  • \n\tDrawing of lines on GTK+ improved and made more like Windows\n\twithout final point.\n\t
    • \n\t
  • \n\tSciTE on GTK+ uses a high resolution window icon.\n\t
    • \n\t
  • \n\tSciTE can be set to warn before loading files larger than a particular size.\n\t
    • \n\t
  • \n\tSciTE Lua scripting bugs fixed included a crashing bug when using\n\tan undefined function name that would go before first actual name.\n\t
    • \n\t
  • \n\tSciTE bug fixed where a modified buffer was not saved if it was\n\tthe last buffer and was not current when the New command used.\n\t
    • \n\t
  • \n\tSciTE monofont mode no longer affects line numbers.\n\t
    • \n\t
  • \n\tCrashing bug in SciTE avoided by not allowing both the Find and Replace\n\tdialogs to be visible at one time.\n\t
    • \n\t
  • \n\tCrashing bug in SciTE fixed when Lua scripts were being run\n\tconcurrently.\n\t
    • \n\t
  • \n\tBug fixed that caused incorrect line number width in SciTE.\n\t
    • \n\t
  • \n\tPHP folding bug fixed.\n\t
    • \n\t
  • \n\tRegression fixed when setting word characters to not include\n\tsome of the standard word characters.\n\t
    • \n
\n

\n Release 1.60\n

\n
    \n\t
  • \n\tReleased on 1 May 2004.\n\t
    • \n\t
  • \n\tSciTE can be scripted using the Lua programming language.\n\t
    • \n\t
  • \n\tcommand.mode is a better way to specify tool command options in SciTE.\n\t
    • \n\t
  • \n\tContinuation markers can be displayed so that you can see which lines are wrapped.\n\t
    • \n\t
  • \n\tLexer for Gui4Cli language.\n\t
    • \n\t
  • \n\tLexer for Kix language.\n\t
    • \n\t
  • \n\tLexer for Specman E language.\n\t
    • \n\t
  • \n\tLexer for AutoIt3 language.\n\t
    • \n\t
  • \n\tLexer for APDL language.\n\t
    • \n\t
  • \n\tLexer for Bash language. Also reasonable for other Unix shells.\n\t
    • \n\t
  • \n\tSciTE can load lexers implemented in external shared libraries.\n\t
    • \n\t
  • \n\tPerl treats \".\" not as part of an identifier and interprets '/' and '->'\n\tcorrectly in more circumstances.\n\t
    • \n\t
  • \n\tPHP recognizes variables within strings.\n\t
    • \n\t
  • \n\tNSIS has properties \"nsis.uservars\" and \"nsis.ignorecase\".\n\t
    • \n\t
  • \n\tMSSQL lexer adds keyword list for operators and stored procedures,\n\tdefines '(', ')', and ',' as operators and changes some other details.\n\t
    • \n\t
  • \n\tInput method preedit window on GTK+ 2 may support some Asian languages.\n\t
    • \n\t
  • \n\tPlatform interface adds an extra platform-specific flag to Font::Create.\n\tUsed on wxWidgets to choose antialiased text display but may be used for\n\tany task that a platform needs.\n\t
    • \n\t
  • \n\tOnBeforeSave method added to Extension interface.\n\t
    • \n\t
  • \n\tScintilla methods that return strings can be called with a NULL pointer\n\tto find out how long the string should be.\n\t
    • \n\t
  • \n\tVisual Studio .NET project file now in VS .NET 2003 format so can not be used\n\tdirectly in VS .NET 2002.\n\t
    • \n\t
  • \n\tScintilla can be built with GTK+ 2 on Windows.\n\t
    • \n\t
  • \n\tUpdated RPM spec for SciTE on GTK+.\n\t
    • \n\t
  • \n\tGTK+ makefile for SciTE allows selection of destination directory, creates destination\n\tdirectories and sets file modes and owners better.\n\t
    • \n\t
  • \n\tTab indents now go to next tab multiple rather than add tab size.\n\t
    • \n\t
  • \n\tSciTE abbreviations now use the longest possible match rather than the shortest.\n\t
    • \n\t
  • \n\tAutocompletion does not remove prefix when actioned with no choice selected.\n\t
    • \n\t
  • \n\tAutocompletion cancels when moving beyond the start position, not at the start position.\n\t
    • \n\t
  • \n\tSciTE now shows only calltips for functions that match exactly, not\n\tthose that match as a prefix.\n\t
    • \n\t
  • \n\tSciTE can repair box comment sections where some lines were added without\n\tthe box comment middle line prefix.\n\t
    • \n\t
  • \n\tAlt+ works in user.shortcuts on Windows.\n\t
    • \n\t
  • \n\tSciTE on GTK+ enables replace in selection for rectangular selections.\n\t
    • \n\t
  • \n\tKey bindings for command.shortcut implemented in a way that doesn't break\n\twhen the menus are localized.\n\t
    • \n\t
  • \n\tDrawing of background on GTK+ faster as theme drawing disabled.\n\t
    • \n\t
  • \n\tOn GTK+, calltips are moved back onto the screen if they extend beyond the screen bounds.\n\t
    • \n\t
  • \n\tOn Windows, the Scintilla object is destroyed on WM_NCDESTROY rather than\n\tWM_DESTROY which arrives earlier. This fixes some problems when Scintilla was subclassed.\n\t
    • \n\t
  • \n\tThe zorder switching feature removed due to number of crashing bugs.\n\t
    • \n\t
  • \n\tCode for XPM images made more robust.\n\t
    • \n\t
  • \n\tBug fixed with primary selection on GTK+.\n\t
    • \n\t
  • \n\tOn GTK+ 2, copied or cut text can still be pasted after the Scintilla widget is destroyed.\n\t
    • \n\t
  • \n\tStyling change not visible problem fixed when line was cached.\n\t
    • \n\t
  • \n\tBug in SciTE on Windows fixed where clipboard commands stopped working.\n\t
    • \n\t
  • \n\tCrashing bugs in display fixed in line layout cache.\n\t
    • \n\t
  • \n\tCrashing bug may be fixed on AMD64 processor on GTK+.\n\t
    • \n\t
  • \n\tRare hanging crash fixed in Python lexer.\n\t
    • \n\t
  • \n\tDisplay bugs fixed with DBCS characters on GTK+.\n\t
    • \n\t
  • \n\tAutocompletion lists on GTK+ 2 are not sorted by the ListModel as the\n\tcontents are sorted correctly by Scintilla.\n\t
    • \n\t
  • \n\tSciTE fixed to not open extra untitled buffers with check.if.already.open.\n\t
    • \n\t
  • \n\tSizing bug fixed on GTK+ when window resized while unmapped.\n\t
    • \n\t
  • \n\tText drawing crashing bug fixed on GTK+ with non-Pango fonts and long strings.\n\t
    • \n\t
  • \n\tFixed some issues if characters are unsigned.\n\t
    • \n\t
  • \n\tFixes in NSIS support.\n\t
    • \n
\n

\n Release 1.59\n

\n
    \n\t
  • \n\tReleased on 19 February 2004.\n\t
    • \n\t
  • \n\tSciTE Options and Language menus reduced in length by commenting\n\tout some languages. Languages can be enabled by editing the global\n\tproperties file.\n\t
    • \n\t
  • \n\tVerilog language supported.\n\t
    • \n\t
  • \n\tLexer for Microsoft dialect of SQL. SciTE properties file available from extras page.\n\t
    • \n\t
  • \n\tPerl lexer disambiguates '/' better.\n\t
    • \n\t
  • \n\tNSIS lexer improved with a lexical class for numbers, option for ignoring case\n\tof keywords, and folds only occurring when folding keyword first on line.\n\t
    • \n\t
  • \n\tPowerBasic lexer improved with styles for constants and assembler and\n\tfolding improvements.\n\t
    • \n\t
  • \n\tOn GTK+, input method support only invoked for Asian languages and not\n\tEuropean languages as the old European keyboard code works better.\n\t
    • \n\t
  • \n\tScintilla can be requested to allocate a certain amount and so avoid repeated\n\treallocations and memory inefficiencies. SciTE uses this and so should require\n\tless memory.\n\t
    • \n\t
  • \n\tSciTE's \"toggle current fold\" works when invoked on child line as well as\n\tfold header.\n\t
    • \n\t
  • \n\tSciTE output pane scrolling can be set to not scroll back to start after\n\tcompletion of command.\n\t
    • \n\t
  • \n\tSciTE has a $(SessionPath) property.\n\t
    • \n\t
  • \n\tSciTE on Windows can use VK_* codes for keys in user.shortcuts.\n\t
    • \n\t
  • \n\tStack overwrite bug fixed in SciTE's command to move to the end of a\n\tpreprocessor conditional.\n\t
    • \n\t
  • \n\tBug fixed where vertical selection appeared to select a different set of characters\n\tthen would be used by, for example, a copy.\n\t
    • \n\t
  • \n\tSciTE memory leak fixed in fold state remembering.\n\t
    • \n\t
  • \n\tBug fixed where changing the style of some text outside the\n\tstandard StyleNeeded notification would not be visible.\n\t
    • \n\t
  • \n\tOn GTK+ 2 g_iconv is used in preference to iconv, as it is provided by GTK+\n\tso should avoid problems finding the iconv library.\n\t
    • \n\t
  • \n\tOn GTK+ fixed a style reference count bug.\n\t
    • \n\t
  • \n\tMemory corruption bug fixed with GetSelText.\n\t
    • \n\t
  • \n\tOn Windows Scintilla deletes memory on WM_NCDESTROY rather than\n\tthe earlier WM_DESTROY to avoid problems when the window is subclassed.\n\t
    • \n
\n

\n Release 1.58\n

\n
    \n\t
  • \n\tReleased on 11 January 2004.\n\t
    • \n\t
  • \n\tMethod to discover the currently highlighted element in an autocompletion list.\n\t
    • \n\t
  • \n\tOn GTK+, the lexers are now included in the scintilla.a library file. This\n\twill require changes to the make files of dependent projects.\n\t
    • \n\t
  • \n\tOctave support added alongside related Matlab language and Matlab support improved.\n\t
    • \n\t
  • \n\tVB lexer gains an unterminated string state and 4 sets of keywords.\n\t
    • \n\t
  • \n\tRuby lexer handles $' correctly.\n\t
    • \n\t
  • \n\tError line handling improved for FORTRAN compilers from Absoft and Intel.\n\t
    • \n\t
  • \n\tInternational input enabled on GTK+ 2 although there is no way to choose an\n\tinput method.\n\t
    • \n\t
  • \n\tMultiplexExtension in SciTE allows multiple extensions to be used at once.\n\t
    • \n\t
  • \n\tRegular expression replace interprets backslash expressions \\a, \\b, \\f, \\n, \\r, \\t,\n\tand \\v in the replacement value.\n\t
    • \n\t
  • \n\tSciTE Replace dialog displays number of replacements made when Replace All or\n\tReplace in Selection performed.\n\t
    • \n\t
  • \n\tLocalization files may contain a translation.encoding setting which is used\n\ton GTK+ 2 to automatically reencode the translation to UTF-8 so it will be\n\tthe localized text will be displayed correctly.\n\t
    • \n\t
  • \n\tSciTE on GTK+ implements check.if.already.open.\n\t
    • \n\t
  • \n\tMake files for Mac OS X made more robust.\n\t
    • \n\t
  • \n\tPerformance improved in SciTE when switching buffers when there\n\tis a rectangular selection.\n\t
    • \n\t
  • \n\tFixed failure to display some text when wrapped.\n\t
    • \n\t
  • \n\tSciTE crashes from Ctrl+Tab buffer cycling fixed.\n\tMay still be some rare bugs here.\n\t
    • \n\t
  • \n\tCrash fixed when decoding an error message that appears similar to a\n\tBorland error message.\n\t
    • \n\t
  • \n\tFix to auto-scrolling allows containers to implement enhanced double click selection.\n\t
    • \n\t
  • \n\tHang fixed in idle word wrap.\n\t
    • \n\t
  • \n\tCrash fixed in hotspot display code..\n\t
    • \n\t
  • \n\tSciTE on Windows Incremental Search no longer moves caret back.\n\t
    • \n\t
  • \n\tSciTE hang fixed when performing a replace with a find string that\n\tmatched zero length strings such as \".*\".\n\t
    • \n\t
  • \n\tSciTE no longer styles the whole file when saving buffer fold state\n\tas that was slow.\n\t
    • \n
\n

\n Release 1.57\n

\n
    \n\t
  • \n\tReleased on 27 November 2003.\n\t
    • \n\t
  • \n\tSciTE remembers folding of each buffer.\n\t
    • \n\t
  • \n\tLexer for Erlang language.\n\t
    • \n\t
  • \n\tScintilla allows setting the set of white space characters.\n\t
    • \n\t
  • \n\tScintilla has 'stuttered' page movement commands to first move\n\tto top or bottom within current visible lines before scrolling.\n\t
    • \n\t
  • \n\tScintilla commands for moving to end of words.\n\t
    • \n\t
  • \n\tIncremental line wrap enabled on Windows.\n\t
    • \n\t
  • \n\tSciTE PDF exporter produces output that is more compliant with reader\n\tapplications, is smaller and allows more configuration.\n\tHTML exporter optimizes size of output files.\n\t
    • \n\t
  • \n\tSciTE defines properties PLAT_WINNT and PLAT_WIN95 on the\n\tcorresponding platforms.\n\t
    • \n\t
  • \n\tSciTE can adjust the line margin width to fit the largest line number.\n\tThe line.numbers property is split between line.margin.visible and\n\tline.margin.width.\n\t
    • \n\t
  • \n\tSciTE on GTK+ allows user defined menu accelerators.\n\tAlt can be included in user.shortcuts.\n\t
    • \n\t
  • \n\tSciTE Language menu can have items commented out.\n\t
    • \n\t
  • \n\tSciTE on Windows Go to dialog allows choosing a column number as\n\twell as a line number.\n\t
    • \n\t
  • \n\tSciTE on GTK+ make file uses prefix setting more consistently.\n\t
    • \n\t
  • \n\tBug fixed that caused word wrapping to fail to display all text.\n\t
    • \n\t
  • \n\tCrashing bug fixed in GTK+ version of Scintilla when using GDK fonts\n\tand opening autocompletion.\n\t
    • \n\t
  • \n\tBug fixed in Scintilla SCI_GETSELTEXT where an extra NUL\n\twas included at end of returned string\n\t
    • \n\t
  • \n\tCrashing bug fixed in SciTE z-order switching implementation.\n\t
    • \n\t
  • \n\tHanging bug fixed in Perl lexer.\n\t
    • \n\t
  • \n\tSciTE crashing bug fixed for using 'case' without argument in style definition.\n\t
    • \n
\n

\n Release 1.56\n

\n
    \n\t
  • \n\tReleased on 25 October 2003.\n\t
    • \n\t
  • \n\tRectangular selection can be performed using the keyboard.\n\tGreater programmatic control over rectangular selection.\n\tThis has caused several changes to key bindings.\n\t
    • \n\t
  • \n\tSciTE Replace In Selection works on rectangular selections.\n\t
    • \n\t
  • \n\tImproved lexer for TeX, new lexer for Metapost and other support for these\n\tlanguages.\n\t
    • \n\t
  • \n\tLexer for PowerBasic.\n\t
    • \n\t
  • \n\tLexer for Forth.\n\t
    • \n\t
  • \n\tYAML lexer improved to include error styling.\n\t
    • \n\t
  • \n\tPerl lexer improved to correctly handle more cases.\n\t
    • \n\t
  • \n\tAssembler lexer updated to support single-quote strings and fix some\n\tproblems.\n\t
    • \n\t
  • \n\tSciTE on Windows can switch between buffers in order of use (z-order) rather\n\tthan static order.\n\t
    • \n\t
  • \n\tSciTE supports adding an extension for \"Open Selected Filename\".\n\tThe openpath setting works on GTK+.\n\t
    • \n\t
  • \n\tSciTE can Export as XML.\n\t
    • \n\t
  • \n\tSciTE $(SelHeight) variable gives a more natural result for empty and whole line\n\tselections.\n\t
    • \n\t
  • \n\tFixes to wrapping problems, such as only first display line being visible in some\n\tcases.\n\t
    • \n\t
  • \n\tFixes to hotspot to only highlight when over the hotspot, only use background\n\tcolour when set and option to limit hotspots to a single line.\n\t
    • \n\t
  • \n\tSmall fixes to FORTRAN lexing and folding.\n\t
    • \n\t
  • \n\tSQL lexer treats single quote strings as a separate class to double quote strings..\n\t
    • \n\t
  • \n\tScintilla made compatible with expectations of container widget in GTK+ 2.3.\n\t
    • \n\t
  • \n\tFix to strip out pixmap ID when automatically choosing from an autocompletion\n\tlist with only one element.\n\t
    • \n\t
  • \n\tSciTE bug fixed where UTF-8 files longer than 128K were gaining more than one\n\tBOM.\n\t
    • \n\t
  • \n\tCrashing bug fixed in SciTE on GTK+ where using \"Stop Executing\" twice leads\n\tto all applications exiting.\n\t
    • \n\t
  • \n\tBug fixed in autocompletion scrolling on GTK+ 2 with a case sensitive list.\n\tThe ListBox::Sort method is no longer needed or available so platform\n\tmaintainers should remove it.\n\t
    • \n\t
  • \n\tSciTE check.if.already.open setting removed from GTK+ version as unmaintained.\n\t
    • \n
\n

\n Release 1.55\n

\n
    \n
  • \n\tReleased on 25 September 2003.\n
    • \n
  • \n\tFix a crashing bug in indicator display in Scintilla.\n
    • \n
  • \n\tGTK+ version now defaults to building for GTK+ 2 rather than 1.\n
    • \n
  • \n\tMingw make file detects compiler version and avoids options\n\tthat are cause problems for some versions.\n
    • \n
  • \n\tLarge performance improvement on GTK+ 2 for long lines.\n
    • \n
  • \n\tIncremental line wrap on GTK+.\n
    • \n
  • \n\tInternational text entry works much better on GTK+ with particular\n\timprovements for Baltic languages and languages that use 'dead' accents.\n\tNUL key events such as those generated by some function keys, ignored.\n
    • \n
  • \n\tUnicode clipboard support on GTK+.\n
    • \n
  • \n\tIndicator type INDIC_BOX draws a rectangle around the text.\n
    • \n
  • \n\tClarion language support.\n
    • \n
  • \n\tYAML language support.\n
    • \n
  • \n\tMPT LOG language support.\n
    • \n
  • \n\tOn Windows, SciTE can switch buffers based on activation order rather\n\tthan buffer number.\n
    • \n
  • \n\tSciTE save.on.deactivate saves all buffers rather than just the current buffer.\n
    • \n
  • \n\tLua lexer handles non-ASCII characters correctly.\n
    • \n
  • \n\tError lexer understands Borland errors with pathnames that contain space.\n
    • \n
  • \n\tOn GTK+ 2, autocompletion uses TreeView rather than deprecated CList.\n
    • \n
  • \n\tSciTE autocompletion removed when expand abbreviation command used.\n
    • \n
  • \n\tSciTE calltips support overloaded functions.\n
    • \n
  • \n\tWhen Save fails in SciTE, choice offered to Save As.\n
    • \n
  • \n\tSciTE message boxes on Windows may be moved to front when needed.\n
    • \n
  • \n\tIndicators drawn correctly on wrapped lines.\n
    • \n
  • \n\tRegular expression search no longer matches characters with high bit\n\tset to characters without high bit set.\n
    • \n
  • \n\tHang fixed in backwards search in multi byte character documents.\n
    • \n
  • \n\tHang fixed in SciTE Mark All command when wrap around turned off.\n
    • \n
  • \n\tSciTE Incremental Search no longer uses hot keys on Windows.\n
    • \n
  • \n\tCalltips draw non-ASCII characters correctly rather than as arrows.\n
    • \n
  • \n\tSciTE crash fixed when going to an error message with empty file name.\n
    • \n
  • \n\tBugs fixed in XPM image handling code.\n
    • \n
\n

\n Release 1.54\n

\n
    \n
  • \n\tReleased on 12 August 2003.\n
    • \n
  • \n\tSciTE on GTK+ 2.x can display a tab bar.\n
    • \n
  • \n\tSciTE on Windows provides incremental search.\n
    • \n
  • \n\tLexer for PostScript.\n
    • \n
  • \n\tLexer for the NSIS scripting language.\n
    • \n
  • \n\tNew lexer for POV-Ray Scene Description Language\n\treplaces previous implementation.\n
    • \n
  • \n\tLexer for the MMIX Assembler language.\n
    • \n
  • \n\tLexer for the Scriptol language.\n
    • \n
  • \n\tIncompatibility: SQL keywords are specified in lower case rather than upper case.\n\tSQL lexer allows double quoted strings.\n
    • \n
  • \n\tPascal lexer: character constants that start with '#' understood,\n\t'@' only allowed within assembler blocks,\n\t'$' can be the start of a number,\n\tinitial '.' in 0..constant not treated as part of a number,\n\tand assembler blocks made more distinctive.\n
    • \n
  • \n\tLua lexer allows '.' in keywords.\n\tMulti-line strings and comments can be folded.\n
    • \n
  • \n\tCSS lexer handles multiple psuedoclasses.\n
    • \n
  • \n\tProperties file folder works for INI file format.\n
    • \n
  • \n\tHidden indicator style allows the container to mark text within Scintilla\n\twithout there being any visual effect.\n
    • \n
  • \n\tSciTE does not prompt to save changes when the buffer is empty and untitled.\n
    • \n
  • \n\tModification notifications caused by SCI_INSERTSTYLEDSTRING\n\tnow include the contents of the insertion.\n
    • \n
  • \n\tSCI_MARKERDELETEALL deletes all the markers on a line\n\trather than just the first match.\n
    • \n
  • \n\tBetter handling of 'dead' accents on GTK+ 2 for languages\n\tthat use accented characters.\n
    • \n
  • \n\tSciTE now uses value of output.vertical.size property.\n
    • \n
  • \n\tCrash fixed in SciTE autocompletion on long lines.\n
    • \n
  • \n\tCrash fixed in SciTE comment command on long lines.\n
    • \n
  • \n\tBug fixed with backwards regular expression search skipping\n\tevery second match.\n
    • \n
  • \n\tHang fixed with regular expression replace where both target and replacement were empty.\n
    • \n
\n

\n Release 1.53\n

\n
    \n
  • \n\tReleased on 16 May 2003.\n
    • \n
  • \n\tOn GTK+ 2, encodings other than ASCII, Latin1, and Unicode are\n\tsupported for both display and input using iconv.\n
    • \n
  • \n\tExternal lexers supported on GTK+/Linux.\n\tExternal lexers must now be explicitly loaded with SCI_LOADLEXERLIBRARY\n\trather than relying upon a naming convention and automatic loading.\n
    • \n
  • \n\tSupport of Lout typesetting language.\n
    • \n
  • \n\tSupport of E-Scripts language used in the POL Ultima Online Emulator.\n
    • \n
  • \n\tScrolling and drawing performance on GTK+ enhanced, particularly for GTK+ 2.x\n\twith an extra window for the text area avoiding conflicts with the scroll bars.\n
    • \n
  • \n\tCopyText and CopyRange methods in Scintilla allow container to\n\teasily copy to the system clipboard.\n
    • \n
  • \n\tLine Copy command implemented and bound to Ctrl+Shift+T.\n
    • \n
  • \n\tScintilla APIs PositionBefore and PositionAfter can be used to iterate through\n\ta document taking into account the encoding and multi-byte characters.\n
    • \n
  • \n\tC++ folder can fold on the \"} else {\" line of an if statement by setting\n\tfold.at.else property to 1.\n
    • \n
  • \n\tC++ lexer allows an extra set of keywords.\n
    • \n
  • \n\tProperty names and thus abbreviations may be non-ASCII.\n
    • \n
  • \n\tRemoved attempt to load a file when setting properties that was\n\tpart of an old scripting experiment.\n
    • \n
  • \n\tSciTE no longer warns about a file not existing when opening\n\tproperties files from the Options menu as there is a good chance\n\tthe user wants to create one.\n
    • \n
  • \n\tBug fixed with brace recognition in multi-byte encoded files where a partial\n\tcharacter matched a brace byte.\n
    • \n
  • \n\tMore protection against infinite loops or recursion with recursive property definitions.\n
    • \n
  • \n\tOn Windows, cursor will no longer disappear over margins in custom builds when\n\tcursor resource not present. The Windows default cursor is displayed instead.\n
    • \n
  • \n\tload.on.activate fixed in SciTE as was broken in 1.52.\n
    • \n
\n

\n Release 1.52\n

\n
    \n
  • \n\tReleased on 17 April 2003.\n
    • \n
  • \n\tPango font support on GTK+ 2.\n\tUnicode input improved on GTK+ 2.\n
    • \n
  • \n\tHotspot style implemented in Scintilla.\n
    • \n
  • \n\tSmall up and down arrows can be displayed in calltips and the container\n\tis notified when the mouse is clicked on a calltip.\n\tNormal and selected calltip text colours can be set.\n
    • \n
  • \n\tPOSIX compatibility flag in Scintilla regular expression search\n\tinterprets bare ( and ) as tagged sections.\n
    • \n
  • \n\tError message lexer tightened to yield fewer false matches.\n\tRecognition of Lahey and Intel FORTRAN error formats.\n
    • \n
  • \n\tScintilla keyboard commands for moving to start and end of\n\tscreen lines rather than document lines, unless already there\n\twhere these keys move to the start or end of the document line.\n
    • \n
  • \n\tLine joining command.\n
    • \n
  • \n\tLexer for POV-Ray.\n
    • \n
  • \n\tCalltips on Windows are no longer clipped by the parent window.\n
    • \n
  • \n\tAutocompletion lists are cancelled when focus leaves their parent window.\n
    • \n
  • \n\tMove to next/previous empty line delimited paragraph key commands.\n
    • \n
  • \n\tSciTE hang fixed with recursive property definitions by placing limit\n\ton number of substitutions performed.\n
    • \n
  • \n\tSciTE Export as PDF reenabled and works.\n
    • \n
  • \n\tAdded loadsession: command line command to SciTE.\n
    • \n
  • \n\tSciTE option to quit application when last document closed.\n
    • \n
  • \n\tSciTE option to ask user if it is OK to reload a file that has been\n\tmodified outside SciTE.\n
    • \n
  • \n\tSciTE option to automatically save before running particular command tools\n\tor to ask user or to not save.\n
    • \n
  • \n\tSciTE on Windows 9x will write a Ctrl+Z to the process input pipe before\n\tclosing the pipe when running tool commands that take input.\n
    • \n
  • \n\tAdded a manifest resource to SciTE on Windows to enable Windows XP\n\tthemed UI.\n
    • \n
  • \n\tSciTE calltips handle nested calls and other situations better.\n
    • \n
  • \n\tCSS lexer improved.\n
    • \n
  • \n\tInterface to platform layer changed - Surface initialization now requires\n\ta WindowID parameter.\n
    • \n
  • \n\tBug fixed with drawing or measuring long pieces of text on Windows 9x\n\tby truncating the pieces.\n
    • \n
  • \n\tBug fixed with SciTE on GTK+ where a user shortcut for a visible character\n\tinserted the character as well as executing the command.\n
    • \n
  • \n\tBug fixed where primary selection on GTK+ was reset by\n\tScintilla during creation.\n
    • \n
  • \n\tBug fixed where SciTE would close immediately on startup\n\twhen using save.session.\n
    • \n
  • \n\tCrash fixed when entering '\\' in LaTeX file.\n
    • \n
  • \n\tHang fixed when '#' last character in VB file.\n
    • \n
  • \n\tCrash fixed in error message lexer.\n
    • \n
  • \n\tCrash fixed when searching for long regular expressions.\n
    • \n
  • \n\tPressing return when nothing selected in user list sends notification with\n\tempty text rather than random text.\n
    • \n
  • \n\tMouse debouncing disabled on Windows as it interfered with some\n\tmouse utilities.\n
    • \n
  • \n\tBug fixed where overstrike mode inserted before rather than replaced last\n\tcharacter in document.\n
    • \n
  • \n\tBug fixed with syntax highlighting of Japanese text.\n
    • \n
  • \n\tBug fixed in split lines function.\n
    • \n
  • \n\tCosmetic fix to SciTE tab bar on Windows when window resized.\n\tFocus sticks to either pane more consistently.\n
    • \n
\n

\n Release 1.51\n

\n
    \n
  • \n\tReleased on 16 February 2003.\n
    • \n
  • \n\tTwo phase drawing avoids cutting off text that overlaps runs by drawing\n\tall the backgrounds of a line then drawing all the text transparently.\n\tSingle phase drawing is an option.\n
    • \n
  • \n\tScintilla method to split lines at a particular width by adding new line\n\tcharacters.\n
    • \n
  • \n\tThe character used in autocompletion lists to separate the text from the image\n\tnumber can be changed.\n
    • \n
  • \n\tThe scrollbar range will automatically expand when the caret is moved\n\tbeyond the current range.\n\tThe scroll bar is updated when SCI_SETXOFFSET is called.\n
    • \n
  • \n\tMouse cursors on GTK+ improved to be consistent with other applications\n\tand the Windows version.\n
    • \n
  • \n\tHorizontal scrollbar on GTK+ now disappears in wrapped mode.\n
    • \n
  • \n\tScintilla on GTK+ 2: mouse wheel scrolling, cursor over scrollbars, focus,\n\tand syntax highlighting now work.\n\tgtk_selection_notify avoided for compatibility with GTK+ 2.2.\n
    • \n
  • \n\tFold margin colours can now be set.\n
    • \n
  • \n\tSciTE can be built for GTK+ 2.\n
    • \n
  • \n\tSciTE can optionally preserve the undo history over an automatic file reload.\n
    • \n
  • \n\tTags can optionally be case insensitive in XML and HTML.\n
    • \n
  • \n\tSciTE on Windows handles input to tool commands in a way that should avoid\n\tdeadlock. Output from tools can be used to replace the selection.\n
    • \n
  • \n\tSciTE on GTK+ automatically substitutes '|' for '/' in menu items as '/'\n\tis used to define the menu hierarchy.\n
    • \n
  • \n\tOptional buffer number in SciTE title bar.\n
    • \n
  • \n\tCrash fixed in SciTE brace matching.\n
    • \n
  • \n\tBug fixed where automatic scrolling past end of document\n\tflipped back to the beginning.\n
    • \n
  • \n\tBug fixed where wrapping caused text to disappear.\n
    • \n
  • \n\tBug fixed on Windows where images in autocompletion lists were\n\tshown on the wrong item.\n
    • \n
  • \n\tCrash fixed due to memory bug in autocompletion lists on Windows.\n
    • \n
  • \n\tCrash fixed when double clicking some error messages.\n
    • \n
  • \n\tBug fixed in word part movement where sometimes no movement would occur.\n
    • \n
  • \n\tBug fixed on Windows NT where long text runs were truncated by\n\ttreating NT differently to 9x where there is a limitation.\n
    • \n
  • \n\tText in not-changeable style works better but there remain some cases where\n\tit is still possible to delete text protected this way.\n
    • \n
\n

\n Release 1.50\n

\n
    \n
  • \n\tReleased on 24 January 2003.\n
    • \n
  • \n\tAutocompletion lists may have a per-item pixmap.\n
    • \n
  • \n\tAutocompletion lists allow Unicode text on Windows.\n
    • \n
  • \n\tScintilla documentation rewritten.\n
    • \n
  • \n\tAdditional DBCS encoding support in Scintilla on GTK+ primarily aimed at\n\tJapanese EUC encoding.\n
    • \n
  • \n\tCSS (Cascading Style Sheets) lexer added.\n
    • \n
  • \n\tdiff lexer understands some more formats.\n
    • \n
  • \n\tFold box feature is an alternative way to show the structure of code.\n
    • \n
  • \n\tAvenue lexer supports multiple keyword lists.\n
    • \n
  • \n\tThe caret may now be made invisible by setting the caret width to 0.\n
    • \n
  • \n\tPython folder attaches comments before blocks to the next block rather\n\tthan the previous block.\n
    • \n
  • \n\tSciTE openpath property on Windows searches a path for files that are\n\tthe subject of the Open Selected Filename command.\n
    • \n
  • \n The localization file name can be changed with the locale.properties property.\n
    • \n
  • \n\tOn Windows, SciTE can pipe the result of a string expression into a command line tool.\n
    • \n
  • \n\tOn Windows, SciTE's Find dialog has a Mark All button.\n
    • \n
  • \n\tOn Windows, there is an Insert Abbreviation command that allows a choice from\n\tthe defined abbreviations and inserts the selection into the abbreviation at the\n\tposition of a '|'.\n
    • \n
  • \n\tMinor fixes to Fortran lexer.\n
    • \n
  • \n\tfold.html.preprocessor decides whether to fold <? and ?>.\n\tMinor improvements to PHP folding.\n
    • \n
  • \n\tMaximum number of keyword lists allowed increased from 6 to 9.\n
    • \n
  • \n\tDuplicate line command added with default assignment to Ctrl+D.\n
    • \n
  • \n\tSciTE sets $(Replacements) to the number of replacements made by the\n\tReplace All command. $(CurrentWord) is set to the word before the caret if the caret\n\tis at the end of a word.\n
    • \n
  • \n\tOpening a SciTE session now loads files in remembered order, sets the current file\n\tas remembered, and moves the caret to the remembered line.\n
    • \n
  • \n\tBugs fixed with printing on Windows where line wrapping was causing some text\n\tto not print.\n
    • \n
  • \n\tBug fixed with Korean Input Method Editor on Windows.\n
    • \n
  • \n\tBugs fixed with line wrap which would sometimes choose different break positions\n\tafter switching focus away and back.\n
    • \n
  • \n\tBug fixed where wheel scrolling had no effect on GTK+ after opening a fold.\n
    • \n
  • \n\tBug fixed with file paths containing non-ASCII characters on Windows.\n
    • \n
  • \n\tCrash fixed with printing on Windows after defining pixmap marker.\n
    • \n
  • \n\tCrash fixed in makefile lexer when first character on line was '='.\n
    • \n
  • \n\tBug fixed where local properties were not always being applied.\n
    • \n
  • \n\tCtrl+Keypad* fold command works on GTK+.\n
    • \n
  • \n\tHangs fixed in SciTE's Replace All command when replacing regular expressions '^'\n\tor '$'.\n
    • \n
  • \n\tSciTE monospace setting behaves more sensibly.\n
    • \n
\n

\n Release 1.49\n

\n
    \n
  • \n\tReleased on 1 November 2002.\n
    • \n
  • \n\tUnicode supported on GTK+. To perform well, this added a font cache to GTK+\n\tand to make that safe, a mutex is used. The mutex requires the application to link in\n\tthe threading library by evaluating `glib-config --libs gthread`. A Unicode locale\n\tshould also be set up by a call like setlocale(LC_CTYPE, \"en_US.UTF-8\").\n\tscintilla_release_resources function added to release mutex.\n
    • \n
  • \n\tFORTRAN and assembler lexers added along with other support for these\n\tlanguages in SciTE.\n
    • \n
  • \n\tAda lexer improved handling of based numbers, identifier validity and attributes\n\tdistinguished from character literals.\n
    • \n
  • \n\tLua lexer handles block comments and a deep level of nesting for literal strings\n\tand block comments.\n
    • \n
  • \n\tErrorlist lexer recognizes PHP error messages.\n
    • \n
  • \n\tVariant of the C++ lexer with case insensitive keywords\n\tcalled cppnocase. Whitespace in preprocessor text handled more correctly.\n
    • \n
  • \n\tFolder added for Perl.\n
    • \n
  • \n\tCompilation with GCC 3.2 supported.\n
    • \n
  • \n\tMarkers can be pixmaps.\n
    • \n
  • \n\tLines are wrapped when printing.\n\tBug fixed which printed line numbers in different styles.\n
    • \n
  • \n\tText can be appended to end with AppendText method.\n
    • \n
  • \n\tChooseCaretX method added.\n
    • \n
  • \n\tVertical scroll bar can be turned off with SetVScrollBar method.\n
    • \n
  • \n\tSciTE Save All command saves all buffers.\n
    • \n
  • \n\tSciTE localization compares keys case insensitively to make translations more flexible.\n
    • \n
  • \n\tSciTE detects a utf-8 coding cookie \"coding: utf-8\" in first two\n\tlines and goes into Unicode mode.\n
    • \n
  • \n\tSciTE key bindings are definable.\n
    • \n
  • \n\tSciTE Find in Files dialog can display directory browser to\n\tchoose directory to search.\n
    • \n
  • \n\tSciTE enabling of undo and redo toolbar buttons improved.\n
    • \n
  • \n\tSciTE on Windows file type filters in open dialog sorted.\n
    • \n
  • \n\tFixed crashing bug when using automatic tag closing in XML or HTML.\n
    • \n
  • \n\tFixed bug on Windows causing very long (>64K) lines to not display.\n
    • \n
  • \n\tFixed bug in backwards regular expression searching.\n
    • \n
  • \n\tFixed bug in calltips where wrong argument was highlighted.\n
    • \n
  • \n\tFixed bug in tab timmy feature when file has line feed line endings.\n
    • \n
  • \n\tFixed bug in compiling without INCLUDE_DEPRECATED_FEATURES\n\tdefined.\n
    • \n
\n

\n Release 1.48\n

\n
    \n
  • \n\tReleased on 9 September 2002.\n
    • \n
  • \n\tImproved Pascal lexer with context sensitive keywords\n\tand separate folder which handles //{ and //} folding comments and\n\t{$region} and {$end} folding directives.\n\tThe \"case\" statement now folds correctly.\n
    • \n
  • \n\tC++ lexer correctly handles comments on preprocessor lines.\n
    • \n
  • \n\tNew commands for moving to beginning and end of display lines when in line\n\twrap mode. Key bindings added for these commands.\n
    • \n
  • \n\tNew marker symbols that look like \">>>\" and \"...\" which can be used for\n\tinteractive shell prompts for Python.\n
    • \n
  • \n\tThe foreground and background colours of visible whitespace can be chosen\n\tindependent of the colours chosen for the lexical class of that whitespace.\n
    • \n
  • \n\tPer line data optimized by using an exponential allocation scheme.\n
    • \n
  • \n\tSciTE API file loading optimized.\n
    • \n
  • \n\tSciTE for GTK+ subsystem 2 documented. The exit status of commands\n\tis decoded into more understandable fields.\n
    • \n
  • \n\tSciTE find dialog remembers previous find string when there is no selection.\n\tFind in Selection button disabled when selection is rectangular as command\n\tdid not work.\n
    • \n
  • \n\tShift+Enter made equivalent to Enter to avoid users having to let go of\n\tthe shift key when typing. Avoids the possibility of entering single carriage\n\treturns in a file that contains CR+LF line ends.\n
    • \n
  • \n\tAutocompletion does not immediately disappear when the length parameter\n\tto SCI_AUTOCSHOW is 0.\n
    • \n
  • \n\tSciTE focuses on the editor pane when File | New executed and when the\n\toutput pane is closed with F8. Double clicking on a non-highlighted output\n\tpane line selects the word under the cursor rather than seeking the next\n\thighlighted line.\n
    • \n
  • \n\tSciTE director interface implements an \"askproperty\" command.\n
    • \n
  • \n\tSciTE's Export as LaTeX output improved.\n
    • \n
  • \n\tBetter choice of autocompletion displaying above the caret rather than\n\tbelow when that is more sensible.\n
    • \n
  • \n\tBug fixed where context menu would not be completely visible if invoked\n\twhen cursor near bottom or left of screen.\n
    • \n
  • \n\tCrashing bug fixed when displaying long strings on GTK+ caused failure of X server\n\tby displaying long text in segments.\n
    • \n
  • \n\tCrashing bug fixed on GTK+ when a Scintilla window was removed from its parent\n\tbut was still the selection owner.\n
    • \n
  • \n\tBug fixed on Windows in Unicode mode where not all characters on a line\n\twere displayed when that line contained some characters not in ASCII.\n
    • \n
  • \n\tCrashing bug fixed in SciTE on Windows with clearing output while running command.\n
    • \n
  • \n\tBug fixed in SciTE for GTK+ with command completion not detected when\n\tno output was produced by the command.\n
    • \n
  • \n\tBug fixed in SciTE for Windows where menus were not shown translated.\n
    • \n
  • \n\tBug fixed where words failed to display in line wrapping mode with visible\n\tline ends.\n
    • \n
  • \n\tBug fixed in SciTE where files opened from a session file were not closed.\n
    • \n
  • \n\tCosmetic flicker fixed when using Ctrl+Up and Ctrl+Down with some caret policies.\n
    • \n
\n

\n Release 1.47\n

\n
    \n
  • \n\tReleased on 1 August 2002.\n
    • \n
  • \n\tSupport for GTK+ 2 in Scintilla. International input methods not supported\n\ton GTK+2.\n
    • \n
  • \n\tLine wrapping performance improved greatly.\n
    • \n
  • \n\tNew caret policy implementation that treats horizontal and vertical\n\tpositioning equivalently and independently. Old caret policy methods\n\tdeprecated and not all options work correctly with old methods.\n
    • \n
  • \n\tExtra fold points for C, C++, Java, ... for fold comments //{ .. //} and\n\t#if / #ifdef .. #endif and the #region .. #endregion feature of C#.\n
    • \n
  • \n\tScintilla method to find the height in pixels of a line. Currently returns the\n\tsame result for every line as all lines are same height.\n
    • \n
  • \n\tSeparate make file, scintilla_vc6.mak, for Scintilla to use Visual C++\n\tversion 6 since main makefile now assumes VS .NET.\n\tVS .NET project files available for combined Scintilla and\n\tSciTE in scite/boundscheck.\n
    • \n
  • \n\tSciTE automatically recognizes Unicode files based\n\ton their Byte Order Marks and switches to Unicode mode.\n\tOn Windows, where SciTE supports Unicode display, this\n\tallows display of non European characters.\n\tThe file is saved back into the same character encoding unless\n\tthe user decides to switch using the File | Encoding menu.\n
    • \n
  • \n\tHandling of character input changed so that a fillup character, typically '('\n\tdisplays a calltip when an autocompletion list was being displayed.\n
    • \n
  • \n\tMultiline strings lexed better for C++ and Lua.\n
    • \n
  • \n\tRegular expressions in JavaScript within hypertext files are lexed better.\n
    • \n
  • \n\tOn Windows, Scintilla exports a function called Scintilla_DirectFunction\n\tthat can be used the same as the function returned by GetDirectFunction.\n
    • \n
  • \n\tScintilla converts line endings of text obtained from the clipboard to\n\tthe current default line endings.\n
    • \n
  • \n\tNew SciTE property ensure.final.line.end can ensure that saved files\n\talways end with a new line as this is required by some tools.\n\tThe ensure.consistent.line.ends property ensures all line ends are the\n\tcurrent default when saving files.\n\tThe strip.trailing.spaces property now works on the buffer so the\n\tbuffer in memory and the file on disk are the same after a save is performed.\n
    • \n
  • \n\tThe SciTE expand abbreviation command again allows '|' characters\n\tin expansions to be quoted by using '||'.\n
    • \n
  • \n\tSciTE on Windows can send data to the find tool through standard\n\tinput rather than using a command line argument to avoid problems\n\twith quoting command line arguments.\n
    • \n
  • \n\tThe Stop Executing command in SciTE on Windows improved to send\n\ta Ctrl+Z character to the tool. Better messages when stopping a tool.\n
    • \n
  • \n\tAutocompletion can automatically \"fill up\" when one of a set of characters is\n\ttype with the autocomplete.<lexer>.fillups property.\n
    • \n
  • \n\tNew predefined properties in SciTE, SelectionStartColumn, SelectionStartLine,\n\tSelectionEndColumn, SelectionEndLine can be used to integrate with other\n\tapplications.\n
    • \n
  • \n\tEnvironment variables are available as properties in SciTE.\n
    • \n
  • \n\tSciTE on Windows keeps status line more current.\n
    • \n
  • \n\tAbbreviations work in SciTE on Linux when first opened.\n
    • \n
  • \n\tFile saving fixed in SciTE to ensure files are not closed when they can not be\n\tsaved because of file permissions. Also fixed a problem with buffers that\n\tcaused files to not be saved.\n
    • \n
  • \n\tSciTE bug fixed where monospace mode not remembered when saving files.\n\tSome searching options now remembered when switching files.\n
    • \n
  • \n\tSciTE on Linux now waits on child termination when it shuts a child down\n\tto avoid zombies.\n
    • \n
  • \n\tSciTE on Linux has a Print menu command that defaults to invoking a2ps.\n
    • \n
  • \n\tFixed incorrect highlighting of indentation guides in SciTE for Python.\n
    • \n
  • \n\tCrash fixed in Scintilla when calling GetText for 0 characters.\n
    • \n
  • \n\tExporting as LaTeX improved when processing backslashes and tabs\n\tand setting up font.\n
    • \n
  • \n\tCrash fixed in SciTE when exporting or copying as RTF.\n
    • \n
  • \n\tSciTE session loading fixed to handle more than 10 files in session.\n
    • \n
\n

\n Release 1.46\n

\n
    \n
  • \n\tReleased on 10 May 2002.\n
    • \n
  • \n\tSet of lexers compiled into Scintilla can now be changed by adding and\n\tremoving lexer source files from scintilla/src and running LexGen.py.\n
    • \n
  • \n\tSCN_ZOOM notification provided by Scintilla when user changes zoom level.\n\tMethod to determine width of strings in pixels so that elements can be sized\n\trelative to text size.\n\tSciTE changed to keep line number column displaying a given\n\tnumber of characters.\n
    • \n
  • \n\tThe logical width of the document used to determine scroll bar range can be set.\n
    • \n
  • \n\tSetting to allow vertical scrolling to display last line at top rather than\n\tbottom of window.\n
    • \n
  • \n\tRead-only mode improved to avoid changing the selection in most cases\n\twhen a modification is attempted. Drag and drop cursors display correctly\n\tfor read-only in some cases.\n
    • \n
  • \n\tVisual C++ options in make files changed to suit Visual Studio .NET.\n
    • \n
  • \n\tScintilla.iface includes feature types for enumerations and lexers.\n
    • \n
  • \n\tLua lexer improves handling of literal strings and copes with nested literal strings.\n
    • \n
  • \n\tDiff lexer changed to treat lines starting with \"***\" similarly to \"---\".\n\tSymbolic names defined for lexical classes.\n
    • \n
  • \n\tnncrontab lexer improved.\n
    • \n
  • \n\tTurkish fonts (iso8859-9) supported on GTK+.\n
    • \n
  • \n\tAutomatic close tag feature for XML and HTML in SciTE.\n
    • \n
  • \n\tAutomatic indentation in SciTE improved.\n
    • \n
  • \n\tMaximum number of buffers available in SciTE increased. May be up to 100\n\talthough other restrictions on menu length limit the real maximum.\n
    • \n
  • \n\tSave a Copy command added to SciTE.\n
    • \n
  • \n\tExport as TeX command added to SciTE.\n
    • \n
  • \n\tExport as HTML command in SciTE respects Use Monospaced Font and\n\tbackground colour settings.\n
    • \n
  • \n\tCompilation problem on Solaris fixed.\n
    • \n
  • \n\tOrder of files displayed for SciTE's previous and next menu and key commands\n\tare now consistent.\n
    • \n
  • \n\tSaving of MRU in recent file changed so files open when SciTE quit\n\tare remembered.\n
    • \n
  • \n\tMore variants of ctags tags handled by Open Selected Filename in SciTE.\n
    • \n
  • \n\tJavaScript embedded in XML highlighted again.\n
    • \n
  • \n\tSciTE status bar updated after changing parameters in case they are being\n\tdisplayed in status bar.\n
    • \n
  • \n\tCrash fixed when handling some multi-byte languages.\n
    • \n
  • \n\tCrash fixed when replacing end of line characters.\n
    • \n
  • \n\tBug in SciTE fixed in multiple buffer mode where automatic loading\n\tturned on could lead to losing file contents.\n
    • \n
  • \n\tBug in SciTE on GTK+ fixed where dismissing dialogs with close box led to\n\tthose dialogs never being shown again.\n
    • \n
  • \n\tBug in SciTE on Windows fixed where position.tile with default positions\n\tled to SciTE being positioned off-screen.\n
    • \n
  • \n\tBug fixed in read-only mode, clearing all deletes contraction state data\n\tleading to it not being synchronized with text.\n
    • \n
  • \n\tCrash fixed in SciTE on Windows when tab bar displayed.\n
    • \n
\n

\n Release 1.45\n

\n
    \n
  • \n\tReleased on 15 March 2002.\n
    • \n
  • \n\tLine layout cache implemented to improve performance by maintaining\n\tthe positioning of characters on lines. Can be set to cache nothing,\n\tthe line with the caret, the visible page or the whole document.\n
    • \n
  • \n\tSupport, including a new lexer, added for Matlab programs.\n
    • \n
  • \n\tLua folder supports folding {} ranges and compact mode.\n\tLua lexer styles floating point numbers in number style instead of\n\tsetting the '.' in operator style.\n\tUp to 6 sets of keywords.\n\tBetter support for [[ although only works well\n\twhen all on one line.\n
    • \n
  • \n\tPython lexer improved to handle floating point numbers that contain negative\n\texponents and that start with '.'.\n
    • \n
  • \n\tWhen performing a rectangular paste, the caret now remains at the\n\tinsertion point.\n
    • \n
  • \n\tOn Windows with a wheel mouse, page-at-a-time mode is recognized.\n
    • \n
  • \n\tRead-only mode added to SciTE with a property to initialize it and another property,\n\t$(ReadOnly) available to show this mode in the status bar.\n
    • \n
  • \n\tSciTE status bar can show the number of lines in the selection\n\twith the $(SelHeight) property.\n
    • \n
  • \n\tSciTE's \"Export as HTML\" command uses the current character set to produce\n\tcorrect output for non-Western-European character sets, such as Russian.\n
    • \n
  • \n\tSciTE's \"Export as RTF\" fixed to produce correct output when file contains '\\'.\n
    • \n
  • \n\tSciTE goto command accepts a column as well as a line.\n\tIf given a column, it selects the word at that column.\n
    • \n
  • \n\tSciTE's Build, Compile and Go commands are now disabled if no\n\taction has been assigned to them.\n
    • \n
  • \n\tThe Refresh button in the status bar has been removed from SciTE on Windows.\n
    • \n
  • \n\tBug fixed in line wrap mode where cursor up or down command did not work.\n
    • \n
  • \n\tSome styling bugs fixed that were due to a compilation problem with\n\tgcc and inline functions with same name but different code.\n
    • \n
  • \n\tThe way that lexers loop over text was changed to avoid accessing beyond the\n\tend or setting beyond the end. May fix some bugs and make the code safer but\n\tmay also cause new bugs.\n
    • \n
  • \n\tBug fixed in HTML lexer's handling of SGML.\n
    • \n
  • \n\tBug fixed on GTK+/X where lines wider than 32767 pixels did not display.\n
    • \n
  • \n\tSciTE bug fixed with file name generation for standard property files.\n
    • \n
  • \n\tSciTE bug fixed with Open Selected Filename command when used with\n\tfile name and line number combination.\n
    • \n
  • \n\tIn SciTE, indentation and tab settings stored with buffers so maintained correctly\n\tas buffers selected.\n\tThe properties used to initialize these settings can now be set separately for different\n\tfile patterns.\n
    • \n
  • \n\tThread safety improved on Windows with a critical section protecting the font\n\tcache and initialization of globals performed within Scintilla_RegisterClasses.\n\tNew Scintilla_ReleaseResources call provided to allow explicit freeing of resources\n\twhen statically bound into another application. Resources automatically freed\n\tin DLL version. The window classes are now unregistered as part of resource\n\tfreeing which fixes bugs that occurred in some containers such as Internet Explorer.\n
    • \n
  • \n\t'make install' fixed on Solaris.\n
    • \n
  • \n\tBug fixed that could lead to a file being opened twice in SciTE.\n
    • \n
\n

\n Release 1.44\n

\n
    \n
  • \n\tReleased on 4 February 2002.\n
    • \n
  • \n\tCrashing bug fixed in Editor::Paint.\n
    • \n
  • \n\tLua lexer no longer treats '.' as a word character and\n\thandles 6 keyword sets.\n
    • \n
  • \n\tWordStartPosition and WordEndPosition take an onlyWordCharacters\n\targument.\n
    • \n
  • \n\tSciTE option for simplified automatic indentation which repeats\n\tthe indentation of the previous line.\n
    • \n
  • \n\tCompilation fix on Alpha because of 64 bit.\n
    • \n
  • \n\tCompilation fix for static linking.\n
    • \n
  • \n\tLimited maximum line length handled to 8000 characters as previous\n\tvalue of 16000 was causing stack exhaustion crashes for some.\n
    • \n
  • \n\tWhen whole document line selected, only the last display line gets\n\tthe extra selected rectangle at the right hand side rather than\n\tevery display line.\n
    • \n
  • \n\tCaret disappearing bug fixed for the case that the caret was not on the\n\tfirst display line of a document line.\n
    • \n
  • \n\tSciTE bug fixed where untitled buffer containing text was sometimes\n\tdeleted without chance to save.\n
    • \n
  • \n\tSciTE bug fixed where use.monospaced not working with\n\tmultiple buffers.\n
    • \n
\n

\n Release 1.43\n

\n
    \n
  • \n\tReleased on 19 January 2002.\n
    • \n
  • \n\tLine wrapping robustness and performance improved in Scintilla.\n
    • \n
  • \n\tLine wrapping option added to SciTE for both edit and output panes.\n
    • \n
  • \n\tStatic linking on Windows handles cursor resource better.\n\tDocumentation of static linking improved.\n
    • \n
  • \n\tAutocompletion has an option to delete any word characters after the caret\n\tupon selecting an item.\n
    • \n
  • \n\tFOX version identified by PLAT_FOX in Platform.h.\n
    • \n
  • \n\tCalltips in SciTE use the calltip.<lexer>.word.characters setting to\n\tcorrectly find calltips for functions that include characters like '$' which\n\tis not normally considered a word character.\n
    • \n
  • \n\tSciTE has a command to show help on itself which gets hooked up to displaying\n\tSciTEDoc.html.\n
    • \n
  • \n\tSciTE option calltip.<lexer>.end.definition to display help text on a\n\tsecond line of calltip.\n
    • \n
  • \n\tFixed the handling of the Buffers menu on GTK+ to ensure current buffer\n\tindicated and no warnings occur.\n\tChanged some menu items on GTK+ version to be same as Windows version.\n
    • \n
  • \n\tuse.monospaced property for SciTE determines initial state of Use Monospaced Font\n\tsetting.\n
    • \n
  • \n\tThe SciTE Complete Symbol command now works when there are no word\n\tcharacters before the caret, even though it is slow to display the whole set of\n\tsymbols.\n
    • \n
  • \n\tFunction names removed from SciTE's list of PHP keywords. The full list of\n\tpredefined functions is available from another web site mentioned on the\n\tExtras page.\n
    • \n
  • \n\tCrashing bug at startup on GTK+ for some configurations fixed.\n
    • \n
  • \n\tCrashing bug on GTK+ on 64 bit platforms fixed.\n
    • \n
  • \n\tCompilation problem with some compilers fixed in GTK+.\n
    • \n
  • \n\tJapanese text entry improved on Windows 9x.\n
    • \n
  • \n SciTE recent files directory problem on Windows when HOME and SciTE_HOME\n\tenvironment variables not set is now the directory of the executable.\n
    • \n
  • \n\tSession files no longer include untitled buffers.\n
    • \n
\n

\n Release 1.42\n

\n
    \n
  • \n\tReleased on 24 December 2001.\n
    • \n
  • \n\tBetter localization support including context menus and most messages.\n\tTranslations of the SciTE user interface available for Bulgarian,\n\tFrench, German, Italian, Russian, and Turkish.\n
    • \n
  • \n\tCan specify a character to use to indicate control characters\n\trather than having them displayed as mnemonics.\n
    • \n
  • \n\tScintilla key command for backspace that will not delete line\n\tend characters.\n
    • \n
  • \n\tScintilla method to find start and end of words.\n
    • \n
  • \n\tSciTE on GTK+ now supports the load.on.activate and save.on.deactivate\n\tproperties in an equivalent way to the Windows version.\n
    • \n
  • \n\tThe output pane of SciTE on Windows is now interactive so command line\n\tutilities that prompt for input or confirmation can be used.\n
    • \n
  • \n\tSciTE on Windows can choose directory for a \"Find in Files\"\n\tcommand like the GTK+ version could.\n
    • \n
  • \n\tSciTE can now load a set of API files rather than just one file.\n
    • \n
  • \n\tElapsedTime class added to Platform for accurate measurement of durations.\n\tUsed for debugging and for showing the user how long commands take in SciTE.\n
    • \n
  • \n\tBaan lexer added.\n
    • \n
  • \n\tIn C++ lexer, document comment keywords no longer have to be at the start\n\tof the line.\n
    • \n
  • \n\tPHP lexer changed to match keywords case insensitively.\n
    • \n
  • \n\tMore shell keywords added.\n
    • \n
  • \n\tSciTE support for VoiceXML added to xml.properties.\n
    • \n
  • \n\tIn SciTE the selection is not copied to the find field of the Search and Replace\n\tdialogs if it contains end of line characters.\n
    • \n
  • \n\tSciTE on Windows has a menu item to decide whether to respond to other\n\tinstances which are performing their check.if.already.open check.\n
    • \n
  • \n\tSciTE accelerator key for Box Comment command changed to avoid problems\n\tin non-English locales.\n
    • \n
  • \n\tSciTE context menu includes Close command for the editor pane and\n\tHide command for the output pane.\n
    • \n
  • \n\toutput: command added to SciTE director interface to add text to the\n\toutput pane. The director interface can execute commands (such as tool\n\tcommands with subsystem set to 3) by sending a macro:run message.\n
    • \n
  • \n\tSciTE on GTK+ will defer to the Window Manager for position if position.left or\n\tposition.top not set and for size if position.width or position.height not set.\n
    • \n
  • \n\tSciTE on Windows has a position.tile property to place a second instance\n\tto the right of the first.\n
    • \n
  • \n\t Scintilla on Windows again supports EM_GETSEL and EM_SETSEL.\n
    • \n
  • \n\tProblem fixed in Scintilla on Windows where control ID is no longer cached\n\tas it could be changed by external code.\n
    • \n
  • \n\tProblems fixed in SciTE on Windows when finding any other open instances at\n\tstart up when check.if.already.open is true.\n
    • \n
  • \n\tBugs fixed in SciTE where command strings were not always having\n\tvariables evaluated.\n
    • \n
  • \n\tBugs fixed with displaying partial double-byte and Unicode characters\n\tin rectangular selections and at the edge when edge mode is EDGE_BACKGROUND.\n\tColumn numbers reported by GetColumn treat multiple byte characters as one column\n\trather than counting bytes.\n
    • \n
  • \n\tBug fixed with caret movement over folded lines.\n
    • \n
  • \n Another bug fixed with tracking selection in secondary views when performing\n\tmodifications.\n
    • \n
  • \n\tHorizontal scrolling and display of long lines optimized.\n
    • \n
  • \n\tCursor setting in Scintilla on GTK+ optimized.\n
    • \n
  • \n\tExperimental changeable style attribute.\n\tSet to false to make text read-only.\n\tCurrently only stops caret from being within not-changeable\n\ttext and does not yet stop deleting a range that contains\n\tnot-changeable text.\n\tCan be used from SciTE by adding notchangeable to style entries.\n
    • \n
  • \n\tExperimental line wrapping.\n\tCurrently has performance and appearance problems.\n
    • \n
\n

\n Release 1.41\n

\n
    \n
  • \n\tReleased on 6 November 2001.\n
    • \n
  • \n Changed Platform.h to not include platform\theaders. This lessens likelihood and impact of\n\tname clashes from system headers and also speeds up compilation.\n\tRenamed DrawText to DrawTextNoClip to avoid name clash.\n
    • \n
  • \n Changed way word functions work to treat a sequence of punctuation as\n\ta word. This is more sensible and also more compatible with other editors.\n
    • \n
  • \n Cursor changes over the margins and selection on GTK+ platform.\n
    • \n
  • \n SC_MARK_BACKGROUND is a marker that only changes the line's background colour.\n
    • \n
  • \n\tEnhanced Visual Basic lexer handles character date and octal literals,\n\tand bracketed keywords for VB.NET. There are two VB lexers, vb and vbscript\n\twith type indication characters like ! and $ allowed at the end of identifiers\n\tin vb but not vbscript. Lexer states now separate from those used for C++ and\n\tnames start with SCE_B.\n
    • \n
  • \n Lexer added for Bullant language.\n
    • \n
  • \n The horizontal scroll position, xOffset, is now exposed through the API.\n
    • \n
  • \n The SCN_POSCHANGED notification is deprecated as it was causing confusion.\n\t Use SCN_UPDATEUI instead.\n
    • \n
  • \n Compilation problems fixed for some versions of gcc.\n
    • \n
  • \n Support for WM_GETTEXT restored on Windows.\n
    • \n
  • \n Double clicking on an autocompletion list entry works on GTK+.\n
    • \n
  • \n Bug fixed with case insensitive sorts for autocompletion lists.\n
    • \n
  • \n Bug fixed with tracking selection in secondary views when performing modifications.\n
    • \n
  • \n SciTE's abbreviation expansion feature will now indent expansions to the current\n\tindentation level if indent.automatic is on.\n
    • \n
  • \n SciTE allows setting up of parameters to commands from a dialog and can also\n show this dialog automatically to prompt for arguments when running a command.\n
    • \n
  • \n SciTE's Language menu (formerly Options | Use Lexer) is now defined by the\n\tmenu.language property rather than being hardcoded.\n
    • \n
  • \n The user interface of SciTE can be localized to a particular language by editing\n\ta locale.properties file.\n
    • \n
  • \n On Windows, SciTE will try to move to the front when opening a new file from\n\tthe shell and using check.if.already.open.\n
    • \n
  • \n SciTE can display the file name and directory in the title bar in the form\n\t\"file @ directory\" when title.full.path=2.\n
    • \n
  • \n The SciTE time.commands property reports the time taken by a command as well\n\tas its status when completed.\n
    • \n
  • \n The SciTE find.files property is now a list separated by '|' characters and this list is\n\tadded into the Files pull down of the Find in Files dialog.\n
    • \n
\n

\n Release 1.40\n

\n
    \n
  • \n\tReleased on 23 September 2001.\n
    • \n
  • \n\tRemoval of emulation of Win32 RichEdit control in core of Scintilla.\n\tThis change may be incompatible with existing client code.\n\tSome emulation still done in Windows platform layer.\n
    • \n
  • \n\tSGML support in the HTML/XML lexer.\n
    • \n
  • \n\tSciTE's \"Stop Executing\" command will terminate GUI programs on\n\tWindows NT and Windows 2000.\n
    • \n
  • \n\tStyleContext class helps construct lexers that are simple and accurate.\n\tUsed in the C++, Eiffel, and Python lexers.\n
    • \n
  • \n\tClipboard operations in GTK+ version convert between platform '\\n' line endings and\n\tcurrently chosen line endings.\n
    • \n
  • \n\tAny character in range 0..255 can be used as a marker.\n\tThis can be used to support numbered bookmarks, for example.\n
    • \n
  • \n\tThe default scripting language for ASP can be set.\n
    • \n
  • \n\tNew lexer and other support for crontab files used with the nncron scheduler.\n
    • \n
  • \n\tFolding of Python improved.\n
    • \n
  • \n\tThe ` character is treated as a Python operator.\n
    • \n
  • \n\tLine continuations (\"\\\" at end of line) handled inside Python strings.\n
    • \n
  • \n\tMore consistent handling of line continuation ('\\' at end of line) in\n\tC++ lexer.\n\tThis fixes macro definitions that span more than one line.\n
    • \n
  • \n\tC++ lexer can understand Doxygen keywords in doc comments.\n
    • \n
  • \n\tSciTE on Windows allows choosing to open the \"open\" dialog on the directory\n\tof the current file rather than in the default directory.\n
    • \n
  • \n\tSciTE on Windows handles command line arguments in \"check.if.already.open\"\n\tcorrectly when the current directory of the new instance is different to the\n\talready open instance of SciTE.\n
    • \n
  • \n\t\"cwd\" command (change working directory) defined for SciTE director interface.\n
    • \n
  • \n\tSciTE \"Export As HTML\" produces better, more compliant, and shorter files.\n
    • \n
  • \n\tSciTE on Windows allows several options for determining default file name\n\tfor exported files.\n
    • \n
  • \n\tAutomatic indentation of Python in SciTE fixed.\n
    • \n
  • \n\tExported HTML can support folding.\n
    • \n
  • \n\tBug fixed in SCI_GETTEXT macro command of director interface.\n
    • \n
  • \n\tCursor leak fixed on GTK+.\n
    • \n
  • \n\tDuring SciTE shutdown, \"identity\" messages are no longer sent over the director interface.\n
    • \n
\n

\n Release 1.39\n

\n
    \n
  • \n\tReleased on 22 August 2001.\n
    • \n
  • \n\tWindows version requires msvcrt.dll to be available so will not work\n\ton original Windows 95 version 1. The msvcrt.dll file is installed\n\tby almost everything including Internet Explorer so should be available.\n
    • \n
  • \n\tFlattened tree control style folding margin. The SciTE fold.plus option is\n\tnow fold.symbols and has more values for the new styles.\n
    • \n
  • \n\tMouse dwell events are generated when the user holds the mouse steady\n\tover Scintilla.\n
    • \n
  • \n PositionFromPointClose is like PositionFromPoint but returns\n INVALID_POSITION when point outside window or after end of line.\n
    • \n
  • \n Input of Hungarian and Russian characters in GTK+ version works by\n truncating input to 8 bits if in the range of normal characters.\n
    • \n
  • \n Better choices for font descriptors on GTK+ for most character sets.\n
    • \n
  • \n GTK+ Scintilla is destroyed upon receiving destroy signal rather than\n destroy_event signal.\n
    • \n
  • \n Style setting that force upper or lower case text.\n
    • \n
  • \n Case-insensitive autocompletion lists work correctly.\n
    • \n
  • \n Keywords can be prefix based so ^GTK_ will treat all words that start\n with GTK_ as keywords.\n
    • \n
  • \n Horizontal scrolling can be jumpy rather than gradual.\n
    • \n
  • \n GetSelText places a '\\0' in the buffer if the selection is empty..\n
    • \n
  • \n EnsureVisible split into two methods EnsureVisible which will not scroll to show\n the line and EnsureVisibleEnforcePolicy which may scroll.\n
    • \n
  • \n Python folder has options to fold multi-line comments and triple quoted strings.\n
    • \n
  • \n C++ lexer handles keywords before '.' like \"this.x\" in Java as keywords.\n Compact folding mode option chooses whether blank lines after a structure are\n folded with that structure. Second set of keywords with separate style supported.\n
    • \n
  • \n Ruby lexer handles multi-line comments.\n
    • \n
  • \n VB has folder.\n
    • \n
  • \n PHP lexer has an operator style, handles \"<?\" and \"?>\" inside strings\n and some comments.\n
    • \n
  • \n TCL lexer which is just an alias for the C++ lexer so does not really\n understand TCL syntax.\n
    • \n
  • \n Error lines lexer has styles for Lua error messages and .NET stack traces.\n
    • \n
  • \n Makefile lexer has a target style.\n
    • \n
  • \n Lua lexer handles some [[]] string literals.\n
    • \n
  • \n HTML and XML lexer have a SCE_H_SGML state for tags that\n start with \"<!\".\n
    • \n
  • \n Fixed Scintilla bugs with folding. When modifications were performed near\n folded regions sometimes no unfolding occurred when it should have. Deleting a\n fold causing character sometimes failed to update fold information correctly.\n
    • \n
  • \n Better support for Scintilla on GTK+ for Win32 including separate\n PLAT_GTK_WIN32 definition and correct handling of rectangular selection\n with clipboard operations.\n
    • \n
  • \n SciTE has a Tools | Switch Pane (Ctrl+F6) command to switch focus between\n edit and output panes.\n
    • \n
  • \n SciTE option output.scroll allows automatic scrolling of output pane to\n be turned off.\n
    • \n
  • \n Commands can be typed into the SciTE output pane similar to a shell window.\n
    • \n
  • \n SciTE properties magnification and output magnification set initial zoom levels.\n
    • \n
  • \n Option for SciTE comment block command to place comments at start of line.\n
    • \n
  • \n SciTE for Win32 has an option to minimize to the tray rather than the task bar.\n
    • \n
  • \n Close button on SciTE tool bar for Win32.\n
    • \n
  • \n SciTE compiles with GCC 3.0.\n
    • \n
  • \n SciTE's automatic indentation of C++ handles braces without preceding keyword\n correctly.\n
    • \n
  • \n Bug fixed with GetLine method writing past the end of where it should.\n
    • \n
  • \n Bug fixed with mouse drag automatic scrolling when some lines were folded.\n
    • \n
  • \n Bug fixed because caret XEven setting was inverted.\n
    • \n
  • \n Bug fixed where caret was initially visible even though window was not focussed.\n
    • \n
  • \n Bug fixed where some file names could end with \"\\\\\" which caused slow\n downs on Windows 9x.\n
    • \n
  • \n On Win32, SciTE Replace dialog starts with focus on replacement text.\n
    • \n
  • \n SciTE Go to dialog displays correct current line.\n
    • \n
  • \n Fixed bug with SciTE opening multiple files at once.\n
    • \n
  • \n Fixed bug with Unicode key values reported to container truncated.\n
    • \n
  • \n Fixed bug with unnecessary save point notifications.\n
    • \n
  • \n Fixed bugs with indenting and unindenting at start of line.\n
    • \n
  • \n Monospace Font setting behaves more consistently.\n
    • \n
\n

\n Release 1.38\n

\n
    \n
  • \n\tReleased on 23 May 2001.\n
    • \n
  • \n\tLoadable lexer plugins on Windows.\n
    • \n
  • \n\tRuby lexer and support.\n
    • \n
  • \n\tLisp lexer and support.\n
    • \n
  • \n\tEiffel lexer and support.\n
    • \n
  • \n\tModes for better handling of Tab and BackSpace keys within\n\tindentation. Mode to avoid autocompletion list cancelling when\n\tthere are no viable matches.\n
    • \n
  • \n\tReplaceTarget replaced with two calls ReplaceTarget\n\t(which is incompatible with previous ReplaceTarget) and\n\tReplaceTargetRE. Both of these calls have a count first\n\tparameter which allows using strings containing nulls.\n\tSearchInTarget and SetSearchFlags functions allow\n\tspecifying a search in several simple steps which helps\n\tsome clients which can not create structs or pointers easily.\n
    • \n
  • \n\tAsian language input through an Input Method Editor works\n\ton Windows 2000.\n
    • \n
  • \n\tOn Windows, control characters can be entered through use of\n\tthe numeric keypad in conjunction with the Alt key.\n
    • \n
  • \n\tDocument memory allocation changed to grow exponentially\n\twhich reduced time to load a 30 Megabyte file from\n\t1000 seconds to 25. Change means more memory may be used.\n
    • \n
  • \n\tWord part movement keys now handled in Scintilla rather than\n\tSciTE.\n
    • \n
  • \n\tRegular expression '^' and '$' work more often allowing insertion\n\tof text at start or end of line with a replace command.\n\tBackslash quoted control characters \\a, \\b, \\f, \\t, and \\v\n\trecognized within sets.\n
    • \n
  • \n\tSession files for SciTE.\n
    • \n
  • \n\tExport as PDF command hidden in SciTE as it often failed.\n\tCode still present so can be turned on by those willing to cope.\n
    • \n
  • \n\tBug fixed in HTML lexer handling % before > as end ASP\n\teven when no start ASP encountered.\n Bug fixed when scripts ended with a quoted string and\n end tag was not seen.\n
    • \n
  • \n\tBug fixed on Windows where context menu key caused menu to\n\tappear in corner of screen rather than within window.\n
    • \n
  • \n\tBug fixed in SciTE's Replace All command not processing\n\twhole file when replace string longer than search string.\n
    • \n
  • \n\tBug fixed in SciTE's MRU list repeating entries if Ctrl+Tab\n\tused when all entries filled.\n
    • \n
  • \n\tConvertEOLs call documentation fixed.\n
    • \n
\n

\n Release 1.37\n

\n
    \n
  • \n\tReleased on 17 April 2001.\n
    • \n
  • \n\tBug fixed with scroll bars being invisible on GTK+ 1.2.9.\n
    • \n
  • \n\tScintilla and SciTE support find and replace using simple regular\n\texpressions with tagged expressions. SciTE supports C '\\' escapes\n\tin the Find and Replace dialogs.\n\tReplace in Selection available in SciTE.\n
    • \n
  • \n\tScintilla has a 'target' feature for replacing code rapidly without\n\tcausing display updates.\n
    • \n
  • \n\tScintilla and SciTE on GTK+ support file dropping from file managers\n\tsuch as Nautilus and gmc. Files or other URIs dropped on Scintilla\n\tresult in a URIDropped notification.\n
    • \n
  • \n\tLexers may have separate Lex and Fold functions.\n
    • \n
  • \n\tLexer infrastructure improved to allow for plug in lexers and for referring\n\tto lexers by name rather than by ID.\n
    • \n
  • \n\tAda lexer and support added.\n
    • \n
  • \n\tOption in both Scintilla and SciTE to treat both left and right margin\n\tas equally important when repositioning visible area in response to\n\tcaret movement. Default is to prefer visible area positioning which\n\tminimizes the horizontal scroll position thus favouring the left margin.\n
    • \n
  • \n\tCaret line highlighting.\n
    • \n
  • \n\tCommands to delete from the caret to the end of line and\n\tfrom the caret to the beginning of line.\n
    • \n
  • \n\tSciTE has commands for inserting and removing block comments and\n\tfor inserting stream comments.\n
    • \n
  • \n\tSciTE Director interface uses C++ '\\' escapes to send control characters.\n
    • \n
  • \n\tSciTE Director interface adds more commands including support for macros.\n
    • \n
  • \n\tSciTE has menu options for recording and playing macros which are visible\n\twhen used with a companion program that supports these features.\n
    • \n
  • \n\tSciTE has an Expand Abbreviation command.\n\tAbbreviations are stored in a global abbrev.properties file.\n
    • \n
  • \n\tSciTE has a Full Screen command to switch between a normal window\n\tsize and using the full screen. On Windows, the menu bar can be turned\n\toff when in full screen mode.\n
    • \n
  • \n\tSciTE has a Use monospaced font command to switch between the normal\n\tset of fonts and one size of a particular fixed width font.\n
    • \n
  • \n\tSciTE's use of tabs can be controlled for particular file names\n\tas well as globally.\n
    • \n
  • \n\tThe contents of SciTE's status bar can be defined by a property and\n\tinclude variables. On Windows, several status bar definitions can be active\n\twith a click on the status bar cycling through them.\n
    • \n
  • \n\tCopy as RTF command in SciTE on Windows to allow pasting\n\tstyled text into word processors.\n
    • \n
  • \n\tSciTE can allow the use of non-alphabetic characters in\n\tComplete Symbol lists and can automatically display this autocompletion\n\tlist when a trigger character such as '.' is typed.\n\tComplete word can be set to pop up when the user is typing a word and\n\tthere is only one matching word in the document.\n
    • \n
  • \n\tSciTE lists the imported properties files on a menu to allow rapid\n\taccess to them.\n
    • \n
  • \n\tSciTE on GTK+ improvements to handling accelerator keys and focus\n\tin dialogs. Message boxes respond to key presses without the Alt key as\n\tthey have no text entries to accept normal keystrokes.\n
    • \n
  • \n\tSciTE on GTK+ sets the application icon.\n
    • \n
  • \n\tSciTE allows setting the colours used to indicate the current\n\terror line.\n
    • \n
  • \n\tVariables within PHP strings have own style. Keyword list updated.\n
    • \n
  • \n\tKeyword list for Lua updated for Lua 4.0.\n
    • \n
  • \n\tBug fixed in rectangular selection where rectangle still appeared\n\tselected after using cursor keys to move caret.\n
    • \n
  • \n\tBug fixed in C++ lexer when deleting a '{' controlling a folded range\n\tled to that range becoming permanently invisible.\n
    • \n
  • \n\tBug fixed in Batch lexer where comments were not recognized.\n
    • \n
  • \n\tBug fixed with undo actions coalescing into steps incorrectly.\n
    • \n
  • \n\tBug fixed with Scintilla on GTK+ positioning scroll bars 1 pixel\n\tover the Scintilla window leading to their sides being chopped off.\n
    • \n
  • \n\tBugs fixed in SciTE when doing some actions led to the start\n\tor end of the file being displayed rather than the current location.\n
    • \n
  • \n\tAppearance of calltips fixed to look like document text including\n\tany zoom factor. Positioned to be outside current line even when\n\tmultiple fonts and sizes used.\n
    • \n
  • \n\tBug fixed in Scintilla macro support where typing Enter caused both a newline\n\tcommand and newline character insertion to be recorded.\n
    • \n
  • \n\tBug fixed in SciTE on GTK+ where focus was moving\n\tbetween widgets incorrectly.\n
    • \n
  • \n\tBug fixed with fold symbols sometimes not updating when\n\tthe text changed.\n
    • \n
  • \n\tBugs fixed in SciTE's handling of folding commands.\n
    • \n
  • \n\tDeprecated undo collection enumeration removed from API.\n
    • \n
\n

\n Release 1.36\n

\n
    \n
  • \n\tReleased on 1 March 2001.\n
    • \n
  • \n\tScintilla supports GTK+ on Win32.\n
    • \n
  • \n\tSome untested work on making Scintilla and SciTE 64 bit compatible.\n\tFor users on GTK+ this requires including Scintilla.h before\n\tScintillaWidget.h.\n
    • \n
  • \n\tHTML lexer allows folding HTML.\n
    • \n
  • \n\tNew lexer for Avenue files which are used in the ESRI ArcView GIS.\n
    • \n
  • \n\tDOS Batch file lexer has states for '@', external commands, variables and\n\toperators.\n
    • \n
  • \n\tC++ lexer can fold comments of /* .. */ form.\n
    • \n
  • \n\tBetter disabling of pop up menu items in Scintilla when in read-only mode.\n
    • \n
  • \n\tStarting to move to Doxygen compatible commenting.\n
    • \n
  • \n\tDirector interface on Windows enables another application to control SciTE.\n
    • \n
  • \n\tOpening SciTE on Windows 9x sped up greatly for some cases.\n
    • \n
  • \n\tThe command.build.directory property allows SciTE to run the build\n\tcommand in a different directory to the source files.\n
    • \n
  • \n\tSciTE on Windows allows setting foreground and background colours\n\tfor printed headers and footers.\n
    • \n
  • \n\tBug fixed in finding calltips in SciTE which led to no calltips for some identifiers.\n
    • \n
  • \n\tDocumentation added for lexers and for the extension and director interfaces.\n
    • \n
  • \n\tSciTE menus rearranged with new View menu taking over some of the items that\n\twere under the Options menu. Clear All Bookmarks command added.\n
    • \n
  • \n\tClear Output command in SciTE.\n
    • \n
  • \n\tSciTE on Windows gains an Always On Top command.\n
    • \n
  • \n\tBug fixed in SciTE with attempts to define properties recursively.\n
    • \n
  • \n\tBug fixed in SciTE properties where only one level of substitution was done.\n
    • \n
  • \n\tBug fixed in SciTE properties where extensions were not being\n\tmatched in a case insensitive manner.\n
    • \n
  • \n\tBug fixed in SciTE on Windows where the Go to dialog displays the correct\n\tline number.\n
    • \n
  • \n\tIn SciTE, if fold.on.open set then switching buffers also performs fold.\n
    • \n
  • \n\tBug fixed in Scintilla where ensuring a line was visible in the presence of folding\n\toperated on the document line instead of the visible line.\n
    • \n
  • \n\tSciTE command line processing modified to operate on arguments in order and in\n\ttwo phases. First any arguments before the first file name are processed, then the\n\tUI is opened, then the remaining arguments are processed. Actions defined for the\n\tDirector interface (currently only \"open\") may also be used on the command line.\n\tFor example, \"SciTE -open:x.txt\" will start SciTE and open x.txt.\n
    • \n
  • \n\tNumbered menu items SciTE's Buffers menu and the Most Recently Used portion\n\tof the File menu go from 1..0 rather than 0..9.\n
    • \n
  • \n\tThe tab bar in SciTE for Windows has numbers.\n\tThe tab.hide.one option hides the tab bar until there is more than one buffer open.\n
    • \n
\n

\n Release 1.35\n

\n
    \n
  • \n Released on 29 January 2001.\n
    • \n
  • \n Rewritten and simplified widget code for the GTK+ version to enhance\n solidity and make more fully compliant with platform norms. This includes more\n normal handling of keystrokes so they are forwarded to containers correctly.\n
    • \n
  • \n User defined lists can be shown.\n
    • \n
  • \n Many fixes to the Perl lexer.\n
    • \n
  • \n Pascal lexer handles comments more correctly.\n
    • \n
  • \n C/C++/Java/JavaScript lexer has a state for line doc comments.\n
    • \n
  • \n Error output lexer understands Sun CC messages.\n
    • \n
  • \n Make file lexer has variable, preprocessor, and operator states.\n
    • \n
  • \n Wider area given to an italics character that is at the end of a line to prevent it\n\tbeing cut off.\n
    • \n
  • \n Call to move the caret inside the currently visible area.\n
    • \n
  • \n Paste Rectangular will space fill on the left hand side of the pasted text as\n\tneeded to ensure it is kept rectangular.\n
    • \n
  • \n Cut and Paste Rectangular does nothing in read-only mode.\n
    • \n
  • \n Undo batching changed so that a paste followed by typing creates two undo actions..\n
    • \n
  • \n A \"visibility policy\" setting for Scintilla determines which range of lines are displayed\n\twhen a particular line is moved to. Also exposed as a property in SciTE.\n
    • \n
  • \n SciTE command line allows property settings.\n
    • \n
  • \n SciTE has a View Output command to hide or show the output pane.\n
    • \n
  • \n SciTE's Edit menu has been split in two with searching commands moved to a\n\tnew Search menu. Find Previous and Previous Bookmark are in the Search menu.\n
    • \n
  • \n SciTE on Windows has options for setting print margins, headers and footers.\n
    • \n
  • \n SciTE on Windows has tooltips for toolbar.\n
    • \n
  • \n SciTE on GTK+ has properties for setting size of file selector.\n
    • \n
  • \n Visual and audio cues in SciTE on Windows enhanced.\n
    • \n
  • \n Fixed performance problem in SciTE for GTK+ by dropping the extra 3D\n effect on the content windows.\n
    • \n
  • \n Fixed problem in SciTE where choosing a specific lexer then meant\n that no lexer was chosen when files opened.\n
    • \n
  • \n Default selection colour changed to be visible on low colour displays.\n
    • \n
  • \n Fixed problems with automatically reloading changed documents in SciTE on\n Windows.\n
    • \n
  • \n Fixed problem with uppercase file extensions in SciTE.\n
    • \n
  • \n Fixed some problems when using characters >= 128, some of which were being\n incorrectly treated as spaces.\n
    • \n
  • \n Fixed handling multiple line tags, non-inline scripts, and XML end tags /> in HTML/XML lexer.\n
    • \n
  • \n Bookmarks in SciTE no longer disappear when switching between buffers.\n
    • \n
\n

\n Release 1.34\n

\n
    \n
  • \n Released on 28 November 2000.\n
    • \n
  • \n Pascal lexer.\n
    • \n
  • \n Export as PDF in SciTE.\n
    • \n
  • \n Support for the OpenVMS operating system in SciTE.\n
    • \n
  • \n SciTE for GTK+ can check for another instance of SciTE\n\tediting a file and switch to it rather than open a second instance\n\ton one file.\n
    • \n
  • \n Fixes to quoting and here documents in the Perl lexer.\n
    • \n
  • \n SciTE on Windows can give extra visual and audio cues when a\n\twarning is shown or find restarts from beginning of file.\n
    • \n
  • \n Open Selected Filename command in SciTE. Also understands some\n\twarning message formats.\n
    • \n
  • \n Wider area for line numbers when printing.\n
    • \n
  • \n Better scrolling performance on GTK+.\n
    • \n
  • \n Fixed problem where rectangles with negative coordinates were\n\tinvalidated leading to trouble with platforms that use\n\tunsigned coordinates.\n
    • \n
  • \n GTK+ Scintilla uses more compliant signalling code so that keyboard\n\tevents should propagate to containers.\n
    • \n
  • \n Bug fixed with opening full or partial paths.\n
    • \n
  • \n Improved handling of paths in error messages in SciTE.\n
    • \n
  • \n Better handling of F6 in SciTE.\n
    • \n
\n

\n Release 1.33\n

\n
    \n
  • \n Released on 6 November 2000.\n
    • \n
  • \n XIM support for the GTK+ version of Scintilla ensures that more non-English\n characters can be typed.\n
    • \n
  • \n Caret may be 1, 2, or 3 pixels wide.\n
    • \n
  • \n Cursor may be switched to wait image during lengthy processing.\n
    • \n
  • \n Scintilla's internal focus flag is exposed for clients where focus is handled in\n complex ways.\n
    • \n
  • \n Error status defined for Scintilla to hold indication that an operation failed and the reason\n for that failure. No detection yet implemented but clients may start using the interface\n so as to be ready for when it does.\n
    • \n
  • \n Context sensitive help in SciTE.\n
    • \n
  • \n CurrentWord property available in SciTE holding the value of the word the\n caret is within or near.\n
    • \n
  • \n Apache CONF file lexer.\n
    • \n
  • \n Changes to Python lexer to allow 'as' as a context sensitive keyword and the\n string forms starting with u, r, and ur to be recognized.\n
    • \n
  • \n SCN_POSCHANGED notification now working and SCN_PAINTED notification added.\n
    • \n
  • \n Word part movement commands for cursoring between the parts of reallyLongCamelIdentifiers and\n other_ways_of_making_words.\n
    • \n
  • \n When text on only one line is selected, Shift+Tab moves to the previous tab stop.\n
    • \n
  • \n Tab control available for Windows version of SciTE listing all the buffers\n and making it easy to switch between them.\n
    • \n
  • \n SciTE can be set to automatically determine the line ending type from the contents of a\n file when it is opened.\n
    • \n
  • \n Dialogs in GTK+ version of SciTE made more modal and have accelerator keys.\n
    • \n
  • \n Find in Files command in GTK+ version of SciTE allows choice of directory.\n
    • \n
  • \n On Windows, multiple files can be opened at once.\n
    • \n
  • \n SciTE source broken up into more files.\n
    • \n
  • \n Scintilla headers made safe for C language, not just C++.\n
    • \n
  • \n New printing modes - force background to white and force default background to white.\n
    • \n
  • \n Automatic unfolding not occurring when Enter pressed at end of line bug fixed.\n
    • \n
  • \n Bugs fixed in line selection.\n
    • \n
  • \n Bug fixed with escapes in PHP strings in the HTML lexer.\n
    • \n
  • \n Bug fixed in SciTE for GTK+ opening files when given full paths.\n
    • \n
  • \n Bug fixed in autocompletion where user backspaces into existing text.\n
    • \n
  • \n Bugs fixed in opening files and ensuring they are saved before running.\n A case bug also fixed here.\n
    • \n
\n

\n Release 1.32\n

\n
    \n
  • \n Released on 8 September 2000.\n
    • \n
  • \n Fixes bugs in complete word and related code. Protection against a bug when\n\treceiving a bad argument.\n
    • \n
\n

\n Release 1.31\n

\n
    \n
  • \n Released on 6 September 2000.\n
    • \n
  • \n Scintilla is available as a COM control from the scintillactrl module in CVS.\n
    • \n
  • \n Style setting to underline text. Exposed in SciTE as \"underlined\".\n
    • \n
  • \n Style setting to make text invisible.\n
    • \n
  • \n SciTE has an extensibility interface that can be used to implement features such as\n a scripting language or remote control. An example use of this is the extlua module\n available from CVS which allows SciTE to be scripted in Lua.\n
    • \n
  • \n Many minor fixes to all of the lexers.\n
    • \n
  • \n New lexer for diff and patch files.\n
    • \n
  • \n Error message lexer understands Perl error messages.\n
    • \n
  • \n C/C++/Java lexer now supports C#, specifically verbatim strings and\n\t@ quoting of identifiers that are the same as keywords. SciTE has\n\ta set of keywords for C# and a build command set up for C#.\n
    • \n
  • \n Scintilla property to see whether in overtype or insert state.\n
    • \n
  • \n PosChanged notification fired when caret moved.\n
    • \n
  • \n Comboboxes in dialogs in SciTE on Windows can be horizontally scrolled.\n
    • \n
  • \n Autocompletion and calltips can treat the document as case sensitive or\n case insensitive.\n
    • \n
  • \n Autocompletion can be set to automatically choose the only\n\telement in a single element list.\n
    • \n
  • \n Set of characters that automatically complete an autocompletion list\n\tcan be set.\n
    • \n
  • \n SciTE command to display calltip - useful when dropped because of\n\tediting.\n
    • \n
  • \n SciTE has a Revert command to go back to the last saved version.\n
    • \n
  • \n SciTE has an Export as RTF command. Save as HTML is renamed\n\tto Export as HTML and is located on the Export sub menu.\n
    • \n
  • \n SciTE command \"Complete Word\" searches document for any\n\twords starting with characters before caret.\n
    • \n
  • \n SciTE options for changing aspects of the formatting of files exported\n\tas HTML or RTF.\n
    • \n
  • \n SciTE \"character.set\" option for choosing the character\n\tset for all fonts.\n
    • \n
  • \n SciTE has a \"Toggle all folds\" command.\n
    • \n
  • \n The makefiles have changed. The makefile_vc and\n\tmakefile_bor files in scintilla/win32 and scite/win32 have been\n\tmerged into scintilla/win32/scintilla.mak and scite/win32/scite.mak.\n\tDEBUG may be defined for all make files and this will turn on\n\tassertions and for some make files will choose other debugging\n\toptions.\n
    • \n
  • \n To make debugging easier and allow good use of BoundsChecker\n\t there is a Visual C++ project file in scite/boundscheck that builds\n\t all of Scintilla and SciTE into one executable.\n
    • \n
  • \n The size of the SciTE output window can be set with the\n\t output.horizontal.size and output.vertical.size settings.\n
    • \n
  • \n SciTE status bar indicator for insert or overwrite mode.\n
    • \n
  • \n Performance improvements to autocompletion and calltips.\n
    • \n
  • \n A caret redraw problem when undoing is fixed.\n
    • \n
  • \n Crash with long lines fixed.\n
    • \n
  • \n Bug fixed with merging markers when lines merged.\n
    • \n
\n

\n Release 1.30\n

\n
    \n
  • \n Released on 26 July 2000.\n
    • \n
  • \n Much better support for PHP which is now an integral part of the HTML support.\n
    • \n
  • \n Start replacement of Windows-specific APIs with cross platform APIs.\n In 1.30, the new APIs are introduced but the old APIs are still available.\n For the GTK+ version, may have to include \"WinDefs.h\" explicitly to\n use the old APIs.\n
    • \n
  • \n \"if\" and \"import\" statements in SciTE properties files allows modularization into\n language-specific properties files and choices based upon platform.\n This means that SciTE is delivered with 9 language-specific properties files\n as well as the standard SciTEGlobal.properties file.\n
    • \n
  • \n Much lower resource usage on Windows 9x.\n
    • \n
  • \n \"/p\" option in SciTE on Windows for printing a file and then exiting.\n
    • \n
  • \n Options for printing with inverted brightness (when the screen is set to use\n a dark background) and to force black on white printing.\n
    • \n
  • \n Option for printing magnified or miniaturized from screen settings.\n
    • \n
  • \n In SciTE, Ctrl+F3 and Ctrl+Shift+F3 find the selection in the forwards and backwards\n directions respectively.\n
    • \n
  • \n Auto-completion lists may be set to cancel when the cursor goes before\n its start position or before the start of string being completed.\n
    • \n
  • \n Auto-completion lists automatically size more sensibly.\n
    • \n
  • \n SCI_CLEARDOCUMENTSTYLE zeroes all style bytes, ensures all\n lines are shown and deletes all folding information.\n
    • \n
  • \n On Windows, auto-completion lists are visually outdented rather than indented.\n
    • \n
  • \n Close all command in SciTE.\n
    • \n
  • \n On Windows multiple files can be dragged into SciTE.\n
    • \n
  • \n When saving a file, the SciTE option save.deletes.first deletes it before doing the save.\n This allows saving with a different capitalization on Windows.\n
    • \n
  • \n When use tabs option is off pressing the tab key inserts spaces.\n
    • \n
  • \n Bug in indicators leading to extra line drawn fixed.\n
    • \n
\n

\n Release 1.28\n

\n
    \n
  • \n Released on 27 June 2000.\n
    • \n
  • \n Fixes crash in indentation guides when indent size set to 0.\n
    • \n
  • \n Fixes to installation on GTK+/Linux. User properties file on GTK+ has a dot at front of name:\n .SciTEUser.properties. Global properties file location configurable at compile time\n defaulting to $prefix/share/scite. $prefix determined from Gnome if present else its\n /usr/local and can be overridden by installer. Gnome menu integration performed in\n make install if Gnome present.\n
    • \n
\n

\n Release 1.27\n

\n
    \n
  • \n Released on 23 June 2000.\n
    • \n
  • \n Indentation guides. View whitespace mode may be set to not display whitespace\n\t in indentation.\n
    • \n
  • \n Set methods have corresponding gets for UndoCollection, BufferedDraw,\n\tCodePage, UsePalette, ReadOnly, CaretFore, and ModEventMask.\n
    • \n
  • \n Caret is continuously on rather than blinking while typing or holding down\n\tdelete or backspace. And is now always shown if non blinking when focused on GTK+.\n
    • \n
  • \n Bug fixed in SciTE with file extension comparison now done in case insensitive way.\n
    • \n
  • \n Bugs fixed in SciTE's file path handling on Windows.\n
    • \n
  • \n Bug fixed with preprocessor '#' last visible character causing hang.\n
    • \n
\n

\n Release 1.26\n

\n
    \n
  • \n Released on 13 June 2000.\n
    • \n
  • \n Support for the Lua language in both Scintilla and SciTE.\n
    • \n
  • \n Multiple buffers may be open in SciTE.\n
    • \n
  • \n Each style may have a character set configured. This may determine\n\tthe characters that are displayed by the style.\n
    • \n
  • \n In the C++ lexer, lexing of preprocessor source may either treat it all as being in\n\t the preprocessor class or only the initial # and preprocessor command word as\n\t being in the preprocessor class.\n
    • \n
  • \n Scintilla provides SCI_CREATEDOCUMENT, SCI_ADDREFDOCUMENT, and\n\tSCI_RELEASEDOCUMENT to make it easier for a container to deal with multiple\n\tdocuments.\n
    • \n
  • \n GTK+ specific definitions in Scintilla.h were removed to ScintillaWidget.h. All GTK+ clients will need to\n\t#include \"ScintillaWidget.h\".\n
    • \n
  • \n For GTK+, tools can be executed in the background by setting subsystem to 2.\n
    • \n
  • \n Keys in the properties files are now case sensitive. This leads to a performance increase.\n
    • \n
  • \n Menu to choose which lexer to use on a file.\n
    • \n
  • \n Tab size dialog on Windows.\n
    • \n
  • \n File dialogs enlarged on GTK+.\n
    • \n
  • \n Match Brace command bound to Ctrl+E on both platforms with Ctrl+] a synonym on Windows.\n Ctrl+Shift+E is select to matching brace. Brace matching tries to match to either the inside or the\n outside, depending on whether the cursor is inside or outside the braces initially.\n\tView End of Line bound to Ctrl+Shift+O.\n
    • \n
  • \n The Home key may be bound to move the caret to either the start of the line or the start of the\n text on the line.\n
    • \n
  • \n Visual C++ project file for SciTE.\n
    • \n
  • \n Bug fixed with current x location after Tab key.\n
    • \n
  • \n Bug fixed with hiding fold margin by setting fold.margin.width to 0.\n
    • \n
  • \n Bugs fixed with file name confusion on Windows when long and short names used, or different capitalizations,\n\tor relative paths.\n
    • \n
\n

\n Release 1.25\n

\n
    \n
  • \n Released on 9 May 2000.\n
    • \n
  • \n Some Unicode support on Windows. Treats buffer and API as UTF-8 and displays\n\tthrough UCS-2 of Windows.\n
    • \n
  • \n Automatic indentation. Indentation size can be different to tab size.\n
    • \n
  • \n Tool bar.\n
    • \n
  • \n Status bar now on Windows as well as GTK+.\n
    • \n
  • \n Input fields in Find and Replace dialogs now have history on both Windows and\n\tGTK+.\n
    • \n
  • \n Auto completion list items may be separated by a chosen character to allow spaces\n\tin items. The selected item may be changed through the API.\n
    • \n
  • \n Horizontal scrollbar can be turned off.\n
    • \n
  • \n Property to remove trailing spaces when saving file.\n
    • \n
  • \n On Windows, changed font size calculation to be more compatible with\n\tother applications.\n
    • \n
  • \n On GTK+, SciTE's global properties files are looked for in the directory specified in the\n\tSCITE_HOME environment variable if it is set. This allows hiding in a dot directory.\n
    • \n
  • \n Keyword lists in SciTE updated for JavaScript to include those destined to be used in\n\tthe future. IDL includes XPIDL keywords as well as MSIDL keywords.\n
    • \n
  • \n Zoom level can be set and queried through API.\n
    • \n
  • \n New notification sent before insertions and deletions.\n
    • \n
  • \n LaTeX lexer.\n
    • \n
  • \n Fixes to folding including when deletions and additions are performed.\n
    • \n
  • \n Fix for crash with very long lines.\n
    • \n
  • \n Fix to affect all of rectangular selections with deletion and case changing.\n
    • \n
  • \n Removed non-working messages that had been included only for Richedit compatibility.\n
    • \n
\n

\n Release 1.24\n

\n
    \n
  • \n Released on 29 March 2000.\n
    • \n
  • \n Added lexing of IDL based on C++ lexer with extra UUID lexical class.\n
    • \n
  • \n Functions and associated keys for Line Delete, Line Cut, Line Transpose,\n\tSelection Lower Case and Selection Upper Case.\n
    • \n
  • \n Property setting for SciTE, eol.mode, chooses initial state of line end characters.\n
    • \n
  • \n Fixed bugs in undo history with small almost-contiguous changes being incorrectly coalesced.\n
    • \n
  • \n Fixed bugs with incorrect expansion of ContractionState data structures causing crash.\n
    • \n
  • \n Fixed bugs relating to null fonts.\n
    • \n
  • \n Fixed bugs where recolourization was not done sometimes when required.\n
    • \n
  • \n Fixed compilation problems with SVector.h.\n
    • \n
  • \n Fixed bad setting of fold points in Python.\n
    • \n
\n

\n Release 1.23\n

\n
    \n
  • \n Released on 21 March 2000.\n
    • \n
  • \n Directory structure to separate on basis of product (Scintilla, SciTE, DMApp)\n\tand environment (Cross-platform, Win32, GTK+).\n
    • \n
  • \n Download packaging to allow download of the source or platform dependent executables.\n
    • \n
  • \n Source code now available from CVS at SourceForge.\n
    • \n
  • \n Very simple Windows-only demonstration application DMApp is available from cvs as dmapp.\n
    • \n
  • \n Lexing functionality may optionally be included in Scintilla rather than be provided by\n the container.\n
    • \n
  • \n Set of lexers included is determined at link time by defining which of the Lex* object files\n\tare linked in.\n
    • \n
  • \n On Windows, the SciLexer.DLL extends Scintilla.DLL with the standard lexers.\n
    • \n
  • \n Enhanced HTML lexer styles embedded VBScript and Python.\n\tASP segments are styled and ASP scripts in JavaScript, VBScript and Python are styled.\n
    • \n
  • \n PLSQL and PHP supported.\n
    • \n
  • \n Maximum number of lexical states extended to 128.\n
    • \n
  • \n Lexers may store per line parse state for multiple line features such as ASP script language choice.\n
    • \n
  • \n Lexing API simplified.\n
    • \n
  • \n Project file for Visual C++.\n
    • \n
  • \n Can now cycle through all recent files with Ctrl+Tab in SciTE.\n
    • \n
  • \n Bookmarks in SciTE.\n
    • \n
  • \n Drag and drop copy works when dragging to the edge of the selection.\n
    • \n
  • \n Fixed bug with value sizes in properties file.\n
    • \n
  • \n Fixed bug with last line in properties file not being used.\n
    • \n
  • \n Bug with multiple views of one document fixed.\n
    • \n
  • \n Keypad now works on GTK+.\n
    • \n
\n

\n Release 1.22\n

\n
    \n
  • \n Released on 27 February 2000.\n
    • \n
  • \n wxWindows platform defined.\n\tImplementation for wxWindows will be available separately\n\tfrom main Scintilla distribution.\n
    • \n
  • \n Line folding in Scintilla.\n
    • \n
  • \n SciTE performs syntax directed folding for C/C++/Java/JavaScript and for Python.\n
    • \n
  • \n Optional macro recording support.\n
    • \n
  • \n User properties file (SciTEUser.properties) allows for customization by the user\n\tthat is not overwritten with each installation of SciTE.\n
    • \n
  • \n Python lexer detects and highlights inconsistent indentation.\n
    • \n
  • \n Margin API made more orthogonal. SCI_SETMARGINWIDTH and SCI_SETLINENUMBERWIDTH\n are deprecated in favour of this new API.\n
    • \n
  • \n Margins may be made sensitive to forward mouse click events to container.\n
    • \n
  • \n SQL lexer and styles included.\n
    • \n
  • \n Perl lexer handles regular expressions better.\n
    • \n
  • \n Caret policy determines how closely caret is tracked by visible area.\n
    • \n
  • \n New marker shapes: arrow pointing down, plus and minus.\n
    • \n
  • \n Optionally display full path in title rather than just file name.\n
    • \n
  • \n Container is notified when Scintilla gains or loses focus.\n
    • \n
  • \n SciTE handles focus in a more standard way and applies the main\n\tedit commands to the focused pane.\n
    • \n
  • \n Container is notified when Scintilla determines that a line needs to be made visible.\n
    • \n
  • \n Document watchers receive notification when document about to be deleted.\n
    • \n
  • \n Document interface allows access to list of watchers.\n
    • \n
  • \n Line end determined correctly for lines ending with only a '\\n'.\n
    • \n
  • \n Search variant that searches form current selection and sets selection.\n
    • \n
  • \n SciTE understands format of diagnostic messages from WScript.\n
    • \n
  • \n SciTE remembers top line of window for each file in MRU list so switching to a recent file\n\tis more likely to show the same text as when the file was previously visible.\n
    • \n
  • \n Document reference count now initialized correctly.\n
    • \n
  • \n Setting a null document pointer creates an empty document.\n
    • \n
  • \n WM_GETTEXT can no longer overrun buffer.\n
    • \n
  • \n Polygon drawing bug fixed on GTK+.\n
    • \n
  • \n Java and JavaScript lexers merged into C++ lexer.\n
    • \n
  • \n C++ lexer indicates unterminated strings by colouring the end of the line\n\trather than changing the rest of the file to string style. This is less\n\tobtrusive and helps the folding.\n
    • \n
\n

\n Release 1.21\n

\n
    \n
  • \n Released on 2 February 2000.\n
    • \n
  • \n Blank margins on left and right side of text.\n
    • \n
  • \n SCN_CHECKBRACE renamed SCN_UPDATEUI and made more efficient.\n
    • \n
  • \n SciTE source code refactored into platform independent and platform specific classes.\n
    • \n
  • \n XML and Perl subset lexers in SciTE.\n
    • \n
  • \n Large improvement to lexing speed.\n
    • \n
  • \n A new subsystem, 2, allows use of ShellExec on Windows.\n
    • \n
  • \n Borland compatible makefile.\n
    • \n
  • \n Status bar showing caret position in GTK+ version of SciTE.\n
    • \n
  • \n Bug fixes to selection drawing when part of selection outside window, mouse release over\n scroll bars, and scroll positioning after deletion.\n
    • \n
\n

\n Release 1.2\n

\n
    \n
  • \n Released on 21 January 2000.\n
    • \n
  • \n Multiple views of one document.\n
    • \n
  • \n Rectangular selection, cut, copy, paste, drag and drop.\n
    • \n
  • \n Long line indication.\n
    • \n
  • \n Reverse searching\n
    • \n
  • \n Line end conversion.\n
    • \n
  • \n Generic autocompletion and calltips in SciTE.\n
    • \n
  • \n Call tip background colour can be set.\n
    • \n
  • \n SCI_MARKERPREV for moving to a previous marker.\n
    • \n
  • \n Caret kept more within window where possible.\n
    • \n
\n

\n Release 1.15\n

\n
    \n
  • \n Released on 15 December 1999.\n
    • \n
  • \n Brace highlighting and badlighting (for mismatched braces).\n
    • \n
  • \n Visible line ends.\n
    • \n
  • \n Multiple line call tips.\n
    • \n
  • \n Printing now works from SciTE on Windows.\n
    • \n
  • \n SciTE has a global \"*\" lexer style that is used as the basis for all the lexers' styles.\n
    • \n
  • \n Fixes some warnings on GTK+ 1.2.6.\n
    • \n
  • \n Better handling of modal dialogs on GTK+.\n
    • \n
  • \n Resize handle drawn on pane splitter in SciTE on GTK+ so it looks more like a regular GTK+\n *paned widget.\n
    • \n
  • \n SciTE does not place window origin offscreen if no properties file found on GTK+.\n
    • \n
  • \n File open filter remembered in SciTE on Windows.\n
    • \n
  • \n New mechanism using style numbers 32 to 36 standardizes the setting of styles for brace\n highlighting, brace badlighting, line numbers, control characters and the default style.\n
    • \n
  • \n Old messages SCI_SETFORE .. SCI_SETFONT have been replaced by the default style 32. The old\n messages are deprecated and will disappear in a future version.\n
    • \n
\n

\n Release 1.14\n

\n
    \n
  • \n Released on 20 November 1999.\n
    • \n
  • \n Fixes a scrolling bug reported on GTK+.\n
    • \n
\n

\n Release 1.13\n

\n
    \n
  • \n Released on 18 November 1999.\n
    • \n
  • \n Fixes compilation problems with the mingw32 GCC 2.95.2 on Windows.\n
    • \n
  • \n Control characters are now visible.\n
    • \n
  • \n Performance has improved, particularly for scrolling.\n
    • \n
  • \n Windows RichEdit emulation is more accurate. This may break client code that uses these\n messages: EM_GETLINE, EM_GETLINECOUNT, EM_EXGETSEL, EM_EXSETSEL, EM_EXLINEFROMCHAR,\n EM_LINELENGTH, EM_LINEINDEX, EM_CHARFROMPOS, EM_POSFROMCHAR, and EM_GETTEXTRANGE.\n
    • \n
  • \n Menus rearranged and accelerator keys set for all static items.\n
    • \n
  • \n Placement of space indicators in view whitespace mode is more accurate with some fonts.\n
    • \n
\n

\n Release 1.12\n

\n
    \n
  • \n Released on 9 November 1999.\n
    • \n
  • \n Packaging error in 1.11 meant that the compilation error was not fixed in that release.\n Linux/GTK+ should compile with GCC 2.95 this time.\n
    • \n
\n

\n Release 1.11\n

\n
    \n
  • \n Released on 7 November 1999.\n
    • \n
  • \n Fixed a compilation bug in ScintillaGTK.cxx.\n
    • \n
  • \n Added a README file to explain how to build.\n
    • \n
  • \n GTK+/Linux downloads now include documentation.\n
    • \n
  • \n Binary only Sc1.EXE one file download for Windows.\n
    • \n
\n

\n Release 1.1\n

\n
    \n
  • \n Released on 6 November 1999.\n
    • \n
  • \n Major restructuring for better modularity and platform independence.\n
    • \n
  • \n Inter-application drag and drop.\n
    • \n
  • \n Printing support in Scintilla on Windows.\n
    • \n
  • \n Styles can select colouring to end of line. This can be used when a file contains more than\n one language to differentiate between the areas in each language. An example is the HTML +\n JavaScript styling in SciTE.\n
    • \n
  • \n Actions can be grouped in the undo stack, so they will be undone together. This grouping is\n hierarchical so higher level actions such as replace all can be undone in one go. Call to\n discover whether there are any actions to redo.\n
    • \n
  • \n The set of characters that define words can be changed.\n
    • \n
  • \n Markers now have identifiers and can be found and deleted by their identifier. The empty\n marker type can be used to make a marker that is invisible and which is only used to trace\n where a particular line moves to.\n
    • \n
  • \n Double click notification.\n
    • \n
  • \n HTML styling in SciTE also styles embedded JavaScript.\n
    • \n
  • \n Additional tool commands can be added to SciTE.\n
    • \n
  • \n SciTE option to allow reloading if changed upon application activation and saving on\n application deactivation. Not yet working on GTK+ version.\n
    • \n
  • \n Entry fields in search dialogs remember last 10 user entries. Not working in all cases in\n Windows version.\n
    • \n
  • \n SciTE can save a styled copy of the current file in HTML format. As SciTE does not yet\n support printing, this can be used to print a file by then using a browser to print the\n HTML file.\n
    • \n
\n

\n Release 1.02\n

\n
    \n
  • \n Released on 1 October 1999.\n
    • \n
  • \n GTK+ version compiles with GCC 2.95.\n
    • \n
  • \n Properly deleting objects when window destroyed under GTK+.\n
    • \n
  • \n If the selection is not empty backspace deletes the selection.\n
    • \n
  • \n Some X style middle mouse button handling for copying the primary selection to and from\n Scintilla. Does not work in all cases.\n
    • \n
  • \n HTML styling in SciTE.\n
    • \n
  • \n Stopped dirty flag being set in SciTE when results pane modified.\n
    • \n
\n

\n Release 1.01\n

\n
    \n
  • \n Released on 28 September 1999.\n
    • \n
  • \n Better DBCS support on Windows including IME.\n
    • \n
  • \n Wheel mouse support for scrolling and zooming on Windows. Zooming with Ctrl+KeypadPlus and\n Ctrl+KeypadMinus.\n
    • \n
  • \n Performance improvements especially on GTK+.\n
    • \n
  • \n Caret blinking and settable colour on both GTK+ and Windows.\n
    • \n
  • \n Drag and drop within a Scintilla window. On Windows, files can be dragged into SciTE.\n
    • \n
\n

\n Release 1.0\n

\n
    \n
  • \n Released on 17 May 1999.\n
    • \n
  • \n Changed name of \"Tide\" to \"SciTE\" to avoid clash with a TCL based IDE. \"SciTE\" is a\n SCIntilla based Text Editor and is Latin meaning something like \"understanding in a neat\n way\" and is also an Old English version of the word \"shit\".\n
    • \n
  • \n There is a SCI_AUTOCSTOPS message for defining a string of characters that will stop\n autocompletion mode. Autocompletion mode is cancelled when any cursor movement occurs apart\n from backspace.\n
    • \n
  • \n GTK+ version now splits horizontally as well as vertically and all dialogs cancel when the\n escape key is pressed.\n
    • \n
\n

\n Beta release 0.93\n

\n
    \n
  • \n Released on 12 May 1999.\n
    • \n
  • \n A bit more robust than 0.92 and supports SCI_MARKERNEXT message.\n
    • \n
\n

\n Beta release 0.92\n

\n
    \n
  • \n Released on 11 May 1999.\n
    • \n
  • \n GTK+ version now contains all features of Windows version with some very small differences.\n Executing programs works much better now.\n
    • \n
  • \n New palette code to allow more colours to be displayed in 256 colour screen modes. A line\n number column can be displayed to the left of the selection margin.\n
    • \n
  • \n The code that maps from line numbers to text positions and back has been completely\n rewritten to be faster, and to allow markers to move with the text.\n
    • \n
\n

\n Beta release 0.91\n

\n
    \n
  • \n Released on 30 April 1999, containing fixes to text measuring to make Scintilla work better\n with bitmap fonts. Also some small fixes to make compiling work with Visual C++.\n
    • \n
\n

\n Beta release 0.90\n

\n
    \n
  • \n Released on 29 April 1999, containing working GTK+/Linux version.\n
    • \n
  • \n The Java, C++ and Python lexers recognize operators as distinct from default allowing them\n to be highlighted.\n
    • \n
\n

\n Beta release 0.82\n

\n
    \n
  • \n Released on 1 April 1999, to fix a problem with handling the Enter key in PythonWin. Also\n fixes some problems with cmd key mapping.\n
    • \n
\n

\n Beta release 0.81\n

\n
    \n
  • \n Released on 30th March 1999, containing bug fixes and a few more features.\n
    • \n
  • \n Static linking supported and Tidy.EXE, a statically linked version of Tide.EXE. Changes to\n compiler flags in the makefiles to optimize for size.\n
    • \n
  • \n Scintilla supports a 'savepoint' in the undo stack which can be set by the container when\n the document is saved. Notifications are sent to the container when the savepoint is\n entered or left, allowing the container to display a dirty indicator and change its\n menus.\n
    • \n
  • \n When Scintilla is set to read-only mode, a notification is sent to the container should the\n user try to edit the document. This can be used to check the document out of a version\n control system.\n
    • \n
  • \n There is an API for setting the appearance of indicators.\n
    • \n
  • \n The keyboard mapping can be redefined or removed so it can be implemented completely by the\n container. All of the keyboard commands are now commands which can be sent by the\n container.\n
    • \n
  • \n A home command like Visual C++ with one hit going to the start of the text on the line and\n the next going to the left margin is available. I do not personally like this but my\n fingers have become trained to it by much repetition.\n
    • \n
  • \n SCI_MARKERDELETEALL has an argument in wParam which is the number of the type marker to\n delete with -1 performing the old action of removing all marker types.\n
    • \n
  • \n Tide now understands both the file name and line numbers in error messages in most cases.\n
    • \n
  • \n Tide remembers the current lines of files in the recently used list.\n
    • \n
  • \n Tide has a Find in Files command.\n
    • \n
\n

\n Beta release 0.80\n

\n
    \n
  • \n This was the first public release on 14th March 1999, containing a mostly working Win32\n Scintilla DLL and Tide EXE.\n
    • \n
\n

\n Beta releases of SciTE were called Tide\n

\n \n\n" }, { "path": "examples/CheckLexilla/CheckLexilla.c", "content": "// Lexilla lexer library use example\n/** @file CheckLexilla.c\n ** Check that Lexilla.h works.\n **/\n// Copyright 2021 by Neil Hodgson \n// This file is in the public domain.\n// If the public domain is not possible in your location then it can also be used under the same\n// license as Scintilla. https://www.scintilla.org/License.txt\n\n/* Build and run\n\n Win32\ngcc CheckLexilla.c -I ../../include -o CheckLexilla\nCheckLexilla\nCheckLexilla ../SimpleLexer/SimpleLexer.dll\n\n Win32 Visual C++\ncl CheckLexilla.c -I ../../include -Fe: CheckLexilla\nCheckLexilla\nCheckLexilla ../SimpleLexer/SimpleLexer.dll\n\n macOS\nclang CheckLexilla.c -I ../../include -o CheckLexilla\n./CheckLexilla\n./CheckLexilla ../SimpleLexer/SimpleLexer.dylib\n\n Linux\ngcc CheckLexilla.c -I ../../include -ldl -o CheckLexilla\n./CheckLexilla\n./CheckLexilla ../SimpleLexer/SimpleLexer.so\n\nWhile principally meant for compilation as C to act as an example of using Lexilla\nfrom C it can also be built as C++.\n\nWarnings are intentionally shown for the deprecated typedef LexerNameFromIDFn when compiled with\nGCC or Clang or as C++.\n\n*/\n\n#include \n\n#if defined(_WIN32)\n#include \n#else\n#include \n#endif\n\n#if defined(__cplusplus)\n#include \"ILexer.h\"\n#endif\n\n#include \"Lexilla.h\"\n\n#if defined(__cplusplus)\nusing namespace Lexilla;\n#endif\n\n#if defined(_WIN32)\ntypedef FARPROC Function;\ntypedef HMODULE Module;\n#else\ntypedef void *Function;\ntypedef void *Module;\n#endif\n\nstatic Function FindSymbol(Module m, const char *symbol) {\n#if defined(_WIN32)\n\treturn GetProcAddress(m, symbol);\n#else\n\treturn dlsym(m, symbol);\n#endif\n}\n\nint main(int argc, char *argv[]) {\n\tconst char szLexillaPath[] = \"../../bin/\" LEXILLA_LIB LEXILLA_EXTENSION;\n\tconst char *libPath = szLexillaPath;\n\tif (argc > 1) {\n\t\tlibPath = argv[1];\n\t}\n#if defined(_WIN32)\n\tModule lexillaLibrary = LoadLibraryA(libPath);\n#else\n\tModule lexillaLibrary = dlopen(libPath, RTLD_LAZY);\n#endif\n\n\tprintf(\"Opened %s -> %p.\\n\", libPath, lexillaLibrary);\n\tif (lexillaLibrary) {\n\t\tGetLexerCountFn lexerCount = (GetLexerCountFn)FindSymbol(lexillaLibrary, LEXILLA_GETLEXERCOUNT);\n\t\tif (lexerCount) {\n\t\t\tint nLexers = lexerCount();\n\t\t\tprintf(\"There are %d lexers.\\n\", nLexers);\n\t\t\tGetLexerNameFn lexerName = (GetLexerNameFn)FindSymbol(lexillaLibrary, LEXILLA_GETLEXERNAME);\n\t\t\tfor (int i = 0; i < nLexers; i++) {\n\t\t\t\tchar name[100] = \"\";\n\t\t\t\tlexerName(i, name, sizeof(name));\n\t\t\t\tprintf(\"%s \", name);\n\t\t\t}\n\t\t\tprintf(\"\\n\");\n\n\t\t\tGetLexerFactoryFn lexerFactory = (GetLexerFactoryFn)FindSymbol(lexillaLibrary, LEXILLA_GETLEXERFACTORY);\n\t\t\tLexerFactoryFunction lexerFactory4 = lexerFactory(4);\t// 4th entry is \"as\" which is an object lexer so works\n\t\t\tprintf(\"Lexer factory 4 -> %p.\\n\", lexerFactory4);\n\n\t\t\tCreateLexerFn lexerCreate = (CreateLexerFn)FindSymbol(lexillaLibrary, LEXILLA_CREATELEXER);\n\t\t\tILexer5 *lexerCpp = lexerCreate(\"cpp\");\n\t\t\tprintf(\"Created cpp lexer -> %p.\\n\", lexerCpp);\n\n\t\t\tLexerNameFromIDFn lexerNameFromID = (LexerNameFromIDFn)FindSymbol(lexillaLibrary, LEXILLA_LEXERNAMEFROMID);\n\t\t\tif (lexerNameFromID) {\n\t\t\t\tconst char *lexerNameCpp = lexerNameFromID(3);\t// SCLEX_CPP=3\n\t\t\t\tif (lexerNameCpp) {\n\t\t\t\t\tprintf(\"Lexer name 3 -> %s.\\n\", lexerNameCpp);\n\t\t\t\t} else {\n\t\t\t\t\tprintf(\"Lexer name 3 not available.\\n\");\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\tprintf(\"Lexer name from ID not supported.\\n\");\n\t\t\t}\n\n\t\t\tGetLibraryPropertyNamesFn libraryProperties = (GetLibraryPropertyNamesFn)FindSymbol(lexillaLibrary, LEXILLA_GETLIBRARYPROPERTYNAMES);\n\t\t\tif (libraryProperties) {\n\t\t\t\tconst char *names = libraryProperties();\n\t\t\t\tprintf(\"Property names '%s'.\\n\", names);\n\t\t\t} else {\n\t\t\t\tprintf(\"Property names not supported.\\n\");\n\t\t\t}\n\n\t\t\tSetLibraryPropertyFn librarySetProperty = (SetLibraryPropertyFn)FindSymbol(lexillaLibrary, LEXILLA_SETLIBRARYPROPERTY);\n\t\t\tif (librarySetProperty) {\n\t\t\t\tlibrarySetProperty(\"key\", \"value\");\n\t\t\t} else {\n\t\t\t\tprintf(\"Set property not supported.\\n\");\n\t\t\t}\n\n\t\t\tGetNameSpaceFn libraryNameSpace = (GetLibraryPropertyNamesFn)FindSymbol(lexillaLibrary, LEXILLA_GETNAMESPACE);\n\t\t\tif (libraryNameSpace) {\n\t\t\t\tconst char *nameSpace = libraryNameSpace();\n\t\t\t\tprintf(\"Name space '%s'.\\n\", nameSpace);\n\t\t\t} else {\n\t\t\t\tprintf(\"Name space not supported.\\n\");\n\t\t\t}\n\t\t}\n\t}\n}\n" }, { "path": "examples/CheckLexilla/makefile", "content": ".PHONY: all check clean\n\nINCLUDES = -I ../../include\nEXE = $(if $(windir),CheckLexilla.exe,CheckLexilla)\n\nifdef windir\n\tRM = $(if $(wildcard $(dir $(SHELL))rm.exe), $(dir $(SHELL))rm.exe -f, del /q)\n\tCC = gcc\nelse\n\tLIBS += -ldl\nendif\n\nall: $(EXE)\n\ncheck: $(EXE)\n\t./$(EXE)\n\nclean:\n\t$(RM) $(EXE)\n\n$(EXE): *.c\n\t$(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) $^ $(LIBS) $(LDLIBS) -o $@\n" }, { "path": "examples/SimpleLexer/SimpleLexer.cxx", "content": "// A simple lexer\n/** @file SimpleLexer.cxx\n ** A lexer that follows the Lexilla protocol to allow it to be used from Lexilla clients like SciTE.\n ** The lexer applies alternating styles (0,1) to bytes of the text.\n **/\n// Copyright 2021 by Neil Hodgson \n// This file is in the public domain.\n// If the public domain is not possible in your location then it can also be used under the same\n// license as Scintilla. https://www.scintilla.org/License.txt\n\n// Windows/MSVC\n// cl -std:c++17 -EHsc -LD -I ../../../scintilla/include -I ../../include -I ../../lexlib SimpleLexer.cxx ../../lexlib/*.cxx\n\n// macOS/clang\n// clang++ -dynamiclib --std=c++17 -I ../../../scintilla/include -I ../../include -I ../../lexlib SimpleLexer.cxx ../../lexlib/*.cxx -o SimpleLexer.dylib\n\n// Linux/g++\n// g++ -fPIC -shared --std=c++17 -I ../../../scintilla/include -I ../../include -I ../../lexlib SimpleLexer.cxx ../../lexlib/*.cxx -o SimpleLexer.so\n\n/* It can be demonstrated in SciTE like this, substituting the actual shared library location as lexilla.path:\nlexilla.path=.;C:\\u\\hg\\lexilla\\examples\\SimpleLexer\\SimpleLexer.dll\nlexer.*.xx=simple\nstyle.simple.1=fore:#FF0000\n*/\n\n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n// Lexilla.h should not be included here as it declares statically linked functions without the __declspec( dllexport )\n\n#include \"WordList.h\"\n#include \"PropSetSimple.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"LexerBase.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nclass LexerSimple : public LexerBase {\npublic:\n LexerSimple() {\n }\n void SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override {\n try {\n\t\t\tAccessor astyler(pAccess, &props);\n\t\t\tif (length > 0) {\n\t\t\t\tastyler.StartAt(startPos);\n\t\t\t\tastyler.StartSegment(startPos);\n\t\t\t\tfor (unsigned int k=0; kSetErrorStatus(SC_STATUS_FAILURE);\n }\n }\n void SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override {\n }\n\n static ILexer5 *LexerFactorySimple() {\n try {\n return new LexerSimple();\n } catch (...) {\n // Should not throw into caller as may be compiled with different compiler or options\n return nullptr;\n }\n }\n};\n\n#if defined(_WIN32)\n#define EXPORT_FUNCTION __declspec(dllexport)\n#define CALLING_CONVENTION __stdcall\n#else\n#define EXPORT_FUNCTION __attribute__((visibility(\"default\")))\n#define CALLING_CONVENTION\n#endif\n\nstatic const char *lexerName = \"simple\";\n\nextern \"C\" {\n\nEXPORT_FUNCTION int CALLING_CONVENTION GetLexerCount() {\n return 1;\n}\n\nEXPORT_FUNCTION void CALLING_CONVENTION GetLexerName(unsigned int index, char *name, int buflength) {\n *name = 0;\n if ((index == 0) && (buflength > static_cast(strlen(lexerName)))) {\n strcpy(name, lexerName);\n }\n}\n\nEXPORT_FUNCTION LexerFactoryFunction CALLING_CONVENTION GetLexerFactory(unsigned int index) {\n if (index == 0)\n return LexerSimple::LexerFactorySimple;\n else\n return 0;\n}\n\nEXPORT_FUNCTION Scintilla::ILexer5* CALLING_CONVENTION CreateLexer(const char *name) {\n\tif (0 == strcmp(name, lexerName)) {\n\t\treturn LexerSimple::LexerFactorySimple();\n\t}\n\treturn nullptr;\n}\n\nEXPORT_FUNCTION const char * CALLING_CONVENTION GetNameSpace() {\n\treturn \"example\";\n}\n\n}\n" }, { "path": "examples/SimpleLexer/makefile", "content": ".PHONY: all check clean\n\nINCLUDES = -I ../../../scintilla/include -I ../../include -I ../../lexlib\n\nBASE_FLAGS += --std=c++17\n\nifdef windir\n SHAREDEXTENSION = dll\nelse\n ifeq ($(shell uname),Darwin)\n SHAREDEXTENSION = dylib\n BASE_FLAGS += -arch arm64 -arch x86_64\n LINK_FLAGS += -dynamiclib\n else\n BASE_FLAGS += -fPIC\n SHAREDEXTENSION = so\n endif\n BASE_FLAGS += -fvisibility=hidden\nendif\n\nifdef windir\n\tRM = $(if $(wildcard $(dir $(SHELL))rm.exe), $(dir $(SHELL))rm.exe -f, del /q)\n\tCXX = g++\nendif\n\nLIBRARY = SimpleLexer.$(SHAREDEXTENSION)\n\nvpath %.cxx ../../lexlib\n \nLEXLIB_SOURCES := $(sort $(notdir $(wildcard ../../lexlib/*.cxx)))\nLEXLIB = $(LEXLIB_SOURCES:.cxx=.o)\n\n%.o: %.cxx\n\t$(CXX) $(INCLUDES) $(BASE_FLAGS) $(CPPFLAGS) $(CXXFLAGS) -c $< -o $@\n\nall: $(LIBRARY)\n\n# make check requires CheckLexilla to have already been built\ncheck: $(LIBRARY)\n\t../CheckLexilla/CheckLexilla ./$(LIBRARY)\n\nclean:\n\t$(RM) *.o *obj *.lib *.exp $(LIBRARY)\n\n$(LIBRARY): $(LEXLIB) *.cxx\n\t$(CXX) $(INCLUDES) $(LINK_FLAGS) $(BASE_FLAGS) -shared $(CPPFLAGS) $(CXXFLAGS) $^ $(LIBS) $(LDLIBS) -o $@\n" }, { "path": "include/LexicalStyles.iface", "content": "## This file defines the interface to Lexilla\n\n## Copyright 2000-2020 by Neil Hodgson \n## The License.txt file describes the conditions under which this software may be distributed.\n\n## Similar file structure as Scintilla.iface but only contains constants.\n\ncat Default\n\n################################################\n# For SciLexer.h\nenu Lexer=SCLEX_\nval SCLEX_CONTAINER=0\nval SCLEX_NULL=1\nval SCLEX_PYTHON=2\nval SCLEX_CPP=3\nval SCLEX_HTML=4\nval SCLEX_XML=5\nval SCLEX_PERL=6\nval SCLEX_SQL=7\nval SCLEX_VB=8\nval SCLEX_PROPERTIES=9\nval SCLEX_ERRORLIST=10\nval SCLEX_MAKEFILE=11\nval SCLEX_BATCH=12\nval SCLEX_XCODE=13\nval SCLEX_LATEX=14\nval SCLEX_LUA=15\nval SCLEX_DIFF=16\nval SCLEX_CONF=17\nval SCLEX_PASCAL=18\nval SCLEX_AVE=19\nval SCLEX_ADA=20\nval SCLEX_LISP=21\nval SCLEX_RUBY=22\nval SCLEX_EIFFEL=23\nval SCLEX_EIFFELKW=24\nval SCLEX_TCL=25\nval SCLEX_NNCRONTAB=26\nval SCLEX_BULLANT=27\nval SCLEX_VBSCRIPT=28\nval SCLEX_BAAN=31\nval SCLEX_MATLAB=32\nval SCLEX_SCRIPTOL=33\nval SCLEX_ASM=34\nval SCLEX_CPPNOCASE=35\nval SCLEX_FORTRAN=36\nval SCLEX_F77=37\nval SCLEX_CSS=38\nval SCLEX_POV=39\nval SCLEX_LOUT=40\nval SCLEX_ESCRIPT=41\nval SCLEX_PS=42\nval SCLEX_NSIS=43\nval SCLEX_MMIXAL=44\nval SCLEX_CLW=45\nval SCLEX_CLWNOCASE=46\nval SCLEX_LOT=47\nval SCLEX_YAML=48\nval SCLEX_TEX=49\nval SCLEX_METAPOST=50\nval SCLEX_POWERBASIC=51\nval SCLEX_FORTH=52\nval SCLEX_ERLANG=53\nval SCLEX_OCTAVE=54\nval SCLEX_MSSQL=55\nval SCLEX_VERILOG=56\nval SCLEX_KIX=57\nval SCLEX_GUI4CLI=58\nval SCLEX_SPECMAN=59\nval SCLEX_AU3=60\nval SCLEX_APDL=61\nval SCLEX_BASH=62\nval SCLEX_ASN1=63\nval SCLEX_VHDL=64\nval SCLEX_CAML=65\nval SCLEX_BLITZBASIC=66\nval SCLEX_PUREBASIC=67\nval SCLEX_HASKELL=68\nval SCLEX_PHPSCRIPT=69\nval SCLEX_TADS3=70\nval SCLEX_REBOL=71\nval SCLEX_SMALLTALK=72\nval SCLEX_FLAGSHIP=73\nval SCLEX_CSOUND=74\nval SCLEX_FREEBASIC=75\nval SCLEX_INNOSETUP=76\nval SCLEX_OPAL=77\nval SCLEX_SPICE=78\nval SCLEX_D=79\nval SCLEX_CMAKE=80\nval SCLEX_GAP=81\nval SCLEX_PLM=82\nval SCLEX_PROGRESS=83\nval SCLEX_ABAQUS=84\nval SCLEX_ASYMPTOTE=85\nval SCLEX_R=86\nval SCLEX_MAGIK=87\nval SCLEX_POWERSHELL=88\nval SCLEX_MYSQL=89\nval SCLEX_PO=90\nval SCLEX_TAL=91\nval SCLEX_COBOL=92\nval SCLEX_TACL=93\nval SCLEX_SORCUS=94\nval SCLEX_POWERPRO=95\nval SCLEX_NIMROD=96\nval SCLEX_SML=97\nval SCLEX_MARKDOWN=98\nval SCLEX_TXT2TAGS=99\nval SCLEX_A68K=100\nval SCLEX_MODULA=101\nval SCLEX_COFFEESCRIPT=102\nval SCLEX_TCMD=103\nval SCLEX_AVS=104\nval SCLEX_ECL=105\nval SCLEX_OSCRIPT=106\nval SCLEX_VISUALPROLOG=107\nval SCLEX_LITERATEHASKELL=108\nval SCLEX_STTXT=109\nval SCLEX_KVIRC=110\nval SCLEX_RUST=111\nval SCLEX_DMAP=112\nval SCLEX_AS=113\nval SCLEX_DMIS=114\nval SCLEX_REGISTRY=115\nval SCLEX_BIBTEX=116\nval SCLEX_SREC=117\nval SCLEX_IHEX=118\nval SCLEX_TEHEX=119\nval SCLEX_JSON=120\nval SCLEX_EDIFACT=121\nval SCLEX_INDENT=122\nval SCLEX_MAXIMA=123\nval SCLEX_STATA=124\nval SCLEX_SAS=125\nval SCLEX_NIM=126\nval SCLEX_CIL=127\nval SCLEX_X12=128\nval SCLEX_DATAFLEX=129\nval SCLEX_HOLLYWOOD=130\nval SCLEX_RAKU=131\nval SCLEX_FSHARP=132\nval SCLEX_JULIA=133\nval SCLEX_ASCIIDOC=134\nval SCLEX_GDSCRIPT=135\nval SCLEX_TOML=136\nval SCLEX_TROFF=137\nval SCLEX_DART=138\nval SCLEX_ZIG=139\nval SCLEX_NIX=140\nval SCLEX_SINEX=141\nval SCLEX_ESCSEQ=142\n\n# When a lexer specifies its language as SCLEX_AUTOMATIC it receives a\n# value assigned in sequence from SCLEX_AUTOMATIC+1.\nval SCLEX_AUTOMATIC=1000\n# Lexical states for SCLEX_PYTHON\nlex Python=SCLEX_PYTHON SCE_P_\nlex Nimrod=SCLEX_NIMROD SCE_P_\nval SCE_P_DEFAULT=0\nval SCE_P_COMMENTLINE=1\nval SCE_P_NUMBER=2\nval SCE_P_STRING=3\nval SCE_P_CHARACTER=4\nval SCE_P_WORD=5\nval SCE_P_TRIPLE=6\nval SCE_P_TRIPLEDOUBLE=7\nval SCE_P_CLASSNAME=8\nval SCE_P_DEFNAME=9\nval SCE_P_OPERATOR=10\nval SCE_P_IDENTIFIER=11\nval SCE_P_COMMENTBLOCK=12\nval SCE_P_STRINGEOL=13\nval SCE_P_WORD2=14\nval SCE_P_DECORATOR=15\nval SCE_P_FSTRING=16\nval SCE_P_FCHARACTER=17\nval SCE_P_FTRIPLE=18\nval SCE_P_FTRIPLEDOUBLE=19\nval SCE_P_ATTRIBUTE=20\n# Lexical states for SCLEX_CPP\n# Lexical states for SCLEX_BULLANT\n# Lexical states for SCLEX_TACL\n# Lexical states for SCLEX_TAL\nlex Cpp=SCLEX_CPP SCE_C_\nlex BullAnt=SCLEX_BULLANT SCE_C_\nlex TACL=SCLEX_TACL SCE_C_\nlex TAL=SCLEX_TAL SCE_C_\nval SCE_C_DEFAULT=0\nval SCE_C_COMMENT=1\nval SCE_C_COMMENTLINE=2\nval SCE_C_COMMENTDOC=3\nval SCE_C_NUMBER=4\nval SCE_C_WORD=5\nval SCE_C_STRING=6\nval SCE_C_CHARACTER=7\nval SCE_C_UUID=8\nval SCE_C_PREPROCESSOR=9\nval SCE_C_OPERATOR=10\nval SCE_C_IDENTIFIER=11\nval SCE_C_STRINGEOL=12\nval SCE_C_VERBATIM=13\nval SCE_C_REGEX=14\nval SCE_C_COMMENTLINEDOC=15\nval SCE_C_WORD2=16\nval SCE_C_COMMENTDOCKEYWORD=17\nval SCE_C_COMMENTDOCKEYWORDERROR=18\nval SCE_C_GLOBALCLASS=19\nval SCE_C_STRINGRAW=20\nval SCE_C_TRIPLEVERBATIM=21\nval SCE_C_HASHQUOTEDSTRING=22\nval SCE_C_PREPROCESSORCOMMENT=23\nval SCE_C_PREPROCESSORCOMMENTDOC=24\nval SCE_C_USERLITERAL=25\nval SCE_C_TASKMARKER=26\nval SCE_C_ESCAPESEQUENCE=27\n# Lexical states for SCLEX_COBOL\nlex COBOL=SCLEX_COBOL SCE_COBOL_\nval SCE_COBOL_DEFAULT=0\nval SCE_COBOL_COMMENT=1\nval SCE_COBOL_COMMENTLINE=2\nval SCE_COBOL_COMMENTDOC=3\nval SCE_COBOL_NUMBER=4\nval SCE_COBOL_WORD=5\nval SCE_COBOL_STRING=6\nval SCE_COBOL_CHARACTER=7\nval SCE_COBOL_WORD3=8\nval SCE_COBOL_PREPROCESSOR=9\nval SCE_COBOL_OPERATOR=10\nval SCE_COBOL_IDENTIFIER=11\nval SCE_COBOL_WORD2=16\n# Lexical states for SCLEX_D\nlex D=SCLEX_D SCE_D_\nval SCE_D_DEFAULT=0\nval SCE_D_COMMENT=1\nval SCE_D_COMMENTLINE=2\nval SCE_D_COMMENTDOC=3\nval SCE_D_COMMENTNESTED=4\nval SCE_D_NUMBER=5\nval SCE_D_WORD=6\nval SCE_D_WORD2=7\nval SCE_D_WORD3=8\nval SCE_D_TYPEDEF=9\nval SCE_D_STRING=10\nval SCE_D_STRINGEOL=11\nval SCE_D_CHARACTER=12\nval SCE_D_OPERATOR=13\nval SCE_D_IDENTIFIER=14\nval SCE_D_COMMENTLINEDOC=15\nval SCE_D_COMMENTDOCKEYWORD=16\nval SCE_D_COMMENTDOCKEYWORDERROR=17\nval SCE_D_STRINGB=18\nval SCE_D_STRINGR=19\nval SCE_D_WORD5=20\nval SCE_D_WORD6=21\nval SCE_D_WORD7=22\n# Lexical states for SCLEX_TCL\nlex TCL=SCLEX_TCL SCE_TCL_\nval SCE_TCL_DEFAULT=0\nval SCE_TCL_COMMENT=1\nval SCE_TCL_COMMENTLINE=2\nval SCE_TCL_NUMBER=3\nval SCE_TCL_WORD_IN_QUOTE=4\nval SCE_TCL_IN_QUOTE=5\nval SCE_TCL_OPERATOR=6\nval SCE_TCL_IDENTIFIER=7\nval SCE_TCL_SUBSTITUTION=8\nval SCE_TCL_SUB_BRACE=9\nval SCE_TCL_MODIFIER=10\nval SCE_TCL_EXPAND=11\nval SCE_TCL_WORD=12\nval SCE_TCL_WORD2=13\nval SCE_TCL_WORD3=14\nval SCE_TCL_WORD4=15\nval SCE_TCL_WORD5=16\nval SCE_TCL_WORD6=17\nval SCE_TCL_WORD7=18\nval SCE_TCL_WORD8=19\nval SCE_TCL_COMMENT_BOX=20\nval SCE_TCL_BLOCK_COMMENT=21\n# Lexical states for SCLEX_HTML, SCLEX_XML\nlex HTML=SCLEX_HTML SCE_H_ SCE_HJ_ SCE_HJA_ SCE_HB_ SCE_HBA_ SCE_HP_ SCE_HPHP_ SCE_HPA_\nlex XML=SCLEX_XML SCE_H_ SCE_HJ_ SCE_HJA_ SCE_HB_ SCE_HBA_ SCE_HP_ SCE_HPHP_ SCE_HPA_\nval SCE_H_DEFAULT=0\nval SCE_H_TAG=1\nval SCE_H_TAGUNKNOWN=2\nval SCE_H_ATTRIBUTE=3\nval SCE_H_ATTRIBUTEUNKNOWN=4\nval SCE_H_NUMBER=5\nval SCE_H_DOUBLESTRING=6\nval SCE_H_SINGLESTRING=7\nval SCE_H_OTHER=8\nval SCE_H_COMMENT=9\nval SCE_H_ENTITY=10\n# XML and ASP\nval SCE_H_TAGEND=11\nval SCE_H_XMLSTART=12\nval SCE_H_XMLEND=13\nval SCE_H_SCRIPT=14\nval SCE_H_ASP=15\nval SCE_H_ASPAT=16\nval SCE_H_CDATA=17\nval SCE_H_QUESTION=18\n# More HTML\nval SCE_H_VALUE=19\n# X-Code, ASP.NET, JSP\nval SCE_H_XCCOMMENT=20\n# SGML\nval SCE_H_SGML_DEFAULT=21\nval SCE_H_SGML_COMMAND=22\nval SCE_H_SGML_1ST_PARAM=23\nval SCE_H_SGML_DOUBLESTRING=24\nval SCE_H_SGML_SIMPLESTRING=25\nval SCE_H_SGML_ERROR=26\nval SCE_H_SGML_SPECIAL=27\nval SCE_H_SGML_ENTITY=28\nval SCE_H_SGML_COMMENT=29\nval SCE_H_SGML_1ST_PARAM_COMMENT=30\nval SCE_H_SGML_BLOCK_DEFAULT=31\n# Embedded Javascript\nval SCE_HJ_START=40\nval SCE_HJ_DEFAULT=41\nval SCE_HJ_COMMENT=42\nval SCE_HJ_COMMENTLINE=43\nval SCE_HJ_COMMENTDOC=44\nval SCE_HJ_NUMBER=45\nval SCE_HJ_WORD=46\nval SCE_HJ_KEYWORD=47\nval SCE_HJ_DOUBLESTRING=48\nval SCE_HJ_SINGLESTRING=49\nval SCE_HJ_SYMBOLS=50\nval SCE_HJ_STRINGEOL=51\nval SCE_HJ_REGEX=52\nval SCE_HJ_TEMPLATELITERAL=53\n# ASP Javascript\nval SCE_HJA_START=55\nval SCE_HJA_DEFAULT=56\nval SCE_HJA_COMMENT=57\nval SCE_HJA_COMMENTLINE=58\nval SCE_HJA_COMMENTDOC=59\nval SCE_HJA_NUMBER=60\nval SCE_HJA_WORD=61\nval SCE_HJA_KEYWORD=62\nval SCE_HJA_DOUBLESTRING=63\nval SCE_HJA_SINGLESTRING=64\nval SCE_HJA_SYMBOLS=65\nval SCE_HJA_STRINGEOL=66\nval SCE_HJA_REGEX=67\nval SCE_HJA_TEMPLATELITERAL=68\n# Embedded VBScript\nval SCE_HB_START=70\nval SCE_HB_DEFAULT=71\nval SCE_HB_COMMENTLINE=72\nval SCE_HB_NUMBER=73\nval SCE_HB_WORD=74\nval SCE_HB_STRING=75\nval SCE_HB_IDENTIFIER=76\nval SCE_HB_STRINGEOL=77\n# ASP VBScript\nval SCE_HBA_START=80\nval SCE_HBA_DEFAULT=81\nval SCE_HBA_COMMENTLINE=82\nval SCE_HBA_NUMBER=83\nval SCE_HBA_WORD=84\nval SCE_HBA_STRING=85\nval SCE_HBA_IDENTIFIER=86\nval SCE_HBA_STRINGEOL=87\n# Embedded Python\nval SCE_HP_START=90\nval SCE_HP_DEFAULT=91\nval SCE_HP_COMMENTLINE=92\nval SCE_HP_NUMBER=93\nval SCE_HP_STRING=94\nval SCE_HP_CHARACTER=95\nval SCE_HP_WORD=96\nval SCE_HP_TRIPLE=97\nval SCE_HP_TRIPLEDOUBLE=98\nval SCE_HP_CLASSNAME=99\nval SCE_HP_DEFNAME=100\nval SCE_HP_OPERATOR=101\nval SCE_HP_IDENTIFIER=102\n# PHP\nval SCE_HPHP_COMPLEX_VARIABLE=104\n# ASP Python\nval SCE_HPA_START=105\nval SCE_HPA_DEFAULT=106\nval SCE_HPA_COMMENTLINE=107\nval SCE_HPA_NUMBER=108\nval SCE_HPA_STRING=109\nval SCE_HPA_CHARACTER=110\nval SCE_HPA_WORD=111\nval SCE_HPA_TRIPLE=112\nval SCE_HPA_TRIPLEDOUBLE=113\nval SCE_HPA_CLASSNAME=114\nval SCE_HPA_DEFNAME=115\nval SCE_HPA_OPERATOR=116\nval SCE_HPA_IDENTIFIER=117\n# PHP\nval SCE_HPHP_DEFAULT=118\nval SCE_HPHP_HSTRING=119\nval SCE_HPHP_SIMPLESTRING=120\nval SCE_HPHP_WORD=121\nval SCE_HPHP_NUMBER=122\nval SCE_HPHP_VARIABLE=123\nval SCE_HPHP_COMMENT=124\nval SCE_HPHP_COMMENTLINE=125\nval SCE_HPHP_HSTRING_VARIABLE=126\nval SCE_HPHP_OPERATOR=127\n# Lexical states for SCLEX_PERL\nlex Perl=SCLEX_PERL SCE_PL_\nval SCE_PL_DEFAULT=0\nval SCE_PL_ERROR=1\nval SCE_PL_COMMENTLINE=2\nval SCE_PL_POD=3\nval SCE_PL_NUMBER=4\nval SCE_PL_WORD=5\nval SCE_PL_STRING=6\nval SCE_PL_CHARACTER=7\nval SCE_PL_PUNCTUATION=8\nval SCE_PL_PREPROCESSOR=9\nval SCE_PL_OPERATOR=10\nval SCE_PL_IDENTIFIER=11\nval SCE_PL_SCALAR=12\nval SCE_PL_ARRAY=13\nval SCE_PL_HASH=14\nval SCE_PL_SYMBOLTABLE=15\nval SCE_PL_VARIABLE_INDEXER=16\nval SCE_PL_REGEX=17\nval SCE_PL_REGSUBST=18\nval SCE_PL_LONGQUOTE=19\nval SCE_PL_BACKTICKS=20\nval SCE_PL_DATASECTION=21\nval SCE_PL_HERE_DELIM=22\nval SCE_PL_HERE_Q=23\nval SCE_PL_HERE_QQ=24\nval SCE_PL_HERE_QX=25\nval SCE_PL_STRING_Q=26\nval SCE_PL_STRING_QQ=27\nval SCE_PL_STRING_QX=28\nval SCE_PL_STRING_QR=29\nval SCE_PL_STRING_QW=30\nval SCE_PL_POD_VERB=31\nval SCE_PL_SUB_PROTOTYPE=40\nval SCE_PL_FORMAT_IDENT=41\nval SCE_PL_FORMAT=42\nval SCE_PL_STRING_VAR=43\nval SCE_PL_XLAT=44\nval SCE_PL_REGEX_VAR=54\nval SCE_PL_REGSUBST_VAR=55\nval SCE_PL_BACKTICKS_VAR=57\nval SCE_PL_HERE_QQ_VAR=61\nval SCE_PL_HERE_QX_VAR=62\nval SCE_PL_STRING_QQ_VAR=64\nval SCE_PL_STRING_QX_VAR=65\nval SCE_PL_STRING_QR_VAR=66\n# Lexical states for SCLEX_RUBY\nlex Ruby=SCLEX_RUBY SCE_RB_\nval SCE_RB_DEFAULT=0\nval SCE_RB_ERROR=1\nval SCE_RB_COMMENTLINE=2\nval SCE_RB_POD=3\nval SCE_RB_NUMBER=4\nval SCE_RB_WORD=5\nval SCE_RB_STRING=6\nval SCE_RB_CHARACTER=7\nval SCE_RB_CLASSNAME=8\nval SCE_RB_DEFNAME=9\nval SCE_RB_OPERATOR=10\nval SCE_RB_IDENTIFIER=11\nval SCE_RB_REGEX=12\nval SCE_RB_GLOBAL=13\nval SCE_RB_SYMBOL=14\nval SCE_RB_MODULE_NAME=15\nval SCE_RB_INSTANCE_VAR=16\nval SCE_RB_CLASS_VAR=17\nval SCE_RB_BACKTICKS=18\nval SCE_RB_DATASECTION=19\nval SCE_RB_HERE_DELIM=20\nval SCE_RB_HERE_Q=21\nval SCE_RB_HERE_QQ=22\nval SCE_RB_HERE_QX=23\nval SCE_RB_STRING_Q=24\nval SCE_RB_STRING_QQ=25\nval SCE_RB_STRING_QX=26\nval SCE_RB_STRING_QR=27\nval SCE_RB_STRING_QW=28\nval SCE_RB_WORD_DEMOTED=29\nval SCE_RB_STDIN=30\nval SCE_RB_STDOUT=31\nval SCE_RB_STDERR=40\nval SCE_RB_STRING_W=41\nval SCE_RB_STRING_I=42\nval SCE_RB_STRING_QI=43\nval SCE_RB_STRING_QS=44\nval SCE_RB_UPPER_BOUND=45\n# Lexical states for SCLEX_VB, SCLEX_VBSCRIPT, SCLEX_POWERBASIC, SCLEX_BLITZBASIC, SCLEX_PUREBASIC, SCLEX_FREEBASIC\nlex VB=SCLEX_VB SCE_B_\nlex VBScript=SCLEX_VBSCRIPT SCE_B_\nlex PowerBasic=SCLEX_POWERBASIC SCE_B_\nlex BlitzBasic=SCLEX_BLITZBASIC SCE_B_\nlex PureBasic=SCLEX_PUREBASIC SCE_B_\nlex FreeBasic=SCLEX_FREEBASIC SCE_B_\nval SCE_B_DEFAULT=0\nval SCE_B_COMMENT=1\nval SCE_B_NUMBER=2\nval SCE_B_KEYWORD=3\nval SCE_B_STRING=4\nval SCE_B_PREPROCESSOR=5\nval SCE_B_OPERATOR=6\nval SCE_B_IDENTIFIER=7\nval SCE_B_DATE=8\nval SCE_B_STRINGEOL=9\nval SCE_B_KEYWORD2=10\nval SCE_B_KEYWORD3=11\nval SCE_B_KEYWORD4=12\nval SCE_B_CONSTANT=13\nval SCE_B_ASM=14\nval SCE_B_LABEL=15\nval SCE_B_ERROR=16\nval SCE_B_HEXNUMBER=17\nval SCE_B_BINNUMBER=18\nval SCE_B_COMMENTBLOCK=19\nval SCE_B_DOCLINE=20\nval SCE_B_DOCBLOCK=21\nval SCE_B_DOCKEYWORD=22\n# Lexical states for SCLEX_PROPERTIES\nlex Properties=SCLEX_PROPERTIES SCE_PROPS_\nval SCE_PROPS_DEFAULT=0\nval SCE_PROPS_COMMENT=1\nval SCE_PROPS_SECTION=2\nval SCE_PROPS_ASSIGNMENT=3\nval SCE_PROPS_DEFVAL=4\nval SCE_PROPS_KEY=5\n# Lexical states for SCLEX_LATEX\nlex LaTeX=SCLEX_LATEX SCE_L_\nval SCE_L_DEFAULT=0\nval SCE_L_COMMAND=1\nval SCE_L_TAG=2\nval SCE_L_MATH=3\nval SCE_L_COMMENT=4\nval SCE_L_TAG2=5\nval SCE_L_MATH2=6\nval SCE_L_COMMENT2=7\nval SCE_L_VERBATIM=8\nval SCE_L_SHORTCMD=9\nval SCE_L_SPECIAL=10\nval SCE_L_CMDOPT=11\nval SCE_L_ERROR=12\n# Lexical states for SCLEX_LUA\nlex Lua=SCLEX_LUA SCE_LUA_\nval SCE_LUA_DEFAULT=0\nval SCE_LUA_COMMENT=1\nval SCE_LUA_COMMENTLINE=2\nval SCE_LUA_COMMENTDOC=3\nval SCE_LUA_NUMBER=4\nval SCE_LUA_WORD=5\nval SCE_LUA_STRING=6\nval SCE_LUA_CHARACTER=7\nval SCE_LUA_LITERALSTRING=8\nval SCE_LUA_PREPROCESSOR=9\nval SCE_LUA_OPERATOR=10\nval SCE_LUA_IDENTIFIER=11\nval SCE_LUA_STRINGEOL=12\nval SCE_LUA_WORD2=13\nval SCE_LUA_WORD3=14\nval SCE_LUA_WORD4=15\nval SCE_LUA_WORD5=16\nval SCE_LUA_WORD6=17\nval SCE_LUA_WORD7=18\nval SCE_LUA_WORD8=19\nval SCE_LUA_LABEL=20\n# Lexical states for SCLEX_ERRORLIST\nlex ErrorList=SCLEX_ERRORLIST SCE_ERR_\nval SCE_ERR_DEFAULT=0\nval SCE_ERR_PYTHON=1\nval SCE_ERR_GCC=2\nval SCE_ERR_MS=3\nval SCE_ERR_CMD=4\nval SCE_ERR_BORLAND=5\nval SCE_ERR_PERL=6\nval SCE_ERR_NET=7\nval SCE_ERR_LUA=8\nval SCE_ERR_CTAG=9\nval SCE_ERR_DIFF_CHANGED=10\nval SCE_ERR_DIFF_ADDITION=11\nval SCE_ERR_DIFF_DELETION=12\nval SCE_ERR_DIFF_MESSAGE=13\nval SCE_ERR_PHP=14\nval SCE_ERR_ELF=15\nval SCE_ERR_IFC=16\nval SCE_ERR_IFORT=17\nval SCE_ERR_ABSF=18\nval SCE_ERR_TIDY=19\nval SCE_ERR_JAVA_STACK=20\nval SCE_ERR_VALUE=21\nval SCE_ERR_GCC_INCLUDED_FROM=22\nval SCE_ERR_ESCSEQ=23\nval SCE_ERR_ESCSEQ_UNKNOWN=24\nval SCE_ERR_GCC_EXCERPT=25\nval SCE_ERR_BASH=26\nval SCE_ERR_ES_BLACK=40\nval SCE_ERR_ES_RED=41\nval SCE_ERR_ES_GREEN=42\nval SCE_ERR_ES_BROWN=43\nval SCE_ERR_ES_BLUE=44\nval SCE_ERR_ES_MAGENTA=45\nval SCE_ERR_ES_CYAN=46\nval SCE_ERR_ES_GRAY=47\nval SCE_ERR_ES_DARK_GRAY=48\nval SCE_ERR_ES_BRIGHT_RED=49\nval SCE_ERR_ES_BRIGHT_GREEN=50\nval SCE_ERR_ES_YELLOW=51\nval SCE_ERR_ES_BRIGHT_BLUE=52\nval SCE_ERR_ES_BRIGHT_MAGENTA=53\nval SCE_ERR_ES_BRIGHT_CYAN=54\nval SCE_ERR_ES_WHITE=55\n# Lexical states for SCLEX_BATCH\nlex Batch=SCLEX_BATCH SCE_BAT_\nval SCE_BAT_DEFAULT=0\nval SCE_BAT_COMMENT=1\nval SCE_BAT_WORD=2\nval SCE_BAT_LABEL=3\nval SCE_BAT_HIDE=4\nval SCE_BAT_COMMAND=5\nval SCE_BAT_IDENTIFIER=6\nval SCE_BAT_OPERATOR=7\nval SCE_BAT_AFTER_LABEL=8\n# Lexical states for SCLEX_TCMD\nlex TCMD=SCLEX_TCMD SCE_TCMD_\nval SCE_TCMD_DEFAULT=0\nval SCE_TCMD_COMMENT=1\nval SCE_TCMD_WORD=2\nval SCE_TCMD_LABEL=3\nval SCE_TCMD_HIDE=4\nval SCE_TCMD_COMMAND=5\nval SCE_TCMD_IDENTIFIER=6\nval SCE_TCMD_OPERATOR=7\nval SCE_TCMD_ENVIRONMENT=8\nval SCE_TCMD_EXPANSION=9\nval SCE_TCMD_CLABEL=10\n# Lexical states for SCLEX_MAKEFILE\nlex MakeFile=SCLEX_MAKEFILE SCE_MAKE_\nval SCE_MAKE_DEFAULT=0\nval SCE_MAKE_COMMENT=1\nval SCE_MAKE_PREPROCESSOR=2\nval SCE_MAKE_IDENTIFIER=3\nval SCE_MAKE_OPERATOR=4\nval SCE_MAKE_TARGET=5\nval SCE_MAKE_IDEOL=9\n# Lexical states for SCLEX_DIFF\nlex Diff=SCLEX_DIFF SCE_DIFF_\nval SCE_DIFF_DEFAULT=0\nval SCE_DIFF_COMMENT=1\nval SCE_DIFF_COMMAND=2\nval SCE_DIFF_HEADER=3\nval SCE_DIFF_POSITION=4\nval SCE_DIFF_DELETED=5\nval SCE_DIFF_ADDED=6\nval SCE_DIFF_CHANGED=7\nval SCE_DIFF_PATCH_ADD=8\nval SCE_DIFF_PATCH_DELETE=9\nval SCE_DIFF_REMOVED_PATCH_ADD=10\nval SCE_DIFF_REMOVED_PATCH_DELETE=11\n# Lexical states for SCLEX_CONF (Apache Configuration Files Lexer)\nlex Conf=SCLEX_CONF SCE_CONF_\nval SCE_CONF_DEFAULT=0\nval SCE_CONF_COMMENT=1\nval SCE_CONF_NUMBER=2\nval SCE_CONF_IDENTIFIER=3\nval SCE_CONF_EXTENSION=4\nval SCE_CONF_PARAMETER=5\nval SCE_CONF_STRING=6\nval SCE_CONF_OPERATOR=7\nval SCE_CONF_IP=8\nval SCE_CONF_DIRECTIVE=9\n# Lexical states for SCLEX_AVE, Avenue\nlex Avenue=SCLEX_AVE SCE_AVE_\nval SCE_AVE_DEFAULT=0\nval SCE_AVE_COMMENT=1\nval SCE_AVE_NUMBER=2\nval SCE_AVE_WORD=3\nval SCE_AVE_STRING=6\nval SCE_AVE_ENUM=7\nval SCE_AVE_STRINGEOL=8\nval SCE_AVE_IDENTIFIER=9\nval SCE_AVE_OPERATOR=10\nval SCE_AVE_WORD1=11\nval SCE_AVE_WORD2=12\nval SCE_AVE_WORD3=13\nval SCE_AVE_WORD4=14\nval SCE_AVE_WORD5=15\nval SCE_AVE_WORD6=16\n# Lexical states for SCLEX_ADA\nlex Ada=SCLEX_ADA SCE_ADA_\nval SCE_ADA_DEFAULT=0\nval SCE_ADA_WORD=1\nval SCE_ADA_IDENTIFIER=2\nval SCE_ADA_NUMBER=3\nval SCE_ADA_DELIMITER=4\nval SCE_ADA_CHARACTER=5\nval SCE_ADA_CHARACTEREOL=6\nval SCE_ADA_STRING=7\nval SCE_ADA_STRINGEOL=8\nval SCE_ADA_LABEL=9\nval SCE_ADA_COMMENTLINE=10\nval SCE_ADA_ILLEGAL=11\n# Lexical states for SCLEX_BAAN\nlex Baan=SCLEX_BAAN SCE_BAAN_\nval SCE_BAAN_DEFAULT=0\nval SCE_BAAN_COMMENT=1\nval SCE_BAAN_COMMENTDOC=2\nval SCE_BAAN_NUMBER=3\nval SCE_BAAN_WORD=4\nval SCE_BAAN_STRING=5\nval SCE_BAAN_PREPROCESSOR=6\nval SCE_BAAN_OPERATOR=7\nval SCE_BAAN_IDENTIFIER=8\nval SCE_BAAN_STRINGEOL=9\nval SCE_BAAN_WORD2=10\nval SCE_BAAN_WORD3=11\nval SCE_BAAN_WORD4=12\nval SCE_BAAN_WORD5=13\nval SCE_BAAN_WORD6=14\nval SCE_BAAN_WORD7=15\nval SCE_BAAN_WORD8=16\nval SCE_BAAN_WORD9=17\nval SCE_BAAN_TABLEDEF=18\nval SCE_BAAN_TABLESQL=19\nval SCE_BAAN_FUNCTION=20\nval SCE_BAAN_DOMDEF=21\nval SCE_BAAN_FUNCDEF=22\nval SCE_BAAN_OBJECTDEF=23\nval SCE_BAAN_DEFINEDEF=24\n# Lexical states for SCLEX_LISP\nlex Lisp=SCLEX_LISP SCE_LISP_\nval SCE_LISP_DEFAULT=0\nval SCE_LISP_COMMENT=1\nval SCE_LISP_NUMBER=2\nval SCE_LISP_KEYWORD=3\nval SCE_LISP_KEYWORD_KW=4\nval SCE_LISP_SYMBOL=5\nval SCE_LISP_STRING=6\nval SCE_LISP_STRINGEOL=8\nval SCE_LISP_IDENTIFIER=9\nval SCE_LISP_OPERATOR=10\nval SCE_LISP_SPECIAL=11\nval SCE_LISP_MULTI_COMMENT=12\n# Lexical states for SCLEX_EIFFEL and SCLEX_EIFFELKW\nlex Eiffel=SCLEX_EIFFEL SCE_EIFFEL_\nlex EiffelKW=SCLEX_EIFFELKW SCE_EIFFEL_\nval SCE_EIFFEL_DEFAULT=0\nval SCE_EIFFEL_COMMENTLINE=1\nval SCE_EIFFEL_NUMBER=2\nval SCE_EIFFEL_WORD=3\nval SCE_EIFFEL_STRING=4\nval SCE_EIFFEL_CHARACTER=5\nval SCE_EIFFEL_OPERATOR=6\nval SCE_EIFFEL_IDENTIFIER=7\nval SCE_EIFFEL_STRINGEOL=8\n# Lexical states for SCLEX_NNCRONTAB (nnCron crontab Lexer)\nlex NNCronTab=SCLEX_NNCRONTAB SCE_NNCRONTAB_\nval SCE_NNCRONTAB_DEFAULT=0\nval SCE_NNCRONTAB_COMMENT=1\nval SCE_NNCRONTAB_TASK=2\nval SCE_NNCRONTAB_SECTION=3\nval SCE_NNCRONTAB_KEYWORD=4\nval SCE_NNCRONTAB_MODIFIER=5\nval SCE_NNCRONTAB_ASTERISK=6\nval SCE_NNCRONTAB_NUMBER=7\nval SCE_NNCRONTAB_STRING=8\nval SCE_NNCRONTAB_ENVIRONMENT=9\nval SCE_NNCRONTAB_IDENTIFIER=10\n# Lexical states for SCLEX_FORTH (Forth Lexer)\nlex Forth=SCLEX_FORTH SCE_FORTH_\nval SCE_FORTH_DEFAULT=0\nval SCE_FORTH_COMMENT=1\nval SCE_FORTH_COMMENT_ML=2\nval SCE_FORTH_IDENTIFIER=3\nval SCE_FORTH_CONTROL=4\nval SCE_FORTH_KEYWORD=5\nval SCE_FORTH_DEFWORD=6\nval SCE_FORTH_PREWORD1=7\nval SCE_FORTH_PREWORD2=8\nval SCE_FORTH_NUMBER=9\nval SCE_FORTH_STRING=10\nval SCE_FORTH_LOCALE=11\n# Lexical states for SCLEX_MATLAB\nlex MatLab=SCLEX_MATLAB SCE_MATLAB_\nval SCE_MATLAB_DEFAULT=0\nval SCE_MATLAB_COMMENT=1\nval SCE_MATLAB_COMMAND=2\nval SCE_MATLAB_NUMBER=3\nval SCE_MATLAB_KEYWORD=4\n# single quoted string\nval SCE_MATLAB_STRING=5\nval SCE_MATLAB_OPERATOR=6\nval SCE_MATLAB_IDENTIFIER=7\nval SCE_MATLAB_DOUBLEQUOTESTRING=8\n# Lexical states for SCLEX_MAXIMA\nlex Maxima=SCLEX_MAXIMA SCE_MAXIMA_\nval SCE_MAXIMA_OPERATOR=0\nval SCE_MAXIMA_COMMANDENDING=1\nval SCE_MAXIMA_COMMENT=2\nval SCE_MAXIMA_NUMBER=3\nval SCE_MAXIMA_STRING=4\nval SCE_MAXIMA_COMMAND=5\nval SCE_MAXIMA_VARIABLE=6\nval SCE_MAXIMA_UNKNOWN=7\n# Lexical states for SCLEX_SCRIPTOL\nlex Sol=SCLEX_SCRIPTOL SCE_SCRIPTOL_\nval SCE_SCRIPTOL_DEFAULT=0\nval SCE_SCRIPTOL_WHITE=1\nval SCE_SCRIPTOL_COMMENTLINE=2\nval SCE_SCRIPTOL_PERSISTENT=3\nval SCE_SCRIPTOL_CSTYLE=4\nval SCE_SCRIPTOL_COMMENTBLOCK=5\nval SCE_SCRIPTOL_NUMBER=6\nval SCE_SCRIPTOL_STRING=7\nval SCE_SCRIPTOL_CHARACTER=8\nval SCE_SCRIPTOL_STRINGEOL=9\nval SCE_SCRIPTOL_KEYWORD=10\nval SCE_SCRIPTOL_OPERATOR=11\nval SCE_SCRIPTOL_IDENTIFIER=12\nval SCE_SCRIPTOL_TRIPLE=13\nval SCE_SCRIPTOL_CLASSNAME=14\nval SCE_SCRIPTOL_PREPROCESSOR=15\n# Lexical states for SCLEX_ASM, SCLEX_AS\nlex Asm=SCLEX_ASM SCE_ASM_\nlex As=SCLEX_AS SCE_ASM_\nval SCE_ASM_DEFAULT=0\nval SCE_ASM_COMMENT=1\nval SCE_ASM_NUMBER=2\nval SCE_ASM_STRING=3\nval SCE_ASM_OPERATOR=4\nval SCE_ASM_IDENTIFIER=5\nval SCE_ASM_CPUINSTRUCTION=6\nval SCE_ASM_MATHINSTRUCTION=7\nval SCE_ASM_REGISTER=8\nval SCE_ASM_DIRECTIVE=9\nval SCE_ASM_DIRECTIVEOPERAND=10\nval SCE_ASM_COMMENTBLOCK=11\nval SCE_ASM_CHARACTER=12\nval SCE_ASM_STRINGEOL=13\nval SCE_ASM_EXTINSTRUCTION=14\nval SCE_ASM_COMMENTDIRECTIVE=15\nval SCE_ASM_STRINGBACKQUOTE=16\n# Lexical states for SCLEX_FORTRAN\nlex Fortran=SCLEX_FORTRAN SCE_F_\nlex F77=SCLEX_F77 SCE_F_\nval SCE_F_DEFAULT=0\nval SCE_F_COMMENT=1\nval SCE_F_NUMBER=2\nval SCE_F_STRING1=3\nval SCE_F_STRING2=4\nval SCE_F_STRINGEOL=5\nval SCE_F_OPERATOR=6\nval SCE_F_IDENTIFIER=7\nval SCE_F_WORD=8\nval SCE_F_WORD2=9\nval SCE_F_WORD3=10\nval SCE_F_PREPROCESSOR=11\nval SCE_F_OPERATOR2=12\nval SCE_F_LABEL=13\nval SCE_F_CONTINUATION=14\n# Lexical states for SCLEX_CSS\nlex CSS=SCLEX_CSS SCE_CSS_\nval SCE_CSS_DEFAULT=0\nval SCE_CSS_TAG=1\nval SCE_CSS_CLASS=2\nval SCE_CSS_PSEUDOCLASS=3\nval SCE_CSS_UNKNOWN_PSEUDOCLASS=4\nval SCE_CSS_OPERATOR=5\nval SCE_CSS_IDENTIFIER=6\nval SCE_CSS_UNKNOWN_IDENTIFIER=7\nval SCE_CSS_VALUE=8\nval SCE_CSS_COMMENT=9\nval SCE_CSS_ID=10\nval SCE_CSS_IMPORTANT=11\nval SCE_CSS_DIRECTIVE=12\nval SCE_CSS_DOUBLESTRING=13\nval SCE_CSS_SINGLESTRING=14\nval SCE_CSS_IDENTIFIER2=15\nval SCE_CSS_ATTRIBUTE=16\nval SCE_CSS_IDENTIFIER3=17\nval SCE_CSS_PSEUDOELEMENT=18\nval SCE_CSS_EXTENDED_IDENTIFIER=19\nval SCE_CSS_EXTENDED_PSEUDOCLASS=20\nval SCE_CSS_EXTENDED_PSEUDOELEMENT=21\nval SCE_CSS_GROUP_RULE=22\nval SCE_CSS_VARIABLE=23\n# Lexical states for SCLEX_POV\nlex POV=SCLEX_POV SCE_POV_\nval SCE_POV_DEFAULT=0\nval SCE_POV_COMMENT=1\nval SCE_POV_COMMENTLINE=2\nval SCE_POV_NUMBER=3\nval SCE_POV_OPERATOR=4\nval SCE_POV_IDENTIFIER=5\nval SCE_POV_STRING=6\nval SCE_POV_STRINGEOL=7\nval SCE_POV_DIRECTIVE=8\nval SCE_POV_BADDIRECTIVE=9\nval SCE_POV_WORD2=10\nval SCE_POV_WORD3=11\nval SCE_POV_WORD4=12\nval SCE_POV_WORD5=13\nval SCE_POV_WORD6=14\nval SCE_POV_WORD7=15\nval SCE_POV_WORD8=16\n# Lexical states for SCLEX_LOUT\nlex LOUT=SCLEX_LOUT SCE_LOUT_\nval SCE_LOUT_DEFAULT=0\nval SCE_LOUT_COMMENT=1\nval SCE_LOUT_NUMBER=2\nval SCE_LOUT_WORD=3\nval SCE_LOUT_WORD2=4\nval SCE_LOUT_WORD3=5\nval SCE_LOUT_WORD4=6\nval SCE_LOUT_STRING=7\nval SCE_LOUT_OPERATOR=8\nval SCE_LOUT_IDENTIFIER=9\nval SCE_LOUT_STRINGEOL=10\n# Lexical states for SCLEX_ESCRIPT\nlex ESCRIPT=SCLEX_ESCRIPT SCE_ESCRIPT_\nval SCE_ESCRIPT_DEFAULT=0\nval SCE_ESCRIPT_COMMENT=1\nval SCE_ESCRIPT_COMMENTLINE=2\nval SCE_ESCRIPT_COMMENTDOC=3\nval SCE_ESCRIPT_NUMBER=4\nval SCE_ESCRIPT_WORD=5\nval SCE_ESCRIPT_STRING=6\nval SCE_ESCRIPT_OPERATOR=7\nval SCE_ESCRIPT_IDENTIFIER=8\nval SCE_ESCRIPT_BRACE=9\nval SCE_ESCRIPT_WORD2=10\nval SCE_ESCRIPT_WORD3=11\n# Lexical states for SCLEX_PS\nlex PS=SCLEX_PS SCE_PS_\nval SCE_PS_DEFAULT=0\nval SCE_PS_COMMENT=1\nval SCE_PS_DSC_COMMENT=2\nval SCE_PS_DSC_VALUE=3\nval SCE_PS_NUMBER=4\nval SCE_PS_NAME=5\nval SCE_PS_KEYWORD=6\nval SCE_PS_LITERAL=7\nval SCE_PS_IMMEVAL=8\nval SCE_PS_PAREN_ARRAY=9\nval SCE_PS_PAREN_DICT=10\nval SCE_PS_PAREN_PROC=11\nval SCE_PS_TEXT=12\nval SCE_PS_HEXSTRING=13\nval SCE_PS_BASE85STRING=14\nval SCE_PS_BADSTRINGCHAR=15\n# Lexical states for SCLEX_NSIS\nlex NSIS=SCLEX_NSIS SCE_NSIS_\nval SCE_NSIS_DEFAULT=0\nval SCE_NSIS_COMMENT=1\nval SCE_NSIS_STRINGDQ=2\nval SCE_NSIS_STRINGLQ=3\nval SCE_NSIS_STRINGRQ=4\nval SCE_NSIS_FUNCTION=5\nval SCE_NSIS_VARIABLE=6\nval SCE_NSIS_LABEL=7\nval SCE_NSIS_USERDEFINED=8\nval SCE_NSIS_SECTIONDEF=9\nval SCE_NSIS_SUBSECTIONDEF=10\nval SCE_NSIS_IFDEFINEDEF=11\nval SCE_NSIS_MACRODEF=12\nval SCE_NSIS_STRINGVAR=13\nval SCE_NSIS_NUMBER=14\nval SCE_NSIS_SECTIONGROUP=15\nval SCE_NSIS_PAGEEX=16\nval SCE_NSIS_FUNCTIONDEF=17\nval SCE_NSIS_COMMENTBOX=18\n# Lexical states for SCLEX_MMIXAL\nlex MMIXAL=SCLEX_MMIXAL SCE_MMIXAL_\nval SCE_MMIXAL_LEADWS=0\nval SCE_MMIXAL_COMMENT=1\nval SCE_MMIXAL_LABEL=2\nval SCE_MMIXAL_OPCODE=3\nval SCE_MMIXAL_OPCODE_PRE=4\nval SCE_MMIXAL_OPCODE_VALID=5\nval SCE_MMIXAL_OPCODE_UNKNOWN=6\nval SCE_MMIXAL_OPCODE_POST=7\nval SCE_MMIXAL_OPERANDS=8\nval SCE_MMIXAL_NUMBER=9\nval SCE_MMIXAL_REF=10\nval SCE_MMIXAL_CHAR=11\nval SCE_MMIXAL_STRING=12\nval SCE_MMIXAL_REGISTER=13\nval SCE_MMIXAL_HEX=14\nval SCE_MMIXAL_OPERATOR=15\nval SCE_MMIXAL_SYMBOL=16\nval SCE_MMIXAL_INCLUDE=17\n# Lexical states for SCLEX_CLW\nlex Clarion=SCLEX_CLW SCE_CLW_\nval SCE_CLW_DEFAULT=0\nval SCE_CLW_LABEL=1\nval SCE_CLW_COMMENT=2\nval SCE_CLW_STRING=3\nval SCE_CLW_USER_IDENTIFIER=4\nval SCE_CLW_INTEGER_CONSTANT=5\nval SCE_CLW_REAL_CONSTANT=6\nval SCE_CLW_PICTURE_STRING=7\nval SCE_CLW_KEYWORD=8\nval SCE_CLW_COMPILER_DIRECTIVE=9\nval SCE_CLW_RUNTIME_EXPRESSIONS=10\nval SCE_CLW_BUILTIN_PROCEDURES_FUNCTION=11\nval SCE_CLW_STRUCTURE_DATA_TYPE=12\nval SCE_CLW_ATTRIBUTE=13\nval SCE_CLW_STANDARD_EQUATE=14\nval SCE_CLW_ERROR=15\nval SCE_CLW_DEPRECATED=16\n# Lexical states for SCLEX_LOT\nlex LOT=SCLEX_LOT SCE_LOT_\nval SCE_LOT_DEFAULT=0\nval SCE_LOT_HEADER=1\nval SCE_LOT_BREAK=2\nval SCE_LOT_SET=3\nval SCE_LOT_PASS=4\nval SCE_LOT_FAIL=5\nval SCE_LOT_ABORT=6\n# Lexical states for SCLEX_YAML\nlex YAML=SCLEX_YAML SCE_YAML_\nval SCE_YAML_DEFAULT=0\nval SCE_YAML_COMMENT=1\nval SCE_YAML_IDENTIFIER=2\nval SCE_YAML_KEYWORD=3\nval SCE_YAML_NUMBER=4\nval SCE_YAML_REFERENCE=5\nval SCE_YAML_DOCUMENT=6\nval SCE_YAML_TEXT=7\nval SCE_YAML_ERROR=8\nval SCE_YAML_OPERATOR=9\n# Lexical states for SCLEX_TEX\nlex TeX=SCLEX_TEX SCE_TEX_\nval SCE_TEX_DEFAULT=0\nval SCE_TEX_SPECIAL=1\nval SCE_TEX_GROUP=2\nval SCE_TEX_SYMBOL=3\nval SCE_TEX_COMMAND=4\nval SCE_TEX_TEXT=5\nlex Metapost=SCLEX_METAPOST SCE_METAPOST_\nval SCE_METAPOST_DEFAULT=0\nval SCE_METAPOST_SPECIAL=1\nval SCE_METAPOST_GROUP=2\nval SCE_METAPOST_SYMBOL=3\nval SCE_METAPOST_COMMAND=4\nval SCE_METAPOST_TEXT=5\nval SCE_METAPOST_EXTRA=6\n# Lexical states for SCLEX_ERLANG\nlex Erlang=SCLEX_ERLANG SCE_ERLANG_\nval SCE_ERLANG_DEFAULT=0\nval SCE_ERLANG_COMMENT=1\nval SCE_ERLANG_VARIABLE=2\nval SCE_ERLANG_NUMBER=3\nval SCE_ERLANG_KEYWORD=4\nval SCE_ERLANG_STRING=5\nval SCE_ERLANG_OPERATOR=6\nval SCE_ERLANG_ATOM=7\nval SCE_ERLANG_FUNCTION_NAME=8\nval SCE_ERLANG_CHARACTER=9\nval SCE_ERLANG_MACRO=10\nval SCE_ERLANG_RECORD=11\nval SCE_ERLANG_PREPROC=12\nval SCE_ERLANG_NODE_NAME=13\nval SCE_ERLANG_COMMENT_FUNCTION=14\nval SCE_ERLANG_COMMENT_MODULE=15\nval SCE_ERLANG_COMMENT_DOC=16\nval SCE_ERLANG_COMMENT_DOC_MACRO=17\nval SCE_ERLANG_ATOM_QUOTED=18\nval SCE_ERLANG_MACRO_QUOTED=19\nval SCE_ERLANG_RECORD_QUOTED=20\nval SCE_ERLANG_NODE_NAME_QUOTED=21\nval SCE_ERLANG_BIFS=22\nval SCE_ERLANG_MODULES=23\nval SCE_ERLANG_MODULES_ATT=24\nval SCE_ERLANG_UNKNOWN=31\n# Lexical states for SCLEX_OCTAVE are identical to MatLab\nlex Octave=SCLEX_OCTAVE SCE_MATLAB_\n# Lexical states for SCLEX_JULIA\nlex Julia=SCLEX_JULIA SCE_JULIA_\nval SCE_JULIA_DEFAULT=0\nval SCE_JULIA_COMMENT=1\nval SCE_JULIA_NUMBER=2\nval SCE_JULIA_KEYWORD1=3\nval SCE_JULIA_KEYWORD2=4\nval SCE_JULIA_KEYWORD3=5\nval SCE_JULIA_CHAR=6\nval SCE_JULIA_OPERATOR=7\nval SCE_JULIA_BRACKET=8\nval SCE_JULIA_IDENTIFIER=9\nval SCE_JULIA_STRING=10\nval SCE_JULIA_SYMBOL=11\nval SCE_JULIA_MACRO=12\nval SCE_JULIA_STRINGINTERP=13\nval SCE_JULIA_DOCSTRING=14\nval SCE_JULIA_STRINGLITERAL=15\nval SCE_JULIA_COMMAND=16\nval SCE_JULIA_COMMANDLITERAL=17\nval SCE_JULIA_TYPEANNOT=18\nval SCE_JULIA_LEXERROR=19\nval SCE_JULIA_KEYWORD4=20\nval SCE_JULIA_TYPEOPERATOR=21\n# Lexical states for SCLEX_MSSQL\nlex MSSQL=SCLEX_MSSQL SCE_MSSQL_\nval SCE_MSSQL_DEFAULT=0\nval SCE_MSSQL_COMMENT=1\nval SCE_MSSQL_LINE_COMMENT=2\nval SCE_MSSQL_NUMBER=3\nval SCE_MSSQL_STRING=4\nval SCE_MSSQL_OPERATOR=5\nval SCE_MSSQL_IDENTIFIER=6\nval SCE_MSSQL_VARIABLE=7\nval SCE_MSSQL_COLUMN_NAME=8\nval SCE_MSSQL_STATEMENT=9\nval SCE_MSSQL_DATATYPE=10\nval SCE_MSSQL_SYSTABLE=11\nval SCE_MSSQL_GLOBAL_VARIABLE=12\nval SCE_MSSQL_FUNCTION=13\nval SCE_MSSQL_STORED_PROCEDURE=14\nval SCE_MSSQL_DEFAULT_PREF_DATATYPE=15\nval SCE_MSSQL_COLUMN_NAME_2=16\n# Lexical states for SCLEX_VERILOG\nlex Verilog=SCLEX_VERILOG SCE_V_\nval SCE_V_DEFAULT=0\nval SCE_V_COMMENT=1\nval SCE_V_COMMENTLINE=2\nval SCE_V_COMMENTLINEBANG=3\nval SCE_V_NUMBER=4\nval SCE_V_WORD=5\nval SCE_V_STRING=6\nval SCE_V_WORD2=7\nval SCE_V_WORD3=8\nval SCE_V_PREPROCESSOR=9\nval SCE_V_OPERATOR=10\nval SCE_V_IDENTIFIER=11\nval SCE_V_STRINGEOL=12\nval SCE_V_USER=19\nval SCE_V_COMMENT_WORD=20\nval SCE_V_INPUT=21\nval SCE_V_OUTPUT=22\nval SCE_V_INOUT=23\nval SCE_V_PORT_CONNECT=24\n# Lexical states for SCLEX_KIX\nlex Kix=SCLEX_KIX SCE_KIX_\nval SCE_KIX_DEFAULT=0\nval SCE_KIX_COMMENT=1\nval SCE_KIX_STRING1=2\nval SCE_KIX_STRING2=3\nval SCE_KIX_NUMBER=4\nval SCE_KIX_VAR=5\nval SCE_KIX_MACRO=6\nval SCE_KIX_KEYWORD=7\nval SCE_KIX_FUNCTIONS=8\nval SCE_KIX_OPERATOR=9\nval SCE_KIX_COMMENTSTREAM=10\nval SCE_KIX_IDENTIFIER=31\n# Lexical states for SCLEX_GUI4CLI\nlex Gui4Cli=SCLEX_GUI4CLI SCE_GC_\nval SCE_GC_DEFAULT=0\nval SCE_GC_COMMENTLINE=1\nval SCE_GC_COMMENTBLOCK=2\nval SCE_GC_GLOBAL=3\nval SCE_GC_EVENT=4\nval SCE_GC_ATTRIBUTE=5\nval SCE_GC_CONTROL=6\nval SCE_GC_COMMAND=7\nval SCE_GC_STRING=8\nval SCE_GC_OPERATOR=9\n# Lexical states for SCLEX_SPECMAN\nlex Specman=SCLEX_SPECMAN SCE_SN_\nval SCE_SN_DEFAULT=0\nval SCE_SN_CODE=1\nval SCE_SN_COMMENTLINE=2\nval SCE_SN_COMMENTLINEBANG=3\nval SCE_SN_NUMBER=4\nval SCE_SN_WORD=5\nval SCE_SN_STRING=6\nval SCE_SN_WORD2=7\nval SCE_SN_WORD3=8\nval SCE_SN_PREPROCESSOR=9\nval SCE_SN_OPERATOR=10\nval SCE_SN_IDENTIFIER=11\nval SCE_SN_STRINGEOL=12\nval SCE_SN_REGEXTAG=13\nval SCE_SN_SIGNAL=14\nval SCE_SN_USER=19\n# Lexical states for SCLEX_AU3\nlex Au3=SCLEX_AU3 SCE_AU3_\nval SCE_AU3_DEFAULT=0\nval SCE_AU3_COMMENT=1\nval SCE_AU3_COMMENTBLOCK=2\nval SCE_AU3_NUMBER=3\nval SCE_AU3_FUNCTION=4\nval SCE_AU3_KEYWORD=5\nval SCE_AU3_MACRO=6\nval SCE_AU3_STRING=7\nval SCE_AU3_OPERATOR=8\nval SCE_AU3_VARIABLE=9\nval SCE_AU3_SENT=10\nval SCE_AU3_PREPROCESSOR=11\nval SCE_AU3_SPECIAL=12\nval SCE_AU3_EXPAND=13\nval SCE_AU3_COMOBJ=14\nval SCE_AU3_UDF=15\n# Lexical states for SCLEX_APDL\nlex APDL=SCLEX_APDL SCE_APDL_\nval SCE_APDL_DEFAULT=0\nval SCE_APDL_COMMENT=1\nval SCE_APDL_COMMENTBLOCK=2\nval SCE_APDL_NUMBER=3\nval SCE_APDL_STRING=4\nval SCE_APDL_OPERATOR=5\nval SCE_APDL_WORD=6\nval SCE_APDL_PROCESSOR=7\nval SCE_APDL_COMMAND=8\nval SCE_APDL_SLASHCOMMAND=9\nval SCE_APDL_STARCOMMAND=10\nval SCE_APDL_ARGUMENT=11\nval SCE_APDL_FUNCTION=12\n# Lexical states for SCLEX_BASH\nlex Bash=SCLEX_BASH SCE_SH_\nval SCE_SH_DEFAULT=0\nval SCE_SH_ERROR=1\nval SCE_SH_COMMENTLINE=2\nval SCE_SH_NUMBER=3\nval SCE_SH_WORD=4\nval SCE_SH_STRING=5\nval SCE_SH_CHARACTER=6\nval SCE_SH_OPERATOR=7\nval SCE_SH_IDENTIFIER=8\nval SCE_SH_SCALAR=9\nval SCE_SH_PARAM=10\nval SCE_SH_BACKTICKS=11\nval SCE_SH_HERE_DELIM=12\nval SCE_SH_HERE_Q=13\n# Lexical states for SCLEX_ASN1\nlex Asn1=SCLEX_ASN1 SCE_ASN1_\nval SCE_ASN1_DEFAULT=0\nval SCE_ASN1_COMMENT=1\nval SCE_ASN1_IDENTIFIER=2\nval SCE_ASN1_STRING=3\nval SCE_ASN1_OID=4\nval SCE_ASN1_SCALAR=5\nval SCE_ASN1_KEYWORD=6\nval SCE_ASN1_ATTRIBUTE=7\nval SCE_ASN1_DESCRIPTOR=8\nval SCE_ASN1_TYPE=9\nval SCE_ASN1_OPERATOR=10\n# Lexical states for SCLEX_VHDL\nlex VHDL=SCLEX_VHDL SCE_VHDL_\nval SCE_VHDL_DEFAULT=0\nval SCE_VHDL_COMMENT=1\nval SCE_VHDL_COMMENTLINEBANG=2\nval SCE_VHDL_NUMBER=3\nval SCE_VHDL_STRING=4\nval SCE_VHDL_OPERATOR=5\nval SCE_VHDL_IDENTIFIER=6\nval SCE_VHDL_STRINGEOL=7\nval SCE_VHDL_KEYWORD=8\nval SCE_VHDL_STDOPERATOR=9\nval SCE_VHDL_ATTRIBUTE=10\nval SCE_VHDL_STDFUNCTION=11\nval SCE_VHDL_STDPACKAGE=12\nval SCE_VHDL_STDTYPE=13\nval SCE_VHDL_USERWORD=14\nval SCE_VHDL_BLOCK_COMMENT=15\n# Lexical states for SCLEX_CAML\nlex Caml=SCLEX_CAML SCE_CAML_\nval SCE_CAML_DEFAULT=0\nval SCE_CAML_IDENTIFIER=1\nval SCE_CAML_TAGNAME=2\nval SCE_CAML_KEYWORD=3\nval SCE_CAML_KEYWORD2=4\nval SCE_CAML_KEYWORD3=5\nval SCE_CAML_LINENUM=6\nval SCE_CAML_OPERATOR=7\nval SCE_CAML_NUMBER=8\nval SCE_CAML_CHAR=9\nval SCE_CAML_WHITE=10\nval SCE_CAML_STRING=11\nval SCE_CAML_COMMENT=12\nval SCE_CAML_COMMENT1=13\nval SCE_CAML_COMMENT2=14\nval SCE_CAML_COMMENT3=15\n# Lexical states for SCLEX_HASKELL\nlex Haskell=SCLEX_HASKELL SCE_HA_\nval SCE_HA_DEFAULT=0\nval SCE_HA_IDENTIFIER=1\nval SCE_HA_KEYWORD=2\nval SCE_HA_NUMBER=3\nval SCE_HA_STRING=4\nval SCE_HA_CHARACTER=5\nval SCE_HA_CLASS=6\nval SCE_HA_MODULE=7\nval SCE_HA_CAPITAL=8\nval SCE_HA_DATA=9\nval SCE_HA_IMPORT=10\nval SCE_HA_OPERATOR=11\nval SCE_HA_INSTANCE=12\nval SCE_HA_COMMENTLINE=13\nval SCE_HA_COMMENTBLOCK=14\nval SCE_HA_COMMENTBLOCK2=15\nval SCE_HA_COMMENTBLOCK3=16\nval SCE_HA_PRAGMA=17\nval SCE_HA_PREPROCESSOR=18\nval SCE_HA_STRINGEOL=19\nval SCE_HA_RESERVED_OPERATOR=20\nval SCE_HA_LITERATE_COMMENT=21\nval SCE_HA_LITERATE_CODEDELIM=22\n# Lexical states of SCLEX_TADS3\nlex TADS3=SCLEX_TADS3 SCE_T3_\nval SCE_T3_DEFAULT=0\nval SCE_T3_X_DEFAULT=1\nval SCE_T3_PREPROCESSOR=2\nval SCE_T3_BLOCK_COMMENT=3\nval SCE_T3_LINE_COMMENT=4\nval SCE_T3_OPERATOR=5\nval SCE_T3_KEYWORD=6\nval SCE_T3_NUMBER=7\nval SCE_T3_IDENTIFIER=8\nval SCE_T3_S_STRING=9\nval SCE_T3_D_STRING=10\nval SCE_T3_X_STRING=11\nval SCE_T3_LIB_DIRECTIVE=12\nval SCE_T3_MSG_PARAM=13\nval SCE_T3_HTML_TAG=14\nval SCE_T3_HTML_DEFAULT=15\nval SCE_T3_HTML_STRING=16\nval SCE_T3_USER1=17\nval SCE_T3_USER2=18\nval SCE_T3_USER3=19\nval SCE_T3_BRACE=20\n# Lexical states for SCLEX_REBOL\nlex Rebol=SCLEX_REBOL SCE_REBOL_\nval SCE_REBOL_DEFAULT=0\nval SCE_REBOL_COMMENTLINE=1\nval SCE_REBOL_COMMENTBLOCK=2\nval SCE_REBOL_PREFACE=3\nval SCE_REBOL_OPERATOR=4\nval SCE_REBOL_CHARACTER=5\nval SCE_REBOL_QUOTEDSTRING=6\nval SCE_REBOL_BRACEDSTRING=7\nval SCE_REBOL_NUMBER=8\nval SCE_REBOL_PAIR=9\nval SCE_REBOL_TUPLE=10\nval SCE_REBOL_BINARY=11\nval SCE_REBOL_MONEY=12\nval SCE_REBOL_ISSUE=13\nval SCE_REBOL_TAG=14\nval SCE_REBOL_FILE=15\nval SCE_REBOL_EMAIL=16\nval SCE_REBOL_URL=17\nval SCE_REBOL_DATE=18\nval SCE_REBOL_TIME=19\nval SCE_REBOL_IDENTIFIER=20\nval SCE_REBOL_WORD=21\nval SCE_REBOL_WORD2=22\nval SCE_REBOL_WORD3=23\nval SCE_REBOL_WORD4=24\nval SCE_REBOL_WORD5=25\nval SCE_REBOL_WORD6=26\nval SCE_REBOL_WORD7=27\nval SCE_REBOL_WORD8=28\n# Lexical states for SCLEX_SQL\nlex SQL=SCLEX_SQL SCE_SQL_\nval SCE_SQL_DEFAULT=0\nval SCE_SQL_COMMENT=1\nval SCE_SQL_COMMENTLINE=2\nval SCE_SQL_COMMENTDOC=3\nval SCE_SQL_NUMBER=4\nval SCE_SQL_WORD=5\nval SCE_SQL_STRING=6\nval SCE_SQL_CHARACTER=7\nval SCE_SQL_SQLPLUS=8\nval SCE_SQL_SQLPLUS_PROMPT=9\nval SCE_SQL_OPERATOR=10\nval SCE_SQL_IDENTIFIER=11\nval SCE_SQL_SQLPLUS_COMMENT=13\nval SCE_SQL_COMMENTLINEDOC=15\nval SCE_SQL_WORD2=16\nval SCE_SQL_COMMENTDOCKEYWORD=17\nval SCE_SQL_COMMENTDOCKEYWORDERROR=18\nval SCE_SQL_USER1=19\nval SCE_SQL_USER2=20\nval SCE_SQL_USER3=21\nval SCE_SQL_USER4=22\nval SCE_SQL_QUOTEDIDENTIFIER=23\nval SCE_SQL_QOPERATOR=24\n# Lexical states for SCLEX_SMALLTALK\nlex Smalltalk=SCLEX_SMALLTALK SCE_ST_\nval SCE_ST_DEFAULT=0\nval SCE_ST_STRING=1\nval SCE_ST_NUMBER=2\nval SCE_ST_COMMENT=3\nval SCE_ST_SYMBOL=4\nval SCE_ST_BINARY=5\nval SCE_ST_BOOL=6\nval SCE_ST_SELF=7\nval SCE_ST_SUPER=8\nval SCE_ST_NIL=9\nval SCE_ST_GLOBAL=10\nval SCE_ST_RETURN=11\nval SCE_ST_SPECIAL=12\nval SCE_ST_KWSEND=13\nval SCE_ST_ASSIGN=14\nval SCE_ST_CHARACTER=15\nval SCE_ST_SPEC_SEL=16\n# Lexical states for SCLEX_FLAGSHIP (clipper)\nlex FlagShip=SCLEX_FLAGSHIP SCE_FS_\nval SCE_FS_DEFAULT=0\nval SCE_FS_COMMENT=1\nval SCE_FS_COMMENTLINE=2\nval SCE_FS_COMMENTDOC=3\nval SCE_FS_COMMENTLINEDOC=4\nval SCE_FS_COMMENTDOCKEYWORD=5\nval SCE_FS_COMMENTDOCKEYWORDERROR=6\nval SCE_FS_KEYWORD=7\nval SCE_FS_KEYWORD2=8\nval SCE_FS_KEYWORD3=9\nval SCE_FS_KEYWORD4=10\nval SCE_FS_NUMBER=11\nval SCE_FS_STRING=12\nval SCE_FS_PREPROCESSOR=13\nval SCE_FS_OPERATOR=14\nval SCE_FS_IDENTIFIER=15\nval SCE_FS_DATE=16\nval SCE_FS_STRINGEOL=17\nval SCE_FS_CONSTANT=18\nval SCE_FS_WORDOPERATOR=19\nval SCE_FS_DISABLEDCODE=20\nval SCE_FS_DEFAULT_C=21\nval SCE_FS_COMMENTDOC_C=22\nval SCE_FS_COMMENTLINEDOC_C=23\nval SCE_FS_KEYWORD_C=24\nval SCE_FS_KEYWORD2_C=25\nval SCE_FS_NUMBER_C=26\nval SCE_FS_STRING_C=27\nval SCE_FS_PREPROCESSOR_C=28\nval SCE_FS_OPERATOR_C=29\nval SCE_FS_IDENTIFIER_C=30\nval SCE_FS_STRINGEOL_C=31\n# Lexical states for SCLEX_CSOUND\nlex Csound=SCLEX_CSOUND SCE_CSOUND_\nval SCE_CSOUND_DEFAULT=0\nval SCE_CSOUND_COMMENT=1\nval SCE_CSOUND_NUMBER=2\nval SCE_CSOUND_OPERATOR=3\nval SCE_CSOUND_INSTR=4\nval SCE_CSOUND_IDENTIFIER=5\nval SCE_CSOUND_OPCODE=6\nval SCE_CSOUND_HEADERSTMT=7\nval SCE_CSOUND_USERKEYWORD=8\nval SCE_CSOUND_COMMENTBLOCK=9\nval SCE_CSOUND_PARAM=10\nval SCE_CSOUND_ARATE_VAR=11\nval SCE_CSOUND_KRATE_VAR=12\nval SCE_CSOUND_IRATE_VAR=13\nval SCE_CSOUND_GLOBAL_VAR=14\nval SCE_CSOUND_STRINGEOL=15\n# Lexical states for SCLEX_INNOSETUP\nlex Inno=SCLEX_INNOSETUP SCE_INNO_\nval SCE_INNO_DEFAULT=0\nval SCE_INNO_COMMENT=1\nval SCE_INNO_KEYWORD=2\nval SCE_INNO_PARAMETER=3\nval SCE_INNO_SECTION=4\nval SCE_INNO_PREPROC=5\nval SCE_INNO_INLINE_EXPANSION=6\nval SCE_INNO_COMMENT_PASCAL=7\nval SCE_INNO_KEYWORD_PASCAL=8\nval SCE_INNO_KEYWORD_USER=9\nval SCE_INNO_STRING_DOUBLE=10\nval SCE_INNO_STRING_SINGLE=11\nval SCE_INNO_IDENTIFIER=12\n# Lexical states for SCLEX_OPAL\nlex Opal=SCLEX_OPAL SCE_OPAL_\nval SCE_OPAL_SPACE=0\nval SCE_OPAL_COMMENT_BLOCK=1\nval SCE_OPAL_COMMENT_LINE=2\nval SCE_OPAL_INTEGER=3\nval SCE_OPAL_KEYWORD=4\nval SCE_OPAL_SORT=5\nval SCE_OPAL_STRING=6\nval SCE_OPAL_PAR=7\nval SCE_OPAL_BOOL_CONST=8\nval SCE_OPAL_DEFAULT=32\n# Lexical states for SCLEX_SPICE\nlex Spice=SCLEX_SPICE SCE_SPICE_\nval SCE_SPICE_DEFAULT=0\nval SCE_SPICE_IDENTIFIER=1\nval SCE_SPICE_KEYWORD=2\nval SCE_SPICE_KEYWORD2=3\nval SCE_SPICE_KEYWORD3=4\nval SCE_SPICE_NUMBER=5\nval SCE_SPICE_DELIMITER=6\nval SCE_SPICE_VALUE=7\nval SCE_SPICE_COMMENTLINE=8\n# Lexical states for SCLEX_CMAKE\nlex CMAKE=SCLEX_CMAKE SCE_CMAKE_\nval SCE_CMAKE_DEFAULT=0\nval SCE_CMAKE_COMMENT=1\nval SCE_CMAKE_STRINGDQ=2\nval SCE_CMAKE_STRINGLQ=3\nval SCE_CMAKE_STRINGRQ=4\nval SCE_CMAKE_COMMANDS=5\nval SCE_CMAKE_PARAMETERS=6\nval SCE_CMAKE_VARIABLE=7\nval SCE_CMAKE_USERDEFINED=8\nval SCE_CMAKE_WHILEDEF=9\nval SCE_CMAKE_FOREACHDEF=10\nval SCE_CMAKE_IFDEFINEDEF=11\nval SCE_CMAKE_MACRODEF=12\nval SCE_CMAKE_STRINGVAR=13\nval SCE_CMAKE_NUMBER=14\n# Lexical states for SCLEX_GAP\nlex Gap=SCLEX_GAP SCE_GAP_\nval SCE_GAP_DEFAULT=0\nval SCE_GAP_IDENTIFIER=1\nval SCE_GAP_KEYWORD=2\nval SCE_GAP_KEYWORD2=3\nval SCE_GAP_KEYWORD3=4\nval SCE_GAP_KEYWORD4=5\nval SCE_GAP_STRING=6\nval SCE_GAP_CHAR=7\nval SCE_GAP_OPERATOR=8\nval SCE_GAP_COMMENT=9\nval SCE_GAP_NUMBER=10\nval SCE_GAP_STRINGEOL=11\n# Lexical state for SCLEX_PLM\nlex PLM=SCLEX_PLM SCE_PLM_\nval SCE_PLM_DEFAULT=0\nval SCE_PLM_COMMENT=1\nval SCE_PLM_STRING=2\nval SCE_PLM_NUMBER=3\nval SCE_PLM_IDENTIFIER=4\nval SCE_PLM_OPERATOR=5\nval SCE_PLM_CONTROL=6\nval SCE_PLM_KEYWORD=7\n# Lexical state for SCLEX_PROGRESS\nlex Progress=SCLEX_PROGRESS SCE_ABL_\nval SCE_ABL_DEFAULT=0\nval SCE_ABL_NUMBER=1\nval SCE_ABL_WORD=2\nval SCE_ABL_STRING=3\nval SCE_ABL_CHARACTER=4\nval SCE_ABL_PREPROCESSOR=5\nval SCE_ABL_OPERATOR=6\nval SCE_ABL_IDENTIFIER=7\nval SCE_ABL_BLOCK=8\nval SCE_ABL_END=9\nval SCE_ABL_COMMENT=10\nval SCE_ABL_TASKMARKER=11\nval SCE_ABL_LINECOMMENT=12\nval SCE_ABL_ANNOTATION=13\nval SCE_ABL_TYPEDANNOTATION=14\n# Lexical states for SCLEX_ABAQUS\nlex ABAQUS=SCLEX_ABAQUS SCE_ABAQUS_\nval SCE_ABAQUS_DEFAULT=0\nval SCE_ABAQUS_COMMENT=1\nval SCE_ABAQUS_COMMENTBLOCK=2\nval SCE_ABAQUS_NUMBER=3\nval SCE_ABAQUS_STRING=4\nval SCE_ABAQUS_OPERATOR=5\nval SCE_ABAQUS_WORD=6\nval SCE_ABAQUS_PROCESSOR=7\nval SCE_ABAQUS_COMMAND=8\nval SCE_ABAQUS_SLASHCOMMAND=9\nval SCE_ABAQUS_STARCOMMAND=10\nval SCE_ABAQUS_ARGUMENT=11\nval SCE_ABAQUS_FUNCTION=12\n# Lexical states for SCLEX_ASYMPTOTE\nlex Asymptote=SCLEX_ASYMPTOTE SCE_ASY_\nval SCE_ASY_DEFAULT=0\nval SCE_ASY_COMMENT=1\nval SCE_ASY_COMMENTLINE=2\nval SCE_ASY_NUMBER=3\nval SCE_ASY_WORD=4\nval SCE_ASY_STRING=5\nval SCE_ASY_CHARACTER=6\nval SCE_ASY_OPERATOR=7\nval SCE_ASY_IDENTIFIER=8\nval SCE_ASY_STRINGEOL=9\nval SCE_ASY_COMMENTLINEDOC=10\nval SCE_ASY_WORD2=11\n# Lexical states for SCLEX_R\nlex R=SCLEX_R SCE_R_\nval SCE_R_DEFAULT=0\nval SCE_R_COMMENT=1\nval SCE_R_KWORD=2\nval SCE_R_BASEKWORD=3\nval SCE_R_OTHERKWORD=4\nval SCE_R_NUMBER=5\nval SCE_R_STRING=6\nval SCE_R_STRING2=7\nval SCE_R_OPERATOR=8\nval SCE_R_IDENTIFIER=9\nval SCE_R_INFIX=10\nval SCE_R_INFIXEOL=11\nval SCE_R_BACKTICKS=12\nval SCE_R_RAWSTRING=13\nval SCE_R_RAWSTRING2=14\nval SCE_R_ESCAPESEQUENCE=15\n# Lexical state for SCLEX_MAGIK\nlex MagikSF=SCLEX_MAGIK SCE_MAGIK_\nval SCE_MAGIK_DEFAULT=0\nval SCE_MAGIK_COMMENT=1\nval SCE_MAGIK_HYPER_COMMENT=16\nval SCE_MAGIK_STRING=2\nval SCE_MAGIK_CHARACTER=3\nval SCE_MAGIK_NUMBER=4\nval SCE_MAGIK_IDENTIFIER=5\nval SCE_MAGIK_OPERATOR=6\nval SCE_MAGIK_FLOW=7\nval SCE_MAGIK_CONTAINER=8\nval SCE_MAGIK_BRACKET_BLOCK=9\nval SCE_MAGIK_BRACE_BLOCK=10\nval SCE_MAGIK_SQBRACKET_BLOCK=11\nval SCE_MAGIK_UNKNOWN_KEYWORD=12\nval SCE_MAGIK_KEYWORD=13\nval SCE_MAGIK_PRAGMA=14\nval SCE_MAGIK_SYMBOL=15\n# Lexical state for SCLEX_POWERSHELL\nlex PowerShell=SCLEX_POWERSHELL SCE_POWERSHELL_\nval SCE_POWERSHELL_DEFAULT=0\nval SCE_POWERSHELL_COMMENT=1\nval SCE_POWERSHELL_STRING=2\nval SCE_POWERSHELL_CHARACTER=3\nval SCE_POWERSHELL_NUMBER=4\nval SCE_POWERSHELL_VARIABLE=5\nval SCE_POWERSHELL_OPERATOR=6\nval SCE_POWERSHELL_IDENTIFIER=7\nval SCE_POWERSHELL_KEYWORD=8\nval SCE_POWERSHELL_CMDLET=9\nval SCE_POWERSHELL_ALIAS=10\nval SCE_POWERSHELL_FUNCTION=11\nval SCE_POWERSHELL_USER1=12\nval SCE_POWERSHELL_COMMENTSTREAM=13\nval SCE_POWERSHELL_HERE_STRING=14\nval SCE_POWERSHELL_HERE_CHARACTER=15\nval SCE_POWERSHELL_COMMENTDOCKEYWORD=16\n# Lexical state for SCLEX_MYSQL\nlex MySQL=SCLEX_MYSQL SCE_MYSQL_\nval SCE_MYSQL_DEFAULT=0\nval SCE_MYSQL_COMMENT=1\nval SCE_MYSQL_COMMENTLINE=2\nval SCE_MYSQL_VARIABLE=3\nval SCE_MYSQL_SYSTEMVARIABLE=4\nval SCE_MYSQL_KNOWNSYSTEMVARIABLE=5\nval SCE_MYSQL_NUMBER=6\nval SCE_MYSQL_MAJORKEYWORD=7\nval SCE_MYSQL_KEYWORD=8\nval SCE_MYSQL_DATABASEOBJECT=9\nval SCE_MYSQL_PROCEDUREKEYWORD=10\nval SCE_MYSQL_STRING=11\nval SCE_MYSQL_SQSTRING=12\nval SCE_MYSQL_DQSTRING=13\nval SCE_MYSQL_OPERATOR=14\nval SCE_MYSQL_FUNCTION=15\nval SCE_MYSQL_IDENTIFIER=16\nval SCE_MYSQL_QUOTEDIDENTIFIER=17\nval SCE_MYSQL_USER1=18\nval SCE_MYSQL_USER2=19\nval SCE_MYSQL_USER3=20\nval SCE_MYSQL_HIDDENCOMMAND=21\nval SCE_MYSQL_PLACEHOLDER=22\n# Lexical state for SCLEX_PO\nlex Po=SCLEX_PO SCE_PO_\nval SCE_PO_DEFAULT=0\nval SCE_PO_COMMENT=1\nval SCE_PO_MSGID=2\nval SCE_PO_MSGID_TEXT=3\nval SCE_PO_MSGSTR=4\nval SCE_PO_MSGSTR_TEXT=5\nval SCE_PO_MSGCTXT=6\nval SCE_PO_MSGCTXT_TEXT=7\nval SCE_PO_FUZZY=8\nval SCE_PO_PROGRAMMER_COMMENT=9\nval SCE_PO_REFERENCE=10\nval SCE_PO_FLAGS=11\nval SCE_PO_MSGID_TEXT_EOL=12\nval SCE_PO_MSGSTR_TEXT_EOL=13\nval SCE_PO_MSGCTXT_TEXT_EOL=14\nval SCE_PO_ERROR=15\n# Lexical states for SCLEX_PASCAL\nlex Pascal=SCLEX_PASCAL SCE_PAS_\nval SCE_PAS_DEFAULT=0\nval SCE_PAS_IDENTIFIER=1\nval SCE_PAS_COMMENT=2\nval SCE_PAS_COMMENT2=3\nval SCE_PAS_COMMENTLINE=4\nval SCE_PAS_PREPROCESSOR=5\nval SCE_PAS_PREPROCESSOR2=6\nval SCE_PAS_NUMBER=7\nval SCE_PAS_HEXNUMBER=8\nval SCE_PAS_WORD=9\nval SCE_PAS_STRING=10\nval SCE_PAS_STRINGEOL=11\nval SCE_PAS_CHARACTER=12\nval SCE_PAS_OPERATOR=13\nval SCE_PAS_ASM=14\nval SCE_PAS_MULTILINESTRING=15\n# Lexical state for SCLEX_SORCUS\nlex SORCUS=SCLEX_SORCUS SCE_SORCUS_\nval SCE_SORCUS_DEFAULT=0\nval SCE_SORCUS_COMMAND=1\nval SCE_SORCUS_PARAMETER=2\nval SCE_SORCUS_COMMENTLINE=3\nval SCE_SORCUS_STRING=4\nval SCE_SORCUS_STRINGEOL=5\nval SCE_SORCUS_IDENTIFIER=6\nval SCE_SORCUS_OPERATOR=7\nval SCE_SORCUS_NUMBER=8\nval SCE_SORCUS_CONSTANT=9\n# Lexical state for SCLEX_POWERPRO\nlex PowerPro=SCLEX_POWERPRO SCE_POWERPRO_\nval SCE_POWERPRO_DEFAULT=0\nval SCE_POWERPRO_COMMENTBLOCK=1\nval SCE_POWERPRO_COMMENTLINE=2\nval SCE_POWERPRO_NUMBER=3\nval SCE_POWERPRO_WORD=4\nval SCE_POWERPRO_WORD2=5\nval SCE_POWERPRO_WORD3=6\nval SCE_POWERPRO_WORD4=7\nval SCE_POWERPRO_DOUBLEQUOTEDSTRING=8\nval SCE_POWERPRO_SINGLEQUOTEDSTRING=9\nval SCE_POWERPRO_LINECONTINUE=10\nval SCE_POWERPRO_OPERATOR=11\nval SCE_POWERPRO_IDENTIFIER=12\nval SCE_POWERPRO_STRINGEOL=13\nval SCE_POWERPRO_VERBATIM=14\nval SCE_POWERPRO_ALTQUOTE=15\nval SCE_POWERPRO_FUNCTION=16\n# Lexical states for SCLEX_SML\nlex SML=SCLEX_SML SCE_SML_\nval SCE_SML_DEFAULT=0\nval SCE_SML_IDENTIFIER=1\nval SCE_SML_TAGNAME=2\nval SCE_SML_KEYWORD=3\nval SCE_SML_KEYWORD2=4\nval SCE_SML_KEYWORD3=5\nval SCE_SML_LINENUM=6\nval SCE_SML_OPERATOR=7\nval SCE_SML_NUMBER=8\nval SCE_SML_CHAR=9\nval SCE_SML_STRING=11\nval SCE_SML_COMMENT=12\nval SCE_SML_COMMENT1=13\nval SCE_SML_COMMENT2=14\nval SCE_SML_COMMENT3=15\n# Lexical state for SCLEX_MARKDOWN\nlex Markdown=SCLEX_MARKDOWN SCE_MARKDOWN_\nval SCE_MARKDOWN_DEFAULT=0\nval SCE_MARKDOWN_LINE_BEGIN=1\nval SCE_MARKDOWN_STRONG1=2\nval SCE_MARKDOWN_STRONG2=3\nval SCE_MARKDOWN_EM1=4\nval SCE_MARKDOWN_EM2=5\nval SCE_MARKDOWN_HEADER1=6\nval SCE_MARKDOWN_HEADER2=7\nval SCE_MARKDOWN_HEADER3=8\nval SCE_MARKDOWN_HEADER4=9\nval SCE_MARKDOWN_HEADER5=10\nval SCE_MARKDOWN_HEADER6=11\nval SCE_MARKDOWN_PRECHAR=12\nval SCE_MARKDOWN_ULIST_ITEM=13\nval SCE_MARKDOWN_OLIST_ITEM=14\nval SCE_MARKDOWN_BLOCKQUOTE=15\nval SCE_MARKDOWN_STRIKEOUT=16\nval SCE_MARKDOWN_HRULE=17\nval SCE_MARKDOWN_LINK=18\nval SCE_MARKDOWN_CODE=19\nval SCE_MARKDOWN_CODE2=20\nval SCE_MARKDOWN_CODEBK=21\n# Lexical state for SCLEX_TXT2TAGS\nlex Txt2tags=SCLEX_TXT2TAGS SCE_TXT2TAGS_\nval SCE_TXT2TAGS_DEFAULT=0\nval SCE_TXT2TAGS_LINE_BEGIN=1\nval SCE_TXT2TAGS_STRONG1=2\nval SCE_TXT2TAGS_STRONG2=3\nval SCE_TXT2TAGS_EM1=4\nval SCE_TXT2TAGS_EM2=5\nval SCE_TXT2TAGS_HEADER1=6\nval SCE_TXT2TAGS_HEADER2=7\nval SCE_TXT2TAGS_HEADER3=8\nval SCE_TXT2TAGS_HEADER4=9\nval SCE_TXT2TAGS_HEADER5=10\nval SCE_TXT2TAGS_HEADER6=11\nval SCE_TXT2TAGS_PRECHAR=12\nval SCE_TXT2TAGS_ULIST_ITEM=13\nval SCE_TXT2TAGS_OLIST_ITEM=14\nval SCE_TXT2TAGS_BLOCKQUOTE=15\nval SCE_TXT2TAGS_STRIKEOUT=16\nval SCE_TXT2TAGS_HRULE=17\nval SCE_TXT2TAGS_LINK=18\nval SCE_TXT2TAGS_CODE=19\nval SCE_TXT2TAGS_CODE2=20\nval SCE_TXT2TAGS_CODEBK=21\nval SCE_TXT2TAGS_COMMENT=22\nval SCE_TXT2TAGS_OPTION=23\nval SCE_TXT2TAGS_PREPROC=24\nval SCE_TXT2TAGS_POSTPROC=25\n# Lexical states for SCLEX_A68K\nlex A68k=SCLEX_A68K SCE_A68K_\nval SCE_A68K_DEFAULT=0\nval SCE_A68K_COMMENT=1\nval SCE_A68K_NUMBER_DEC=2\nval SCE_A68K_NUMBER_BIN=3\nval SCE_A68K_NUMBER_HEX=4\nval SCE_A68K_STRING1=5\nval SCE_A68K_OPERATOR=6\nval SCE_A68K_CPUINSTRUCTION=7\nval SCE_A68K_EXTINSTRUCTION=8\nval SCE_A68K_REGISTER=9\nval SCE_A68K_DIRECTIVE=10\nval SCE_A68K_MACRO_ARG=11\nval SCE_A68K_LABEL=12\nval SCE_A68K_STRING2=13\nval SCE_A68K_IDENTIFIER=14\nval SCE_A68K_MACRO_DECLARATION=15\nval SCE_A68K_COMMENT_WORD=16\nval SCE_A68K_COMMENT_SPECIAL=17\nval SCE_A68K_COMMENT_DOXYGEN=18\n# Lexical states for SCLEX_MODULA\nlex Modula=SCLEX_MODULA SCE_MODULA_\nval SCE_MODULA_DEFAULT=0\nval SCE_MODULA_COMMENT=1\nval SCE_MODULA_DOXYCOMM=2\nval SCE_MODULA_DOXYKEY=3\nval SCE_MODULA_KEYWORD=4\nval SCE_MODULA_RESERVED=5\nval SCE_MODULA_NUMBER=6\nval SCE_MODULA_BASENUM=7\nval SCE_MODULA_FLOAT=8\nval SCE_MODULA_STRING=9\nval SCE_MODULA_STRSPEC=10\nval SCE_MODULA_CHAR=11\nval SCE_MODULA_CHARSPEC=12\nval SCE_MODULA_PROC=13\nval SCE_MODULA_PRAGMA=14\nval SCE_MODULA_PRGKEY=15\nval SCE_MODULA_OPERATOR=16\nval SCE_MODULA_BADSTR=17\n# Lexical states for SCLEX_COFFEESCRIPT\nlex CoffeeScript=SCLEX_COFFEESCRIPT SCE_COFFEESCRIPT_\nval SCE_COFFEESCRIPT_DEFAULT=0\nval SCE_COFFEESCRIPT_COMMENT=1\nval SCE_COFFEESCRIPT_COMMENTLINE=2\nval SCE_COFFEESCRIPT_COMMENTDOC=3\nval SCE_COFFEESCRIPT_NUMBER=4\nval SCE_COFFEESCRIPT_WORD=5\nval SCE_COFFEESCRIPT_STRING=6\nval SCE_COFFEESCRIPT_CHARACTER=7\nval SCE_COFFEESCRIPT_UUID=8\nval SCE_COFFEESCRIPT_PREPROCESSOR=9\nval SCE_COFFEESCRIPT_OPERATOR=10\nval SCE_COFFEESCRIPT_IDENTIFIER=11\nval SCE_COFFEESCRIPT_STRINGEOL=12\nval SCE_COFFEESCRIPT_VERBATIM=13\nval SCE_COFFEESCRIPT_REGEX=14\nval SCE_COFFEESCRIPT_COMMENTLINEDOC=15\nval SCE_COFFEESCRIPT_WORD2=16\nval SCE_COFFEESCRIPT_COMMENTDOCKEYWORD=17\nval SCE_COFFEESCRIPT_COMMENTDOCKEYWORDERROR=18\nval SCE_COFFEESCRIPT_GLOBALCLASS=19\nval SCE_COFFEESCRIPT_STRINGRAW=20\nval SCE_COFFEESCRIPT_TRIPLEVERBATIM=21\nval SCE_COFFEESCRIPT_COMMENTBLOCK=22\nval SCE_COFFEESCRIPT_VERBOSE_REGEX=23\nval SCE_COFFEESCRIPT_VERBOSE_REGEX_COMMENT=24\nval SCE_COFFEESCRIPT_INSTANCEPROPERTY=25\n# Lexical states for SCLEX_AVS\nlex AVS=SCLEX_AVS SCE_AVS_\nval SCE_AVS_DEFAULT=0\nval SCE_AVS_COMMENTBLOCK=1\nval SCE_AVS_COMMENTBLOCKN=2\nval SCE_AVS_COMMENTLINE=3\nval SCE_AVS_NUMBER=4\nval SCE_AVS_OPERATOR=5\nval SCE_AVS_IDENTIFIER=6\nval SCE_AVS_STRING=7\nval SCE_AVS_TRIPLESTRING=8\nval SCE_AVS_KEYWORD=9\nval SCE_AVS_FILTER=10\nval SCE_AVS_PLUGIN=11\nval SCE_AVS_FUNCTION=12\nval SCE_AVS_CLIPPROP=13\nval SCE_AVS_USERDFN=14\n# Lexical states for SCLEX_ECL\nlex ECL=SCLEX_ECL SCE_ECL_\nval SCE_ECL_DEFAULT=0\nval SCE_ECL_COMMENT=1\nval SCE_ECL_COMMENTLINE=2\nval SCE_ECL_NUMBER=3\nval SCE_ECL_STRING=4\nval SCE_ECL_WORD0=5\nval SCE_ECL_OPERATOR=6\nval SCE_ECL_CHARACTER=7\nval SCE_ECL_UUID=8\nval SCE_ECL_PREPROCESSOR=9\nval SCE_ECL_UNKNOWN=10\nval SCE_ECL_IDENTIFIER=11\nval SCE_ECL_STRINGEOL=12\nval SCE_ECL_VERBATIM=13\nval SCE_ECL_REGEX=14\nval SCE_ECL_COMMENTLINEDOC=15\nval SCE_ECL_WORD1=16\nval SCE_ECL_COMMENTDOCKEYWORD=17\nval SCE_ECL_COMMENTDOCKEYWORDERROR=18\nval SCE_ECL_WORD2=19\nval SCE_ECL_WORD3=20\nval SCE_ECL_WORD4=21\nval SCE_ECL_WORD5=22\nval SCE_ECL_COMMENTDOC=23\nval SCE_ECL_ADDED=24\nval SCE_ECL_DELETED=25\nval SCE_ECL_CHANGED=26\nval SCE_ECL_MOVED=27\n# Lexical states for SCLEX_OSCRIPT\nlex OScript=SCLEX_OSCRIPT SCE_OSCRIPT_\nval SCE_OSCRIPT_DEFAULT=0\nval SCE_OSCRIPT_LINE_COMMENT=1\nval SCE_OSCRIPT_BLOCK_COMMENT=2\nval SCE_OSCRIPT_DOC_COMMENT=3\nval SCE_OSCRIPT_PREPROCESSOR=4\nval SCE_OSCRIPT_NUMBER=5\nval SCE_OSCRIPT_SINGLEQUOTE_STRING=6\nval SCE_OSCRIPT_DOUBLEQUOTE_STRING=7\nval SCE_OSCRIPT_CONSTANT=8\nval SCE_OSCRIPT_IDENTIFIER=9\nval SCE_OSCRIPT_GLOBAL=10\nval SCE_OSCRIPT_KEYWORD=11\nval SCE_OSCRIPT_OPERATOR=12\nval SCE_OSCRIPT_LABEL=13\nval SCE_OSCRIPT_TYPE=14\nval SCE_OSCRIPT_FUNCTION=15\nval SCE_OSCRIPT_OBJECT=16\nval SCE_OSCRIPT_PROPERTY=17\nval SCE_OSCRIPT_METHOD=18\n# Lexical states for SCLEX_VISUALPROLOG\nlex VisualProlog=SCLEX_VISUALPROLOG SCE_VISUALPROLOG_\nval SCE_VISUALPROLOG_DEFAULT=0\nval SCE_VISUALPROLOG_KEY_MAJOR=1\nval SCE_VISUALPROLOG_KEY_MINOR=2\nval SCE_VISUALPROLOG_KEY_DIRECTIVE=3\nval SCE_VISUALPROLOG_COMMENT_BLOCK=4\nval SCE_VISUALPROLOG_COMMENT_LINE=5\nval SCE_VISUALPROLOG_COMMENT_KEY=6\nval SCE_VISUALPROLOG_COMMENT_KEY_ERROR=7\nval SCE_VISUALPROLOG_IDENTIFIER=8\nval SCE_VISUALPROLOG_VARIABLE=9\nval SCE_VISUALPROLOG_ANONYMOUS=10\nval SCE_VISUALPROLOG_NUMBER=11\nval SCE_VISUALPROLOG_OPERATOR=12\nval SCE_VISUALPROLOG_UNUSED1=13\nval SCE_VISUALPROLOG_UNUSED2=14\nval SCE_VISUALPROLOG_UNUSED3=15\nval SCE_VISUALPROLOG_STRING_QUOTE=16\nval SCE_VISUALPROLOG_STRING_ESCAPE=17\nval SCE_VISUALPROLOG_STRING_ESCAPE_ERROR=18\nval SCE_VISUALPROLOG_UNUSED4=19\nval SCE_VISUALPROLOG_STRING=20\nval SCE_VISUALPROLOG_UNUSED5=21\nval SCE_VISUALPROLOG_STRING_EOL=22\nval SCE_VISUALPROLOG_EMBEDDED=23\nval SCE_VISUALPROLOG_PLACEHOLDER=24\n# Lexical states for SCLEX_STTXT\nlex StructuredText=SCLEX_STTXT SCE_STTXT_\nval SCE_STTXT_DEFAULT=0\nval SCE_STTXT_COMMENT=1\nval SCE_STTXT_COMMENTLINE=2\nval SCE_STTXT_KEYWORD=3\nval SCE_STTXT_TYPE=4\nval SCE_STTXT_FUNCTION=5\nval SCE_STTXT_FB=6\nval SCE_STTXT_NUMBER=7\nval SCE_STTXT_HEXNUMBER=8\nval SCE_STTXT_PRAGMA=9\nval SCE_STTXT_OPERATOR=10\nval SCE_STTXT_CHARACTER=11\nval SCE_STTXT_STRING1=12\nval SCE_STTXT_STRING2=13\nval SCE_STTXT_STRINGEOL=14\nval SCE_STTXT_IDENTIFIER=15\nval SCE_STTXT_DATETIME=16\nval SCE_STTXT_VARS=17\nval SCE_STTXT_PRAGMAS=18\n# Lexical states for SCLEX_KVIRC\nlex KVIrc=SCLEX_KVIRC SCE_KVIRC_\nval SCE_KVIRC_DEFAULT=0\nval SCE_KVIRC_COMMENT=1\nval SCE_KVIRC_COMMENTBLOCK=2\nval SCE_KVIRC_STRING=3\nval SCE_KVIRC_WORD=4\nval SCE_KVIRC_KEYWORD=5\nval SCE_KVIRC_FUNCTION_KEYWORD=6\nval SCE_KVIRC_FUNCTION=7\nval SCE_KVIRC_VARIABLE=8\nval SCE_KVIRC_NUMBER=9\nval SCE_KVIRC_OPERATOR=10\nval SCE_KVIRC_STRING_FUNCTION=11\nval SCE_KVIRC_STRING_VARIABLE=12\n# Lexical states for SCLEX_RUST\nlex Rust=SCLEX_RUST SCE_RUST_\nval SCE_RUST_DEFAULT=0\nval SCE_RUST_COMMENTBLOCK=1\nval SCE_RUST_COMMENTLINE=2\nval SCE_RUST_COMMENTBLOCKDOC=3\nval SCE_RUST_COMMENTLINEDOC=4\nval SCE_RUST_NUMBER=5\nval SCE_RUST_WORD=6\nval SCE_RUST_WORD2=7\nval SCE_RUST_WORD3=8\nval SCE_RUST_WORD4=9\nval SCE_RUST_WORD5=10\nval SCE_RUST_WORD6=11\nval SCE_RUST_WORD7=12\nval SCE_RUST_STRING=13\nval SCE_RUST_STRINGR=14\nval SCE_RUST_CHARACTER=15\nval SCE_RUST_OPERATOR=16\nval SCE_RUST_IDENTIFIER=17\nval SCE_RUST_LIFETIME=18\nval SCE_RUST_MACRO=19\nval SCE_RUST_LEXERROR=20\nval SCE_RUST_BYTESTRING=21\nval SCE_RUST_BYTESTRINGR=22\nval SCE_RUST_BYTECHARACTER=23\nval SCE_RUST_CSTRING=24\nval SCE_RUST_CSTRINGR=25\n# Lexical states for SCLEX_DMAP\nlex DMAP=SCLEX_DMAP SCE_DMAP_\nval SCE_DMAP_DEFAULT=0\nval SCE_DMAP_COMMENT=1\nval SCE_DMAP_NUMBER=2\nval SCE_DMAP_STRING1=3\nval SCE_DMAP_STRING2=4\nval SCE_DMAP_STRINGEOL=5\nval SCE_DMAP_OPERATOR=6\nval SCE_DMAP_IDENTIFIER=7\nval SCE_DMAP_WORD=8\nval SCE_DMAP_WORD2=9\nval SCE_DMAP_WORD3=10\n# Lexical states for SCLEX_DMIS\nlex DMIS=SCLEX_DMIS SCE_DMIS_\nval SCE_DMIS_DEFAULT=0\nval SCE_DMIS_COMMENT=1\nval SCE_DMIS_STRING=2\nval SCE_DMIS_NUMBER=3\nval SCE_DMIS_KEYWORD=4\nval SCE_DMIS_MAJORWORD=5\nval SCE_DMIS_MINORWORD=6\nval SCE_DMIS_UNSUPPORTED_MAJOR=7\nval SCE_DMIS_UNSUPPORTED_MINOR=8\nval SCE_DMIS_LABEL=9\n# Lexical states for SCLEX_REGISTRY\nlex REG=SCLEX_REGISTRY SCE_REG_\nval SCE_REG_DEFAULT=0\nval SCE_REG_COMMENT=1\nval SCE_REG_VALUENAME=2\nval SCE_REG_STRING=3\nval SCE_REG_HEXDIGIT=4\nval SCE_REG_VALUETYPE=5\nval SCE_REG_ADDEDKEY=6\nval SCE_REG_DELETEDKEY=7\nval SCE_REG_ESCAPED=8\nval SCE_REG_KEYPATH_GUID=9\nval SCE_REG_STRING_GUID=10\nval SCE_REG_PARAMETER=11\nval SCE_REG_OPERATOR=12\n# Lexical state for SCLEX_BIBTEX\nlex BibTeX=SCLEX_BIBTEX SCE_BIBTEX_\nval SCE_BIBTEX_DEFAULT=0\nval SCE_BIBTEX_ENTRY=1\nval SCE_BIBTEX_UNKNOWN_ENTRY=2\nval SCE_BIBTEX_KEY=3\nval SCE_BIBTEX_PARAMETER=4\nval SCE_BIBTEX_VALUE=5\nval SCE_BIBTEX_COMMENT=6\n# Lexical state for SCLEX_SREC\nlex Srec=SCLEX_SREC SCE_HEX_\nval SCE_HEX_DEFAULT=0\nval SCE_HEX_RECSTART=1\nval SCE_HEX_RECTYPE=2\nval SCE_HEX_RECTYPE_UNKNOWN=3\nval SCE_HEX_BYTECOUNT=4\nval SCE_HEX_BYTECOUNT_WRONG=5\nval SCE_HEX_NOADDRESS=6\nval SCE_HEX_DATAADDRESS=7\nval SCE_HEX_RECCOUNT=8\nval SCE_HEX_STARTADDRESS=9\nval SCE_HEX_ADDRESSFIELD_UNKNOWN=10\nval SCE_HEX_EXTENDEDADDRESS=11\nval SCE_HEX_DATA_ODD=12\nval SCE_HEX_DATA_EVEN=13\nval SCE_HEX_DATA_UNKNOWN=14\nval SCE_HEX_DATA_EMPTY=15\nval SCE_HEX_CHECKSUM=16\nval SCE_HEX_CHECKSUM_WRONG=17\nval SCE_HEX_GARBAGE=18\n# Lexical state for SCLEX_IHEX (shared with Srec)\nlex IHex=SCLEX_IHEX SCE_HEX_\n# Lexical state for SCLEX_TEHEX (shared with Srec)\nlex TEHex=SCLEX_TEHEX SCE_HEX_\n# Lexical states for SCLEX_JSON\nlex JSON=SCLEX_JSON SCE_JSON_\nval SCE_JSON_DEFAULT=0\nval SCE_JSON_NUMBER=1\nval SCE_JSON_STRING=2\nval SCE_JSON_STRINGEOL=3\nval SCE_JSON_PROPERTYNAME=4\nval SCE_JSON_ESCAPESEQUENCE=5\nval SCE_JSON_LINECOMMENT=6\nval SCE_JSON_BLOCKCOMMENT=7\nval SCE_JSON_OPERATOR=8\nval SCE_JSON_URI=9\nval SCE_JSON_COMPACTIRI=10\nval SCE_JSON_KEYWORD=11\nval SCE_JSON_LDKEYWORD=12\nval SCE_JSON_ERROR=13\nlex EDIFACT=SCLEX_EDIFACT SCE_EDI_\nval SCE_EDI_DEFAULT=0\nval SCE_EDI_SEGMENTSTART=1\nval SCE_EDI_SEGMENTEND=2\nval SCE_EDI_SEP_ELEMENT=3\nval SCE_EDI_SEP_COMPOSITE=4\nval SCE_EDI_SEP_RELEASE=5\nval SCE_EDI_UNA=6\nval SCE_EDI_UNH=7\nval SCE_EDI_BADSEGMENT=8\n# Lexical states for SCLEX_STATA\nlex STATA=SCLEX_STATA SCE_STATA_\nval SCE_STATA_DEFAULT=0\nval SCE_STATA_COMMENT=1\nval SCE_STATA_COMMENTLINE=2\nval SCE_STATA_COMMENTBLOCK=3\nval SCE_STATA_NUMBER=4\nval SCE_STATA_OPERATOR=5\nval SCE_STATA_IDENTIFIER=6\nval SCE_STATA_STRING=7\nval SCE_STATA_TYPE=8\nval SCE_STATA_WORD=9\nval SCE_STATA_GLOBAL_MACRO=10\nval SCE_STATA_MACRO=11\n# Lexical states for SCLEX_SAS\nlex SAS=SCLEX_SAS SCE_SAS_\nval SCE_SAS_DEFAULT=0\nval SCE_SAS_COMMENT=1\nval SCE_SAS_COMMENTLINE=2\nval SCE_SAS_COMMENTBLOCK=3\nval SCE_SAS_NUMBER=4\nval SCE_SAS_OPERATOR=5\nval SCE_SAS_IDENTIFIER=6\nval SCE_SAS_STRING=7\nval SCE_SAS_TYPE=8\nval SCE_SAS_WORD=9\nval SCE_SAS_GLOBAL_MACRO=10\nval SCE_SAS_MACRO=11\nval SCE_SAS_MACRO_KEYWORD=12\nval SCE_SAS_BLOCK_KEYWORD=13\nval SCE_SAS_MACRO_FUNCTION=14\nval SCE_SAS_STATEMENT=15\n# Lexical states for SCLEX_NIM\nlex Nim=SCLEX_NIM SCE_NIM_\nval SCE_NIM_DEFAULT=0\nval SCE_NIM_COMMENT=1\nval SCE_NIM_COMMENTDOC=2\nval SCE_NIM_COMMENTLINE=3\nval SCE_NIM_COMMENTLINEDOC=4\nval SCE_NIM_NUMBER=5\nval SCE_NIM_STRING=6\nval SCE_NIM_CHARACTER=7\nval SCE_NIM_WORD=8\nval SCE_NIM_TRIPLE=9\nval SCE_NIM_TRIPLEDOUBLE=10\nval SCE_NIM_BACKTICKS=11\nval SCE_NIM_FUNCNAME=12\nval SCE_NIM_STRINGEOL=13\nval SCE_NIM_NUMERROR=14\nval SCE_NIM_OPERATOR=15\nval SCE_NIM_IDENTIFIER=16\n# Lexical states for SCLEX_CIL\nlex CIL=SCLEX_CIL SCE_CIL_\nval SCE_CIL_DEFAULT=0\nval SCE_CIL_COMMENT=1\nval SCE_CIL_COMMENTLINE=2\nval SCE_CIL_WORD=3\nval SCE_CIL_WORD2=4\nval SCE_CIL_WORD3=5\nval SCE_CIL_STRING=6\nval SCE_CIL_LABEL=7\nval SCE_CIL_OPERATOR=8\nval SCE_CIL_IDENTIFIER=9\nval SCE_CIL_STRINGEOL=10\n# Lexical states for SCLEX_X12\nlex X12=SCLEX_X12 SCE_X12_\nval SCE_X12_DEFAULT=0\nval SCE_X12_BAD=1\nval SCE_X12_ENVELOPE=2\nval SCE_X12_FUNCTIONGROUP=3\nval SCE_X12_TRANSACTIONSET=4\nval SCE_X12_SEGMENTHEADER=5\nval SCE_X12_SEGMENTEND=6\nval SCE_X12_SEP_ELEMENT=7\nval SCE_X12_SEP_SUBELEMENT=8\n# Lexical states for SCLEX_DATAFLEX\nlex Dataflex=SCLEX_DATAFLEX SCE_DF_\nval SCE_DF_DEFAULT=0\nval SCE_DF_IDENTIFIER=1\nval SCE_DF_METATAG=2\nval SCE_DF_IMAGE=3\nval SCE_DF_COMMENTLINE=4\nval SCE_DF_PREPROCESSOR=5\nval SCE_DF_PREPROCESSOR2=6\nval SCE_DF_NUMBER=7\nval SCE_DF_HEXNUMBER=8\nval SCE_DF_WORD=9\nval SCE_DF_STRING=10\nval SCE_DF_STRINGEOL=11\nval SCE_DF_SCOPEWORD=12\nval SCE_DF_OPERATOR=13\nval SCE_DF_ICODE=14\n# Lexical states for SCLEX_HOLLYWOOD\nlex Hollywood=SCLEX_HOLLYWOOD SCE_HOLLYWOOD_\nval SCE_HOLLYWOOD_DEFAULT=0\nval SCE_HOLLYWOOD_COMMENT=1\nval SCE_HOLLYWOOD_COMMENTBLOCK=2\nval SCE_HOLLYWOOD_NUMBER=3\nval SCE_HOLLYWOOD_KEYWORD=4\nval SCE_HOLLYWOOD_STDAPI=5\nval SCE_HOLLYWOOD_PLUGINAPI=6\nval SCE_HOLLYWOOD_PLUGINMETHOD=7\nval SCE_HOLLYWOOD_STRING=8\nval SCE_HOLLYWOOD_STRINGBLOCK=9\nval SCE_HOLLYWOOD_PREPROCESSOR=10\nval SCE_HOLLYWOOD_OPERATOR=11\nval SCE_HOLLYWOOD_IDENTIFIER=12\nval SCE_HOLLYWOOD_CONSTANT=13\nval SCE_HOLLYWOOD_HEXNUMBER=14\n# Lexical states for SCLEX_RAKU\nlex Raku=SCLEX_RAKU SCE_RAKU_\nval SCE_RAKU_DEFAULT=0\nval SCE_RAKU_ERROR=1\nval SCE_RAKU_COMMENTLINE=2\nval SCE_RAKU_COMMENTEMBED=3\nval SCE_RAKU_POD=4\nval SCE_RAKU_CHARACTER=5\nval SCE_RAKU_HEREDOC_Q=6\nval SCE_RAKU_HEREDOC_QQ=7\nval SCE_RAKU_STRING=8\nval SCE_RAKU_STRING_Q=9\nval SCE_RAKU_STRING_QQ=10\nval SCE_RAKU_STRING_Q_LANG=11\nval SCE_RAKU_STRING_VAR=12\nval SCE_RAKU_REGEX=13\nval SCE_RAKU_REGEX_VAR=14\nval SCE_RAKU_ADVERB=15\nval SCE_RAKU_NUMBER=16\nval SCE_RAKU_PREPROCESSOR=17\nval SCE_RAKU_OPERATOR=18\nval SCE_RAKU_WORD=19\nval SCE_RAKU_FUNCTION=20\nval SCE_RAKU_IDENTIFIER=21\nval SCE_RAKU_TYPEDEF=22\nval SCE_RAKU_MU=23\nval SCE_RAKU_POSITIONAL=24\nval SCE_RAKU_ASSOCIATIVE=25\nval SCE_RAKU_CALLABLE=26\nval SCE_RAKU_GRAMMAR=27\nval SCE_RAKU_CLASS=28\n# Lexical states for SCLEX_FSHARP\nlex FSharp=SCLEX_FSHARP SCE_FSHARP_\nval SCE_FSHARP_DEFAULT=0\nval SCE_FSHARP_KEYWORD=1\nval SCE_FSHARP_KEYWORD2=2\nval SCE_FSHARP_KEYWORD3=3\nval SCE_FSHARP_KEYWORD4=4\nval SCE_FSHARP_KEYWORD5=5\nval SCE_FSHARP_IDENTIFIER=6\nval SCE_FSHARP_QUOT_IDENTIFIER=7\nval SCE_FSHARP_COMMENT=8\nval SCE_FSHARP_COMMENTLINE=9\nval SCE_FSHARP_PREPROCESSOR=10\nval SCE_FSHARP_LINENUM=11\nval SCE_FSHARP_OPERATOR=12\nval SCE_FSHARP_NUMBER=13\nval SCE_FSHARP_CHARACTER=14\nval SCE_FSHARP_STRING=15\nval SCE_FSHARP_VERBATIM=16\nval SCE_FSHARP_QUOTATION=17\nval SCE_FSHARP_ATTRIBUTE=18\nval SCE_FSHARP_FORMAT_SPEC=19\n# Lexical states for SCLEX_ASCIIDOC\nlex Asciidoc=SCLEX_ASCIIDOC SCE_ASCIIDOC_\nval SCE_ASCIIDOC_DEFAULT=0\nval SCE_ASCIIDOC_STRONG1=1\nval SCE_ASCIIDOC_STRONG2=2\nval SCE_ASCIIDOC_EM1=3\nval SCE_ASCIIDOC_EM2=4\nval SCE_ASCIIDOC_HEADER1=5\nval SCE_ASCIIDOC_HEADER2=6\nval SCE_ASCIIDOC_HEADER3=7\nval SCE_ASCIIDOC_HEADER4=8\nval SCE_ASCIIDOC_HEADER5=9\nval SCE_ASCIIDOC_HEADER6=10\nval SCE_ASCIIDOC_ULIST_ITEM=11\nval SCE_ASCIIDOC_OLIST_ITEM=12\nval SCE_ASCIIDOC_BLOCKQUOTE=13\nval SCE_ASCIIDOC_LINK=14\nval SCE_ASCIIDOC_CODEBK=15\nval SCE_ASCIIDOC_PASSBK=16\nval SCE_ASCIIDOC_COMMENT=17\nval SCE_ASCIIDOC_COMMENTBK=18\nval SCE_ASCIIDOC_LITERAL=19\nval SCE_ASCIIDOC_LITERALBK=20\nval SCE_ASCIIDOC_ATTRIB=21\nval SCE_ASCIIDOC_ATTRIBVAL=22\nval SCE_ASCIIDOC_MACRO=23\n# Lexical states for SCLEX_GDSCRIPT\nlex GDScript=SCLEX_GDSCRIPT SCE_GD_\nval SCE_GD_DEFAULT=0\nval SCE_GD_COMMENTLINE=1\nval SCE_GD_NUMBER=2\nval SCE_GD_STRING=3\nval SCE_GD_CHARACTER=4\nval SCE_GD_WORD=5\nval SCE_GD_TRIPLE=6\nval SCE_GD_TRIPLEDOUBLE=7\nval SCE_GD_CLASSNAME=8\nval SCE_GD_FUNCNAME=9\nval SCE_GD_OPERATOR=10\nval SCE_GD_IDENTIFIER=11\nval SCE_GD_COMMENTBLOCK=12\nval SCE_GD_STRINGEOL=13\nval SCE_GD_WORD2=14\nval SCE_GD_ANNOTATION=15\nval SCE_GD_NODEPATH=16\n# Lexical states for SCLEX_TOML\nlex TOML=SCLEX_TOML SCE_TOML_\nval SCE_TOML_DEFAULT=0\nval SCE_TOML_COMMENT=1\nval SCE_TOML_IDENTIFIER=2\nval SCE_TOML_KEYWORD=3\nval SCE_TOML_NUMBER=4\nval SCE_TOML_TABLE=5\nval SCE_TOML_KEY=6\nval SCE_TOML_ERROR=7\nval SCE_TOML_OPERATOR=8\nval SCE_TOML_STRING_SQ=9\nval SCE_TOML_STRING_DQ=10\nval SCE_TOML_TRIPLE_STRING_SQ=11\nval SCE_TOML_TRIPLE_STRING_DQ=12\nval SCE_TOML_ESCAPECHAR=13\nval SCE_TOML_DATETIME=14\nval SCE_TOML_STRINGEOL=15\n# Lexical states for SCLEX_TROFF\nlex troff=SCLEX_TROFF SCE_TROFF_\nval SCE_TROFF_DEFAULT=0\nval SCE_TROFF_REQUEST=1\nval SCE_TROFF_COMMAND=2\nval SCE_TROFF_NUMBER=3\nval SCE_TROFF_OPERATOR=4\nval SCE_TROFF_STRING=5\nval SCE_TROFF_COMMENT=6\nval SCE_TROFF_IGNORE=7\nval SCE_TROFF_ESCAPE_STRING=8\nval SCE_TROFF_ESCAPE_MACRO=9\nval SCE_TROFF_ESCAPE_FONT=10\nval SCE_TROFF_ESCAPE_NUMBER=11\nval SCE_TROFF_ESCAPE_COLOUR=12\nval SCE_TROFF_ESCAPE_GLYPH=13\nval SCE_TROFF_ESCAPE_ENV=14\nval SCE_TROFF_ESCAPE_SUPPRESSION=15\nval SCE_TROFF_ESCAPE_SIZE=16\nval SCE_TROFF_ESCAPE_TRANSPARENT=17\nval SCE_TROFF_ESCAPE_ISVALID=18\nval SCE_TROFF_ESCAPE_DRAW=19\nval SCE_TROFF_ESCAPE_MOVE=20\nval SCE_TROFF_ESCAPE_HEIGHT=21\nval SCE_TROFF_ESCAPE_OVERSTRIKE=22\nval SCE_TROFF_ESCAPE_SLANT=23\nval SCE_TROFF_ESCAPE_WIDTH=24\nval SCE_TROFF_ESCAPE_VSPACING=25\nval SCE_TROFF_ESCAPE_DEVICE=26\nval SCE_TROFF_ESCAPE_NOMOVE=27\n# Lexical states for SCLEX_DART\nlex Dart=SCLEX_DART SCE_DART_\nval SCE_DART_DEFAULT=0\nval SCE_DART_COMMENTLINE=1\nval SCE_DART_COMMENTLINEDOC=2\nval SCE_DART_COMMENTBLOCK=3\nval SCE_DART_COMMENTBLOCKDOC=4\nval SCE_DART_STRING_SQ=5\nval SCE_DART_STRING_DQ=6\nval SCE_DART_TRIPLE_STRING_SQ=7\nval SCE_DART_TRIPLE_STRING_DQ=8\nval SCE_DART_RAWSTRING_SQ=9\nval SCE_DART_RAWSTRING_DQ=10\nval SCE_DART_TRIPLE_RAWSTRING_SQ=11\nval SCE_DART_TRIPLE_RAWSTRING_DQ=12\nval SCE_DART_ESCAPECHAR=13\nval SCE_DART_IDENTIFIER=14\nval SCE_DART_IDENTIFIER_STRING=15\nval SCE_DART_OPERATOR=16\nval SCE_DART_OPERATOR_STRING=17\nval SCE_DART_SYMBOL_IDENTIFIER=18\nval SCE_DART_SYMBOL_OPERATOR=19\nval SCE_DART_NUMBER=20\nval SCE_DART_KEY=21\nval SCE_DART_METADATA=22\nval SCE_DART_KW_PRIMARY=23\nval SCE_DART_KW_SECONDARY=24\nval SCE_DART_KW_TERTIARY=25\nval SCE_DART_KW_TYPE=26\nval SCE_DART_STRINGEOL=27\n# Lexical states for SCLEX_ZIG\nlex Zig=SCLEX_ZIG SCE_ZIG_\nval SCE_ZIG_DEFAULT=0\nval SCE_ZIG_COMMENTLINE=1\nval SCE_ZIG_COMMENTLINEDOC=2\nval SCE_ZIG_COMMENTLINETOP=3\nval SCE_ZIG_NUMBER=4\nval SCE_ZIG_OPERATOR=5\nval SCE_ZIG_CHARACTER=6\nval SCE_ZIG_STRING=7\nval SCE_ZIG_MULTISTRING=8\nval SCE_ZIG_ESCAPECHAR=9\nval SCE_ZIG_IDENTIFIER=10\nval SCE_ZIG_FUNCTION=11\nval SCE_ZIG_BUILTIN_FUNCTION=12\nval SCE_ZIG_KW_PRIMARY=13\nval SCE_ZIG_KW_SECONDARY=14\nval SCE_ZIG_KW_TERTIARY=15\nval SCE_ZIG_KW_TYPE=16\nval SCE_ZIG_IDENTIFIER_STRING=17\nval SCE_ZIG_STRINGEOL=18\n# Lexical states for SCLEX_NIX\nlex Nix=SCLEX_NIX SCE_NIX_\nval SCE_NIX_DEFAULT=0\nval SCE_NIX_COMMENTLINE=1\nval SCE_NIX_COMMENTBLOCK=2\nval SCE_NIX_STRING=3\nval SCE_NIX_STRING_MULTILINE=4\nval SCE_NIX_ESCAPECHAR=5\nval SCE_NIX_IDENTIFIER=6\nval SCE_NIX_OPERATOR=7\nval SCE_NIX_OPERATOR_STRING=8\nval SCE_NIX_NUMBER=9\nval SCE_NIX_KEY=10\nval SCE_NIX_PATH=11\nval SCE_NIX_KEYWORD1=12\nval SCE_NIX_KEYWORD2=13\nval SCE_NIX_KEYWORD3=14\nval SCE_NIX_KEYWORD4=15\nval SCE_NIX_STRINGEOL=16\n# Lexical states for SCLEX_SINEX\nlex Sinex=SCLEX_SINEX SCE_SINEX_\nval SCE_SINEX_DEFAULT=0\nval SCE_SINEX_COMMENTLINE=1\nval SCE_SINEX_BLOCK_START=2\nval SCE_SINEX_BLOCK_END=3\nval SCE_SINEX_DATE=4\nval SCE_SINEX_NUMBER=5\n# Lexical states for SCLEX_ESCSEQ\nlex ESCSEQ=SCLEX_ESCSEQ SCE_ESCSEQ_\nval SCE_ESCSEQ_DEFAULT=0\nval SCE_ESCSEQ_BLACK_DEFAULT=1\nval SCE_ESCSEQ_RED_DEFAULT=2\nval SCE_ESCSEQ_GREEN_DEFAULT=3\nval SCE_ESCSEQ_YELLOW_DEFAULT=4\nval SCE_ESCSEQ_BLUE_DEFAULT=5\nval SCE_ESCSEQ_MAGENTA_DEFAULT=6\nval SCE_ESCSEQ_CYAN_DEFAULT=7\nval SCE_ESCSEQ_WHITE_DEFAULT=8\nval SCE_ESCSEQ_DEFAULT_BLACK=9\nval SCE_ESCSEQ_BLACK_BLACK=10\nval SCE_ESCSEQ_RED_BLACK=11\nval SCE_ESCSEQ_GREEN_BLACK=12\nval SCE_ESCSEQ_YELLOW_BLACK=13\nval SCE_ESCSEQ_BLUE_BLACK=14\nval SCE_ESCSEQ_MAGENTA_BLACK=15\nval SCE_ESCSEQ_CYAN_BLACK=16\nval SCE_ESCSEQ_WHITE_BLACK=17\nval SCE_ESCSEQ_DEFAULT_RED=18\nval SCE_ESCSEQ_BLACK_RED=19\nval SCE_ESCSEQ_RED_RED=20\nval SCE_ESCSEQ_GREEN_RED=21\nval SCE_ESCSEQ_YELLOW_RED=22\nval SCE_ESCSEQ_BLUE_RED=23\nval SCE_ESCSEQ_MAGENTA_RED=24\nval SCE_ESCSEQ_CYAN_RED=25\nval SCE_ESCSEQ_WHITE_RED=26\nval SCE_ESCSEQ_DEFAULT_GREEN=27\nval SCE_ESCSEQ_BLACK_GREEN=28\nval SCE_ESCSEQ_RED_GREEN=29\nval SCE_ESCSEQ_GREEN_GREEN=30\nval SCE_ESCSEQ_YELLOW_GREEN=40\nval SCE_ESCSEQ_BLUE_GREEN=41\nval SCE_ESCSEQ_MAGENTA_GREEN=42\nval SCE_ESCSEQ_CYAN_GREEN=43\nval SCE_ESCSEQ_WHITE_GREEN=44\nval SCE_ESCSEQ_DEFAULT_YELLOW=45\nval SCE_ESCSEQ_BLACK_YELLOW=46\nval SCE_ESCSEQ_RED_YELLOW=47\nval SCE_ESCSEQ_GREEN_YELLOW=48\nval SCE_ESCSEQ_YELLOW_YELLOW=49\nval SCE_ESCSEQ_BLUE_YELLOW=50\nval SCE_ESCSEQ_MAGENTA_YELLOW=51\nval SCE_ESCSEQ_CYAN_YELLOW=52\nval SCE_ESCSEQ_WHITE_YELLOW=53\nval SCE_ESCSEQ_DEFAULT_BLUE=54\nval SCE_ESCSEQ_BLACK_BLUE=55\nval SCE_ESCSEQ_RED_BLUE=56\nval SCE_ESCSEQ_GREEN_BLUE=57\nval SCE_ESCSEQ_YELLOW_BLUE=58\nval SCE_ESCSEQ_BLUE_BLUE=59\nval SCE_ESCSEQ_MAGENTA_BLUE=60\nval SCE_ESCSEQ_CYAN_BLUE=61\nval SCE_ESCSEQ_WHITE_BLUE=62\nval SCE_ESCSEQ_DEFAULT_MAGENTA=63\nval SCE_ESCSEQ_BLACK_MAGENTA=64\nval SCE_ESCSEQ_RED_MAGENTA=65\nval SCE_ESCSEQ_GREEN_MAGENTA=66\nval SCE_ESCSEQ_YELLOW_MAGENTA=67\nval SCE_ESCSEQ_BLUE_MAGENTA=68\nval SCE_ESCSEQ_MAGENTA_MAGENTA=69\nval SCE_ESCSEQ_CYAN_MAGENTA=70\nval SCE_ESCSEQ_WHITE_MAGENTA=71\nval SCE_ESCSEQ_DEFAULT_CYAN=72\nval SCE_ESCSEQ_BLACK_CYAN=73\nval SCE_ESCSEQ_RED_CYAN=74\nval SCE_ESCSEQ_GREEN_CYAN=75\nval SCE_ESCSEQ_YELLOW_CYAN=76\nval SCE_ESCSEQ_BLUE_CYAN=77\nval SCE_ESCSEQ_MAGENTA_CYAN=78\nval SCE_ESCSEQ_CYAN_CYAN=79\nval SCE_ESCSEQ_WHITE_CYAN=80\nval SCE_ESCSEQ_DEFAULT_WHITE=81\nval SCE_ESCSEQ_BLACK_WHITE=82\nval SCE_ESCSEQ_RED_WHITE=83\nval SCE_ESCSEQ_GREEN_WHITE=84\nval SCE_ESCSEQ_YELLOW_WHITE=85\nval SCE_ESCSEQ_BLUE_WHITE=86\nval SCE_ESCSEQ_MAGENTA_WHITE=87\nval SCE_ESCSEQ_CYAN_WHITE=88\nval SCE_ESCSEQ_WHITE_WHITE=89\nval SCE_ESCSEQ_BOLD_DEFAULT=90\nval SCE_ESCSEQ_BOLD_BLACK_DEFAULT=91\nval SCE_ESCSEQ_BOLD_RED_DEFAULT=92\nval SCE_ESCSEQ_BOLD_GREEN_DEFAULT=93\nval SCE_ESCSEQ_BOLD_YELLOW_DEFAULT=94\nval SCE_ESCSEQ_BOLD_BLUE_DEFAULT=95\nval SCE_ESCSEQ_BOLD_MAGENTA_DEFAULT=96\nval SCE_ESCSEQ_BOLD_CYAN_DEFAULT=97\nval SCE_ESCSEQ_BOLD_WHITE_DEFAULT=98\nval SCE_ESCSEQ_BOLD_DEFAULT_BLACK=99\nval SCE_ESCSEQ_BOLD_BLACK_BLACK=100\nval SCE_ESCSEQ_BOLD_RED_BLACK=101\nval SCE_ESCSEQ_BOLD_GREEN_BLACK=102\nval SCE_ESCSEQ_BOLD_YELLOW_BLACK=103\nval SCE_ESCSEQ_BOLD_BLUE_BLACK=104\nval SCE_ESCSEQ_BOLD_MAGENTA_BLACK=105\nval SCE_ESCSEQ_BOLD_CYAN_BLACK=106\nval SCE_ESCSEQ_BOLD_WHITE_BLACK=107\nval SCE_ESCSEQ_BOLD_DEFAULT_RED=108\nval SCE_ESCSEQ_BOLD_BLACK_RED=109\nval SCE_ESCSEQ_BOLD_RED_RED=110\nval SCE_ESCSEQ_BOLD_GREEN_RED=111\nval SCE_ESCSEQ_BOLD_YELLOW_RED=112\nval SCE_ESCSEQ_BOLD_BLUE_RED=113\nval SCE_ESCSEQ_BOLD_MAGENTA_RED=114\nval SCE_ESCSEQ_BOLD_CYAN_RED=115\nval SCE_ESCSEQ_BOLD_WHITE_RED=116\nval SCE_ESCSEQ_BOLD_DEFAULT_GREEN=117\nval SCE_ESCSEQ_BOLD_BLACK_GREEN=118\nval SCE_ESCSEQ_BOLD_RED_GREEN=119\nval SCE_ESCSEQ_BOLD_GREEN_GREEN=120\nval SCE_ESCSEQ_BOLD_YELLOW_GREEN=121\nval SCE_ESCSEQ_BOLD_BLUE_GREEN=122\nval SCE_ESCSEQ_BOLD_MAGENTA_GREEN=123\nval SCE_ESCSEQ_BOLD_CYAN_GREEN=124\nval SCE_ESCSEQ_BOLD_WHITE_GREEN=125\nval SCE_ESCSEQ_BOLD_DEFAULT_YELLOW=126\nval SCE_ESCSEQ_BOLD_BLACK_YELLOW=127\nval SCE_ESCSEQ_BOLD_RED_YELLOW=128\nval SCE_ESCSEQ_BOLD_GREEN_YELLOW=129\nval SCE_ESCSEQ_BOLD_YELLOW_YELLOW=130\nval SCE_ESCSEQ_BOLD_BLUE_YELLOW=131\nval SCE_ESCSEQ_BOLD_MAGENTA_YELLOW=132\nval SCE_ESCSEQ_BOLD_CYAN_YELLOW=133\nval SCE_ESCSEQ_BOLD_WHITE_YELLOW=134\nval SCE_ESCSEQ_BOLD_DEFAULT_BLUE=135\nval SCE_ESCSEQ_BOLD_BLACK_BLUE=136\nval SCE_ESCSEQ_BOLD_RED_BLUE=137\nval SCE_ESCSEQ_BOLD_GREEN_BLUE=138\nval SCE_ESCSEQ_BOLD_YELLOW_BLUE=139\nval SCE_ESCSEQ_BOLD_BLUE_BLUE=140\nval SCE_ESCSEQ_BOLD_MAGENTA_BLUE=141\nval SCE_ESCSEQ_BOLD_CYAN_BLUE=142\nval SCE_ESCSEQ_BOLD_WHITE_BLUE=143\nval SCE_ESCSEQ_BOLD_DEFAULT_MAGENTA=144\nval SCE_ESCSEQ_BOLD_BLACK_MAGENTA=145\nval SCE_ESCSEQ_BOLD_RED_MAGENTA=146\nval SCE_ESCSEQ_BOLD_GREEN_MAGENTA=147\nval SCE_ESCSEQ_BOLD_YELLOW_MAGENTA=148\nval SCE_ESCSEQ_BOLD_BLUE_MAGENTA=149\nval SCE_ESCSEQ_BOLD_MAGENTA_MAGENTA=150\nval SCE_ESCSEQ_BOLD_CYAN_MAGENTA=151\nval SCE_ESCSEQ_BOLD_WHITE_MAGENTA=152\nval SCE_ESCSEQ_BOLD_DEFAULT_CYAN=153\nval SCE_ESCSEQ_BOLD_BLACK_CYAN=154\nval SCE_ESCSEQ_BOLD_RED_CYAN=155\nval SCE_ESCSEQ_BOLD_GREEN_CYAN=156\nval SCE_ESCSEQ_BOLD_YELLOW_CYAN=157\nval SCE_ESCSEQ_BOLD_BLUE_CYAN=158\nval SCE_ESCSEQ_BOLD_MAGENTA_CYAN=159\nval SCE_ESCSEQ_BOLD_CYAN_CYAN=160\nval SCE_ESCSEQ_BOLD_WHITE_CYAN=161\nval SCE_ESCSEQ_BOLD_DEFAULT_WHITE=162\nval SCE_ESCSEQ_BOLD_BLACK_WHITE=163\nval SCE_ESCSEQ_BOLD_RED_WHITE=164\nval SCE_ESCSEQ_BOLD_GREEN_WHITE=165\nval SCE_ESCSEQ_BOLD_YELLOW_WHITE=166\nval SCE_ESCSEQ_BOLD_BLUE_WHITE=167\nval SCE_ESCSEQ_BOLD_MAGENTA_WHITE=168\nval SCE_ESCSEQ_BOLD_CYAN_WHITE=169\nval SCE_ESCSEQ_BOLD_WHITE_WHITE=170\nval SCE_ESCSEQ_IDENTIFIER=171\nval SCE_ESCSEQ_UNKNOWN=172\n" }, { "path": "include/Lexilla.h", "content": "// Lexilla lexer library\n/** @file Lexilla.h\n ** Lexilla definitions for dynamic and static linking.\n ** For C++, more features and type safety are available with the LexillaAccess module.\n **/\n// Copyright 2020 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#ifndef LEXILLA_H\n#define LEXILLA_H\n\n// Define the default Lexilla shared library name for each platform\n#if defined(_WIN32)\n#define LEXILLA_LIB \"lexilla\"\n#define LEXILLA_EXTENSION \".dll\"\n#else\n#define LEXILLA_LIB \"liblexilla\"\n#if defined(__APPLE__)\n#define LEXILLA_EXTENSION \".dylib\"\n#else\n#define LEXILLA_EXTENSION \".so\"\n#endif\n#endif\n\n// On Win32 use the stdcall calling convention otherwise use the standard calling convention\n#if defined(_WIN32)\n#define LEXILLA_CALL __stdcall\n#else\n#define LEXILLA_CALL\n#endif\n\n#if defined(__OBJC2__)\n// Objective C(++) treats '[' as a message expression.\n#define DEPRECATE_DEFINITION\n#elif defined(__cplusplus)\n#define DEPRECATE_DEFINITION [[deprecated]]\n#elif defined(__GNUC__) || defined(__clang__)\n#define DEPRECATE_DEFINITION __attribute__((deprecated))\n#else\n// MSVC __declspec(deprecated) has different positioning rules to GCC so define to nothing\n#define DEPRECATE_DEFINITION\n#endif\n\n#if defined(__cplusplus)\n// Must have already included ILexer.h to have Scintilla::ILexer5 defined.\nusing Scintilla::ILexer5;\n#else\ntypedef void ILexer5;\n#endif\n\ntypedef ILexer5 *(*LexerFactoryFunction)(void);\n\n#if defined(__cplusplus)\nnamespace Lexilla {\n#endif\n\ntypedef int (LEXILLA_CALL *GetLexerCountFn)(void);\ntypedef void (LEXILLA_CALL *GetLexerNameFn)(unsigned int Index, char *name, int buflength);\ntypedef LexerFactoryFunction(LEXILLA_CALL *GetLexerFactoryFn)(unsigned int Index);\ntypedef ILexer5*(LEXILLA_CALL *CreateLexerFn)(const char *name);\nDEPRECATE_DEFINITION typedef const char *(LEXILLA_CALL *LexerNameFromIDFn)(int identifier);\ntypedef const char *(LEXILLA_CALL *GetLibraryPropertyNamesFn)(void);\ntypedef void(LEXILLA_CALL *SetLibraryPropertyFn)(const char *key, const char *value);\ntypedef const char *(LEXILLA_CALL *GetNameSpaceFn)(void);\n\n#if defined(__cplusplus)\n}\n#endif\n\n#define LEXILLA_NAMESPACE_SEPARATOR '.'\n\n#define LEXILLA_GETLEXERCOUNT \"GetLexerCount\"\n#define LEXILLA_GETLEXERNAME \"GetLexerName\"\n#define LEXILLA_GETLEXERFACTORY \"GetLexerFactory\"\n#define LEXILLA_CREATELEXER \"CreateLexer\"\n#define LEXILLA_LEXERNAMEFROMID \"LexerNameFromID\"\n#define LEXILLA_GETLIBRARYPROPERTYNAMES \"GetLibraryPropertyNames\"\n#define LEXILLA_SETLIBRARYPROPERTY \"SetLibraryProperty\"\n#define LEXILLA_GETNAMESPACE \"GetNameSpace\"\n\n// Static linking prototypes\n\n#if defined(__cplusplus)\nextern \"C\" {\n#endif\n\nILexer5 * LEXILLA_CALL CreateLexer(const char *name);\nint LEXILLA_CALL GetLexerCount(void);\nvoid LEXILLA_CALL GetLexerName(unsigned int index, char *name, int buflength);\nLexerFactoryFunction LEXILLA_CALL GetLexerFactory(unsigned int index);\nDEPRECATE_DEFINITION const char *LEXILLA_CALL LexerNameFromID(int identifier);\nconst char * LEXILLA_CALL GetLibraryPropertyNames(void);\nvoid LEXILLA_CALL SetLibraryProperty(const char *key, const char *value);\nconst char *LEXILLA_CALL GetNameSpace(void);\n\n#if defined(__cplusplus)\n}\n#endif\n\n#if defined(__cplusplus)\nnamespace Lexilla {\n\tclass LexerModule;\n}\n// Add a static lexer (in the same binary) to Lexilla's list\nvoid AddStaticLexerModule(const Lexilla::LexerModule *plm);\n#endif\n\n#endif\n" }, { "path": "include/SciLexer.h", "content": "/* Scintilla source code edit control */\n/** @file SciLexer.h\n ** Interface to the lexer functions in Lexilla.\n ** File called SciLexer.h ro retain compatibility with client code.\n **/\n/* Copyright 1998-2002 by Neil Hodgson \n * The License.txt file describes the conditions under which this software may be distributed. */\n\n/* Most of this file is automatically generated from the LexicalStyles.iface interface definition\n * file. LexFacer.py does the generation. */\n\n#ifndef SCILEXER_H\n#define SCILEXER_H\n\n/* Lexilla features */\n\n/* ++Autogenerated -- start of section automatically generated from LexicalStyles.iface */\n#define SCLEX_CONTAINER 0\n#define SCLEX_NULL 1\n#define SCLEX_PYTHON 2\n#define SCLEX_CPP 3\n#define SCLEX_HTML 4\n#define SCLEX_XML 5\n#define SCLEX_PERL 6\n#define SCLEX_SQL 7\n#define SCLEX_VB 8\n#define SCLEX_PROPERTIES 9\n#define SCLEX_ERRORLIST 10\n#define SCLEX_MAKEFILE 11\n#define SCLEX_BATCH 12\n#define SCLEX_XCODE 13\n#define SCLEX_LATEX 14\n#define SCLEX_LUA 15\n#define SCLEX_DIFF 16\n#define SCLEX_CONF 17\n#define SCLEX_PASCAL 18\n#define SCLEX_AVE 19\n#define SCLEX_ADA 20\n#define SCLEX_LISP 21\n#define SCLEX_RUBY 22\n#define SCLEX_EIFFEL 23\n#define SCLEX_EIFFELKW 24\n#define SCLEX_TCL 25\n#define SCLEX_NNCRONTAB 26\n#define SCLEX_BULLANT 27\n#define SCLEX_VBSCRIPT 28\n#define SCLEX_BAAN 31\n#define SCLEX_MATLAB 32\n#define SCLEX_SCRIPTOL 33\n#define SCLEX_ASM 34\n#define SCLEX_CPPNOCASE 35\n#define SCLEX_FORTRAN 36\n#define SCLEX_F77 37\n#define SCLEX_CSS 38\n#define SCLEX_POV 39\n#define SCLEX_LOUT 40\n#define SCLEX_ESCRIPT 41\n#define SCLEX_PS 42\n#define SCLEX_NSIS 43\n#define SCLEX_MMIXAL 44\n#define SCLEX_CLW 45\n#define SCLEX_CLWNOCASE 46\n#define SCLEX_LOT 47\n#define SCLEX_YAML 48\n#define SCLEX_TEX 49\n#define SCLEX_METAPOST 50\n#define SCLEX_POWERBASIC 51\n#define SCLEX_FORTH 52\n#define SCLEX_ERLANG 53\n#define SCLEX_OCTAVE 54\n#define SCLEX_MSSQL 55\n#define SCLEX_VERILOG 56\n#define SCLEX_KIX 57\n#define SCLEX_GUI4CLI 58\n#define SCLEX_SPECMAN 59\n#define SCLEX_AU3 60\n#define SCLEX_APDL 61\n#define SCLEX_BASH 62\n#define SCLEX_ASN1 63\n#define SCLEX_VHDL 64\n#define SCLEX_CAML 65\n#define SCLEX_BLITZBASIC 66\n#define SCLEX_PUREBASIC 67\n#define SCLEX_HASKELL 68\n#define SCLEX_PHPSCRIPT 69\n#define SCLEX_TADS3 70\n#define SCLEX_REBOL 71\n#define SCLEX_SMALLTALK 72\n#define SCLEX_FLAGSHIP 73\n#define SCLEX_CSOUND 74\n#define SCLEX_FREEBASIC 75\n#define SCLEX_INNOSETUP 76\n#define SCLEX_OPAL 77\n#define SCLEX_SPICE 78\n#define SCLEX_D 79\n#define SCLEX_CMAKE 80\n#define SCLEX_GAP 81\n#define SCLEX_PLM 82\n#define SCLEX_PROGRESS 83\n#define SCLEX_ABAQUS 84\n#define SCLEX_ASYMPTOTE 85\n#define SCLEX_R 86\n#define SCLEX_MAGIK 87\n#define SCLEX_POWERSHELL 88\n#define SCLEX_MYSQL 89\n#define SCLEX_PO 90\n#define SCLEX_TAL 91\n#define SCLEX_COBOL 92\n#define SCLEX_TACL 93\n#define SCLEX_SORCUS 94\n#define SCLEX_POWERPRO 95\n#define SCLEX_NIMROD 96\n#define SCLEX_SML 97\n#define SCLEX_MARKDOWN 98\n#define SCLEX_TXT2TAGS 99\n#define SCLEX_A68K 100\n#define SCLEX_MODULA 101\n#define SCLEX_COFFEESCRIPT 102\n#define SCLEX_TCMD 103\n#define SCLEX_AVS 104\n#define SCLEX_ECL 105\n#define SCLEX_OSCRIPT 106\n#define SCLEX_VISUALPROLOG 107\n#define SCLEX_LITERATEHASKELL 108\n#define SCLEX_STTXT 109\n#define SCLEX_KVIRC 110\n#define SCLEX_RUST 111\n#define SCLEX_DMAP 112\n#define SCLEX_AS 113\n#define SCLEX_DMIS 114\n#define SCLEX_REGISTRY 115\n#define SCLEX_BIBTEX 116\n#define SCLEX_SREC 117\n#define SCLEX_IHEX 118\n#define SCLEX_TEHEX 119\n#define SCLEX_JSON 120\n#define SCLEX_EDIFACT 121\n#define SCLEX_INDENT 122\n#define SCLEX_MAXIMA 123\n#define SCLEX_STATA 124\n#define SCLEX_SAS 125\n#define SCLEX_NIM 126\n#define SCLEX_CIL 127\n#define SCLEX_X12 128\n#define SCLEX_DATAFLEX 129\n#define SCLEX_HOLLYWOOD 130\n#define SCLEX_RAKU 131\n#define SCLEX_FSHARP 132\n#define SCLEX_JULIA 133\n#define SCLEX_ASCIIDOC 134\n#define SCLEX_GDSCRIPT 135\n#define SCLEX_TOML 136\n#define SCLEX_TROFF 137\n#define SCLEX_DART 138\n#define SCLEX_ZIG 139\n#define SCLEX_NIX 140\n#define SCLEX_SINEX 141\n#define SCLEX_ESCSEQ 142\n#define SCLEX_AUTOMATIC 1000\n#define SCE_P_DEFAULT 0\n#define SCE_P_COMMENTLINE 1\n#define SCE_P_NUMBER 2\n#define SCE_P_STRING 3\n#define SCE_P_CHARACTER 4\n#define SCE_P_WORD 5\n#define SCE_P_TRIPLE 6\n#define SCE_P_TRIPLEDOUBLE 7\n#define SCE_P_CLASSNAME 8\n#define SCE_P_DEFNAME 9\n#define SCE_P_OPERATOR 10\n#define SCE_P_IDENTIFIER 11\n#define SCE_P_COMMENTBLOCK 12\n#define SCE_P_STRINGEOL 13\n#define SCE_P_WORD2 14\n#define SCE_P_DECORATOR 15\n#define SCE_P_FSTRING 16\n#define SCE_P_FCHARACTER 17\n#define SCE_P_FTRIPLE 18\n#define SCE_P_FTRIPLEDOUBLE 19\n#define SCE_P_ATTRIBUTE 20\n#define SCE_C_DEFAULT 0\n#define SCE_C_COMMENT 1\n#define SCE_C_COMMENTLINE 2\n#define SCE_C_COMMENTDOC 3\n#define SCE_C_NUMBER 4\n#define SCE_C_WORD 5\n#define SCE_C_STRING 6\n#define SCE_C_CHARACTER 7\n#define SCE_C_UUID 8\n#define SCE_C_PREPROCESSOR 9\n#define SCE_C_OPERATOR 10\n#define SCE_C_IDENTIFIER 11\n#define SCE_C_STRINGEOL 12\n#define SCE_C_VERBATIM 13\n#define SCE_C_REGEX 14\n#define SCE_C_COMMENTLINEDOC 15\n#define SCE_C_WORD2 16\n#define SCE_C_COMMENTDOCKEYWORD 17\n#define SCE_C_COMMENTDOCKEYWORDERROR 18\n#define SCE_C_GLOBALCLASS 19\n#define SCE_C_STRINGRAW 20\n#define SCE_C_TRIPLEVERBATIM 21\n#define SCE_C_HASHQUOTEDSTRING 22\n#define SCE_C_PREPROCESSORCOMMENT 23\n#define SCE_C_PREPROCESSORCOMMENTDOC 24\n#define SCE_C_USERLITERAL 25\n#define SCE_C_TASKMARKER 26\n#define SCE_C_ESCAPESEQUENCE 27\n#define SCE_COBOL_DEFAULT 0\n#define SCE_COBOL_COMMENT 1\n#define SCE_COBOL_COMMENTLINE 2\n#define SCE_COBOL_COMMENTDOC 3\n#define SCE_COBOL_NUMBER 4\n#define SCE_COBOL_WORD 5\n#define SCE_COBOL_STRING 6\n#define SCE_COBOL_CHARACTER 7\n#define SCE_COBOL_WORD3 8\n#define SCE_COBOL_PREPROCESSOR 9\n#define SCE_COBOL_OPERATOR 10\n#define SCE_COBOL_IDENTIFIER 11\n#define SCE_COBOL_WORD2 16\n#define SCE_D_DEFAULT 0\n#define SCE_D_COMMENT 1\n#define SCE_D_COMMENTLINE 2\n#define SCE_D_COMMENTDOC 3\n#define SCE_D_COMMENTNESTED 4\n#define SCE_D_NUMBER 5\n#define SCE_D_WORD 6\n#define SCE_D_WORD2 7\n#define SCE_D_WORD3 8\n#define SCE_D_TYPEDEF 9\n#define SCE_D_STRING 10\n#define SCE_D_STRINGEOL 11\n#define SCE_D_CHARACTER 12\n#define SCE_D_OPERATOR 13\n#define SCE_D_IDENTIFIER 14\n#define SCE_D_COMMENTLINEDOC 15\n#define SCE_D_COMMENTDOCKEYWORD 16\n#define SCE_D_COMMENTDOCKEYWORDERROR 17\n#define SCE_D_STRINGB 18\n#define SCE_D_STRINGR 19\n#define SCE_D_WORD5 20\n#define SCE_D_WORD6 21\n#define SCE_D_WORD7 22\n#define SCE_TCL_DEFAULT 0\n#define SCE_TCL_COMMENT 1\n#define SCE_TCL_COMMENTLINE 2\n#define SCE_TCL_NUMBER 3\n#define SCE_TCL_WORD_IN_QUOTE 4\n#define SCE_TCL_IN_QUOTE 5\n#define SCE_TCL_OPERATOR 6\n#define SCE_TCL_IDENTIFIER 7\n#define SCE_TCL_SUBSTITUTION 8\n#define SCE_TCL_SUB_BRACE 9\n#define SCE_TCL_MODIFIER 10\n#define SCE_TCL_EXPAND 11\n#define SCE_TCL_WORD 12\n#define SCE_TCL_WORD2 13\n#define SCE_TCL_WORD3 14\n#define SCE_TCL_WORD4 15\n#define SCE_TCL_WORD5 16\n#define SCE_TCL_WORD6 17\n#define SCE_TCL_WORD7 18\n#define SCE_TCL_WORD8 19\n#define SCE_TCL_COMMENT_BOX 20\n#define SCE_TCL_BLOCK_COMMENT 21\n#define SCE_H_DEFAULT 0\n#define SCE_H_TAG 1\n#define SCE_H_TAGUNKNOWN 2\n#define SCE_H_ATTRIBUTE 3\n#define SCE_H_ATTRIBUTEUNKNOWN 4\n#define SCE_H_NUMBER 5\n#define SCE_H_DOUBLESTRING 6\n#define SCE_H_SINGLESTRING 7\n#define SCE_H_OTHER 8\n#define SCE_H_COMMENT 9\n#define SCE_H_ENTITY 10\n#define SCE_H_TAGEND 11\n#define SCE_H_XMLSTART 12\n#define SCE_H_XMLEND 13\n#define SCE_H_SCRIPT 14\n#define SCE_H_ASP 15\n#define SCE_H_ASPAT 16\n#define SCE_H_CDATA 17\n#define SCE_H_QUESTION 18\n#define SCE_H_VALUE 19\n#define SCE_H_XCCOMMENT 20\n#define SCE_H_SGML_DEFAULT 21\n#define SCE_H_SGML_COMMAND 22\n#define SCE_H_SGML_1ST_PARAM 23\n#define SCE_H_SGML_DOUBLESTRING 24\n#define SCE_H_SGML_SIMPLESTRING 25\n#define SCE_H_SGML_ERROR 26\n#define SCE_H_SGML_SPECIAL 27\n#define SCE_H_SGML_ENTITY 28\n#define SCE_H_SGML_COMMENT 29\n#define SCE_H_SGML_1ST_PARAM_COMMENT 30\n#define SCE_H_SGML_BLOCK_DEFAULT 31\n#define SCE_HJ_START 40\n#define SCE_HJ_DEFAULT 41\n#define SCE_HJ_COMMENT 42\n#define SCE_HJ_COMMENTLINE 43\n#define SCE_HJ_COMMENTDOC 44\n#define SCE_HJ_NUMBER 45\n#define SCE_HJ_WORD 46\n#define SCE_HJ_KEYWORD 47\n#define SCE_HJ_DOUBLESTRING 48\n#define SCE_HJ_SINGLESTRING 49\n#define SCE_HJ_SYMBOLS 50\n#define SCE_HJ_STRINGEOL 51\n#define SCE_HJ_REGEX 52\n#define SCE_HJ_TEMPLATELITERAL 53\n#define SCE_HJA_START 55\n#define SCE_HJA_DEFAULT 56\n#define SCE_HJA_COMMENT 57\n#define SCE_HJA_COMMENTLINE 58\n#define SCE_HJA_COMMENTDOC 59\n#define SCE_HJA_NUMBER 60\n#define SCE_HJA_WORD 61\n#define SCE_HJA_KEYWORD 62\n#define SCE_HJA_DOUBLESTRING 63\n#define SCE_HJA_SINGLESTRING 64\n#define SCE_HJA_SYMBOLS 65\n#define SCE_HJA_STRINGEOL 66\n#define SCE_HJA_REGEX 67\n#define SCE_HJA_TEMPLATELITERAL 68\n#define SCE_HB_START 70\n#define SCE_HB_DEFAULT 71\n#define SCE_HB_COMMENTLINE 72\n#define SCE_HB_NUMBER 73\n#define SCE_HB_WORD 74\n#define SCE_HB_STRING 75\n#define SCE_HB_IDENTIFIER 76\n#define SCE_HB_STRINGEOL 77\n#define SCE_HBA_START 80\n#define SCE_HBA_DEFAULT 81\n#define SCE_HBA_COMMENTLINE 82\n#define SCE_HBA_NUMBER 83\n#define SCE_HBA_WORD 84\n#define SCE_HBA_STRING 85\n#define SCE_HBA_IDENTIFIER 86\n#define SCE_HBA_STRINGEOL 87\n#define SCE_HP_START 90\n#define SCE_HP_DEFAULT 91\n#define SCE_HP_COMMENTLINE 92\n#define SCE_HP_NUMBER 93\n#define SCE_HP_STRING 94\n#define SCE_HP_CHARACTER 95\n#define SCE_HP_WORD 96\n#define SCE_HP_TRIPLE 97\n#define SCE_HP_TRIPLEDOUBLE 98\n#define SCE_HP_CLASSNAME 99\n#define SCE_HP_DEFNAME 100\n#define SCE_HP_OPERATOR 101\n#define SCE_HP_IDENTIFIER 102\n#define SCE_HPHP_COMPLEX_VARIABLE 104\n#define SCE_HPA_START 105\n#define SCE_HPA_DEFAULT 106\n#define SCE_HPA_COMMENTLINE 107\n#define SCE_HPA_NUMBER 108\n#define SCE_HPA_STRING 109\n#define SCE_HPA_CHARACTER 110\n#define SCE_HPA_WORD 111\n#define SCE_HPA_TRIPLE 112\n#define SCE_HPA_TRIPLEDOUBLE 113\n#define SCE_HPA_CLASSNAME 114\n#define SCE_HPA_DEFNAME 115\n#define SCE_HPA_OPERATOR 116\n#define SCE_HPA_IDENTIFIER 117\n#define SCE_HPHP_DEFAULT 118\n#define SCE_HPHP_HSTRING 119\n#define SCE_HPHP_SIMPLESTRING 120\n#define SCE_HPHP_WORD 121\n#define SCE_HPHP_NUMBER 122\n#define SCE_HPHP_VARIABLE 123\n#define SCE_HPHP_COMMENT 124\n#define SCE_HPHP_COMMENTLINE 125\n#define SCE_HPHP_HSTRING_VARIABLE 126\n#define SCE_HPHP_OPERATOR 127\n#define SCE_PL_DEFAULT 0\n#define SCE_PL_ERROR 1\n#define SCE_PL_COMMENTLINE 2\n#define SCE_PL_POD 3\n#define SCE_PL_NUMBER 4\n#define SCE_PL_WORD 5\n#define SCE_PL_STRING 6\n#define SCE_PL_CHARACTER 7\n#define SCE_PL_PUNCTUATION 8\n#define SCE_PL_PREPROCESSOR 9\n#define SCE_PL_OPERATOR 10\n#define SCE_PL_IDENTIFIER 11\n#define SCE_PL_SCALAR 12\n#define SCE_PL_ARRAY 13\n#define SCE_PL_HASH 14\n#define SCE_PL_SYMBOLTABLE 15\n#define SCE_PL_VARIABLE_INDEXER 16\n#define SCE_PL_REGEX 17\n#define SCE_PL_REGSUBST 18\n#define SCE_PL_LONGQUOTE 19\n#define SCE_PL_BACKTICKS 20\n#define SCE_PL_DATASECTION 21\n#define SCE_PL_HERE_DELIM 22\n#define SCE_PL_HERE_Q 23\n#define SCE_PL_HERE_QQ 24\n#define SCE_PL_HERE_QX 25\n#define SCE_PL_STRING_Q 26\n#define SCE_PL_STRING_QQ 27\n#define SCE_PL_STRING_QX 28\n#define SCE_PL_STRING_QR 29\n#define SCE_PL_STRING_QW 30\n#define SCE_PL_POD_VERB 31\n#define SCE_PL_SUB_PROTOTYPE 40\n#define SCE_PL_FORMAT_IDENT 41\n#define SCE_PL_FORMAT 42\n#define SCE_PL_STRING_VAR 43\n#define SCE_PL_XLAT 44\n#define SCE_PL_REGEX_VAR 54\n#define SCE_PL_REGSUBST_VAR 55\n#define SCE_PL_BACKTICKS_VAR 57\n#define SCE_PL_HERE_QQ_VAR 61\n#define SCE_PL_HERE_QX_VAR 62\n#define SCE_PL_STRING_QQ_VAR 64\n#define SCE_PL_STRING_QX_VAR 65\n#define SCE_PL_STRING_QR_VAR 66\n#define SCE_RB_DEFAULT 0\n#define SCE_RB_ERROR 1\n#define SCE_RB_COMMENTLINE 2\n#define SCE_RB_POD 3\n#define SCE_RB_NUMBER 4\n#define SCE_RB_WORD 5\n#define SCE_RB_STRING 6\n#define SCE_RB_CHARACTER 7\n#define SCE_RB_CLASSNAME 8\n#define SCE_RB_DEFNAME 9\n#define SCE_RB_OPERATOR 10\n#define SCE_RB_IDENTIFIER 11\n#define SCE_RB_REGEX 12\n#define SCE_RB_GLOBAL 13\n#define SCE_RB_SYMBOL 14\n#define SCE_RB_MODULE_NAME 15\n#define SCE_RB_INSTANCE_VAR 16\n#define SCE_RB_CLASS_VAR 17\n#define SCE_RB_BACKTICKS 18\n#define SCE_RB_DATASECTION 19\n#define SCE_RB_HERE_DELIM 20\n#define SCE_RB_HERE_Q 21\n#define SCE_RB_HERE_QQ 22\n#define SCE_RB_HERE_QX 23\n#define SCE_RB_STRING_Q 24\n#define SCE_RB_STRING_QQ 25\n#define SCE_RB_STRING_QX 26\n#define SCE_RB_STRING_QR 27\n#define SCE_RB_STRING_QW 28\n#define SCE_RB_WORD_DEMOTED 29\n#define SCE_RB_STDIN 30\n#define SCE_RB_STDOUT 31\n#define SCE_RB_STDERR 40\n#define SCE_RB_STRING_W 41\n#define SCE_RB_STRING_I 42\n#define SCE_RB_STRING_QI 43\n#define SCE_RB_STRING_QS 44\n#define SCE_RB_UPPER_BOUND 45\n#define SCE_B_DEFAULT 0\n#define SCE_B_COMMENT 1\n#define SCE_B_NUMBER 2\n#define SCE_B_KEYWORD 3\n#define SCE_B_STRING 4\n#define SCE_B_PREPROCESSOR 5\n#define SCE_B_OPERATOR 6\n#define SCE_B_IDENTIFIER 7\n#define SCE_B_DATE 8\n#define SCE_B_STRINGEOL 9\n#define SCE_B_KEYWORD2 10\n#define SCE_B_KEYWORD3 11\n#define SCE_B_KEYWORD4 12\n#define SCE_B_CONSTANT 13\n#define SCE_B_ASM 14\n#define SCE_B_LABEL 15\n#define SCE_B_ERROR 16\n#define SCE_B_HEXNUMBER 17\n#define SCE_B_BINNUMBER 18\n#define SCE_B_COMMENTBLOCK 19\n#define SCE_B_DOCLINE 20\n#define SCE_B_DOCBLOCK 21\n#define SCE_B_DOCKEYWORD 22\n#define SCE_PROPS_DEFAULT 0\n#define SCE_PROPS_COMMENT 1\n#define SCE_PROPS_SECTION 2\n#define SCE_PROPS_ASSIGNMENT 3\n#define SCE_PROPS_DEFVAL 4\n#define SCE_PROPS_KEY 5\n#define SCE_L_DEFAULT 0\n#define SCE_L_COMMAND 1\n#define SCE_L_TAG 2\n#define SCE_L_MATH 3\n#define SCE_L_COMMENT 4\n#define SCE_L_TAG2 5\n#define SCE_L_MATH2 6\n#define SCE_L_COMMENT2 7\n#define SCE_L_VERBATIM 8\n#define SCE_L_SHORTCMD 9\n#define SCE_L_SPECIAL 10\n#define SCE_L_CMDOPT 11\n#define SCE_L_ERROR 12\n#define SCE_LUA_DEFAULT 0\n#define SCE_LUA_COMMENT 1\n#define SCE_LUA_COMMENTLINE 2\n#define SCE_LUA_COMMENTDOC 3\n#define SCE_LUA_NUMBER 4\n#define SCE_LUA_WORD 5\n#define SCE_LUA_STRING 6\n#define SCE_LUA_CHARACTER 7\n#define SCE_LUA_LITERALSTRING 8\n#define SCE_LUA_PREPROCESSOR 9\n#define SCE_LUA_OPERATOR 10\n#define SCE_LUA_IDENTIFIER 11\n#define SCE_LUA_STRINGEOL 12\n#define SCE_LUA_WORD2 13\n#define SCE_LUA_WORD3 14\n#define SCE_LUA_WORD4 15\n#define SCE_LUA_WORD5 16\n#define SCE_LUA_WORD6 17\n#define SCE_LUA_WORD7 18\n#define SCE_LUA_WORD8 19\n#define SCE_LUA_LABEL 20\n#define SCE_ERR_DEFAULT 0\n#define SCE_ERR_PYTHON 1\n#define SCE_ERR_GCC 2\n#define SCE_ERR_MS 3\n#define SCE_ERR_CMD 4\n#define SCE_ERR_BORLAND 5\n#define SCE_ERR_PERL 6\n#define SCE_ERR_NET 7\n#define SCE_ERR_LUA 8\n#define SCE_ERR_CTAG 9\n#define SCE_ERR_DIFF_CHANGED 10\n#define SCE_ERR_DIFF_ADDITION 11\n#define SCE_ERR_DIFF_DELETION 12\n#define SCE_ERR_DIFF_MESSAGE 13\n#define SCE_ERR_PHP 14\n#define SCE_ERR_ELF 15\n#define SCE_ERR_IFC 16\n#define SCE_ERR_IFORT 17\n#define SCE_ERR_ABSF 18\n#define SCE_ERR_TIDY 19\n#define SCE_ERR_JAVA_STACK 20\n#define SCE_ERR_VALUE 21\n#define SCE_ERR_GCC_INCLUDED_FROM 22\n#define SCE_ERR_ESCSEQ 23\n#define SCE_ERR_ESCSEQ_UNKNOWN 24\n#define SCE_ERR_GCC_EXCERPT 25\n#define SCE_ERR_BASH 26\n#define SCE_ERR_ES_BLACK 40\n#define SCE_ERR_ES_RED 41\n#define SCE_ERR_ES_GREEN 42\n#define SCE_ERR_ES_BROWN 43\n#define SCE_ERR_ES_BLUE 44\n#define SCE_ERR_ES_MAGENTA 45\n#define SCE_ERR_ES_CYAN 46\n#define SCE_ERR_ES_GRAY 47\n#define SCE_ERR_ES_DARK_GRAY 48\n#define SCE_ERR_ES_BRIGHT_RED 49\n#define SCE_ERR_ES_BRIGHT_GREEN 50\n#define SCE_ERR_ES_YELLOW 51\n#define SCE_ERR_ES_BRIGHT_BLUE 52\n#define SCE_ERR_ES_BRIGHT_MAGENTA 53\n#define SCE_ERR_ES_BRIGHT_CYAN 54\n#define SCE_ERR_ES_WHITE 55\n#define SCE_BAT_DEFAULT 0\n#define SCE_BAT_COMMENT 1\n#define SCE_BAT_WORD 2\n#define SCE_BAT_LABEL 3\n#define SCE_BAT_HIDE 4\n#define SCE_BAT_COMMAND 5\n#define SCE_BAT_IDENTIFIER 6\n#define SCE_BAT_OPERATOR 7\n#define SCE_BAT_AFTER_LABEL 8\n#define SCE_TCMD_DEFAULT 0\n#define SCE_TCMD_COMMENT 1\n#define SCE_TCMD_WORD 2\n#define SCE_TCMD_LABEL 3\n#define SCE_TCMD_HIDE 4\n#define SCE_TCMD_COMMAND 5\n#define SCE_TCMD_IDENTIFIER 6\n#define SCE_TCMD_OPERATOR 7\n#define SCE_TCMD_ENVIRONMENT 8\n#define SCE_TCMD_EXPANSION 9\n#define SCE_TCMD_CLABEL 10\n#define SCE_MAKE_DEFAULT 0\n#define SCE_MAKE_COMMENT 1\n#define SCE_MAKE_PREPROCESSOR 2\n#define SCE_MAKE_IDENTIFIER 3\n#define SCE_MAKE_OPERATOR 4\n#define SCE_MAKE_TARGET 5\n#define SCE_MAKE_IDEOL 9\n#define SCE_DIFF_DEFAULT 0\n#define SCE_DIFF_COMMENT 1\n#define SCE_DIFF_COMMAND 2\n#define SCE_DIFF_HEADER 3\n#define SCE_DIFF_POSITION 4\n#define SCE_DIFF_DELETED 5\n#define SCE_DIFF_ADDED 6\n#define SCE_DIFF_CHANGED 7\n#define SCE_DIFF_PATCH_ADD 8\n#define SCE_DIFF_PATCH_DELETE 9\n#define SCE_DIFF_REMOVED_PATCH_ADD 10\n#define SCE_DIFF_REMOVED_PATCH_DELETE 11\n#define SCE_CONF_DEFAULT 0\n#define SCE_CONF_COMMENT 1\n#define SCE_CONF_NUMBER 2\n#define SCE_CONF_IDENTIFIER 3\n#define SCE_CONF_EXTENSION 4\n#define SCE_CONF_PARAMETER 5\n#define SCE_CONF_STRING 6\n#define SCE_CONF_OPERATOR 7\n#define SCE_CONF_IP 8\n#define SCE_CONF_DIRECTIVE 9\n#define SCE_AVE_DEFAULT 0\n#define SCE_AVE_COMMENT 1\n#define SCE_AVE_NUMBER 2\n#define SCE_AVE_WORD 3\n#define SCE_AVE_STRING 6\n#define SCE_AVE_ENUM 7\n#define SCE_AVE_STRINGEOL 8\n#define SCE_AVE_IDENTIFIER 9\n#define SCE_AVE_OPERATOR 10\n#define SCE_AVE_WORD1 11\n#define SCE_AVE_WORD2 12\n#define SCE_AVE_WORD3 13\n#define SCE_AVE_WORD4 14\n#define SCE_AVE_WORD5 15\n#define SCE_AVE_WORD6 16\n#define SCE_ADA_DEFAULT 0\n#define SCE_ADA_WORD 1\n#define SCE_ADA_IDENTIFIER 2\n#define SCE_ADA_NUMBER 3\n#define SCE_ADA_DELIMITER 4\n#define SCE_ADA_CHARACTER 5\n#define SCE_ADA_CHARACTEREOL 6\n#define SCE_ADA_STRING 7\n#define SCE_ADA_STRINGEOL 8\n#define SCE_ADA_LABEL 9\n#define SCE_ADA_COMMENTLINE 10\n#define SCE_ADA_ILLEGAL 11\n#define SCE_BAAN_DEFAULT 0\n#define SCE_BAAN_COMMENT 1\n#define SCE_BAAN_COMMENTDOC 2\n#define SCE_BAAN_NUMBER 3\n#define SCE_BAAN_WORD 4\n#define SCE_BAAN_STRING 5\n#define SCE_BAAN_PREPROCESSOR 6\n#define SCE_BAAN_OPERATOR 7\n#define SCE_BAAN_IDENTIFIER 8\n#define SCE_BAAN_STRINGEOL 9\n#define SCE_BAAN_WORD2 10\n#define SCE_BAAN_WORD3 11\n#define SCE_BAAN_WORD4 12\n#define SCE_BAAN_WORD5 13\n#define SCE_BAAN_WORD6 14\n#define SCE_BAAN_WORD7 15\n#define SCE_BAAN_WORD8 16\n#define SCE_BAAN_WORD9 17\n#define SCE_BAAN_TABLEDEF 18\n#define SCE_BAAN_TABLESQL 19\n#define SCE_BAAN_FUNCTION 20\n#define SCE_BAAN_DOMDEF 21\n#define SCE_BAAN_FUNCDEF 22\n#define SCE_BAAN_OBJECTDEF 23\n#define SCE_BAAN_DEFINEDEF 24\n#define SCE_LISP_DEFAULT 0\n#define SCE_LISP_COMMENT 1\n#define SCE_LISP_NUMBER 2\n#define SCE_LISP_KEYWORD 3\n#define SCE_LISP_KEYWORD_KW 4\n#define SCE_LISP_SYMBOL 5\n#define SCE_LISP_STRING 6\n#define SCE_LISP_STRINGEOL 8\n#define SCE_LISP_IDENTIFIER 9\n#define SCE_LISP_OPERATOR 10\n#define SCE_LISP_SPECIAL 11\n#define SCE_LISP_MULTI_COMMENT 12\n#define SCE_EIFFEL_DEFAULT 0\n#define SCE_EIFFEL_COMMENTLINE 1\n#define SCE_EIFFEL_NUMBER 2\n#define SCE_EIFFEL_WORD 3\n#define SCE_EIFFEL_STRING 4\n#define SCE_EIFFEL_CHARACTER 5\n#define SCE_EIFFEL_OPERATOR 6\n#define SCE_EIFFEL_IDENTIFIER 7\n#define SCE_EIFFEL_STRINGEOL 8\n#define SCE_NNCRONTAB_DEFAULT 0\n#define SCE_NNCRONTAB_COMMENT 1\n#define SCE_NNCRONTAB_TASK 2\n#define SCE_NNCRONTAB_SECTION 3\n#define SCE_NNCRONTAB_KEYWORD 4\n#define SCE_NNCRONTAB_MODIFIER 5\n#define SCE_NNCRONTAB_ASTERISK 6\n#define SCE_NNCRONTAB_NUMBER 7\n#define SCE_NNCRONTAB_STRING 8\n#define SCE_NNCRONTAB_ENVIRONMENT 9\n#define SCE_NNCRONTAB_IDENTIFIER 10\n#define SCE_FORTH_DEFAULT 0\n#define SCE_FORTH_COMMENT 1\n#define SCE_FORTH_COMMENT_ML 2\n#define SCE_FORTH_IDENTIFIER 3\n#define SCE_FORTH_CONTROL 4\n#define SCE_FORTH_KEYWORD 5\n#define SCE_FORTH_DEFWORD 6\n#define SCE_FORTH_PREWORD1 7\n#define SCE_FORTH_PREWORD2 8\n#define SCE_FORTH_NUMBER 9\n#define SCE_FORTH_STRING 10\n#define SCE_FORTH_LOCALE 11\n#define SCE_MATLAB_DEFAULT 0\n#define SCE_MATLAB_COMMENT 1\n#define SCE_MATLAB_COMMAND 2\n#define SCE_MATLAB_NUMBER 3\n#define SCE_MATLAB_KEYWORD 4\n#define SCE_MATLAB_STRING 5\n#define SCE_MATLAB_OPERATOR 6\n#define SCE_MATLAB_IDENTIFIER 7\n#define SCE_MATLAB_DOUBLEQUOTESTRING 8\n#define SCE_MAXIMA_OPERATOR 0\n#define SCE_MAXIMA_COMMANDENDING 1\n#define SCE_MAXIMA_COMMENT 2\n#define SCE_MAXIMA_NUMBER 3\n#define SCE_MAXIMA_STRING 4\n#define SCE_MAXIMA_COMMAND 5\n#define SCE_MAXIMA_VARIABLE 6\n#define SCE_MAXIMA_UNKNOWN 7\n#define SCE_SCRIPTOL_DEFAULT 0\n#define SCE_SCRIPTOL_WHITE 1\n#define SCE_SCRIPTOL_COMMENTLINE 2\n#define SCE_SCRIPTOL_PERSISTENT 3\n#define SCE_SCRIPTOL_CSTYLE 4\n#define SCE_SCRIPTOL_COMMENTBLOCK 5\n#define SCE_SCRIPTOL_NUMBER 6\n#define SCE_SCRIPTOL_STRING 7\n#define SCE_SCRIPTOL_CHARACTER 8\n#define SCE_SCRIPTOL_STRINGEOL 9\n#define SCE_SCRIPTOL_KEYWORD 10\n#define SCE_SCRIPTOL_OPERATOR 11\n#define SCE_SCRIPTOL_IDENTIFIER 12\n#define SCE_SCRIPTOL_TRIPLE 13\n#define SCE_SCRIPTOL_CLASSNAME 14\n#define SCE_SCRIPTOL_PREPROCESSOR 15\n#define SCE_ASM_DEFAULT 0\n#define SCE_ASM_COMMENT 1\n#define SCE_ASM_NUMBER 2\n#define SCE_ASM_STRING 3\n#define SCE_ASM_OPERATOR 4\n#define SCE_ASM_IDENTIFIER 5\n#define SCE_ASM_CPUINSTRUCTION 6\n#define SCE_ASM_MATHINSTRUCTION 7\n#define SCE_ASM_REGISTER 8\n#define SCE_ASM_DIRECTIVE 9\n#define SCE_ASM_DIRECTIVEOPERAND 10\n#define SCE_ASM_COMMENTBLOCK 11\n#define SCE_ASM_CHARACTER 12\n#define SCE_ASM_STRINGEOL 13\n#define SCE_ASM_EXTINSTRUCTION 14\n#define SCE_ASM_COMMENTDIRECTIVE 15\n#define SCE_ASM_STRINGBACKQUOTE 16\n#define SCE_F_DEFAULT 0\n#define SCE_F_COMMENT 1\n#define SCE_F_NUMBER 2\n#define SCE_F_STRING1 3\n#define SCE_F_STRING2 4\n#define SCE_F_STRINGEOL 5\n#define SCE_F_OPERATOR 6\n#define SCE_F_IDENTIFIER 7\n#define SCE_F_WORD 8\n#define SCE_F_WORD2 9\n#define SCE_F_WORD3 10\n#define SCE_F_PREPROCESSOR 11\n#define SCE_F_OPERATOR2 12\n#define SCE_F_LABEL 13\n#define SCE_F_CONTINUATION 14\n#define SCE_CSS_DEFAULT 0\n#define SCE_CSS_TAG 1\n#define SCE_CSS_CLASS 2\n#define SCE_CSS_PSEUDOCLASS 3\n#define SCE_CSS_UNKNOWN_PSEUDOCLASS 4\n#define SCE_CSS_OPERATOR 5\n#define SCE_CSS_IDENTIFIER 6\n#define SCE_CSS_UNKNOWN_IDENTIFIER 7\n#define SCE_CSS_VALUE 8\n#define SCE_CSS_COMMENT 9\n#define SCE_CSS_ID 10\n#define SCE_CSS_IMPORTANT 11\n#define SCE_CSS_DIRECTIVE 12\n#define SCE_CSS_DOUBLESTRING 13\n#define SCE_CSS_SINGLESTRING 14\n#define SCE_CSS_IDENTIFIER2 15\n#define SCE_CSS_ATTRIBUTE 16\n#define SCE_CSS_IDENTIFIER3 17\n#define SCE_CSS_PSEUDOELEMENT 18\n#define SCE_CSS_EXTENDED_IDENTIFIER 19\n#define SCE_CSS_EXTENDED_PSEUDOCLASS 20\n#define SCE_CSS_EXTENDED_PSEUDOELEMENT 21\n#define SCE_CSS_GROUP_RULE 22\n#define SCE_CSS_VARIABLE 23\n#define SCE_POV_DEFAULT 0\n#define SCE_POV_COMMENT 1\n#define SCE_POV_COMMENTLINE 2\n#define SCE_POV_NUMBER 3\n#define SCE_POV_OPERATOR 4\n#define SCE_POV_IDENTIFIER 5\n#define SCE_POV_STRING 6\n#define SCE_POV_STRINGEOL 7\n#define SCE_POV_DIRECTIVE 8\n#define SCE_POV_BADDIRECTIVE 9\n#define SCE_POV_WORD2 10\n#define SCE_POV_WORD3 11\n#define SCE_POV_WORD4 12\n#define SCE_POV_WORD5 13\n#define SCE_POV_WORD6 14\n#define SCE_POV_WORD7 15\n#define SCE_POV_WORD8 16\n#define SCE_LOUT_DEFAULT 0\n#define SCE_LOUT_COMMENT 1\n#define SCE_LOUT_NUMBER 2\n#define SCE_LOUT_WORD 3\n#define SCE_LOUT_WORD2 4\n#define SCE_LOUT_WORD3 5\n#define SCE_LOUT_WORD4 6\n#define SCE_LOUT_STRING 7\n#define SCE_LOUT_OPERATOR 8\n#define SCE_LOUT_IDENTIFIER 9\n#define SCE_LOUT_STRINGEOL 10\n#define SCE_ESCRIPT_DEFAULT 0\n#define SCE_ESCRIPT_COMMENT 1\n#define SCE_ESCRIPT_COMMENTLINE 2\n#define SCE_ESCRIPT_COMMENTDOC 3\n#define SCE_ESCRIPT_NUMBER 4\n#define SCE_ESCRIPT_WORD 5\n#define SCE_ESCRIPT_STRING 6\n#define SCE_ESCRIPT_OPERATOR 7\n#define SCE_ESCRIPT_IDENTIFIER 8\n#define SCE_ESCRIPT_BRACE 9\n#define SCE_ESCRIPT_WORD2 10\n#define SCE_ESCRIPT_WORD3 11\n#define SCE_PS_DEFAULT 0\n#define SCE_PS_COMMENT 1\n#define SCE_PS_DSC_COMMENT 2\n#define SCE_PS_DSC_VALUE 3\n#define SCE_PS_NUMBER 4\n#define SCE_PS_NAME 5\n#define SCE_PS_KEYWORD 6\n#define SCE_PS_LITERAL 7\n#define SCE_PS_IMMEVAL 8\n#define SCE_PS_PAREN_ARRAY 9\n#define SCE_PS_PAREN_DICT 10\n#define SCE_PS_PAREN_PROC 11\n#define SCE_PS_TEXT 12\n#define SCE_PS_HEXSTRING 13\n#define SCE_PS_BASE85STRING 14\n#define SCE_PS_BADSTRINGCHAR 15\n#define SCE_NSIS_DEFAULT 0\n#define SCE_NSIS_COMMENT 1\n#define SCE_NSIS_STRINGDQ 2\n#define SCE_NSIS_STRINGLQ 3\n#define SCE_NSIS_STRINGRQ 4\n#define SCE_NSIS_FUNCTION 5\n#define SCE_NSIS_VARIABLE 6\n#define SCE_NSIS_LABEL 7\n#define SCE_NSIS_USERDEFINED 8\n#define SCE_NSIS_SECTIONDEF 9\n#define SCE_NSIS_SUBSECTIONDEF 10\n#define SCE_NSIS_IFDEFINEDEF 11\n#define SCE_NSIS_MACRODEF 12\n#define SCE_NSIS_STRINGVAR 13\n#define SCE_NSIS_NUMBER 14\n#define SCE_NSIS_SECTIONGROUP 15\n#define SCE_NSIS_PAGEEX 16\n#define SCE_NSIS_FUNCTIONDEF 17\n#define SCE_NSIS_COMMENTBOX 18\n#define SCE_MMIXAL_LEADWS 0\n#define SCE_MMIXAL_COMMENT 1\n#define SCE_MMIXAL_LABEL 2\n#define SCE_MMIXAL_OPCODE 3\n#define SCE_MMIXAL_OPCODE_PRE 4\n#define SCE_MMIXAL_OPCODE_VALID 5\n#define SCE_MMIXAL_OPCODE_UNKNOWN 6\n#define SCE_MMIXAL_OPCODE_POST 7\n#define SCE_MMIXAL_OPERANDS 8\n#define SCE_MMIXAL_NUMBER 9\n#define SCE_MMIXAL_REF 10\n#define SCE_MMIXAL_CHAR 11\n#define SCE_MMIXAL_STRING 12\n#define SCE_MMIXAL_REGISTER 13\n#define SCE_MMIXAL_HEX 14\n#define SCE_MMIXAL_OPERATOR 15\n#define SCE_MMIXAL_SYMBOL 16\n#define SCE_MMIXAL_INCLUDE 17\n#define SCE_CLW_DEFAULT 0\n#define SCE_CLW_LABEL 1\n#define SCE_CLW_COMMENT 2\n#define SCE_CLW_STRING 3\n#define SCE_CLW_USER_IDENTIFIER 4\n#define SCE_CLW_INTEGER_CONSTANT 5\n#define SCE_CLW_REAL_CONSTANT 6\n#define SCE_CLW_PICTURE_STRING 7\n#define SCE_CLW_KEYWORD 8\n#define SCE_CLW_COMPILER_DIRECTIVE 9\n#define SCE_CLW_RUNTIME_EXPRESSIONS 10\n#define SCE_CLW_BUILTIN_PROCEDURES_FUNCTION 11\n#define SCE_CLW_STRUCTURE_DATA_TYPE 12\n#define SCE_CLW_ATTRIBUTE 13\n#define SCE_CLW_STANDARD_EQUATE 14\n#define SCE_CLW_ERROR 15\n#define SCE_CLW_DEPRECATED 16\n#define SCE_LOT_DEFAULT 0\n#define SCE_LOT_HEADER 1\n#define SCE_LOT_BREAK 2\n#define SCE_LOT_SET 3\n#define SCE_LOT_PASS 4\n#define SCE_LOT_FAIL 5\n#define SCE_LOT_ABORT 6\n#define SCE_YAML_DEFAULT 0\n#define SCE_YAML_COMMENT 1\n#define SCE_YAML_IDENTIFIER 2\n#define SCE_YAML_KEYWORD 3\n#define SCE_YAML_NUMBER 4\n#define SCE_YAML_REFERENCE 5\n#define SCE_YAML_DOCUMENT 6\n#define SCE_YAML_TEXT 7\n#define SCE_YAML_ERROR 8\n#define SCE_YAML_OPERATOR 9\n#define SCE_TEX_DEFAULT 0\n#define SCE_TEX_SPECIAL 1\n#define SCE_TEX_GROUP 2\n#define SCE_TEX_SYMBOL 3\n#define SCE_TEX_COMMAND 4\n#define SCE_TEX_TEXT 5\n#define SCE_METAPOST_DEFAULT 0\n#define SCE_METAPOST_SPECIAL 1\n#define SCE_METAPOST_GROUP 2\n#define SCE_METAPOST_SYMBOL 3\n#define SCE_METAPOST_COMMAND 4\n#define SCE_METAPOST_TEXT 5\n#define SCE_METAPOST_EXTRA 6\n#define SCE_ERLANG_DEFAULT 0\n#define SCE_ERLANG_COMMENT 1\n#define SCE_ERLANG_VARIABLE 2\n#define SCE_ERLANG_NUMBER 3\n#define SCE_ERLANG_KEYWORD 4\n#define SCE_ERLANG_STRING 5\n#define SCE_ERLANG_OPERATOR 6\n#define SCE_ERLANG_ATOM 7\n#define SCE_ERLANG_FUNCTION_NAME 8\n#define SCE_ERLANG_CHARACTER 9\n#define SCE_ERLANG_MACRO 10\n#define SCE_ERLANG_RECORD 11\n#define SCE_ERLANG_PREPROC 12\n#define SCE_ERLANG_NODE_NAME 13\n#define SCE_ERLANG_COMMENT_FUNCTION 14\n#define SCE_ERLANG_COMMENT_MODULE 15\n#define SCE_ERLANG_COMMENT_DOC 16\n#define SCE_ERLANG_COMMENT_DOC_MACRO 17\n#define SCE_ERLANG_ATOM_QUOTED 18\n#define SCE_ERLANG_MACRO_QUOTED 19\n#define SCE_ERLANG_RECORD_QUOTED 20\n#define SCE_ERLANG_NODE_NAME_QUOTED 21\n#define SCE_ERLANG_BIFS 22\n#define SCE_ERLANG_MODULES 23\n#define SCE_ERLANG_MODULES_ATT 24\n#define SCE_ERLANG_UNKNOWN 31\n#define SCE_JULIA_DEFAULT 0\n#define SCE_JULIA_COMMENT 1\n#define SCE_JULIA_NUMBER 2\n#define SCE_JULIA_KEYWORD1 3\n#define SCE_JULIA_KEYWORD2 4\n#define SCE_JULIA_KEYWORD3 5\n#define SCE_JULIA_CHAR 6\n#define SCE_JULIA_OPERATOR 7\n#define SCE_JULIA_BRACKET 8\n#define SCE_JULIA_IDENTIFIER 9\n#define SCE_JULIA_STRING 10\n#define SCE_JULIA_SYMBOL 11\n#define SCE_JULIA_MACRO 12\n#define SCE_JULIA_STRINGINTERP 13\n#define SCE_JULIA_DOCSTRING 14\n#define SCE_JULIA_STRINGLITERAL 15\n#define SCE_JULIA_COMMAND 16\n#define SCE_JULIA_COMMANDLITERAL 17\n#define SCE_JULIA_TYPEANNOT 18\n#define SCE_JULIA_LEXERROR 19\n#define SCE_JULIA_KEYWORD4 20\n#define SCE_JULIA_TYPEOPERATOR 21\n#define SCE_MSSQL_DEFAULT 0\n#define SCE_MSSQL_COMMENT 1\n#define SCE_MSSQL_LINE_COMMENT 2\n#define SCE_MSSQL_NUMBER 3\n#define SCE_MSSQL_STRING 4\n#define SCE_MSSQL_OPERATOR 5\n#define SCE_MSSQL_IDENTIFIER 6\n#define SCE_MSSQL_VARIABLE 7\n#define SCE_MSSQL_COLUMN_NAME 8\n#define SCE_MSSQL_STATEMENT 9\n#define SCE_MSSQL_DATATYPE 10\n#define SCE_MSSQL_SYSTABLE 11\n#define SCE_MSSQL_GLOBAL_VARIABLE 12\n#define SCE_MSSQL_FUNCTION 13\n#define SCE_MSSQL_STORED_PROCEDURE 14\n#define SCE_MSSQL_DEFAULT_PREF_DATATYPE 15\n#define SCE_MSSQL_COLUMN_NAME_2 16\n#define SCE_V_DEFAULT 0\n#define SCE_V_COMMENT 1\n#define SCE_V_COMMENTLINE 2\n#define SCE_V_COMMENTLINEBANG 3\n#define SCE_V_NUMBER 4\n#define SCE_V_WORD 5\n#define SCE_V_STRING 6\n#define SCE_V_WORD2 7\n#define SCE_V_WORD3 8\n#define SCE_V_PREPROCESSOR 9\n#define SCE_V_OPERATOR 10\n#define SCE_V_IDENTIFIER 11\n#define SCE_V_STRINGEOL 12\n#define SCE_V_USER 19\n#define SCE_V_COMMENT_WORD 20\n#define SCE_V_INPUT 21\n#define SCE_V_OUTPUT 22\n#define SCE_V_INOUT 23\n#define SCE_V_PORT_CONNECT 24\n#define SCE_KIX_DEFAULT 0\n#define SCE_KIX_COMMENT 1\n#define SCE_KIX_STRING1 2\n#define SCE_KIX_STRING2 3\n#define SCE_KIX_NUMBER 4\n#define SCE_KIX_VAR 5\n#define SCE_KIX_MACRO 6\n#define SCE_KIX_KEYWORD 7\n#define SCE_KIX_FUNCTIONS 8\n#define SCE_KIX_OPERATOR 9\n#define SCE_KIX_COMMENTSTREAM 10\n#define SCE_KIX_IDENTIFIER 31\n#define SCE_GC_DEFAULT 0\n#define SCE_GC_COMMENTLINE 1\n#define SCE_GC_COMMENTBLOCK 2\n#define SCE_GC_GLOBAL 3\n#define SCE_GC_EVENT 4\n#define SCE_GC_ATTRIBUTE 5\n#define SCE_GC_CONTROL 6\n#define SCE_GC_COMMAND 7\n#define SCE_GC_STRING 8\n#define SCE_GC_OPERATOR 9\n#define SCE_SN_DEFAULT 0\n#define SCE_SN_CODE 1\n#define SCE_SN_COMMENTLINE 2\n#define SCE_SN_COMMENTLINEBANG 3\n#define SCE_SN_NUMBER 4\n#define SCE_SN_WORD 5\n#define SCE_SN_STRING 6\n#define SCE_SN_WORD2 7\n#define SCE_SN_WORD3 8\n#define SCE_SN_PREPROCESSOR 9\n#define SCE_SN_OPERATOR 10\n#define SCE_SN_IDENTIFIER 11\n#define SCE_SN_STRINGEOL 12\n#define SCE_SN_REGEXTAG 13\n#define SCE_SN_SIGNAL 14\n#define SCE_SN_USER 19\n#define SCE_AU3_DEFAULT 0\n#define SCE_AU3_COMMENT 1\n#define SCE_AU3_COMMENTBLOCK 2\n#define SCE_AU3_NUMBER 3\n#define SCE_AU3_FUNCTION 4\n#define SCE_AU3_KEYWORD 5\n#define SCE_AU3_MACRO 6\n#define SCE_AU3_STRING 7\n#define SCE_AU3_OPERATOR 8\n#define SCE_AU3_VARIABLE 9\n#define SCE_AU3_SENT 10\n#define SCE_AU3_PREPROCESSOR 11\n#define SCE_AU3_SPECIAL 12\n#define SCE_AU3_EXPAND 13\n#define SCE_AU3_COMOBJ 14\n#define SCE_AU3_UDF 15\n#define SCE_APDL_DEFAULT 0\n#define SCE_APDL_COMMENT 1\n#define SCE_APDL_COMMENTBLOCK 2\n#define SCE_APDL_NUMBER 3\n#define SCE_APDL_STRING 4\n#define SCE_APDL_OPERATOR 5\n#define SCE_APDL_WORD 6\n#define SCE_APDL_PROCESSOR 7\n#define SCE_APDL_COMMAND 8\n#define SCE_APDL_SLASHCOMMAND 9\n#define SCE_APDL_STARCOMMAND 10\n#define SCE_APDL_ARGUMENT 11\n#define SCE_APDL_FUNCTION 12\n#define SCE_SH_DEFAULT 0\n#define SCE_SH_ERROR 1\n#define SCE_SH_COMMENTLINE 2\n#define SCE_SH_NUMBER 3\n#define SCE_SH_WORD 4\n#define SCE_SH_STRING 5\n#define SCE_SH_CHARACTER 6\n#define SCE_SH_OPERATOR 7\n#define SCE_SH_IDENTIFIER 8\n#define SCE_SH_SCALAR 9\n#define SCE_SH_PARAM 10\n#define SCE_SH_BACKTICKS 11\n#define SCE_SH_HERE_DELIM 12\n#define SCE_SH_HERE_Q 13\n#define SCE_ASN1_DEFAULT 0\n#define SCE_ASN1_COMMENT 1\n#define SCE_ASN1_IDENTIFIER 2\n#define SCE_ASN1_STRING 3\n#define SCE_ASN1_OID 4\n#define SCE_ASN1_SCALAR 5\n#define SCE_ASN1_KEYWORD 6\n#define SCE_ASN1_ATTRIBUTE 7\n#define SCE_ASN1_DESCRIPTOR 8\n#define SCE_ASN1_TYPE 9\n#define SCE_ASN1_OPERATOR 10\n#define SCE_VHDL_DEFAULT 0\n#define SCE_VHDL_COMMENT 1\n#define SCE_VHDL_COMMENTLINEBANG 2\n#define SCE_VHDL_NUMBER 3\n#define SCE_VHDL_STRING 4\n#define SCE_VHDL_OPERATOR 5\n#define SCE_VHDL_IDENTIFIER 6\n#define SCE_VHDL_STRINGEOL 7\n#define SCE_VHDL_KEYWORD 8\n#define SCE_VHDL_STDOPERATOR 9\n#define SCE_VHDL_ATTRIBUTE 10\n#define SCE_VHDL_STDFUNCTION 11\n#define SCE_VHDL_STDPACKAGE 12\n#define SCE_VHDL_STDTYPE 13\n#define SCE_VHDL_USERWORD 14\n#define SCE_VHDL_BLOCK_COMMENT 15\n#define SCE_CAML_DEFAULT 0\n#define SCE_CAML_IDENTIFIER 1\n#define SCE_CAML_TAGNAME 2\n#define SCE_CAML_KEYWORD 3\n#define SCE_CAML_KEYWORD2 4\n#define SCE_CAML_KEYWORD3 5\n#define SCE_CAML_LINENUM 6\n#define SCE_CAML_OPERATOR 7\n#define SCE_CAML_NUMBER 8\n#define SCE_CAML_CHAR 9\n#define SCE_CAML_WHITE 10\n#define SCE_CAML_STRING 11\n#define SCE_CAML_COMMENT 12\n#define SCE_CAML_COMMENT1 13\n#define SCE_CAML_COMMENT2 14\n#define SCE_CAML_COMMENT3 15\n#define SCE_HA_DEFAULT 0\n#define SCE_HA_IDENTIFIER 1\n#define SCE_HA_KEYWORD 2\n#define SCE_HA_NUMBER 3\n#define SCE_HA_STRING 4\n#define SCE_HA_CHARACTER 5\n#define SCE_HA_CLASS 6\n#define SCE_HA_MODULE 7\n#define SCE_HA_CAPITAL 8\n#define SCE_HA_DATA 9\n#define SCE_HA_IMPORT 10\n#define SCE_HA_OPERATOR 11\n#define SCE_HA_INSTANCE 12\n#define SCE_HA_COMMENTLINE 13\n#define SCE_HA_COMMENTBLOCK 14\n#define SCE_HA_COMMENTBLOCK2 15\n#define SCE_HA_COMMENTBLOCK3 16\n#define SCE_HA_PRAGMA 17\n#define SCE_HA_PREPROCESSOR 18\n#define SCE_HA_STRINGEOL 19\n#define SCE_HA_RESERVED_OPERATOR 20\n#define SCE_HA_LITERATE_COMMENT 21\n#define SCE_HA_LITERATE_CODEDELIM 22\n#define SCE_T3_DEFAULT 0\n#define SCE_T3_X_DEFAULT 1\n#define SCE_T3_PREPROCESSOR 2\n#define SCE_T3_BLOCK_COMMENT 3\n#define SCE_T3_LINE_COMMENT 4\n#define SCE_T3_OPERATOR 5\n#define SCE_T3_KEYWORD 6\n#define SCE_T3_NUMBER 7\n#define SCE_T3_IDENTIFIER 8\n#define SCE_T3_S_STRING 9\n#define SCE_T3_D_STRING 10\n#define SCE_T3_X_STRING 11\n#define SCE_T3_LIB_DIRECTIVE 12\n#define SCE_T3_MSG_PARAM 13\n#define SCE_T3_HTML_TAG 14\n#define SCE_T3_HTML_DEFAULT 15\n#define SCE_T3_HTML_STRING 16\n#define SCE_T3_USER1 17\n#define SCE_T3_USER2 18\n#define SCE_T3_USER3 19\n#define SCE_T3_BRACE 20\n#define SCE_REBOL_DEFAULT 0\n#define SCE_REBOL_COMMENTLINE 1\n#define SCE_REBOL_COMMENTBLOCK 2\n#define SCE_REBOL_PREFACE 3\n#define SCE_REBOL_OPERATOR 4\n#define SCE_REBOL_CHARACTER 5\n#define SCE_REBOL_QUOTEDSTRING 6\n#define SCE_REBOL_BRACEDSTRING 7\n#define SCE_REBOL_NUMBER 8\n#define SCE_REBOL_PAIR 9\n#define SCE_REBOL_TUPLE 10\n#define SCE_REBOL_BINARY 11\n#define SCE_REBOL_MONEY 12\n#define SCE_REBOL_ISSUE 13\n#define SCE_REBOL_TAG 14\n#define SCE_REBOL_FILE 15\n#define SCE_REBOL_EMAIL 16\n#define SCE_REBOL_URL 17\n#define SCE_REBOL_DATE 18\n#define SCE_REBOL_TIME 19\n#define SCE_REBOL_IDENTIFIER 20\n#define SCE_REBOL_WORD 21\n#define SCE_REBOL_WORD2 22\n#define SCE_REBOL_WORD3 23\n#define SCE_REBOL_WORD4 24\n#define SCE_REBOL_WORD5 25\n#define SCE_REBOL_WORD6 26\n#define SCE_REBOL_WORD7 27\n#define SCE_REBOL_WORD8 28\n#define SCE_SQL_DEFAULT 0\n#define SCE_SQL_COMMENT 1\n#define SCE_SQL_COMMENTLINE 2\n#define SCE_SQL_COMMENTDOC 3\n#define SCE_SQL_NUMBER 4\n#define SCE_SQL_WORD 5\n#define SCE_SQL_STRING 6\n#define SCE_SQL_CHARACTER 7\n#define SCE_SQL_SQLPLUS 8\n#define SCE_SQL_SQLPLUS_PROMPT 9\n#define SCE_SQL_OPERATOR 10\n#define SCE_SQL_IDENTIFIER 11\n#define SCE_SQL_SQLPLUS_COMMENT 13\n#define SCE_SQL_COMMENTLINEDOC 15\n#define SCE_SQL_WORD2 16\n#define SCE_SQL_COMMENTDOCKEYWORD 17\n#define SCE_SQL_COMMENTDOCKEYWORDERROR 18\n#define SCE_SQL_USER1 19\n#define SCE_SQL_USER2 20\n#define SCE_SQL_USER3 21\n#define SCE_SQL_USER4 22\n#define SCE_SQL_QUOTEDIDENTIFIER 23\n#define SCE_SQL_QOPERATOR 24\n#define SCE_ST_DEFAULT 0\n#define SCE_ST_STRING 1\n#define SCE_ST_NUMBER 2\n#define SCE_ST_COMMENT 3\n#define SCE_ST_SYMBOL 4\n#define SCE_ST_BINARY 5\n#define SCE_ST_BOOL 6\n#define SCE_ST_SELF 7\n#define SCE_ST_SUPER 8\n#define SCE_ST_NIL 9\n#define SCE_ST_GLOBAL 10\n#define SCE_ST_RETURN 11\n#define SCE_ST_SPECIAL 12\n#define SCE_ST_KWSEND 13\n#define SCE_ST_ASSIGN 14\n#define SCE_ST_CHARACTER 15\n#define SCE_ST_SPEC_SEL 16\n#define SCE_FS_DEFAULT 0\n#define SCE_FS_COMMENT 1\n#define SCE_FS_COMMENTLINE 2\n#define SCE_FS_COMMENTDOC 3\n#define SCE_FS_COMMENTLINEDOC 4\n#define SCE_FS_COMMENTDOCKEYWORD 5\n#define SCE_FS_COMMENTDOCKEYWORDERROR 6\n#define SCE_FS_KEYWORD 7\n#define SCE_FS_KEYWORD2 8\n#define SCE_FS_KEYWORD3 9\n#define SCE_FS_KEYWORD4 10\n#define SCE_FS_NUMBER 11\n#define SCE_FS_STRING 12\n#define SCE_FS_PREPROCESSOR 13\n#define SCE_FS_OPERATOR 14\n#define SCE_FS_IDENTIFIER 15\n#define SCE_FS_DATE 16\n#define SCE_FS_STRINGEOL 17\n#define SCE_FS_CONSTANT 18\n#define SCE_FS_WORDOPERATOR 19\n#define SCE_FS_DISABLEDCODE 20\n#define SCE_FS_DEFAULT_C 21\n#define SCE_FS_COMMENTDOC_C 22\n#define SCE_FS_COMMENTLINEDOC_C 23\n#define SCE_FS_KEYWORD_C 24\n#define SCE_FS_KEYWORD2_C 25\n#define SCE_FS_NUMBER_C 26\n#define SCE_FS_STRING_C 27\n#define SCE_FS_PREPROCESSOR_C 28\n#define SCE_FS_OPERATOR_C 29\n#define SCE_FS_IDENTIFIER_C 30\n#define SCE_FS_STRINGEOL_C 31\n#define SCE_CSOUND_DEFAULT 0\n#define SCE_CSOUND_COMMENT 1\n#define SCE_CSOUND_NUMBER 2\n#define SCE_CSOUND_OPERATOR 3\n#define SCE_CSOUND_INSTR 4\n#define SCE_CSOUND_IDENTIFIER 5\n#define SCE_CSOUND_OPCODE 6\n#define SCE_CSOUND_HEADERSTMT 7\n#define SCE_CSOUND_USERKEYWORD 8\n#define SCE_CSOUND_COMMENTBLOCK 9\n#define SCE_CSOUND_PARAM 10\n#define SCE_CSOUND_ARATE_VAR 11\n#define SCE_CSOUND_KRATE_VAR 12\n#define SCE_CSOUND_IRATE_VAR 13\n#define SCE_CSOUND_GLOBAL_VAR 14\n#define SCE_CSOUND_STRINGEOL 15\n#define SCE_INNO_DEFAULT 0\n#define SCE_INNO_COMMENT 1\n#define SCE_INNO_KEYWORD 2\n#define SCE_INNO_PARAMETER 3\n#define SCE_INNO_SECTION 4\n#define SCE_INNO_PREPROC 5\n#define SCE_INNO_INLINE_EXPANSION 6\n#define SCE_INNO_COMMENT_PASCAL 7\n#define SCE_INNO_KEYWORD_PASCAL 8\n#define SCE_INNO_KEYWORD_USER 9\n#define SCE_INNO_STRING_DOUBLE 10\n#define SCE_INNO_STRING_SINGLE 11\n#define SCE_INNO_IDENTIFIER 12\n#define SCE_OPAL_SPACE 0\n#define SCE_OPAL_COMMENT_BLOCK 1\n#define SCE_OPAL_COMMENT_LINE 2\n#define SCE_OPAL_INTEGER 3\n#define SCE_OPAL_KEYWORD 4\n#define SCE_OPAL_SORT 5\n#define SCE_OPAL_STRING 6\n#define SCE_OPAL_PAR 7\n#define SCE_OPAL_BOOL_CONST 8\n#define SCE_OPAL_DEFAULT 32\n#define SCE_SPICE_DEFAULT 0\n#define SCE_SPICE_IDENTIFIER 1\n#define SCE_SPICE_KEYWORD 2\n#define SCE_SPICE_KEYWORD2 3\n#define SCE_SPICE_KEYWORD3 4\n#define SCE_SPICE_NUMBER 5\n#define SCE_SPICE_DELIMITER 6\n#define SCE_SPICE_VALUE 7\n#define SCE_SPICE_COMMENTLINE 8\n#define SCE_CMAKE_DEFAULT 0\n#define SCE_CMAKE_COMMENT 1\n#define SCE_CMAKE_STRINGDQ 2\n#define SCE_CMAKE_STRINGLQ 3\n#define SCE_CMAKE_STRINGRQ 4\n#define SCE_CMAKE_COMMANDS 5\n#define SCE_CMAKE_PARAMETERS 6\n#define SCE_CMAKE_VARIABLE 7\n#define SCE_CMAKE_USERDEFINED 8\n#define SCE_CMAKE_WHILEDEF 9\n#define SCE_CMAKE_FOREACHDEF 10\n#define SCE_CMAKE_IFDEFINEDEF 11\n#define SCE_CMAKE_MACRODEF 12\n#define SCE_CMAKE_STRINGVAR 13\n#define SCE_CMAKE_NUMBER 14\n#define SCE_GAP_DEFAULT 0\n#define SCE_GAP_IDENTIFIER 1\n#define SCE_GAP_KEYWORD 2\n#define SCE_GAP_KEYWORD2 3\n#define SCE_GAP_KEYWORD3 4\n#define SCE_GAP_KEYWORD4 5\n#define SCE_GAP_STRING 6\n#define SCE_GAP_CHAR 7\n#define SCE_GAP_OPERATOR 8\n#define SCE_GAP_COMMENT 9\n#define SCE_GAP_NUMBER 10\n#define SCE_GAP_STRINGEOL 11\n#define SCE_PLM_DEFAULT 0\n#define SCE_PLM_COMMENT 1\n#define SCE_PLM_STRING 2\n#define SCE_PLM_NUMBER 3\n#define SCE_PLM_IDENTIFIER 4\n#define SCE_PLM_OPERATOR 5\n#define SCE_PLM_CONTROL 6\n#define SCE_PLM_KEYWORD 7\n#define SCE_ABL_DEFAULT 0\n#define SCE_ABL_NUMBER 1\n#define SCE_ABL_WORD 2\n#define SCE_ABL_STRING 3\n#define SCE_ABL_CHARACTER 4\n#define SCE_ABL_PREPROCESSOR 5\n#define SCE_ABL_OPERATOR 6\n#define SCE_ABL_IDENTIFIER 7\n#define SCE_ABL_BLOCK 8\n#define SCE_ABL_END 9\n#define SCE_ABL_COMMENT 10\n#define SCE_ABL_TASKMARKER 11\n#define SCE_ABL_LINECOMMENT 12\n#define SCE_ABL_ANNOTATION 13\n#define SCE_ABL_TYPEDANNOTATION 14\n#define SCE_ABAQUS_DEFAULT 0\n#define SCE_ABAQUS_COMMENT 1\n#define SCE_ABAQUS_COMMENTBLOCK 2\n#define SCE_ABAQUS_NUMBER 3\n#define SCE_ABAQUS_STRING 4\n#define SCE_ABAQUS_OPERATOR 5\n#define SCE_ABAQUS_WORD 6\n#define SCE_ABAQUS_PROCESSOR 7\n#define SCE_ABAQUS_COMMAND 8\n#define SCE_ABAQUS_SLASHCOMMAND 9\n#define SCE_ABAQUS_STARCOMMAND 10\n#define SCE_ABAQUS_ARGUMENT 11\n#define SCE_ABAQUS_FUNCTION 12\n#define SCE_ASY_DEFAULT 0\n#define SCE_ASY_COMMENT 1\n#define SCE_ASY_COMMENTLINE 2\n#define SCE_ASY_NUMBER 3\n#define SCE_ASY_WORD 4\n#define SCE_ASY_STRING 5\n#define SCE_ASY_CHARACTER 6\n#define SCE_ASY_OPERATOR 7\n#define SCE_ASY_IDENTIFIER 8\n#define SCE_ASY_STRINGEOL 9\n#define SCE_ASY_COMMENTLINEDOC 10\n#define SCE_ASY_WORD2 11\n#define SCE_R_DEFAULT 0\n#define SCE_R_COMMENT 1\n#define SCE_R_KWORD 2\n#define SCE_R_BASEKWORD 3\n#define SCE_R_OTHERKWORD 4\n#define SCE_R_NUMBER 5\n#define SCE_R_STRING 6\n#define SCE_R_STRING2 7\n#define SCE_R_OPERATOR 8\n#define SCE_R_IDENTIFIER 9\n#define SCE_R_INFIX 10\n#define SCE_R_INFIXEOL 11\n#define SCE_R_BACKTICKS 12\n#define SCE_R_RAWSTRING 13\n#define SCE_R_RAWSTRING2 14\n#define SCE_R_ESCAPESEQUENCE 15\n#define SCE_MAGIK_DEFAULT 0\n#define SCE_MAGIK_COMMENT 1\n#define SCE_MAGIK_HYPER_COMMENT 16\n#define SCE_MAGIK_STRING 2\n#define SCE_MAGIK_CHARACTER 3\n#define SCE_MAGIK_NUMBER 4\n#define SCE_MAGIK_IDENTIFIER 5\n#define SCE_MAGIK_OPERATOR 6\n#define SCE_MAGIK_FLOW 7\n#define SCE_MAGIK_CONTAINER 8\n#define SCE_MAGIK_BRACKET_BLOCK 9\n#define SCE_MAGIK_BRACE_BLOCK 10\n#define SCE_MAGIK_SQBRACKET_BLOCK 11\n#define SCE_MAGIK_UNKNOWN_KEYWORD 12\n#define SCE_MAGIK_KEYWORD 13\n#define SCE_MAGIK_PRAGMA 14\n#define SCE_MAGIK_SYMBOL 15\n#define SCE_POWERSHELL_DEFAULT 0\n#define SCE_POWERSHELL_COMMENT 1\n#define SCE_POWERSHELL_STRING 2\n#define SCE_POWERSHELL_CHARACTER 3\n#define SCE_POWERSHELL_NUMBER 4\n#define SCE_POWERSHELL_VARIABLE 5\n#define SCE_POWERSHELL_OPERATOR 6\n#define SCE_POWERSHELL_IDENTIFIER 7\n#define SCE_POWERSHELL_KEYWORD 8\n#define SCE_POWERSHELL_CMDLET 9\n#define SCE_POWERSHELL_ALIAS 10\n#define SCE_POWERSHELL_FUNCTION 11\n#define SCE_POWERSHELL_USER1 12\n#define SCE_POWERSHELL_COMMENTSTREAM 13\n#define SCE_POWERSHELL_HERE_STRING 14\n#define SCE_POWERSHELL_HERE_CHARACTER 15\n#define SCE_POWERSHELL_COMMENTDOCKEYWORD 16\n#define SCE_MYSQL_DEFAULT 0\n#define SCE_MYSQL_COMMENT 1\n#define SCE_MYSQL_COMMENTLINE 2\n#define SCE_MYSQL_VARIABLE 3\n#define SCE_MYSQL_SYSTEMVARIABLE 4\n#define SCE_MYSQL_KNOWNSYSTEMVARIABLE 5\n#define SCE_MYSQL_NUMBER 6\n#define SCE_MYSQL_MAJORKEYWORD 7\n#define SCE_MYSQL_KEYWORD 8\n#define SCE_MYSQL_DATABASEOBJECT 9\n#define SCE_MYSQL_PROCEDUREKEYWORD 10\n#define SCE_MYSQL_STRING 11\n#define SCE_MYSQL_SQSTRING 12\n#define SCE_MYSQL_DQSTRING 13\n#define SCE_MYSQL_OPERATOR 14\n#define SCE_MYSQL_FUNCTION 15\n#define SCE_MYSQL_IDENTIFIER 16\n#define SCE_MYSQL_QUOTEDIDENTIFIER 17\n#define SCE_MYSQL_USER1 18\n#define SCE_MYSQL_USER2 19\n#define SCE_MYSQL_USER3 20\n#define SCE_MYSQL_HIDDENCOMMAND 21\n#define SCE_MYSQL_PLACEHOLDER 22\n#define SCE_PO_DEFAULT 0\n#define SCE_PO_COMMENT 1\n#define SCE_PO_MSGID 2\n#define SCE_PO_MSGID_TEXT 3\n#define SCE_PO_MSGSTR 4\n#define SCE_PO_MSGSTR_TEXT 5\n#define SCE_PO_MSGCTXT 6\n#define SCE_PO_MSGCTXT_TEXT 7\n#define SCE_PO_FUZZY 8\n#define SCE_PO_PROGRAMMER_COMMENT 9\n#define SCE_PO_REFERENCE 10\n#define SCE_PO_FLAGS 11\n#define SCE_PO_MSGID_TEXT_EOL 12\n#define SCE_PO_MSGSTR_TEXT_EOL 13\n#define SCE_PO_MSGCTXT_TEXT_EOL 14\n#define SCE_PO_ERROR 15\n#define SCE_PAS_DEFAULT 0\n#define SCE_PAS_IDENTIFIER 1\n#define SCE_PAS_COMMENT 2\n#define SCE_PAS_COMMENT2 3\n#define SCE_PAS_COMMENTLINE 4\n#define SCE_PAS_PREPROCESSOR 5\n#define SCE_PAS_PREPROCESSOR2 6\n#define SCE_PAS_NUMBER 7\n#define SCE_PAS_HEXNUMBER 8\n#define SCE_PAS_WORD 9\n#define SCE_PAS_STRING 10\n#define SCE_PAS_STRINGEOL 11\n#define SCE_PAS_CHARACTER 12\n#define SCE_PAS_OPERATOR 13\n#define SCE_PAS_ASM 14\n#define SCE_PAS_MULTILINESTRING 15\n#define SCE_SORCUS_DEFAULT 0\n#define SCE_SORCUS_COMMAND 1\n#define SCE_SORCUS_PARAMETER 2\n#define SCE_SORCUS_COMMENTLINE 3\n#define SCE_SORCUS_STRING 4\n#define SCE_SORCUS_STRINGEOL 5\n#define SCE_SORCUS_IDENTIFIER 6\n#define SCE_SORCUS_OPERATOR 7\n#define SCE_SORCUS_NUMBER 8\n#define SCE_SORCUS_CONSTANT 9\n#define SCE_POWERPRO_DEFAULT 0\n#define SCE_POWERPRO_COMMENTBLOCK 1\n#define SCE_POWERPRO_COMMENTLINE 2\n#define SCE_POWERPRO_NUMBER 3\n#define SCE_POWERPRO_WORD 4\n#define SCE_POWERPRO_WORD2 5\n#define SCE_POWERPRO_WORD3 6\n#define SCE_POWERPRO_WORD4 7\n#define SCE_POWERPRO_DOUBLEQUOTEDSTRING 8\n#define SCE_POWERPRO_SINGLEQUOTEDSTRING 9\n#define SCE_POWERPRO_LINECONTINUE 10\n#define SCE_POWERPRO_OPERATOR 11\n#define SCE_POWERPRO_IDENTIFIER 12\n#define SCE_POWERPRO_STRINGEOL 13\n#define SCE_POWERPRO_VERBATIM 14\n#define SCE_POWERPRO_ALTQUOTE 15\n#define SCE_POWERPRO_FUNCTION 16\n#define SCE_SML_DEFAULT 0\n#define SCE_SML_IDENTIFIER 1\n#define SCE_SML_TAGNAME 2\n#define SCE_SML_KEYWORD 3\n#define SCE_SML_KEYWORD2 4\n#define SCE_SML_KEYWORD3 5\n#define SCE_SML_LINENUM 6\n#define SCE_SML_OPERATOR 7\n#define SCE_SML_NUMBER 8\n#define SCE_SML_CHAR 9\n#define SCE_SML_STRING 11\n#define SCE_SML_COMMENT 12\n#define SCE_SML_COMMENT1 13\n#define SCE_SML_COMMENT2 14\n#define SCE_SML_COMMENT3 15\n#define SCE_MARKDOWN_DEFAULT 0\n#define SCE_MARKDOWN_LINE_BEGIN 1\n#define SCE_MARKDOWN_STRONG1 2\n#define SCE_MARKDOWN_STRONG2 3\n#define SCE_MARKDOWN_EM1 4\n#define SCE_MARKDOWN_EM2 5\n#define SCE_MARKDOWN_HEADER1 6\n#define SCE_MARKDOWN_HEADER2 7\n#define SCE_MARKDOWN_HEADER3 8\n#define SCE_MARKDOWN_HEADER4 9\n#define SCE_MARKDOWN_HEADER5 10\n#define SCE_MARKDOWN_HEADER6 11\n#define SCE_MARKDOWN_PRECHAR 12\n#define SCE_MARKDOWN_ULIST_ITEM 13\n#define SCE_MARKDOWN_OLIST_ITEM 14\n#define SCE_MARKDOWN_BLOCKQUOTE 15\n#define SCE_MARKDOWN_STRIKEOUT 16\n#define SCE_MARKDOWN_HRULE 17\n#define SCE_MARKDOWN_LINK 18\n#define SCE_MARKDOWN_CODE 19\n#define SCE_MARKDOWN_CODE2 20\n#define SCE_MARKDOWN_CODEBK 21\n#define SCE_TXT2TAGS_DEFAULT 0\n#define SCE_TXT2TAGS_LINE_BEGIN 1\n#define SCE_TXT2TAGS_STRONG1 2\n#define SCE_TXT2TAGS_STRONG2 3\n#define SCE_TXT2TAGS_EM1 4\n#define SCE_TXT2TAGS_EM2 5\n#define SCE_TXT2TAGS_HEADER1 6\n#define SCE_TXT2TAGS_HEADER2 7\n#define SCE_TXT2TAGS_HEADER3 8\n#define SCE_TXT2TAGS_HEADER4 9\n#define SCE_TXT2TAGS_HEADER5 10\n#define SCE_TXT2TAGS_HEADER6 11\n#define SCE_TXT2TAGS_PRECHAR 12\n#define SCE_TXT2TAGS_ULIST_ITEM 13\n#define SCE_TXT2TAGS_OLIST_ITEM 14\n#define SCE_TXT2TAGS_BLOCKQUOTE 15\n#define SCE_TXT2TAGS_STRIKEOUT 16\n#define SCE_TXT2TAGS_HRULE 17\n#define SCE_TXT2TAGS_LINK 18\n#define SCE_TXT2TAGS_CODE 19\n#define SCE_TXT2TAGS_CODE2 20\n#define SCE_TXT2TAGS_CODEBK 21\n#define SCE_TXT2TAGS_COMMENT 22\n#define SCE_TXT2TAGS_OPTION 23\n#define SCE_TXT2TAGS_PREPROC 24\n#define SCE_TXT2TAGS_POSTPROC 25\n#define SCE_A68K_DEFAULT 0\n#define SCE_A68K_COMMENT 1\n#define SCE_A68K_NUMBER_DEC 2\n#define SCE_A68K_NUMBER_BIN 3\n#define SCE_A68K_NUMBER_HEX 4\n#define SCE_A68K_STRING1 5\n#define SCE_A68K_OPERATOR 6\n#define SCE_A68K_CPUINSTRUCTION 7\n#define SCE_A68K_EXTINSTRUCTION 8\n#define SCE_A68K_REGISTER 9\n#define SCE_A68K_DIRECTIVE 10\n#define SCE_A68K_MACRO_ARG 11\n#define SCE_A68K_LABEL 12\n#define SCE_A68K_STRING2 13\n#define SCE_A68K_IDENTIFIER 14\n#define SCE_A68K_MACRO_DECLARATION 15\n#define SCE_A68K_COMMENT_WORD 16\n#define SCE_A68K_COMMENT_SPECIAL 17\n#define SCE_A68K_COMMENT_DOXYGEN 18\n#define SCE_MODULA_DEFAULT 0\n#define SCE_MODULA_COMMENT 1\n#define SCE_MODULA_DOXYCOMM 2\n#define SCE_MODULA_DOXYKEY 3\n#define SCE_MODULA_KEYWORD 4\n#define SCE_MODULA_RESERVED 5\n#define SCE_MODULA_NUMBER 6\n#define SCE_MODULA_BASENUM 7\n#define SCE_MODULA_FLOAT 8\n#define SCE_MODULA_STRING 9\n#define SCE_MODULA_STRSPEC 10\n#define SCE_MODULA_CHAR 11\n#define SCE_MODULA_CHARSPEC 12\n#define SCE_MODULA_PROC 13\n#define SCE_MODULA_PRAGMA 14\n#define SCE_MODULA_PRGKEY 15\n#define SCE_MODULA_OPERATOR 16\n#define SCE_MODULA_BADSTR 17\n#define SCE_COFFEESCRIPT_DEFAULT 0\n#define SCE_COFFEESCRIPT_COMMENT 1\n#define SCE_COFFEESCRIPT_COMMENTLINE 2\n#define SCE_COFFEESCRIPT_COMMENTDOC 3\n#define SCE_COFFEESCRIPT_NUMBER 4\n#define SCE_COFFEESCRIPT_WORD 5\n#define SCE_COFFEESCRIPT_STRING 6\n#define SCE_COFFEESCRIPT_CHARACTER 7\n#define SCE_COFFEESCRIPT_UUID 8\n#define SCE_COFFEESCRIPT_PREPROCESSOR 9\n#define SCE_COFFEESCRIPT_OPERATOR 10\n#define SCE_COFFEESCRIPT_IDENTIFIER 11\n#define SCE_COFFEESCRIPT_STRINGEOL 12\n#define SCE_COFFEESCRIPT_VERBATIM 13\n#define SCE_COFFEESCRIPT_REGEX 14\n#define SCE_COFFEESCRIPT_COMMENTLINEDOC 15\n#define SCE_COFFEESCRIPT_WORD2 16\n#define SCE_COFFEESCRIPT_COMMENTDOCKEYWORD 17\n#define SCE_COFFEESCRIPT_COMMENTDOCKEYWORDERROR 18\n#define SCE_COFFEESCRIPT_GLOBALCLASS 19\n#define SCE_COFFEESCRIPT_STRINGRAW 20\n#define SCE_COFFEESCRIPT_TRIPLEVERBATIM 21\n#define SCE_COFFEESCRIPT_COMMENTBLOCK 22\n#define SCE_COFFEESCRIPT_VERBOSE_REGEX 23\n#define SCE_COFFEESCRIPT_VERBOSE_REGEX_COMMENT 24\n#define SCE_COFFEESCRIPT_INSTANCEPROPERTY 25\n#define SCE_AVS_DEFAULT 0\n#define SCE_AVS_COMMENTBLOCK 1\n#define SCE_AVS_COMMENTBLOCKN 2\n#define SCE_AVS_COMMENTLINE 3\n#define SCE_AVS_NUMBER 4\n#define SCE_AVS_OPERATOR 5\n#define SCE_AVS_IDENTIFIER 6\n#define SCE_AVS_STRING 7\n#define SCE_AVS_TRIPLESTRING 8\n#define SCE_AVS_KEYWORD 9\n#define SCE_AVS_FILTER 10\n#define SCE_AVS_PLUGIN 11\n#define SCE_AVS_FUNCTION 12\n#define SCE_AVS_CLIPPROP 13\n#define SCE_AVS_USERDFN 14\n#define SCE_ECL_DEFAULT 0\n#define SCE_ECL_COMMENT 1\n#define SCE_ECL_COMMENTLINE 2\n#define SCE_ECL_NUMBER 3\n#define SCE_ECL_STRING 4\n#define SCE_ECL_WORD0 5\n#define SCE_ECL_OPERATOR 6\n#define SCE_ECL_CHARACTER 7\n#define SCE_ECL_UUID 8\n#define SCE_ECL_PREPROCESSOR 9\n#define SCE_ECL_UNKNOWN 10\n#define SCE_ECL_IDENTIFIER 11\n#define SCE_ECL_STRINGEOL 12\n#define SCE_ECL_VERBATIM 13\n#define SCE_ECL_REGEX 14\n#define SCE_ECL_COMMENTLINEDOC 15\n#define SCE_ECL_WORD1 16\n#define SCE_ECL_COMMENTDOCKEYWORD 17\n#define SCE_ECL_COMMENTDOCKEYWORDERROR 18\n#define SCE_ECL_WORD2 19\n#define SCE_ECL_WORD3 20\n#define SCE_ECL_WORD4 21\n#define SCE_ECL_WORD5 22\n#define SCE_ECL_COMMENTDOC 23\n#define SCE_ECL_ADDED 24\n#define SCE_ECL_DELETED 25\n#define SCE_ECL_CHANGED 26\n#define SCE_ECL_MOVED 27\n#define SCE_OSCRIPT_DEFAULT 0\n#define SCE_OSCRIPT_LINE_COMMENT 1\n#define SCE_OSCRIPT_BLOCK_COMMENT 2\n#define SCE_OSCRIPT_DOC_COMMENT 3\n#define SCE_OSCRIPT_PREPROCESSOR 4\n#define SCE_OSCRIPT_NUMBER 5\n#define SCE_OSCRIPT_SINGLEQUOTE_STRING 6\n#define SCE_OSCRIPT_DOUBLEQUOTE_STRING 7\n#define SCE_OSCRIPT_CONSTANT 8\n#define SCE_OSCRIPT_IDENTIFIER 9\n#define SCE_OSCRIPT_GLOBAL 10\n#define SCE_OSCRIPT_KEYWORD 11\n#define SCE_OSCRIPT_OPERATOR 12\n#define SCE_OSCRIPT_LABEL 13\n#define SCE_OSCRIPT_TYPE 14\n#define SCE_OSCRIPT_FUNCTION 15\n#define SCE_OSCRIPT_OBJECT 16\n#define SCE_OSCRIPT_PROPERTY 17\n#define SCE_OSCRIPT_METHOD 18\n#define SCE_VISUALPROLOG_DEFAULT 0\n#define SCE_VISUALPROLOG_KEY_MAJOR 1\n#define SCE_VISUALPROLOG_KEY_MINOR 2\n#define SCE_VISUALPROLOG_KEY_DIRECTIVE 3\n#define SCE_VISUALPROLOG_COMMENT_BLOCK 4\n#define SCE_VISUALPROLOG_COMMENT_LINE 5\n#define SCE_VISUALPROLOG_COMMENT_KEY 6\n#define SCE_VISUALPROLOG_COMMENT_KEY_ERROR 7\n#define SCE_VISUALPROLOG_IDENTIFIER 8\n#define SCE_VISUALPROLOG_VARIABLE 9\n#define SCE_VISUALPROLOG_ANONYMOUS 10\n#define SCE_VISUALPROLOG_NUMBER 11\n#define SCE_VISUALPROLOG_OPERATOR 12\n#define SCE_VISUALPROLOG_UNUSED1 13\n#define SCE_VISUALPROLOG_UNUSED2 14\n#define SCE_VISUALPROLOG_UNUSED3 15\n#define SCE_VISUALPROLOG_STRING_QUOTE 16\n#define SCE_VISUALPROLOG_STRING_ESCAPE 17\n#define SCE_VISUALPROLOG_STRING_ESCAPE_ERROR 18\n#define SCE_VISUALPROLOG_UNUSED4 19\n#define SCE_VISUALPROLOG_STRING 20\n#define SCE_VISUALPROLOG_UNUSED5 21\n#define SCE_VISUALPROLOG_STRING_EOL 22\n#define SCE_VISUALPROLOG_EMBEDDED 23\n#define SCE_VISUALPROLOG_PLACEHOLDER 24\n#define SCE_STTXT_DEFAULT 0\n#define SCE_STTXT_COMMENT 1\n#define SCE_STTXT_COMMENTLINE 2\n#define SCE_STTXT_KEYWORD 3\n#define SCE_STTXT_TYPE 4\n#define SCE_STTXT_FUNCTION 5\n#define SCE_STTXT_FB 6\n#define SCE_STTXT_NUMBER 7\n#define SCE_STTXT_HEXNUMBER 8\n#define SCE_STTXT_PRAGMA 9\n#define SCE_STTXT_OPERATOR 10\n#define SCE_STTXT_CHARACTER 11\n#define SCE_STTXT_STRING1 12\n#define SCE_STTXT_STRING2 13\n#define SCE_STTXT_STRINGEOL 14\n#define SCE_STTXT_IDENTIFIER 15\n#define SCE_STTXT_DATETIME 16\n#define SCE_STTXT_VARS 17\n#define SCE_STTXT_PRAGMAS 18\n#define SCE_KVIRC_DEFAULT 0\n#define SCE_KVIRC_COMMENT 1\n#define SCE_KVIRC_COMMENTBLOCK 2\n#define SCE_KVIRC_STRING 3\n#define SCE_KVIRC_WORD 4\n#define SCE_KVIRC_KEYWORD 5\n#define SCE_KVIRC_FUNCTION_KEYWORD 6\n#define SCE_KVIRC_FUNCTION 7\n#define SCE_KVIRC_VARIABLE 8\n#define SCE_KVIRC_NUMBER 9\n#define SCE_KVIRC_OPERATOR 10\n#define SCE_KVIRC_STRING_FUNCTION 11\n#define SCE_KVIRC_STRING_VARIABLE 12\n#define SCE_RUST_DEFAULT 0\n#define SCE_RUST_COMMENTBLOCK 1\n#define SCE_RUST_COMMENTLINE 2\n#define SCE_RUST_COMMENTBLOCKDOC 3\n#define SCE_RUST_COMMENTLINEDOC 4\n#define SCE_RUST_NUMBER 5\n#define SCE_RUST_WORD 6\n#define SCE_RUST_WORD2 7\n#define SCE_RUST_WORD3 8\n#define SCE_RUST_WORD4 9\n#define SCE_RUST_WORD5 10\n#define SCE_RUST_WORD6 11\n#define SCE_RUST_WORD7 12\n#define SCE_RUST_STRING 13\n#define SCE_RUST_STRINGR 14\n#define SCE_RUST_CHARACTER 15\n#define SCE_RUST_OPERATOR 16\n#define SCE_RUST_IDENTIFIER 17\n#define SCE_RUST_LIFETIME 18\n#define SCE_RUST_MACRO 19\n#define SCE_RUST_LEXERROR 20\n#define SCE_RUST_BYTESTRING 21\n#define SCE_RUST_BYTESTRINGR 22\n#define SCE_RUST_BYTECHARACTER 23\n#define SCE_RUST_CSTRING 24\n#define SCE_RUST_CSTRINGR 25\n#define SCE_DMAP_DEFAULT 0\n#define SCE_DMAP_COMMENT 1\n#define SCE_DMAP_NUMBER 2\n#define SCE_DMAP_STRING1 3\n#define SCE_DMAP_STRING2 4\n#define SCE_DMAP_STRINGEOL 5\n#define SCE_DMAP_OPERATOR 6\n#define SCE_DMAP_IDENTIFIER 7\n#define SCE_DMAP_WORD 8\n#define SCE_DMAP_WORD2 9\n#define SCE_DMAP_WORD3 10\n#define SCE_DMIS_DEFAULT 0\n#define SCE_DMIS_COMMENT 1\n#define SCE_DMIS_STRING 2\n#define SCE_DMIS_NUMBER 3\n#define SCE_DMIS_KEYWORD 4\n#define SCE_DMIS_MAJORWORD 5\n#define SCE_DMIS_MINORWORD 6\n#define SCE_DMIS_UNSUPPORTED_MAJOR 7\n#define SCE_DMIS_UNSUPPORTED_MINOR 8\n#define SCE_DMIS_LABEL 9\n#define SCE_REG_DEFAULT 0\n#define SCE_REG_COMMENT 1\n#define SCE_REG_VALUENAME 2\n#define SCE_REG_STRING 3\n#define SCE_REG_HEXDIGIT 4\n#define SCE_REG_VALUETYPE 5\n#define SCE_REG_ADDEDKEY 6\n#define SCE_REG_DELETEDKEY 7\n#define SCE_REG_ESCAPED 8\n#define SCE_REG_KEYPATH_GUID 9\n#define SCE_REG_STRING_GUID 10\n#define SCE_REG_PARAMETER 11\n#define SCE_REG_OPERATOR 12\n#define SCE_BIBTEX_DEFAULT 0\n#define SCE_BIBTEX_ENTRY 1\n#define SCE_BIBTEX_UNKNOWN_ENTRY 2\n#define SCE_BIBTEX_KEY 3\n#define SCE_BIBTEX_PARAMETER 4\n#define SCE_BIBTEX_VALUE 5\n#define SCE_BIBTEX_COMMENT 6\n#define SCE_HEX_DEFAULT 0\n#define SCE_HEX_RECSTART 1\n#define SCE_HEX_RECTYPE 2\n#define SCE_HEX_RECTYPE_UNKNOWN 3\n#define SCE_HEX_BYTECOUNT 4\n#define SCE_HEX_BYTECOUNT_WRONG 5\n#define SCE_HEX_NOADDRESS 6\n#define SCE_HEX_DATAADDRESS 7\n#define SCE_HEX_RECCOUNT 8\n#define SCE_HEX_STARTADDRESS 9\n#define SCE_HEX_ADDRESSFIELD_UNKNOWN 10\n#define SCE_HEX_EXTENDEDADDRESS 11\n#define SCE_HEX_DATA_ODD 12\n#define SCE_HEX_DATA_EVEN 13\n#define SCE_HEX_DATA_UNKNOWN 14\n#define SCE_HEX_DATA_EMPTY 15\n#define SCE_HEX_CHECKSUM 16\n#define SCE_HEX_CHECKSUM_WRONG 17\n#define SCE_HEX_GARBAGE 18\n#define SCE_JSON_DEFAULT 0\n#define SCE_JSON_NUMBER 1\n#define SCE_JSON_STRING 2\n#define SCE_JSON_STRINGEOL 3\n#define SCE_JSON_PROPERTYNAME 4\n#define SCE_JSON_ESCAPESEQUENCE 5\n#define SCE_JSON_LINECOMMENT 6\n#define SCE_JSON_BLOCKCOMMENT 7\n#define SCE_JSON_OPERATOR 8\n#define SCE_JSON_URI 9\n#define SCE_JSON_COMPACTIRI 10\n#define SCE_JSON_KEYWORD 11\n#define SCE_JSON_LDKEYWORD 12\n#define SCE_JSON_ERROR 13\n#define SCE_EDI_DEFAULT 0\n#define SCE_EDI_SEGMENTSTART 1\n#define SCE_EDI_SEGMENTEND 2\n#define SCE_EDI_SEP_ELEMENT 3\n#define SCE_EDI_SEP_COMPOSITE 4\n#define SCE_EDI_SEP_RELEASE 5\n#define SCE_EDI_UNA 6\n#define SCE_EDI_UNH 7\n#define SCE_EDI_BADSEGMENT 8\n#define SCE_STATA_DEFAULT 0\n#define SCE_STATA_COMMENT 1\n#define SCE_STATA_COMMENTLINE 2\n#define SCE_STATA_COMMENTBLOCK 3\n#define SCE_STATA_NUMBER 4\n#define SCE_STATA_OPERATOR 5\n#define SCE_STATA_IDENTIFIER 6\n#define SCE_STATA_STRING 7\n#define SCE_STATA_TYPE 8\n#define SCE_STATA_WORD 9\n#define SCE_STATA_GLOBAL_MACRO 10\n#define SCE_STATA_MACRO 11\n#define SCE_SAS_DEFAULT 0\n#define SCE_SAS_COMMENT 1\n#define SCE_SAS_COMMENTLINE 2\n#define SCE_SAS_COMMENTBLOCK 3\n#define SCE_SAS_NUMBER 4\n#define SCE_SAS_OPERATOR 5\n#define SCE_SAS_IDENTIFIER 6\n#define SCE_SAS_STRING 7\n#define SCE_SAS_TYPE 8\n#define SCE_SAS_WORD 9\n#define SCE_SAS_GLOBAL_MACRO 10\n#define SCE_SAS_MACRO 11\n#define SCE_SAS_MACRO_KEYWORD 12\n#define SCE_SAS_BLOCK_KEYWORD 13\n#define SCE_SAS_MACRO_FUNCTION 14\n#define SCE_SAS_STATEMENT 15\n#define SCE_NIM_DEFAULT 0\n#define SCE_NIM_COMMENT 1\n#define SCE_NIM_COMMENTDOC 2\n#define SCE_NIM_COMMENTLINE 3\n#define SCE_NIM_COMMENTLINEDOC 4\n#define SCE_NIM_NUMBER 5\n#define SCE_NIM_STRING 6\n#define SCE_NIM_CHARACTER 7\n#define SCE_NIM_WORD 8\n#define SCE_NIM_TRIPLE 9\n#define SCE_NIM_TRIPLEDOUBLE 10\n#define SCE_NIM_BACKTICKS 11\n#define SCE_NIM_FUNCNAME 12\n#define SCE_NIM_STRINGEOL 13\n#define SCE_NIM_NUMERROR 14\n#define SCE_NIM_OPERATOR 15\n#define SCE_NIM_IDENTIFIER 16\n#define SCE_CIL_DEFAULT 0\n#define SCE_CIL_COMMENT 1\n#define SCE_CIL_COMMENTLINE 2\n#define SCE_CIL_WORD 3\n#define SCE_CIL_WORD2 4\n#define SCE_CIL_WORD3 5\n#define SCE_CIL_STRING 6\n#define SCE_CIL_LABEL 7\n#define SCE_CIL_OPERATOR 8\n#define SCE_CIL_IDENTIFIER 9\n#define SCE_CIL_STRINGEOL 10\n#define SCE_X12_DEFAULT 0\n#define SCE_X12_BAD 1\n#define SCE_X12_ENVELOPE 2\n#define SCE_X12_FUNCTIONGROUP 3\n#define SCE_X12_TRANSACTIONSET 4\n#define SCE_X12_SEGMENTHEADER 5\n#define SCE_X12_SEGMENTEND 6\n#define SCE_X12_SEP_ELEMENT 7\n#define SCE_X12_SEP_SUBELEMENT 8\n#define SCE_DF_DEFAULT 0\n#define SCE_DF_IDENTIFIER 1\n#define SCE_DF_METATAG 2\n#define SCE_DF_IMAGE 3\n#define SCE_DF_COMMENTLINE 4\n#define SCE_DF_PREPROCESSOR 5\n#define SCE_DF_PREPROCESSOR2 6\n#define SCE_DF_NUMBER 7\n#define SCE_DF_HEXNUMBER 8\n#define SCE_DF_WORD 9\n#define SCE_DF_STRING 10\n#define SCE_DF_STRINGEOL 11\n#define SCE_DF_SCOPEWORD 12\n#define SCE_DF_OPERATOR 13\n#define SCE_DF_ICODE 14\n#define SCE_HOLLYWOOD_DEFAULT 0\n#define SCE_HOLLYWOOD_COMMENT 1\n#define SCE_HOLLYWOOD_COMMENTBLOCK 2\n#define SCE_HOLLYWOOD_NUMBER 3\n#define SCE_HOLLYWOOD_KEYWORD 4\n#define SCE_HOLLYWOOD_STDAPI 5\n#define SCE_HOLLYWOOD_PLUGINAPI 6\n#define SCE_HOLLYWOOD_PLUGINMETHOD 7\n#define SCE_HOLLYWOOD_STRING 8\n#define SCE_HOLLYWOOD_STRINGBLOCK 9\n#define SCE_HOLLYWOOD_PREPROCESSOR 10\n#define SCE_HOLLYWOOD_OPERATOR 11\n#define SCE_HOLLYWOOD_IDENTIFIER 12\n#define SCE_HOLLYWOOD_CONSTANT 13\n#define SCE_HOLLYWOOD_HEXNUMBER 14\n#define SCE_RAKU_DEFAULT 0\n#define SCE_RAKU_ERROR 1\n#define SCE_RAKU_COMMENTLINE 2\n#define SCE_RAKU_COMMENTEMBED 3\n#define SCE_RAKU_POD 4\n#define SCE_RAKU_CHARACTER 5\n#define SCE_RAKU_HEREDOC_Q 6\n#define SCE_RAKU_HEREDOC_QQ 7\n#define SCE_RAKU_STRING 8\n#define SCE_RAKU_STRING_Q 9\n#define SCE_RAKU_STRING_QQ 10\n#define SCE_RAKU_STRING_Q_LANG 11\n#define SCE_RAKU_STRING_VAR 12\n#define SCE_RAKU_REGEX 13\n#define SCE_RAKU_REGEX_VAR 14\n#define SCE_RAKU_ADVERB 15\n#define SCE_RAKU_NUMBER 16\n#define SCE_RAKU_PREPROCESSOR 17\n#define SCE_RAKU_OPERATOR 18\n#define SCE_RAKU_WORD 19\n#define SCE_RAKU_FUNCTION 20\n#define SCE_RAKU_IDENTIFIER 21\n#define SCE_RAKU_TYPEDEF 22\n#define SCE_RAKU_MU 23\n#define SCE_RAKU_POSITIONAL 24\n#define SCE_RAKU_ASSOCIATIVE 25\n#define SCE_RAKU_CALLABLE 26\n#define SCE_RAKU_GRAMMAR 27\n#define SCE_RAKU_CLASS 28\n#define SCE_FSHARP_DEFAULT 0\n#define SCE_FSHARP_KEYWORD 1\n#define SCE_FSHARP_KEYWORD2 2\n#define SCE_FSHARP_KEYWORD3 3\n#define SCE_FSHARP_KEYWORD4 4\n#define SCE_FSHARP_KEYWORD5 5\n#define SCE_FSHARP_IDENTIFIER 6\n#define SCE_FSHARP_QUOT_IDENTIFIER 7\n#define SCE_FSHARP_COMMENT 8\n#define SCE_FSHARP_COMMENTLINE 9\n#define SCE_FSHARP_PREPROCESSOR 10\n#define SCE_FSHARP_LINENUM 11\n#define SCE_FSHARP_OPERATOR 12\n#define SCE_FSHARP_NUMBER 13\n#define SCE_FSHARP_CHARACTER 14\n#define SCE_FSHARP_STRING 15\n#define SCE_FSHARP_VERBATIM 16\n#define SCE_FSHARP_QUOTATION 17\n#define SCE_FSHARP_ATTRIBUTE 18\n#define SCE_FSHARP_FORMAT_SPEC 19\n#define SCE_ASCIIDOC_DEFAULT 0\n#define SCE_ASCIIDOC_STRONG1 1\n#define SCE_ASCIIDOC_STRONG2 2\n#define SCE_ASCIIDOC_EM1 3\n#define SCE_ASCIIDOC_EM2 4\n#define SCE_ASCIIDOC_HEADER1 5\n#define SCE_ASCIIDOC_HEADER2 6\n#define SCE_ASCIIDOC_HEADER3 7\n#define SCE_ASCIIDOC_HEADER4 8\n#define SCE_ASCIIDOC_HEADER5 9\n#define SCE_ASCIIDOC_HEADER6 10\n#define SCE_ASCIIDOC_ULIST_ITEM 11\n#define SCE_ASCIIDOC_OLIST_ITEM 12\n#define SCE_ASCIIDOC_BLOCKQUOTE 13\n#define SCE_ASCIIDOC_LINK 14\n#define SCE_ASCIIDOC_CODEBK 15\n#define SCE_ASCIIDOC_PASSBK 16\n#define SCE_ASCIIDOC_COMMENT 17\n#define SCE_ASCIIDOC_COMMENTBK 18\n#define SCE_ASCIIDOC_LITERAL 19\n#define SCE_ASCIIDOC_LITERALBK 20\n#define SCE_ASCIIDOC_ATTRIB 21\n#define SCE_ASCIIDOC_ATTRIBVAL 22\n#define SCE_ASCIIDOC_MACRO 23\n#define SCE_GD_DEFAULT 0\n#define SCE_GD_COMMENTLINE 1\n#define SCE_GD_NUMBER 2\n#define SCE_GD_STRING 3\n#define SCE_GD_CHARACTER 4\n#define SCE_GD_WORD 5\n#define SCE_GD_TRIPLE 6\n#define SCE_GD_TRIPLEDOUBLE 7\n#define SCE_GD_CLASSNAME 8\n#define SCE_GD_FUNCNAME 9\n#define SCE_GD_OPERATOR 10\n#define SCE_GD_IDENTIFIER 11\n#define SCE_GD_COMMENTBLOCK 12\n#define SCE_GD_STRINGEOL 13\n#define SCE_GD_WORD2 14\n#define SCE_GD_ANNOTATION 15\n#define SCE_GD_NODEPATH 16\n#define SCE_TOML_DEFAULT 0\n#define SCE_TOML_COMMENT 1\n#define SCE_TOML_IDENTIFIER 2\n#define SCE_TOML_KEYWORD 3\n#define SCE_TOML_NUMBER 4\n#define SCE_TOML_TABLE 5\n#define SCE_TOML_KEY 6\n#define SCE_TOML_ERROR 7\n#define SCE_TOML_OPERATOR 8\n#define SCE_TOML_STRING_SQ 9\n#define SCE_TOML_STRING_DQ 10\n#define SCE_TOML_TRIPLE_STRING_SQ 11\n#define SCE_TOML_TRIPLE_STRING_DQ 12\n#define SCE_TOML_ESCAPECHAR 13\n#define SCE_TOML_DATETIME 14\n#define SCE_TOML_STRINGEOL 15\n#define SCE_TROFF_DEFAULT 0\n#define SCE_TROFF_REQUEST 1\n#define SCE_TROFF_COMMAND 2\n#define SCE_TROFF_NUMBER 3\n#define SCE_TROFF_OPERATOR 4\n#define SCE_TROFF_STRING 5\n#define SCE_TROFF_COMMENT 6\n#define SCE_TROFF_IGNORE 7\n#define SCE_TROFF_ESCAPE_STRING 8\n#define SCE_TROFF_ESCAPE_MACRO 9\n#define SCE_TROFF_ESCAPE_FONT 10\n#define SCE_TROFF_ESCAPE_NUMBER 11\n#define SCE_TROFF_ESCAPE_COLOUR 12\n#define SCE_TROFF_ESCAPE_GLYPH 13\n#define SCE_TROFF_ESCAPE_ENV 14\n#define SCE_TROFF_ESCAPE_SUPPRESSION 15\n#define SCE_TROFF_ESCAPE_SIZE 16\n#define SCE_TROFF_ESCAPE_TRANSPARENT 17\n#define SCE_TROFF_ESCAPE_ISVALID 18\n#define SCE_TROFF_ESCAPE_DRAW 19\n#define SCE_TROFF_ESCAPE_MOVE 20\n#define SCE_TROFF_ESCAPE_HEIGHT 21\n#define SCE_TROFF_ESCAPE_OVERSTRIKE 22\n#define SCE_TROFF_ESCAPE_SLANT 23\n#define SCE_TROFF_ESCAPE_WIDTH 24\n#define SCE_TROFF_ESCAPE_VSPACING 25\n#define SCE_TROFF_ESCAPE_DEVICE 26\n#define SCE_TROFF_ESCAPE_NOMOVE 27\n#define SCE_DART_DEFAULT 0\n#define SCE_DART_COMMENTLINE 1\n#define SCE_DART_COMMENTLINEDOC 2\n#define SCE_DART_COMMENTBLOCK 3\n#define SCE_DART_COMMENTBLOCKDOC 4\n#define SCE_DART_STRING_SQ 5\n#define SCE_DART_STRING_DQ 6\n#define SCE_DART_TRIPLE_STRING_SQ 7\n#define SCE_DART_TRIPLE_STRING_DQ 8\n#define SCE_DART_RAWSTRING_SQ 9\n#define SCE_DART_RAWSTRING_DQ 10\n#define SCE_DART_TRIPLE_RAWSTRING_SQ 11\n#define SCE_DART_TRIPLE_RAWSTRING_DQ 12\n#define SCE_DART_ESCAPECHAR 13\n#define SCE_DART_IDENTIFIER 14\n#define SCE_DART_IDENTIFIER_STRING 15\n#define SCE_DART_OPERATOR 16\n#define SCE_DART_OPERATOR_STRING 17\n#define SCE_DART_SYMBOL_IDENTIFIER 18\n#define SCE_DART_SYMBOL_OPERATOR 19\n#define SCE_DART_NUMBER 20\n#define SCE_DART_KEY 21\n#define SCE_DART_METADATA 22\n#define SCE_DART_KW_PRIMARY 23\n#define SCE_DART_KW_SECONDARY 24\n#define SCE_DART_KW_TERTIARY 25\n#define SCE_DART_KW_TYPE 26\n#define SCE_DART_STRINGEOL 27\n#define SCE_ZIG_DEFAULT 0\n#define SCE_ZIG_COMMENTLINE 1\n#define SCE_ZIG_COMMENTLINEDOC 2\n#define SCE_ZIG_COMMENTLINETOP 3\n#define SCE_ZIG_NUMBER 4\n#define SCE_ZIG_OPERATOR 5\n#define SCE_ZIG_CHARACTER 6\n#define SCE_ZIG_STRING 7\n#define SCE_ZIG_MULTISTRING 8\n#define SCE_ZIG_ESCAPECHAR 9\n#define SCE_ZIG_IDENTIFIER 10\n#define SCE_ZIG_FUNCTION 11\n#define SCE_ZIG_BUILTIN_FUNCTION 12\n#define SCE_ZIG_KW_PRIMARY 13\n#define SCE_ZIG_KW_SECONDARY 14\n#define SCE_ZIG_KW_TERTIARY 15\n#define SCE_ZIG_KW_TYPE 16\n#define SCE_ZIG_IDENTIFIER_STRING 17\n#define SCE_ZIG_STRINGEOL 18\n#define SCE_NIX_DEFAULT 0\n#define SCE_NIX_COMMENTLINE 1\n#define SCE_NIX_COMMENTBLOCK 2\n#define SCE_NIX_STRING 3\n#define SCE_NIX_STRING_MULTILINE 4\n#define SCE_NIX_ESCAPECHAR 5\n#define SCE_NIX_IDENTIFIER 6\n#define SCE_NIX_OPERATOR 7\n#define SCE_NIX_OPERATOR_STRING 8\n#define SCE_NIX_NUMBER 9\n#define SCE_NIX_KEY 10\n#define SCE_NIX_PATH 11\n#define SCE_NIX_KEYWORD1 12\n#define SCE_NIX_KEYWORD2 13\n#define SCE_NIX_KEYWORD3 14\n#define SCE_NIX_KEYWORD4 15\n#define SCE_NIX_STRINGEOL 16\n#define SCE_SINEX_DEFAULT 0\n#define SCE_SINEX_COMMENTLINE 1\n#define SCE_SINEX_BLOCK_START 2\n#define SCE_SINEX_BLOCK_END 3\n#define SCE_SINEX_DATE 4\n#define SCE_SINEX_NUMBER 5\n#define SCE_ESCSEQ_DEFAULT 0\n#define SCE_ESCSEQ_BLACK_DEFAULT 1\n#define SCE_ESCSEQ_RED_DEFAULT 2\n#define SCE_ESCSEQ_GREEN_DEFAULT 3\n#define SCE_ESCSEQ_YELLOW_DEFAULT 4\n#define SCE_ESCSEQ_BLUE_DEFAULT 5\n#define SCE_ESCSEQ_MAGENTA_DEFAULT 6\n#define SCE_ESCSEQ_CYAN_DEFAULT 7\n#define SCE_ESCSEQ_WHITE_DEFAULT 8\n#define SCE_ESCSEQ_DEFAULT_BLACK 9\n#define SCE_ESCSEQ_BLACK_BLACK 10\n#define SCE_ESCSEQ_RED_BLACK 11\n#define SCE_ESCSEQ_GREEN_BLACK 12\n#define SCE_ESCSEQ_YELLOW_BLACK 13\n#define SCE_ESCSEQ_BLUE_BLACK 14\n#define SCE_ESCSEQ_MAGENTA_BLACK 15\n#define SCE_ESCSEQ_CYAN_BLACK 16\n#define SCE_ESCSEQ_WHITE_BLACK 17\n#define SCE_ESCSEQ_DEFAULT_RED 18\n#define SCE_ESCSEQ_BLACK_RED 19\n#define SCE_ESCSEQ_RED_RED 20\n#define SCE_ESCSEQ_GREEN_RED 21\n#define SCE_ESCSEQ_YELLOW_RED 22\n#define SCE_ESCSEQ_BLUE_RED 23\n#define SCE_ESCSEQ_MAGENTA_RED 24\n#define SCE_ESCSEQ_CYAN_RED 25\n#define SCE_ESCSEQ_WHITE_RED 26\n#define SCE_ESCSEQ_DEFAULT_GREEN 27\n#define SCE_ESCSEQ_BLACK_GREEN 28\n#define SCE_ESCSEQ_RED_GREEN 29\n#define SCE_ESCSEQ_GREEN_GREEN 30\n#define SCE_ESCSEQ_YELLOW_GREEN 40\n#define SCE_ESCSEQ_BLUE_GREEN 41\n#define SCE_ESCSEQ_MAGENTA_GREEN 42\n#define SCE_ESCSEQ_CYAN_GREEN 43\n#define SCE_ESCSEQ_WHITE_GREEN 44\n#define SCE_ESCSEQ_DEFAULT_YELLOW 45\n#define SCE_ESCSEQ_BLACK_YELLOW 46\n#define SCE_ESCSEQ_RED_YELLOW 47\n#define SCE_ESCSEQ_GREEN_YELLOW 48\n#define SCE_ESCSEQ_YELLOW_YELLOW 49\n#define SCE_ESCSEQ_BLUE_YELLOW 50\n#define SCE_ESCSEQ_MAGENTA_YELLOW 51\n#define SCE_ESCSEQ_CYAN_YELLOW 52\n#define SCE_ESCSEQ_WHITE_YELLOW 53\n#define SCE_ESCSEQ_DEFAULT_BLUE 54\n#define SCE_ESCSEQ_BLACK_BLUE 55\n#define SCE_ESCSEQ_RED_BLUE 56\n#define SCE_ESCSEQ_GREEN_BLUE 57\n#define SCE_ESCSEQ_YELLOW_BLUE 58\n#define SCE_ESCSEQ_BLUE_BLUE 59\n#define SCE_ESCSEQ_MAGENTA_BLUE 60\n#define SCE_ESCSEQ_CYAN_BLUE 61\n#define SCE_ESCSEQ_WHITE_BLUE 62\n#define SCE_ESCSEQ_DEFAULT_MAGENTA 63\n#define SCE_ESCSEQ_BLACK_MAGENTA 64\n#define SCE_ESCSEQ_RED_MAGENTA 65\n#define SCE_ESCSEQ_GREEN_MAGENTA 66\n#define SCE_ESCSEQ_YELLOW_MAGENTA 67\n#define SCE_ESCSEQ_BLUE_MAGENTA 68\n#define SCE_ESCSEQ_MAGENTA_MAGENTA 69\n#define SCE_ESCSEQ_CYAN_MAGENTA 70\n#define SCE_ESCSEQ_WHITE_MAGENTA 71\n#define SCE_ESCSEQ_DEFAULT_CYAN 72\n#define SCE_ESCSEQ_BLACK_CYAN 73\n#define SCE_ESCSEQ_RED_CYAN 74\n#define SCE_ESCSEQ_GREEN_CYAN 75\n#define SCE_ESCSEQ_YELLOW_CYAN 76\n#define SCE_ESCSEQ_BLUE_CYAN 77\n#define SCE_ESCSEQ_MAGENTA_CYAN 78\n#define SCE_ESCSEQ_CYAN_CYAN 79\n#define SCE_ESCSEQ_WHITE_CYAN 80\n#define SCE_ESCSEQ_DEFAULT_WHITE 81\n#define SCE_ESCSEQ_BLACK_WHITE 82\n#define SCE_ESCSEQ_RED_WHITE 83\n#define SCE_ESCSEQ_GREEN_WHITE 84\n#define SCE_ESCSEQ_YELLOW_WHITE 85\n#define SCE_ESCSEQ_BLUE_WHITE 86\n#define SCE_ESCSEQ_MAGENTA_WHITE 87\n#define SCE_ESCSEQ_CYAN_WHITE 88\n#define SCE_ESCSEQ_WHITE_WHITE 89\n#define SCE_ESCSEQ_BOLD_DEFAULT 90\n#define SCE_ESCSEQ_BOLD_BLACK_DEFAULT 91\n#define SCE_ESCSEQ_BOLD_RED_DEFAULT 92\n#define SCE_ESCSEQ_BOLD_GREEN_DEFAULT 93\n#define SCE_ESCSEQ_BOLD_YELLOW_DEFAULT 94\n#define SCE_ESCSEQ_BOLD_BLUE_DEFAULT 95\n#define SCE_ESCSEQ_BOLD_MAGENTA_DEFAULT 96\n#define SCE_ESCSEQ_BOLD_CYAN_DEFAULT 97\n#define SCE_ESCSEQ_BOLD_WHITE_DEFAULT 98\n#define SCE_ESCSEQ_BOLD_DEFAULT_BLACK 99\n#define SCE_ESCSEQ_BOLD_BLACK_BLACK 100\n#define SCE_ESCSEQ_BOLD_RED_BLACK 101\n#define SCE_ESCSEQ_BOLD_GREEN_BLACK 102\n#define SCE_ESCSEQ_BOLD_YELLOW_BLACK 103\n#define SCE_ESCSEQ_BOLD_BLUE_BLACK 104\n#define SCE_ESCSEQ_BOLD_MAGENTA_BLACK 105\n#define SCE_ESCSEQ_BOLD_CYAN_BLACK 106\n#define SCE_ESCSEQ_BOLD_WHITE_BLACK 107\n#define SCE_ESCSEQ_BOLD_DEFAULT_RED 108\n#define SCE_ESCSEQ_BOLD_BLACK_RED 109\n#define SCE_ESCSEQ_BOLD_RED_RED 110\n#define SCE_ESCSEQ_BOLD_GREEN_RED 111\n#define SCE_ESCSEQ_BOLD_YELLOW_RED 112\n#define SCE_ESCSEQ_BOLD_BLUE_RED 113\n#define SCE_ESCSEQ_BOLD_MAGENTA_RED 114\n#define SCE_ESCSEQ_BOLD_CYAN_RED 115\n#define SCE_ESCSEQ_BOLD_WHITE_RED 116\n#define SCE_ESCSEQ_BOLD_DEFAULT_GREEN 117\n#define SCE_ESCSEQ_BOLD_BLACK_GREEN 118\n#define SCE_ESCSEQ_BOLD_RED_GREEN 119\n#define SCE_ESCSEQ_BOLD_GREEN_GREEN 120\n#define SCE_ESCSEQ_BOLD_YELLOW_GREEN 121\n#define SCE_ESCSEQ_BOLD_BLUE_GREEN 122\n#define SCE_ESCSEQ_BOLD_MAGENTA_GREEN 123\n#define SCE_ESCSEQ_BOLD_CYAN_GREEN 124\n#define SCE_ESCSEQ_BOLD_WHITE_GREEN 125\n#define SCE_ESCSEQ_BOLD_DEFAULT_YELLOW 126\n#define SCE_ESCSEQ_BOLD_BLACK_YELLOW 127\n#define SCE_ESCSEQ_BOLD_RED_YELLOW 128\n#define SCE_ESCSEQ_BOLD_GREEN_YELLOW 129\n#define SCE_ESCSEQ_BOLD_YELLOW_YELLOW 130\n#define SCE_ESCSEQ_BOLD_BLUE_YELLOW 131\n#define SCE_ESCSEQ_BOLD_MAGENTA_YELLOW 132\n#define SCE_ESCSEQ_BOLD_CYAN_YELLOW 133\n#define SCE_ESCSEQ_BOLD_WHITE_YELLOW 134\n#define SCE_ESCSEQ_BOLD_DEFAULT_BLUE 135\n#define SCE_ESCSEQ_BOLD_BLACK_BLUE 136\n#define SCE_ESCSEQ_BOLD_RED_BLUE 137\n#define SCE_ESCSEQ_BOLD_GREEN_BLUE 138\n#define SCE_ESCSEQ_BOLD_YELLOW_BLUE 139\n#define SCE_ESCSEQ_BOLD_BLUE_BLUE 140\n#define SCE_ESCSEQ_BOLD_MAGENTA_BLUE 141\n#define SCE_ESCSEQ_BOLD_CYAN_BLUE 142\n#define SCE_ESCSEQ_BOLD_WHITE_BLUE 143\n#define SCE_ESCSEQ_BOLD_DEFAULT_MAGENTA 144\n#define SCE_ESCSEQ_BOLD_BLACK_MAGENTA 145\n#define SCE_ESCSEQ_BOLD_RED_MAGENTA 146\n#define SCE_ESCSEQ_BOLD_GREEN_MAGENTA 147\n#define SCE_ESCSEQ_BOLD_YELLOW_MAGENTA 148\n#define SCE_ESCSEQ_BOLD_BLUE_MAGENTA 149\n#define SCE_ESCSEQ_BOLD_MAGENTA_MAGENTA 150\n#define SCE_ESCSEQ_BOLD_CYAN_MAGENTA 151\n#define SCE_ESCSEQ_BOLD_WHITE_MAGENTA 152\n#define SCE_ESCSEQ_BOLD_DEFAULT_CYAN 153\n#define SCE_ESCSEQ_BOLD_BLACK_CYAN 154\n#define SCE_ESCSEQ_BOLD_RED_CYAN 155\n#define SCE_ESCSEQ_BOLD_GREEN_CYAN 156\n#define SCE_ESCSEQ_BOLD_YELLOW_CYAN 157\n#define SCE_ESCSEQ_BOLD_BLUE_CYAN 158\n#define SCE_ESCSEQ_BOLD_MAGENTA_CYAN 159\n#define SCE_ESCSEQ_BOLD_CYAN_CYAN 160\n#define SCE_ESCSEQ_BOLD_WHITE_CYAN 161\n#define SCE_ESCSEQ_BOLD_DEFAULT_WHITE 162\n#define SCE_ESCSEQ_BOLD_BLACK_WHITE 163\n#define SCE_ESCSEQ_BOLD_RED_WHITE 164\n#define SCE_ESCSEQ_BOLD_GREEN_WHITE 165\n#define SCE_ESCSEQ_BOLD_YELLOW_WHITE 166\n#define SCE_ESCSEQ_BOLD_BLUE_WHITE 167\n#define SCE_ESCSEQ_BOLD_MAGENTA_WHITE 168\n#define SCE_ESCSEQ_BOLD_CYAN_WHITE 169\n#define SCE_ESCSEQ_BOLD_WHITE_WHITE 170\n#define SCE_ESCSEQ_IDENTIFIER 171\n#define SCE_ESCSEQ_UNKNOWN 172\n/* --Autogenerated -- end of section automatically generated from LexicalStyles.iface */\n\n#endif\n" }, { "path": "lexers/LexA68k.cxx", "content": "// Scintilla source code edit control\n/** @file LexA68k.cxx\n ** Lexer for Assembler, just for the MASM syntax\n ** Written by Martial Demolins AKA Folco\n **/\n// Copyright 2010 Martial Demolins \n// The License.txt file describes the conditions under which this software\n// may be distributed.\n\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n\n// Return values for GetOperatorType\n#define NO_OPERATOR 0\n#define OPERATOR_1CHAR 1\n#define OPERATOR_2CHAR 2\n\n\n/**\n * IsIdentifierStart\n *\n * Return true if the given char is a valid identifier first char\n */\n\nstatic inline bool IsIdentifierStart (const int ch)\n{\n return (isalpha(ch) || (ch == '_') || (ch == '\\\\'));\n}\n\n\n/**\n * IsIdentifierChar\n *\n * Return true if the given char is a valid identifier char\n */\n\nstatic inline bool IsIdentifierChar (const int ch)\n{\n return (isalnum(ch) || (ch == '_') || (ch == '@') || (ch == ':') || (ch == '.'));\n}\n\n\n/**\n * GetOperatorType\n *\n * Return:\n * NO_OPERATOR if char is not an operator\n * OPERATOR_1CHAR if the operator is one char long\n * OPERATOR_2CHAR if the operator is two chars long\n */\n\nstatic inline int GetOperatorType (const int ch1, const int ch2)\n{\n int OpType = NO_OPERATOR;\n\n if ((ch1 == '+') || (ch1 == '-') || (ch1 == '*') || (ch1 == '/') || (ch1 == '#') ||\n (ch1 == '(') || (ch1 == ')') || (ch1 == '~') || (ch1 == '&') || (ch1 == '|') || (ch1 == ','))\n OpType = OPERATOR_1CHAR;\n\n else if ((ch1 == ch2) && (ch1 == '<' || ch1 == '>'))\n OpType = OPERATOR_2CHAR;\n\n return OpType;\n}\n\n\n/**\n * IsBin\n *\n * Return true if the given char is 0 or 1\n */\n\nstatic inline bool IsBin (const int ch)\n{\n return (ch == '0') || (ch == '1');\n}\n\n\n/**\n * IsDoxygenChar\n *\n * Return true if the char may be part of a Doxygen keyword\n */\n\nstatic inline bool IsDoxygenChar (const int ch)\n{\n return isalpha(ch) || (ch == '$') || (ch == '[') || (ch == ']') || (ch == '{') || (ch == '}');\n}\n\n\n/**\n * ColouriseA68kDoc\n *\n * Main function, which colourises a 68k source\n */\n\nstatic void ColouriseA68kDoc (Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[], Accessor &styler)\n{\n // Used to buffer a string, to be able to compare it using built-in functions\n char Buffer[100];\n\n\n // Used to know the length of an operator\n int OpType;\n\n\n // Get references to keywords lists\n WordList &cpuInstruction = *keywordlists[0];\n WordList ®isters = *keywordlists[1];\n WordList &directive = *keywordlists[2];\n WordList &extInstruction = *keywordlists[3];\n WordList &alert = *keywordlists[4];\n WordList &doxygenKeyword = *keywordlists[5];\n\n\n // Instanciate a context for our source\n StyleContext sc(startPos, length, initStyle, styler);\n\n\n /************************************************************\n *\n * Parse the source\n *\n ************************************************************/\n\n for ( ; sc.More(); sc.Forward())\n {\n /************************************************************\n *\n * A style always terminates at the end of a line, even for\n * comments (no multi-lines comments)\n *\n ************************************************************/\n if (sc.atLineStart) {\n sc.SetState(SCE_A68K_DEFAULT);\n }\n\n\n /************************************************************\n *\n * If we are not in \"default style\", check if the style continues\n * In this case, we just have to loop\n *\n ************************************************************/\n\n if (sc.state != SCE_A68K_DEFAULT)\n {\n if ( ((sc.state == SCE_A68K_NUMBER_DEC) && isdigit(sc.ch)) // Decimal number\n || ((sc.state == SCE_A68K_NUMBER_BIN) && IsBin(sc.ch)) // Binary number\n || ((sc.state == SCE_A68K_NUMBER_HEX) && isxdigit(sc.ch)) // Hexa number\n || ((sc.state == SCE_A68K_MACRO_ARG) && isdigit(sc.ch)) // Macro argument\n || ((sc.state == SCE_A68K_STRING1) && (sc.ch != '\\'')) // String single-quoted\n || ((sc.state == SCE_A68K_STRING2) && (sc.ch != '\\\"')) // String double-quoted\n || ((sc.state == SCE_A68K_MACRO_DECLARATION) && IsIdentifierChar(sc.ch)) // Macro declaration (or global label, we don't know at this point)\n || ((sc.state == SCE_A68K_IDENTIFIER) && IsIdentifierChar(sc.ch)) // Identifier\n || ((sc.state == SCE_A68K_LABEL) && IsIdentifierChar(sc.ch)) // Label (local)\n || ((sc.state == SCE_A68K_COMMENT_DOXYGEN) && IsDoxygenChar(sc.ch)) // Doxygen keyword\n || ((sc.state == SCE_A68K_COMMENT_SPECIAL) && isalpha(sc.ch)) // Alert\n || ((sc.state == SCE_A68K_COMMENT) && !isalpha(sc.ch) && (sc.ch != '\\\\'))) // Normal comment\n {\n continue;\n }\n\n /************************************************************\n *\n * Check if current state terminates\n *\n ************************************************************/\n\n // Strings: include terminal ' or \" in the current string by skipping it\n if ((sc.state == SCE_A68K_STRING1) || (sc.state == SCE_A68K_STRING2)) {\n sc.Forward();\n }\n\n\n // If a macro declaration was terminated with ':', it was a label\n else if ((sc.state == SCE_A68K_MACRO_DECLARATION) && (sc.chPrev == ':')) {\n sc.ChangeState(SCE_A68K_LABEL);\n }\n\n\n // If it wasn't a Doxygen keyword, change it to normal comment\n else if (sc.state == SCE_A68K_COMMENT_DOXYGEN) {\n sc.GetCurrent(Buffer, sizeof(Buffer));\n if (!doxygenKeyword.InList(Buffer)) {\n sc.ChangeState(SCE_A68K_COMMENT);\n }\n sc.SetState(SCE_A68K_COMMENT);\n continue;\n }\n\n\n // If it wasn't an Alert, change it to normal comment\n else if (sc.state == SCE_A68K_COMMENT_SPECIAL) {\n sc.GetCurrent(Buffer, sizeof(Buffer));\n if (!alert.InList(Buffer)) {\n sc.ChangeState(SCE_A68K_COMMENT);\n }\n // Reset style to normal comment, or to Doxygen keyword if it begins with '\\'\n if (sc.ch == '\\\\') {\n sc.SetState(SCE_A68K_COMMENT_DOXYGEN);\n }\n else {\n sc.SetState(SCE_A68K_COMMENT);\n }\n continue;\n }\n\n\n // If we are in a comment, it's a Doxygen keyword or an Alert\n else if (sc.state == SCE_A68K_COMMENT) {\n if (sc.ch == '\\\\') {\n sc.SetState(SCE_A68K_COMMENT_DOXYGEN);\n }\n else {\n sc.SetState(SCE_A68K_COMMENT_SPECIAL);\n }\n continue;\n }\n\n\n // Check if we are at the end of an identifier\n // In this case, colourise it if was a keyword.\n else if ((sc.state == SCE_A68K_IDENTIFIER) && !IsIdentifierChar(sc.ch)) {\n sc.GetCurrentLowered(Buffer, sizeof(Buffer)); // Buffer the string of the current context\n if (cpuInstruction.InList(Buffer)) { // And check if it belongs to a keyword list\n sc.ChangeState(SCE_A68K_CPUINSTRUCTION);\n }\n else if (extInstruction.InList(Buffer)) {\n sc.ChangeState(SCE_A68K_EXTINSTRUCTION);\n }\n else if (registers.InList(Buffer)) {\n sc.ChangeState(SCE_A68K_REGISTER);\n }\n else if (directive.InList(Buffer)) {\n sc.ChangeState(SCE_A68K_DIRECTIVE);\n }\n }\n\n // All special contexts are now handled.Come back to default style\n sc.SetState(SCE_A68K_DEFAULT);\n }\n\n\n /************************************************************\n *\n * Check if we must enter a new state\n *\n ************************************************************/\n\n // Something which begins at the beginning of a line, and with\n // - '\\' + an identifier start char, or\n // - '\\\\@' + an identifier start char\n // is a local label (second case is used for macro local labels). We set it already as a label, it can't be a macro/equ declaration\n if (sc.atLineStart && (sc.ch < 0x80) && IsIdentifierStart(sc.chNext) && (sc.ch == '\\\\')) {\n sc.SetState(SCE_A68K_LABEL);\n }\n\n if (sc.atLineStart && (sc.ch < 0x80) && (sc.ch == '\\\\') && (sc.chNext == '\\\\')) {\n sc.Forward(2);\n if ((sc.ch == '@') && IsIdentifierStart(sc.chNext)) {\n sc.ChangeState(SCE_A68K_LABEL);\n sc.SetState(SCE_A68K_LABEL);\n }\n }\n\n // Label and macro identifiers start at the beginning of a line\n // We set both as a macro id, but if it wasn't one (':' at the end),\n // it will be changed as a label.\n if (sc.atLineStart && (sc.ch < 0x80) && IsIdentifierStart(sc.ch)) {\n sc.SetState(SCE_A68K_MACRO_DECLARATION);\n }\n else if ((sc.ch < 0x80) && (sc.ch == ';')) { // Default: alert in a comment. If it doesn't match\n sc.SetState(SCE_A68K_COMMENT); // with an alert, it will be toggle to a normal comment\n }\n else if ((sc.ch < 0x80) && isdigit(sc.ch)) { // Decimal numbers haven't prefix\n sc.SetState(SCE_A68K_NUMBER_DEC);\n }\n else if ((sc.ch < 0x80) && (sc.ch == '%')) { // Binary numbers are prefixed with '%'\n sc.SetState(SCE_A68K_NUMBER_BIN);\n }\n else if ((sc.ch < 0x80) && (sc.ch == '$')) { // Hexadecimal numbers are prefixed with '$'\n sc.SetState(SCE_A68K_NUMBER_HEX);\n }\n else if ((sc.ch < 0x80) && (sc.ch == '\\'')) { // String (single-quoted)\n sc.SetState(SCE_A68K_STRING1);\n }\n else if ((sc.ch < 0x80) && (sc.ch == '\\\"')) { // String (double-quoted)\n sc.SetState(SCE_A68K_STRING2);\n }\n else if ((sc.ch < 0x80) && (sc.ch == '\\\\') && (isdigit(sc.chNext))) { // Replacement symbols in macro are prefixed with '\\'\n sc.SetState(SCE_A68K_MACRO_ARG);\n }\n else if ((sc.ch < 0x80) && IsIdentifierStart(sc.ch)) { // An identifier: constant, label, etc...\n sc.SetState(SCE_A68K_IDENTIFIER);\n }\n else {\n if (sc.ch < 0x80) {\n OpType = GetOperatorType(sc.ch, sc.chNext); // Check if current char is an operator\n if (OpType != NO_OPERATOR) {\n sc.SetState(SCE_A68K_OPERATOR);\n if (OpType == OPERATOR_2CHAR) { // Check if the operator is 2 bytes long\n sc.ForwardSetState(SCE_A68K_OPERATOR); // (>> or <<)\n }\n }\n }\n }\n } // End of for()\n sc.Complete();\n}\n\n\n// Names of the keyword lists\n\nstatic const char * const a68kWordListDesc[] =\n{\n \"CPU instructions\",\n \"Registers\",\n \"Directives\",\n \"Extended instructions\",\n \"Comment special words\",\n \"Doxygen keywords\",\n 0\n};\n\nextern const LexerModule lmA68k(SCLEX_A68K, ColouriseA68kDoc, \"a68k\", 0, a68kWordListDesc);\n" }, { "path": "lexers/LexAPDL.cxx", "content": "// Scintilla source code edit control\n/** @file LexAPDL.cxx\n ** Lexer for APDL. Based on the lexer for Assembler by The Black Horus.\n ** By Hadar Raz.\n **/\n// Copyright 1998-2003 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80 && (isalnum(ch) || ch == '_'));\n}\n\nstatic inline bool IsAnOperator(char ch) {\n\t// '.' left out as it is used to make up numbers\n\tif (ch == '*' || ch == '/' || ch == '-' || ch == '+' ||\n\t\tch == '(' || ch == ')' || ch == '=' || ch == '^' ||\n\t\tch == '[' || ch == ']' || ch == '<' || ch == '&' ||\n\t\tch == '>' || ch == ',' || ch == '|' || ch == '~' ||\n\t\tch == '$' || ch == ':' || ch == '%')\n\t\treturn true;\n\treturn false;\n}\n\nstatic void ColouriseAPDLDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\n\tint stringStart = ' ';\n\n\tWordList &processors = *keywordlists[0];\n\tWordList &commands = *keywordlists[1];\n\tWordList &slashcommands = *keywordlists[2];\n\tWordList &starcommands = *keywordlists[3];\n\tWordList &arguments = *keywordlists[4];\n\tWordList &functions = *keywordlists[5];\n\n\t// Do not leak onto next line\n\tinitStyle = SCE_APDL_DEFAULT;\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_APDL_NUMBER) {\n\t\t\tif (!(IsADigit(sc.ch) || sc.ch == '.' || (sc.ch == 'e' || sc.ch == 'E') ||\n\t\t\t\t((sc.ch == '+' || sc.ch == '-') && (sc.chPrev == 'e' || sc.chPrev == 'E')))) {\n\t\t\t\tsc.SetState(SCE_APDL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_APDL_COMMENT) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_APDL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_APDL_COMMENTBLOCK) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tif (sc.ch == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tsc.ForwardSetState(SCE_APDL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_APDL_STRING) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_APDL_DEFAULT);\n\t\t\t} else if ((sc.ch == '\\'' && stringStart == '\\'') || (sc.ch == '\\\"' && stringStart == '\\\"')) {\n\t\t\t\tsc.ForwardSetState(SCE_APDL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_APDL_WORD) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tif (processors.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_APDL_PROCESSOR);\n\t\t\t\t} else if (slashcommands.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_APDL_SLASHCOMMAND);\n\t\t\t\t} else if (starcommands.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_APDL_STARCOMMAND);\n\t\t\t\t} else if (commands.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_APDL_COMMAND);\n\t\t\t\t} else if (arguments.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_APDL_ARGUMENT);\n\t\t\t\t} else if (functions.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_APDL_FUNCTION);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_APDL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_APDL_OPERATOR) {\n\t\t\tif (!IsAnOperator(static_cast(sc.ch))) {\n\t\t\t sc.SetState(SCE_APDL_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_APDL_DEFAULT) {\n\t\t\tif (sc.ch == '!' && sc.chNext == '!') {\n\t\t\t\tsc.SetState(SCE_APDL_COMMENTBLOCK);\n\t\t\t} else if (sc.ch == '!') {\n\t\t\t\tsc.SetState(SCE_APDL_COMMENT);\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_APDL_NUMBER);\n\t\t\t} else if (sc.ch == '\\'' || sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_APDL_STRING);\n\t\t\t\tstringStart = sc.ch;\n\t\t\t} else if (IsAWordChar(sc.ch) || ((sc.ch == '*' || sc.ch == '/') && !isgraph(sc.chPrev))) {\n\t\t\t\tsc.SetState(SCE_APDL_WORD);\n\t\t\t} else if (IsAnOperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_APDL_OPERATOR);\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n\n//------------------------------------------------------------------------------\n// 06-27-07 Sergio Lucato\n// - Included code folding for Ansys APDL lexer\n// - Copyied from LexBasic.cxx and modified for APDL\n//------------------------------------------------------------------------------\n\n/* Bits:\n * 1 - whitespace\n * 2 - operator\n * 4 - identifier\n * 8 - decimal digit\n * 16 - hex digit\n * 32 - bin digit\n */\nstatic int character_classification[128] =\n{\n 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0,\n 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,\n 1, 2, 0, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 2, 10, 6,\n 60, 60, 28, 28, 28, 28, 28, 28, 28, 28, 2, 2, 2, 2, 2, 2,\n 2, 20, 20, 20, 20, 20, 20, 4, 4, 4, 4, 4, 4, 4, 4, 4,\n 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 2, 2, 2, 4,\n 2, 20, 20, 20, 20, 20, 20, 4, 4, 4, 4, 4, 4, 4, 4, 4,\n 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 2, 2, 2, 0\n};\n\nstatic bool IsSpace(int c) {\n\treturn c < 128 && (character_classification[c] & 1);\n}\n\nstatic bool IsIdentifier(int c) {\n\treturn c < 128 && (character_classification[c] & 4);\n}\n\nstatic int LowerCase(int c)\n{\n\tif (c >= 'A' && c <= 'Z')\n\t\treturn 'a' + c - 'A';\n\treturn c;\n}\n\nstatic int CheckAPDLFoldPoint(char const *token, int &level) {\n\tif (!strcmp(token, \"*if\") ||\n\t\t!strcmp(token, \"*do\") ||\n\t\t!strcmp(token, \"*dowhile\") ) {\n\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\treturn 1;\n\t}\n\tif (!strcmp(token, \"*endif\") ||\n\t\t!strcmp(token, \"*enddo\") ) {\n\t\treturn -1;\n\t}\n\treturn 0;\n}\n\nstatic void FoldAPDLDoc(Sci_PositionU startPos, Sci_Position length, int,\n\tWordList *[], Accessor &styler) {\n\n\tSci_Position line = styler.GetLine(startPos);\n\tint level = styler.LevelAt(line);\n\tint go = 0, done = 0;\n\tSci_Position endPos = startPos + length;\n\tchar word[256];\n\tint wordlen = 0;\n\tSci_Position i;\n bool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\t// Scan for tokens at the start of the line (they may include\n\t// whitespace, for tokens like \"End Function\"\n\tfor (i = startPos; i < endPos; i++) {\n\t\tint c = styler.SafeGetCharAt(i);\n\t\tif (!done && !go) {\n\t\t\tif (wordlen) { // are we scanning a token already?\n\t\t\t\tword[wordlen] = static_cast(LowerCase(c));\n\t\t\t\tif (!IsIdentifier(c)) { // done with token\n\t\t\t\t\tword[wordlen] = '\\0';\n\t\t\t\t\tgo = CheckAPDLFoldPoint(word, level);\n\t\t\t\t\tif (!go) {\n\t\t\t\t\t\t// Treat any whitespace as single blank, for\n\t\t\t\t\t\t// things like \"End Function\".\n\t\t\t\t\t\tif (IsSpace(c) && IsIdentifier(word[wordlen - 1])) {\n\t\t\t\t\t\t\tword[wordlen] = ' ';\n\t\t\t\t\t\t\tif (wordlen < 255)\n\t\t\t\t\t\t\t\twordlen++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse // done with this line\n\t\t\t\t\t\t\tdone = 1;\n\t\t\t\t\t}\n\t\t\t\t} else if (wordlen < 255) {\n\t\t\t\t\twordlen++;\n\t\t\t\t}\n\t\t\t} else { // start scanning at first non-whitespace character\n\t\t\t\tif (!IsSpace(c)) {\n\t\t\t\t\tif (IsIdentifier(c)) {\n\t\t\t\t\t\tword[0] = static_cast(LowerCase(c));\n\t\t\t\t\t\twordlen = 1;\n\t\t\t\t\t} else // done with this line\n\t\t\t\t\t\tdone = 1;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (c == '\\n') { // line end\n\t\t\tif (!done && wordlen == 0 && foldCompact) // line was only space\n\t\t\t\tlevel |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif (level != styler.LevelAt(line))\n\t\t\t\tstyler.SetLevel(line, level);\n\t\t\tlevel += go;\n\t\t\tline++;\n\t\t\t// reset state\n\t\t\twordlen = 0;\n\t\t\tlevel &= ~SC_FOLDLEVELHEADERFLAG;\n\t\t\tlevel &= ~SC_FOLDLEVELWHITEFLAG;\n\t\t\tgo = 0;\n\t\t\tdone = 0;\n\t\t}\n\t}\n}\n\nstatic const char * const apdlWordListDesc[] = {\n \"processors\",\n \"commands\",\n \"slashommands\",\n \"starcommands\",\n \"arguments\",\n \"functions\",\n 0\n};\n\nextern const LexerModule lmAPDL(SCLEX_APDL, ColouriseAPDLDoc, \"apdl\", FoldAPDLDoc, apdlWordListDesc);\n" }, { "path": "lexers/LexASY.cxx", "content": "// Scintilla source code edit control\n// @file LexASY.cxx\n//Author: instanton (email: soft_share126com)\n// This lexer is for the Asymptote vector graphics language\n// https://en.wikipedia.org/wiki/Asymptote_(vector_graphics_language)\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic void ColouriseAsyDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n\t\tWordList *keywordlists[], Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\n\tCharacterSet setWordStart(CharacterSet::setAlpha, \"_\", 0x80, true);\n\tCharacterSet setWord(CharacterSet::setAlphaNum, \"._\", 0x80, true);\n\n\tint visibleChars = 0;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.atLineStart) {\n\t\t\tif (sc.state == SCE_ASY_STRING) {\n\t\t\t\tsc.SetState(SCE_ASY_STRING);\n\t\t\t}\n\t\t\tvisibleChars = 0;\n\t\t}\n\n\t\tif (sc.ch == '\\\\') {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n//\t\t\t\tcontinuationLine = true;\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_ASY_OPERATOR:\n\t\t\t\tsc.SetState(SCE_ASY_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASY_NUMBER:\n\t\t\t\tif (!setWord.Contains(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASY_IDENTIFIER:\n\t\t\t\tif (!setWord.Contains(sc.ch) || (sc.ch == '.')) {\n\t\t\t\t\tchar s[1000];\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ASY_WORD);\n\t\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ASY_WORD2);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASY_COMMENT:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASY_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASY_STRING:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_ASY_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tsc.ForwardSetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASY_CHARACTER:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_ASY_STRINGEOL);\n\t\t\t\t} else \tif (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\tsc.ForwardSetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_ASY_DEFAULT) {\n\t\t\tif (setWordStart.Contains(sc.ch) || (sc.ch == '@')) {\n\t\t\t\tsc.SetState(SCE_ASY_IDENTIFIER);\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tsc.SetState(SCE_ASY_COMMENT);\n\t\t\t\tsc.Forward();\t//\n\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\tsc.SetState(SCE_ASY_COMMENTLINE);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_ASY_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_ASY_CHARACTER);\n\t\t\t} else if (sc.ch == '#' && visibleChars == 0) {\n\t\t\t\tdo {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} while ((sc.ch == ' ' || sc.ch == '\\t') && sc.More());\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.SetState(SCE_ASY_DEFAULT);\n\t\t\t\t}\n\t\t\t} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_ASY_OPERATOR);\n\t\t\t}\n\t\t}\n\n\t}\n\tsc.Complete();\n}\n\nstatic bool IsAsyCommentStyle(int style) {\n\treturn style == SCE_ASY_COMMENT;\n}\n\n\nstatic inline bool isASYidentifier(int ch) {\n\treturn\n ((ch >= 'a') && (ch <= 'z')) || ((ch >= 'A') && (ch <= 'Z')) ;\n}\n\nstatic int ParseASYWord(Sci_PositionU pos, Accessor &styler, char *word)\n{\n int length=0;\n char ch=styler.SafeGetCharAt(pos);\n *word=0;\n\n while(isASYidentifier(ch) && length<100){\n word[length]=ch;\n length++;\n ch=styler.SafeGetCharAt(pos+length);\n }\n word[length]=0;\n return length;\n}\n\nstatic bool IsASYDrawingLine(Sci_Position line, Accessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\n\tSci_Position startpos = pos;\n\tchar buffer[100]=\"\";\n\n\twhile (startpos 0)\n\t\tlevelCurrent = styler.LevelAt(lineCurrent-1) >> 16;\n\tint levelMinCurrent = levelCurrent;\n\tint levelNext = levelCurrent;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (foldComment && IsAsyCommentStyle(style)) {\n\t\t\tif (!IsAsyCommentStyle(stylePrev) && (stylePrev != SCE_ASY_COMMENTLINEDOC)) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (!IsAsyCommentStyle(styleNext) && (styleNext != SCE_ASY_COMMENTLINEDOC) && !atEOL) {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (style == SCE_ASY_OPERATOR) {\n\t\t\tif (ch == '{') {\n\t\t\t\tif (levelMinCurrent > levelNext) {\n\t\t\t\t\tlevelMinCurrent = levelNext;\n\t\t\t\t}\n\t\t\t\tlevelNext++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\n\t\tif (atEOL && IsASYDrawingLine(lineCurrent, styler)){\n\t\t\tif (lineCurrent==0 && IsASYDrawingLine(lineCurrent + 1, styler))\n\t\t\t\tlevelNext++;\n\t\t\telse if (lineCurrent!=0 && !IsASYDrawingLine(lineCurrent - 1, styler)\n\t\t\t\t&& IsASYDrawingLine(lineCurrent + 1, styler)\n\t\t\t\t)\n\t\t\t\tlevelNext++;\n\t\t\telse if (lineCurrent!=0 && IsASYDrawingLine(lineCurrent - 1, styler) &&\n\t\t\t\t!IsASYDrawingLine(lineCurrent+1, styler))\n\t\t\t\tlevelNext--;\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tint levelUse = levelCurrent;\n\t\t\tif (foldAtElse) {\n\t\t\t\tlevelUse = levelMinCurrent;\n\t\t\t}\n\t\t\tint lev = levelUse | levelNext << 16;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif (levelUse < levelNext)\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelCurrent = levelNext;\n\t\t\tlevelMinCurrent = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!IsASpace(ch))\n\t\t\tvisibleChars++;\n\t}\n}\n\nstatic const char * const asyWordLists[] = {\n \"Primary keywords and identifiers\",\n \"Secondary keywords and identifiers\",\n 0,\n };\n\nextern const LexerModule lmASY(SCLEX_ASYMPTOTE, ColouriseAsyDoc, \"asy\", FoldAsyDoc, asyWordLists);\n" }, { "path": "lexers/LexAU3.cxx", "content": "// Scintilla source code edit control\n// @file LexAU3.cxx\n// Lexer for AutoIt3 https://www.autoitscript.com/site/\n// by Jos van der Zande, jvdzande@yahoo.com\n//\n// Changes:\n// March 28, 2004 - Added the standard Folding code\n// April 21, 2004 - Added Preprosessor Table + Syntax Highlighting\n// Fixed Number highlighting\n// Changed default isoperator to IsAOperator to have a better match to AutoIt3\n// Fixed \"#comments_start\" -> \"#comments-start\"\n// Fixed \"#comments_end\" -> \"#comments-end\"\n// Fixed Sendkeys in Strings when not terminated with }\n// Added support for Sendkey strings that have second parameter e.g. {UP 5} or {a down}\n// April 26, 2004 - Fixed # pre-processor statement inside of comment block would invalidly change the color.\n// Added logic for #include to treat the <> as string\n// Added underscore to IsAOperator.\n// May 17, 2004 - Changed the folding logic from indent to keyword folding.\n// Added Folding logic for blocks of single-commentlines or commentblock.\n// triggered by: fold.comment=1\n// Added Folding logic for preprocessor blocks triggered by fold.preprocessor=1\n// Added Special for #region - #endregion syntax highlight and folding.\n// May 30, 2004 - Fixed issue with continuation lines on If statements.\n// June 5, 2004 - Added comma to Operators for better readability.\n// Added fold.compact support set with fold.compact=1\n// Changed folding inside of #cs-#ce. Default is no keyword folding inside comment blocks when fold.comment=1\n// it will now only happen when fold.comment=2.\n// Sep 5, 2004 - Added logic to handle colourizing words on the last line.\n// Typed Characters now show as \"default\" till they match any table.\n// Oct 10, 2004 - Added logic to show Comments in \"Special\" directives.\n// Nov 1, 2004 - Added better testing for Numbers supporting x and e notation.\n// Nov 28, 2004 - Added logic to handle continuation lines for syntax highlighting.\n// Jan 10, 2005 - Added Abbreviations Keyword used for expansion\n// Mar 24, 2005 - Updated Abbreviations Keywords to fix when followed by Operator.\n// Apr 18, 2005 - Updated #CE/#Comment-End logic to take a linecomment \";\" into account\n// - Added folding support for With...EndWith\n// - Added support for a DOT in variable names\n// - Fixed Underscore in CommentBlock\n// May 23, 2005 - Fixed the SentKey lexing in case of a missing }\n// Aug 11, 2005 - Fixed possible bug with s_save length > 100.\n// Aug 23, 2005 - Added Switch/endswitch support to the folding logic.\n// Sep 27, 2005 - Fixed the SentKey lexing logic in case of multiple sentkeys.\n// Mar 12, 2006 - Fixed issue with <> coloring as String in stead of Operator in rare occasions.\n// Apr 8, 2006 - Added support for AutoIt3 Standard UDF library (SCE_AU3_UDF)\n// Mar 9, 2007 - Fixed bug with + following a String getting the wrong Color.\n// Jun 20, 2007 - Fixed Commentblock issue when LF's are used as EOL.\n// Jul 26, 2007 - Fixed #endregion undetected bug.\n//\n// Copyright for Scintilla: 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n// Scintilla source code edit control\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsTypeCharacter(const int ch)\n{\n return ch == '$';\n}\nstatic inline bool IsAWordChar(const int ch)\n{\n return (ch < 0x80) && (isalnum(ch) || ch == '_');\n}\n\nstatic inline bool IsAWordStart(const int ch)\n{\n return (ch < 0x80) && (isalnum(ch) || ch == '_' || ch == '@' || ch == '#' || ch == '$' || ch == '.');\n}\n\nstatic inline bool IsAOperator(char ch) {\n\tif (IsASCII(ch) && isalnum(ch))\n\t\treturn false;\n\tif (ch == '+' || ch == '-' || ch == '*' || ch == '/' ||\n\t ch == '&' || ch == '^' || ch == '=' || ch == '<' || ch == '>' ||\n\t ch == '(' || ch == ')' || ch == '[' || ch == ']' || ch == ',' )\n\t\treturn true;\n\treturn false;\n}\n\n///////////////////////////////////////////////////////////////////////////////\n// GetSendKey() filters the portion before and after a/multiple space(s)\n// and return the first portion to be looked-up in the table\n// also check if the second portion is valid... (up,down.on.off,toggle or a number)\n///////////////////////////////////////////////////////////////////////////////\n\nstatic int GetSendKey(const char *szLine, char *szKey)\n{\n\tint\t\tnFlag\t= 0;\n\tint\t\tnStartFound\t= 0;\n\tint\t\tnKeyPos\t= 0;\n\tint\t\tnSpecPos= 0;\n\tint\t\tnSpecNum= 1;\n\tint\t\tnPos\t= 0;\n\tchar\tcTemp;\n\tchar\tszSpecial[100];\n\n\t// split the portion of the sendkey in the part before and after the spaces\n\twhile ( ( (cTemp = szLine[nPos]) != '\\0'))\n\t{\n\t\t// skip leading Ctrl/Shift/Alt state\n\t\tif (cTemp == '{') {\n\t\t\tnStartFound = 1;\n\t\t}\n\t\t//\n\t\tif (nStartFound == 1) {\n\t\t\tif ((cTemp == ' ') && (nFlag == 0) ) // get the stuff till first space\n\t\t\t{\n\t\t\t\tnFlag = 1;\n\t\t\t\t// Add } to the end of the first bit for table lookup later.\n\t\t\t\tszKey[nKeyPos++] = '}';\n\t\t\t}\n\t\t\telse if (cTemp == ' ')\n\t\t\t{\n\t\t\t\t// skip other spaces\n\t\t\t}\n\t\t\telse if (nFlag == 0)\n\t\t\t{\n\t\t\t\t// save first portion into var till space or } is hit\n\t\t\t\tszKey[nKeyPos++] = cTemp;\n\t\t\t}\n\t\t\telse if ((nFlag == 1) && (cTemp != '}'))\n\t\t\t{\n\t\t\t\t// Save second portion into var...\n\t\t\t\tszSpecial[nSpecPos++] = cTemp;\n\t\t\t\t// check if Second portion is all numbers for repeat fuction\n\t\t\t\tif (isdigit(cTemp) == false) {nSpecNum = 0;}\n\t\t\t}\n\t\t}\n\t\tnPos++;\t\t\t\t\t\t\t\t\t// skip to next char\n\n\t} // End While\n\n\n\t// Check if the second portion is either a number or one of these keywords\n\tszKey[nKeyPos] = '\\0';\n\tszSpecial[nSpecPos] = '\\0';\n\tif (strcmp(szSpecial,\"down\")== 0 || strcmp(szSpecial,\"up\")== 0 ||\n\t\tstrcmp(szSpecial,\"on\")== 0 || strcmp(szSpecial,\"off\")== 0 ||\n\t\tstrcmp(szSpecial,\"toggle\")== 0 || nSpecNum == 1 )\n\t{\n\t\tnFlag = 0;\n\t}\n\telse\n\t{\n\t\tnFlag = 1;\n\t}\n\treturn nFlag; // 1 is bad, 0 is good\n\n} // GetSendKey()\n\n//\n// Routine to check the last \"none comment\" character on a line to see if its a continuation\n//\nstatic bool IsContinuationLine(Sci_PositionU szLine, Accessor &styler)\n{\n\tSci_Position nsPos = styler.LineStart(szLine);\n\tSci_Position nePos = styler.LineStart(szLine+1) - 2;\n\t//int stylech = styler.StyleAt(nsPos);\n\twhile (nsPos < nePos)\n\t{\n\t\t//stylech = styler.StyleAt(nePos);\n\t\tint stylech = styler.StyleAt(nsPos);\n\t\tif (!(stylech == SCE_AU3_COMMENT)) {\n\t\t\tchar ch = styler.SafeGetCharAt(nePos);\n\t\t\tif (!isspacechar(ch)) {\n\t\t\t\tif (ch == '_')\n\t\t\t\t\treturn true;\n\t\t\t\telse\n\t\t\t\t\treturn false;\n\t\t\t}\n\t\t}\n\t\tnePos--; // skip to next char\n\t} // End While\n\treturn false;\n} // IsContinuationLine()\n\n//\n// syntax highlighting logic\nstatic void ColouriseAU3Doc(Sci_PositionU startPos,\n\t\t\t\t\t\t\tSci_Position length, int initStyle,\n\t\t\t\t\t\t\tWordList *keywordlists[],\n\t\t\t\t\t\t\tAccessor &styler) {\n\n WordList &keywords = *keywordlists[0];\n WordList &keywords2 = *keywordlists[1];\n WordList &keywords3 = *keywordlists[2];\n WordList &keywords4 = *keywordlists[3];\n WordList &keywords5 = *keywordlists[4];\n WordList &keywords6 = *keywordlists[5];\n WordList &keywords7 = *keywordlists[6];\n WordList &keywords8 = *keywordlists[7];\n\t// find the first previous line without continuation character at the end\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tSci_Position s_startPos = startPos;\n\t// When not inside a Block comment: find First line without _\n\tif (!(initStyle==SCE_AU3_COMMENTBLOCK)) {\n\t\twhile ((lineCurrent > 0 && IsContinuationLine(lineCurrent,styler)) ||\n\t\t\t (lineCurrent > 1 && IsContinuationLine(lineCurrent-1,styler))) {\n\t\t\tlineCurrent--;\n\t\t\tstartPos = styler.LineStart(lineCurrent); // get start position\n\t\t\tinitStyle = 0; // reset the start style to 0\n\t\t}\n\t}\n\t// Set the new length to include it from the start and set the start position\n\tlength = length + s_startPos - startPos; // correct the total length to process\n styler.StartAt(startPos);\n\n StyleContext sc(startPos, length, initStyle, styler);\n\tchar si; // string indicator \"=1 '=2\n\tchar ni; // Numeric indicator error=9 normal=0 normal+dec=1 hex=2 Enot=3\n\tchar ci; // comment indicator 0=not linecomment(;)\n\tchar s_save[100] = \"\";\n\tsi=0;\n\tni=0;\n\tci=0;\n\t//$$$\n for (; sc.More(); sc.Forward()) {\n\t\tchar s[100];\n\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t// **********************************************\n\t\t// save the total current word for eof processing\n\t\tif (IsAWordChar(sc.ch) || sc.ch == '}')\n\t\t{\n\t\t\tstrcpy(s_save,s);\n\t\t\tint tp = static_cast(strlen(s_save));\n\t\t\tif (tp < 99) {\n\t\t\t\ts_save[tp] = static_cast(tolower(sc.ch));\n\t\t\t\ts_save[tp+1] = '\\0';\n\t\t\t}\n\t\t}\n\t\t// **********************************************\n\t\t//\n\t\tswitch (sc.state)\n {\n case SCE_AU3_COMMENTBLOCK:\n {\n\t\t\t\t//Reset at line end\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tci=0;\n\t\t\t\t\tif (strcmp(s, \"#ce\")== 0 || strcmp(s, \"#comments-end\")== 0) {\n\t\t\t\t\t\tif (sc.atLineEnd)\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_COMMENTBLOCK);\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t//skip rest of line when a ; is encountered\n\t\t\t\tif (sc.chPrev == ';') {\n\t\t\t\t\tci=2;\n\t\t\t\t\tsc.SetState(SCE_AU3_COMMENTBLOCK);\n\t\t\t\t}\n\t\t\t\t// skip rest of the line\n\t\t\t\tif (ci==2)\n\t\t\t\t\tbreak;\n\t\t\t\t// check when first character is detected on the line\n\t\t\t\tif (ci==0) {\n\t\t\t\t\tif (IsAWordStart(static_cast(sc.ch)) || IsAOperator(static_cast(sc.ch))) {\n\t\t\t\t\t\tci=1;\n\t\t\t\t\t\tsc.SetState(SCE_AU3_COMMENTBLOCK);\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tif (!(IsAWordChar(sc.ch) || (sc.ch == '-' && strcmp(s, \"#comments\") == 0))) {\n\t\t\t\t\tif ((strcmp(s, \"#ce\")== 0 || strcmp(s, \"#comments-end\")== 0))\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_COMMENT); // set to comment line for the rest of the line\n\t\t\t\t\telse\n\t\t\t\t\t\tci=2; // line doesn't begin with #CE so skip the rest of the line\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\t}\n case SCE_AU3_COMMENT:\n {\n if (sc.atLineEnd) {sc.SetState(SCE_AU3_DEFAULT);}\n break;\n }\n case SCE_AU3_OPERATOR:\n {\n // check if its a COMobject\n\t\t\t\tif (sc.chPrev == '.' && IsAWordChar(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_AU3_COMOBJ);\n\t\t\t\t}\n\t\t\t\telse {\n\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t}\n break;\n }\n case SCE_AU3_SPECIAL:\n {\n if (sc.ch == ';') {sc.SetState(SCE_AU3_COMMENT);}\n\t\t\t\tif (sc.atLineEnd) {sc.SetState(SCE_AU3_DEFAULT);}\n break;\n }\n case SCE_AU3_KEYWORD:\n {\n if (!(IsAWordChar(sc.ch) || (sc.ch == '-' && (strcmp(s, \"#comments\") == 0 || strcmp(s, \"#include\") == 0))))\n {\n if (!IsTypeCharacter(sc.ch))\n {\n\t\t\t\t\t\tif (strcmp(s, \"#cs\")== 0 || strcmp(s, \"#comments-start\")== 0 )\n\t\t\t\t\t\t{\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_COMMENTBLOCK);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_COMMENTBLOCK);\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (keywords.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_KEYWORD);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (keywords2.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_FUNCTION);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (keywords3.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_MACRO);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (keywords5.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_PREPROCESSOR);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t\tif (strcmp(s, \"#include\")== 0)\n\t\t\t\t\t\t\t{\n\t\t\t\t\t\t\t\tsi = 3; // use to determine string start for #inlude <>\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (keywords6.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_SPECIAL);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_SPECIAL);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if ((keywords7.InList(s)) && (!IsAOperator(static_cast(sc.ch)))) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_EXPAND);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (keywords8.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_UDF);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (strcmp(s, \"_\") == 0) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_OPERATOR);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (!IsAWordChar(sc.ch)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n if (sc.atLineEnd) {\n\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);}\n break;\n }\n\t\t\tcase SCE_AU3_NUMBER:\n {\n\t\t\t\t// Numeric indicator error=9 normal=0 normal+dec=1 hex=2 E-not=3\n\t\t\t\t//\n\t\t\t\t// test for Hex notation\n\t\t\t\tif (strcmp(s, \"0\") == 0 && (sc.ch == 'x' || sc.ch == 'X') && ni == 0)\n\t\t\t\t{\n\t\t\t\t\tni = 2;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t// test for E notation\n\t\t\t\tif (IsADigit(sc.chPrev) && (sc.ch == 'e' || sc.ch == 'E') && ni <= 1)\n\t\t\t\t{\n\t\t\t\t\tni = 3;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t// Allow Hex characters inside hex numeric strings\n\t\t\t\tif ((ni == 2) &&\n\t\t\t\t\t(sc.ch == 'a' || sc.ch == 'b' || sc.ch == 'c' || sc.ch == 'd' || sc.ch == 'e' || sc.ch == 'f' ||\n\t\t\t\t\t sc.ch == 'A' || sc.ch == 'B' || sc.ch == 'C' || sc.ch == 'D' || sc.ch == 'E' || sc.ch == 'F' ))\n\t\t\t\t{\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t// test for 1 dec point only\n\t\t\t\tif (sc.ch == '.')\n\t\t\t\t{\n\t\t\t\t\tif (ni==0)\n\t\t\t\t\t{\n\t\t\t\t\t\tni=1;\n\t\t\t\t\t}\n\t\t\t\t\telse\n\t\t\t\t\t{\n\t\t\t\t\t\tni=9;\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t// end of numeric string ?\n\t\t\t\tif (!(IsADigit(sc.ch)))\n\t\t\t\t{\n\t\t\t\t\tif (ni==9)\n\t\t\t\t\t{\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tcase SCE_AU3_VARIABLE:\n\t\t\t{\n\t\t\t\t// Check if its a COMObject\n\t\t\t\tif (sc.ch == '.' && !IsADigit(sc.chNext)) {\n\t\t\t\t\tsc.SetState(SCE_AU3_OPERATOR);\n\t\t\t\t}\n\t\t\t\telse if (!IsAWordChar(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n }\n\t\t\tcase SCE_AU3_COMOBJ:\n\t\t\t{\n\t\t\t\tif (!(IsAWordChar(sc.ch))) {\n\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n }\n case SCE_AU3_STRING:\n {\n\t\t\t\t// check for \" to end a double qouted string or\n\t\t\t\t// check for ' to end a single qouted string\n\t if ((si == 1 && sc.ch == '\\\"') || (si == 2 && sc.ch == '\\'') || (si == 3 && sc.ch == '>'))\n\t\t\t\t{\n\t\t\t\t\tsc.ForwardSetState(SCE_AU3_DEFAULT);\n\t\t\t\t\tsi=0;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n if (sc.atLineEnd)\n\t\t\t\t{\n\t\t\t\t\tsi=0;\n\t\t\t\t\t// at line end and not found a continuation char then reset to default\n\t\t\t\t\tSci_Position lineCurrent = styler.GetLine(sc.currentPos);\n\t\t\t\t\tif (!IsContinuationLine(lineCurrent,styler))\n\t\t\t\t\t{\n\t\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// find Sendkeys in a STRING\n\t\t\t\tif (sc.ch == '{' || sc.ch == '+' || sc.ch == '!' || sc.ch == '^' || sc.ch == '#' ) {\n\t\t\t\t\tsc.SetState(SCE_AU3_SENT);}\n\t\t\t\tbreak;\n }\n\n case SCE_AU3_SENT:\n {\n\t\t\t\t// Send key string ended\n\t\t\t\tif (sc.chPrev == '}' && sc.ch != '}')\n\t\t\t\t{\n\t\t\t\t\t// set color to SENDKEY when valid sendkey .. else set back to regular string\n\t\t\t\t\tchar sk[100];\n\t\t\t\t\t// split {111 222} and return {111} and check if 222 is valid.\n\t\t\t\t\t// if return code = 1 then invalid 222 so must be string\n\t\t\t\t\tif (GetSendKey(s,sk))\n\t\t\t\t\t{\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t\t\t}\n\t\t\t\t\t// if single char between {?} then its ok as sendkey for a single character\n\t\t\t\t\telse if (strlen(sk) == 3)\n\t\t\t\t\t{\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_SENT);\n\t\t\t\t\t}\n\t\t\t\t\t// if sendkey {111} is in table then ok as sendkey\n\t\t\t\t\telse if (keywords4.InList(sk))\n\t\t\t\t\t{\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_SENT);\n\t\t\t\t\t}\n\t\t\t\t\telse\n\t\t\t\t\t{\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_AU3_STRING);\n\t\t\t\t}\n\t\t\t\telse\n\t\t\t\t{\n\t\t\t\t\t// check if the start is a valid SendKey start\n\t\t\t\t\tSci_Position\t\tnPos\t= 0;\n\t\t\t\t\tint\t\tnState\t= 1;\n\t\t\t\t\tchar\tcTemp;\n\t\t\t\t\twhile (!(nState == 2) && ((cTemp = s[nPos]) != '\\0'))\n\t\t\t\t\t{\n\t\t\t\t\t\tif (cTemp == '{' && nState == 1)\n\t\t\t\t\t\t{\n\t\t\t\t\t\t\tnState = 2;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tif (nState == 1 && !(cTemp == '+' || cTemp == '!' || cTemp == '^' || cTemp == '#' ))\n\t\t\t\t\t\t{\n\t\t\t\t\t\t\tnState = 0;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tnPos++;\n\t\t\t\t\t}\n\t\t\t\t\t//Verify characters infront of { ... if not assume regular string\n\t\t\t\t\tif (nState == 1 && (!(sc.ch == '{' || sc.ch == '+' || sc.ch == '!' || sc.ch == '^' || sc.ch == '#' ))) {\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t\t\t\tsc.SetState(SCE_AU3_STRING);\n\t\t\t\t\t}\n\t\t\t\t\t// If invalid character found then assume its a regular string\n\t\t\t\t\tif (nState == 0) {\n\t\t\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t\t\t\tsc.SetState(SCE_AU3_STRING);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// check if next portion is again a sendkey\n\t\t\t\tif (sc.atLineEnd)\n\t\t\t\t{\n\t\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t\t\t\tsi = 0; // reset string indicator\n\t\t\t\t}\n\t\t\t\t//* check in next characters following a sentkey are again a sent key\n\t\t\t\t// Need this test incase of 2 sentkeys like {F1}{ENTER} but not detect {{}\n\t\t\t\tif (sc.state == SCE_AU3_STRING && (sc.ch == '{' || sc.ch == '+' || sc.ch == '!' || sc.ch == '^' || sc.ch == '#' )) {\n\t\t\t\t\tsc.SetState(SCE_AU3_SENT);}\n\t\t\t\t// check to see if the string ended...\n\t\t\t\t// Sendkey string isn't complete but the string ended....\n\t\t\t\tif ((si == 1 && sc.ch == '\\\"') || (si == 2 && sc.ch == '\\''))\n\t\t\t\t{\n\t\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t\t\tsc.ForwardSetState(SCE_AU3_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n }\n } //switch (sc.state)\n\n // Determine if a new state should be entered:\n\n\t\tif (sc.state == SCE_AU3_DEFAULT)\n {\n if (sc.ch == ';') {sc.SetState(SCE_AU3_COMMENT);}\n else if (sc.ch == '#') {sc.SetState(SCE_AU3_KEYWORD);}\n else if (sc.ch == '$') {sc.SetState(SCE_AU3_VARIABLE);}\n else if (sc.ch == '.' && !IsADigit(sc.chNext)) {sc.SetState(SCE_AU3_OPERATOR);}\n else if (sc.ch == '@') {sc.SetState(SCE_AU3_KEYWORD);}\n //else if (sc.ch == '_') {sc.SetState(SCE_AU3_KEYWORD);}\n else if (sc.ch == '<' && si==3) {sc.SetState(SCE_AU3_STRING);} // string after #include\n else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_AU3_STRING);\n\t\t\t\tsi = 1;\t}\n else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_AU3_STRING);\n\t\t\t\tsi = 2;\t}\n else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext)))\n\t\t\t{\n\t\t\t\tsc.SetState(SCE_AU3_NUMBER);\n\t\t\t\tni = 0;\n\t\t\t}\n else if (IsAWordStart(sc.ch)) {sc.SetState(SCE_AU3_KEYWORD);}\n else if (IsAOperator(static_cast(sc.ch))) {sc.SetState(SCE_AU3_OPERATOR);}\n\t\t\telse if (sc.atLineEnd) {sc.SetState(SCE_AU3_DEFAULT);}\n }\n } //for (; sc.More(); sc.Forward())\n\n\t//*************************************\n\t// Colourize the last word correctly\n\t//*************************************\n\tif (sc.state == SCE_AU3_KEYWORD)\n\t\t{\n\t\tif (strcmp(s_save, \"#cs\")== 0 || strcmp(s_save, \"#comments-start\")== 0 )\n\t\t{\n\t\t\tsc.ChangeState(SCE_AU3_COMMENTBLOCK);\n\t\t\tsc.SetState(SCE_AU3_COMMENTBLOCK);\n\t\t}\n\t\telse if (keywords.InList(s_save)) {\n\t\t\tsc.ChangeState(SCE_AU3_KEYWORD);\n\t\t\tsc.SetState(SCE_AU3_KEYWORD);\n\t\t}\n\t\telse if (keywords2.InList(s_save)) {\n\t\t\tsc.ChangeState(SCE_AU3_FUNCTION);\n\t\t\tsc.SetState(SCE_AU3_FUNCTION);\n\t\t}\n\t\telse if (keywords3.InList(s_save)) {\n\t\t\tsc.ChangeState(SCE_AU3_MACRO);\n\t\t\tsc.SetState(SCE_AU3_MACRO);\n\t\t}\n\t\telse if (keywords5.InList(s_save)) {\n\t\t\tsc.ChangeState(SCE_AU3_PREPROCESSOR);\n\t\t\tsc.SetState(SCE_AU3_PREPROCESSOR);\n\t\t}\n\t\telse if (keywords6.InList(s_save)) {\n\t\t\tsc.ChangeState(SCE_AU3_SPECIAL);\n\t\t\tsc.SetState(SCE_AU3_SPECIAL);\n\t\t}\n\t\telse if (keywords7.InList(s_save) && sc.atLineEnd) {\n\t\t\tsc.ChangeState(SCE_AU3_EXPAND);\n\t\t\tsc.SetState(SCE_AU3_EXPAND);\n\t\t}\n\t\telse if (keywords8.InList(s_save)) {\n\t\t\tsc.ChangeState(SCE_AU3_UDF);\n\t\t\tsc.SetState(SCE_AU3_UDF);\n\t\t}\n\t\telse {\n\t\t\tsc.ChangeState(SCE_AU3_DEFAULT);\n\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t}\n\t}\n\tif (sc.state == SCE_AU3_SENT)\n {\n\t\t// Send key string ended\n\t\tif (sc.chPrev == '}' && sc.ch != '}')\n\t\t{\n\t\t\t// set color to SENDKEY when valid sendkey .. else set back to regular string\n\t\t\tchar sk[100];\n\t\t\t// split {111 222} and return {111} and check if 222 is valid.\n\t\t\t// if return code = 1 then invalid 222 so must be string\n\t\t\tif (GetSendKey(s_save,sk))\n\t\t\t{\n\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t}\n\t\t\t// if single char between {?} then its ok as sendkey for a single character\n\t\t\telse if (strlen(sk) == 3)\n\t\t\t{\n\t\t\t\tsc.ChangeState(SCE_AU3_SENT);\n\t\t\t}\n\t\t\t// if sendkey {111} is in table then ok as sendkey\n\t\t\telse if (keywords4.InList(sk))\n\t\t\t{\n\t\t\t\tsc.ChangeState(SCE_AU3_SENT);\n\t\t\t}\n\t\t\telse\n\t\t\t{\n\t\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\t}\n\t\t\tsc.SetState(SCE_AU3_STRING);\n\t\t}\n\t\t// check if next portion is again a sendkey\n\t\tif (sc.atLineEnd)\n\t\t{\n\t\t\tsc.ChangeState(SCE_AU3_STRING);\n\t\t\tsc.SetState(SCE_AU3_DEFAULT);\n\t\t}\n }\n\t//*************************************\n\tsc.Complete();\n}\n\n//\nstatic bool IsStreamCommentStyle(int style) {\n\treturn style == SCE_AU3_COMMENT || style == SCE_AU3_COMMENTBLOCK;\n}\n\n//\n// Routine to find first none space on the current line and return its Style\n// needed for comment lines not starting on pos 1\nstatic int GetStyleFirstWord(Sci_PositionU szLine, Accessor &styler)\n{\n\tSci_Position nsPos = styler.LineStart(szLine);\n\tSci_Position nePos = styler.LineStart(szLine+1) - 1;\n\twhile (isspacechar(styler.SafeGetCharAt(nsPos)) && nsPos < nePos)\n\t{\n\t\tnsPos++; // skip to next char\n\n\t} // End While\n\treturn styler.StyleAt(nsPos);\n\n} // GetStyleFirstWord()\n\n\n//\nstatic void FoldAU3Doc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler)\n{\n\tSci_Position endPos = startPos + length;\n\t// get settings from the config files for folding comments and preprocessor lines\n\tbool foldComment = styler.GetPropertyInt(\"fold.comment\") != 0;\n\tbool foldInComment = styler.GetPropertyInt(\"fold.comment\") == 2;\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\tbool foldpreprocessor = styler.GetPropertyInt(\"fold.preprocessor\") != 0;\n\t// Backtrack to previous line in case need to fix its fold status\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tif (startPos > 0) {\n\t\tif (lineCurrent > 0) {\n\t\t\tlineCurrent--;\n\t\t\tstartPos = styler.LineStart(lineCurrent);\n\t\t}\n\t}\n\t// vars for style of previous/current/next lines\n\tint style = GetStyleFirstWord(lineCurrent,styler);\n\tint stylePrev = 0;\n\t// find the first previous line without continuation character at the end\n\twhile ((lineCurrent > 0 && IsContinuationLine(lineCurrent,styler)) ||\n\t (lineCurrent > 1 && IsContinuationLine(lineCurrent-1,styler))) {\n\t\tlineCurrent--;\n\t\tstartPos = styler.LineStart(lineCurrent);\n\t}\n\tif (lineCurrent > 0) {\n\t\tstylePrev = GetStyleFirstWord(lineCurrent-1,styler);\n\t}\n\t// vars for getting first word to check for keywords\n\tbool FirstWordStart = false;\n\tbool FirstWordEnd = false;\n\tchar szKeyword[11]=\"\";\n\tint\t szKeywordlen = 0;\n\tchar szThen[5]=\"\";\n\tint\t szThenlen = 0;\n\tbool ThenFoundLast = false;\n\t// var for indentlevel\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelCurrent = styler.LevelAt(lineCurrent-1) >> 16;\n\tint levelNext = levelCurrent;\n\t//\n\tint\tvisibleChars = 0;\n\tchar chNext = styler.SafeGetCharAt(startPos);\n\tchar chPrev = ' ';\n\t//\n\tfor (Sci_Position i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tif (IsAWordChar(ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t\t// get the syle for the current character neede to check in comment\n\t\tint stylech = styler.StyleAt(i);\n\t\t// get first word for the line for indent check max 9 characters\n\t\tif (FirstWordStart && (!(FirstWordEnd))) {\n\t\t\tif (!IsAWordChar(ch)) {\n\t\t\t\tFirstWordEnd = true;\n\t\t\t\tszKeyword[szKeywordlen] = '\\0';\n\t\t\t}\n\t\t\telse {\n\t\t\t\tif (szKeywordlen < 10) {\n\t\t\t\tszKeyword[szKeywordlen++] = static_cast(tolower(ch));\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\t// start the capture of the first word\n\t\tif (!(FirstWordStart)) {\n\t\t\tif (IsAWordChar(ch) || IsAWordStart(ch) || ch == ';') {\n\t\t\t\tFirstWordStart = true;\n\t\t\t\tszKeyword[szKeywordlen++] = static_cast(tolower(ch));\n\t\t\t}\n\t\t}\n\t\t// only process this logic when not in comment section\n\t\tif (!(stylech == SCE_AU3_COMMENT)) {\n\t\t\tif (ThenFoundLast) {\n\t\t\t\tif (IsAWordChar(ch)) {\n\t\t\t\t\tThenFoundLast = false;\n\t\t\t\t}\n\t\t\t}\n\t\t\t// find out if the word \"then\" is the last on a \"if\" line\n\t\t\tif (FirstWordEnd && strcmp(szKeyword,\"if\") == 0) {\n\t\t\t\tif (szThenlen == 4) {\n\t\t\t\t\tszThen[0] = szThen[1];\n\t\t\t\t\tszThen[1] = szThen[2];\n\t\t\t\t\tszThen[2] = szThen[3];\n\t\t\t\t\tszThen[3] = static_cast(tolower(ch));\n\t\t\t\t\tif (strcmp(szThen,\"then\") == 0 ) {\n\t\t\t\t\t\tThenFoundLast = true;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\telse {\n\t\t\t\t\tszThen[szThenlen++] = static_cast(tolower(ch));\n\t\t\t\t\tif (szThenlen == 5) {\n\t\t\t\t\t\tszThen[4] = '\\0';\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\t// End of Line found so process the information\n\t\tif ((ch == '\\r' && chNext != '\\n') || (ch == '\\n') || (i == endPos)) {\n\t\t\t// **************************\n\t\t\t// Folding logic for Keywords\n\t\t\t// **************************\n\t\t\t// if a keyword is found on the current line and the line doesn't end with _ (continuation)\n\t\t\t// and we are not inside a commentblock.\n\t\t\tif (szKeywordlen > 0 && (!(chPrev == '_')) &&\n\t\t\t\t((!(IsStreamCommentStyle(style)) || foldInComment)) ) {\n\t\t\t\tszKeyword[szKeywordlen] = '\\0';\n\t\t\t\t// only fold \"if\" last keyword is \"then\" (else its a one line if)\n\t\t\t\tif (strcmp(szKeyword,\"if\") == 0 && ThenFoundLast) {\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t}\n\t\t\t\t// create new fold for these words\n\t\t\t\tif (strcmp(szKeyword,\"do\") == 0 || strcmp(szKeyword,\"for\") == 0 ||\n\t\t\t\t\tstrcmp(szKeyword,\"func\") == 0 || strcmp(szKeyword,\"while\") == 0||\n\t\t\t\t\tstrcmp(szKeyword,\"with\") == 0 || strcmp(szKeyword,\"#region\") == 0 ) {\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t}\n\t\t\t\t// create double Fold for select&switch because Case will subtract one of the current level\n\t\t\t\tif (strcmp(szKeyword,\"select\") == 0 || strcmp(szKeyword,\"switch\") == 0) {\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t}\n\t\t\t\t// end the fold for these words before the current line\n\t\t\t\tif (strcmp(szKeyword,\"endfunc\") == 0 || strcmp(szKeyword,\"endif\") == 0 ||\n\t\t\t\t\tstrcmp(szKeyword,\"next\") == 0 || strcmp(szKeyword,\"until\") == 0 ||\n\t\t\t\t\tstrcmp(szKeyword,\"endwith\") == 0 ||strcmp(szKeyword,\"wend\") == 0){\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t\t// end the fold for these words before the current line and Start new fold\n\t\t\t\tif (strcmp(szKeyword,\"case\") == 0 || strcmp(szKeyword,\"else\") == 0 ||\n\t\t\t\t\tstrcmp(szKeyword,\"elseif\") == 0 ) {\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t\t// end the double fold for this word before the current line\n\t\t\t\tif (strcmp(szKeyword,\"endselect\") == 0 || strcmp(szKeyword,\"endswitch\") == 0 ) {\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t\t// end the fold for these words on the current line\n\t\t\t\tif (strcmp(szKeyword,\"#endregion\") == 0 ) {\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t}\n\t\t\t// Preprocessor and Comment folding\n\t\t\tint styleNext = GetStyleFirstWord(lineCurrent + 1,styler);\n\t\t\t// *************************************\n\t\t\t// Folding logic for preprocessor blocks\n\t\t\t// *************************************\n\t\t\t// process preprosessor line\n\t\t\tif (foldpreprocessor && style == SCE_AU3_PREPROCESSOR) {\n\t\t\t\tif (!(stylePrev == SCE_AU3_PREPROCESSOR) && (styleNext == SCE_AU3_PREPROCESSOR)) {\n\t\t\t\t levelNext++;\n\t\t\t\t}\n\t\t\t\t// fold till the last line for normal comment lines\n\t\t\t\telse if (stylePrev == SCE_AU3_PREPROCESSOR && !(styleNext == SCE_AU3_PREPROCESSOR)) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t}\n\t\t\t// *********************************\n\t\t\t// Folding logic for Comment blocks\n\t\t\t// *********************************\n\t\t\tif (foldComment && IsStreamCommentStyle(style)) {\n\t\t\t\t// Start of a comment block\n\t\t\t\tif (!(stylePrev==style) && IsStreamCommentStyle(styleNext) && styleNext==style) {\n\t\t\t\t levelNext++;\n\t\t\t\t}\n\t\t\t\t// fold till the last line for normal comment lines\n\t\t\t\telse if (IsStreamCommentStyle(stylePrev)\n\t\t\t\t\t\t&& !(styleNext == SCE_AU3_COMMENT)\n\t\t\t\t\t\t&& stylePrev == SCE_AU3_COMMENT\n\t\t\t\t\t\t&& style == SCE_AU3_COMMENT) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t\t// fold till the one but last line for Blockcomment lines\n\t\t\t\telse if (IsStreamCommentStyle(stylePrev)\n\t\t\t\t\t\t&& !(styleNext == SCE_AU3_COMMENTBLOCK)\n\t\t\t\t\t\t&& style == SCE_AU3_COMMENTBLOCK) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t\tint levelUse = levelCurrent;\n\t\t\tint lev = levelUse | levelNext << 16;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif (levelUse < levelNext) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\t// reset values for the next line\n\t\t\tlineCurrent++;\n\t\t\tstylePrev = style;\n\t\t\tstyle = styleNext;\n\t\t\tlevelCurrent = levelNext;\n\t\t\tvisibleChars = 0;\n\t\t\t// if the last character is an Underscore then don't reset since the line continues on the next line.\n\t\t\tif (!(chPrev == '_')) {\n\t\t\t\tszKeywordlen = 0;\n\t\t\t\tszThenlen = 0;\n\t\t\t\tFirstWordStart = false;\n\t\t\t\tFirstWordEnd = false;\n\t\t\t\tThenFoundLast = false;\n\t\t\t}\n\t\t}\n\t\t// save the last processed character\n\t\tif (!isspacechar(ch)) {\n\t\t\tchPrev = ch;\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n}\n\n\n//\n\nstatic const char * const AU3WordLists[] = {\n \"#autoit keywords\",\n \"#autoit functions\",\n \"#autoit macros\",\n \"#autoit Sent keys\",\n \"#autoit Pre-processors\",\n \"#autoit Special\",\n \"#autoit Expand\",\n \"#autoit UDF\",\n 0\n};\nextern const LexerModule lmAU3(SCLEX_AU3, ColouriseAU3Doc, \"au3\", FoldAU3Doc , AU3WordLists);\n" }, { "path": "lexers/LexAVE.cxx", "content": "// SciTE - Scintilla based Text Editor\n/** @file LexAVE.cxx\n ** Lexer for Avenue.\n **\n ** Written by Alexey Yutkin .\n **/\n// Copyright 1998-2002 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '.' || ch == '_');\n}\nstatic inline bool IsEnumChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch)|| ch == '_');\n}\nstatic inline bool IsANumberChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '.' );\n}\n\ninline bool IsAWordStart(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_');\n}\n\ninline bool isAveOperator(char ch) {\n\tif (IsASCII(ch) && isalnum(ch))\n\t\treturn false;\n\t// '.' left out as it is used to make up numbers\n\tif (ch == '*' || ch == '/' || ch == '-' || ch == '+' ||\n\t\tch == '(' || ch == ')' || ch == '=' ||\n\t\tch == '{' || ch == '}' ||\n\t\tch == '[' || ch == ']' || ch == ';' ||\n\t\tch == '<' || ch == '>' || ch == ',' ||\n\t\tch == '.' )\n\t\treturn true;\n\treturn false;\n}\n\nstatic void ColouriseAveDoc(\n\tSci_PositionU startPos,\n\tSci_Position length,\n\tint initStyle,\n\tWordList *keywordlists[],\n\tAccessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n\tWordList &keywords4 = *keywordlists[3];\n\tWordList &keywords5 = *keywordlists[4];\n\tWordList &keywords6 = *keywordlists[5];\n\n\t// Do not leak onto next line\n\tif (initStyle == SCE_AVE_STRINGEOL) {\n\t\tinitStyle = SCE_AVE_DEFAULT;\n\t}\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\tif (sc.atLineEnd) {\n\t\t\t// Update the line state, so it can be seen by next line\n\t\t\tSci_Position currentLine = styler.GetLine(sc.currentPos);\n\t\t\tstyler.SetLineState(currentLine, 0);\n\t\t}\n\t\tif (sc.atLineStart && (sc.state == SCE_AVE_STRING)) {\n\t\t\t// Prevent SCE_AVE_STRINGEOL from leaking back to previous line\n\t\t\tsc.SetState(SCE_AVE_STRING);\n\t\t}\n\n\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_AVE_OPERATOR) {\n\t\t\tsc.SetState(SCE_AVE_DEFAULT);\n\t\t} else if (sc.state == SCE_AVE_NUMBER) {\n\t\t\tif (!IsANumberChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_AVE_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVE_ENUM) {\n\t\t\tif (!IsEnumChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_AVE_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVE_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch) || (sc.ch == '.')) {\n\t\t\t\tchar s[100];\n\t\t\t\t//sc.GetCurrent(s, sizeof(s));\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVE_WORD);\n\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVE_WORD2);\n\t\t\t\t} else if (keywords3.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVE_WORD3);\n\t\t\t\t} else if (keywords4.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVE_WORD4);\n\t\t\t\t} else if (keywords5.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVE_WORD5);\n\t\t\t\t} else if (keywords6.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVE_WORD6);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_AVE_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVE_COMMENT) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_AVE_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVE_STRING) {\n\t\t\t if (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_AVE_DEFAULT);\n\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_AVE_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_AVE_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_AVE_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_AVE_NUMBER);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_AVE_IDENTIFIER);\n\t\t\t} else if (sc.Match('\\\"')) {\n\t\t\t\tsc.SetState(SCE_AVE_STRING);\n\t\t\t} else if (sc.Match('\\'')) {\n\t\t\t\tsc.SetState(SCE_AVE_COMMENT);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (isAveOperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_AVE_OPERATOR);\n\t\t\t} else if (sc.Match('#')) {\n\t\t\t\tsc.SetState(SCE_AVE_ENUM);\n\t\t\t\tsc.Forward();\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldAveDoc(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, WordList *[],\n Accessor &styler) {\n\tSci_PositionU lengthDoc = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = static_cast(tolower(styler[startPos]));\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\tint styleNext = styler.StyleAt(startPos);\n\tchar s[10] = \"\";\n\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = static_cast(tolower(chNext));\n\t\tchNext = static_cast(tolower(styler.SafeGetCharAt(i + 1)));\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (style == SCE_AVE_WORD) {\n\t\t\tif (ch == 't' || ch == 'f' || ch == 'w' || ch == 'e') {\n\t\t\t\tfor (unsigned int j = 0; j < 6; j++) {\n\t\t\t\t\tif (!iswordchar(styler[i + j])) {\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t\ts[j] = static_cast(tolower(styler[i + j]));\n\t\t\t\t\ts[j + 1] = '\\0';\n\t\t\t\t}\n\n\t\t\t\tif ((strcmp(s, \"then\") == 0) || (strcmp(s, \"for\") == 0) || (strcmp(s, \"while\") == 0)) {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t}\n\t\t\t\tif ((strcmp(s, \"end\") == 0) || (strcmp(s, \"elseif\") == 0)) {\n\t\t\t\t\t// Normally \"elseif\" and \"then\" will be on the same line and will cancel\n\t\t\t\t\t// each other out. // As implemented, this does not support fold.at.else.\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (style == SCE_AVE_OPERATOR) {\n\t\t\tif (ch == '{' || ch == '(') {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (ch == '}' || ch == ')') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && foldCompact) {\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t}\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0)) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nextern const LexerModule lmAVE(SCLEX_AVE, ColouriseAveDoc, \"ave\", FoldAveDoc);\n\n" }, { "path": "lexers/LexAVS.cxx", "content": "// Scintilla source code edit control\n/** @file LexAVS.cxx\n ** Lexer for AviSynth.\n **/\n// Copyright 2012 by Bruno Barbieri \n// Heavily based on LexPOV by Neil Hodgson\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_');\n}\n\nstatic inline bool IsAWordStart(int ch) {\n\treturn isalpha(ch) || (ch != ' ' && ch != '\\n' && ch != '(' && ch != '.' && ch != ',');\n}\n\nstatic inline bool IsANumberChar(int ch) {\n\t// Not exactly following number definition (several dots are seen as OK, etc.)\n\t// but probably enough in most cases.\n\treturn (ch < 0x80) &&\n\t\t\t(isdigit(ch) || ch == '.' || ch == '-' || ch == '+');\n}\n\nstatic void ColouriseAvsDoc(\n\tSci_PositionU startPos,\n\tSci_Position length,\n\tint initStyle,\n\tWordList *keywordlists[],\n\tAccessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &filters = *keywordlists[1];\n\tWordList &plugins = *keywordlists[2];\n\tWordList &functions = *keywordlists[3];\n\tWordList &clipProperties = *keywordlists[4];\n\tWordList &userDefined = *keywordlists[5];\n\n\tSci_Position currentLine = styler.GetLine(startPos);\n\t// Initialize the block comment nesting level, if we are inside such a comment.\n\tint blockCommentLevel = 0;\n\tif (initStyle == SCE_AVS_COMMENTBLOCK || initStyle == SCE_AVS_COMMENTBLOCKN) {\n\t\tblockCommentLevel = styler.GetLineState(currentLine - 1);\n\t}\n\n\t// Do not leak onto next line\n\tif (initStyle == SCE_AVS_COMMENTLINE) {\n\t\tinitStyle = SCE_AVS_DEFAULT;\n\t}\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\tif (sc.atLineEnd) {\n\t\t\t// Update the line state, so it can be seen by next line\n\t\t\tcurrentLine = styler.GetLine(sc.currentPos);\n\t\t\tif (sc.state == SCE_AVS_COMMENTBLOCK || sc.state == SCE_AVS_COMMENTBLOCKN) {\n\t\t\t\t// Inside a block comment, we set the line state\n\t\t\t\tstyler.SetLineState(currentLine, blockCommentLevel);\n\t\t\t} else {\n\t\t\t\t// Reset the line state\n\t\t\t\tstyler.SetLineState(currentLine, 0);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_AVS_OPERATOR) {\n\t\t\tsc.SetState(SCE_AVS_DEFAULT);\n\t\t} else if (sc.state == SCE_AVS_NUMBER) {\n\t\t\t// We stop the number definition on non-numerical non-dot non-sign char\n\t\t\tif (!IsANumberChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_AVS_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVS_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\n\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVS_KEYWORD);\n\t\t\t\t} else if (filters.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVS_FILTER);\n\t\t\t\t} else if (plugins.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVS_PLUGIN);\n\t\t\t\t} else if (functions.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVS_FUNCTION);\n\t\t\t\t} else if (clipProperties.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVS_CLIPPROP);\n\t\t\t\t} else if (userDefined.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_AVS_USERDFN);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_AVS_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVS_COMMENTBLOCK) {\n\t\t\tif (sc.Match('/', '*')) {\n\t\t\t\tblockCommentLevel++;\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match('*', '/') && blockCommentLevel > 0) {\n\t\t\t\tblockCommentLevel--;\n\t\t\t\tsc.Forward();\n\t\t\t\tif (blockCommentLevel == 0) {\n\t\t\t\t\tsc.ForwardSetState(SCE_AVS_DEFAULT);\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVS_COMMENTBLOCKN) {\n\t\t\tif (sc.Match('[', '*')) {\n\t\t\t\tblockCommentLevel++;\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match('*', ']') && blockCommentLevel > 0) {\n\t\t\t\tblockCommentLevel--;\n\t\t\t\tsc.Forward();\n\t\t\t\tif (blockCommentLevel == 0) {\n\t\t\t\t\tsc.ForwardSetState(SCE_AVS_DEFAULT);\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVS_COMMENTLINE) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.ForwardSetState(SCE_AVS_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVS_STRING) {\n\t\t\tif (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_AVS_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_AVS_TRIPLESTRING) {\n\t\t\tif (sc.Match(\"\\\"\\\"\\\"\")) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_AVS_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_AVS_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_AVS_NUMBER);\n\t\t\t} else \tif (IsADigit(sc.ch) || (sc.ch == ',' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.SetState(SCE_AVS_NUMBER);\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tblockCommentLevel = 1;\n\t\t\t\tsc.SetState(SCE_AVS_COMMENTBLOCK);\n\t\t\t\tsc.Forward();\t// Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.Match('[', '*')) {\n\t\t\t\tblockCommentLevel = 1;\n\t\t\t\tsc.SetState(SCE_AVS_COMMENTBLOCKN);\n\t\t\t\tsc.Forward();\t// Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.ch == '#') {\n\t\t\t\tsc.SetState(SCE_AVS_COMMENTLINE);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tif (sc.Match(\"\\\"\\\"\\\"\")) {\n\t\t\t\t\tsc.SetState(SCE_AVS_TRIPLESTRING);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_AVS_STRING);\n\t\t\t\t}\n\t\t\t} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_AVS_OPERATOR);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_AVS_IDENTIFIER);\n\t\t\t}\n\t\t}\n\t}\n\n\t// End of file: complete any pending changeState\n\tif (sc.state == SCE_AVS_IDENTIFIER) {\n\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\tchar s[100];\n\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\n\t\t\tif (keywords.InList(s)) {\n\t\t\t\tsc.ChangeState(SCE_AVS_KEYWORD);\n\t\t\t} else if (filters.InList(s)) {\n\t\t\t\tsc.ChangeState(SCE_AVS_FILTER);\n\t\t\t} else if (plugins.InList(s)) {\n\t\t\t\tsc.ChangeState(SCE_AVS_PLUGIN);\n\t\t\t} else if (functions.InList(s)) {\n\t\t\t\tsc.ChangeState(SCE_AVS_FUNCTION);\n\t\t\t} else if (clipProperties.InList(s)) {\n\t\t\t\tsc.ChangeState(SCE_AVS_CLIPPROP);\n\t\t\t} else if (userDefined.InList(s)) {\n\t\t\t\tsc.ChangeState(SCE_AVS_USERDFN);\n\t\t\t}\n\t\t\tsc.SetState(SCE_AVS_DEFAULT);\n\t\t}\n\t}\n\n\tsc.Complete();\n}\n\nstatic void FoldAvsDoc(\n\tSci_PositionU startPos,\n\tSci_Position length,\n\tint initStyle,\n\tWordList *[],\n\tAccessor &styler) {\n\n\tbool foldComment = styler.GetPropertyInt(\"fold.comment\") != 0;\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (foldComment && style == SCE_AVS_COMMENTBLOCK) {\n\t\t\tif (stylePrev != SCE_AVS_COMMENTBLOCK) {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if ((styleNext != SCE_AVS_COMMENTBLOCK) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\n\t\tif (foldComment && style == SCE_AVS_COMMENTBLOCKN) {\n\t\t\tif (stylePrev != SCE_AVS_COMMENTBLOCKN) {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if ((styleNext != SCE_AVS_COMMENTBLOCKN) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\n\t\tif (style == SCE_AVS_OPERATOR) {\n\t\t\tif (ch == '{') {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nstatic const char * const avsWordLists[] = {\n\t\"Keywords\",\n\t\"Filters\",\n\t\"Plugins\",\n\t\"Functions\",\n\t\"Clip properties\",\n\t\"User defined functions\",\n\t0,\n};\n\nextern const LexerModule lmAVS(SCLEX_AVS, ColouriseAvsDoc, \"avs\", FoldAvsDoc, avsWordLists);\n" }, { "path": "lexers/LexAbaqus.cxx", "content": "// Scintilla source code edit control\n/** @file LexAbaqus.cxx\n ** Lexer for ABAQUS. Based on the lexer for APDL by Hadar Raz.\n ** By Sergio Lucato.\n ** Sort of completely rewritten by Gertjan Kloosterman\n **/\n// The License.txt file describes the conditions under which this software may be distributed.\n\n// Code folding copyied and modified from LexBasic.cxx\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsAKeywordChar(const int ch) {\n\treturn (ch < 0x80 && (isalnum(ch) || (ch == '_') || (ch == ' ')));\n}\n\nstatic inline bool IsASetChar(const int ch) {\n\treturn (ch < 0x80 && (isalnum(ch) || (ch == '_') || (ch == '.') || (ch == '-')));\n}\n\nstatic void ColouriseABAQUSDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList*[] /* *keywordlists[] */,\n Accessor &styler) {\n\tenum localState { KW_LINE_KW, KW_LINE_COMMA, KW_LINE_PAR, KW_LINE_EQ, KW_LINE_VAL, \\\n\t\t\t\t\t DAT_LINE_VAL, DAT_LINE_COMMA,\\\n\t\t\t\t\t COMMENT_LINE,\\\n\t\t\t\t\t ST_ERROR, LINE_END } state ;\n\n\t// Do not leak onto next line\n\tstate = LINE_END ;\n\tinitStyle = SCE_ABAQUS_DEFAULT;\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\t// Things are actually quite simple\n\t// we have commentlines\n\t// keywordlines and datalines\n\t// On a data line there will only be colouring of numbers\n\t// a keyword line is constructed as\n\t// *word,[ paramname[=paramvalue]]*\n\t// if the line ends with a , the keyword line continues onto the new line\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\tswitch ( state ) {\n case KW_LINE_KW :\n if ( sc.atLineEnd ) {\n // finished the line in keyword state, switch to LINE_END\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n } else if ( IsAKeywordChar(sc.ch) ) {\n // nothing changes\n state = KW_LINE_KW ;\n } else if ( sc.ch == ',' ) {\n // Well well we say a comma, arguments *MUST* follow\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = KW_LINE_COMMA ;\n } else {\n // Flag an error\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n // Done with processing\n break ;\n case KW_LINE_COMMA :\n // acomma on a keywordline was seen\n if ( IsAKeywordChar(sc.ch)) {\n sc.SetState(SCE_ABAQUS_ARGUMENT) ;\n state = KW_LINE_PAR ;\n } else if ( sc.atLineEnd || (sc.ch == ',') ) {\n // we remain in keyword mode\n state = KW_LINE_COMMA ;\n } else if ( sc.ch == ' ' ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = KW_LINE_COMMA ;\n } else {\n // Anything else constitutes an error\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n break ;\n case KW_LINE_PAR :\n if ( sc.atLineEnd ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n } else if ( IsAKeywordChar(sc.ch) || (sc.ch == '-') ) {\n // remain in this state\n state = KW_LINE_PAR ;\n } else if ( sc.ch == ',' ) {\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = KW_LINE_COMMA ;\n } else if ( sc.ch == '=' ) {\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = KW_LINE_EQ ;\n } else {\n // Anything else constitutes an error\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n break ;\n case KW_LINE_EQ :\n if ( sc.ch == ' ' ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n // remain in this state\n state = KW_LINE_EQ ;\n } else if ( IsADigit(sc.ch) || (sc.ch == '-') || (sc.ch == '.' && IsADigit(sc.chNext)) ) {\n sc.SetState(SCE_ABAQUS_NUMBER) ;\n state = KW_LINE_VAL ;\n } else if ( IsAKeywordChar(sc.ch) ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = KW_LINE_VAL ;\n } else if ( (sc.ch == '\\'') || (sc.ch == '\\\"') ) {\n sc.SetState(SCE_ABAQUS_STRING) ;\n state = KW_LINE_VAL ;\n } else {\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n break ;\n case KW_LINE_VAL :\n if ( sc.atLineEnd ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n } else if ( IsASetChar(sc.ch) && (sc.state == SCE_ABAQUS_DEFAULT) ) {\n // nothing changes\n state = KW_LINE_VAL ;\n } else if (( (IsADigit(sc.ch) || sc.ch == '.' || (sc.ch == 'e' || sc.ch == 'E') ||\n ((sc.ch == '+' || sc.ch == '-') && (sc.chPrev == 'e' || sc.chPrev == 'E')))) &&\n (sc.state == SCE_ABAQUS_NUMBER)) {\n // remain in number mode\n state = KW_LINE_VAL ;\n } else if (sc.state == SCE_ABAQUS_STRING) {\n // accept everything until a closing quote\n if ( sc.ch == '\\'' || sc.ch == '\\\"' ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = KW_LINE_VAL ;\n }\n } else if ( sc.ch == ',' ) {\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = KW_LINE_COMMA ;\n } else {\n // anything else is an error\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n break ;\n case DAT_LINE_VAL :\n if ( sc.atLineEnd ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n } else if ( IsASetChar(sc.ch) && (sc.state == SCE_ABAQUS_DEFAULT) ) {\n // nothing changes\n state = DAT_LINE_VAL ;\n } else if (( (IsADigit(sc.ch) || sc.ch == '.' || (sc.ch == 'e' || sc.ch == 'E') ||\n ((sc.ch == '+' || sc.ch == '-') && (sc.chPrev == 'e' || sc.chPrev == 'E')))) &&\n (sc.state == SCE_ABAQUS_NUMBER)) {\n // remain in number mode\n state = DAT_LINE_VAL ;\n } else if (sc.state == SCE_ABAQUS_STRING) {\n // accept everything until a closing quote\n if ( sc.ch == '\\'' || sc.ch == '\\\"' ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = DAT_LINE_VAL ;\n }\n } else if ( sc.ch == ',' ) {\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = DAT_LINE_COMMA ;\n } else {\n // anything else is an error\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n break ;\n case DAT_LINE_COMMA :\n // a comma on a data line was seen\n if ( sc.atLineEnd ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n } else if ( sc.ch == ' ' ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = DAT_LINE_COMMA ;\n } else if (sc.ch == ',') {\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = DAT_LINE_COMMA ;\n } else if ( IsADigit(sc.ch) || (sc.ch == '-')|| (sc.ch == '.' && IsADigit(sc.chNext)) ) {\n sc.SetState(SCE_ABAQUS_NUMBER) ;\n state = DAT_LINE_VAL ;\n } else if ( IsAKeywordChar(sc.ch) ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = DAT_LINE_VAL ;\n } else if ( (sc.ch == '\\'') || (sc.ch == '\\\"') ) {\n sc.SetState(SCE_ABAQUS_STRING) ;\n state = DAT_LINE_VAL ;\n } else {\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n break ;\n case COMMENT_LINE :\n if ( sc.atLineEnd ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n }\n break ;\n case ST_ERROR :\n if ( sc.atLineEnd ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = LINE_END ;\n }\n break ;\n case LINE_END :\n if ( sc.atLineEnd || sc.ch == ' ' ) {\n // nothing changes\n state = LINE_END ;\n } else if ( sc.ch == '*' ) {\n if ( sc.chNext == '*' ) {\n state = COMMENT_LINE ;\n sc.SetState(SCE_ABAQUS_COMMENT) ;\n } else {\n state = KW_LINE_KW ;\n sc.SetState(SCE_ABAQUS_STARCOMMAND) ;\n }\n } else {\n // it must be a data line, things are as if we are in DAT_LINE_COMMA\n if ( sc.ch == ',' ) {\n sc.SetState(SCE_ABAQUS_OPERATOR) ;\n state = DAT_LINE_COMMA ;\n } else if ( IsADigit(sc.ch) || (sc.ch == '-')|| (sc.ch == '.' && IsADigit(sc.chNext)) ) {\n sc.SetState(SCE_ABAQUS_NUMBER) ;\n state = DAT_LINE_VAL ;\n } else if ( IsAKeywordChar(sc.ch) ) {\n sc.SetState(SCE_ABAQUS_DEFAULT) ;\n state = DAT_LINE_VAL ;\n } else if ( (sc.ch == '\\'') || (sc.ch == '\\\"') ) {\n sc.SetState(SCE_ABAQUS_STRING) ;\n state = DAT_LINE_VAL ;\n } else {\n sc.SetState(SCE_ABAQUS_PROCESSOR) ;\n state = ST_ERROR ;\n }\n }\n break ;\n\t\t }\n }\n sc.Complete();\n}\n\n//------------------------------------------------------------------------------\n// This copyied and modified from LexBasic.cxx\n//------------------------------------------------------------------------------\n\n/* Bits:\n * 1 - whitespace\n * 2 - operator\n * 4 - identifier\n * 8 - decimal digit\n * 16 - hex digit\n * 32 - bin digit\n */\nstatic int character_classification[128] =\n{\n 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0,\n 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,\n 1, 2, 0, 2, 2, 2, 2, 2, 2, 2, 6, 2, 2, 2, 10, 6,\n 60, 60, 28, 28, 28, 28, 28, 28, 28, 28, 2, 2, 2, 2, 2, 2,\n 2, 20, 20, 20, 20, 20, 20, 4, 4, 4, 4, 4, 4, 4, 4, 4,\n 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 2, 2, 2, 4,\n 2, 20, 20, 20, 20, 20, 20, 4, 4, 4, 4, 4, 4, 4, 4, 4,\n 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 2, 2, 2, 0\n};\n\nstatic bool IsSpace(int c) {\n\treturn c < 128 && (character_classification[c] & 1);\n}\n\nstatic bool IsIdentifier(int c) {\n\treturn c < 128 && (character_classification[c] & 4);\n}\n\nstatic int LowerCase(int c)\n{\n\tif (c >= 'A' && c <= 'Z')\n\t\treturn 'a' + c - 'A';\n\treturn c;\n}\n\nstatic Sci_Position LineEnd(Sci_Position line, Accessor &styler)\n{\n const Sci_Position docLines = styler.GetLine(styler.Length() - 1); // Available last line\n Sci_Position eol_pos ;\n // if the line is the last line, the eol_pos is styler.Length()\n // eol will contain a new line, or a virtual new line\n if ( docLines == line )\n eol_pos = styler.Length() ;\n else\n eol_pos = styler.LineStart(line + 1) - 1;\n return eol_pos ;\n}\n\nstatic Sci_Position LineStart(Sci_Position line, Accessor &styler)\n{\n return styler.LineStart(line) ;\n}\n\n// LineType\n//\n// bits determines the line type\n// 1 : data line\n// 2 : only whitespace\n// 3 : data line with only whitespace\n// 4 : keyword line\n// 5 : block open keyword line\n// 6 : block close keyword line\n// 7 : keyword line in error\n// 8 : comment line\nstatic int LineType(Sci_Position line, Accessor &styler) {\n Sci_Position pos = LineStart(line, styler) ;\n Sci_Position eol_pos = LineEnd(line, styler) ;\n\n int c ;\n char ch = ' ';\n\n Sci_Position i = pos ;\n while ( i < eol_pos ) {\n c = styler.SafeGetCharAt(i);\n ch = static_cast(LowerCase(c));\n // We can say something as soon as no whitespace\n // was encountered\n if ( !IsSpace(c) )\n break ;\n i++ ;\n }\n\n if ( i >= eol_pos ) {\n // This is a whitespace line, currently\n // classifies as data line\n return 3 ;\n }\n\n if ( ch != '*' ) {\n // This is a data line\n return 1 ;\n }\n\n if ( i == eol_pos - 1 ) {\n // Only a single *, error but make keyword line\n return 4+3 ;\n }\n\n // This means we can have a second character\n // if that is also a * this means a comment\n // otherwise it is a keyword.\n c = styler.SafeGetCharAt(i+1);\n ch = static_cast(LowerCase(c));\n if ( ch == '*' ) {\n return 8 ;\n }\n\n // At this point we know this is a keyword line\n // the character at position i is a *\n // it is not a comment line\n char word[256] ;\n int wlen = 0;\n\n word[wlen] = '*' ;\n\twlen++ ;\n\n i++ ;\n while ( (i < eol_pos) && (wlen < 255) ) {\n c = styler.SafeGetCharAt(i);\n ch = static_cast(LowerCase(c));\n\n if ( (!IsSpace(c)) && (!IsIdentifier(c)) )\n break ;\n\n if ( IsIdentifier(c) ) {\n word[wlen] = ch ;\n\t\t\twlen++ ;\n\t\t}\n\n i++ ;\n }\n\n word[wlen] = 0 ;\n\n // Make a comparison\n\tif ( !strcmp(word, \"*step\") ||\n !strcmp(word, \"*part\") ||\n !strcmp(word, \"*instance\") ||\n !strcmp(word, \"*assembly\")) {\n return 4+1 ;\n }\n\n\tif ( !strcmp(word, \"*endstep\") ||\n !strcmp(word, \"*endpart\") ||\n !strcmp(word, \"*endinstance\") ||\n !strcmp(word, \"*endassembly\")) {\n return 4+2 ;\n }\n\n return 4 ;\n}\n\nstatic void SafeSetLevel(Sci_Position line, int level, Accessor &styler)\n{\n if ( line < 0 )\n return ;\n\n int mask = ((~SC_FOLDLEVELHEADERFLAG) | (~SC_FOLDLEVELWHITEFLAG));\n\n if ( (level & mask) < 0 )\n return ;\n\n if ( styler.LevelAt(line) != level )\n styler.SetLevel(line, level) ;\n}\n\nstatic void FoldABAQUSDoc(Sci_PositionU startPos, Sci_Position length, int,\nWordList *[], Accessor &styler) {\n Sci_Position startLine = styler.GetLine(startPos) ;\n Sci_Position endLine = styler.GetLine(startPos+length-1) ;\n\n // bool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n // We want to deal with all the cases\n // To know the correct indentlevel, we need to look back to the\n // previous command line indentation level\n\t// order of formatting keyline datalines commentlines\n Sci_Position beginData = -1 ;\n Sci_Position beginComment = -1 ;\n Sci_Position prvKeyLine = startLine ;\n Sci_Position prvKeyLineTp = 0 ;\n\n // Scan until we find the previous keyword line\n // this will give us the level reference that we need\n while ( prvKeyLine > 0 ) {\n prvKeyLine-- ;\n prvKeyLineTp = LineType(prvKeyLine, styler) ;\n if ( prvKeyLineTp & 4 )\n break ;\n }\n\n // Determine the base line level of all lines following\n // the previous keyword\n // new keyword lines are placed on this level\n //if ( prvKeyLineTp & 4 ) {\n int level = styler.LevelAt(prvKeyLine) & ~SC_FOLDLEVELHEADERFLAG ;\n //}\n\n // uncomment line below if weird behaviour continues\n prvKeyLine = -1 ;\n\n // Now start scanning over the lines.\n for ( Sci_Position line = startLine; line <= endLine; line++ ) {\n int lineType = LineType(line, styler) ;\n\n // Check for comment line\n if ( lineType == 8 ) {\n if ( beginComment < 0 ) {\n beginComment = line ;\n\t\t\t}\n }\n\n // Check for data line\n if ( (lineType == 1) || (lineType == 3) ) {\n if ( beginData < 0 ) {\n if ( beginComment >= 0 ) {\n beginData = beginComment ;\n } else {\n beginData = line ;\n }\n }\n\t\t\tbeginComment = -1 ;\n\t\t}\n\n // Check for keywordline.\n // As soon as a keyword line is encountered, we can set the\n // levels of everything from the previous keyword line to this one\n if ( lineType & 4 ) {\n // this is a keyword, we can now place the previous keyword\n // all its data lines and the remainder\n\n // Write comments and data line\n if ( beginComment < 0 ) {\n beginComment = line ;\n\t\t\t}\n\n if ( beginData < 0 ) {\n beginData = beginComment ;\n\t\t\t\tif ( prvKeyLineTp != 5 )\n\t\t\t\t\tSafeSetLevel(prvKeyLine, level, styler) ;\n\t\t\t\telse\n\t\t\t\t\tSafeSetLevel(prvKeyLine, level | SC_FOLDLEVELHEADERFLAG, styler) ;\n } else {\n SafeSetLevel(prvKeyLine, level | SC_FOLDLEVELHEADERFLAG, styler) ;\n }\n\n int datLevel = level + 1 ;\n\t\t\tif ( !(prvKeyLineTp & 4) ) {\n\t\t\t\tdatLevel = level ;\n\t\t\t}\n\n for ( Sci_Position ll = beginData; ll < beginComment; ll++ )\n SafeSetLevel(ll, datLevel, styler) ;\n\n // The keyword we just found is going to be written at another level\n // if we have a type 5 and type 6\n if ( prvKeyLineTp == 5 ) {\n level += 1 ;\n\t\t\t}\n\n if ( prvKeyLineTp == 6 ) {\n level -= 1 ;\n\t\t\t\tif ( level < 0 ) {\n\t\t\t\t\tlevel = 0 ;\n\t\t\t\t}\n }\n\n for ( Sci_Position lll = beginComment; lll < line; lll++ )\n SafeSetLevel(lll, level, styler) ;\n\n // wrap and reset\n beginComment = -1 ;\n beginData = -1 ;\n prvKeyLine = line ;\n prvKeyLineTp = lineType ;\n }\n\n }\n\n if ( beginComment < 0 ) {\n beginComment = endLine + 1 ;\n } else {\n // We need to find out whether this comment block is followed by\n // a data line or a keyword line\n const Sci_Position docLines = styler.GetLine(styler.Length() - 1);\n\n for ( Sci_Position line = endLine + 1; line <= docLines; line++ ) {\n Sci_Position lineType = LineType(line, styler) ;\n\n if ( lineType != 8 ) {\n\t\t\t\tif ( !(lineType & 4) ) {\n\t\t\t\t\tbeginComment = endLine + 1 ;\n\t\t\t\t}\n break ;\n\t\t\t}\n }\n }\n\n if ( beginData < 0 ) {\n beginData = beginComment ;\n\t\tif ( prvKeyLineTp != 5 )\n\t\t\tSafeSetLevel(prvKeyLine, level, styler) ;\n\t\telse\n\t\t\tSafeSetLevel(prvKeyLine, level | SC_FOLDLEVELHEADERFLAG, styler) ;\n } else {\n SafeSetLevel(prvKeyLine, level | SC_FOLDLEVELHEADERFLAG, styler) ;\n }\n\n int datLevel = level + 1 ;\n\tif ( !(prvKeyLineTp & 4) ) {\n\t\tdatLevel = level ;\n\t}\n\n for ( Sci_Position ll = beginData; ll < beginComment; ll++ )\n SafeSetLevel(ll, datLevel, styler) ;\n\n if ( prvKeyLineTp == 5 ) {\n level += 1 ;\n }\n\n if ( prvKeyLineTp == 6 ) {\n level -= 1 ;\n }\n for ( Sci_Position m = beginComment; m <= endLine; m++ )\n SafeSetLevel(m, level, styler) ;\n}\n\nstatic const char * const abaqusWordListDesc[] = {\n \"processors\",\n \"commands\",\n \"slashommands\",\n \"starcommands\",\n \"arguments\",\n \"functions\",\n 0\n};\n\nextern const LexerModule lmAbaqus(SCLEX_ABAQUS, ColouriseABAQUSDoc, \"abaqus\", FoldABAQUSDoc, abaqusWordListDesc);\n" }, { "path": "lexers/LexAda.cxx", "content": "// Scintilla source code edit control\n/** @file LexAda.cxx\n ** Lexer for Ada 95\n **/\n// Copyright 2002 by Sergey Koshcheyev \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n/*\n * Interface\n */\n\nstatic void ColouriseDocument(\n Sci_PositionU startPos,\n Sci_Position length,\n int initStyle,\n WordList *keywordlists[],\n Accessor &styler);\n\nstatic const char * const adaWordListDesc[] = {\n\t\"Keywords\",\n\t0\n};\n\nextern const LexerModule lmAda(SCLEX_ADA, ColouriseDocument, \"ada\", NULL, adaWordListDesc);\n\n/*\n * Implementation\n */\n\n// Functions that have apostropheStartsAttribute as a parameter set it according to whether\n// an apostrophe encountered after processing the current token will start an attribute or\n// a character literal.\nstatic void ColouriseCharacter(StyleContext& sc, bool& apostropheStartsAttribute);\nstatic void ColouriseComment(StyleContext& sc, bool& apostropheStartsAttribute);\nstatic void ColouriseContext(StyleContext& sc, char chEnd, int stateEOL);\nstatic void ColouriseDelimiter(StyleContext& sc, bool& apostropheStartsAttribute);\nstatic void ColouriseLabel(StyleContext& sc, WordList& keywords, bool& apostropheStartsAttribute);\nstatic void ColouriseNumber(StyleContext& sc, bool& apostropheStartsAttribute);\nstatic void ColouriseString(StyleContext& sc, bool& apostropheStartsAttribute);\nstatic void ColouriseWhiteSpace(StyleContext& sc, bool& apostropheStartsAttribute);\nstatic void ColouriseWord(StyleContext& sc, WordList& keywords, bool& apostropheStartsAttribute);\n\nstatic inline bool IsDelimiterCharacter(int ch);\nstatic inline bool IsSeparatorOrDelimiterCharacter(int ch);\nstatic bool IsValidIdentifier(const std::string& identifier);\nstatic bool IsValidNumber(const std::string& number);\nstatic inline bool IsWordStartCharacter(int ch);\nstatic inline bool IsWordCharacter(int ch);\n\nstatic void ColouriseCharacter(StyleContext& sc, bool& apostropheStartsAttribute) {\n\tapostropheStartsAttribute = true;\n\n\tsc.SetState(SCE_ADA_CHARACTER);\n\n\t// Skip the apostrophe and one more character (so that '' is shown as non-terminated and '''\n\t// is handled correctly)\n\tsc.Forward();\n\tsc.Forward();\n\n\tColouriseContext(sc, '\\'', SCE_ADA_CHARACTEREOL);\n}\n\nstatic void ColouriseContext(StyleContext& sc, char chEnd, int stateEOL) {\n\twhile (!sc.atLineEnd && !sc.Match(chEnd)) {\n\t\tsc.Forward();\n\t}\n\n\tif (!sc.atLineEnd) {\n\t\tsc.ForwardSetState(SCE_ADA_DEFAULT);\n\t} else {\n\t\tsc.ChangeState(stateEOL);\n\t}\n}\n\nstatic void ColouriseComment(StyleContext& sc, bool& /*apostropheStartsAttribute*/) {\n\t// Apostrophe meaning is not changed, but the parameter is present for uniformity\n\n\tsc.SetState(SCE_ADA_COMMENTLINE);\n\n\twhile (!sc.atLineEnd) {\n\t\tsc.Forward();\n\t}\n}\n\nstatic void ColouriseDelimiter(StyleContext& sc, bool& apostropheStartsAttribute) {\n\tapostropheStartsAttribute = sc.Match (')');\n\tsc.SetState(SCE_ADA_DELIMITER);\n\tsc.ForwardSetState(SCE_ADA_DEFAULT);\n}\n\nstatic void ColouriseLabel(StyleContext& sc, WordList& keywords, bool& apostropheStartsAttribute) {\n\tapostropheStartsAttribute = false;\n\n\tsc.SetState(SCE_ADA_LABEL);\n\n\t// Skip \"<<\"\n\tsc.Forward();\n\tsc.Forward();\n\n\tstd::string identifier;\n\n\twhile (!sc.atLineEnd && !IsSeparatorOrDelimiterCharacter(sc.ch)) {\n\t\tidentifier += static_cast(tolower(sc.ch));\n\t\tsc.Forward();\n\t}\n\n\t// Skip \">>\"\n\tif (sc.Match('>', '>')) {\n\t\tsc.Forward();\n\t\tsc.Forward();\n\t} else {\n\t\tsc.ChangeState(SCE_ADA_ILLEGAL);\n\t}\n\n\t// If the name is an invalid identifier or a keyword, then make it invalid label\n\tif (!IsValidIdentifier(identifier) || keywords.InList(identifier.c_str())) {\n\t\tsc.ChangeState(SCE_ADA_ILLEGAL);\n\t}\n\n\tsc.SetState(SCE_ADA_DEFAULT);\n\n}\n\nstatic void ColouriseNumber(StyleContext& sc, bool& apostropheStartsAttribute) {\n\tapostropheStartsAttribute = true;\n\n\tstd::string number;\n\tsc.SetState(SCE_ADA_NUMBER);\n\n\t// Get all characters up to a delimiter or a separator, including points, but excluding\n\t// double points (ranges).\n\twhile (!IsSeparatorOrDelimiterCharacter(sc.ch) || (sc.ch == '.' && sc.chNext != '.')) {\n\t\tnumber += static_cast(sc.ch);\n\t\tsc.Forward();\n\t}\n\n\t// Special case: exponent with sign\n\tif ((sc.chPrev == 'e' || sc.chPrev == 'E') &&\n\t (sc.ch == '+' || sc.ch == '-')) {\n\t\tnumber += static_cast(sc.ch);\n\t\tsc.Forward ();\n\n\t\twhile (!IsSeparatorOrDelimiterCharacter(sc.ch)) {\n\t\t\tnumber += static_cast(sc.ch);\n\t\t\tsc.Forward();\n\t\t}\n\t}\n\n\tif (!IsValidNumber(number)) {\n\t\tsc.ChangeState(SCE_ADA_ILLEGAL);\n\t}\n\n\tsc.SetState(SCE_ADA_DEFAULT);\n}\n\nstatic void ColouriseString(StyleContext& sc, bool& apostropheStartsAttribute) {\n\tapostropheStartsAttribute = true;\n\n\tsc.SetState(SCE_ADA_STRING);\n\tsc.Forward();\n\n\tColouriseContext(sc, '\"', SCE_ADA_STRINGEOL);\n}\n\nstatic void ColouriseWhiteSpace(StyleContext& sc, bool& /*apostropheStartsAttribute*/) {\n\t// Apostrophe meaning is not changed, but the parameter is present for uniformity\n\tsc.SetState(SCE_ADA_DEFAULT);\n\tsc.ForwardSetState(SCE_ADA_DEFAULT);\n}\n\nstatic void ColouriseWord(StyleContext& sc, WordList& keywords, bool& apostropheStartsAttribute) {\n\tapostropheStartsAttribute = true;\n\tsc.SetState(SCE_ADA_IDENTIFIER);\n\n\tstd::string word;\n\n\twhile (!sc.atLineEnd && !IsSeparatorOrDelimiterCharacter(sc.ch)) {\n\t\tword += static_cast(tolower(sc.ch));\n\t\tsc.Forward();\n\t}\n\n\tif (!IsValidIdentifier(word)) {\n\t\tsc.ChangeState(SCE_ADA_ILLEGAL);\n\n\t} else if (keywords.InList(word.c_str())) {\n\t\tsc.ChangeState(SCE_ADA_WORD);\n\n\t\tif (word != \"all\") {\n\t\t\tapostropheStartsAttribute = false;\n\t\t}\n\t}\n\n\tsc.SetState(SCE_ADA_DEFAULT);\n}\n\n//\n// ColouriseDocument\n//\n\nstatic void ColouriseDocument(\n Sci_PositionU startPos,\n Sci_Position length,\n int initStyle,\n WordList *keywordlists[],\n Accessor &styler) {\n\tWordList &keywords = *keywordlists[0];\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tbool apostropheStartsAttribute = (styler.GetLineState(lineCurrent) & 1) != 0;\n\n\twhile (sc.More()) {\n\t\tif (sc.atLineEnd) {\n\t\t\t// Go to the next line\n\t\t\tsc.Forward();\n\t\t\tlineCurrent++;\n\n\t\t\t// Remember the line state for future incremental lexing\n\t\t\tstyler.SetLineState(lineCurrent, apostropheStartsAttribute);\n\n\t\t\t// Don't continue any styles on the next line\n\t\t\tsc.SetState(SCE_ADA_DEFAULT);\n\t\t}\n\n\t\t// Comments\n\t\tif (sc.Match('-', '-')) {\n\t\t\tColouriseComment(sc, apostropheStartsAttribute);\n\n\t\t// Strings\n\t\t} else if (sc.Match('\"')) {\n\t\t\tColouriseString(sc, apostropheStartsAttribute);\n\n\t\t// Characters\n\t\t} else if (sc.Match('\\'') && !apostropheStartsAttribute) {\n\t\t\tColouriseCharacter(sc, apostropheStartsAttribute);\n\n\t\t// Labels\n\t\t} else if (sc.Match('<', '<')) {\n\t\t\tColouriseLabel(sc, keywords, apostropheStartsAttribute);\n\n\t\t// Whitespace\n\t\t} else if (IsASpace(sc.ch)) {\n\t\t\tColouriseWhiteSpace(sc, apostropheStartsAttribute);\n\n\t\t// Delimiters\n\t\t} else if (IsDelimiterCharacter(sc.ch)) {\n\t\t\tColouriseDelimiter(sc, apostropheStartsAttribute);\n\n\t\t// Numbers\n\t\t} else if (IsADigit(sc.ch) || sc.ch == '#') {\n\t\t\tColouriseNumber(sc, apostropheStartsAttribute);\n\n\t\t// Keywords or identifiers\n\t\t} else {\n\t\t\tColouriseWord(sc, keywords, apostropheStartsAttribute);\n\t\t}\n\t}\n\n\tsc.Complete();\n}\n\nstatic inline bool IsDelimiterCharacter(int ch) {\n\tswitch (ch) {\n\tcase '&':\n\tcase '\\'':\n\tcase '(':\n\tcase ')':\n\tcase '*':\n\tcase '+':\n\tcase ',':\n\tcase '-':\n\tcase '.':\n\tcase '/':\n\tcase ':':\n\tcase ';':\n\tcase '<':\n\tcase '=':\n\tcase '>':\n\tcase '|':\n\t\treturn true;\n\tdefault:\n\t\treturn false;\n\t}\n}\n\nstatic inline bool IsSeparatorOrDelimiterCharacter(int ch) {\n\treturn IsASpace(ch) || IsDelimiterCharacter(ch);\n}\n\nstatic bool IsValidIdentifier(const std::string& identifier) {\n\t// First character can't be '_', so initialize the flag to true\n\tbool lastWasUnderscore = true;\n\n\tsize_t length = identifier.length();\n\n\t// Zero-length identifiers are not valid (these can occur inside labels)\n\tif (length == 0) {\n\t\treturn false;\n\t}\n\n\t// Check for valid character at the start\n\tif (!IsWordStartCharacter(identifier[0])) {\n\t\treturn false;\n\t}\n\n\t// Check for only valid characters and no double underscores\n\tfor (size_t i = 0; i < length; i++) {\n\t\tif (!IsWordCharacter(identifier[i]) ||\n\t\t (identifier[i] == '_' && lastWasUnderscore)) {\n\t\t\treturn false;\n\t\t}\n\t\tlastWasUnderscore = identifier[i] == '_';\n\t}\n\n\t// Check for underscore at the end\n\tif (lastWasUnderscore == true) {\n\t\treturn false;\n\t}\n\n\t// All checks passed\n\treturn true;\n}\n\nstatic bool IsValidNumber(const std::string& number) {\n\tsize_t hashPos = number.find(\"#\");\n\tbool seenDot = false;\n\n\tsize_t i = 0;\n\tsize_t length = number.length();\n\n\tif (length == 0)\n\t\treturn false; // Just in case\n\n\t// Decimal number\n\tif (hashPos == std::string::npos) {\n\t\tbool canBeSpecial = false;\n\n\t\tfor (; i < length; i++) {\n\t\t\tif (number[i] == '_') {\n\t\t\t\tif (!canBeSpecial) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = false;\n\t\t\t} else if (number[i] == '.') {\n\t\t\t\tif (!canBeSpecial || seenDot) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = false;\n\t\t\t\tseenDot = true;\n\t\t\t} else if (IsADigit(number[i])) {\n\t\t\t\tcanBeSpecial = true;\n\t\t\t} else {\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\n\t\tif (!canBeSpecial)\n\t\t\treturn false;\n\t} else {\n\t\t// Based number\n\t\tbool canBeSpecial = false;\n\t\tint base = 0;\n\n\t\t// Parse base\n\t\tfor (; i < length; i++) {\n\t\t\tint ch = number[i];\n\t\t\tif (ch == '_') {\n\t\t\t\tif (!canBeSpecial)\n\t\t\t\t\treturn false;\n\t\t\t\tcanBeSpecial = false;\n\t\t\t} else if (IsADigit(ch)) {\n\t\t\t\tbase = base * 10 + (ch - '0');\n\t\t\t\tif (base > 16)\n\t\t\t\t\treturn false;\n\t\t\t\tcanBeSpecial = true;\n\t\t\t} else if (ch == '#' && canBeSpecial) {\n\t\t\t\tbreak;\n\t\t\t} else {\n\t\t\t\treturn false;\n\t\t\t}\n\t\t}\n\n\t\tif (base < 2)\n\t\t\treturn false;\n\t\tif (i == length)\n\t\t\treturn false;\n\n\t\ti++; // Skip over '#'\n\n\t\t// Parse number\n\t\tcanBeSpecial = false;\n\n\t\tfor (; i < length; i++) {\n\t\t\tint ch = tolower(number[i]);\n\n\t\t\tif (ch == '_') {\n\t\t\t\tif (!canBeSpecial) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = false;\n\n\t\t\t} else if (ch == '.') {\n\t\t\t\tif (!canBeSpecial || seenDot) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = false;\n\t\t\t\tseenDot = true;\n\n\t\t\t} else if (IsADigit(ch)) {\n\t\t\t\tif (ch - '0' >= base) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = true;\n\n\t\t\t} else if (ch >= 'a' && ch <= 'f') {\n\t\t\t\tif (ch - 'a' + 10 >= base) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = true;\n\n\t\t\t} else if (ch == '#' && canBeSpecial) {\n\t\t\t\tbreak;\n\n\t\t\t} else {\n\t\t\t\treturn false;\n\t\t\t}\n\t\t}\n\n\t\tif (i == length) {\n\t\t\treturn false;\n\t\t}\n\n\t\ti++;\n\t}\n\n\t// Exponent (optional)\n\tif (i < length) {\n\t\tif (number[i] != 'e' && number[i] != 'E')\n\t\t\treturn false;\n\n\t\ti++; // Move past 'E'\n\n\t\tif (i == length) {\n\t\t\treturn false;\n\t\t}\n\n\t\tif (number[i] == '+')\n\t\t\ti++;\n\t\telse if (number[i] == '-') {\n\t\t\tif (seenDot) {\n\t\t\t\ti++;\n\t\t\t} else {\n\t\t\t\treturn false; // Integer literals should not have negative exponents\n\t\t\t}\n\t\t}\n\n\t\tif (i == length) {\n\t\t\treturn false;\n\t\t}\n\n\t\tbool canBeSpecial = false;\n\n\t\tfor (; i < length; i++) {\n\t\t\tif (number[i] == '_') {\n\t\t\t\tif (!canBeSpecial) {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t\tcanBeSpecial = false;\n\t\t\t} else if (IsADigit(number[i])) {\n\t\t\t\tcanBeSpecial = true;\n\t\t\t} else {\n\t\t\t\treturn false;\n\t\t\t}\n\t\t}\n\n\t\tif (!canBeSpecial)\n\t\t\treturn false;\n\t}\n\n\t// if i == length, number was parsed successfully.\n\treturn i == length;\n}\n\nstatic inline bool IsWordCharacter(int ch) {\n\treturn IsWordStartCharacter(ch) || IsADigit(ch);\n}\n\nstatic inline bool IsWordStartCharacter(int ch) {\n\treturn (IsASCII(ch) && isalpha(ch)) || ch == '_';\n}\n" }, { "path": "lexers/LexAsciidoc.cxx", "content": "/******************************************************************\n * LexAsciidoc.cxx\n *\n * A simple Asciidoc lexer for scintilla.\n *\n * Based on the LexMarkdown.cxx by Jon Strait - jstrait@moonloop.net\n *\n * The License.txt file describes the conditions under which this\n * software may be distributed.\n *\n *****************************************************************/\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nnamespace {\n\ntypedef struct {\n bool start;\n int len1;\n int len2;\n const char *name;\n} MacroItem;\n\nstatic const MacroItem MacroList[] = {\n // Directives\n {true, 5, 2, \"ifdef::\"},\n {true, 6, 2, \"ifeval::\"},\n {true, 6, 2, \"ifndef::\"},\n {true, 5, 2, \"endif::\"},\n // Macros\n {true, 5, 2, \"audio::\"},\n {true, 7, 2, \"include::\"},\n {true, 5, 2, \"image::\"},\n {true, 5, 2, \"video::\"},\n {false, 8, 1, \"asciimath:\"},\n {false, 3, 1, \"btn:\"},\n {false, 5, 1, \"image:\"},\n {false, 3, 1, \"kbd:\"},\n {false, 9, 1, \"latexmath:\"},\n {false, 4, 1, \"link:\"},\n {false, 6, 1, \"mailto:\"},\n {false, 4, 1, \"menu:\"},\n {false, 4, 1, \"pass:\"},\n {false, 4, 1, \"stem:\"},\n {false, 4, 1, \"xref:\"},\n // Admonitions\n {true, 7, 1, \"CAUTION:\"},\n {true, 9, 1, \"IMPORTANT:\"},\n {true, 4, 1, \"NOTE:\"},\n {true, 3, 1, \"TIP:\"},\n {true, 7, 1, \"WARNING:\"},\n {false, 0, 0, NULL}\n};\n\nconstexpr bool IsNewline(const int ch) {\n // sc.GetRelative(i) returns '\\0' if out of range\n return (ch == '\\n' || ch == '\\r' || ch == '\\0');\n}\n\n}\n\nstatic bool AtTermStart(StyleContext &sc) {\n return sc.currentPos == 0 || sc.chPrev == 0 || isspacechar(sc.chPrev);\n}\n\nstatic void ColorizeAsciidocDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList **, Accessor &styler) {\n bool freezeCursor = false;\n\n StyleContext sc(startPos, static_cast(length), initStyle, styler);\n\n while (sc.More()) {\n // Skip past escaped characters\n if (sc.ch == '\\\\') {\n sc.Forward();\n continue;\n }\n\n // Skip newline.\n if (IsNewline(sc.ch)) {\n // Newline doesn't end blocks\n if (sc.state != SCE_ASCIIDOC_CODEBK && \\\n sc.state != SCE_ASCIIDOC_PASSBK && \\\n sc.state != SCE_ASCIIDOC_COMMENTBK && \\\n sc.state != SCE_ASCIIDOC_LITERALBK) {\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n sc.Forward();\n continue;\n }\n\n // Conditional state-based actions\n switch (sc.state) {\n\n // Strong\n case SCE_ASCIIDOC_STRONG1:\n if (sc.ch == '*' && sc.chPrev != ' ') {\n sc.Forward();\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n freezeCursor = true;\n }\n break;\n case SCE_ASCIIDOC_STRONG2:\n if (sc.Match(\"**\") && sc.chPrev != ' ') {\n sc.Forward(2);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n freezeCursor = true;\n }\n break;\n\n // Emphasis\n case SCE_ASCIIDOC_EM1:\n if (sc.ch == '_' && sc.chPrev != ' ') {\n sc.Forward();\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n freezeCursor = true;\n }\n break;\n case SCE_ASCIIDOC_EM2:\n if (sc.Match(\"__\") && sc.chPrev != ' ') {\n sc.Forward(2);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n freezeCursor = true;\n }\n break;\n\n // Link\n case SCE_ASCIIDOC_LINK:\n if (sc.ch == ']' && sc.chPrev != '\\\\') {\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Code block\n case SCE_ASCIIDOC_CODEBK:\n if (sc.atLineStart && sc.Match(\"----\") && IsNewline(sc.GetRelative(4))) {\n sc.Forward(4);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Passthrough block\n case SCE_ASCIIDOC_PASSBK:\n if (sc.atLineStart && sc.Match(\"++++\") && IsNewline(sc.GetRelative(4))) {\n sc.Forward(4);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Comment block\n case SCE_ASCIIDOC_COMMENTBK:\n if (sc.atLineStart && sc.Match(\"////\") && IsNewline(sc.GetRelative(4))) {\n sc.Forward(4);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Literal\n case SCE_ASCIIDOC_LITERAL:\n if (sc.ch == '+' && sc.chPrev != '\\\\') {\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Literal block\n case SCE_ASCIIDOC_LITERALBK:\n if (sc.atLineStart && sc.Match(\"....\") && IsNewline(sc.GetRelative(4))) {\n sc.Forward(4);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Attribute\n case SCE_ASCIIDOC_ATTRIB:\n if (sc.ch == ':' && sc.chPrev != ' ' && sc.chNext == ' ') {\n sc.Forward();\n sc.SetState(SCE_ASCIIDOC_ATTRIBVAL);\n }\n break;\n\n // Macro\n case SCE_ASCIIDOC_MACRO:\n if (sc.ch == ']' && sc.chPrev != '\\\\') {\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n break;\n\n // Default\n case SCE_ASCIIDOC_DEFAULT:\n // Headers\n if (sc.atLineStart && sc.Match(\"====== \")) {\n sc.SetState(SCE_ASCIIDOC_HEADER6);\n sc.Forward(6);\n }\n else if (sc.atLineStart && sc.Match(\"===== \")) {\n sc.SetState(SCE_ASCIIDOC_HEADER5);\n sc.Forward(5);\n }\n else if (sc.atLineStart && sc.Match(\"==== \")) {\n sc.SetState(SCE_ASCIIDOC_HEADER4);\n sc.Forward(4);\n }\n else if (sc.atLineStart && sc.Match(\"=== \")) {\n sc.SetState(SCE_ASCIIDOC_HEADER3);\n sc.Forward(3);\n }\n else if (sc.atLineStart && sc.Match(\"== \")) {\n sc.SetState(SCE_ASCIIDOC_HEADER2);\n sc.Forward(2);\n }\n else if (sc.atLineStart && sc.Match(\"= \")) {\n sc.SetState(SCE_ASCIIDOC_HEADER1);\n sc.Forward(1);\n }\n // Unordered list item\n else if (sc.atLineStart && sc.Match(\"****** \")) {\n sc.SetState(SCE_ASCIIDOC_ULIST_ITEM);\n sc.Forward(6);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"***** \")) {\n sc.SetState(SCE_ASCIIDOC_ULIST_ITEM);\n sc.Forward(5);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"**** \")) {\n sc.SetState(SCE_ASCIIDOC_ULIST_ITEM);\n sc.Forward(4);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"*** \")) {\n sc.SetState(SCE_ASCIIDOC_ULIST_ITEM);\n sc.Forward(3);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"** \")) {\n sc.SetState(SCE_ASCIIDOC_ULIST_ITEM);\n sc.Forward(2);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"* \")) {\n sc.SetState(SCE_ASCIIDOC_ULIST_ITEM);\n sc.Forward(1);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n // Ordered list item\n else if (sc.atLineStart && sc.Match(\"...... \")) {\n sc.SetState(SCE_ASCIIDOC_OLIST_ITEM);\n sc.Forward(6);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"..... \")) {\n sc.SetState(SCE_ASCIIDOC_OLIST_ITEM);\n sc.Forward(5);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\".... \")) {\n sc.SetState(SCE_ASCIIDOC_OLIST_ITEM);\n sc.Forward(4);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\"... \")) {\n sc.SetState(SCE_ASCIIDOC_OLIST_ITEM);\n sc.Forward(3);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\".. \")) {\n sc.SetState(SCE_ASCIIDOC_OLIST_ITEM);\n sc.Forward(2);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n else if (sc.atLineStart && sc.Match(\". \")) {\n sc.SetState(SCE_ASCIIDOC_OLIST_ITEM);\n sc.Forward(1);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n }\n // Blockquote\n else if (sc.atLineStart && sc.Match(\"> \")) {\n sc.SetState(SCE_ASCIIDOC_BLOCKQUOTE);\n sc.Forward();\n }\n // Link\n else if (!sc.atLineStart && sc.ch == '[' && sc.chPrev != '\\\\' && sc.chNext != ' ') {\n sc.Forward();\n sc.SetState(SCE_ASCIIDOC_LINK);\n freezeCursor = true;\n }\n // Code block\n else if (sc.atLineStart && sc.Match(\"----\") && IsNewline(sc.GetRelative(4))) {\n sc.SetState(SCE_ASCIIDOC_CODEBK);\n sc.Forward(4);\n }\n // Passthrough block\n else if (sc.atLineStart && sc.Match(\"++++\") && IsNewline(sc.GetRelative(4))) {\n sc.SetState(SCE_ASCIIDOC_PASSBK);\n sc.Forward(4);\n }\n // Comment block\n else if (sc.atLineStart && sc.Match(\"////\") && IsNewline(sc.GetRelative(4))) {\n sc.SetState(SCE_ASCIIDOC_COMMENTBK);\n sc.Forward(4);\n }\n // Comment\n else if (sc.atLineStart && sc.Match(\"//\")) {\n sc.SetState(SCE_ASCIIDOC_COMMENT);\n sc.Forward();\n }\n // Literal\n else if (sc.ch == '+' && sc.chPrev != '\\\\' && sc.chNext != ' ' && AtTermStart(sc)) {\n sc.Forward();\n sc.SetState(SCE_ASCIIDOC_LITERAL);\n freezeCursor = true;\n }\n // Literal block\n else if (sc.atLineStart && sc.Match(\"....\") && IsNewline(sc.GetRelative(4))) {\n sc.SetState(SCE_ASCIIDOC_LITERALBK);\n sc.Forward(4);\n }\n // Attribute\n else if (sc.atLineStart && sc.ch == ':' && sc.chNext != ' ') {\n sc.SetState(SCE_ASCIIDOC_ATTRIB);\n }\n // Strong\n else if (sc.Match(\"**\") && sc.GetRelative(2) != ' ') {\n sc.SetState(SCE_ASCIIDOC_STRONG2);\n sc.Forward();\n }\n else if (sc.ch == '*' && sc.chNext != ' ' && AtTermStart(sc)) {\n sc.SetState(SCE_ASCIIDOC_STRONG1);\n }\n // Emphasis\n else if (sc.Match(\"__\") && sc.GetRelative(2) != ' ') {\n sc.SetState(SCE_ASCIIDOC_EM2);\n sc.Forward();\n }\n else if (sc.ch == '_' && sc.chNext != ' ' && AtTermStart(sc)) {\n sc.SetState(SCE_ASCIIDOC_EM1);\n }\n // Macro\n else if (sc.atLineStart && sc.ch == '[' && sc.chNext != ' ') {\n sc.Forward();\n sc.SetState(SCE_ASCIIDOC_MACRO);\n freezeCursor = true;\n }\n else {\n int i = 0;\n bool found = false;\n while (!found && MacroList[i].name != NULL) {\n if (MacroList[i].start)\n found = sc.atLineStart && sc.Match(MacroList[i].name);\n else\n found = sc.Match(MacroList[i].name);\n if (found) {\n sc.SetState(SCE_ASCIIDOC_MACRO);\n sc.Forward(MacroList[i].len1);\n sc.SetState(SCE_ASCIIDOC_DEFAULT);\n if (MacroList[i].len2 > 1)\n sc.Forward(MacroList[i].len2 - 1);\n }\n i++;\n }\n }\n break;\n }\n // Advance if not holding back the cursor for this iteration.\n if (!freezeCursor)\n sc.Forward();\n freezeCursor = false;\n }\n sc.Complete();\n}\n\nextern const LexerModule lmAsciidoc(SCLEX_ASCIIDOC, ColorizeAsciidocDoc, \"asciidoc\");\n" }, { "path": "lexers/LexAsm.cxx", "content": "// Scintilla source code edit control\n/** @file LexAsm.cxx\n ** Lexer for Assembler, just for the MASM syntax\n ** Written by The Black Horus\n ** Enhancements and NASM stuff by Kein-Hong Man, 2003-10\n ** SCE_ASM_COMMENTBLOCK and SCE_ASM_CHARACTER are for future GNU as colouring\n ** Converted to lexer object and added further folding features/properties by \"Udo Lechner\" \n **/\n// Copyright 1998-2003 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\nbool IsAWordChar(const int ch) noexcept {\n\treturn IsAlphaNumeric(ch) || ch == '.' || ch == '_' || ch == '?';\n}\n\nbool IsAWordStart(const int ch) noexcept {\n\treturn IsAlphaNumeric(ch) || ch == '_' || ch == '.' ||\n\t\tch == '%' || ch == '@' || ch == '$' || ch == '?';\n}\n\nbool IsAsmOperator(const int ch) noexcept {\n\tif (IsAlphaNumeric(ch))\n\t\treturn false;\n\t// '.' left out as it is used to make up numbers\n\treturn AnyOf(ch, '*', '/', '-', '+', '(', ')', '=', '^', '[', ']', '<', '&', '>', ',', '|', '~', '%', ':');\n}\n\nconstexpr bool IsStreamCommentStyle(int style) noexcept {\n\treturn style == SCE_ASM_COMMENTDIRECTIVE || style == SCE_ASM_COMMENTBLOCK;\n}\n\n// An individual named option for use in an OptionSet\n\n// Options used for LexerAsm\nstruct OptionsAsm {\n\tstd::string delimiter;\n\tbool fold = false;\n\tbool foldSyntaxBased = true;\n\tbool foldCommentMultiline = false;\n\tbool foldCommentExplicit = false;\n\tstd::string foldExplicitStart;\n\tstd::string foldExplicitEnd;\n\tbool foldExplicitAnywhere = false;\n\tbool foldCompact = true;\n\tstd::string commentChar;\n\t[[nodiscard]] char Delimiter() const noexcept {\n\t\treturn delimiter.empty() ? '~' : delimiter[0];\n\t}\n};\n\nconst char *const asmWordListDesc[] = {\n\t\"CPU instructions\",\n\t\"FPU instructions\",\n\t\"Registers\",\n\t\"Directives\",\n\t\"Directive operands\",\n\t\"Extended instructions\",\n\t\"Directives4Foldstart\",\n\t\"Directives4Foldend\",\n\tnullptr\n};\n\nstruct OptionSetAsm : public OptionSet {\n\tOptionSetAsm() {\n\t\tDefineProperty(\"lexer.asm.comment.delimiter\", &OptionsAsm::delimiter,\n\t\t\t\"Character used for COMMENT directive's delimiter, replacing the standard \\\"~\\\".\");\n\n\t\tDefineProperty(\"fold\", &OptionsAsm::fold);\n\n\t\tDefineProperty(\"fold.asm.syntax.based\", &OptionsAsm::foldSyntaxBased,\n\t\t\t\"Set this property to 0 to disable syntax based folding.\");\n\n\t\tDefineProperty(\"fold.asm.comment.multiline\", &OptionsAsm::foldCommentMultiline,\n\t\t\t\"Set this property to 1 to enable folding multi-line comments.\");\n\n\t\tDefineProperty(\"fold.asm.comment.explicit\", &OptionsAsm::foldCommentExplicit,\n\t\t\t\"This option enables folding explicit fold points when using the Asm lexer. \"\n\t\t\t\"Explicit fold points allows adding extra folding by placing a ;{ comment at the start and a ;} \"\n\t\t\t\"at the end of a section that should fold.\");\n\n\t\tDefineProperty(\"fold.asm.explicit.start\", &OptionsAsm::foldExplicitStart,\n\t\t\t\"The string to use for explicit fold start points, replacing the standard ;{.\");\n\n\t\tDefineProperty(\"fold.asm.explicit.end\", &OptionsAsm::foldExplicitEnd,\n\t\t\t\"The string to use for explicit fold end points, replacing the standard ;}.\");\n\n\t\tDefineProperty(\"fold.asm.explicit.anywhere\", &OptionsAsm::foldExplicitAnywhere,\n\t\t\t\"Set this property to 1 to enable explicit fold points anywhere, not just in line comments.\");\n\n\t\tDefineProperty(\"fold.compact\", &OptionsAsm::foldCompact);\n\n\t\tDefineProperty(\"lexer.as.comment.character\", &OptionsAsm::commentChar,\n\t\t\t\"Overrides the default comment character (which is ';' for asm and '#' for as).\");\n\n\t\tDefineWordListSets(asmWordListDesc);\n\t}\n};\n\nconst LexicalClass lexicalClassesAsm[] = {\n\t// Lexer Assembler SCLEX_ASM SCE_ASM_:\n\t0, \"SCE_ASM_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_ASM_COMMENT\", \"comment line\", \"Comment\",\n\t2, \"SCE_ASM_NUMBER\", \"literal numeric\", \"Number\",\n\t3, \"SCE_ASM_STRING\", \"literal string\", \"String\",\n\t4, \"SCE_ASM_OPERATOR\", \"operator\", \"Operator\",\n\t5, \"SCE_ASM_IDENTIFIER\", \"identifier\", \"Identifier\",\n\t6, \"SCE_ASM_CPUINSTRUCTION\", \"keyword\", \"CPU Instruction\",\n\t7, \"SCE_ASM_MATHINSTRUCTION\", \"keyword\", \"FPU Instruction\",\n\t8, \"SCE_ASM_REGISTER\", \"keyword identifier\", \"Register\",\n\t9, \"SCE_ASM_DIRECTIVE\", \"keyword\", \"Directive\",\n\t10, \"SCE_ASM_DIRECTIVEOPERAND\", \"keyword\", \"Directive Operand\",\n\t11, \"SCE_ASM_COMMENTBLOCK\", \"comment\", \"Comment block\",\n\t12, \"SCE_ASM_CHARACTER\", \"literal string\", \"Single quoted string\",\n\t13, \"SCE_ASM_STRINGEOL\", \"error literal string\", \"End of line where string is not closed\",\n\t14, \"SCE_ASM_EXTINSTRUCTION\", \"keyword\", \"Extended Instruction\",\n\t15, \"SCE_ASM_COMMENTDIRECTIVE\", \"comment\", \"Directive Comment\",\n\t16, \"SCE_ASM_STRINGBACKQUOTE\", \"literal string\", \"Back quoted string\",\n};\n\nconst LexicalClass lexicalClassesAs[] = {\n\t// Lexer.Secondary As SCLEX_AS SCE_ASM_:\n\t0, \"SCE_ASM_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_ASM_COMMENT\", \"comment line\", \"Comment\",\n\t2, \"SCE_ASM_NUMBER\", \"literal numeric\", \"Number\",\n\t3, \"SCE_ASM_STRING\", \"literal string\", \"String\",\n\t4, \"SCE_ASM_OPERATOR\", \"operator\", \"Operator\",\n\t5, \"SCE_ASM_IDENTIFIER\", \"identifier\", \"Identifier\",\n\t6, \"SCE_ASM_CPUINSTRUCTION\", \"keyword\", \"CPU Instruction\",\n\t7, \"SCE_ASM_MATHINSTRUCTION\", \"keyword\", \"FPU Instruction\",\n\t8, \"SCE_ASM_REGISTER\", \"keyword identifier\", \"Register\",\n\t9, \"SCE_ASM_DIRECTIVE\", \"keyword\", \"Directive\",\n\t10, \"SCE_ASM_DIRECTIVEOPERAND\", \"keyword\", \"Directive Operand\",\n\t11, \"SCE_ASM_COMMENTBLOCK\", \"comment\", \"Comment block\",\n\t12, \"SCE_ASM_CHARACTER\", \"literal string\", \"Single quoted string\",\n\t13, \"SCE_ASM_STRINGEOL\", \"error literal string\", \"End of line where string is not closed\",\n\t14, \"SCE_ASM_EXTINSTRUCTION\", \"keyword\", \"Extended Instruction\",\n\t15, \"SCE_ASM_COMMENTDIRECTIVE\", \"comment\", \"Directive Comment\",\n\t16, \"SCE_ASM_STRINGBACKQUOTE\", \"literal string\", \"Back quoted string\",\n};\n\nclass LexerAsm : public DefaultLexer {\n\tWordList cpuInstruction;\n\tWordList mathInstruction;\n\tWordList registers;\n\tWordList directive;\n\tWordList directiveOperand;\n\tWordList extInstruction;\n\tWordList directives4foldstart;\n\tWordList directives4foldend;\n\tOptionsAsm options;\n\tOptionSetAsm osAsm;\n\tchar commentChar;\npublic:\n\tLexerAsm(const char *languageName_, int language_, char commentChar_) :\n\t\tDefaultLexer(languageName_, language_,\n\t\t(language_ == SCLEX_ASM) ? lexicalClassesAsm : lexicalClassesAs,\n\t\t(language_ == SCLEX_ASM) ? std::size(lexicalClassesAsm) : std::size(lexicalClassesAs)),\n\t\tcommentChar(commentChar_) {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osAsm.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osAsm.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osAsm.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char *SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osAsm.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osAsm.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid *SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn nullptr;\n\t}\n\n\tstatic ILexer5 *LexerFactoryAsm() {\n\t\treturn new LexerAsm(\"asm\", SCLEX_ASM, ';');\n\t}\n\n\tstatic ILexer5 *LexerFactoryAs() {\n\t\treturn new LexerAsm(\"as\", SCLEX_AS, '#');\n\t}\n};\n\nSci_Position SCI_METHOD LexerAsm::PropertySet(const char *key, const char *val) {\n\tif (osAsm.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerAsm::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &cpuInstruction;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &mathInstruction;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = ®isters;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &directive;\n\t\tbreak;\n\tcase 4:\n\t\twordListN = &directiveOperand;\n\t\tbreak;\n\tcase 5:\n\t\twordListN = &extInstruction;\n\t\tbreak;\n\tcase 6:\n\t\twordListN = &directives4foldstart;\n\t\tbreak;\n\tcase 7:\n\t\twordListN = &directives4foldend;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl, true)) {\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerAsm::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\tconst char commentCharacter = options.commentChar.empty() ?\n\t\tcommentChar : options.commentChar.front();\n\n\t// Do not leak onto next line\n\tif (initStyle == SCE_ASM_STRINGEOL)\n\t\tinitStyle = SCE_ASM_DEFAULT;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.atLineStart) {\n\t\t\tswitch (sc.state) {\n\t\t\tcase SCE_ASM_STRING:\n\t\t\tcase SCE_ASM_CHARACTER:\n\t\t\tcase SCE_ASM_STRINGBACKQUOTE:\n\t\t\t\t// Prevent SCE_ASM_STRINGEOL from leaking back to previous line\n\t\t\t\tsc.SetState(sc.state);\n\t\t\t\tbreak;\n\t\t\tcase SCE_ASM_COMMENT:\n\t\t\t\tsc.SetState(SCE_ASM_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tdefault:\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\n\t\t// Handle line continuation generically.\n\t\tif (sc.ch == '\\\\') {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\tcase SCE_ASM_OPERATOR:\n\t\t\tif (!IsAsmOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_ASM_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_ASM_NUMBER:\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_ASM_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_ASM_IDENTIFIER:\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tbool IsDirective = false;\n\n\t\t\t\tif (cpuInstruction.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ASM_CPUINSTRUCTION);\n\t\t\t\t} else if (mathInstruction.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ASM_MATHINSTRUCTION);\n\t\t\t\t} else if (registers.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ASM_REGISTER);\n\t\t\t\t} else if (directive.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ASM_DIRECTIVE);\n\t\t\t\t\tIsDirective = true;\n\t\t\t\t} else if (directiveOperand.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ASM_DIRECTIVEOPERAND);\n\t\t\t\t} else if (extInstruction.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ASM_EXTINSTRUCTION);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_ASM_DEFAULT);\n\t\t\t\tif (IsDirective && !strcmp(s, \"comment\")) {\n\t\t\t\t\twhile (IsASpaceOrTab(sc.ch) && !sc.atLineEnd) {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\tif (sc.ch == options.Delimiter()) {\n\t\t\t\t\t\tsc.SetState(SCE_ASM_COMMENTDIRECTIVE);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_ASM_COMMENTDIRECTIVE:\n\t\t\tif (sc.ch == options.Delimiter()) {\n\t\t\t\twhile (!sc.MatchLineEnd()) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_ASM_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_ASM_STRING:\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_ASM_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_ASM_CHARACTER:\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_ASM_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_ASM_STRINGBACKQUOTE:\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\' || sc.chNext == '`') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '`') {\n\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_ASM_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_ASM_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tdefault:\n\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_ASM_DEFAULT) {\n\t\t\tif (sc.ch == commentCharacter) {\n\t\t\t\tsc.SetState(SCE_ASM_COMMENT);\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_ASM_NUMBER);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_ASM_IDENTIFIER);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_ASM_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_ASM_CHARACTER);\n\t\t\t} else if (sc.ch == '`') {\n\t\t\t\tsc.SetState(SCE_ASM_STRINGBACKQUOTE);\n\t\t\t} else if (IsAsmOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_ASM_OPERATOR);\n\t\t\t}\n\t\t}\n\n\t}\n\tsc.Complete();\n}\n\n// Store both the current line's fold level and the next lines in the\n// level store to make it easy to pick up with each increment\n// and to make it possible to fiddle the current level for \"else\".\n\nvoid SCI_METHOD LexerAsm::Fold(Sci_PositionU startPos_, Sci_Position length, int initStyle, IDocument *pAccess) {\n\n\tif (!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\n\tconst Sci_Position startPos = static_cast(startPos_);\n\tconst Sci_Position endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelCurrent = FoldLevelStart(styler.LevelAt(lineCurrent-1));\n\tint levelNext = levelCurrent;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleIndexAt(startPos);\n\tint style = initStyle;\n\tstd::string word;\n\tconst bool userDefinedFoldMarkers = !options.foldExplicitStart.empty() && !options.foldExplicitEnd.empty();\n\tfor (Sci_Position i = startPos; i < endPos; i++) {\n\t\tconst char ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tconst int stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleIndexAt(i + 1);\n\t\tconst bool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (options.foldCommentMultiline && IsStreamCommentStyle(style)) {\n\t\t\tif (!IsStreamCommentStyle(stylePrev)) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (!IsStreamCommentStyle(styleNext) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (options.foldCommentExplicit && ((style == SCE_ASM_COMMENT) || options.foldExplicitAnywhere)) {\n\t\t\tif (userDefinedFoldMarkers) {\n\t\t\t\tif (styler.Match(i, options.foldExplicitStart.c_str())) {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (styler.Match(i, options.foldExplicitEnd.c_str())) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\tif (ch == ';') {\n\t\t\t\t\tif (chNext == '{') {\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t\t} else if (chNext == '}') {\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (options.foldSyntaxBased && (style == SCE_ASM_DIRECTIVE)) {\n\t\t\tword.push_back(MakeLowerCase(ch));\n\t\t\tif (styleNext != SCE_ASM_DIRECTIVE) { // reading directive ready\n\t\t\t\tif (directives4foldstart.InList(word)) {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (directives4foldend.InList(word)) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t\tword.clear();\n\t\t\t}\n\t\t}\n\t\tif (!IsASpace(ch))\n\t\t\tvisibleChars++;\n\t\tif (atEOL || (i == endPos-1)) {\n\t\t\tconst int lev = FoldLevelForCurrentNext(levelCurrent, levelNext) |\n\t\t\t\tFoldLevelFlags(levelCurrent, levelNext, visibleChars == 0 && options.foldCompact);\n\t\t\tstyler.SetLevelIfDifferent(lineCurrent, lev);\n\t\t\tlineCurrent++;\n\t\t\tlevelCurrent = levelNext;\n\t\t\tif (atEOL && (i == (styler.Length() - 1))) {\n\t\t\t\t// There is an empty line at end of file so give it same level and empty\n\t\t\t\tstyler.SetLevel(lineCurrent, FoldLevelForCurrent(levelCurrent) | SC_FOLDLEVELWHITEFLAG);\n\t\t\t}\n\t\t\tvisibleChars = 0;\n\t\t}\n\t}\n}\n\n}\n\nextern const LexerModule lmAsm(SCLEX_ASM, LexerAsm::LexerFactoryAsm, \"asm\", asmWordListDesc);\nextern const LexerModule lmAs(SCLEX_AS, LexerAsm::LexerFactoryAs, \"as\", asmWordListDesc);\n\n" }, { "path": "lexers/LexAsn1.cxx", "content": "// Scintilla source code edit control\n/** @file LexAsn1.cxx\n ** Lexer for ASN.1\n **/\n// Copyright 2004 by Herr Pfarrer rpfarrer yahoo de\n// Last Updated: 20/07/2004\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n// Some char test functions\nstatic bool isAsn1Number(int ch)\n{\n\treturn (ch >= '0' && ch <= '9');\n}\n\nstatic bool isAsn1Letter(int ch)\n{\n\treturn (ch >= 'A' && ch <= 'Z') || (ch >= 'a' && ch <= 'z');\n}\n\nstatic bool isAsn1Char(int ch)\n{\n\treturn (ch == '-' ) || isAsn1Number(ch) || isAsn1Letter (ch);\n}\n\n//\n//\tFunction determining the color of a given code portion\n//\tBased on a \"state\"\n//\nstatic void ColouriseAsn1Doc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordLists[], Accessor &styler)\n{\n\t// The keywords\n\tWordList &Keywords = *keywordLists[0];\n\tWordList &Attributes = *keywordLists[1];\n\tWordList &Descriptors = *keywordLists[2];\n\tWordList &Types = *keywordLists[3];\n\n\t// Parse the whole buffer character by character using StyleContext\n\tStyleContext sc(startPos, length, initStyle, styler);\n\tfor (; sc.More(); sc.Forward())\n\t{\n\t\t// The state engine\n\t\tswitch (sc.state)\n\t\t{\n\t\tcase SCE_ASN1_DEFAULT:\t\t// Plain characters\nasn1_default:\n\t\t\tif (sc.ch == '-' && sc.chNext == '-')\n\t\t\t\t// A comment begins here\n\t\t\t\tsc.SetState(SCE_ASN1_COMMENT);\n\t\t\telse if (sc.ch == '\"')\n\t\t\t\t// A string begins here\n\t\t\t\tsc.SetState(SCE_ASN1_STRING);\n\t\t\telse if (isAsn1Number (sc.ch))\n\t\t\t\t// A number starts here (identifier should start with a letter in ASN.1)\n\t\t\t\tsc.SetState(SCE_ASN1_SCALAR);\n\t\t\telse if (isAsn1Char (sc.ch))\n\t\t\t\t// An identifier starts here (identifier always start with a letter)\n\t\t\t\tsc.SetState(SCE_ASN1_IDENTIFIER);\n\t\t\telse if (sc.ch == ':')\n\t\t\t\t// A ::= operator starts here\n\t\t\t\tsc.SetState(SCE_ASN1_OPERATOR);\n\t\t\tbreak;\n\t\tcase SCE_ASN1_COMMENT:\t\t// A comment\n\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n')\n\t\t\t\t// A comment ends here\n\t\t\t\tsc.SetState(SCE_ASN1_DEFAULT);\n\t\t\tbreak;\n\t\tcase SCE_ASN1_IDENTIFIER:\t// An identifier (keyword, attribute, descriptor or type)\n\t\t\tif (!isAsn1Char (sc.ch))\n\t\t\t{\n\t\t\t\t// The end of identifier is here: we can look for it in lists by now and change its state\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\tif (Keywords.InList(s))\n\t\t\t\t\t// It's a keyword, change its state\n\t\t\t\t\tsc.ChangeState(SCE_ASN1_KEYWORD);\n\t\t\t\telse if (Attributes.InList(s))\n\t\t\t\t\t// It's an attribute, change its state\n\t\t\t\t\tsc.ChangeState(SCE_ASN1_ATTRIBUTE);\n\t\t\t\telse if (Descriptors.InList(s))\n\t\t\t\t\t// It's a descriptor, change its state\n\t\t\t\t\tsc.ChangeState(SCE_ASN1_DESCRIPTOR);\n\t\t\t\telse if (Types.InList(s))\n\t\t\t\t\t// It's a type, change its state\n\t\t\t\t\tsc.ChangeState(SCE_ASN1_TYPE);\n\n\t\t\t\t// Set to default now\n\t\t\t\tsc.SetState(SCE_ASN1_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_ASN1_STRING:\t\t// A string delimited by \"\"\n\t\t\tif (sc.ch == '\"')\n\t\t\t{\n\t\t\t\t// A string ends here\n\t\t\t\tsc.ForwardSetState(SCE_ASN1_DEFAULT);\n\n\t\t\t\t// To correctly manage a char sticking to the string quote\n\t\t\t\tgoto asn1_default;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_ASN1_SCALAR:\t\t// A plain number\n\t\t\tif (!isAsn1Number (sc.ch))\n\t\t\t\t// A number ends here\n\t\t\t\tsc.SetState(SCE_ASN1_DEFAULT);\n\t\t\tbreak;\n\t\tcase SCE_ASN1_OPERATOR:\t\t// The affectation operator ::= and wath follows (eg: ::= { org 6 } OID or ::= 12 trap)\n\t\t\tif (sc.ch == '{')\n\t\t\t{\n\t\t\t\t// An OID definition starts here: enter the sub loop\n\t\t\t\tfor (; sc.More(); sc.Forward())\n\t\t\t\t{\n\t\t\t\t\tif (isAsn1Number (sc.ch) && (!isAsn1Char (sc.chPrev) || isAsn1Number (sc.chPrev)))\n\t\t\t\t\t\t// The OID number is highlighted\n\t\t\t\t\t\tsc.SetState(SCE_ASN1_OID);\n\t\t\t\t\telse if (isAsn1Char (sc.ch))\n\t\t\t\t\t\t// The OID parent identifier is plain\n\t\t\t\t\t\tsc.SetState(SCE_ASN1_IDENTIFIER);\n\t\t\t\t\telse\n\t\t\t\t\t\tsc.SetState(SCE_ASN1_DEFAULT);\n\n\t\t\t\t\tif (sc.ch == '}')\n\t\t\t\t\t\t// Here ends the OID and the operator sub loop: go back to main loop\n\t\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t}\n\t\t\telse if (isAsn1Number (sc.ch))\n\t\t\t{\n\t\t\t\t// A trap number definition starts here: enter the sub loop\n\t\t\t\tfor (; sc.More(); sc.Forward())\n\t\t\t\t{\n\t\t\t\t\tif (isAsn1Number (sc.ch))\n\t\t\t\t\t\t// The trap number is highlighted\n\t\t\t\t\t\tsc.SetState(SCE_ASN1_OID);\n\t\t\t\t\telse\n\t\t\t\t\t{\n\t\t\t\t\t\t// The number ends here: go back to main loop\n\t\t\t\t\t\tsc.SetState(SCE_ASN1_DEFAULT);\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\telse if (sc.ch != ':' && sc.ch != '=' && sc.ch != ' ')\n\t\t\t\t// The operator doesn't imply an OID definition nor a trap, back to main loop\n\t\t\t\tgoto asn1_default; // To be sure to handle actually the state change\n\t\t\tbreak;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldAsn1Doc(Sci_PositionU, Sci_Position, int, WordList *[], Accessor &styler)\n{\n\t// No folding enabled, no reason to continue...\n\tif( styler.GetPropertyInt(\"fold\") == 0 )\n\t\treturn;\n\n\t// No folding implemented: doesn't make sense for ASN.1\n}\n\nstatic const char * const asn1WordLists[] = {\n\t\"Keywords\",\n\t\"Attributes\",\n\t\"Descriptors\",\n\t\"Types\",\n\t0, };\n\n\nextern const LexerModule lmAsn1(SCLEX_ASN1, ColouriseAsn1Doc, \"asn1\", FoldAsn1Doc, asn1WordLists);\n" }, { "path": "lexers/LexBaan.cxx", "content": "// Scintilla source code edit control\n/** @file LexBaan.cxx\n** Lexer for Baan.\n** Based heavily on LexCPP.cxx\n**/\n// Copyright 2001- by Vamsi Potluru & Praveen Ambekar \n// Maintainer Email: oirfeodent@yahoo.co.in\n// The License.txt file describes the conditions under which this software may be distributed.\n\n// C standard library\n#include \n#include \n\n// C++ wrappers of C standard library\n#include \n\n// C++ standard library\n#include \n#include \n#include \n#include \n\n// Scintilla headers\n\n// Non-platform-specific headers\n\n// include\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n// lexlib\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n// Use an unnamed namespace to protect the functions and classes from name conflicts\n\n// Options used for LexerBaan\nstruct OptionsBaan {\n\tbool fold;\n\tbool foldComment;\n\tbool foldPreprocessor;\n\tbool foldCompact;\n\tbool baanFoldSyntaxBased;\n\tbool baanFoldKeywordsBased;\n\tbool baanFoldSections;\n\tbool baanFoldInnerLevel;\n\tbool baanStylingWithinPreprocessor;\n\tOptionsBaan() {\n\t\tfold = false;\n\t\tfoldComment = false;\n\t\tfoldPreprocessor = false;\n\t\tfoldCompact = false;\n\t\tbaanFoldSyntaxBased = false;\n\t\tbaanFoldKeywordsBased = false;\n\t\tbaanFoldSections = false;\n\t\tbaanFoldInnerLevel = false;\n\t\tbaanStylingWithinPreprocessor = false;\n\t}\n};\n\nconst char *const baanWordLists[] = {\n\t\"Baan & BaanSQL Reserved Keywords \",\n\t\"Baan Standard functions\",\n\t\"Baan Functions Abridged\",\n\t\"Baan Main Sections \",\n\t\"Baan Sub Sections\",\n\t\"PreDefined Variables\",\n\t\"PreDefined Attributes\",\n\t\"Enumerates\",\n\t0,\n};\n\nstruct OptionSetBaan : public OptionSet {\n\tOptionSetBaan() {\n\t\tDefineProperty(\"fold\", &OptionsBaan::fold);\n\n\t\tDefineProperty(\"fold.comment\", &OptionsBaan::foldComment);\n\n\t\tDefineProperty(\"fold.preprocessor\", &OptionsBaan::foldPreprocessor);\n\n\t\tDefineProperty(\"fold.compact\", &OptionsBaan::foldCompact);\n\n\t\tDefineProperty(\"fold.baan.syntax.based\", &OptionsBaan::baanFoldSyntaxBased,\n\t\t\t\"Set this property to 0 to disable syntax based folding, which is folding based on '{' & '('.\");\n\n\t\tDefineProperty(\"fold.baan.keywords.based\", &OptionsBaan::baanFoldKeywordsBased,\n\t\t\t\"Set this property to 0 to disable keywords based folding, which is folding based on \"\n\t\t\t\" for, if, on (case), repeat, select, while and fold ends based on endfor, endif, endcase, until, endselect, endwhile respectively.\"\n\t\t\t\"Also folds declarations which are grouped together.\");\n\n\t\tDefineProperty(\"fold.baan.sections\", &OptionsBaan::baanFoldSections,\n\t\t\t\"Set this property to 0 to disable folding of Main Sections as well as Sub Sections.\");\n\n\t\tDefineProperty(\"fold.baan.inner.level\", &OptionsBaan::baanFoldInnerLevel,\n\t\t\t\"Set this property to 1 to enable folding of inner levels of select statements.\"\n\t\t\t\"Disabled by default. case and if statements are also eligible\" );\n\n\t\tDefineProperty(\"lexer.baan.styling.within.preprocessor\", &OptionsBaan::baanStylingWithinPreprocessor,\n\t\t\t\"For Baan code, determines whether all preprocessor code is styled in the \"\n\t\t\t\"preprocessor style (0, the default) or only from the initial # to the end \"\n\t\t\t\"of the command word(1).\");\n\n\t\tDefineWordListSets(baanWordLists);\n\t}\n};\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '.' || ch == '_' || ch == '$');\n}\n\nstatic inline bool IsAnOperator(int ch) {\n\tif (IsAlphaNumeric(ch))\n\t\treturn false;\n\tif (ch == '#' || ch == '^' || ch == '&' || ch == '*' ||\n\t\tch == '(' || ch == ')' || ch == '-' || ch == '+' ||\n\t\tch == '=' || ch == '|' || ch == '{' || ch == '}' ||\n\t\tch == '[' || ch == ']' || ch == ':' || ch == ';' ||\n\t\tch == '<' || ch == '>' || ch == ',' || ch == '/' ||\n\t\tch == '?' || ch == '!' || ch == '\"' || ch == '~' ||\n\t\tch == '\\\\')\n\t\treturn true;\n\treturn false;\n}\n\nstatic inline int IsAnyOtherIdentifier(char *s, Sci_Position sLength) {\n\n\t/*\tIsAnyOtherIdentifier uses standard templates used in baan.\n\tThe matching template is shown as comments just above the return condition.\n\t^ - refers to any character [a-z].\n\t# - refers to any number [0-9].\n\tOther characters shown are compared as is.\n\tTried implementing with Regex... it was too complicated for me.\n\tAny other implementation suggestion welcome.\n\t*/\n\tswitch (sLength) {\n\tcase 8:\n\t\tif (isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[5]) && IsADigit(s[6]) && IsADigit(s[7])) {\n\t\t\t//^^^^^###\n\t\t\treturn(SCE_BAAN_TABLEDEF);\n\t\t}\n\t\tbreak;\n\tcase 9:\n\t\tif (s[0] == 't' && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && isalpha(s[5]) && IsADigit(s[6]) && IsADigit(s[7]) && IsADigit(s[8])) {\n\t\t\t//t^^^^^###\n\t\t\treturn(SCE_BAAN_TABLEDEF);\n\t\t}\n\t\telse if (s[8] == '.' && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[5]) && IsADigit(s[6]) && IsADigit(s[7])) {\n\t\t\t//^^^^^###.\n\t\t\treturn(SCE_BAAN_TABLESQL);\n\t\t}\n\t\tbreak;\n\tcase 13:\n\t\tif (s[8] == '.' && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[5]) && IsADigit(s[6]) && IsADigit(s[7])) {\n\t\t\t//^^^^^###.****\n\t\t\treturn(SCE_BAAN_TABLESQL);\n\t\t}\n\t\telse if (s[0] == 'r' && s[1] == 'c' && s[2] == 'd' && s[3] == '.' && s[4] == 't' && isalpha(s[5]) && isalpha(s[6]) && isalpha(s[7]) && isalpha(s[8]) && isalpha(s[9]) && IsADigit(s[10]) && IsADigit(s[11]) && IsADigit(s[12])) {\n\t\t\t//rcd.t^^^^^###\n\t\t\treturn(SCE_BAAN_TABLEDEF);\n\t\t}\n\t\tbreak;\n\tcase 14:\n\tcase 15:\n\t\tif (s[8] == '.' && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[5]) && IsADigit(s[6]) && IsADigit(s[7])) {\n\t\t\tif (s[13] != ':') {\n\t\t\t\t//^^^^^###.******\n\t\t\t\treturn(SCE_BAAN_TABLESQL);\n\t\t\t}\n\t\t}\n\t\tbreak;\n\tcase 16:\n\tcase 17:\n\t\tif (s[8] == '.' && s[9] == '_' && s[10] == 'i' && s[11] == 'n' && s[12] == 'd' && s[13] == 'e' && s[14] == 'x' && IsADigit(s[15]) && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[5]) && IsADigit(s[6]) && IsADigit(s[7])) {\n\t\t\t//^^^^^###._index##\n\t\t\treturn(SCE_BAAN_TABLEDEF);\n\t\t}\n\t\telse if (s[8] == '.' && s[9] == '_' && s[10] == 'c' && s[11] == 'o' && s[12] == 'm' && s[13] == 'p' && s[14] == 'n' && s[15] == 'r' && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[5]) && IsADigit(s[6]) && IsADigit(s[7])) {\n\t\t\t//^^^^^###._compnr\n\t\t\treturn(SCE_BAAN_TABLEDEF);\n\t\t}\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tif (sLength > 14 && s[5] == '.' && s[6] == 'd' && s[7] == 'l' && s[8] == 'l' && s[13] == '.' && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && IsADigit(s[9]) && IsADigit(s[10]) && IsADigit(s[11]) && IsADigit(s[12])) {\n\t\t//^^^^^.dll####.\n\t\treturn(SCE_BAAN_FUNCTION);\n\t}\n\telse if (sLength > 15 && s[2] == 'i' && s[3] == 'n' && s[4] == 't' && s[5] == '.' && s[6] == 'd' && s[7] == 'l' && s[8] == 'l' && isalpha(s[0]) && isalpha(s[1]) && isalpha(s[9]) && isalpha(s[10]) && isalpha(s[11]) && isalpha(s[12]) && isalpha(s[13])) {\n\t\t//^^int.dll^^^^^.\n\t\treturn(SCE_BAAN_FUNCTION);\n\t}\n\telse if (sLength > 11 && s[0] == 'i' && s[10] == '.' && isalpha(s[1]) && isalpha(s[2]) && isalpha(s[3]) && isalpha(s[4]) && isalpha(s[5]) && IsADigit(s[6]) && IsADigit(s[7]) && IsADigit(s[8]) && IsADigit(s[9])) {\n\t\t//i^^^^^####.\n\t\treturn(SCE_BAAN_FUNCTION);\n\t}\n\n\treturn(SCE_BAAN_DEFAULT);\n}\n\nstatic bool IsCommentLine(Sci_Position line, LexAccessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tchar ch = styler[i];\n\t\tint style = styler.StyleAt(i);\n\t\tif (ch == '|' && style == SCE_BAAN_COMMENT)\n\t\t\treturn true;\n\t\telse if (!IsASpaceOrTab(ch))\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nstatic bool IsPreProcLine(Sci_Position line, LexAccessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tchar ch = styler[i];\n\t\tint style = styler.StyleAt(i);\n\t\tif (ch == '#' && style == SCE_BAAN_PREPROCESSOR) {\n\t\t\tif (styler.Match(i, \"#elif\") || styler.Match(i, \"#else\") || styler.Match(i, \"#endif\")\n\t\t\t\t|| styler.Match(i, \"#if\") || styler.Match(i, \"#ifdef\") || styler.Match(i, \"#ifndef\"))\n\t\t\t\t// Above PreProcessors has a seperate fold mechanism.\n\t\t\t\treturn false;\n\t\t\telse\n\t\t\t\treturn true;\n\t\t}\n\t\telse if (ch == '^')\n\t\t\treturn true;\n\t\telse if (!IsASpaceOrTab(ch))\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nstatic int mainOrSubSectionLine(Sci_Position line, LexAccessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tchar ch = styler[i];\n\t\tint style = styler.StyleAt(i);\n\t\tif (style == SCE_BAAN_WORD5 || style == SCE_BAAN_WORD4)\n\t\t\treturn style;\n\t\telse if (IsASpaceOrTab(ch))\n\t\t\tcontinue;\n\t\telse\n\t\t\tbreak;\n\t}\n\treturn 0;\n}\n\nstatic bool priorSectionIsSubSection(Sci_Position line, LexAccessor &styler){\n\twhile (line > 0) {\n\t\tSci_Position pos = styler.LineStart(line);\n\t\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\t\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\t\tchar ch = styler[i];\n\t\t\tint style = styler.StyleAt(i);\n\t\t\tif (style == SCE_BAAN_WORD4)\n\t\t\t\treturn true;\n\t\t\telse if (style == SCE_BAAN_WORD5)\n\t\t\t\treturn false;\n\t\t\telse if (IsASpaceOrTab(ch))\n\t\t\t\tcontinue;\n\t\t\telse\n\t\t\t\tbreak;\n\t\t}\n\t\tline--;\n\t}\n\treturn false;\n}\n\nstatic bool nextSectionIsSubSection(Sci_Position line, LexAccessor &styler) {\n\twhile (line > 0) {\n\t\tSci_Position pos = styler.LineStart(line);\n\t\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\t\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\t\tchar ch = styler[i];\n\t\t\tint style = styler.StyleAt(i);\n\t\t\tif (style == SCE_BAAN_WORD4)\n\t\t\t\treturn true;\n\t\t\telse if (style == SCE_BAAN_WORD5)\n\t\t\t\treturn false;\n\t\t\telse if (IsASpaceOrTab(ch))\n\t\t\t\tcontinue;\n\t\t\telse\n\t\t\t\tbreak;\n\t\t}\n\t\tline++;\n\t}\n\treturn false;\n}\n\nstatic bool IsDeclarationLine(Sci_Position line, LexAccessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tchar ch = styler[i];\n\t\tint style = styler.StyleAt(i);\n\t\tif (style == SCE_BAAN_WORD) {\n\t\t\tif (styler.Match(i, \"table\") || styler.Match(i, \"extern\") || styler.Match(i, \"long\")\n\t\t\t\t|| styler.Match(i, \"double\") || styler.Match(i, \"boolean\") || styler.Match(i, \"string\")\n\t\t\t\t|| styler.Match(i, \"domain\")) {\n\t\t\t\tfor (Sci_Position j = eol_pos; j > pos; j--) {\n\t\t\t\t\tint styleFromEnd = styler.StyleAt(j);\n\t\t\t\t\tif (styleFromEnd == SCE_BAAN_COMMENT)\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\telse if (IsASpace(styler[j]))\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\telse if (styler[j] != ',')\n\t\t\t\t\t\t//Above conditions ensures, Declaration is not part of any function parameters.\n\t\t\t\t\t\treturn true;\n\t\t\t\t\telse\n\t\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t}\n\t\t\telse\n\t\t\t\treturn false;\n\t\t}\n\t\telse if (!IsASpaceOrTab(ch))\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nstatic bool IsInnerLevelFold(Sci_Position line, LexAccessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tchar ch = styler[i];\n\t\tint style = styler.StyleAt(i);\n\t\tif (style == SCE_BAAN_WORD && (styler.Match(i, \"else\" ) || styler.Match(i, \"case\")\n\t\t\t|| styler.Match(i, \"default\") || styler.Match(i, \"selectdo\") || styler.Match(i, \"selecteos\")\n\t\t\t|| styler.Match(i, \"selectempty\") || styler.Match(i, \"selecterror\")))\n\t\t\treturn true;\n\t\telse if (IsASpaceOrTab(ch))\n\t\t\tcontinue;\n\t\telse\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nstatic inline bool wordInArray(const std::string& value, std::string *array, int length)\n{\n\tfor (int i = 0; i < length; i++)\n\t{\n\t\tif (value == array[i])\n\t\t{\n\t\t\treturn true;\n\t\t}\n\t}\n\n\treturn false;\n}\n\nclass WordListAbridged : public WordList {\npublic:\n\tWordListAbridged() {\n\t\tkwAbridged = false;\n\t\tkwHasSection = false;\n\t};\n\t~WordListAbridged() {\n\t\tClear();\n\t};\n\tbool kwAbridged;\n\tbool kwHasSection;\n\tbool Contains(const char *s) {\n\t\treturn kwAbridged ? InListAbridged(s, '~') : InList(s);\n\t};\n};\n\n}\n\nclass LexerBaan : public DefaultLexer {\n\tWordListAbridged keywords;\n\tWordListAbridged keywords2;\n\tWordListAbridged keywords3;\n\tWordListAbridged keywords4;\n\tWordListAbridged keywords5;\n\tWordListAbridged keywords6;\n\tWordListAbridged keywords7;\n\tWordListAbridged keywords8;\n\tWordListAbridged keywords9;\n\tOptionsBaan options;\n\tOptionSetBaan osBaan;\npublic:\n\tLexerBaan() : DefaultLexer(\"baan\", SCLEX_BAAN) {\n\t}\n\n\tvirtual ~LexerBaan() {\n\t}\n\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\n\tconst char * SCI_METHOD PropertyNames() override {\n\t\treturn osBaan.PropertyNames();\n\t}\n\n\tint SCI_METHOD PropertyType(const char * name) override {\n\t\treturn osBaan.PropertyType(name);\n\t}\n\n\tconst char * SCI_METHOD DescribeProperty(const char * name) override {\n\t\treturn osBaan.DescribeProperty(name);\n\t}\n\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osBaan.PropertyGet(key);\n\t}\n\n\tconst char * SCI_METHOD DescribeWordListSets() override {\n\t\treturn osBaan.DescribeWordListSets();\n\t}\n\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid * SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn NULL;\n\t}\n\n\tstatic ILexer5 * LexerFactoryBaan() {\n\t\treturn new LexerBaan();\n\t}\n};\n\nSci_Position SCI_METHOD LexerBaan::PropertySet(const char *key, const char *val) {\n\tif (osBaan.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerBaan::WordListSet(int n, const char *wl) {\n\tWordListAbridged *WordListAbridgedN = 0;\n\tswitch (n) {\n\tcase 0:\n\t\tWordListAbridgedN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\tWordListAbridgedN = &keywords2;\n\t\tbreak;\n\tcase 2:\n\t\tWordListAbridgedN = &keywords3;\n\t\tbreak;\n\tcase 3:\n\t\tWordListAbridgedN = &keywords4;\n\t\tbreak;\n\tcase 4:\n\t\tWordListAbridgedN = &keywords5;\n\t\tbreak;\n\tcase 5:\n\t\tWordListAbridgedN = &keywords6;\n\t\tbreak;\n\tcase 6:\n\t\tWordListAbridgedN = &keywords7;\n\t\tbreak;\n\tcase 7:\n\t\tWordListAbridgedN = &keywords8;\n\t\tbreak;\n\tcase 8:\n\t\tWordListAbridgedN = &keywords9;\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (WordListAbridgedN) {\n\t\tWordListAbridged wlNew;\n\t\twlNew.Set(wl);\n\t\tif (*WordListAbridgedN != wlNew) {\n\t\t\tWordListAbridgedN->Set(wl);\n\t\t\tWordListAbridgedN->kwAbridged = strchr(wl, '~') != NULL;\n\t\t\tWordListAbridgedN->kwHasSection = strchr(wl, ':') != NULL;\n\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerBaan::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\n\tif (initStyle == SCE_BAAN_STRINGEOL)\t// Does not leak onto next line\n\t\tinitStyle = SCE_BAAN_DEFAULT;\n\n\tint visibleChars = 0;\n\tbool lineHasDomain = false;\n\tbool lineHasFunction = false;\n\tbool lineHasPreProc = false;\n\tbool lineIgnoreString = false;\n\tbool lineHasDefines = false;\n\tbool numberIsHex = false;\n\tchar word[1000];\n\tint wordlen = 0;\n\n\tstd::string preProcessorTags[13] = { \"#context_off\", \"#context_on\",\n\t\t\"#define\", \"#elif\", \"#else\", \"#endif\",\n\t\t\"#ident\", \"#if\", \"#ifdef\", \"#ifndef\",\n\t\t\"#include\", \"#pragma\", \"#undef\" };\n\tLexAccessor styler(pAccess);\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\tcase SCE_BAAN_OPERATOR:\n\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\tbreak;\n\t\tcase SCE_BAAN_NUMBER:\n\t\t\tif (IsASpaceOrTab(sc.ch) || sc.ch == '\\r' || sc.ch == '\\n' || IsAnOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\telse if ((numberIsHex && !(MakeLowerCase(sc.ch) == 'x' || MakeLowerCase(sc.ch) == 'e' ||\n\t\t\t\tIsADigit(sc.ch, 16) || sc.ch == '.' || sc.ch == '-' || sc.ch == '+')) ||\n\t\t\t\t(!numberIsHex && !(MakeLowerCase(sc.ch) == 'e' || IsADigit(sc.ch)\n\t\t\t\t|| sc.ch == '.' || sc.ch == '-' || sc.ch == '+'))) {\n\t\t\t\t\t// check '-' for possible -10e-5. Add '+' as well.\n\t\t\t\t\tnumberIsHex = false;\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_IDENTIFIER);\n\t\t\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_BAAN_IDENTIFIER:\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[1000];\n\t\t\t\tchar s1[1000];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tif (sc.ch == ':') {\n\t\t\t\t\tmemcpy(s1, s, sizeof(s));\n\t\t\t\t\ts1[sc.LengthCurrent()] = sc.ch;\n\t\t\t\t\ts1[sc.LengthCurrent() + 1] = '\\0';\n\t\t\t\t}\n\t\t\t\tif ((keywords.kwHasSection && (sc.ch == ':')) ? keywords.Contains(s1) : keywords.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD);\n\t\t\t\t\tif (0 == strcmp(s, \"domain\")) {\n\t\t\t\t\t\tlineHasDomain = true;\n\t\t\t\t\t}\n\t\t\t\t\telse if (0 == strcmp(s, \"function\")) {\n\t\t\t\t\t\tlineHasFunction = true;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\telse if (lineHasDomain) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_DOMDEF);\n\t\t\t\t\tlineHasDomain = false;\n\t\t\t\t}\n\t\t\t\telse if (lineHasFunction) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_FUNCDEF);\n\t\t\t\t\tlineHasFunction = false;\n\t\t\t\t}\n\t\t\t\telse if ((keywords2.kwHasSection && (sc.ch == ':')) ? keywords2.Contains(s1) : keywords2.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD2);\n\t\t\t\t}\n\t\t\t\telse if ((keywords3.kwHasSection && (sc.ch == ':')) ? keywords3.Contains(s1) : keywords3.Contains(s)) {\n\t\t\t\t\tif (sc.ch == '(')\n\t\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD3);\n\t\t\t\t\telse\n\t\t\t\t\t\tsc.ChangeState(SCE_BAAN_IDENTIFIER);\n\t\t\t\t}\n\t\t\t\telse if ((keywords4.kwHasSection && (sc.ch == ':')) ? keywords4.Contains(s1) : keywords4.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD4);\n\t\t\t\t}\n\t\t\t\telse if ((keywords5.kwHasSection && (sc.ch == ':')) ? keywords5.Contains(s1) : keywords5.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD5);\n\t\t\t\t}\n\t\t\t\telse if ((keywords6.kwHasSection && (sc.ch == ':')) ? keywords6.Contains(s1) : keywords6.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD6);\n\t\t\t\t}\n\t\t\t\telse if ((keywords7.kwHasSection && (sc.ch == ':')) ? keywords7.Contains(s1) : keywords7.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD7);\n\t\t\t\t}\n\t\t\t\telse if ((keywords8.kwHasSection && (sc.ch == ':')) ? keywords8.Contains(s1) : keywords8.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD8);\n\t\t\t\t}\n\t\t\t\telse if ((keywords9.kwHasSection && (sc.ch == ':')) ? keywords9.Contains(s1) : keywords9.Contains(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_WORD9);\n\t\t\t\t}\n\t\t\t\telse if (lineHasPreProc) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_OBJECTDEF);\n\t\t\t\t\tlineHasPreProc = false;\n\t\t\t\t}\n\t\t\t\telse if (lineHasDefines) {\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_DEFINEDEF);\n\t\t\t\t\tlineHasDefines = false;\n\t\t\t\t}\n\t\t\t\telse {\n\t\t\t\t\tint state = IsAnyOtherIdentifier(s, sc.LengthCurrent());\n\t\t\t\t\tif (state > 0) {\n\t\t\t\t\t\tsc.ChangeState(state);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_BAAN_PREPROCESSOR:\n\t\t\tif (options.baanStylingWithinPreprocessor) {\n\t\t\t\tif (IsASpace(sc.ch) || IsAnOperator(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\t\t}\n\t\t\t}\n\t\t\telse {\n\t\t\t\tif (sc.atLineEnd && (sc.chNext != '^')) {\n\t\t\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_BAAN_COMMENT:\n\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n') {\n\t\t\t\tsc.SetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_BAAN_COMMENTDOC:\n\t\t\tif (sc.MatchIgnoreCase(\"enddllusage\")) {\n\t\t\t\tfor (unsigned int i = 0; i < 10; i++) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tsc.ForwardSetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\telse if (sc.MatchIgnoreCase(\"endfunctionusage\")) {\n\t\t\t\tfor (unsigned int i = 0; i < 15; i++) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tsc.ForwardSetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_BAAN_STRING:\n\t\t\tif (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_BAAN_DEFAULT);\n\t\t\t}\n\t\t\telse if ((sc.atLineEnd) && (sc.chNext != '^')) {\n\t\t\t\tsc.ChangeState(SCE_BAAN_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_BAAN_DEFAULT);\n\t\t\t\tvisibleChars = 0;\n\t\t\t}\n\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_BAAN_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))\n\t\t\t\t|| ((sc.ch == '-' || sc.ch == '+') && (IsADigit(sc.chNext) || sc.chNext == '.'))\n\t\t\t\t|| (MakeLowerCase(sc.ch) == 'e' && (IsADigit(sc.chNext) || sc.chNext == '+' || sc.chNext == '-'))) {\n\t\t\t\tif ((sc.ch == '0' && MakeLowerCase(sc.chNext) == 'x') ||\n\t\t\t\t\t((sc.ch == '-' || sc.ch == '+') && sc.chNext == '0' && MakeLowerCase(sc.GetRelativeCharacter(2)) == 'x')){\n\t\t\t\t\tnumberIsHex = true;\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_BAAN_NUMBER);\n\t\t\t}\n\t\t\telse if (sc.MatchIgnoreCase(\"dllusage\") || sc.MatchIgnoreCase(\"functionusage\")) {\n\t\t\t\tsc.SetState(SCE_BAAN_COMMENTDOC);\n\t\t\t\tdo {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} while ((!sc.atLineEnd) && sc.More());\n\t\t\t}\n\t\t\telse if (iswordstart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_BAAN_IDENTIFIER);\n\t\t\t}\n\t\t\telse if (sc.Match('|')) {\n\t\t\t\tsc.SetState(SCE_BAAN_COMMENT);\n\t\t\t}\n\t\t\telse if (sc.ch == '\\\"' && !(lineIgnoreString)) {\n\t\t\t\tsc.SetState(SCE_BAAN_STRING);\n\t\t\t}\n\t\t\telse if (sc.ch == '#' && visibleChars == 0) {\n\t\t\t\t// Preprocessor commands are alone on their line\n\t\t\t\tsc.SetState(SCE_BAAN_PREPROCESSOR);\n\t\t\t\tword[0] = '\\0';\n\t\t\t\twordlen = 0;\n\t\t\t\twhile (sc.More() && !(IsASpace(sc.chNext) || IsAnOperator(sc.chNext))) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\twordlen++;\n\t\t\t\t}\n\t\t\t\tsc.GetCurrentLowered(word, sizeof(word));\n\t\t\t\tif (!sc.atLineEnd) {\n\t\t\t\t\tword[wordlen++] = sc.ch;\n\t\t\t\t\tword[wordlen++] = '\\0';\n\t\t\t\t}\n\t\t\t\tif (!wordInArray(word, preProcessorTags, 13))\n\t\t\t\t\t// Colorise only preprocessor built in Baan.\n\t\t\t\t\tsc.ChangeState(SCE_BAAN_IDENTIFIER);\n\t\t\t\tif (strcmp(word, \"#pragma\") == 0 || strcmp(word, \"#include\") == 0) {\n\t\t\t\t\tlineHasPreProc = true;\n\t\t\t\t\tlineIgnoreString = true;\n\t\t\t\t}\n\t\t\t\telse if (strcmp(word, \"#define\") == 0 || strcmp(word, \"#undef\") == 0 ||\n\t\t\t\t\tstrcmp(word, \"#ifdef\") == 0 || strcmp(word, \"#if\") == 0 || strcmp(word, \"#ifndef\") == 0) {\n\t\t\t\t\tlineHasDefines = true;\n\t\t\t\t\tlineIgnoreString = false;\n\t\t\t\t}\n\t\t\t}\n\t\t\telse if (IsAnOperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_BAAN_OPERATOR);\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd) {\n\t\t\t// Reset states to begining of colourise so no surprises\n\t\t\t// if different sets of lines lexed.\n\t\t\tvisibleChars = 0;\n\t\t\tlineHasDomain = false;\n\t\t\tlineHasFunction = false;\n\t\t\tlineHasPreProc = false;\n\t\t\tlineIgnoreString = false;\n\t\t\tlineHasDefines = false;\n\t\t\tnumberIsHex = false;\n\t\t}\n\t\tif (!IsASpace(sc.ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nvoid SCI_METHOD LexerBaan::Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tif (!options.fold)\n\t\treturn;\n\n\tchar word[100];\n\tint wordlen = 0;\n\tbool foldStart = true;\n\tbool foldNextSelect = true;\n\tbool afterFunctionSection = false;\n\tbool beforeDeclarationSection = false;\n\tint currLineStyle = 0;\n\tint nextLineStyle = 0;\n\n\tstd::string startTags[6] = { \"for\", \"if\", \"on\", \"repeat\", \"select\", \"while\" };\n\tstd::string endTags[6] = { \"endcase\", \"endfor\", \"endif\", \"endselect\", \"endwhile\", \"until\" };\n\tstd::string selectCloseTags[5] = { \"selectdo\", \"selecteos\", \"selectempty\", \"selecterror\", \"endselect\" };\n\n\tLexAccessor styler(pAccess);\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\n\t// Backtrack to previous line in case need to fix its fold status\n\tif (startPos > 0) {\n\t\tif (lineCurrent > 0) {\n\t\t\tlineCurrent--;\n\t\t\tstartPos = styler.LineStart(lineCurrent);\n\t\t}\n\t}\n\n\tint levelPrev = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelPrev = styler.LevelAt(lineCurrent - 1) >> 16;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint style = initStyle;\n\tint styleNext = styler.StyleAt(startPos);\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tint stylePrev = (i) ? styler.StyleAt(i - 1) : SCE_BAAN_DEFAULT;\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\t\t// Comment folding\n\t\tif (options.foldComment && style == SCE_BAAN_COMMENTDOC) {\n\t\t\tif (style != stylePrev) {\n\t\t\t\tlevelCurrent++;\n\t\t\t}\n\t\t\telse if (style != styleNext) {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\tif (options.foldComment && atEOL && IsCommentLine(lineCurrent, styler)) {\n\t\t\tif (!IsCommentLine(lineCurrent - 1, styler)\n\t\t\t\t&& IsCommentLine(lineCurrent + 1, styler))\n\t\t\t\tlevelCurrent++;\n\t\t\telse if (IsCommentLine(lineCurrent - 1, styler)\n\t\t\t\t&& !IsCommentLine(lineCurrent + 1, styler))\n\t\t\t\tlevelCurrent--;\n\t\t}\n\t\t// PreProcessor Folding\n\t\tif (options.foldPreprocessor) {\n\t\t\tif (atEOL && IsPreProcLine(lineCurrent, styler)) {\n\t\t\t\tif (!IsPreProcLine(lineCurrent - 1, styler)\n\t\t\t\t\t&& IsPreProcLine(lineCurrent + 1, styler))\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\telse if (IsPreProcLine(lineCurrent - 1, styler)\n\t\t\t\t\t&& !IsPreProcLine(lineCurrent + 1, styler))\n\t\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\telse if (style == SCE_BAAN_PREPROCESSOR) {\n\t\t\t\t// folds #ifdef/#if/#ifndef - they are not part of the IsPreProcLine folding.\n\t\t\t\tif (ch == '#') {\n\t\t\t\t\tif (styler.Match(i, \"#ifdef\") || styler.Match(i, \"#if\") || styler.Match(i, \"#ifndef\")\n\t\t\t\t\t\t|| styler.Match(i, \"#context_on\"))\n\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\telse if (styler.Match(i, \"#endif\") || styler.Match(i, \"#context_off\"))\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\t//Syntax Folding\n\t\tif (options.baanFoldSyntaxBased && (style == SCE_BAAN_OPERATOR)) {\n\t\t\tif (ch == '{' || ch == '(') {\n\t\t\t\tlevelCurrent++;\n\t\t\t}\n\t\t\telse if (ch == '}' || ch == ')') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\t//Keywords Folding\n\t\tif (options.baanFoldKeywordsBased) {\n\t\t\tif (atEOL && IsDeclarationLine(lineCurrent, styler)) {\n\t\t\t\tif (!IsDeclarationLine(lineCurrent - 1, styler)\n\t\t\t\t\t&& IsDeclarationLine(lineCurrent + 1, styler))\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\telse if (IsDeclarationLine(lineCurrent - 1, styler)\n\t\t\t\t\t&& !IsDeclarationLine(lineCurrent + 1, styler))\n\t\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\telse if (style == SCE_BAAN_WORD) {\n\t\t\t\tword[wordlen++] = static_cast(MakeLowerCase(ch));\n\t\t\t\tif (wordlen == 100) { // prevent overflow\n\t\t\t\t\tword[0] = '\\0';\n\t\t\t\t\twordlen = 1;\n\t\t\t\t}\n\t\t\t\tif (styleNext != SCE_BAAN_WORD) {\n\t\t\t\t\tword[wordlen] = '\\0';\n\t\t\t\t\twordlen = 0;\n\t\t\t\t\tif (strcmp(word, \"for\") == 0) {\n\t\t\t\t\t\tSci_PositionU j = i + 1;\n\t\t\t\t\t\twhile ((j < endPos) && IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\t\t\tj++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tif (styler.Match(j, \"update\")) {\n\t\t\t\t\t\t\t// Means this is a \"for update\" used by Select which is already folded.\n\t\t\t\t\t\t\tfoldStart = false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\telse if (strcmp(word, \"on\") == 0) {\n\t\t\t\t\t\tSci_PositionU j = i + 1;\n\t\t\t\t\t\twhile ((j < endPos) && IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\t\t\tj++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tif (!styler.Match(j, \"case\")) {\n\t\t\t\t\t\t\t// Means this is not a \"on Case\" statement... could be \"on\" used by index.\n\t\t\t\t\t\t\tfoldStart = false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\telse if (strcmp(word, \"select\") == 0) {\n\t\t\t\t\t\tif (foldNextSelect) {\n\t\t\t\t\t\t\t// Next Selects are sub-clause till reach of selectCloseTags[] array.\n\t\t\t\t\t\t\tfoldNextSelect = false;\n\t\t\t\t\t\t\tfoldStart = true;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse {\n\t\t\t\t\t\t\tfoldNextSelect = false;\n\t\t\t\t\t\t\tfoldStart = false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\telse if (wordInArray(word, selectCloseTags, 5)) {\n\t\t\t\t\t\t// select clause ends, next select clause can be folded.\n\t\t\t\t\t\tfoldNextSelect = true;\n\t\t\t\t\t\tfoldStart = true;\n\t\t\t\t\t}\n\t\t\t\t\telse {\n\t\t\t\t\t\tfoldStart = true;\n\t\t\t\t\t}\n\t\t\t\t\tif (foldStart) {\n\t\t\t\t\t\tif (wordInArray(word, startTags, 6)) {\n\t\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse if (wordInArray(word, endTags, 6)) {\n\t\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\t// Fold inner level of if/select/case statements\n\t\tif (options.baanFoldInnerLevel && atEOL) {\n\t\t\tbool currLineInnerLevel = IsInnerLevelFold(lineCurrent, styler);\n\t\t\tbool nextLineInnerLevel = IsInnerLevelFold(lineCurrent + 1, styler);\n\t\t\tif (currLineInnerLevel && currLineInnerLevel != nextLineInnerLevel) {\n\t\t\t\tlevelCurrent++;\n\t\t\t}\n\t\t\telse if (nextLineInnerLevel && nextLineInnerLevel != currLineInnerLevel) {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\t// Section Foldings.\n\t\t// One way of implementing Section Foldings, as there is no END markings of sections.\n\t\t// first section ends on the previous line of next section.\n\t\t// Re-written whole folding to accomodate this.\n\t\tif (options.baanFoldSections && atEOL) {\n\t\t\tcurrLineStyle = mainOrSubSectionLine(lineCurrent, styler);\n\t\t\tnextLineStyle = mainOrSubSectionLine(lineCurrent + 1, styler);\n\t\t\tif (currLineStyle != 0 && currLineStyle != nextLineStyle) {\n\t\t\t\tif (levelCurrent < levelPrev)\n\t\t\t\t\t--levelPrev;\n\t\t\t\tfor (Sci_Position j = styler.LineStart(lineCurrent); j < styler.LineStart(lineCurrent + 1) - 1; j++) {\n\t\t\t\t\tif (IsASpaceOrTab(styler[j]))\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\telse if (styler.StyleAt(j) == SCE_BAAN_WORD5) {\n\t\t\t\t\t\tif (styler.Match(j, \"functions:\")) {\n\t\t\t\t\t\t\t// Means functions: is the end of MainSections.\n\t\t\t\t\t\t\t// Nothing to fold after this.\n\t\t\t\t\t\t\tafterFunctionSection = true;\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse {\n\t\t\t\t\t\t\tafterFunctionSection = false;\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\telse {\n\t\t\t\t\t\tafterFunctionSection = false;\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tif (!afterFunctionSection)\n\t\t\t\t\tlevelCurrent++;\n\t\t\t}\n\t\t\telse if (nextLineStyle != 0 && currLineStyle != nextLineStyle\n\t\t\t\t&& (priorSectionIsSubSection(lineCurrent -1 ,styler)\n\t\t\t\t\t|| !nextSectionIsSubSection(lineCurrent + 1, styler))) {\n\t\t\t\tfor (Sci_Position j = styler.LineStart(lineCurrent + 1); j < styler.LineStart(lineCurrent + 1 + 1) - 1; j++) {\n\t\t\t\t\tif (IsASpaceOrTab(styler[j]))\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\telse if (styler.StyleAt(j) == SCE_BAAN_WORD5) {\n\t\t\t\t\t\tif (styler.Match(j, \"declaration:\")) {\n\t\t\t\t\t\t\t// Means declaration: is the start of MainSections.\n\t\t\t\t\t\t\t// Nothing to fold before this.\n\t\t\t\t\t\t\tbeforeDeclarationSection = true;\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse {\n\t\t\t\t\t\t\tbeforeDeclarationSection = false;\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\telse {\n\t\t\t\t\t\tbeforeDeclarationSection = false;\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tif (!beforeDeclarationSection) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\tif (nextLineStyle == SCE_BAAN_WORD5 && priorSectionIsSubSection(lineCurrent-1, styler))\n\t\t\t\t\t\t// next levelCurrent--; is to unfold previous subsection fold.\n\t\t\t\t\t\t// On reaching the next main section, the previous main as well sub section ends.\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tlev |= levelCurrent << 16;\n\t\t\tif (visibleChars == 0 && options.foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nextern const LexerModule lmBaan(SCLEX_BAAN, LexerBaan::LexerFactoryBaan, \"baan\", baanWordLists);\n" }, { "path": "lexers/LexBash.cxx", "content": "// Scintilla source code edit control\n/** @file LexBash.cxx\n ** Lexer for Bash.\n **/\n// Copyright 2004-2012 by Neil Hodgson \n// Adapted from LexPerl by Kein-Hong Man 2004\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"StringCopy.h\"\n#include \"InList.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"SubStyles.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\n#define HERE_DELIM_MAX\t\t\t256\n\n// define this if you want 'invalid octals' to be marked as errors\n// usually, this is not a good idea, permissive lexing is better\n#undef PEDANTIC_OCTAL\n\n#define BASH_BASE_ERROR\t\t\t65\n#define BASH_BASE_DECIMAL\t\t66\n#define BASH_BASE_HEX\t\t\t67\n#ifdef PEDANTIC_OCTAL\n#define BASH_BASE_OCTAL\t\t\t68\n#define\tBASH_BASE_OCTAL_ERROR\t69\n#endif\n\n// state constants for parts of a bash command segment\nenum class CmdState {\n\tBody,\n\tStart,\n\tWord,\n\tTest,\t\t\t// test\n\tSingleBracket,\t// []\n\tDoubleBracket,\t// [[]]\n\tArithmetic,\n\tDelimiter,\n};\n\nenum class CommandSubstitution : int {\n\tBacktick,\n\tInside,\n\tInsideTrack,\n};\n\n// state constants for nested delimiter pairs, used by\n// SCE_SH_STRING, SCE_SH_PARAM and SCE_SH_BACKTICKS processing\nenum class QuoteStyle {\n\tLiteral,\t\t// ''\n\tCString,\t\t// $''\n\tString,\t\t\t// \"\"\n\tLString,\t\t// $\"\"\n\tHereDoc,\t\t// here document\n\tBacktick,\t\t// ``\n\tParameter,\t\t// ${}\n\tCommand,\t\t// $()\n\tCommandInside,\t// $() with styling inside\n\tArithmetic,\t\t// $(()), $[]\n};\n\n#define BASH_QUOTE_STACK_MAX\t7\n#define BASH_SPECIAL_PARAMETER\t\"*@#?-$!\"\n\nconstexpr int commandSubstitutionFlag = 0x40;\nconstexpr int MaskCommand(int state) noexcept {\n\treturn state & ~commandSubstitutionFlag;\n}\n\nconstexpr int translateBashDigit(int ch) noexcept {\n\tif (ch >= '0' && ch <= '9') {\n\t\treturn ch - '0';\n\t} else if (ch >= 'a' && ch <= 'z') {\n\t\treturn ch - 'a' + 10;\n\t} else if (ch >= 'A' && ch <= 'Z') {\n\t\treturn ch - 'A' + 36;\n\t} else if (ch == '@') {\n\t\treturn 62;\n\t} else if (ch == '_') {\n\t\treturn 63;\n\t}\n\treturn BASH_BASE_ERROR;\n}\n\nint getBashNumberBase(const char *s) noexcept {\n\tint i = 0;\n\tint base = 0;\n\twhile (*s) {\n\t\tbase = base * 10 + (*s++ - '0');\n\t\ti++;\n\t}\n\tif (base > 64 || i > 2) {\n\t\treturn BASH_BASE_ERROR;\n\t}\n\treturn base;\n}\n\nconstexpr int opposite(int ch) noexcept {\n\tif (ch == '(') return ')';\n\tif (ch == '[') return ']';\n\tif (ch == '{') return '}';\n\tif (ch == '<') return '>';\n\treturn ch;\n}\n\nint GlobScan(StyleContext &sc) {\n\t// forward scan for zsh globs, disambiguate versus bash arrays\n\t// complex expressions may still fail, e.g. unbalanced () '' \"\" etc\n\tint c = 0;\n\tint sLen = 0;\n\tint pCount = 0;\n\tint hash = 0;\n\twhile ((c = sc.GetRelativeCharacter(++sLen)) != 0) {\n\t\tif (IsASpace(c)) {\n\t\t\treturn 0;\n\t\t} else if (c == '\\'' || c == '\\\"') {\n\t\t\tif (hash != 2) return 0;\n\t\t} else if (c == '#' && hash == 0) {\n\t\t\thash = (sLen == 1) ? 2:1;\n\t\t} else if (c == '(') {\n\t\t\tpCount++;\n\t\t} else if (c == ')') {\n\t\t\tif (pCount == 0) {\n\t\t\t\tif (hash) return sLen;\n\t\t\t\treturn 0;\n\t\t\t}\n\t\t\tpCount--;\n\t\t}\n\t}\n\treturn 0;\n}\n\nbool IsCommentLine(Sci_Position line, LexAccessor &styler) {\n\tconst Sci_Position pos = styler.LineStart(line);\n\tconst Sci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tconst char ch = styler[i];\n\t\tif (ch == '#')\n\t\t\treturn true;\n\t\tif (ch != ' ' && ch != '\\t')\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nconstexpr bool StyleForceBacktrack(int state) noexcept {\n\treturn AnyOf(state, SCE_SH_CHARACTER, SCE_SH_STRING, SCE_SH_BACKTICKS, SCE_SH_HERE_Q, SCE_SH_PARAM);\n}\n\nstruct OptionsBash {\n\tbool fold = false;\n\tbool foldComment = false;\n\tbool foldCompact = true;\n\tbool stylingInsideString = false;\n\tbool stylingInsideBackticks = false;\n\tbool stylingInsideParameter = false;\n\tbool stylingInsideHeredoc = false;\n\tbool nestedBackticks = true;\n\tCommandSubstitution commandSubstitution = CommandSubstitution::Backtick;\n\tstd::string specialParameter = BASH_SPECIAL_PARAMETER;\n\n\t[[nodiscard]] bool stylingInside(int state) const noexcept {\n\t\tswitch (state) {\n\t\tcase SCE_SH_STRING:\n\t\t\treturn stylingInsideString;\n\t\tcase SCE_SH_BACKTICKS:\n\t\t\treturn stylingInsideBackticks;\n\t\tcase SCE_SH_PARAM:\n\t\t\treturn stylingInsideParameter;\n\t\tcase SCE_SH_HERE_Q:\n\t\t\treturn stylingInsideHeredoc;\n\t\tdefault:\n\t\t\treturn false;\n\t\t}\n\t}\n};\n\nconst char * const bashWordListDesc[] = {\n\t\"Keywords\",\n\tnullptr\n};\n\nstruct OptionSetBash : public OptionSet {\n\tOptionSetBash() {\n\t\tDefineProperty(\"fold\", &OptionsBash::fold);\n\n\t\tDefineProperty(\"fold.comment\", &OptionsBash::foldComment);\n\n\t\tDefineProperty(\"fold.compact\", &OptionsBash::foldCompact);\n\n\t\tDefineProperty(\"lexer.bash.styling.inside.string\", &OptionsBash::stylingInsideString,\n\t\t\t\"Set this property to 1 to highlight shell expansions inside string.\");\n\n\t\tDefineProperty(\"lexer.bash.styling.inside.backticks\", &OptionsBash::stylingInsideBackticks,\n\t\t\t\"Set this property to 1 to highlight shell expansions inside backticks.\");\n\n\t\tDefineProperty(\"lexer.bash.styling.inside.parameter\", &OptionsBash::stylingInsideParameter,\n\t\t\t\"Set this property to 1 to highlight shell expansions inside ${} parameter expansion.\");\n\n\t\tDefineProperty(\"lexer.bash.styling.inside.heredoc\", &OptionsBash::stylingInsideHeredoc,\n\t\t\t\"Set this property to 1 to highlight shell expansions inside here document.\");\n\n\t\tDefineProperty(\"lexer.bash.command.substitution\", &OptionsBash::commandSubstitution,\n\t\t\t\"Set how to highlight $() command substitution. \"\n\t\t\t\"0 (the default) highlighted as backticks. \"\n\t\t\t\"1 highlighted inside. \"\n\t\t\t\"2 highlighted inside with extra scope tracking.\");\n\n\t\tDefineProperty(\"lexer.bash.nested.backticks\", &OptionsBash::nestedBackticks,\n\t\t\t\"Set this property to 0 to disable nested backquoted command substitution.\");\n\n\t\tDefineProperty(\"lexer.bash.special.parameter\", &OptionsBash::specialParameter,\n\t\t\t\"Set shell (default is Bash) special parameters.\");\n\n\t\tDefineWordListSets(bashWordListDesc);\n\t}\n};\n\nclass QuoteCls {\t// Class to manage quote pairs (simplified vs LexPerl)\npublic:\n\tint Count = 0;\n\tint Up = '\\0';\n\tint Down = '\\0';\n\tQuoteStyle Style = QuoteStyle::Literal;\n\tint Outer = SCE_SH_DEFAULT;\n\tCmdState State = CmdState::Body;\n\tvoid Clear() noexcept {\n\t\tCount = 0;\n\t\tUp\t = '\\0';\n\t\tDown = '\\0';\n\t\tStyle = QuoteStyle::Literal;\n\t\tOuter = SCE_SH_DEFAULT;\n\t\tState = CmdState::Body;\n\t}\n\tvoid Start(int u, QuoteStyle s, int outer, CmdState state) noexcept {\n\t\tCount = 1;\n\t\tUp = u;\n\t\tDown = opposite(Up);\n\t\tStyle = s;\n\t\tOuter = outer;\n\t\tState = state;\n\t}\n};\n\nclass QuoteStackCls {\t// Class to manage quote pairs that nest\npublic:\n\tint Depth = 0;\n\tint State = SCE_SH_DEFAULT;\n\tbool lineContinuation = false;\n\tbool nestedBackticks = false;\n\tCommandSubstitution commandSubstitution = CommandSubstitution::Backtick;\n\tint insideCommand = 0;\n\tunsigned backtickLevel = 0;\n\tQuoteCls Current;\n\tQuoteCls Stack[BASH_QUOTE_STACK_MAX];\n\tconst CharacterSet &setParamStart;\n\tQuoteStackCls(const CharacterSet &setParamStart_) noexcept : setParamStart{setParamStart_} {}\n\t[[nodiscard]] bool Empty() const noexcept {\n\t\treturn Current.Up == '\\0';\n\t}\n\tvoid Start(int u, QuoteStyle s, int outer, CmdState state) noexcept {\n\t\tif (Empty()) {\n\t\t\tCurrent.Start(u, s, outer, state);\n\t\t\tif (s == QuoteStyle::Backtick) {\n\t\t\t\t++backtickLevel;\n\t\t\t}\n\t\t} else {\n\t\t\tPush(u, s, outer, state);\n\t\t}\n\t}\n\tvoid Push(int u, QuoteStyle s, int outer, CmdState state) noexcept {\n\t\tif (Depth >= BASH_QUOTE_STACK_MAX) {\n\t\t\treturn;\n\t\t}\n\t\tStack[Depth] = Current;\n\t\tDepth++;\n\t\tCurrent.Start(u, s, outer, state);\n\t\tif (s == QuoteStyle::Backtick) {\n\t\t\t++backtickLevel;\n\t\t}\n\t}\n\tvoid Pop() noexcept {\n\t\tif (Depth == 0) {\n\t\t\tClear();\n\t\t\treturn;\n\t\t}\n\t\tif (backtickLevel != 0 && Current.Style == QuoteStyle::Backtick) {\n\t\t\t--backtickLevel;\n\t\t}\n\t\tif (insideCommand != 0 && Current.Style == QuoteStyle::CommandInside) {\n\t\t\tinsideCommand = 0;\n\t\t\tfor (int i = 0; i < Depth; i++) {\n\t\t\t\tif (Stack[i].Style == QuoteStyle::CommandInside) {\n\t\t\t\t\tinsideCommand = commandSubstitutionFlag;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tDepth--;\n\t\tCurrent = Stack[Depth];\n\t}\n\tvoid Clear() noexcept {\n\t\tDepth = 0;\n\t\tState = SCE_SH_DEFAULT;\n\t\tinsideCommand = 0;\n\t\tbacktickLevel = 0;\n\t\tCurrent.Clear();\n\t}\n\tbool CountDown(StyleContext &sc, CmdState &cmdState) {\n\t\tCurrent.Count--;\n\t\twhile (Current.Count > 0 && sc.chNext == Current.Down) {\n\t\t\tCurrent.Count--;\n\t\t\tsc.Forward();\n\t\t}\n\t\tif (Current.Count == 0) {\n\t\t\tcmdState = Current.State;\n\t\t\tconst int outer = Current.Outer;\n\t\t\tPop();\n\t\t\tsc.ForwardSetState(outer | insideCommand);\n\t\t\treturn true;\n\t\t}\n\t\treturn false;\n\t}\n\tvoid Expand(StyleContext &sc, CmdState &cmdState, bool stylingInside) {\n\t\tconst CmdState current = cmdState;\n\t\tconst int state = sc.state;\n\t\tQuoteStyle style = QuoteStyle::Literal;\n\t\tState = state;\n\t\tsc.SetState(SCE_SH_SCALAR);\n\t\tsc.Forward();\n\t\tif (sc.ch == '{') {\n\t\t\tstyle = QuoteStyle::Parameter;\n\t\t\tsc.ChangeState(SCE_SH_PARAM);\n\t\t} else if (sc.ch == '\\'') {\n\t\t\tstyle = QuoteStyle::CString;\n\t\t\tsc.ChangeState(SCE_SH_STRING);\n\t\t} else if (sc.ch == '\"') {\n\t\t\tstyle = QuoteStyle::LString;\n\t\t\tsc.ChangeState(SCE_SH_STRING);\n\t\t} else if (sc.ch == '(' || sc.ch == '[') {\n\t\t\tif (sc.ch == '[' || sc.chNext == '(') {\n\t\t\t\tstyle = QuoteStyle::Arithmetic;\n\t\t\t\tcmdState = CmdState::Arithmetic;\n\t\t\t\tsc.ChangeState(SCE_SH_OPERATOR);\n\t\t\t} else {\n\t\t\t\tif (stylingInside && commandSubstitution >= CommandSubstitution::Inside) {\n\t\t\t\t\tstyle = QuoteStyle::CommandInside;\n\t\t\t\t\tcmdState = CmdState::Delimiter;\n\t\t\t\t\tsc.ChangeState(SCE_SH_OPERATOR);\n\t\t\t\t\tif (commandSubstitution == CommandSubstitution::InsideTrack) {\n\t\t\t\t\t\tinsideCommand = commandSubstitutionFlag;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tstyle = QuoteStyle::Command;\n\t\t\t\t\tsc.ChangeState(SCE_SH_BACKTICKS);\n\t\t\t\t}\n\t\t\t}\n\t\t} else {\n\t\t\t// scalar has no delimiter pair\n\t\t\tif (!setParamStart.Contains(sc.ch)) {\n\t\t\t\tstylingInside = false; // not scalar\n\t\t\t}\n\t\t}\n\t\tif (!stylingInside) {\n\t\t\tsc.ChangeState(state);\n\t\t} else {\n\t\t\tsc.ChangeState(sc.state | insideCommand);\n\t\t}\n\t\tif (style != QuoteStyle::Literal) {\n\t\t\tStart(sc.ch, style, state, current);\n\t\t\tsc.Forward();\n\t\t}\n\t}\n\tvoid Escape(StyleContext &sc) {\n\t\tunsigned count = 1;\n\t\twhile (sc.chNext == '\\\\') {\n\t\t\t++count;\n\t\t\tsc.Forward();\n\t\t}\n\t\tbool escaped = count & 1U; // odd backslash escape next character\n\t\tif (escaped && (sc.chNext == '\\r' || sc.chNext == '\\n')) {\n\t\t\tlineContinuation = true;\n\t\t\tif (sc.state == SCE_SH_IDENTIFIER) {\n\t\t\t\tsc.SetState(SCE_SH_OPERATOR | insideCommand);\n\t\t\t}\n\t\t\treturn;\n\t\t}\n\t\tif (backtickLevel > 0 && nestedBackticks) {\n\t\t\t/*\n\t\t\tfor $k$ level substitution with $N$ backslashes:\n\t\t\t* when $N/2^k$ is odd, following dollar is escaped.\n\t\t\t* when $(N - 1)/2^k$ is even, following quote is escaped.\n\t\t\t* when $N = n\\times 2^{k + 1} - 1$, following backtick is escaped.\n\t\t\t* when $N = n\\times 2^{k + 1} + 2^k - 1$, following backtick starts inner substitution.\n\t\t\t* when $N = m\\times 2^k + 2^{k - 1} - 1$ and $k > 1$, following backtick ends current substitution.\n\t\t\t*/\n\t\t\tif (sc.chNext == '$') {\n\t\t\t\tescaped = (count >> backtickLevel) & 1U;\n\t\t\t} else if (sc.chNext == '\\\"' || sc.chNext == '\\'') {\n\t\t\t\tescaped = (((count - 1) >> backtickLevel) & 1U) == 0;\n\t\t\t} else if (sc.chNext == '`' && escaped) {\n\t\t\t\tunsigned mask = 1U << (backtickLevel + 1);\n\t\t\t\tcount += 1;\n\t\t\t\tescaped = (count & (mask - 1)) == 0;\n\t\t\t\tif (!escaped) {\n\t\t\t\t\tunsigned remain = count - (mask >> 1U);\n\t\t\t\t\tif (static_cast(remain) >= 0 && (remain & (mask - 1)) == 0) {\n\t\t\t\t\t\tescaped = true;\n\t\t\t\t\t\t++backtickLevel;\n\t\t\t\t\t} else if (backtickLevel > 1) {\n\t\t\t\t\t\tmask >>= 1U;\n\t\t\t\t\t\tremain = count - (mask >> 1U);\n\t\t\t\t\t\tif (static_cast(remain) >= 0 && (remain & (mask - 1)) == 0) {\n\t\t\t\t\t\t\tescaped = true;\n\t\t\t\t\t\t\t--backtickLevel;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (escaped) {\n\t\t\tsc.Forward();\n\t\t}\n\t}\n};\n\nconst char styleSubable[] = { SCE_SH_IDENTIFIER, SCE_SH_SCALAR, 0 };\n\nconst LexicalClass lexicalClasses[] = {\n\t// Lexer Bash SCLEX_BASH SCE_SH_:\n\t0, \"SCE_SH_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_SH_ERROR\", \"error\", \"Error\",\n\t2, \"SCE_SH_COMMENTLINE\", \"comment line\", \"Line comment: #\",\n\t3, \"SCE_SH_NUMBER\", \"literal numeric\", \"Number\",\n\t4, \"SCE_SH_WORD\", \"keyword\", \"Keyword\",\n\t5, \"SCE_SH_STRING\", \"literal string\", \"String\",\n\t6, \"SCE_SH_CHARACTER\", \"literal string\", \"Single quoted string\",\n\t7, \"SCE_SH_OPERATOR\", \"operator\", \"Operators\",\n\t8, \"SCE_SH_IDENTIFIER\", \"identifier\", \"Identifiers\",\n\t9, \"SCE_SH_SCALAR\", \"identifier\", \"Scalar variable\",\n\t10, \"SCE_SH_PARAM\", \"identifier\", \"Parameter\",\n\t11, \"SCE_SH_BACKTICKS\", \"literal string\", \"Backtick quoted command\",\n\t12, \"SCE_SH_HERE_DELIM\", \"operator\", \"Heredoc delimiter\",\n\t13, \"SCE_SH_HERE_Q\", \"here-doc literal string\", \"Heredoc quoted string\",\n};\n\n}\n\nclass LexerBash final : public DefaultLexer {\n\tWordList keywords;\n\tWordList cmdDelimiter;\n\tWordList bashStruct;\n\tWordList bashStruct_in;\n\tWordList testOperator;\n\tOptionsBash options;\n\tOptionSetBash osBash;\n\tCharacterSet setParamStart;\n\tenum { ssIdentifier, ssScalar };\n\tSubStyles subStyles{styleSubable};\npublic:\n\tLexerBash() :\n\t\tDefaultLexer(\"bash\", SCLEX_BASH, lexicalClasses, std::size(lexicalClasses)),\n\t\tsetParamStart(CharacterSet::setAlphaNum, \"_\" BASH_SPECIAL_PARAMETER) {\n\t\tcmdDelimiter.Set(\"| || |& & && ; ;; ( ) { }\");\n\t\tbashStruct.Set(\"if elif fi while until else then do done esac eval\");\n\t\tbashStruct_in.Set(\"for case select\");\n\t\ttestOperator.Set(\"eq ge gt le lt ne ef nt ot\");\n\t\tSetOptionSet(&osBash);\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos_, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tint SCI_METHOD AllocateSubStyles(int styleBase, int numberStyles) override {\n\t\treturn subStyles.Allocate(styleBase, numberStyles);\n\t}\n\tint SCI_METHOD SubStylesStart(int styleBase) override {\n\t\treturn subStyles.Start(styleBase);\n\t}\n\tint SCI_METHOD SubStylesLength(int styleBase) override {\n\t\treturn subStyles.Length(styleBase);\n\t}\n\tint SCI_METHOD StyleFromSubStyle(int subStyle) override {\n\t\tconst int styleBase = subStyles.BaseStyle(subStyle);\n\t\treturn styleBase;\n\t}\n\tint SCI_METHOD PrimaryStyleFromStyle(int style) override {\n\t\treturn style;\n\t}\n\tvoid SCI_METHOD FreeSubStyles() override {\n\t\tsubStyles.Free();\n\t}\n\tvoid SCI_METHOD SetIdentifiers(int style, const char *identifiers) override {\n\t\tsubStyles.SetIdentifiers(style, identifiers);\n\t}\n\tint SCI_METHOD DistanceToSecondaryStyles() override {\n\t\treturn 0;\n\t}\n\tconst char *SCI_METHOD GetSubStyleBases() override {\n\t\treturn styleSubable;\n\t}\n\n\tbool IsTestOperator(const char *s, const CharacterSet &setSingleCharOp) const noexcept {\n\t\treturn (s[2] == '\\0' && setSingleCharOp.Contains(s[1]))\n\t\t\t|| testOperator.InList(s + 1);\n\t}\n\n\tstatic ILexer5 *LexerFactoryBash() {\n\t\treturn new LexerBash();\n\t}\n};\n\nSci_Position SCI_METHOD LexerBash::PropertySet(const char *key, const char *val) {\n\tif (osBash.PropertySet(&options, key, val)) {\n\t\tif (strcmp(key, \"lexer.bash.special.parameter\") == 0) {\n\t\t\tsetParamStart = CharacterSet(CharacterSet::setAlphaNum, \"_\");\n\t\t\tsetParamStart.AddString(options.specialParameter.empty() ? BASH_SPECIAL_PARAMETER : options.specialParameter.c_str());\n\t\t}\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerBash::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl)) {\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerBash::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tconst CharacterSet setWordStart(CharacterSet::setAlpha, \"_\");\n\t// note that [+-] are often parts of identifiers in shell scripts\n\tconst CharacterSet setWord(CharacterSet::setAlphaNum, \"._+-\");\n\tCharacterSet setMetaCharacter(CharacterSet::setNone, \"|&;()<> \\t\\r\\n\");\n\tsetMetaCharacter.Add(0);\n\tconst CharacterSet setBashOperator(CharacterSet::setNone, \"^&%()-+=|{}[]:;>,*/(ch);\n\t\t\tDelimiter[DelimiterLength] = '\\0';\n\t\t}\n\t};\n\tHereDocCls HereDoc;\n\n\tQuoteStackCls QuoteStack(setParamStart);\n\tQuoteStack.nestedBackticks = options.nestedBackticks;\n\tQuoteStack.commandSubstitution = options.commandSubstitution;\n\n\tconst WordClassifier &classifierIdentifiers = subStyles.Classifier(SCE_SH_IDENTIFIER);\n\tconst WordClassifier &classifierScalars = subStyles.Classifier(SCE_SH_SCALAR);\n\n\tint numBase = 0;\n\tint digit = 0;\n\tconst Sci_PositionU endPos = startPos + length;\n\tCmdState cmdState = CmdState::Start;\n\tLexAccessor styler(pAccess);\n\n\t// Always backtracks to the start of a line that is not a continuation\n\t// of the previous line (i.e. start of a bash command segment)\n\tSci_Position ln = styler.GetLine(startPos);\n\tif (ln > 0 && startPos == static_cast(styler.LineStart(ln)))\n\t\tln--;\n\tfor (;;) {\n\t\tstartPos = styler.LineStart(ln);\n\t\tif (ln == 0 || styler.GetLineState(ln) == static_cast(CmdState::Start))\n\t\t\tbreak;\n\t\tln--;\n\t}\n\tinitStyle = SCE_SH_DEFAULT;\n\n\tStyleContext sc(startPos, endPos - startPos, initStyle, styler);\n\n\twhile (sc.More()) {\n\n\t\t// handle line continuation, updates per-line stored state\n\t\tif (sc.atLineStart) {\n\t\t\tCmdState state = CmdState::Body;\t// force backtrack while retaining cmdState\n\t\t\tif (!StyleForceBacktrack(MaskCommand(sc.state))) {\n\t\t\t\t// retain last line's state\n\t\t\t\t// arithmetic expression and double bracket test can span multiline without line continuation\n\t\t\t\tif (!QuoteStack.lineContinuation && !AnyOf(cmdState, CmdState::DoubleBracket, CmdState::Arithmetic)) {\n\t\t\t\t\tcmdState = CmdState::Start;\n\t\t\t\t}\n\t\t\t\tif (QuoteStack.Empty()) {\t// force backtrack when nesting\n\t\t\t\t\tstate = cmdState;\n\t\t\t\t}\n\t\t\t}\n\t\t\tQuoteStack.lineContinuation = false;\n\t\t\tstyler.SetLineState(sc.currentLine, static_cast(state));\n\t\t}\n\n\t\t// controls change of cmdState at the end of a non-whitespace element\n\t\t// states Body|Test|Arithmetic persist until the end of a command segment\n\t\t// state Word persist, but ends with 'in' or 'do' construct keywords\n\t\tCmdState cmdStateNew = CmdState::Body;\n\t\tif (cmdState >= CmdState::Word && cmdState <= CmdState::Arithmetic)\n\t\t\tcmdStateNew = cmdState;\n\t\tconst int stylePrev = MaskCommand(sc.state);\n\t\tconst int insideCommand = QuoteStack.insideCommand;\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (MaskCommand(sc.state)) {\n\t\t\tcase SCE_SH_OPERATOR:\n\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\tif (cmdState == CmdState::Delimiter)\t\t// if command delimiter, start new command\n\t\t\t\t\tcmdStateNew = CmdState::Start;\n\t\t\t\telse if (sc.chPrev == '\\\\')\t\t\t// propagate command state if line continued\n\t\t\t\t\tcmdStateNew = cmdState;\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_WORD:\n\t\t\t\t// \".\" never used in Bash variable names but used in file names\n\t\t\t\tif (!setWord.Contains(sc.ch) || sc.Match('+', '=') || sc.Match('.', '.')) {\n\t\t\t\t\tchar s[500];\n\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\tint identifierStyle = SCE_SH_IDENTIFIER | insideCommand;\n\t\t\t\t\tconst int subStyle = classifierIdentifiers.ValueFor(s);\n\t\t\t\t\tif (subStyle >= 0) {\n\t\t\t\t\t\tidentifierStyle = subStyle | insideCommand;\n\t\t\t\t\t}\n\t\t\t\t\t// allow keywords ending in a whitespace, meta character or command delimiter\n\t\t\t\t\tchar s2[10]{};\n\t\t\t\t\ts2[0] = static_cast(sc.ch);\n\t\t\t\t\ts2[1] = '\\0';\n\t\t\t\t\tconst bool keywordEnds = IsASpace(sc.ch) || setMetaCharacter.Contains(sc.ch) || cmdDelimiter.InList(s2);\n\t\t\t\t\t// 'in' or 'do' may be construct keywords\n\t\t\t\t\tif (cmdState == CmdState::Word) {\n\t\t\t\t\t\tif (strcmp(s, \"in\") == 0 && keywordEnds)\n\t\t\t\t\t\t\tcmdStateNew = CmdState::Body;\n\t\t\t\t\t\telse if (strcmp(s, \"do\") == 0 && keywordEnds)\n\t\t\t\t\t\t\tcmdStateNew = CmdState::Start;\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tsc.ChangeState(identifierStyle);\n\t\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t\t// a 'test' keyword starts a test expression\n\t\t\t\t\tif (strcmp(s, \"test\") == 0) {\n\t\t\t\t\t\tif (cmdState == CmdState::Start && keywordEnds) {\n\t\t\t\t\t\t\tcmdStateNew = CmdState::Test;\n\t\t\t\t\t\t} else\n\t\t\t\t\t\t\tsc.ChangeState(identifierStyle);\n\t\t\t\t\t}\n\t\t\t\t\t// detect bash construct keywords\n\t\t\t\t\telse if (bashStruct.InList(s)) {\n\t\t\t\t\t\tif (cmdState == CmdState::Start && keywordEnds)\n\t\t\t\t\t\t\tcmdStateNew = CmdState::Start;\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tsc.ChangeState(identifierStyle);\n\t\t\t\t\t}\n\t\t\t\t\t// 'for'|'case'|'select' needs 'in'|'do' to be highlighted later\n\t\t\t\t\telse if (bashStruct_in.InList(s)) {\n\t\t\t\t\t\tif (cmdState == CmdState::Start && keywordEnds)\n\t\t\t\t\t\t\tcmdStateNew = CmdState::Word;\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tsc.ChangeState(identifierStyle);\n\t\t\t\t\t}\n\t\t\t\t\t// disambiguate option items and file test operators\n\t\t\t\t\telse if (s[0] == '-') {\n\t\t\t\t\t\tif (!AnyOf(cmdState, CmdState::Test, CmdState::SingleBracket, CmdState::DoubleBracket)\n\t\t\t\t\t\t\t || !keywordEnds || !IsTestOperator(s, setSingleCharOp))\n\t\t\t\t\t\t\tsc.ChangeState(identifierStyle);\n\t\t\t\t\t}\n\t\t\t\t\t// disambiguate keywords and identifiers\n\t\t\t\t\telse if (cmdState != CmdState::Start\n\t\t\t\t\t\t || !(keywords.InList(s) && keywordEnds)) {\n\t\t\t\t\t\tsc.ChangeState(identifierStyle);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_IDENTIFIER:\n\t\t\t\tif (!setWord.Contains(sc.ch) ||\n\t\t\t\t\t (cmdState == CmdState::Arithmetic && !setWordStart.Contains(sc.ch))) {\n\t\t\t\t\tchar s[500];\n\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\tconst int subStyle = classifierIdentifiers.ValueFor(s);\n\t\t\t\t\tif (subStyle >= 0) {\n\t\t\t\t\t\tsc.ChangeState(subStyle | insideCommand);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_NUMBER:\n\t\t\t\tdigit = translateBashDigit(sc.ch);\n\t\t\t\tif (numBase == BASH_BASE_DECIMAL) {\n\t\t\t\t\tif (sc.ch == '#') {\n\t\t\t\t\t\tchar s[10];\n\t\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\t\tnumBase = getBashNumberBase(s);\n\t\t\t\t\t\tif (numBase != BASH_BASE_ERROR)\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t} else if (IsADigit(sc.ch))\n\t\t\t\t\t\tbreak;\n\t\t\t\t} else if (numBase == BASH_BASE_HEX) {\n\t\t\t\t\tif (IsADigit(sc.ch, 16))\n\t\t\t\t\t\tbreak;\n#ifdef PEDANTIC_OCTAL\n\t\t\t\t} else if (numBase == BASH_BASE_OCTAL ||\n\t\t\t\t\t\t numBase == BASH_BASE_OCTAL_ERROR) {\n\t\t\t\t\tif (digit <= 7)\n\t\t\t\t\t\tbreak;\n\t\t\t\t\tif (digit <= 9) {\n\t\t\t\t\t\tnumBase = BASH_BASE_OCTAL_ERROR;\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n#endif\n\t\t\t\t} else if (numBase == BASH_BASE_ERROR) {\n\t\t\t\t\tif (digit <= 9)\n\t\t\t\t\t\tbreak;\n\t\t\t\t} else {\t// DD#DDDD number style handling\n\t\t\t\t\tif (digit != BASH_BASE_ERROR) {\n\t\t\t\t\t\tif (numBase <= 36) {\n\t\t\t\t\t\t\t// case-insensitive if base<=36\n\t\t\t\t\t\t\tif (digit >= 36) digit -= 26;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tif (digit < numBase)\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\tif (digit <= 9) {\n\t\t\t\t\t\t\tnumBase = BASH_BASE_ERROR;\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// fallthrough when number is at an end or error\n\t\t\t\tif (numBase == BASH_BASE_ERROR\n#ifdef PEDANTIC_OCTAL\n\t\t\t\t\t|| numBase == BASH_BASE_OCTAL_ERROR\n#endif\n\t\t\t\t) {\n\t\t\t\t\tsc.ChangeState(SCE_SH_ERROR | insideCommand);\n\t\t\t\t} else if (digit < 62 || digit == 63 || (cmdState != CmdState::Arithmetic &&\n\t\t\t\t\t(sc.ch == '-' || (sc.ch == '.' && sc.chNext != '.')))) {\n\t\t\t\t\t// current character is alpha numeric, underscore, hyphen or dot\n\t\t\t\t\tsc.ChangeState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_COMMENTLINE:\n\t\t\t\tif (sc.MatchLineEnd()) {\n\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_HERE_DELIM:\n\t\t\t\t// From Bash info:\n\t\t\t\t// ---------------\n\t\t\t\t// Specifier format is: <<[-]WORD\n\t\t\t\t// Optional '-' is for removal of leading tabs from here-doc.\n\t\t\t\t// Whitespace acceptable after <<[-] operator\n\t\t\t\t//\n\t\t\t\tif (HereDoc.State == 0) { // '<<' encountered\n\t\t\t\t\tHereDoc.Quote = sc.chNext;\n\t\t\t\t\tHereDoc.Quoted = false;\n\t\t\t\t\tHereDoc.Escaped = false;\n\t\t\t\t\tHereDoc.BackslashCount = 0;\n\t\t\t\t\tHereDoc.DelimiterLength = 0;\n\t\t\t\t\tHereDoc.Delimiter[HereDoc.DelimiterLength] = '\\0';\n\t\t\t\t\tif (sc.chNext == '\\'' || sc.chNext == '\\\"') {\t// a quoted here-doc delimiter (' or \")\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\tHereDoc.Quoted = true;\n\t\t\t\t\t\tHereDoc.State = 1;\n\t\t\t\t\t} else if (setHereDoc.Contains(sc.chNext) ||\n\t\t\t\t\t (sc.chNext == '=' && cmdState != CmdState::Arithmetic)) {\n\t\t\t\t\t\t// an unquoted here-doc delimiter, no special handling\n\t\t\t\t\t\tHereDoc.State = 1;\n\t\t\t\t\t} else if (sc.chNext == '<') {\t// HERE string <<<\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\tsc.ForwardSetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t\t} else if (IsASpace(sc.chNext)) {\n\t\t\t\t\t\t// eat whitespace\n\t\t\t\t\t} else if (setLeftShift.Contains(sc.chNext) ||\n\t\t\t\t\t (sc.chNext == '=' && cmdState == CmdState::Arithmetic)) {\n\t\t\t\t\t\t// left shift <<$var or <<= cases\n\t\t\t\t\t\tsc.ChangeState(SCE_SH_OPERATOR | insideCommand);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t\t} else {\n\t\t\t\t\t\t// symbols terminates; deprecated zero-length delimiter\n\t\t\t\t\t\tHereDoc.State = 1;\n\t\t\t\t\t}\n\t\t\t\t} else if (HereDoc.State == 1) { // collect the delimiter\n\t\t\t\t\t// * if single quoted, there's no escape\n\t\t\t\t\t// * if double quoted, there are \\\\ and \\\" escapes\n\t\t\t\t\tif (HereDoc.Quoted && sc.ch == HereDoc.Quote && (HereDoc.BackslashCount & 1) == 0) { // closing quote => end of delimiter\n\t\t\t\t\t\tsc.ForwardSetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t\t} else if (sc.ch == '\\\\' && HereDoc.Quote != '\\'') {\n\t\t\t\t\t\tHereDoc.Escaped = true;\n\t\t\t\t\t\tHereDoc.BackslashCount += 1;\n\t\t\t\t\t\tif ((HereDoc.BackslashCount & 1) == 0 || (HereDoc.Quoted && !AnyOf(sc.chNext, '\\\"', '\\\\'))) {\n\t\t\t\t\t\t\t// in quoted prefixes only \\ and the quote eat the escape\n\t\t\t\t\t\t\tHereDoc.Append(sc.ch);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t// skip escape prefix\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (HereDoc.Quoted || setHereDoc2.Contains(sc.ch) || (sc.ch > 32 && sc.ch < 127 && (HereDoc.BackslashCount & 1) != 0)) {\n\t\t\t\t\t\tHereDoc.BackslashCount = 0;\n\t\t\t\t\t\tHereDoc.Append(sc.ch);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t\t}\n\t\t\t\t\tif (HereDoc.DelimiterLength >= HERE_DELIM_MAX - 1) {\t// force blowup\n\t\t\t\t\t\tsc.SetState(SCE_SH_ERROR | insideCommand);\n\t\t\t\t\t\tHereDoc.State = 0;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_SCALAR:\t// variable names\n\t\t\t\tif (!setParam.Contains(sc.ch)) {\n\t\t\t\t\tchar s[500];\n\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\tconst int subStyle = classifierScalars.ValueFor(&s[1]); // skip the $\n\t\t\t\t\tif (subStyle >= 0) {\n\t\t\t\t\t\tsc.ChangeState(subStyle | insideCommand);\n\t\t\t\t\t}\n\t\t\t\t\tif (sc.LengthCurrent() == 1) {\n\t\t\t\t\t\t// Special variable\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(QuoteStack.State | insideCommand);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_HERE_Q:\n\t\t\t\t// HereDoc.State == 2\n\t\t\t\tif (sc.atLineStart && QuoteStack.Current.Style == QuoteStyle::HereDoc) {\n\t\t\t\t\tsc.SetState(SCE_SH_HERE_Q | insideCommand);\n\t\t\t\t\tif (HereDoc.Indent) { // tabulation prefix\n\t\t\t\t\t\twhile (sc.ch == '\\t') {\n\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tif ((static_cast(sc.currentPos + HereDoc.DelimiterLength) == sc.lineEnd) &&\n\t\t\t\t\t\t(HereDoc.DelimiterLength == 0 || sc.Match(HereDoc.Delimiter))) {\n\t\t\t\t\t\tif (HereDoc.DelimiterLength != 0) {\n\t\t\t\t\t\t\tsc.SetState(SCE_SH_HERE_DELIM | insideCommand);\n\t\t\t\t\t\t\twhile (!sc.MatchLineEnd()) {\n\t\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t\tQuoteStack.Pop();\n\t\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | QuoteStack.insideCommand);\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tif (HereDoc.Quoted || HereDoc.Escaped) {\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t// fall through to handle nested shell expansions\n\t\t\t\t[[fallthrough]];\n\t\t\tcase SCE_SH_STRING:\t// delimited styles, can nest\n\t\t\tcase SCE_SH_PARAM: // ${parameter}\n\t\t\tcase SCE_SH_BACKTICKS:\n\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\tif (QuoteStack.Current.Style != QuoteStyle::Literal)\n\t\t\t\t\t\tQuoteStack.Escape(sc);\n\t\t\t\t} else if (sc.ch == QuoteStack.Current.Down) {\n\t\t\t\t\tif (QuoteStack.CountDown(sc, cmdState)) {\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == QuoteStack.Current.Up) {\n\t\t\t\t\tif (QuoteStack.Current.Style != QuoteStyle::Parameter) {\n\t\t\t\t\t\tQuoteStack.Current.Count++;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tif (QuoteStack.Current.Style == QuoteStyle::String ||\n\t\t\t\t\t\tQuoteStack.Current.Style == QuoteStyle::HereDoc ||\n\t\t\t\t\t\tQuoteStack.Current.Style == QuoteStyle::LString\n\t\t\t\t\t) {\t// do nesting for \"string\", $\"locale-string\", heredoc\n\t\t\t\t\t\tconst bool stylingInside = options.stylingInside(MaskCommand(sc.state));\n\t\t\t\t\t\tif (sc.ch == '`') {\n\t\t\t\t\t\t\tQuoteStack.Push(sc.ch, QuoteStyle::Backtick, sc.state, cmdState);\n\t\t\t\t\t\t\tif (stylingInside) {\n\t\t\t\t\t\t\t\tsc.SetState(SCE_SH_BACKTICKS | insideCommand);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.ch == '$' && !AnyOf(sc.chNext, '\\\"', '\\'')) {\n\t\t\t\t\t\t\tQuoteStack.Expand(sc, cmdState, stylingInside);\n\t\t\t\t\t\t\tcontinue;\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (QuoteStack.Current.Style == QuoteStyle::Command ||\n\t\t\t\t\t\t\t QuoteStack.Current.Style == QuoteStyle::Parameter ||\n\t\t\t\t\t\t\t QuoteStack.Current.Style == QuoteStyle::Backtick\n\t\t\t\t\t) {\t// do nesting for $(command), `command`, ${parameter}\n\t\t\t\t\t\tconst bool stylingInside = options.stylingInside(MaskCommand(sc.state));\n\t\t\t\t\t\tif (sc.ch == '\\'') {\n\t\t\t\t\t\t\tif (stylingInside) {\n\t\t\t\t\t\t\t\tQuoteStack.State = sc.state;\n\t\t\t\t\t\t\t\tsc.SetState(SCE_SH_CHARACTER | insideCommand);\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\tQuoteStack.Push(sc.ch, QuoteStyle::Literal, sc.state, cmdState);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\t\t\tQuoteStack.Push(sc.ch, QuoteStyle::String, sc.state, cmdState);\n\t\t\t\t\t\t\tif (stylingInside) {\n\t\t\t\t\t\t\t\tsc.SetState(SCE_SH_STRING | insideCommand);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.ch == '`') {\n\t\t\t\t\t\t\tQuoteStack.Push(sc.ch, QuoteStyle::Backtick, sc.state, cmdState);\n\t\t\t\t\t\t\tif (stylingInside) {\n\t\t\t\t\t\t\t\tsc.SetState(SCE_SH_BACKTICKS | insideCommand);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.ch == '$') {\n\t\t\t\t\t\t\tQuoteStack.Expand(sc, cmdState, stylingInside);\n\t\t\t\t\t\t\tcontinue;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_SH_CHARACTER: // singly-quoted strings\n\t\t\t\tif (sc.ch == '\\'') {\n\t\t\t\t\tsc.ForwardSetState(QuoteStack.State | insideCommand);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Must check end of HereDoc state 1 before default state is handled\n\t\tif (HereDoc.State == 1 && sc.MatchLineEnd()) {\n\t\t\t// Begin of here-doc (the line after the here-doc delimiter):\n\t\t\t// Lexically, the here-doc starts from the next line after the >>, but the\n\t\t\t// first line of here-doc seem to follow the style of the last EOL sequence\n\t\t\tHereDoc.State = 2;\n\t\t\tif (HereDoc.Quoted) {\n\t\t\t\tif (MaskCommand(sc.state) == SCE_SH_HERE_DELIM) {\n\t\t\t\t\t// Missing quote at end of string! Syntax error in bash 4.3\n\t\t\t\t\t// Mark this bit as an error, do not colour any here-doc\n\t\t\t\t\tsc.ChangeState(SCE_SH_ERROR | insideCommand);\n\t\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t\t} else {\n\t\t\t\t\t// HereDoc.Quote always == '\\''\n\t\t\t\t\tsc.SetState(SCE_SH_HERE_Q | insideCommand);\n\t\t\t\t\tQuoteStack.Start(-1, QuoteStyle::HereDoc, SCE_SH_DEFAULT, cmdState);\n\t\t\t\t}\n\t\t\t} else if (HereDoc.DelimiterLength == 0) {\n\t\t\t\t// no delimiter, illegal (but '' and \"\" are legal)\n\t\t\t\tsc.ChangeState(SCE_SH_ERROR | insideCommand);\n\t\t\t\tsc.SetState(SCE_SH_DEFAULT | insideCommand);\n\t\t\t} else {\n\t\t\t\tsc.SetState(SCE_SH_HERE_Q | insideCommand);\n\t\t\t\tQuoteStack.Start(-1, QuoteStyle::HereDoc, SCE_SH_DEFAULT, cmdState);\n\t\t\t}\n\t\t}\n\n\t\t// update cmdState about the current command segment\n\t\tif (stylePrev != SCE_SH_DEFAULT && MaskCommand(sc.state) == SCE_SH_DEFAULT) {\n\t\t\tcmdState = cmdStateNew;\n\t\t}\n\t\t// Determine if a new state should be entered.\n\t\tif (MaskCommand(sc.state) == SCE_SH_DEFAULT) {\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t// Bash can escape any non-newline as a literal\n\t\t\t\tsc.SetState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\tQuoteStack.Escape(sc);\n\t\t\t} else if (IsADigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_SH_NUMBER | insideCommand);\n\t\t\t\tnumBase = BASH_BASE_DECIMAL;\n\t\t\t\tif (sc.ch == '0') {\t// hex,octal\n\t\t\t\t\tif (sc.chNext == 'x' || sc.chNext == 'X') {\n\t\t\t\t\t\tnumBase = BASH_BASE_HEX;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} else if (IsADigit(sc.chNext)) {\n#ifdef PEDANTIC_OCTAL\n\t\t\t\t\t\tnumBase = BASH_BASE_OCTAL;\n#endif\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if (setWordStart.Contains(sc.ch)) {\n\t\t\t\tsc.SetState(((cmdState == CmdState::Arithmetic)? SCE_SH_IDENTIFIER : SCE_SH_WORD) | insideCommand);\n\t\t\t} else if (sc.ch == '#') {\n\t\t\t\tif (stylePrev != SCE_SH_WORD && stylePrev != SCE_SH_IDENTIFIER &&\n\t\t\t\t\t(sc.currentPos == 0 || setMetaCharacter.Contains(sc.chPrev))) {\n\t\t\t\t\tsc.SetState(SCE_SH_COMMENTLINE | insideCommand);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_SH_WORD | insideCommand);\n\t\t\t\t}\n\t\t\t\t// handle some zsh features within arithmetic expressions only\n\t\t\t\tif (cmdState == CmdState::Arithmetic) {\n\t\t\t\t\tif (sc.chPrev == '[') {\t// [#8] [##8] output digit setting\n\t\t\t\t\t\tsc.SetState(SCE_SH_WORD | insideCommand);\n\t\t\t\t\t\tif (sc.chNext == '#') {\n\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (sc.Match(\"##^\") && IsUpperCase(sc.GetRelative(3))) {\t// ##^A\n\t\t\t\t\t\tsc.SetState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\t\t\tsc.Forward(3);\n\t\t\t\t\t} else if (sc.chNext == '#' && !IsASpace(sc.GetRelative(2))) {\t// ##a\n\t\t\t\t\t\tsc.SetState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\t\t\tsc.Forward(2);\n\t\t\t\t\t} else if (setWordStart.Contains(sc.chNext)) {\t// #name\n\t\t\t\t\t\tsc.SetState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_SH_STRING | insideCommand);\n\t\t\t\tQuoteStack.Start(sc.ch, QuoteStyle::String, SCE_SH_DEFAULT, cmdState);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tQuoteStack.State = SCE_SH_DEFAULT;\n\t\t\t\tsc.SetState(SCE_SH_CHARACTER | insideCommand);\n\t\t\t} else if (sc.ch == '`') {\n\t\t\t\tsc.SetState(SCE_SH_BACKTICKS | insideCommand);\n\t\t\t\tQuoteStack.Start(sc.ch, QuoteStyle::Backtick, SCE_SH_DEFAULT, cmdState);\n\t\t\t} else if (sc.ch == '$') {\n\t\t\t\tQuoteStack.Expand(sc, cmdState, true);\n\t\t\t\tcontinue;\n\t\t\t} else if (cmdState != CmdState::Arithmetic && sc.Match('<', '<')) {\n\t\t\t\tsc.SetState(SCE_SH_HERE_DELIM | insideCommand);\n\t\t\t\tHereDoc.State = 0;\n\t\t\t\tif (sc.GetRelative(2) == '-') {\t// <<- indent case\n\t\t\t\t\tHereDoc.Indent = true;\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else {\n\t\t\t\t\tHereDoc.Indent = false;\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '-' && // test operator or short and long option\n\t\t\t\t\t cmdState != CmdState::Arithmetic &&\n\t\t\t\t\t sc.chPrev != '~' && !IsADigit(sc.chNext)) {\n\t\t\t\tif (IsASpace(sc.chPrev) || setMetaCharacter.Contains(sc.chPrev)) {\n\t\t\t\t\tsc.SetState(SCE_SH_WORD | insideCommand);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\t}\n\t\t\t} else if (setBashOperator.Contains(sc.ch)) {\n\t\t\t\tbool isCmdDelim = false;\n\t\t\t\tsc.SetState(SCE_SH_OPERATOR | insideCommand);\n\t\t\t\t// arithmetic expansion and command substitution\n\t\t\t\tif (QuoteStack.Current.Style == QuoteStyle::Arithmetic || QuoteStack.Current.Style == QuoteStyle::CommandInside) {\n\t\t\t\t\tif (sc.ch == QuoteStack.Current.Down) {\n\t\t\t\t\t\tif (QuoteStack.CountDown(sc, cmdState)) {\n\t\t\t\t\t\t\tcontinue;\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (sc.ch == QuoteStack.Current.Up) {\n\t\t\t\t\t\tQuoteStack.Current.Count++;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// globs have no whitespace, do not appear in arithmetic expressions\n\t\t\t\tif (cmdState != CmdState::Arithmetic && sc.ch == '(' && sc.chNext != '(') {\n\t\t\t\t\tconst int i = GlobScan(sc);\n\t\t\t\t\tif (i > 1) {\n\t\t\t\t\t\tsc.SetState(SCE_SH_IDENTIFIER | insideCommand);\n\t\t\t\t\t\tsc.Forward(i + 1);\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// handle opening delimiters for test/arithmetic expressions - ((,[[,[\n\t\t\t\tif (cmdState == CmdState::Start\n\t\t\t\t || cmdState == CmdState::Body) {\n\t\t\t\t\tif (sc.Match('(', '(')) {\n\t\t\t\t\t\tcmdState = CmdState::Arithmetic;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} else if (sc.Match('[', '[') && IsASpace(sc.GetRelative(2))) {\n\t\t\t\t\t\tcmdState = CmdState::DoubleBracket;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} else if (sc.ch == '[' && IsASpace(sc.chNext)) {\n\t\t\t\t\t\tcmdState = CmdState::SingleBracket;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// special state -- for ((x;y;z)) in ... looping\n\t\t\t\tif (cmdState == CmdState::Word && sc.Match('(', '(')) {\n\t\t\t\t\tcmdState = CmdState::Arithmetic;\n\t\t\t\t\tsc.Forward(2);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t\t// handle command delimiters in command Start|Body|Word state, also Test if 'test' or '[]'\n\t\t\t\tif (cmdState < CmdState::DoubleBracket) {\n\t\t\t\t\tchar s[10]{};\n\t\t\t\t\ts[0] = static_cast(sc.ch);\n\t\t\t\t\tif (setBashOperator.Contains(sc.chNext)) {\n\t\t\t\t\t\ts[1] = static_cast(sc.chNext);\n\t\t\t\t\t\ts[2] = '\\0';\n\t\t\t\t\t\tisCmdDelim = cmdDelimiter.InList(s);\n\t\t\t\t\t\tif (isCmdDelim)\n\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t\tif (!isCmdDelim) {\n\t\t\t\t\t\ts[1] = '\\0';\n\t\t\t\t\t\tisCmdDelim = cmdDelimiter.InList(s);\n\t\t\t\t\t}\n\t\t\t\t\tif (isCmdDelim) {\n\t\t\t\t\t\tcmdState = CmdState::Delimiter;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// handle closing delimiters for test/arithmetic expressions - )),]],]\n\t\t\t\tif (cmdState == CmdState::Arithmetic && sc.Match(')', ')')) {\n\t\t\t\t\tcmdState = CmdState::Body;\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else if (sc.ch == ']' && IsASpace(sc.chPrev)) {\n\t\t\t\t\tif (cmdState == CmdState::SingleBracket) {\n\t\t\t\t\t\tcmdState = CmdState::Body;\n\t\t\t\t\t} else if (cmdState == CmdState::DoubleBracket && sc.chNext == ']') {\n\t\t\t\t\t\tcmdState = CmdState::Body;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}// sc.state\n\n\t\tsc.Forward();\n\t}\n\tsc.Complete();\n\tif (MaskCommand(sc.state) == SCE_SH_HERE_Q) {\n\t\tstyler.ChangeLexerState(sc.currentPos, styler.Length());\n\t}\n\tsc.Complete();\n}\n\nvoid SCI_METHOD LexerBash::Fold(Sci_PositionU startPos_, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tif(!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\n\tSci_Position startPos = startPos_;\n\tconst Sci_Position endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\t// Backtrack to previous line in case need to fix its fold status\n\tif (lineCurrent > 0) {\n\t\tlineCurrent--;\n\t\tstartPos = styler.LineStart(lineCurrent);\n\t\tinitStyle = (startPos > 0) ? styler.StyleIndexAt(startPos - 1) : 0;\n\t}\n\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint styleNext = MaskCommand(styler.StyleIndexAt(startPos));\n\tint style = MaskCommand(initStyle);\n\tchar word[8] = { '\\0' }; // we're not interested in long words anyway\n\tsize_t wordlen = 0;\n\tfor (Sci_Position i = startPos; i < endPos; i++) {\n\t\tconst char ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tconst int stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = MaskCommand(styler.StyleIndexAt(i + 1));\n\t\tconst bool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\t// Comment folding\n\t\tif (options.foldComment && atEOL && IsCommentLine(lineCurrent, styler))\n\t\t{\n\t\t\tif (!IsCommentLine(lineCurrent - 1, styler)\n\t\t\t\t&& IsCommentLine(lineCurrent + 1, styler))\n\t\t\t\tlevelCurrent++;\n\t\t\telse if (IsCommentLine(lineCurrent - 1, styler)\n\t\t\t\t\t && !IsCommentLine(lineCurrent + 1, styler))\n\t\t\t\tlevelCurrent--;\n\t\t}\n\n\t\tswitch (style) {\n\t\tcase SCE_SH_WORD:\n\t\t\tif ((wordlen + 1) < sizeof(word))\n\t\t\t\tword[wordlen++] = ch;\n\t\t\tif (styleNext != style) {\n\t\t\t\tword[wordlen] = '\\0';\n\t\t\t\twordlen = 0;\n\t\t\t\tif (InList(word, {\"if\", \"case\", \"do\"})) {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t} else if (InList(word, {\"fi\", \"esac\", \"done\"})) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_SH_OPERATOR:\n\t\t\tif (ch == '{') {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\tbreak;\n\n\t\t// Here Document folding\n\t\tcase SCE_SH_HERE_DELIM:\n\t\t\tif (stylePrev == SCE_SH_HERE_Q) {\n\t\t\t\tlevelCurrent--;\n\t\t\t} else if (stylePrev != SCE_SH_HERE_DELIM) {\n\t\t\t\tif (ch == '<' && chNext == '<') {\n\t\t\t\t\tif (styler.SafeGetCharAt(i + 2) != '<') {\n\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_SH_HERE_Q:\n\t\t\tif (styleNext == SCE_SH_DEFAULT) {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\tbreak;\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tconst int lev = levelPrev |\n\t\t\t\tFoldLevelFlags(levelPrev, levelCurrent, visibleChars == 0 && options.foldCompact, visibleChars > 0);\n\t\t\tstyler.SetLevelIfDifferent(lineCurrent, lev);\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tconst int flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nextern const LexerModule lmBash(SCLEX_BASH, LexerBash::LexerFactoryBash, \"bash\", bashWordListDesc);\n" }, { "path": "lexers/LexBasic.cxx", "content": "// Scintilla source code edit control\n/** @file LexBasic.cxx\n ** Lexer for BlitzBasic and PureBasic.\n ** Converted to lexer object and added further folding features/properties by \"Udo Lechner\" \n **/\n// Copyright 1998-2003 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n// This tries to be a unified Lexer/Folder for all the BlitzBasic/BlitzMax/PurBasic basics\n// and derivatives. Once they diverge enough, might want to split it into multiple\n// lexers for more code clearity.\n//\n// Mail me (elias users sf net) for any bugs.\n\n// Folding only works for simple things like functions or types.\n\n// You may want to have a look at my ctags lexer as well, if you additionally to coloring\n// and folding need to extract things like label tags in your editor.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\n/* Bits:\n * 1 - whitespace\n * 2 - operator\n * 4 - identifier\n * 8 - decimal digit\n * 16 - hex digit\n * 32 - bin digit\n * 64 - letter\n */\nstatic int character_classification[128] =\n{\n\t\t0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0,\n\t\t0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,\n\t\t1, 2, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 10, 2,\n\t 60, 60, 28, 28, 28, 28, 28, 28, 28, 28, 2, 2, 2, 2, 2, 2,\n\t\t2, 84, 84, 84, 84, 84, 84, 68, 68, 68, 68, 68, 68, 68, 68, 68,\n\t 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, 2, 2, 2, 2, 68,\n\t\t2, 84, 84, 84, 84, 84, 84, 68, 68, 68, 68, 68, 68, 68, 68, 68,\n\t 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, 68, 2, 2, 2, 2, 0\n};\n\nstatic bool IsSpace(int c) {\n\treturn c < 128 && (character_classification[c] & 1);\n}\n\nstatic bool IsOperator(int c) {\n\treturn c < 128 && (character_classification[c] & 2);\n}\n\nstatic bool IsIdentifier(int c) {\n\treturn c < 128 && (character_classification[c] & 4);\n}\n\nstatic bool IsDigit(int c) {\n\treturn c < 128 && (character_classification[c] & 8);\n}\n\nstatic bool IsHexDigit(int c) {\n\treturn c < 128 && (character_classification[c] & 16);\n}\n\nstatic bool IsBinDigit(int c) {\n\treturn c < 128 && (character_classification[c] & 32);\n}\n\nstatic bool IsLetter(int c) {\n\treturn c < 128 && (character_classification[c] & 64);\n}\n\nstatic int LowerCase(int c)\n{\n\tif (c >= 'A' && c <= 'Z')\n\t\treturn 'a' + c - 'A';\n\treturn c;\n}\n\nstatic int CheckBlitzFoldPoint(char const *token, int &level) {\n\tif (!strcmp(token, \"function\") ||\n\t\t!strcmp(token, \"type\")) {\n\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\treturn 1;\n\t}\n\tif (!strcmp(token, \"end function\") ||\n\t\t!strcmp(token, \"end type\")) {\n\t\treturn -1;\n\t}\n\treturn 0;\n}\n\nstatic int CheckPureFoldPoint(char const *token, int &level) {\n\tif (!strcmp(token, \"procedure\") ||\n\t\t!strcmp(token, \"enumeration\") ||\n\t\t!strcmp(token, \"interface\") ||\n\t\t!strcmp(token, \"structure\")) {\n\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\treturn 1;\n\t}\n\tif (!strcmp(token, \"endprocedure\") ||\n\t\t!strcmp(token, \"endenumeration\") ||\n\t\t!strcmp(token, \"endinterface\") ||\n\t\t!strcmp(token, \"endstructure\")) {\n\t\treturn -1;\n\t}\n\treturn 0;\n}\n\nstatic int CheckFreeFoldPoint(char const *token, int &level) {\n\tif (!strcmp(token, \"function\") ||\n\t\t!strcmp(token, \"sub\") ||\n\t\t!strcmp(token, \"enum\") ||\n\t\t!strcmp(token, \"type\") ||\n\t\t!strcmp(token, \"union\") ||\n\t\t!strcmp(token, \"property\") ||\n\t\t!strcmp(token, \"destructor\") ||\n\t\t!strcmp(token, \"constructor\")) {\n\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\treturn 1;\n\t}\n\tif (!strcmp(token, \"end function\") ||\n\t\t!strcmp(token, \"end sub\") ||\n\t\t!strcmp(token, \"end enum\") ||\n\t\t!strcmp(token, \"end type\") ||\n\t\t!strcmp(token, \"end union\") ||\n\t\t!strcmp(token, \"end property\") ||\n\t\t!strcmp(token, \"end destructor\") ||\n\t\t!strcmp(token, \"end constructor\")) {\n\t\treturn -1;\n\t}\n\treturn 0;\n}\n\n// An individual named option for use in an OptionSet\n\n// Options used for LexerBasic\nstruct OptionsBasic {\n\tbool fold;\n\tbool foldSyntaxBased;\n\tbool foldCommentExplicit;\n\tstd::string foldExplicitStart;\n\tstd::string foldExplicitEnd;\n\tbool foldExplicitAnywhere;\n\tbool foldCompact;\n\tOptionsBasic() {\n\t\tfold = false;\n\t\tfoldSyntaxBased = true;\n\t\tfoldCommentExplicit = false;\n\t\tfoldExplicitStart = \"\";\n\t\tfoldExplicitEnd = \"\";\n\t\tfoldExplicitAnywhere = false;\n\t\tfoldCompact = true;\n\t}\n};\n\nstatic const char * const blitzbasicWordListDesc[] = {\n\t\"BlitzBasic Keywords\",\n\t\"user1\",\n\t\"user2\",\n\t\"user3\",\n\t0\n};\n\nstatic const char * const purebasicWordListDesc[] = {\n\t\"PureBasic Keywords\",\n\t\"PureBasic PreProcessor Keywords\",\n\t\"user defined 1\",\n\t\"user defined 2\",\n\t0\n};\n\nstatic const char * const freebasicWordListDesc[] = {\n\t\"FreeBasic Keywords\",\n\t\"FreeBasic PreProcessor Keywords\",\n\t\"user defined 1\",\n\t\"user defined 2\",\n\t0\n};\n\nstruct OptionSetBasic : public OptionSet {\n\tOptionSetBasic(const char * const wordListDescriptions[]) {\n\t\tDefineProperty(\"fold\", &OptionsBasic::fold);\n\n\t\tDefineProperty(\"fold.basic.syntax.based\", &OptionsBasic::foldSyntaxBased,\n\t\t\t\"Set this property to 0 to disable syntax based folding.\");\n\n\t\tDefineProperty(\"fold.basic.comment.explicit\", &OptionsBasic::foldCommentExplicit,\n\t\t\t\"This option enables folding explicit fold points when using the Basic lexer. \"\n\t\t\t\"Explicit fold points allows adding extra folding by placing a ;{ (BB/PB) or '{ (FB) comment at the start \"\n\t\t\t\"and a ;} (BB/PB) or '} (FB) at the end of a section that should be folded.\");\n\n\t\tDefineProperty(\"fold.basic.explicit.start\", &OptionsBasic::foldExplicitStart,\n\t\t\t\"The string to use for explicit fold start points, replacing the standard ;{ (BB/PB) or '{ (FB).\");\n\n\t\tDefineProperty(\"fold.basic.explicit.end\", &OptionsBasic::foldExplicitEnd,\n\t\t\t\"The string to use for explicit fold end points, replacing the standard ;} (BB/PB) or '} (FB).\");\n\n\t\tDefineProperty(\"fold.basic.explicit.anywhere\", &OptionsBasic::foldExplicitAnywhere,\n\t\t\t\"Set this property to 1 to enable explicit fold points anywhere, not just in line comments.\");\n\n\t\tDefineProperty(\"fold.compact\", &OptionsBasic::foldCompact);\n\n\t\tDefineWordListSets(wordListDescriptions);\n\t}\n};\n\nclass LexerBasic : public DefaultLexer {\n\tchar comment_char;\n\tint (*CheckFoldPoint)(char const *, int &);\n\tWordList keywordlists[4];\n\tOptionsBasic options;\n\tOptionSetBasic osBasic;\npublic:\n\tLexerBasic(const char *languageName_, int language_, char comment_char_,\n\t\tint (*CheckFoldPoint_)(char const *, int &), const char * const wordListDescriptions[]) :\n\t\t\t\t\t\t DefaultLexer(languageName_, language_),\n\t\t\t\t\t\t comment_char(comment_char_),\n\t\t\t\t\t\t CheckFoldPoint(CheckFoldPoint_),\n\t\t\t\t\t\t osBasic(wordListDescriptions) {\n\t}\n\tvirtual ~LexerBasic() {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char * SCI_METHOD PropertyNames() override {\n\t\treturn osBasic.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osBasic.PropertyType(name);\n\t}\n\tconst char * SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osBasic.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osBasic.PropertyGet(key);\n\t}\n\tconst char * SCI_METHOD DescribeWordListSets() override {\n\t\treturn osBasic.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid * SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn 0;\n\t}\n\tstatic ILexer5 *LexerFactoryBlitzBasic() {\n\t\treturn new LexerBasic(\"blitzbasic\", SCLEX_BLITZBASIC, ';', CheckBlitzFoldPoint, blitzbasicWordListDesc);\n\t}\n\tstatic ILexer5 *LexerFactoryPureBasic() {\n\t\treturn new LexerBasic(\"purebasic\", SCLEX_PUREBASIC, ';', CheckPureFoldPoint, purebasicWordListDesc);\n\t}\n\tstatic ILexer5 *LexerFactoryFreeBasic() {\n\t\treturn new LexerBasic(\"freebasic\", SCLEX_FREEBASIC, '\\'', CheckFreeFoldPoint, freebasicWordListDesc );\n\t}\n};\n\nSci_Position SCI_METHOD LexerBasic::PropertySet(const char *key, const char *val) {\n\tif (osBasic.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerBasic::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = 0;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywordlists[0];\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywordlists[1];\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywordlists[2];\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywordlists[3];\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tWordList wlNew;\n\t\twlNew.Set(wl);\n\t\tif (*wordListN != wlNew) {\n\t\t\twordListN->Set(wl);\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerBasic::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\tbool wasfirst = true, isfirst = true; // true if first token in a line\n\tstyler.StartAt(startPos);\n\tint styleBeforeKeyword = SCE_B_DEFAULT;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\t// Can't use sc.More() here else we miss the last character\n\tfor (; ; sc.Forward()) {\n\t\tif (sc.state == SCE_B_IDENTIFIER) {\n\t\t\tif (!IsIdentifier(sc.ch)) {\n\t\t\t\t// Labels\n\t\t\t\tif (wasfirst && sc.Match(':')) {\n\t\t\t\t\tsc.ChangeState(SCE_B_LABEL);\n\t\t\t\t\tsc.ForwardSetState(SCE_B_DEFAULT);\n\t\t\t\t} else {\n\t\t\t\t\tchar s[100];\n\t\t\t\t\tint kstates[4] = {\n\t\t\t\t\t\tSCE_B_KEYWORD,\n\t\t\t\t\t\tSCE_B_KEYWORD2,\n\t\t\t\t\t\tSCE_B_KEYWORD3,\n\t\t\t\t\t\tSCE_B_KEYWORD4,\n\t\t\t\t\t};\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\tfor (int i = 0; i < 4; i++) {\n\t\t\t\t\t\tif (keywordlists[i].InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(kstates[i]);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\t// Types, must set them as operator else they will be\n\t\t\t\t\t// matched as number/constant\n\t\t\t\t\tif (sc.Match('.') || sc.Match('$') || sc.Match('%') ||\n\t\t\t\t\t\tsc.Match('#')) {\n\t\t\t\t\t\tsc.SetState(SCE_B_OPERATOR);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (sc.state == SCE_B_OPERATOR) {\n\t\t\tif (!IsOperator(sc.ch) || sc.Match('#'))\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t} else if (sc.state == SCE_B_LABEL) {\n\t\t\tif (!IsIdentifier(sc.ch))\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t} else if (sc.state == SCE_B_CONSTANT) {\n\t\t\tif (!IsIdentifier(sc.ch))\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t} else if (sc.state == SCE_B_NUMBER) {\n\t\t\tif (!IsDigit(sc.ch))\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t} else if (sc.state == SCE_B_HEXNUMBER) {\n\t\t\tif (!IsHexDigit(sc.ch))\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t} else if (sc.state == SCE_B_BINNUMBER) {\n\t\t\tif (!IsBinDigit(sc.ch))\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t} else if (sc.state == SCE_B_STRING) {\n\t\t\tif (sc.ch == '\"') {\n\t\t\t\tsc.ForwardSetState(SCE_B_DEFAULT);\n\t\t\t}\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_B_ERROR);\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_B_COMMENT || sc.state == SCE_B_PREPROCESSOR) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_B_DOCLINE) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t\t} else if (sc.ch == '\\\\' || sc.ch == '@') {\n\t\t\t\tif (IsLetter(sc.chNext) && sc.chPrev != '\\\\') {\n\t\t\t\t\tstyleBeforeKeyword = sc.state;\n\t\t\t\t\tsc.SetState(SCE_B_DOCKEYWORD);\n\t\t\t\t};\n\t\t\t}\n\t\t} else if (sc.state == SCE_B_DOCKEYWORD) {\n\t\t\tif (IsSpace(sc.ch)) {\n\t\t\t\tsc.SetState(styleBeforeKeyword);\n\t\t\t}\telse if (sc.atLineEnd && styleBeforeKeyword == SCE_B_DOCLINE) {\n\t\t\t\tsc.SetState(SCE_B_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_B_COMMENTBLOCK) {\n\t\t\tif (sc.Match(\"\\'/\")) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_B_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_B_DOCBLOCK) {\n\t\t\tif (sc.Match(\"\\'/\")) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_B_DEFAULT);\n\t\t\t} else if (sc.ch == '\\\\' || sc.ch == '@') {\n\t\t\t\tif (IsLetter(sc.chNext) && sc.chPrev != '\\\\') {\n\t\t\t\t\tstyleBeforeKeyword = sc.state;\n\t\t\t\t\tsc.SetState(SCE_B_DOCKEYWORD);\n\t\t\t\t};\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineStart)\n\t\t\tisfirst = true;\n\n\t\tif (sc.state == SCE_B_DEFAULT || sc.state == SCE_B_ERROR) {\n\t\t\tif (isfirst && sc.Match('.') && comment_char != '\\'') {\n\t\t\t\t\tsc.SetState(SCE_B_LABEL);\n\t\t\t} else if (isfirst && sc.Match('#')) {\n\t\t\t\twasfirst = isfirst;\n\t\t\t\tsc.SetState(SCE_B_IDENTIFIER);\n\t\t\t} else if (sc.Match(comment_char)) {\n\t\t\t\t// Hack to make deprecated QBASIC '$Include show\n\t\t\t\t// up in freebasic with SCE_B_PREPROCESSOR.\n\t\t\t\tif (comment_char == '\\'' && sc.Match(comment_char, '$'))\n\t\t\t\t\tsc.SetState(SCE_B_PREPROCESSOR);\n\t\t\t\telse if (sc.Match(\"\\'*\") || sc.Match(\"\\'!\")) {\n\t\t\t\t\tsc.SetState(SCE_B_DOCLINE);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_B_COMMENT);\n\t\t\t\t}\n\t\t\t} else if (sc.Match(\"/\\'\")) {\n\t\t\t\tif (sc.Match(\"/\\'*\") || sc.Match(\"/\\'!\")) {\t// Support of gtk-doc/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_B_DOCBLOCK);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_B_COMMENTBLOCK);\n\t\t\t\t}\n\t\t\t\tsc.Forward();\t// Eat the ' so it isn't used for the end of the comment\n\t\t\t} else if (sc.Match('\"')) {\n\t\t\t\tsc.SetState(SCE_B_STRING);\n\t\t\t} else if (IsDigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_B_NUMBER);\n\t\t\t} else if (sc.Match('$') || sc.Match(\"&h\") || sc.Match(\"&H\") || sc.Match(\"&o\") || sc.Match(\"&O\")) {\n\t\t\t\tsc.SetState(SCE_B_HEXNUMBER);\n\t\t\t} else if (sc.Match('%') || sc.Match(\"&b\") || sc.Match(\"&B\")) {\n\t\t\t\tsc.SetState(SCE_B_BINNUMBER);\n\t\t\t} else if (sc.Match('#')) {\n\t\t\t\tsc.SetState(SCE_B_CONSTANT);\n\t\t\t} else if (IsOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_B_OPERATOR);\n\t\t\t} else if (IsIdentifier(sc.ch)) {\n\t\t\t\twasfirst = isfirst;\n\t\t\t\tsc.SetState(SCE_B_IDENTIFIER);\n\t\t\t} else if (!IsSpace(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_B_ERROR);\n\t\t\t}\n\t\t}\n\n\t\tif (!IsSpace(sc.ch))\n\t\t\tisfirst = false;\n\n\t\tif (!sc.More())\n\t\t\tbreak;\n\t}\n\tsc.Complete();\n}\n\n\nvoid SCI_METHOD LexerBasic::Fold(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, IDocument *pAccess) {\n\n\tif (!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\n\tSci_Position line = styler.GetLine(startPos);\n\tint level = styler.LevelAt(line);\n\tint go = 0, done = 0;\n\tSci_Position endPos = startPos + length;\n\tchar word[256];\n\tint wordlen = 0;\n\tconst bool userDefinedFoldMarkers = !options.foldExplicitStart.empty() && !options.foldExplicitEnd.empty();\n\tint cNext = styler[startPos];\n\n\t// Scan for tokens at the start of the line (they may include\n\t// whitespace, for tokens like \"End Function\"\n\tfor (Sci_Position i = startPos; i < endPos; i++) {\n\t\tint c = cNext;\n\t\tcNext = styler.SafeGetCharAt(i + 1);\n\t\tbool atEOL = (c == '\\r' && cNext != '\\n') || (c == '\\n');\n\t\tif (options.foldSyntaxBased && !done && !go) {\n\t\t\tif (wordlen) { // are we scanning a token already?\n\t\t\t\tword[wordlen] = static_cast(LowerCase(c));\n\t\t\t\tif (!IsIdentifier(c)) { // done with token\n\t\t\t\t\tword[wordlen] = '\\0';\n\t\t\t\t\tgo = CheckFoldPoint(word, level);\n\t\t\t\t\tif (!go) {\n\t\t\t\t\t\t// Treat any whitespace as single blank, for\n\t\t\t\t\t\t// things like \"End Function\".\n\t\t\t\t\t\tif (IsSpace(c) && IsIdentifier(word[wordlen - 1])) {\n\t\t\t\t\t\t\tword[wordlen] = ' ';\n\t\t\t\t\t\t\tif (wordlen < 255)\n\t\t\t\t\t\t\t\twordlen++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\telse // done with this line\n\t\t\t\t\t\t\tdone = 1;\n\t\t\t\t\t}\n\t\t\t\t} else if (wordlen < 255) {\n\t\t\t\t\twordlen++;\n\t\t\t\t}\n\t\t\t} else { // start scanning at first non-whitespace character\n\t\t\t\tif (!IsSpace(c)) {\n\t\t\t\t\tif (IsIdentifier(c)) {\n\t\t\t\t\t\tword[0] = static_cast(LowerCase(c));\n\t\t\t\t\t\twordlen = 1;\n\t\t\t\t\t} else // done with this line\n\t\t\t\t\t\tdone = 1;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (options.foldCommentExplicit && ((styler.StyleAt(i) == SCE_B_COMMENT) || options.foldExplicitAnywhere)) {\n\t\t\tif (userDefinedFoldMarkers) {\n\t\t\t\tif (styler.Match(i, options.foldExplicitStart.c_str())) {\n \t\t\t\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t\tgo = 1;\n\t\t\t\t} else if (styler.Match(i, options.foldExplicitEnd.c_str())) {\n \t\t\t\t\tgo = -1;\n \t\t\t\t}\n\t\t\t} else {\n\t\t\t\tif (c == comment_char) {\n\t\t\t\t\tif (cNext == '{') {\n\t\t\t\t\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t\t\tgo = 1;\n\t\t\t\t\t} else if (cNext == '}') {\n\t\t\t\t\t\tgo = -1;\n\t\t\t\t\t}\n\t\t\t\t}\n \t\t\t}\n \t\t}\n\t\tif (atEOL) { // line end\n\t\t\tif (!done && wordlen == 0 && options.foldCompact) // line was only space\n\t\t\t\tlevel |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif (level != styler.LevelAt(line))\n\t\t\t\tstyler.SetLevel(line, level);\n\t\t\tlevel += go;\n\t\t\tline++;\n\t\t\t// reset state\n\t\t\twordlen = 0;\n\t\t\tlevel &= ~SC_FOLDLEVELHEADERFLAG;\n\t\t\tlevel &= ~SC_FOLDLEVELWHITEFLAG;\n\t\t\tgo = 0;\n\t\t\tdone = 0;\n\t\t}\n\t}\n}\n\nextern const LexerModule lmBlitzBasic(SCLEX_BLITZBASIC, LexerBasic::LexerFactoryBlitzBasic, \"blitzbasic\", blitzbasicWordListDesc);\n\nextern const LexerModule lmPureBasic(SCLEX_PUREBASIC, LexerBasic::LexerFactoryPureBasic, \"purebasic\", purebasicWordListDesc);\n\nextern const LexerModule lmFreeBasic(SCLEX_FREEBASIC, LexerBasic::LexerFactoryFreeBasic, \"freebasic\", freebasicWordListDesc);\n" }, { "path": "lexers/LexBatch.cxx", "content": "// Scintilla source code edit control\n/** @file LexBatch.cxx\n ** Lexer for batch files.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"InList.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Lexilla;\n\nnamespace {\n\nconst char *const batchWordListDesc[] = {\n\t\"Internal Commands\",\n\t\"External Commands\",\n\tnullptr\n};\n\nconst LexicalClass lexicalClasses[] = {\n\t// Lexer batch SCLEX_BATCH SCE_BAT_\n\t0, \"SCE_BAT_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_BAT_COMMENT\", \"comment\", \"Line comment\",\n\t2, \"SCE_BAT_WORD\", \"keyword\", \"Keyword\",\n\t3, \"SCE_BAT_LABEL\", \"label\", \"Label\",\n\t4, \"SCE_BAT_HIDE\", \"preprocessor\", \"Hide line @\",\n\t5, \"SCE_BAT_COMMAND\", \"identifier\", \"Command\",\n\t6, \"SCE_BAT_IDENTIFIER\", \"identifier\", \"Identifier\",\n\t7, \"SCE_BAT_OPERATOR\", \"operator\", \"Operator\",\n\t8, \"SCE_BAT_AFTER_LABEL\", \"comment\",\"After label\",\n};\n\nclass LexerBatch : public DefaultLexer {\n\tWordList keywords;\n\tWordList keywords2;\n\tstd::string wordLists;\npublic:\n\texplicit LexerBatch() :\n\t\tDefaultLexer(\"batch\", SCLEX_BATCH, lexicalClasses, std::size(lexicalClasses)) {\n\t\twordLists = JoinWordListDescriptions(batchWordListDesc);\n\t}\n\tLexerBatch(const LexerBatch &) = delete;\n\tLexerBatch(LexerBatch &&) = delete;\n\tLexerBatch &operator=(const LexerBatch &) = delete;\n\tLexerBatch &operator=(LexerBatch &&) = delete;\n\t~LexerBatch() override = default;\n\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn wordLists.c_str();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, Scintilla::IDocument *pAccess) override;\n\n\tstatic ILexer5 *LexerFactoryBatch() {\n\t\treturn new LexerBatch();\n\t}\n};\n\nconstexpr bool Is0To9(char ch) noexcept {\n\treturn (ch >= '0') && (ch <= '9');\n}\n\nconstexpr bool IsAlphabetic(int ch) noexcept {\n\treturn IsUpperOrLowerCase(ch);\n}\n\nbool AtEOL(LexAccessor &styler, Sci_PositionU i) {\n\treturn (styler[i] == '\\n') ||\n\t ((styler[i] == '\\r') && (styler.SafeGetCharAt(i + 1) != '\\n'));\n}\n\n// Tests for BATCH Operators\nconstexpr bool IsBOperator(char ch) noexcept {\n\treturn AnyOf(ch, '=', '+', '>', '<', '|', '?', '*', '&', '(', ')');\n}\n\n// Tests for BATCH Separators\nconstexpr bool IsBSeparator(char ch) noexcept {\n\treturn AnyOf(ch, '\\\\', '.', ';', '\\\"', '\\'', '/');\n}\n\n// Both operators and separators -- words often ended with these characters.\nconstexpr bool IsBPunctuation(char ch) noexcept {\n\treturn IsBOperator(ch) || IsBSeparator(ch);\n}\n\n// These characters end words.\nconstexpr bool IsBEndWord(char ch) noexcept {\n\treturn IsBPunctuation(ch) || AnyOf(ch, '%', '!');\n}\n\nconstexpr void SkipSpace(Sci_PositionU &i, std::string_view sv) noexcept {\n\twhile (i < sv.length() && isspacechar(sv[i])) {\n\t\ti++;\n\t}\n}\n\nconstexpr void SkipNonSpace(Sci_PositionU &i, std::string_view sv) noexcept {\n\twhile (i < sv.length() && !isspacechar(sv[i])) {\n\t\ti++;\n\t}\n}\n\nconstexpr Sci_PositionU WordLength(std::string_view word) {\n\tSci_PositionU i = 0;\n\twhile ((i < word.length()) && (!IsBEndWord(word[i]))) {\n\t\ti++;\n\t}\n\treturn i;\n}\n\n// Tests for escape character\nconstexpr bool IsEscaped(std::string_view wordStr, Sci_PositionU pos) noexcept {\n\tbool isQoted=false;\n\twhile (pos>0){\n\t\tpos--;\n\t\tif (wordStr[pos]=='^')\n\t\t\tisQoted=!isQoted;\n\t\telse\n\t\t\tbreak;\n\t}\n\treturn isQoted;\n}\n\nconstexpr bool IsQuotedBy(std::string_view svBuffer, char quote) noexcept {\n\tbool CurrentStatus = false;\n\tsize_t pQuote = svBuffer.find(quote);\n\twhile (pQuote != std::string_view::npos) {\n\t\tif (!IsEscaped(svBuffer, pQuote)) {\n\t\t\tCurrentStatus = !CurrentStatus;\n\t\t}\n\t\tpQuote = svBuffer.find(quote, pQuote + 1);\n\t}\n\treturn CurrentStatus;\n}\n\n// Tests for quote character\nconstexpr bool textQuoted(std::string_view lineBuffer, Sci_PositionU endPos) noexcept {\n\tconst std::string_view svBuffer = lineBuffer.substr(0, endPos);\n\treturn IsQuotedBy(svBuffer, '\\\"') || IsQuotedBy(svBuffer, '\\'');\n}\n\nbool IsContinuation(const std::string &lineBuffer) noexcept {\n\tif ((lineBuffer.length() <= 1) || (lineBuffer == \"\\r\\n\")) // empty line on Unix and Mac or on Windows\n\t\treturn false;\n\tSci_PositionU lineContinuationPos = lineBuffer.length() - 2; // Unix or Mac EOL\n\tif ((lineBuffer.length() > 2) && lineBuffer[lineBuffer.length() - 2] == '\\r') // Windows EOL\n\t\tlineContinuationPos = lineBuffer.length() - 3;\n\t// Reset continueProcessing if line continuation was not found\n\tif ((lineBuffer[lineContinuationPos] != '^')\n\t\t|| IsEscaped(lineBuffer, lineContinuationPos)\n\t\t|| textQuoted(lineBuffer, lineContinuationPos))\n\t\treturn false;\n\treturn true;\n}\n\nSci_Position SCI_METHOD LexerBatch::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywords2;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl)) {\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid LexerBatch::Lex(Sci_PositionU startPos, Sci_Position length, int, Scintilla::IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\t// Always backtracks to the start of a line that is not a continuation\n\t// of the previous line\n\tif (startPos > 0) {\n\t\tSci_Position ln = styler.GetLine(startPos); // Current line number\n\t\twhile (startPos > 0) {\n\t\t\tln--;\n\t\t\tif ((styler.SafeGetCharAt(startPos-3) == '^' && styler.SafeGetCharAt(startPos-2) == '\\r' && styler.SafeGetCharAt(startPos-1) == '\\n')\n\t\t\t|| styler.SafeGetCharAt(startPos-2) == '^') {\t// handle '^' line continuation\n\t\t\t\t// When the line continuation is found,\n\t\t\t\t// set the Start Position to the Start of the previous line\n\t\t\t\tlength+=startPos-styler.LineStart(ln);\n\t\t\t\tstartPos=styler.LineStart(ln);\n\t\t\t}\n\t\t\telse\n\t\t\t\tbreak;\n\t\t}\n\t}\n\n\tstd::string lineBuffer;\n\tstd::string word;\n\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\tSci_PositionU startLine = startPos;\n\tbool continueProcessing = true;\t// Used to toggle Regular Keyword Checking\n\tbool isNotAssigned=false; // Used to flag Assignment in Set operation\n\n\tfor (Sci_PositionU i = startPos; i < startPos + length; i++) {\n\t\t// All testing is performed on a lower case version of the line since batch is case-insensitive\n\t\tlineBuffer.push_back(MakeLowerCase(styler[i]));\n\t\tif (AtEOL(styler, i) || (i==startPos + length-1)) {\n\t\t\t// End of line (or of line buffer) (or End of Last Line) met, colourise it\n\t\t\tconst Sci_PositionU lengthLine = lineBuffer.length();\n\t\t\tconst Sci_PositionU endPos=i;\n\n\t\t\t// CHOICE, ECHO, GOTO, PROMPT and SET have Default Text that may contain Regular Keywords\n\t\t\t// Toggling Regular Keyword Checking off improves readability\n\t\t\t// Other Regular Keywords and External Commands / Programs might also benefit from toggling\n\t\t\t// Need a more robust algorithm to properly toggle Regular Keyword Checking\n\t\t\tbool stopLineProcessing=false; // Used to stop line processing if Comment or Drive Change found\n\n\t\t\tSci_PositionU offset = 0;\t// Line Buffer Offset\n\t\t\t// Skip initial spaces\n\t\t\tSkipSpace(offset, lineBuffer);\n\t\t\t// Colorize Default Text\n\t\t\tstyler.ColourTo(startLine + offset - 1, SCE_BAT_DEFAULT);\n\t\t\t// Set External Command / Program Location\n\t\t\tSci_PositionU cmdLoc = offset;\n\n\t\t\t// Check for Fake Label (Comment) or Real Label - return if found\n\t\t\tif (lineBuffer[offset] == ':') {\n\t\t\t\tif (lineBuffer[offset + 1] == ':') {\n\t\t\t\t\t// Colorize Fake Label (Comment) - :: is similar to REM, see http://content.techweb.com/winmag/columns/explorer/2000/21.htm\n\t\t\t\t\tstyler.ColourTo(endPos, SCE_BAT_COMMENT);\n\t\t\t\t} else {\n\t\t\t\t\t// Colorize Real Label\n\t\t\t\t\t// :[\\t ]*[^\\t &+:<>|]+\n\t\t\t\t\tconst size_t whitespaceEnd = lineBuffer.find_first_not_of(\"\\t \", offset + 1);\n\t\t\t\t\tconst size_t whitespaceLength = (whitespaceEnd == std::string::npos) ? 0 : whitespaceEnd;\n\t\t\t\t\t// Set of label-terminating characters determined experimentally\n\t\t\t\t\tconst size_t labelEnd = lineBuffer.find_first_of(\"\\t &+:<>|\", whitespaceLength);\n\t\t\t\t\tif (labelEnd != std::string::npos) {\n\t\t\t\t\t\tstyler.ColourTo(startLine + labelEnd - 1, SCE_BAT_LABEL);\n\t\t\t\t\t\tstyler.ColourTo(endPos, SCE_BAT_AFTER_LABEL);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(endPos, SCE_BAT_LABEL);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tstopLineProcessing=true;\n\t\t\t// Check for Drive Change (Drive Change is internal command) - return if found\n\t\t\t} else if ((IsAlphabetic(lineBuffer[offset])) &&\n\t\t\t\t(lineBuffer[offset + 1] == ':') &&\n\t\t\t\t((isspacechar(lineBuffer[offset + 2])) ||\n\t\t\t\t(((lineBuffer[offset + 2] == '\\\\')) &&\n\t\t\t\t(isspacechar(lineBuffer[offset + 3]))))) {\n\t\t\t\t// Colorize Regular Keyword\n\t\t\t\tstyler.ColourTo(endPos, SCE_BAT_WORD);\n\t\t\t\tstopLineProcessing=true;\n\t\t\t}\n\n\t\t\t// Check for Hide Command (@ECHO OFF/ON)\n\t\t\tif (lineBuffer[offset] == '@') {\n\t\t\t\tstyler.ColourTo(startLine + offset, SCE_BAT_HIDE);\n\t\t\t\toffset++;\n\t\t\t}\n\t\t\t// Skip next spaces\n\t\t\tSkipSpace(offset, lineBuffer);\n\n\t\t\t// Read remainder of line word-at-a-time or remainder-of-word-at-a-time\n\t\t\twhile (offset < lengthLine && !stopLineProcessing) {\n\t\t\t\tif (offset > startLine) {\n\t\t\t\t\t// Colorize Default Text\n\t\t\t\t\tstyler.ColourTo(startLine + offset - 1, SCE_BAT_DEFAULT);\n\t\t\t\t}\n\t\t\t\t// Copy word from Line Buffer\n\t\t\t\tconst Sci_PositionU wordStart = offset;\n\t\t\t\tSkipNonSpace(offset, lineBuffer);\n\t\t\t\tconst Sci_PositionU wbl = offset - wordStart;\t\t// Word Buffer Length\n\t\t\t\t// Using assign to prevent new allocations\n\t\t\t\tword.assign(lineBuffer, wordStart, wbl);\n\t\t\t\tconst char first = word.front();\n\t\t\t\tSci_PositionU wbo = 0;\t\t// Word Buffer Offset - also Special Keyword Buffer Length\n\n\t\t\t\t// Check for Comment - return if found\n\t\t\t\tif (continueProcessing) {\n\t\t\t\t\tif ((word == \"rem\") || (word.substr(0,2) == \"::\")) {\n\t\t\t\t\t\tif ((offset == wbl) || !textQuoted(lineBuffer, wordStart)) {\n\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t\t\tstyler.ColourTo(endPos, SCE_BAT_COMMENT);\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// Check for Separator\n\t\t\t\tif (IsBSeparator(first)) {\n\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\tint style = SCE_BAT_DEFAULT;\n\t\t\t\t\tif ((cmdLoc == wordStart) &&\n\t\t\t\t\t\t(AnyOf(first, ':', '\\\\', '.'))) {\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 1;\n\t\t\t\t\t\t// Colorize External Command / Program\n\t\t\t\t\t\tif ((!keywords2) || (keywords2.InList(word))) {\n\t\t\t\t\t\t\tstyle = SCE_BAT_COMMAND;\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Reset External Command / Program Location\n\t\t\t\t\t\tcmdLoc = offset;\n\t\t\t\t\t} else {\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 1;\n\t\t\t\t\t}\n\t\t\t\t\t// Colorize Text\n\t\t\t\t\tstyler.ColourTo(startLine + offset - 1, style);\n\t\t\t\t// Check for Regular Keyword in list\n\t\t\t\t} else if ((keywords.InList(word)) && (continueProcessing)) {\n\t\t\t\t\t// ECHO, GOTO, PROMPT and SET require no further Regular Keyword Checking\n\t\t\t\t\tif (InList(word, {\"echo\", \"goto\", \"prompt\"})) {\n\t\t\t\t\t\tcontinueProcessing = false;\n\t\t\t\t\t}\n\t\t\t\t\t// SET requires additional processing for the assignment operator\n\t\t\t\t\tif (word == \"set\") {\n\t\t\t\t\t\tcontinueProcessing = false;\n\t\t\t\t\t\tisNotAssigned=true;\n\t\t\t\t\t}\n\t\t\t\t\t// Identify External Command / Program Location for ERRORLEVEL, and EXIST\n\t\t\t\t\tif (InList(word, {\"errorlevel\", \"exist\"})) {\n\t\t\t\t\t\t// Reset External Command / Program Location\n\t\t\t\t\t\tcmdLoc = offset;\n\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t// Skip comparison\n\t\t\t\t\t\tSkipNonSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t// Identify External Command / Program Location for CALL, DO, LOADHIGH and LH\n\t\t\t\t\t} else if (InList(word, {\"call\", \"do\", \"loadhigh\", \"lh\"})) {\n\t\t\t\t\t\t// Reset External Command / Program Location\n\t\t\t\t\t\tcmdLoc = offset;\n\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t// Check if call is followed by a label\n\t\t\t\t\t\tif ((lineBuffer[cmdLoc] == ':') &&\n\t\t\t\t\t\t\t(word == \"call\")) {\n\t\t\t\t\t\t\tcontinueProcessing = false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\t// Colorize Regular keyword\n\t\t\t\t\tstyler.ColourTo(startLine + offset - 1, SCE_BAT_WORD);\n\t\t\t\t\t// No need to Reset Offset\n\t\t\t\t// Check for Special Keyword in list, External Command / Program, or Default Text\n\t\t\t\t} else if (\n\t\t\t\t\t(!(IsBOperator(first) || AnyOf(first, '%', '!'))) &&\n\t\t\t\t\t(continueProcessing)) {\n\t\t\t\t\t// Check for Special Keyword\n\t\t\t\t\t// Affected Commands are in Length range 2-6\n\t\t\t\t\t// Good that ERRORLEVEL, EXIST, CALL, DO, LOADHIGH, and LH are unaffected\n\t\t\t\t\tbool sKeywordFound = false;\t\t// Exit Special Keyword for-loop if found\n\t\t\t\t\tfor (Sci_PositionU keywordLength = 2; keywordLength < wbl && keywordLength < 7 && !sKeywordFound; keywordLength++) {\n\t\t\t\t\t\t// Special Keywords are those that allow certain characters without whitespace after the command\n\t\t\t\t\t\t// Examples are: cd. cd\\ md. rd. dir| dir> echo: echo. path=\n\t\t\t\t\t\t// Special Keyword used to determine if the first n characters is a Keyword\n\t\t\t\t\t\twbo = keywordLength;\n\t\t\t\t\t\tconst std::string sKeyword = word.substr(0, keywordLength);\n\t\t\t\t\t\t// Check for Special Keyword in list\n\t\t\t\t\t\tif ((keywords.InList(sKeyword)) &&\n\t\t\t\t\t\t\t((IsBPunctuation(word[wbo])) ||\n\t\t\t\t\t\t\t(word[wbo] == ':' && (InList(sKeyword, {\"call\", \"echo\", \"goto\"}) )))) {\n\t\t\t\t\t\t\tsKeywordFound = true;\n\t\t\t\t\t\t\t// ECHO requires no further Regular Keyword Checking\n\t\t\t\t\t\t\tif (sKeyword== \"echo\") {\n\t\t\t\t\t\t\t\tcontinueProcessing = false;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t// Colorize Special Keyword as Regular Keyword\n\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + wbo - 1, SCE_BAT_WORD);\n\t\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\t\toffset = wordStart + wbo;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\t// Check for External Command / Program or Default Text\n\t\t\t\t\tif (!sKeywordFound) {\n\t\t\t\t\t\tint style = SCE_BAT_DEFAULT;\n\t\t\t\t\t\t// Read up to %, !, Operator or Separator\n\t\t\t\t\t\tconst Sci_PositionU lengthWord = WordLength(word);\n\t\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\t\tif (cmdLoc == wordStart) {\n\t\t\t\t\t\t\t// Reset External Command / Program Location\n\t\t\t\t\t\t\tcmdLoc = wordStart + lengthWord;\n\t\t\t\t\t\t\t// CHOICE requires no further Regular Keyword Checking\n\t\t\t\t\t\t\tif (word == \"choice\") {\n\t\t\t\t\t\t\t\tcontinueProcessing = false;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t// Check for START (and its switches) - What follows is External Command \\ Program\n\t\t\t\t\t\t\tif (word == \"start\") {\n\t\t\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t\t\t// Reset External Command / Program Location if command switch detected\n\t\t\t\t\t\t\t\tif (lineBuffer[cmdLoc] == '/') {\n\t\t\t\t\t\t\t\t\t// Skip command switch\n\t\t\t\t\t\t\t\t\tSkipNonSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t// Colorize External Command / Program\n\t\t\t\t\t\t\tif ((!keywords2) || (keywords2.InList(word))) {\n\t\t\t\t\t\t\t\tstyle = SCE_BAT_COMMAND;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + lengthWord - 1, style);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + lengthWord;\n\t\t\t\t\t}\n\t\t\t\t// Check for Argument (%n), Environment Variable (%x...%) or Local Variable (%%a)\n\t\t\t\t} else if (first == '%') {\n\t\t\t\t\t// Colorize Default Text\n\t\t\t\t\tstyler.ColourTo(startLine + wordStart - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\twbo++;\n\t\t\t\t\t// Search to end of word for second % (can be a long path)\n\t\t\t\t\twhile ((wbo < wbl) && (word[wbo] != '%')) {\n\t\t\t\t\t\twbo++;\n\t\t\t\t\t}\n\t\t\t\t\t// Check for Argument (%n) or (%*)\n\t\t\t\t\tif (((Is0To9(word[1])) || (word[1] == '*')) &&\n\t\t\t\t\t\t(word[wbo] != '%')) {\n\t\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\t\tif (cmdLoc == wordStart) {\n\t\t\t\t\t\t\tcmdLoc = wordStart + 2;\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Colorize Argument\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + 1, SCE_BAT_IDENTIFIER);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 2;\n\t\t\t\t\t// Check for Expanded Argument (%~...) / Variable (%%~...)\n\t\t\t\t\t// Expanded Argument: %~[]\n\t\t\t\t\t// Expanded Variable: %%~[]\n\t\t\t\t\t// Path operators are exclusively alphabetic.\n\t\t\t\t\t// Expanded arguments have a single digit at the end.\n\t\t\t\t\t// Expanded variables have a single identifier character as variable name.\n\t\t\t\t\t} else if (((wbl > 1) && (word[1] == '~')) ||\n\t\t\t\t\t\t((wbl > 2) && (word[1] == '%') && (word[2] == '~'))) {\n\t\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\t\tif (cmdLoc == wordStart) {\n\t\t\t\t\t\t\tcmdLoc = wordStart + wbo;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tconst bool isArgument = (word[1] == '~');\n\t\t\t\t\t\tif (isArgument) {\n\t\t\t\t\t\t\tSci_PositionU expansionStopOffset = 2;\n\t\t\t\t\t\t\tbool isValid = false;\n\t\t\t\t\t\t\tfor (; expansionStopOffset < wbl; expansionStopOffset++) {\n\t\t\t\t\t\t\t\tif (Is0To9(word[expansionStopOffset])) {\n\t\t\t\t\t\t\t\t\texpansionStopOffset++;\n\t\t\t\t\t\t\t\t\tisValid = true;\n\t\t\t\t\t\t\t\t\twbo = expansionStopOffset;\n\t\t\t\t\t\t\t\t\t// Colorize Expanded Argument\n\t\t\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + wbo - 1, SCE_BAT_IDENTIFIER);\n\t\t\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tif (!isValid) {\n\t\t\t\t\t\t\t\t// not a valid expanded argument or variable\n\t\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + wbo - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t// Expanded Variable\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t// start after ~\n\t\t\t\t\t\t\twbo = 3;\n\t\t\t\t\t\t\t// Search to end of word for another % (can be a long path)\n\t\t\t\t\t\t\twhile ((wbo < wbl) && (!(IsBPunctuation(word[wbo]) || (word[wbo] == '%')))) {\n\t\t\t\t\t\t\t\twbo++;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tif (wbo > 3) {\n\t\t\t\t\t\t\t\t// Colorize Expanded Variable\n\t\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + wbo - 1, SCE_BAT_IDENTIFIER);\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\t// not a valid expanded argument or variable\n\t\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + wbo - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + wbo;\n\t\t\t\t\t// Check for Environment Variable (%x...%)\n\t\t\t\t\t} else if ((word[1] != '%') && (word[wbo] == '%')) {\n\t\t\t\t\t\twbo++;\n\t\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\t\tif (cmdLoc == wordStart) {\n\t\t\t\t\t\t\tcmdLoc = wordStart + wbo;\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Colorize Environment Variable\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + wbo - 1, SCE_BAT_IDENTIFIER);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + wbo;\n\t\t\t\t\t// Check for Local Variable (%%a)\n\t\t\t\t\t} else if (\n\t\t\t\t\t\t(wbl > 2) &&\n\t\t\t\t\t\t(word[1] == '%') &&\n\t\t\t\t\t\t(word[2] != '%') &&\n\t\t\t\t\t\t(!IsBPunctuation(word[2]))) {\n\t\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\t\tif (cmdLoc == wordStart) {\n\t\t\t\t\t\t\tcmdLoc = wordStart + 3;\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Colorize Local Variable\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + 2, SCE_BAT_IDENTIFIER);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 3;\n\t\t\t\t\t// escaped %\n\t\t\t\t\t} else if (\n\t\t\t\t\t\t(wbl > 1) &&\n\t\t\t\t\t\t(word[1] == '%')) {\n\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t\toffset = wordStart + 2;\n\t\t\t\t\t}\n\t\t\t\t// Check for Environment Variable (!x...!)\n\t\t\t\t} else if (first == '!') {\n\t\t\t\t\t// Colorize Default Text\n\t\t\t\t\tstyler.ColourTo(startLine + wordStart - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\tconst size_t nextExclamation = word.find('!', 1);\n\t\t\t\t\tif (nextExclamation != std::string::npos) {\n\t\t\t\t\t\t// Check for External Command / Program\n\t\t\t\t\t\tif (cmdLoc == wordStart) {\n\t\t\t\t\t\t\tcmdLoc = wordStart + nextExclamation + 1;\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Colorize Environment Variable\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + nextExclamation, SCE_BAT_IDENTIFIER);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + nextExclamation + 1;\n\t\t\t\t\t}\n\t\t\t\t// Check for Operator\n\t\t\t\t} else if (IsBOperator(first)) {\n\t\t\t\t\t// Colorize Default Text\n\t\t\t\t\tstyler.ColourTo(startLine + wordStart - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t// Check for Comparison Operator\n\t\t\t\t\tif ((first == '=') && (word[1] == '=')) {\n\t\t\t\t\t\t// Identify External Command / Program Location for IF\n\t\t\t\t\t\tcmdLoc = offset;\n\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t// Colorize Comparison Operator\n\t\t\t\t\t\tif (continueProcessing)\n\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + 1, SCE_BAT_OPERATOR);\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart + 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 2;\n\t\t\t\t\t// Check for Pipe Operator\n\t\t\t\t\t} else if ((first == '|') &&\n\t\t\t\t\t\t\t\t!(IsEscaped(lineBuffer, wordStart + wbo) || textQuoted(lineBuffer, wordStart))) {\n\t\t\t\t\t\t// Reset External Command / Program Location\n\t\t\t\t\t\tcmdLoc = wordStart + 1;\n\t\t\t\t\t\t// Skip next spaces\n\t\t\t\t\t\tSkipSpace(cmdLoc, lineBuffer);\n\t\t\t\t\t\t// Colorize Pipe Operator\n\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart, SCE_BAT_OPERATOR);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 1;\n\t\t\t\t\t\tcontinueProcessing = true;\n\t\t\t\t\t// Check for Other Operator\n\t\t\t\t\t} else {\n\t\t\t\t\t\t// Check for Operators: >, |, &\n\t\t\t\t\t\tif ((AnyOf(first, '>', ')', '(', '&')) &&\n\t\t\t\t\t\t !(!continueProcessing && (IsEscaped(lineBuffer, wordStart + wbo)\n\t\t\t\t\t\t || textQuoted(lineBuffer, wordStart)))){\n\t\t\t\t\t\t\t// Turn Keyword and External Command / Program checking back on\n\t\t\t\t\t\t\tcontinueProcessing = true;\n\t\t\t\t\t\t\tisNotAssigned=false;\n\t\t\t\t\t\t}\n\t\t\t\t\t\t// Colorize Other Operators\n\t\t\t\t\t\t// Do not Colorize Parenthesis, quoted text and escaped operators\n\t\t\t\t\t\tif ((!AnyOf(first, ')', '(')\n\t\t\t\t\t\t&& !textQuoted(lineBuffer, wordStart) && !IsEscaped(lineBuffer, wordStart + wbo))\n\t\t\t\t\t\t&& !((first == '=') && !isNotAssigned))\n\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart, SCE_BAT_OPERATOR);\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tstyler.ColourTo(startLine + wordStart, SCE_BAT_DEFAULT);\n\t\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\t\toffset = wordStart + 1;\n\n\t\t\t\t\t\tif ((first == '=') && isNotAssigned){\n\t\t\t\t\t\t\tisNotAssigned=false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t// Check for Default Text\n\t\t\t\t} else {\n\t\t\t\t\t// Read up to %, !, Operator or Separator\n\t\t\t\t\tconst Sci_PositionU lengthWord = WordLength(word);\n\t\t\t\t\t// Colorize Default Text\n\t\t\t\t\tstyler.ColourTo(startLine + wordStart + lengthWord - 1, SCE_BAT_DEFAULT);\n\t\t\t\t\t// Reset Offset to re-process remainder of word\n\t\t\t\t\toffset = wordStart + lengthWord;\n\t\t\t\t}\n\t\t\t\t// Skip next spaces - nothing happens if Offset was Reset\n\t\t\t\tSkipSpace(offset, lineBuffer);\n\t\t\t}\n\t\t\t// Colorize Default Text for remainder of line - currently not lexed\n\t\t\tstyler.ColourTo(endPos, SCE_BAT_DEFAULT);\n\n\t\t\t// handle line continuation for SET and ECHO commands except the last line\n\t\t\tif (!continueProcessing && (i\n#include \n\n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"PropSetSimple.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nnamespace {\n\tbool IsAlphabetic(unsigned int ch)\n\t{\n\t\treturn IsASCII(ch) && std::isalpha(ch) != 0;\n\t}\n\tbool IsAlphaNumeric(char ch)\n\t{\n\t return IsASCII(ch) && std::isalnum(ch);\n\t}\n\n\tbool EqualCaseInsensitive(const char* a, const char* b)\n\t{\n\t\treturn CompareCaseInsensitive(a, b) == 0;\n\t}\n\n\tbool EntryWithoutKey(const char* name)\n\t{\n\t\treturn EqualCaseInsensitive(name,\"string\");\n\t}\n\n\tchar GetClosingBrace(char openbrace)\n\t{\n\t\tchar result = openbrace;\n\n\t\tswitch (openbrace) {\n\t\t\tcase '(': result = ')'; break;\n\t\t\tcase '{': result = '}'; break;\n\t\t}\n\n\t\treturn result;\n\t}\n\n\tbool IsEntryStart(char prev, char ch)\n\t{\n\t\treturn prev != '\\\\' && ch == '@';\n\t}\n\n\tbool IsEntryStart(const StyleContext& sc)\n\t{\n\t\treturn IsEntryStart(sc.chPrev, sc.ch);\n\t}\n\n\tvoid ColorizeBibTeX(Sci_PositionU start_pos, Sci_Position length, int /*init_style*/, WordList* keywordlists[], Accessor& styler)\n\t{\n\t WordList &EntryNames = *keywordlists[0];\n\t\tbool fold_compact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\n\t\tstd::string buffer;\n\t\tbuffer.reserve(25);\n\n\t\t// We always colorize a section from the beginning, so let's\n\t\t// search for the @ character which isn't escaped, i.e. \\@\n\t\twhile (start_pos > 0 && !IsEntryStart(styler.SafeGetCharAt(start_pos - 1),\n\t\t\tstyler.SafeGetCharAt(start_pos))) {\n\t\t\t--start_pos; ++length;\n\t\t}\n\n\t\tstyler.StartAt(start_pos);\n\t\tstyler.StartSegment(start_pos);\n\n\t\tSci_Position current_line = styler.GetLine(start_pos);\n\t\tint prev_level = styler.LevelAt(current_line) & SC_FOLDLEVELNUMBERMASK;\n\t\tint current_level = prev_level;\n\t\tint visible_chars = 0;\n\n\t\tbool in_comment = false ;\n\t\tStyleContext sc(start_pos, length, SCE_BIBTEX_DEFAULT, styler);\n\n\t\tbool going = sc.More(); // needed because of a fuzzy end of file state\n\t\tchar closing_brace = 0;\n\t\tbool collect_entry_name = false;\n\n\t\tfor (; going; sc.Forward()) {\n\t\t\tif (!sc.More())\n\t\t\t\tgoing = false; // we need to go one behind the end of text\n\n\t\t\tif (in_comment) {\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_DEFAULT);\n\t\t\t\t\tin_comment = false;\n\t\t\t\t}\n\t\t\t}\n\t\t\telse {\n\t\t\t\t// Found @entry\n\t\t\t\tif (IsEntryStart(sc)) {\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_UNKNOWN_ENTRY);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\t++current_level;\n\n\t\t\t\t\tbuffer.clear();\n\t\t\t\t\tcollect_entry_name = true;\n\t\t\t\t}\n\t\t\t\telse if ((sc.state == SCE_BIBTEX_ENTRY || sc.state == SCE_BIBTEX_UNKNOWN_ENTRY)\n\t\t\t\t\t&& (sc.ch == '{' || sc.ch == '(')) {\n\t\t\t\t\t// Entry name colorization done\n\t\t\t\t\t// Found either a { or a ( after entry's name, e.g. @entry(...) @entry{...}\n\t\t\t\t\t// Closing counterpart needs to be stored.\n\t\t\t\t\tclosing_brace = GetClosingBrace(sc.ch);\n\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_DEFAULT); // Don't colorize { (\n\n\t\t\t\t\t// @string doesn't have any key\n\t\t\t\t\tif (EntryWithoutKey(buffer.c_str()))\n\t\t\t\t\t\tsc.ForwardSetState(SCE_BIBTEX_PARAMETER);\n\t\t\t\t\telse\n\t\t\t\t\t\tsc.ForwardSetState(SCE_BIBTEX_KEY); // Key/label colorization\n\t\t\t\t}\n\n\t\t\t\t// Need to handle the case where entry's key is empty\n\t\t\t\t// e.g. @book{,...}\n\t\t\t\tif (sc.state == SCE_BIBTEX_KEY && sc.ch == ',') {\n\t\t\t\t\t// Key/label colorization done\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_DEFAULT); // Don't colorize the ,\n\t\t\t\t\tsc.ForwardSetState(SCE_BIBTEX_PARAMETER); // Parameter colorization\n\t\t\t\t}\n\t\t\t\telse if (sc.state == SCE_BIBTEX_PARAMETER && sc.ch == '=') {\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_DEFAULT); // Don't colorize the =\n\t\t\t\t\tsc.ForwardSetState(SCE_BIBTEX_VALUE); // Parameter value colorization\n\n\t\t\t\t\tSci_Position start = sc.currentPos;\n\n\t\t\t\t\t// We need to handle multiple situations:\n\t\t\t\t\t// 1. name\"one two {three}\"\n\t\t\t\t\t// 2. name={one {one two {two}} three}\n\t\t\t\t\t// 3. year=2005\n\n\t\t\t\t\t// Skip \", { until we encounter the first alphanumerical character\n\t\t\t\t\twhile (sc.More() && !(IsAlphaNumeric(sc.ch) || sc.ch == '\"' || sc.ch == '{'))\n\t\t\t\t\t\tsc.Forward();\n\n\t\t\t\t\tif (sc.More()) {\n\t\t\t\t\t\t// Store \" or {\n\t\t\t\t\t\tchar ch = sc.ch;\n\n\t\t\t\t\t\t// Not interested in alphanumerical characters\n\t\t\t\t\t\tif (IsAlphaNumeric(ch))\n\t\t\t\t\t\t\tch = 0;\n\n\t\t\t\t\t\tint skipped = 0;\n\n\t\t\t\t\t\tif (ch) {\n\t\t\t\t\t\t\t// Skip preceding \" or { such as in name={{test}}.\n\t\t\t\t\t\t\t// Remember how many characters have been skipped\n\t\t\t\t\t\t\t// Make sure that empty values, i.e. \"\" are also handled correctly\n\t\t\t\t\t\t\twhile (sc.More() && (sc.ch == ch && (ch != '\"' || skipped < 1))) {\n\t\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t\t\t++skipped;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\t// Closing counterpart for \" is the same character\n\t\t\t\t\t\tif (ch == '{')\n\t\t\t\t\t\t\tch = '}';\n\n\t\t\t\t\t\t// We have reached the parameter value\n\t\t\t\t\t\t// In case the open character was a alnum char, skip until , is found\n\t\t\t\t\t\t// otherwise until skipped == 0\n\t\t\t\t\t\twhile (sc.More() && (skipped > 0 || (!ch && !(sc.ch == ',' || sc.ch == closing_brace)))) {\n\t\t\t\t\t\t\t// Make sure the character isn't escaped\n\t\t\t\t\t\t\tif (sc.chPrev != '\\\\') {\n\t\t\t\t\t\t\t\t// Parameter value contains a { which is the 2nd case described above\n\t\t\t\t\t\t\t\tif (sc.ch == '{')\n\t\t\t\t\t\t\t\t\t++skipped; // Remember it\n\t\t\t\t\t\t\t\telse if (sc.ch == '}')\n\t\t\t\t\t\t\t\t\t--skipped;\n\t\t\t\t\t\t\t\telse if (skipped == 1 && sc.ch == ch && ch == '\"') // Don't ignore cases like {\"o}\n\t\t\t\t\t\t\t\t\tskipped = 0;\n\t\t\t\t\t\t\t}\n\n\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\n\t\t\t\t\t// Don't colorize the ,\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_DEFAULT);\n\n\t\t\t\t\t// Skip until the , or entry's closing closing_brace is found\n\t\t\t\t\t// since this parameter might be the last one\n\t\t\t\t\twhile (sc.More() && !(sc.ch == ',' || sc.ch == closing_brace))\n\t\t\t\t\t\tsc.Forward();\n\n\t\t\t\t\tint state = SCE_BIBTEX_PARAMETER; // The might be more parameters\n\n\t\t\t\t\t// We've reached the closing closing_brace for the bib entry\n\t\t\t\t\t// in case no \" or {} has been used to enclose the value,\n\t\t\t\t\t// as in 3rd case described above\n\t\t\t\t\tif (sc.ch == closing_brace) {\n\t\t\t\t\t\t--current_level;\n\t\t\t\t\t\t// Make sure the text between entries is not colored\n\t\t\t\t\t\t// using parameter's style\n\t\t\t\t\t\tstate = SCE_BIBTEX_DEFAULT;\n\t\t\t\t\t}\n\n\t\t\t\t\tSci_Position end = sc.currentPos;\n\t\t\t\t\tcurrent_line = styler.GetLine(end);\n\n\t\t\t\t\t// We have possibly skipped some lines, so the folding levels\n\t\t\t\t\t// have to be adjusted separately\n\t\t\t\t\tfor (Sci_Position i = styler.GetLine(start); i <= styler.GetLine(end); ++i)\n\t\t\t\t\t\tstyler.SetLevel(i, prev_level);\n\n\t\t\t\t\tsc.ForwardSetState(state);\n\t\t\t\t}\n\n\t\t\t\tif (sc.state == SCE_BIBTEX_PARAMETER && sc.ch == closing_brace) {\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_DEFAULT);\n\t\t\t\t\t--current_level;\n\t\t\t\t}\n\n\t\t\t\t// Non escaped % found which represents a comment until the end of the line\n\t\t\t\tif (sc.chPrev != '\\\\' && sc.ch == '%') {\n\t\t\t\t\tin_comment = true;\n\t\t\t\t\tsc.SetState(SCE_BIBTEX_COMMENT);\n\t\t\t\t}\n\t\t\t}\n\n\t\t\tif (sc.state == SCE_BIBTEX_UNKNOWN_ENTRY || sc.state == SCE_BIBTEX_ENTRY) {\n\t\t\t\tif (!IsAlphabetic(sc.ch) && collect_entry_name)\n\t\t\t\t\tcollect_entry_name = false;\n\n\t\t\t\tif (collect_entry_name) {\n\t\t\t\t\tbuffer += static_cast(tolower(sc.ch));\n if (EntryNames.InList(buffer.c_str()))\n sc.ChangeState(SCE_BIBTEX_ENTRY);\n else\n sc.ChangeState(SCE_BIBTEX_UNKNOWN_ENTRY);\n\t\t\t\t}\n\t\t\t}\n\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tint level = prev_level;\n\n\t\t\t\tif (visible_chars == 0 && fold_compact)\n\t\t\t\t\tlevel |= SC_FOLDLEVELWHITEFLAG;\n\n\t\t\t\tif ((current_level > prev_level))\n\t\t\t\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t// else if (current_level < prev_level)\n\t\t\t\t//\tlevel |= SC_FOLDLEVELBOXFOOTERFLAG; // Deprecated\n\n\t\t\t\tif (level != styler.LevelAt(current_line)) {\n\t\t\t\t\tstyler.SetLevel(current_line, level);\n\t\t\t\t}\n\n\t\t\t\t++current_line;\n\t\t\t\tprev_level = current_level;\n\t\t\t\tvisible_chars = 0;\n\t\t\t}\n\n\t\t\tif (!isspacechar(sc.ch))\n\t\t\t\t++visible_chars;\n\t\t}\n\n\t\tsc.Complete();\n\n\t\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\t\tint flagsNext = styler.LevelAt(current_line) & ~SC_FOLDLEVELNUMBERMASK;\n\t\tstyler.SetLevel(current_line, prev_level | flagsNext);\n\t}\n}\nstatic const char * const BibTeXWordLists[] = {\n \"Entry Names\",\n 0,\n};\n\n\nextern const LexerModule lmBibTeX(SCLEX_BIBTEX, ColorizeBibTeX, \"bib\", 0, BibTeXWordLists);\n\n// Entry Names\n// article, book, booklet, conference, inbook,\n// incollection, inproceedings, manual, mastersthesis,\n// misc, phdthesis, proceedings, techreport, unpublished,\n// string, url\n\n" }, { "path": "lexers/LexBullant.cxx", "content": "// SciTE - Scintilla based Text Editor\n// LexBullant.cxx - lexer for Bullant\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic int classifyWordBullant(Sci_PositionU start, Sci_PositionU end, WordList &keywords, Accessor &styler) {\n\tchar s[100];\n\ts[0] = '\\0';\n\tfor (Sci_PositionU i = 0; i < end - start + 1 && i < 30; i++) {\n\t\ts[i] = static_cast(tolower(styler[start + i]));\n\t\ts[i + 1] = '\\0';\n\t}\n\tint lev= 0;\n\tchar chAttr = SCE_C_IDENTIFIER;\n\tif (isdigit(s[0]) || (s[0] == '.')){\n\t\tchAttr = SCE_C_NUMBER;\n\t}\n\telse {\n\t\tif (keywords.InList(s)) {\n\t\t\tchAttr = SCE_C_WORD;\n\t\t\tif (strcmp(s, \"end\") == 0)\n\t\t\t\tlev = -1;\n\t\t\telse if (strcmp(s, \"method\") == 0 ||\n\t\t\t\tstrcmp(s, \"case\") == 0 ||\n\t\t\t\tstrcmp(s, \"class\") == 0 ||\n\t\t\t\tstrcmp(s, \"debug\") == 0 ||\n\t\t\t\tstrcmp(s, \"test\") == 0 ||\n\t\t\t\tstrcmp(s, \"if\") == 0 ||\n\t\t\t\tstrcmp(s, \"lock\") == 0 ||\n\t\t\t\tstrcmp(s, \"transaction\") == 0 ||\n\t\t\t\tstrcmp(s, \"trap\") == 0 ||\n\t\t\t\tstrcmp(s, \"until\") == 0 ||\n\t\t\t\tstrcmp(s, \"while\") == 0)\n\t\t\t\tlev = 1;\n\t\t}\n\t}\n\tstyler.ColourTo(end, chAttr);\n\treturn lev;\n}\n\nstatic void ColouriseBullantDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n\tAccessor &styler) {\n\tWordList &keywords = *keywordlists[0];\n\n\tstyler.StartAt(startPos);\n\n\tbool fold = styler.GetPropertyInt(\"fold\") != 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\n\tint state = initStyle;\n\tif (state == SCE_C_STRINGEOL)\t// Does not leak onto next line\n\t\tstate = SCE_C_DEFAULT;\n\tchar chPrev = ' ';\n\tchar chNext = styler[startPos];\n\tSci_PositionU lengthDoc = startPos + length;\n\tint visibleChars = 0;\n\tstyler.StartSegment(startPos);\n\tint endFoundThisLine = 0;\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif ((ch == '\\r' && chNext != '\\n') || (ch == '\\n')) {\n\t\t\t// Trigger on CR only (Mac style) or either on LF from CR+LF (Dos/Win) or on LF alone (Unix)\n\t\t\t// Avoid triggering two times on Dos/Win\n\t\t\t// End of line\n\t\t\tendFoundThisLine = 0;\n\t\t\tif (state == SCE_C_STRINGEOL) {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tstate = SCE_C_DEFAULT;\n\t\t\t}\n\t\t\tif (fold) {\n\t\t\t\tint lev = levelPrev;\n\t\t\t\tif (visibleChars == 0)\n\t\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t\tlineCurrent++;\n\t\t\t\tlevelPrev = levelCurrent;\n\t\t\t}\n\t\t\tvisibleChars = 0;\n\n/*\t\t\tint indentBlock = GetLineIndentation(lineCurrent);\n\t\t\tif (blockChange==1){\n\t\t\t\tlineCurrent++;\n\t\t\t\tint pos=SetLineIndentation(lineCurrent, indentBlock + indentSize);\n\t\t\t} else if (blockChange==-1) {\n\t\t\t\tindentBlock -= indentSize;\n\t\t\t\tif (indentBlock < 0)\n\t\t\t\t\tindentBlock = 0;\n\t\t\t\tSetLineIndentation(lineCurrent, indentBlock);\n\t\t\t\tlineCurrent++;\n\t\t\t}\n\t\t\tblockChange=0;\n*/\t\t}\n\t\tif (!(IsASCII(ch) && isspace(ch)))\n\t\t\tvisibleChars++;\n\n\t\tif (styler.IsLeadByte(ch)) {\n\t\t\tchNext = styler.SafeGetCharAt(i + 2);\n\t\t\tchPrev = ' ';\n\t\t\ti += 1;\n\t\t\tcontinue;\n\t\t}\n\n\t\tif (state == SCE_C_DEFAULT) {\n\t\t\tif (iswordstart(ch)) {\n\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\t\tstate = SCE_C_IDENTIFIER;\n\t\t\t} else if (ch == '@' && chNext == 'o') {\n\t\t\t\tif ((styler.SafeGetCharAt(i+2) =='f') && (styler.SafeGetCharAt(i+3) == 'f')) {\n\t\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\t\tstate = SCE_C_COMMENT;\n\t\t\t\t}\n\t\t\t} else if (ch == '#') {\n\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\tstate = SCE_C_COMMENTLINE;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\tstate = SCE_C_STRING;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\tstate = SCE_C_CHARACTER;\n\t\t\t} else if (isoperator(ch)) {\n\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\tstyler.ColourTo(i, SCE_C_OPERATOR);\n\t\t\t}\n\t\t} else if (state == SCE_C_IDENTIFIER) {\n\t\t\tif (!iswordchar(ch)) {\n\t\t\t\tint levelChange = classifyWordBullant(styler.GetStartSegment(), i - 1, keywords, styler);\n\t\t\t\tstate = SCE_C_DEFAULT;\n\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\tif (ch == '#') {\n\t\t\t\t\tstate = SCE_C_COMMENTLINE;\n\t\t\t\t} else if (ch == '\\\"') {\n\t\t\t\t\tstate = SCE_C_STRING;\n\t\t\t\t} else if (ch == '\\'') {\n\t\t\t\t\tstate = SCE_C_CHARACTER;\n\t\t\t\t} else if (isoperator(ch)) {\n\t\t\t\t\tstyler.ColourTo(i, SCE_C_OPERATOR);\n\t\t\t\t}\n\t\t\t\tif (endFoundThisLine == 0)\n\t\t\t\t\tlevelCurrent+=levelChange;\n\t\t\t\tif (levelChange == -1)\n\t\t\t\t\tendFoundThisLine=1;\n\t\t\t}\n\t\t} else if (state == SCE_C_COMMENT) {\n\t\t\tif (ch == '@' && chNext == 'o') {\n\t\t\t\tif (styler.SafeGetCharAt(i+2) == 'n') {\n\t\t\t\t\tstyler.ColourTo(i+2, state);\n\t\t\t\t\tstate = SCE_C_DEFAULT;\n\t\t\t\t\ti+=2;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (state == SCE_C_COMMENTLINE) {\n\t\t\tif (ch == '\\r' || ch == '\\n') {\n\t\t\t\tendFoundThisLine = 0;\n\t\t\t\tstyler.ColourTo(i-1, state);\n\t\t\t\tstate = SCE_C_DEFAULT;\n\t\t\t}\n\t\t} else if (state == SCE_C_STRING) {\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t\tch = chNext;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t}\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tstate = SCE_C_DEFAULT;\n\t\t\t} else if (chNext == '\\r' || chNext == '\\n') {\n\t\t\t\tendFoundThisLine = 0;\n\t\t\t\tstyler.ColourTo(i-1, SCE_C_STRINGEOL);\n\t\t\t\tstate = SCE_C_STRINGEOL;\n\t\t\t}\n\t\t} else if (state == SCE_C_CHARACTER) {\n\t\t\tif ((ch == '\\r' || ch == '\\n') && (chPrev != '\\\\')) {\n\t\t\t\tendFoundThisLine = 0;\n\t\t\t\tstyler.ColourTo(i-1, SCE_C_STRINGEOL);\n\t\t\t\tstate = SCE_C_STRINGEOL;\n\t\t\t} else if (ch == '\\\\') {\n\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t\tch = chNext;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t}\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tstate = SCE_C_DEFAULT;\n\t\t\t}\n\t\t}\n\t\tchPrev = ch;\n\t}\n\tstyler.ColourTo(lengthDoc - 1, state);\n\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tif (fold) {\n\t\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\t\t//styler.SetLevel(lineCurrent, levelCurrent | flagsNext);\n\t\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n\n\t}\n}\n\nstatic const char * const bullantWordListDesc[] = {\n\t\"Keywords\",\n\t0\n};\n\nextern const LexerModule lmBullant(SCLEX_BULLANT, ColouriseBullantDoc, \"bullant\", 0, bullantWordListDesc);\n" }, { "path": "lexers/LexCIL.cxx", "content": "// Scintilla source code edit control\n/** @file LexCIL.cxx\n ** Lexer for Common Intermediate Language\n ** Written by Jad Altahan (github.com/xv)\n ** CIL manual: https://www.ecma-international.org/publications/standards/Ecma-335.htm\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"StringCopy.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n // Use an unnamed namespace to protect the functions and classes from name conflicts\n\nbool IsAWordChar(const int ch) {\n return (ch < 0x80) && (isalnum(ch) || ch == '_' || ch == '.');\n}\n\nbool IsOperator(const int ch) {\n if ((ch < 0x80) && (isalnum(ch)))\n return false;\n\n if (strchr(\"!%&*+-/<=>@^|~()[]{}\", ch)) {\n return true;\n }\n\n return false;\n}\n\nconstexpr bool IsStreamCommentStyle(const int style) noexcept {\n return style == SCE_CIL_COMMENT;\n}\n\nstruct OptionsCIL {\n bool fold;\n bool foldComment;\n bool foldCommentMultiline;\n bool foldCompact;\n\n OptionsCIL() {\n fold = true;\n foldComment = false;\n foldCommentMultiline = true;\n foldCompact = true;\n }\n};\n\nstatic const char *const cilWordListDesc[] = {\n \"Primary CIL keywords\",\n \"Metadata\",\n \"Opcode instructions\",\n 0\n};\n\nstruct OptionSetCIL : public OptionSet {\n OptionSetCIL() {\n DefineProperty(\"fold\", &OptionsCIL::fold);\n DefineProperty(\"fold.comment\", &OptionsCIL::foldComment);\n\n DefineProperty(\"fold.cil.comment.multiline\", &OptionsCIL::foldCommentMultiline,\n \"Set this property to 0 to disable folding multi-line comments when fold.comment=1.\");\n\n DefineProperty(\"fold.compact\", &OptionsCIL::foldCompact);\n\n DefineWordListSets(cilWordListDesc);\n }\n};\n\nLexicalClass lexicalClasses[] = {\n // Lexer CIL SCLEX_CIL SCE_CIL_:\n 0, \"SCE_CIL_DEFAULT\", \"default\", \"White space\",\n 1, \"SCE_CIL_COMMENT\", \"comment\", \"Multi-line comment\",\n 2, \"SCE_CIL_COMMENTLINE\", \"comment line\", \"Line comment\",\n 3, \"SCE_CIL_WORD\", \"keyword\", \"Keyword 1\",\n 4, \"SCE_CIL_WORD2\", \"keyword\", \"Keyword 2\",\n 5, \"SCE_CIL_WORD3\", \"keyword\", \"Keyword 3\",\n 6, \"SCE_CIL_STRING\", \"literal string\", \"Double quoted string\",\n 7, \"SCE_CIL_LABEL\", \"label\", \"Code label\",\n 8, \"SCE_CIL_OPERATOR\", \"operator\", \"Operators\",\n 9, \"SCE_CIL_IDENTIFIER\", \"identifier\", \"Identifiers\",\n 10, \"SCE_CIL_STRINGEOL\", \"error literal string\", \"String is not closed\",\n};\n\n}\n\nclass LexerCIL : public DefaultLexer {\n WordList keywords, keywords2, keywords3;\n OptionsCIL options;\n OptionSetCIL osCIL;\n\npublic:\n LexerCIL() : DefaultLexer(\"cil\", SCLEX_CIL, lexicalClasses, ELEMENTS(lexicalClasses)) { }\n\n virtual ~LexerCIL() { }\n\n void SCI_METHOD Release() override {\n delete this;\n }\n\n int SCI_METHOD Version() const override {\n return lvRelease5;\n }\n\n const char * SCI_METHOD PropertyNames() override {\n return osCIL.PropertyNames();\n }\n\n int SCI_METHOD PropertyType(const char *name) override {\n return osCIL.PropertyType(name);\n }\n\n const char * SCI_METHOD DescribeProperty(const char *name) override {\n return osCIL.DescribeProperty(name);\n }\n\n Sci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\n\tconst char * SCI_METHOD PropertyGet(const char* key) override {\n\t\treturn osCIL.PropertyGet(key);\n\t}\n\n const char * SCI_METHOD DescribeWordListSets() override {\n return osCIL.DescribeWordListSets();\n }\n\n Sci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\n void SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n void SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n void * SCI_METHOD PrivateCall(int, void *) override {\n return 0;\n }\n\n int SCI_METHOD LineEndTypesSupported() override {\n return SC_LINE_END_TYPE_UNICODE;\n }\n\n int SCI_METHOD PrimaryStyleFromStyle(int style) override {\n return style;\n }\n\n static ILexer5 *LexerFactoryCIL() {\n return new LexerCIL();\n }\n};\n\nSci_Position SCI_METHOD LexerCIL::PropertySet(const char *key, const char *val) {\n if (osCIL.PropertySet(&options, key, val)) {\n return 0;\n }\n\n return -1;\n}\n\nSci_Position SCI_METHOD LexerCIL::WordListSet(int n, const char *wl) {\n WordList *wordListN = 0;\n\n switch (n) {\n case 0:\n wordListN = &keywords;\n break;\n case 1:\n wordListN = &keywords2;\n break;\n case 2:\n wordListN = &keywords3;\n break;\n }\n\n Sci_Position firstModification = -1;\n\n if (wordListN) {\n WordList wlNew;\n wlNew.Set(wl);\n\n if (*wordListN != wlNew) {\n wordListN->Set(wl);\n firstModification = 0;\n }\n }\n\n return firstModification;\n}\n\nvoid SCI_METHOD LexerCIL::Lex(Sci_PositionU startPos, Sci_Position length,\n int initStyle, IDocument *pAccess) {\n if (initStyle == SCE_CIL_STRINGEOL) {\n initStyle = SCE_CIL_DEFAULT;\n }\n\n Accessor styler(pAccess, NULL);\n StyleContext sc(startPos, length, initStyle, styler);\n\n bool identAtLineStart = false, // Checks if an identifier is at line start (ignoring spaces)\n canStyleLabels = false; // Checks if conditions are met to style SCE_CIL_LABEL\n\n for (; sc.More(); sc.Forward()) {\n if (sc.atLineStart) {\n if (sc.state == SCE_CIL_STRING) {\n sc.SetState(SCE_CIL_STRING);\n }\n\n identAtLineStart = true;\n }\n\n // Handle string line continuation\n if (sc.ch == '\\\\' && (sc.chNext == '\\n' || sc.chNext == '\\r') &&\n (sc.state == SCE_CIL_STRING)) {\n sc.Forward();\n\n if (sc.ch == '\\r' && sc.chNext == '\\n') {\n sc.Forward();\n }\n\n continue;\n }\n\n switch (sc.state) {\n case SCE_CIL_OPERATOR:\n sc.SetState(SCE_CIL_DEFAULT);\n break;\n case SCE_CIL_IDENTIFIER:\n if (!IsAWordChar(sc.ch)) {\n if (canStyleLabels && (sc.ch == ':' && sc.chNext != ':')) {\n sc.ChangeState(SCE_CIL_LABEL);\n sc.ForwardSetState(SCE_CIL_DEFAULT);\n } else {\n char kwSize[100];\n sc.GetCurrent(kwSize, sizeof(kwSize));\n int style = SCE_CIL_IDENTIFIER;\n\n if (keywords.InList(kwSize)) {\n style = SCE_CIL_WORD;\n } else if (keywords2.InList(kwSize)) {\n style = SCE_CIL_WORD2;\n } else if (keywords3.InList(kwSize)) {\n style = SCE_CIL_WORD3;\n }\n\n sc.ChangeState(style);\n sc.SetState(SCE_CIL_DEFAULT);\n }\n }\n break;\n case SCE_CIL_COMMENT:\n if (sc.Match('*', '/')) {\n sc.Forward();\n sc.ForwardSetState(SCE_CIL_DEFAULT);\n }\n break;\n case SCE_CIL_COMMENTLINE:\n if (sc.atLineStart) {\n sc.SetState(SCE_CIL_DEFAULT);\n }\n break;\n case SCE_CIL_STRING:\n if (sc.ch == '\\\\') {\n if (sc.chNext == '\"' || sc.chNext == '\\\\') {\n sc.Forward();\n }\n } else if (sc.ch == '\"') {\n sc.ForwardSetState(SCE_CIL_DEFAULT);\n } else if (sc.atLineEnd) {\n sc.ChangeState(SCE_CIL_STRINGEOL);\n sc.ForwardSetState(SCE_CIL_DEFAULT);\n }\n break;\n }\n\n if (sc.state == SCE_CIL_DEFAULT) {\n // String\n if (sc.ch == '\"') {\n sc.SetState(SCE_CIL_STRING);\n }\n // Keyword\n else if (IsAWordChar(sc.ch)) {\n // Allow setting SCE_CIL_LABEL style only if the label is the\n // first token in the line and does not start with a dot or a digit\n canStyleLabels = identAtLineStart && !(sc.ch == '.' || IsADigit(sc.ch));\n sc.SetState(SCE_CIL_IDENTIFIER);\n }\n // Multi-line comment\n else if (sc.Match('/', '*')) {\n sc.SetState(SCE_CIL_COMMENT);\n sc.Forward();\n }\n // Line comment\n else if (sc.Match('/', '/')) {\n sc.SetState(SCE_CIL_COMMENTLINE);\n }\n // Operators\n else if (IsOperator(sc.ch)) {\n sc.SetState(SCE_CIL_OPERATOR);\n }\n }\n\n if (!IsASpace(sc.ch)) {\n identAtLineStart = false;\n }\n }\n\n sc.Complete();\n}\n\nvoid SCI_METHOD LexerCIL::Fold(Sci_PositionU startPos, Sci_Position length, \n int initStyle, IDocument *pAccess) {\n if (!options.fold) {\n return;\n }\n\n LexAccessor styler(pAccess);\n\n const Sci_PositionU endPos = startPos + length;\n Sci_Position lineCurrent = styler.GetLine(startPos);\n\n int levelCurrent = SC_FOLDLEVELBASE;\n if (lineCurrent > 0)\n levelCurrent = styler.LevelAt(lineCurrent - 1) >> 16;\n \n int style = initStyle;\n int styleNext = styler.StyleAt(startPos);\n int levelNext = levelCurrent;\n int visibleChars = 0;\n\n char chNext = styler[startPos];\n\n for (Sci_PositionU i = startPos; i < endPos; i++) {\n const char ch = chNext;\n int stylePrev = style;\n\n chNext = styler.SafeGetCharAt(i + 1);\n style = styleNext;\n styleNext = styler.StyleAt(i + 1);\n\n const bool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n if (options.foldComment && \n options.foldCommentMultiline && IsStreamCommentStyle(style)) {\n if (!IsStreamCommentStyle(stylePrev)) {\n levelNext++;\n } else if (!IsStreamCommentStyle(styleNext) && !atEOL) {\n levelNext--;\n }\n }\n\n if (style == SCE_CIL_OPERATOR) {\n if (ch == '{') {\n levelNext++;\n } else if (ch == '}') {\n levelNext--;\n }\n }\n\n if (!IsASpace(ch)) {\n visibleChars++;\n }\n\n if (atEOL || (i == endPos - 1)) {\n int lev = levelCurrent | levelNext << 16;\n if (visibleChars == 0 && options.foldCompact)\n lev |= SC_FOLDLEVELWHITEFLAG;\n if (levelCurrent < levelNext)\n lev |= SC_FOLDLEVELHEADERFLAG;\n if (lev != styler.LevelAt(lineCurrent)) {\n styler.SetLevel(lineCurrent, lev);\n }\n \n lineCurrent++;\n levelCurrent = levelNext;\n \n if (options.foldCompact &&\n i == static_cast(styler.Length() - 1)) {\n styler.SetLevel(lineCurrent, lev | SC_FOLDLEVELWHITEFLAG);\n }\n\n visibleChars = 0;\n }\n }\n}\n\nextern const LexerModule lmCIL(SCLEX_CIL, LexerCIL::LexerFactoryCIL, \"cil\", cilWordListDesc);" }, { "path": "lexers/LexCLW.cxx", "content": "// Scintilla source code edit control\n/** @file LexCLW.cxx\n ** Lexer for Clarion.\n ** 2004/12/17 Updated Lexer\n **/\n// Copyright 2003-2004 by Ron Schofield \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n// Is an end of line character\ninline bool IsEOL(const int ch) {\n\n\treturn(ch == '\\n');\n}\n\n// Convert character to uppercase\nstatic char CharacterUpper(char chChar) {\n\n\tif (chChar < 'a' || chChar > 'z') {\n\t\treturn(chChar);\n\t}\n\telse {\n\t\treturn(static_cast(chChar - 'a' + 'A'));\n\t}\n}\n\n// Convert string to uppercase\nstatic void StringUpper(char *szString) {\n\n\twhile (*szString) {\n\t\t*szString = CharacterUpper(*szString);\n\t\tszString++;\n\t}\n}\n\n// Is a label start character\ninline bool IsALabelStart(const int iChar) {\n\n\treturn(isalpha(iChar) || iChar == '_');\n}\n\n// Is a label character\ninline bool IsALabelCharacter(const int iChar) {\n\n\treturn(isalnum(iChar) || iChar == '_' || iChar == ':');\n}\n\n// Is the character is a ! and the the next character is not a !\ninline bool IsACommentStart(const int iChar) {\n\n\treturn(iChar == '!');\n}\n\n// Is the character a Clarion hex character (ABCDEF)\ninline bool IsAHexCharacter(const int iChar, bool bCaseSensitive) {\n\n\t// Case insensitive.\n\tif (!bCaseSensitive) {\n\t\tif (strchr(\"ABCDEFabcdef\", iChar) != NULL) {\n\t\t\treturn(true);\n\t\t}\n\t}\n\t// Case sensitive\n\telse {\n\t\tif (strchr(\"ABCDEF\", iChar) != NULL) {\n\t\t\treturn(true);\n\t\t}\n\t}\n\treturn(false);\n}\n\n// Is the character a Clarion base character (B=Binary, O=Octal, H=Hex)\ninline bool IsANumericBaseCharacter(const int iChar, bool bCaseSensitive) {\n\n\t// Case insensitive.\n\tif (!bCaseSensitive) {\n\t\t// If character is a numeric base character\n\t\tif (strchr(\"BOHboh\", iChar) != NULL) {\n\t\t\treturn(true);\n\t\t}\n\t}\n\t// Case sensitive\n\telse {\n\t\t// If character is a numeric base character\n\t\tif (strchr(\"BOH\", iChar) != NULL) {\n\t\t\treturn(true);\n\t\t}\n\t}\n\treturn(false);\n}\n\n// Set the correct numeric constant state\ninline bool SetNumericConstantState(StyleContext &scDoc) {\n\n\tint iPoints = 0;\t\t\t// Point counter\n\tchar cNumericString[512];\t// Numeric string buffer\n\n\t// Buffer the current numberic string\n\tscDoc.GetCurrent(cNumericString, sizeof(cNumericString));\n\t// Loop through the string until end of string (NULL termination)\n\tfor (int iIndex = 0; cNumericString[iIndex] != '\\0'; iIndex++) {\n\t\t// Depending on the character\n\t\tswitch (cNumericString[iIndex]) {\n\t\t\t// Is a . (point)\n\t\t\tcase '.' :\n\t\t\t\t// Increment point counter\n\t\t\t\tiPoints++;\n\t\t\t\tbreak;\n\t\t\tdefault :\n\t\t\t\tbreak;\n\t\t}\n\t}\n\t// If points found (can be more than one for improper formatted number\n\tif (iPoints > 0) {\n\t\treturn(true);\n\t}\n\t// Else no points found\n\telse {\n\t\treturn(false);\n\t}\n}\n\n// Get the next word in uppercase from the current position (keyword lookahead)\ninline bool GetNextWordUpper(Accessor &styler, Sci_PositionU uiStartPos, Sci_Position iLength, char *cWord) {\n\n\tSci_PositionU iIndex = 0;\t\t// Buffer Index\n\n\t// Loop through the remaining string from the current position\n\tfor (Sci_Position iOffset = uiStartPos; iOffset < iLength; iOffset++) {\n\t\t// Get the character from the buffer using the offset\n\t\tchar cCharacter = styler[iOffset];\n\t\tif (IsEOL(cCharacter)) {\n\t\t\tbreak;\n\t\t}\n\t\t// If the character is alphabet character\n\t\tif (isalpha(cCharacter)) {\n\t\t\t// Add UPPERCASE character to the word buffer\n\t\t\tcWord[iIndex++] = CharacterUpper(cCharacter);\n\t\t}\n\t}\n\t// Add null termination\n\tcWord[iIndex] = '\\0';\n\t// If no word was found\n\tif (iIndex == 0) {\n\t\t// Return failure\n\t\treturn(false);\n\t}\n\t// Else word was found\n\telse {\n\t\t// Return success\n\t\treturn(true);\n\t}\n}\n\n// Clarion Language Colouring Procedure\nstatic void ColouriseClarionDoc(Sci_PositionU uiStartPos, Sci_Position iLength, int iInitStyle, WordList *wlKeywords[], Accessor &accStyler, bool bCaseSensitive) {\n\n\tint iParenthesesLevel = 0;\t\t// Parenthese Level\n\tint iColumn1Label = false;\t\t// Label starts in Column 1\n\n\tWordList &wlClarionKeywords = *wlKeywords[0];\t\t\t// Clarion Keywords\n\tWordList &wlCompilerDirectives = *wlKeywords[1];\t\t// Compiler Directives\n\tWordList &wlRuntimeExpressions = *wlKeywords[2];\t\t// Runtime Expressions\n\tWordList &wlBuiltInProcsFuncs = *wlKeywords[3];\t\t\t// Builtin Procedures and Functions\n\tWordList &wlStructsDataTypes = *wlKeywords[4];\t\t\t// Structures and Data Types\n\tWordList &wlAttributes = *wlKeywords[5];\t\t\t\t// Procedure Attributes\n\tWordList &wlStandardEquates = *wlKeywords[6];\t\t\t// Standard Equates\n\tWordList &wlLabelReservedWords = *wlKeywords[7];\t\t// Clarion Reserved Keywords (Labels)\n\tWordList &wlProcLabelReservedWords = *wlKeywords[8];\t// Clarion Reserved Keywords (Procedure Labels)\n\n\tconst char wlProcReservedKeywordList[] =\n\t\"PROCEDURE FUNCTION\";\n\tWordList wlProcReservedKeywords;\n\twlProcReservedKeywords.Set(wlProcReservedKeywordList);\n\n\tconst char wlCompilerKeywordList[] =\n\t\"COMPILE OMIT\";\n\tWordList wlCompilerKeywords;\n\twlCompilerKeywords.Set(wlCompilerKeywordList);\n\n\tconst char wlLegacyStatementsList[] =\n\t\"BOF EOF FUNCTION POINTER SHARE\";\n\tWordList wlLegacyStatements;\n\twlLegacyStatements.Set(wlLegacyStatementsList);\n\n\tStyleContext scDoc(uiStartPos, iLength, iInitStyle, accStyler);\n\n\t// lex source code\n for (; scDoc.More(); scDoc.Forward())\n\t{\n\t\t//\n\t\t// Determine if the current state should terminate.\n\t\t//\n\n\t\t// Label State Handling\n\t\tif (scDoc.state == SCE_CLW_LABEL) {\n\t\t\t// If the character is not a valid label\n\t\t\tif (!IsALabelCharacter(scDoc.ch)) {\n\t\t\t\t// If the character is a . (dot syntax)\n\t\t\t\tif (scDoc.ch == '.') {\n\t\t\t\t\t// Turn off column 1 label flag as label now cannot be reserved work\n\t\t\t\t\tiColumn1Label = false;\n\t\t\t\t\t// Uncolour the . (dot) to default state, move forward one character,\n\t\t\t\t\t// and change back to the label state.\n\t\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t\t\tscDoc.Forward();\n\t\t\t\t\tscDoc.SetState(SCE_CLW_LABEL);\n\t\t\t\t}\n\t\t\t\t// Else check label\n\t\t\t\telse {\n\t\t\t\t\tchar cLabel[512];\t\t// Label buffer\n\t\t\t\t\t// Buffer the current label string\n\t\t\t\t\tscDoc.GetCurrent(cLabel,sizeof(cLabel));\n\t\t\t\t\t// If case insensitive, convert string to UPPERCASE to match passed keywords.\n\t\t\t\t\tif (!bCaseSensitive) {\n\t\t\t\t\t\tStringUpper(cLabel);\n\t\t\t\t\t}\n\t\t\t\t\t// Else if UPPERCASE label string is in the Clarion compiler keyword list\n\t\t\t\t\tif (wlCompilerKeywords.InList(cLabel) && iColumn1Label){\n\t\t\t\t\t\t// change the label to error state\n\t\t\t\t\t\tscDoc.ChangeState(SCE_CLW_COMPILER_DIRECTIVE);\n\t\t\t\t\t}\n\t\t\t\t\t// Else if UPPERCASE label string is in the Clarion reserved keyword list\n\t\t\t\t\telse if (wlLabelReservedWords.InList(cLabel) && iColumn1Label){\n\t\t\t\t\t\t// change the label to error state\n\t\t\t\t\t\tscDoc.ChangeState(SCE_CLW_ERROR);\n\t\t\t\t\t}\n\t\t\t\t\t// Else if UPPERCASE label string is\n\t\t\t\t\telse if (wlProcLabelReservedWords.InList(cLabel) && iColumn1Label) {\n\t\t\t\t\t\tchar cWord[512];\t// Word buffer\n\t\t\t\t\t\t// Get the next word from the current position\n\t\t\t\t\t\tif (GetNextWordUpper(accStyler,scDoc.currentPos,uiStartPos+iLength,cWord)) {\n\t\t\t\t\t\t\t// If the next word is a procedure reserved word\n\t\t\t\t\t\t\tif (wlProcReservedKeywords.InList(cWord)) {\n\t\t\t\t\t\t\t\t// Change the label to error state\n\t\t\t\t\t\t\t\tscDoc.ChangeState(SCE_CLW_ERROR);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\t// Else if label string is in the compiler directive keyword list\n\t\t\t\t\telse if (wlCompilerDirectives.InList(cLabel)) {\n\t\t\t\t\t\t// change the state to compiler directive state\n\t\t\t\t\t\tscDoc.ChangeState(SCE_CLW_COMPILER_DIRECTIVE);\n\t\t\t\t\t}\n\t\t\t\t\t// Terminate the label state and set to default state\n\t\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\t// Keyword State Handling\n\t\telse if (scDoc.state == SCE_CLW_KEYWORD) {\n\t\t\t// If character is : (colon)\n\t\t\tif (scDoc.ch == ':') {\n\t\t\t\tchar cEquate[512];\t\t// Equate buffer\n\t\t\t\t// Move forward to include : (colon) in buffer\n\t\t\t\tscDoc.Forward();\n\t\t\t\t// Buffer the equate string\n\t\t\t\tscDoc.GetCurrent(cEquate,sizeof(cEquate));\n\t\t\t\t// If case insensitive, convert string to UPPERCASE to match passed keywords.\n\t\t\t\tif (!bCaseSensitive) {\n\t\t\t\t\tStringUpper(cEquate);\n\t\t\t\t}\n\t\t\t\t// If statement string is in the equate list\n\t\t\t\tif (wlStandardEquates.InList(cEquate)) {\n\t\t\t\t\t// Change to equate state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_STANDARD_EQUATE);\n\t\t\t\t}\n\t\t\t}\n\t\t\t// If the character is not a valid label character\n\t\t\telse if (!IsALabelCharacter(scDoc.ch)) {\n\t\t\t\tchar cStatement[512];\t\t// Statement buffer\n\t\t\t\t// Buffer the statement string\n\t\t\t\tscDoc.GetCurrent(cStatement,sizeof(cStatement));\n\t\t\t\t// If case insensitive, convert string to UPPERCASE to match passed keywords.\n\t\t\t\tif (!bCaseSensitive) {\n\t\t\t\t\tStringUpper(cStatement);\n\t\t\t\t}\n\t\t\t\t// If statement string is in the Clarion keyword list\n\t\t\t\tif (wlClarionKeywords.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the Clarion keyword state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_KEYWORD);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the compiler directive keyword list\n\t\t\t\telse if (wlCompilerDirectives.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the compiler directive state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_COMPILER_DIRECTIVE);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the runtime expressions keyword list\n\t\t\t\telse if (wlRuntimeExpressions.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the runtime expressions state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_RUNTIME_EXPRESSIONS);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the builtin procedures and functions keyword list\n\t\t\t\telse if (wlBuiltInProcsFuncs.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the builtin procedures and functions state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_BUILTIN_PROCEDURES_FUNCTION);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the tructures and data types keyword list\n\t\t\t\telse if (wlStructsDataTypes.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the structures and data types state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_STRUCTURE_DATA_TYPE);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the procedure attribute keyword list\n\t\t\t\telse if (wlAttributes.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the procedure attribute state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_ATTRIBUTE);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the standard equate keyword list\n\t\t\t\telse if (wlStandardEquates.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the standard equate state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_STANDARD_EQUATE);\n\t\t\t\t}\n\t\t\t\t// Else if statement string is in the deprecated or legacy keyword list\n\t\t\t\telse if (wlLegacyStatements.InList(cStatement)) {\n\t\t\t\t\t// Change the statement string to the standard equate state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_DEPRECATED);\n\t\t\t\t}\n\t\t\t\t// Else the statement string doesn't match any work list\n\t\t\t\telse {\n\t\t\t\t\t// Change the statement string to the default state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_DEFAULT);\n\t\t\t\t}\n\t\t\t\t// Terminate the keyword state and set to default state\n\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t}\n\t\t}\n\t\t// String State Handling\n\t\telse if (scDoc.state == SCE_CLW_STRING) {\n\t\t\t// If the character is an ' (single quote)\n\t\t\tif (scDoc.ch == '\\'') {\n\t\t\t\t// Set the state to default and move forward colouring\n\t\t\t\t// the ' (single quote) as default state\n\t\t\t\t// terminating the string state\n\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t\tscDoc.Forward();\n\t\t\t}\n\t\t\t// If the next character is an ' (single quote)\n\t\t\tif (scDoc.chNext == '\\'') {\n\t\t\t\t// Move forward one character and set to default state\n\t\t\t\t// colouring the next ' (single quote) as default state\n\t\t\t\t// terminating the string state\n\t\t\t\tscDoc.ForwardSetState(SCE_CLW_DEFAULT);\n\t\t\t\tscDoc.Forward();\n\t\t\t}\n\t\t}\n\t\t// Picture String State Handling\n\t\telse if (scDoc.state == SCE_CLW_PICTURE_STRING) {\n\t\t\t// If the character is an ( (open parenthese)\n\t\t\tif (scDoc.ch == '(') {\n\t\t\t\t// Increment the parenthese level\n\t\t\t\tiParenthesesLevel++;\n\t\t\t}\n\t\t\t// Else if the character is a ) (close parenthese)\n\t\t\telse if (scDoc.ch == ')') {\n\t\t\t\t// If the parenthese level is set to zero\n\t\t\t\t// parentheses matched\n\t\t\t\tif (!iParenthesesLevel) {\n\t\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t\t}\n\t\t\t\t// Else parenthese level is greater than zero\n\t\t\t\t// still looking for matching parentheses\n\t\t\t\telse {\n\t\t\t\t\t// Decrement the parenthese level\n\t\t\t\t\tiParenthesesLevel--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\t// Standard Equate State Handling\n\t\telse if (scDoc.state == SCE_CLW_STANDARD_EQUATE) {\n\t\t\tif (!isalnum(scDoc.ch)) {\n\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t}\n\t\t}\n\t\t// Integer Constant State Handling\n\t\telse if (scDoc.state == SCE_CLW_INTEGER_CONSTANT) {\n\t\t\t// If the character is not a digit (0-9)\n\t\t\t// or character is not a hexidecimal character (A-F)\n\t\t\t// or character is not a . (point)\n\t\t\t// or character is not a numberic base character (B,O,H)\n\t\t\tif (!(isdigit(scDoc.ch)\n\t\t\t|| IsAHexCharacter(scDoc.ch, bCaseSensitive)\n\t\t\t|| scDoc.ch == '.'\n\t\t\t|| IsANumericBaseCharacter(scDoc.ch, bCaseSensitive))) {\n\t\t\t\t// If the number was a real\n\t\t\t\tif (SetNumericConstantState(scDoc)) {\n\t\t\t\t\t// Colour the matched string to the real constant state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_REAL_CONSTANT);\n\t\t\t\t}\n\t\t\t\t// Else the number was an integer\n\t\t\t\telse {\n\t\t\t\t\t// Colour the matched string to an integer constant state\n\t\t\t\t\tscDoc.ChangeState(SCE_CLW_INTEGER_CONSTANT);\n\t\t\t\t}\n\t\t\t\t// Terminate the integer constant state and set to default state\n\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t//\n\t\t// Determine if a new state should be entered.\n\t\t//\n\n\t\t// Beginning of Line Handling\n\t\tif (scDoc.atLineStart) {\n\t\t\t// Reset the column 1 label flag\n\t\t\tiColumn1Label = false;\n\t\t\t// If column 1 character is a label start character\n\t\t\tif (IsALabelStart(scDoc.ch)) {\n\t\t\t\t// Label character is found in column 1\n\t\t\t\t// so set column 1 label flag and clear last column 1 label\n\t\t\t\tiColumn1Label = true;\n\t\t\t\t// Set the state to label\n\t\t\t\tscDoc.SetState(SCE_CLW_LABEL);\n\t\t\t}\n\t\t\t// else if character is a space or tab\n\t\t\telse if (IsASpace(scDoc.ch)){\n\t\t\t\t// Set to default state\n\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t}\n\t\t\t// else if comment start (!) or is an * (asterisk)\n\t\t\telse if (IsACommentStart(scDoc.ch) || scDoc.ch == '*' ) {\n\t\t\t\t// then set the state to comment.\n\t\t\t\tscDoc.SetState(SCE_CLW_COMMENT);\n\t\t\t}\n\t\t\t// else the character is a ? (question mark)\n\t\t\telse if (scDoc.ch == '?') {\n\t\t\t\t// Change to the compiler directive state, move forward,\n\t\t\t\t// colouring the ? (question mark), change back to default state.\n\t\t\t\tscDoc.ChangeState(SCE_CLW_COMPILER_DIRECTIVE);\n\t\t\t\tscDoc.Forward();\n\t\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t\t}\n\t\t\t// else an invalid character in column 1\n\t\t\telse {\n\t\t\t\t// Set to error state\n\t\t\t\tscDoc.SetState(SCE_CLW_ERROR);\n\t\t\t}\n\t\t}\n\t\t// End of Line Handling\n\t\telse if (scDoc.atLineEnd) {\n\t\t\t// Reset to the default state at the end of each line.\n\t\t\tscDoc.SetState(SCE_CLW_DEFAULT);\n\t\t}\n\t\t// Default Handling\n\t\telse {\n\t\t\t// If in default state\n\t\t\tif (scDoc.state == SCE_CLW_DEFAULT) {\n\t\t\t\t// If is a letter could be a possible statement\n\t\t\t\tif (isalpha(scDoc.ch)) {\n\t\t\t\t\t// Set the state to Clarion Keyword and verify later\n\t\t\t\t\tscDoc.SetState(SCE_CLW_KEYWORD);\n\t\t\t\t}\n\t\t\t\t// else is a number\n\t\t\t\telse if (isdigit(scDoc.ch)) {\n\t\t\t\t\t// Set the state to Integer Constant and verify later\n\t\t\t\t\tscDoc.SetState(SCE_CLW_INTEGER_CONSTANT);\n\t\t\t\t}\n\t\t\t\t// else if the start of a comment or a | (line continuation)\n\t\t\t\telse if (IsACommentStart(scDoc.ch) || scDoc.ch == '|') {\n\t\t\t\t\t// then set the state to comment.\n\t\t\t\t\tscDoc.SetState(SCE_CLW_COMMENT);\n\t\t\t\t}\n\t\t\t\t// else if the character is a ' (single quote)\n\t\t\t\telse if (scDoc.ch == '\\'') {\n\t\t\t\t\t// If the character is also a ' (single quote)\n\t\t\t\t\t// Embedded Apostrophe\n\t\t\t\t\tif (scDoc.chNext == '\\'') {\n\t\t\t\t\t\t// Move forward colouring it as default state\n\t\t\t\t\t\tscDoc.ForwardSetState(SCE_CLW_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\telse {\n\t\t\t\t\t\t// move to the next character and then set the state to comment.\n\t\t\t\t\t\tscDoc.ForwardSetState(SCE_CLW_STRING);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// else the character is an @ (ampersand)\n\t\t\t\telse if (scDoc.ch == '@') {\n\t\t\t\t\t// Case insensitive.\n\t\t\t\t\tif (!bCaseSensitive) {\n\t\t\t\t\t\t// If character is a valid picture token character\n\t\t\t\t\t\tif (strchr(\"DEKNPSTdeknpst\", scDoc.chNext) != NULL) {\n\t\t\t\t\t\t\t// Set to the picture string state\n\t\t\t\t\t\t\tscDoc.SetState(SCE_CLW_PICTURE_STRING);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\t// Case sensitive\n\t\t\t\t\telse {\n\t\t\t\t\t\t// If character is a valid picture token character\n\t\t\t\t\t\tif (strchr(\"DEKNPST\", scDoc.chNext) != NULL) {\n\t\t\t\t\t\t\t// Set the picture string state\n\t\t\t\t\t\t\tscDoc.SetState(SCE_CLW_PICTURE_STRING);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t}\n\t// lexing complete\n\tscDoc.Complete();\n}\n\n// Clarion Language Case Sensitive Colouring Procedure\nstatic void ColouriseClarionDocSensitive(Sci_PositionU uiStartPos, Sci_Position iLength, int iInitStyle, WordList *wlKeywords[], Accessor &accStyler) {\n\n\tColouriseClarionDoc(uiStartPos, iLength, iInitStyle, wlKeywords, accStyler, true);\n}\n\n// Clarion Language Case Insensitive Colouring Procedure\nstatic void ColouriseClarionDocInsensitive(Sci_PositionU uiStartPos, Sci_Position iLength, int iInitStyle, WordList *wlKeywords[], Accessor &accStyler) {\n\n\tColouriseClarionDoc(uiStartPos, iLength, iInitStyle, wlKeywords, accStyler, false);\n}\n\n// Fill Buffer\n\nstatic void FillBuffer(Sci_PositionU uiStart, Sci_PositionU uiEnd, Accessor &accStyler, char *szBuffer, Sci_PositionU uiLength) {\n\n\tSci_PositionU uiPos = 0;\n\n\twhile ((uiPos < uiEnd - uiStart + 1) && (uiPos < uiLength-1)) {\n\t\tszBuffer[uiPos] = static_cast(toupper(accStyler[uiStart + uiPos]));\n\t\tuiPos++;\n\t}\n\tszBuffer[uiPos] = '\\0';\n}\n\n// Classify Clarion Fold Point\n\nstatic int ClassifyClarionFoldPoint(int iLevel, const char* szString) {\n\n\tif (!(isdigit(szString[0]) || (szString[0] == '.'))) {\n\t\tif (strcmp(szString, \"PROCEDURE\") == 0) {\n\t//\t\tiLevel = SC_FOLDLEVELBASE + 1;\n\t\t}\n\t\telse if (strcmp(szString, \"MAP\") == 0 ||\n\t\t\tstrcmp(szString,\"ACCEPT\") == 0 ||\n\t\t\tstrcmp(szString,\"BEGIN\") == 0 ||\n\t\t\tstrcmp(szString,\"CASE\") == 0 ||\n\t\t\tstrcmp(szString,\"EXECUTE\") == 0 ||\n\t\t\tstrcmp(szString,\"IF\") == 0 ||\n\t\t\tstrcmp(szString,\"ITEMIZE\") == 0 ||\n\t\t\tstrcmp(szString,\"INTERFACE\") == 0 ||\n\t\t\tstrcmp(szString,\"JOIN\") == 0 ||\n\t\t\tstrcmp(szString,\"LOOP\") == 0 ||\n\t\t\tstrcmp(szString,\"MODULE\") == 0 ||\n\t\t\tstrcmp(szString,\"RECORD\") == 0) {\n\t\t\tiLevel++;\n\t\t}\n\t\telse if (strcmp(szString, \"APPLICATION\") == 0 ||\n\t\t\tstrcmp(szString, \"CLASS\") == 0 ||\n\t\t\tstrcmp(szString, \"DETAIL\") == 0 ||\n\t\t\tstrcmp(szString, \"FILE\") == 0 ||\n\t\t\tstrcmp(szString, \"FOOTER\") == 0 ||\n\t\t\tstrcmp(szString, \"FORM\") == 0 ||\n\t\t\tstrcmp(szString, \"GROUP\") == 0 ||\n\t\t\tstrcmp(szString, \"HEADER\") == 0 ||\n\t\t\tstrcmp(szString, \"INTERFACE\") == 0 ||\n\t\t\tstrcmp(szString, \"MENU\") == 0 ||\n\t\t\tstrcmp(szString, \"MENUBAR\") == 0 ||\n\t\t\tstrcmp(szString, \"OLE\") == 0 ||\n\t\t\tstrcmp(szString, \"OPTION\") == 0 ||\n\t\t\tstrcmp(szString, \"QUEUE\") == 0 ||\n\t\t\tstrcmp(szString, \"REPORT\") == 0 ||\n\t\t\tstrcmp(szString, \"SHEET\") == 0 ||\n\t\t\tstrcmp(szString, \"TAB\") == 0 ||\n\t\t\tstrcmp(szString, \"TOOLBAR\") == 0 ||\n\t\t\tstrcmp(szString, \"VIEW\") == 0 ||\n\t\t\tstrcmp(szString, \"WINDOW\") == 0) {\n\t\t\tiLevel++;\n\t\t}\n\t\telse if (strcmp(szString, \"END\") == 0 ||\n\t\t\tstrcmp(szString, \"UNTIL\") == 0 ||\n\t\t\tstrcmp(szString, \"WHILE\") == 0) {\n\t\t\tiLevel--;\n\t\t}\n\t}\n\treturn(iLevel);\n}\n\n// Clarion Language Folding Procedure\nstatic void FoldClarionDoc(Sci_PositionU uiStartPos, Sci_Position iLength, int iInitStyle, WordList *[], Accessor &accStyler) {\n\n\tSci_PositionU uiEndPos = uiStartPos + iLength;\n\tSci_Position iLineCurrent = accStyler.GetLine(uiStartPos);\n\tint iLevelPrev = accStyler.LevelAt(iLineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint iLevelCurrent = iLevelPrev;\n\tchar chNext = accStyler[uiStartPos];\n\tint iStyle = iInitStyle;\n\tint iStyleNext = accStyler.StyleAt(uiStartPos);\n\tint iVisibleChars = 0;\n\tSci_Position iLastStart = 0;\n\n\tfor (Sci_PositionU uiPos = uiStartPos; uiPos < uiEndPos; uiPos++) {\n\n\t\tchar chChar = chNext;\n\t\tchNext = accStyler.SafeGetCharAt(uiPos + 1);\n\t\tint iStylePrev = iStyle;\n\t\tiStyle = iStyleNext;\n\t\tiStyleNext = accStyler.StyleAt(uiPos + 1);\n\t\tbool bEOL = (chChar == '\\r' && chNext != '\\n') || (chChar == '\\n');\n\n\t\tif (iStylePrev == SCE_CLW_DEFAULT) {\n\t\t\tif (iStyle == SCE_CLW_KEYWORD || iStyle == SCE_CLW_STRUCTURE_DATA_TYPE) {\n\t\t\t\t// Store last word start point.\n\t\t\t\tiLastStart = uiPos;\n\t\t\t}\n\t\t}\n\n\t\tif (iStylePrev == SCE_CLW_KEYWORD || iStylePrev == SCE_CLW_STRUCTURE_DATA_TYPE) {\n\t\t\tif(iswordchar(chChar) && !iswordchar(chNext)) {\n\t\t\t\tchar chBuffer[100];\n\t\t\t\tFillBuffer(iLastStart, uiPos, accStyler, chBuffer, sizeof(chBuffer));\n\t\t\t\tiLevelCurrent = ClassifyClarionFoldPoint(iLevelCurrent,chBuffer);\n\t\t\t//\tif ((iLevelCurrent == SC_FOLDLEVELBASE + 1) && iLineCurrent > 1) {\n\t\t\t//\t\taccStyler.SetLevel(iLineCurrent-1,SC_FOLDLEVELBASE);\n\t\t\t//\t\tiLevelPrev = SC_FOLDLEVELBASE;\n\t\t\t//\t}\n\t\t\t}\n\t\t}\n\n\t\tif (bEOL) {\n\t\t\tint iLevel = iLevelPrev;\n\t\t\tif ((iLevelCurrent > iLevelPrev) && (iVisibleChars > 0))\n\t\t\t\tiLevel |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (iLevel != accStyler.LevelAt(iLineCurrent)) {\n\t\t\t\taccStyler.SetLevel(iLineCurrent,iLevel);\n\t\t\t}\n\t\t\tiLineCurrent++;\n\t\t\tiLevelPrev = iLevelCurrent;\n\t\t\tiVisibleChars = 0;\n\t\t}\n\n\t\tif (!isspacechar(chChar))\n\t\t\tiVisibleChars++;\n\t}\n\n\t// Fill in the real level of the next line, keeping the current flags\n\t// as they will be filled in later.\n\tint iFlagsNext = accStyler.LevelAt(iLineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\taccStyler.SetLevel(iLineCurrent, iLevelPrev | iFlagsNext);\n}\n\n// Word List Descriptions\nstatic const char * const rgWordListDescriptions[] = {\n\t\"Clarion Keywords\",\n\t\"Compiler Directives\",\n\t\"Built-in Procedures and Functions\",\n\t\"Runtime Expressions\",\n\t\"Structure and Data Types\",\n\t\"Attributes\",\n\t\"Standard Equates\",\n\t\"Reserved Words (Labels)\",\n\t\"Reserved Words (Procedure Labels)\",\n\t0,\n};\n\n// Case Sensitive Clarion Language Lexer\nextern const LexerModule lmClw(SCLEX_CLW, ColouriseClarionDocSensitive, \"clarion\", FoldClarionDoc, rgWordListDescriptions);\n\n// Case Insensitive Clarion Language Lexer\nextern const LexerModule lmClwNoCase(SCLEX_CLWNOCASE, ColouriseClarionDocInsensitive, \"clarionnocase\", FoldClarionDoc, rgWordListDescriptions);\n" }, { "path": "lexers/LexCOBOL.cxx", "content": "// Scintilla source code edit control\n/** @file LexCOBOL.cxx\n ** Lexer for COBOL\n ** Based on LexPascal.cxx\n ** Written by Laurent le Tynevez\n ** Updated by Simon Steele September 2002\n ** Updated by Mathias Rauen May 2003 (Delphi adjustments)\n ** Updated by Rod Falck, Aug 2006 Converted to COBOL\n **/\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n#define IN_DIVISION 0x01\n#define IN_DECLARATIVES 0x02\n#define IN_SECTION 0x04\n#define IN_PARAGRAPH 0x08\n#define IN_FLAGS 0xF\n#define NOT_HEADER 0x10\n\nnamespace {\n\nbool isCOBOLoperator(char ch)\n {\n return isoperator(ch);\n }\n\nbool isCOBOLwordchar(char ch)\n {\n return IsASCII(ch) && (isalnum(ch) || ch == '-');\n\n }\n\nbool isCOBOLwordstart(char ch)\n {\n return IsASCII(ch) && isalnum(ch);\n }\n\nint CountBits(int nBits)\n {\n int count = 0;\n for (int i = 0; i < 32; ++i)\n {\n count += nBits & 1;\n nBits >>= 1;\n }\n return count;\n }\n\nvoid getRange(Sci_PositionU start,\n Sci_PositionU end,\n Accessor &styler,\n char *s,\n Sci_PositionU len) {\n Sci_PositionU i = 0;\n while ((i < end - start + 1) && (i < len-1)) {\n s[i] = static_cast(tolower(styler[start + i]));\n i++;\n }\n s[i] = '\\0';\n}\n\nvoid ColourTo(Accessor &styler, Sci_PositionU end, unsigned int attr) {\n styler.ColourTo(end, attr);\n}\n\n\nint classifyWordCOBOL(Sci_PositionU start, Sci_PositionU end, /*WordList &keywords*/WordList *keywordlists[], Accessor &styler, int nContainment, bool *bAarea) {\n int ret = 0;\n\n char s[100];\n s[0] = '\\0';\n s[1] = '\\0';\n getRange(start, end, styler, s, sizeof(s));\n\n int chAttr = SCE_COBOL_IDENTIFIER;\n if (isdigit(s[0]) || (s[0] == '.') || (s[0] == 'v')) {\n chAttr = SCE_COBOL_NUMBER;\n char *p = s + 1;\n while (*p) {\n if ((!isdigit(*p) && (*p) != 'v') && isCOBOLwordchar(*p)) {\n chAttr = SCE_COBOL_IDENTIFIER;\n break;\n }\n ++p;\n }\n }\n if (chAttr == SCE_COBOL_IDENTIFIER) {\n WordList& a_keywords = *keywordlists[0];\n WordList& b_keywords = *keywordlists[1];\n WordList& c_keywords = *keywordlists[2];\n\n if (a_keywords.InList(s)) {\n chAttr = SCE_COBOL_WORD;\n }\n else if (b_keywords.InList(s)) {\n chAttr = SCE_COBOL_WORD2;\n }\n else if (c_keywords.InList(s)) {\n chAttr = SCE_COBOL_WORD3;\n }\n }\n if (*bAarea) {\n if (strcmp(s, \"division\") == 0) {\n ret = IN_DIVISION;\n // we've determined the containment, anything else is just ignored for those purposes\n *bAarea = false;\n } else if (strcmp(s, \"declaratives\") == 0) {\n ret = IN_DIVISION | IN_DECLARATIVES;\n if (nContainment & IN_DECLARATIVES)\n ret |= NOT_HEADER | IN_SECTION;\n // we've determined the containment, anything else is just ignored for those purposes\n *bAarea = false;\n } else if (strcmp(s, \"section\") == 0) {\n ret = (nContainment &~ IN_PARAGRAPH) | IN_SECTION;\n // we've determined the containment, anything else is just ignored for those purposes\n *bAarea = false;\n } else if (strcmp(s, \"end\") == 0 && (nContainment & IN_DECLARATIVES)) {\n ret = IN_DIVISION | IN_DECLARATIVES | IN_SECTION | NOT_HEADER;\n } else {\n ret = nContainment | IN_PARAGRAPH;\n }\n }\n ColourTo(styler, end, chAttr);\n return ret;\n}\n\nvoid ColouriseCOBOLDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\n styler.StartAt(startPos);\n\n int state = initStyle;\n if (state == SCE_COBOL_CHARACTER) // Does not leak onto next line\n state = SCE_COBOL_DEFAULT;\n char chPrev = ' ';\n char chNext = styler[startPos];\n Sci_PositionU lengthDoc = startPos + length;\n\n int nContainment;\n\n Sci_Position currentLine = styler.GetLine(startPos);\n if (currentLine > 0) {\n styler.SetLineState(currentLine, styler.GetLineState(currentLine-1));\n nContainment = styler.GetLineState(currentLine);\n nContainment &= ~NOT_HEADER;\n } else {\n styler.SetLineState(currentLine, 0);\n nContainment = 0;\n }\n\n styler.StartSegment(startPos);\n bool bNewLine = true;\n bool bAarea = !isspacechar(chNext);\n int column = 0;\n for (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n char ch = chNext;\n\n chNext = styler.SafeGetCharAt(i + 1);\n\n ++column;\n\n if (bNewLine) {\n column = 0;\n }\n if (column <= 1 && !bAarea) {\n bAarea = !isspacechar(ch);\n }\n bool bSetNewLine = false;\n if ((ch == '\\r' && chNext != '\\n') || (ch == '\\n')) {\n // Trigger on CR only (Mac style) or either on LF from CR+LF (Dos/Win) or on LF alone (Unix)\n // Avoid triggering two times on Dos/Win\n // End of line\n if (state == SCE_COBOL_CHARACTER) {\n ColourTo(styler, i, state);\n state = SCE_COBOL_DEFAULT;\n }\n styler.SetLineState(currentLine, nContainment);\n currentLine++;\n bSetNewLine = true;\n if (nContainment & NOT_HEADER)\n nContainment &= ~(NOT_HEADER | IN_DECLARATIVES | IN_SECTION);\n }\n\n if (styler.IsLeadByte(ch)) {\n chNext = styler.SafeGetCharAt(i + 2);\n chPrev = ' ';\n i += 1;\n continue;\n }\n\n if (state == SCE_COBOL_DEFAULT) {\n if (isCOBOLwordstart(ch) || (ch == '$' && IsASCII(chNext) && isalpha(chNext))) {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_IDENTIFIER;\n } else if (column == 6 && (ch == '*' || ch == '/')) {\n // Cobol comment line: asterisk in column 7.\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_COMMENTLINE;\n } else if (ch == '*' && chNext == '>') {\n // Cobol inline comment: asterisk, followed by greater than.\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_COMMENTLINE;\n } else if (column == 0 && ch == '*' && chNext != '*') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_COMMENTLINE;\n } else if (column == 0 && ch == '/' && chNext != '*') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_COMMENTLINE;\n } else if (column == 0 && ch == '*' && chNext == '*') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_COMMENTDOC;\n } else if (column == 0 && ch == '/' && chNext == '*') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_COMMENTDOC;\n } else if (ch == '\"') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_STRING;\n } else if (ch == '\\'') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_CHARACTER;\n } else if (ch == '?' && column == 0) {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_PREPROCESSOR;\n } else if (isCOBOLoperator(ch)) {\n ColourTo(styler, i-1, state);\n ColourTo(styler, i, SCE_COBOL_OPERATOR);\n }\n } else if (state == SCE_COBOL_IDENTIFIER) {\n if (!isCOBOLwordchar(ch)) {\n int lStateChange = classifyWordCOBOL(styler.GetStartSegment(), i - 1, keywordlists, styler, nContainment, &bAarea);\n\n if(lStateChange != 0) {\n styler.SetLineState(currentLine, lStateChange);\n nContainment = lStateChange;\n }\n\n state = SCE_COBOL_DEFAULT;\n chNext = styler.SafeGetCharAt(i + 1);\n if (column == 6 && (ch == '*' || ch == '/')) {\n state = SCE_COBOL_COMMENTLINE;\n } else if (ch == '\"') {\n state = SCE_COBOL_STRING;\n } else if (ch == '\\'') {\n state = SCE_COBOL_CHARACTER;\n } else if (isCOBOLoperator(ch)) {\n ColourTo(styler, i, SCE_COBOL_OPERATOR);\n }\n }\n } else {\n if (state == SCE_COBOL_PREPROCESSOR) {\n if ((ch == '\\r' || ch == '\\n') && !(chPrev == '\\\\' || chPrev == '\\r')) {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_DEFAULT;\n }\n } else if (state == SCE_COBOL_COMMENT) {\n if (ch == '\\r' || ch == '\\n') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_DEFAULT;\n }\n } else if (state == SCE_COBOL_COMMENTDOC) {\n if (ch == '\\r' || ch == '\\n') {\n if (((i > styler.GetStartSegment() + 2) || (\n (initStyle == SCE_COBOL_COMMENTDOC) &&\n (styler.GetStartSegment() == static_cast(startPos))))) {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_DEFAULT;\n }\n }\n } else if (state == SCE_COBOL_COMMENTLINE) {\n if (ch == '\\r' || ch == '\\n') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_DEFAULT;\n }\n } else if (state == SCE_COBOL_STRING) {\n if (ch == '\"') {\n ColourTo(styler, i, state);\n state = SCE_COBOL_DEFAULT;\n } else if (ch == '\\r' || ch == '\\n') {\n ColourTo(styler, i-1, state);\n state = SCE_COBOL_DEFAULT;\n }\n } else if (state == SCE_COBOL_CHARACTER) {\n if (ch == '\\'') {\n ColourTo(styler, i, state);\n state = SCE_COBOL_DEFAULT;\n }\n }\n }\n chPrev = ch;\n bNewLine = bSetNewLine;\n if (bNewLine)\n {\n bAarea = false;\n }\n }\n ColourTo(styler, lengthDoc - 1, state);\n}\n\nvoid FoldCOBOLDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[],\n Accessor &styler) {\n bool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n Sci_PositionU endPos = startPos + length;\n int visibleChars = 0;\n Sci_Position lineCurrent = styler.GetLine(startPos);\n int levelPrev = lineCurrent > 0 ? styler.LevelAt(lineCurrent - 1) & SC_FOLDLEVELNUMBERMASK : 0xFFF;\n char chNext = styler[startPos];\n\n bool bNewLine = true;\n bool bAarea = !isspacechar(chNext);\n int column = 0;\n bool bComment = false;\n for (Sci_PositionU i = startPos; i < endPos; i++) {\n char ch = chNext;\n chNext = styler.SafeGetCharAt(i + 1);\n ++column;\n\n if (bNewLine) {\n column = 0;\n bComment = (ch == '*' || ch == '/' || ch == '?');\n }\n if (column <= 1 && !bAarea) {\n bAarea = !isspacechar(ch);\n }\n bool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n if (atEOL) {\n int nContainment = styler.GetLineState(lineCurrent);\n int lev = CountBits(nContainment & IN_FLAGS) | SC_FOLDLEVELBASE;\n if (bAarea && !bComment)\n --lev;\n if (visibleChars == 0 && foldCompact)\n lev |= SC_FOLDLEVELWHITEFLAG;\n if ((bAarea) && (visibleChars > 0) && !(nContainment & NOT_HEADER) && !bComment)\n lev |= SC_FOLDLEVELHEADERFLAG;\n if (lev != styler.LevelAt(lineCurrent)) {\n styler.SetLevel(lineCurrent, lev);\n }\n if ((lev & SC_FOLDLEVELNUMBERMASK) <= (levelPrev & SC_FOLDLEVELNUMBERMASK)) {\n // this level is at the same level or less than the previous line\n // therefore these is nothing for the previous header to collapse, so remove the header\n styler.SetLevel(lineCurrent - 1, levelPrev & ~SC_FOLDLEVELHEADERFLAG);\n }\n levelPrev = lev;\n visibleChars = 0;\n bAarea = false;\n bNewLine = true;\n lineCurrent++;\n } else {\n bNewLine = false;\n }\n\n\n if (!isspacechar(ch))\n visibleChars++;\n }\n\n // Fill in the real level of the next line, keeping the current flags as they will be filled in later\n int flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n styler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nconst char * const COBOLWordListDesc[] = {\n \"A Keywords\",\n \"B Keywords\",\n \"Extended Keywords\",\n nullptr\n};\n\n}\n\nextern const LexerModule lmCOBOL(SCLEX_COBOL, ColouriseCOBOLDoc, \"COBOL\", FoldCOBOLDoc, COBOLWordListDesc);\n" }, { "path": "lexers/LexCPP.cxx", "content": "// Scintilla source code edit control\n/** @file LexCPP.cxx\n ** Lexer for C++, C, Java, and JavaScript.\n ** Further folding features and configuration properties added by \"Udo Lechner\" \n **/\n// Copyright 1998-2005 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"StringCopy.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"SparseState.h\"\n#include \"SubStyles.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\t// Use an unnamed namespace to protect the functions and classes from name conflicts\n\nconstexpr bool IsSpaceEquiv(int state) noexcept {\n\treturn (state <= SCE_C_COMMENTDOC) ||\n\t\t// including SCE_C_DEFAULT, SCE_C_COMMENT, SCE_C_COMMENTLINE\n\t\t(state == SCE_C_COMMENTLINEDOC) || (state == SCE_C_COMMENTDOCKEYWORD) ||\n\t\t(state == SCE_C_COMMENTDOCKEYWORDERROR);\n}\n\n// Preconditions: sc.currentPos points to a character after '+' or '-'.\n// The test for pos reaching 0 should be redundant,\n// and is in only for safety measures.\n// Limitation: this code will give the incorrect answer for code like\n// a = b+++/ptn/...\n// Putting a space between the '++' post-inc operator and the '+' binary op\n// fixes this, and is highly recommended for readability anyway.\nbool FollowsPostfixOperator(const StyleContext &sc, LexAccessor &styler) {\n\tSci_Position pos = sc.currentPos;\n\twhile (--pos > 0) {\n\t\tconst char ch = styler[pos];\n\t\tif (ch == '+' || ch == '-') {\n\t\t\treturn styler[pos - 1] == ch;\n\t\t}\n\t}\n\treturn false;\n}\n\nbool followsReturnKeyword(const StyleContext &sc, LexAccessor &styler) {\n\t// Don't look at styles, so no need to flush.\n\tSci_Position pos = sc.currentPos;\n\tconst Sci_Position currentLine = styler.GetLine(pos);\n\tconst Sci_Position lineStartPos = styler.LineStart(currentLine);\n\twhile (--pos > lineStartPos) {\n\t\tconst char ch = styler.SafeGetCharAt(pos);\n\t\tif (ch != ' ' && ch != '\\t') {\n\t\t\tbreak;\n\t\t}\n\t}\n\tconst char *retBack = \"nruter\";\n\tconst char *s = retBack;\n\twhile (*s\n\t\t&& pos >= lineStartPos\n\t\t&& styler.SafeGetCharAt(pos) == *s) {\n\t\ts++;\n\t\tpos--;\n\t}\n\treturn !*s;\n}\n\nconstexpr bool IsOperatorOrSpace(int ch) noexcept {\n\treturn isoperator(ch) || IsASpace(ch);\n}\n\nbool OnlySpaceOrTab(std::string_view s) noexcept {\n\tfor (const char ch : s) {\n\t\tif (!IsASpaceOrTab(ch))\n\t\t\treturn false;\n\t}\n\treturn true;\n}\n\nusing Tokens = std::vector;\n\nTokens StringSplit(const std::string &text, int separator) {\n\tTokens vs(text.empty() ? 0 : 1);\n\tfor (const char ch : text) {\n\t\tif (ch == separator) {\n\t\t\tvs.emplace_back();\n\t\t} else {\n\t\t\tvs.back() += ch;\n\t\t}\n\t}\n\treturn vs;\n}\n\nstruct BracketPair {\n\tTokens::iterator itBracket;\n\tTokens::iterator itEndBracket;\n};\n\nBracketPair FindBracketPair(Tokens &tokens) {\n\tconst Tokens::iterator itBracket = std::find(tokens.begin(), tokens.end(), \"(\");\n\tif (itBracket != tokens.end()) {\n\t\tptrdiff_t nest = 0;\n\t\tfor (Tokens::iterator itTok = itBracket; itTok != tokens.end(); ++itTok) {\n\t\t\tif (*itTok == \"(\") {\n\t\t\t\tnest++;\n\t\t\t} else if (*itTok == \")\") {\n\t\t\t\tnest--;\n\t\t\t\tif (nest == 0) {\n\t\t\t\t\treturn { itBracket, itTok };\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t}\n\treturn { tokens.end(), tokens.end() };\n}\n\nvoid highlightTaskMarker(StyleContext &sc, LexAccessor &styler,\n\t\tint activity, const WordList &markerList, bool caseSensitive) {\n\tif (IsOperatorOrSpace(sc.chPrev) && !IsOperatorOrSpace(sc.ch) && markerList.Length()) {\n\t\tstd::string marker;\n\t\tfor (Sci_PositionU currPos = sc.currentPos; true; currPos++) {\n\t\t\tconst char ch = styler.SafeGetCharAt(currPos);\n\t\t\tif (IsOperatorOrSpace(ch)) {\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tif (caseSensitive)\n\t\t\t\tmarker.push_back(ch);\n\t\t\telse\n\t\t\t\tmarker.push_back(MakeLowerCase(ch));\n\t\t}\n\t\tif (markerList.InList(marker)) {\n\t\t\tsc.SetState(SCE_C_TASKMARKER|activity);\n\t\t}\n\t}\n}\n\nconst CharacterSet setHexDigits(CharacterSet::setDigits, \"ABCDEFabcdef\");\nconst CharacterSet setOctDigits(\"01234567\");\nconst CharacterSet setNoneNumeric;\n\nclass EscapeSequence {\n\tconst CharacterSet *escapeSetValid = nullptr;\n\tint digitsLeft = 0;\npublic:\n\tint outerState = SCE_C_DEFAULT;\n\tEscapeSequence() = default;\n\tvoid resetEscapeState(int state, int nextChar) noexcept {\n\t\tdigitsLeft = 0;\n\t\touterState = state;\n\t\tescapeSetValid = &setNoneNumeric;\n\t\tif (nextChar == 'U') {\n\t\t\tdigitsLeft = 9;\n\t\t\tescapeSetValid = &setHexDigits;\n\t\t} else if (nextChar == 'u') {\n\t\t\tdigitsLeft = 5;\n\t\t\tescapeSetValid = &setHexDigits;\n\t\t} else if (nextChar == 'x') {\n\t\t\tdigitsLeft = 5;\n\t\t\tescapeSetValid = &setHexDigits;\n\t\t} else if (setOctDigits.Contains(nextChar)) {\n\t\t\tdigitsLeft = 3;\n\t\t\tescapeSetValid = &setOctDigits;\n\t\t}\n\t}\n\t[[nodiscard]] bool atEscapeEnd(int currChar) const noexcept {\n\t\treturn (digitsLeft <= 0) || !escapeSetValid->Contains(currChar);\n\t}\n\tvoid consumeDigit() noexcept {\n\t\tdigitsLeft--;\n\t}\n};\n\nstd::string GetRestOfLine(LexAccessor &styler, Sci_Position start, bool allowSpace) {\n\tstd::string restOfLine;\n\tSci_Position line = styler.GetLine(start);\n\tSci_Position pos = start;\n\tSci_Position endLine = styler.LineEnd(line);\n\tchar ch = styler.SafeGetCharAt(start, '\\n');\n\twhile (pos < endLine) {\n\t\tif (ch == '\\\\' && ((pos + 1) == endLine)) {\n\t\t\t// Continuation line\n\t\t\tline++;\n\t\t\tpos = styler.LineStart(line);\n\t\t\tendLine = styler.LineEnd(line);\n\t\t\tch = styler.SafeGetCharAt(pos, '\\n');\n\t\t} else {\n\t\t\tconst char chNext = styler.SafeGetCharAt(pos + 1, '\\n');\n\t\t\tif (ch == '/' && (chNext == '/' || chNext == '*'))\n\t\t\t\tbreak;\n\t\t\tif (allowSpace || (ch != ' ')) {\n\t\t\t\trestOfLine += ch;\n\t\t\t}\n\t\t\tpos++;\n\t\t\tch = chNext;\n\t\t}\n\t}\n\treturn restOfLine;\n}\n\nconstexpr bool IsStreamCommentStyle(int style) noexcept {\n\treturn style == SCE_C_COMMENT ||\n\t\tstyle == SCE_C_COMMENTDOC ||\n\t\tstyle == SCE_C_COMMENTDOCKEYWORD ||\n\t\tstyle == SCE_C_COMMENTDOCKEYWORDERROR;\n}\n\nstruct PPDefinition {\n\tSci_Position line;\n\tstd::string key;\n\tstd::string value;\n\tbool isUndef;\n\tstd::string arguments;\n\tPPDefinition(Sci_Position line_, std::string_view key_, std::string_view value_, bool isUndef_, std::string_view arguments_) :\n\t\tline(line_), key(key_), value(value_), isUndef(isUndef_), arguments(arguments_) {\n\t}\n};\n\nconstexpr int inactiveFlag = 0x40;\n\nclass LinePPState {\n\t// Track the state of preprocessor conditionals to allow showing active and inactive\n\t// code in different styles.\n\t// Only works up to 31 levels of conditional nesting.\n\n\t// state is a bit mask with 1 bit per level\n\t// bit is 1 for level if section inactive, so any bits set = inactive style\n\tint state = 0;\n\t// ifTaken is a bit mask with 1 bit per level\n\t// bit is 1 for level if some branch at this level has been taken\n\tint ifTaken = 0;\n\t// level is the nesting level of #if constructs\n\tint level = -1;\n\tstatic const int maximumNestingLevel = 31;\n\t[[nodiscard]] int maskLevel() const noexcept {\n\t\tif (level >= 0) {\n\t\t\treturn 1 << level;\n\t\t}\n\t\treturn 1;\n\t}\npublic:\n\tLinePPState() noexcept = default;\n\t[[nodiscard]] bool ValidLevel() const noexcept {\n\t\treturn level >= 0 && level < maximumNestingLevel;\n\t}\n\t[[nodiscard]] bool IsActive() const noexcept {\n\t\treturn state == 0;\n\t}\n\t[[nodiscard]] bool IsInactive() const noexcept {\n\t\treturn state != 0;\n\t}\n\t[[nodiscard]] int ActiveState() const noexcept {\n\t\treturn state ? inactiveFlag : 0;\n\t}\n\t[[nodiscard]] bool CurrentIfTaken() const noexcept {\n\t\treturn (ifTaken & maskLevel()) != 0;\n\t}\n\tvoid StartSection(bool on) noexcept {\n\t\tlevel++;\n\t\tif (ValidLevel()) {\n\t\t\tif (on) {\n\t\t\t\tstate &= ~maskLevel();\n\t\t\t\tifTaken |= maskLevel();\n\t\t\t} else {\n\t\t\t\tstate |= maskLevel();\n\t\t\t\tifTaken &= ~maskLevel();\n\t\t\t}\n\t\t}\n\t}\n\tvoid EndSection() noexcept {\n\t\tif (ValidLevel()) {\n\t\t\tstate &= ~maskLevel();\n\t\t\tifTaken &= ~maskLevel();\n\t\t}\n\t\tlevel--;\n\t}\n\tvoid InvertCurrentLevel() noexcept {\n\t\tif (ValidLevel()) {\n\t\t\tstate ^= maskLevel();\n\t\t\tifTaken |= maskLevel();\n\t\t}\n\t}\n};\n\n// Hold the preprocessor state for each line seen.\n// Currently one entry per line but could become sparse with just one entry per preprocessor line.\nclass PPStates {\n\tstd::vector vlls;\npublic:\n\t[[nodiscard]] LinePPState ForLine(Sci_Position line) const noexcept {\n\t\tif ((line > 0) && (vlls.size() > static_cast(line))) {\n\t\t\treturn vlls[line];\n\t\t}\n\t\treturn {};\n\t}\n\tvoid Add(Sci_Position line, LinePPState lls) {\n\t\tvlls.resize(line+1);\n\t\tvlls[line] = lls;\n\t}\n};\n\nenum class BackQuotedString : int {\n\tNone,\n\tRawString,\n\tTemplateLiteral,\n};\n\n// string interpolating state\nstruct InterpolatingState {\n\tint state;\n\tint braceCount;\n};\n\nstruct Definition {\n\tstd::string_view name;\n\tstd::string_view value;\n\tstd::string_view arguments;\n};\n\nconstexpr std::string_view TrimSpaceTab(std::string_view sv) noexcept {\n\twhile (!sv.empty() && IsASpaceOrTab(sv.front())) {\n\t\tsv.remove_prefix(1);\n\t}\n\treturn sv;\n}\n\n// Parse a macro definition, either from a #define line in a file or from keywords.\n// Either an object macro or a function macro () .\n// VALUE is optional and is treated as \"1\" if missing.\n// #define ALLOW_PRINT\n// #define VERSION 37\n// #define VER(a,b) a*10+b\n// Whitespace separates macro and value in files but keywords use '=' separator.\n// 'endName' contains a set of characters that terminate the name of the macro.\n\nconstexpr Definition ParseDefine(std::string_view definition, std::string_view endName) {\n\tDefinition ret;\n\tdefinition = TrimSpaceTab(definition);\n\tconst size_t afterName = definition.find_first_of(endName);\n\tif (afterName != std::string_view::npos) {\n\t\tret.name = definition.substr(0, afterName);\n\t\tif (definition.at(afterName) == '(') {\n\t\t\t// Macro\n\t\t\tdefinition.remove_prefix(afterName+1);\n\t\t\tconst size_t closeBracket = definition.find(')');\n\t\t\tif (closeBracket != std::string_view::npos) {\n\t\t\t\tret.arguments = definition.substr(0, closeBracket);\n\t\t\t\tdefinition.remove_prefix(closeBracket+1);\n\t\t\t\tif (!definition.empty() && (endName.find(definition.front()) != std::string_view::npos)) {\n\t\t\t\t\tdefinition.remove_prefix(1);\n\t\t\t\t}\n\t\t\t\tret.value = definition;\n\t\t\t} // else malformed as requires closing bracket\n\t\t} else {\n\t\t\tret.value = definition.substr(afterName+1);\n\t\t}\n\t} else {\n\t\tret.name = definition;\n\t\tret.value = \"1\";\n\t}\n\treturn ret;\n}\n\n// An individual named option for use in an OptionSet\n\n// Options used for LexerCPP\nstruct OptionsCPP {\n\tbool stylingWithinPreprocessor = false;\n\tbool identifiersAllowDollars = true;\n\tbool identifiersAllowHashes = false;\n\tbool enablePreprocessor = true;\n\tbool trackPreprocessor = true;\n\tbool updatePreprocessor = true;\n\tbool verbatimStringsAllowEscapes = false;\n\tbool triplequotedStrings = false;\n\tbool hashquotedStrings = false;\n\tBackQuotedString backQuotedStrings = BackQuotedString::None;\n\tbool escapeSequence = false;\n\tbool fold = false;\n\tbool foldSyntaxBased = true;\n\tbool foldComment = false;\n\tbool foldCommentMultiline = true;\n\tbool foldCommentExplicit = true;\n\tstd::string foldExplicitStart;\n\tstd::string foldExplicitEnd;\n\tbool foldExplicitAnywhere = false;\n\tbool foldPreprocessor = false;\n\tbool foldPreprocessorAtElse = false;\n\tbool foldCompact = false;\n\tbool foldAtElse = false;\n};\n\nconst char *const cppWordLists[] = {\n \"Primary keywords and identifiers\",\n \"Secondary keywords and identifiers\",\n \"Documentation comment keywords\",\n \"Global classes and typedefs\",\n \"Preprocessor definitions\",\n \"Task marker and error marker keywords\",\n nullptr,\n};\n\nstruct OptionSetCPP : public OptionSet {\n\tOptionSetCPP() {\n\t\tDefineProperty(\"styling.within.preprocessor\", &OptionsCPP::stylingWithinPreprocessor,\n\t\t\t\"For C++ code, determines whether all preprocessor code is styled in the \"\n\t\t\t\"preprocessor style (0, the default) or only from the initial # to the end \"\n\t\t\t\"of the command word(1).\");\n\n\t\tDefineProperty(\"lexer.cpp.allow.dollars\", &OptionsCPP::identifiersAllowDollars,\n\t\t\t\"Set to 0 to disallow the '$' character in identifiers with the cpp lexer.\");\n\n\t\tDefineProperty(\"lexer.cpp.allow.hashes\", &OptionsCPP::identifiersAllowHashes,\n\t\t\t\"Set to 1 to allow the '#' character in identifiers.\");\n\n\t\tDefineProperty(\"lexer.cpp.enable.preprocessor\", &OptionsCPP::enablePreprocessor,\n\t\t\t\"Set to 0 to disable recognition of preprocessor directives.\");\n\n\t\tDefineProperty(\"lexer.cpp.track.preprocessor\", &OptionsCPP::trackPreprocessor,\n\t\t\t\"Set to 1 to interpret #if/#else/#endif to grey out code that is not active.\");\n\n\t\tDefineProperty(\"lexer.cpp.update.preprocessor\", &OptionsCPP::updatePreprocessor,\n\t\t\t\"Set to 1 to update preprocessor definitions when #define found.\");\n\n\t\tDefineProperty(\"lexer.cpp.verbatim.strings.allow.escapes\", &OptionsCPP::verbatimStringsAllowEscapes,\n\t\t\t\"Set to 1 to allow verbatim strings to contain escape sequences.\");\n\n\t\tDefineProperty(\"lexer.cpp.triplequoted.strings\", &OptionsCPP::triplequotedStrings,\n\t\t\t\"Set to 1 to enable highlighting of triple-quoted strings.\");\n\n\t\tDefineProperty(\"lexer.cpp.hashquoted.strings\", &OptionsCPP::hashquotedStrings,\n\t\t\t\"Set to 1 to enable highlighting of hash-quoted strings.\");\n\n\t\tDefineProperty(\"lexer.cpp.backquoted.strings\", &OptionsCPP::backQuotedStrings,\n\t\t\t\"Set how to highlighting back-quoted strings. \"\n\t\t\t\"0 (the default) no highlighting. \"\n\t\t\t\"1 highlighted as Go raw string. \"\n\t\t\t\"2 highlighted as JavaScript template literal.\");\n\n\t\tDefineProperty(\"lexer.cpp.escape.sequence\", &OptionsCPP::escapeSequence,\n\t\t\t\"Set to 1 to enable highlighting of escape sequences in strings\");\n\n\t\tDefineProperty(\"fold\", &OptionsCPP::fold);\n\n\t\tDefineProperty(\"fold.cpp.syntax.based\", &OptionsCPP::foldSyntaxBased,\n\t\t\t\"Set this property to 0 to disable syntax based folding.\");\n\n\t\tDefineProperty(\"fold.comment\", &OptionsCPP::foldComment,\n\t\t\t\"This option enables folding multi-line comments and explicit fold points when using the C++ lexer. \"\n\t\t\t\"Explicit fold points allows adding extra folding by placing a //{ comment at the start and a //} \"\n\t\t\t\"at the end of a section that should fold.\");\n\n\t\tDefineProperty(\"fold.cpp.comment.multiline\", &OptionsCPP::foldCommentMultiline,\n\t\t\t\"Set this property to 0 to disable folding multi-line comments when fold.comment=1.\");\n\n\t\tDefineProperty(\"fold.cpp.comment.explicit\", &OptionsCPP::foldCommentExplicit,\n\t\t\t\"Set this property to 0 to disable folding explicit fold points when fold.comment=1.\");\n\n\t\tDefineProperty(\"fold.cpp.explicit.start\", &OptionsCPP::foldExplicitStart,\n\t\t\t\"The string to use for explicit fold start points, replacing the standard //{.\");\n\n\t\tDefineProperty(\"fold.cpp.explicit.end\", &OptionsCPP::foldExplicitEnd,\n\t\t\t\"The string to use for explicit fold end points, replacing the standard //}.\");\n\n\t\tDefineProperty(\"fold.cpp.explicit.anywhere\", &OptionsCPP::foldExplicitAnywhere,\n\t\t\t\"Set this property to 1 to enable explicit fold points anywhere, not just in line comments.\");\n\n\t\tDefineProperty(\"fold.cpp.preprocessor.at.else\", &OptionsCPP::foldPreprocessorAtElse,\n\t\t\t\"This option enables folding on a preprocessor #else or #endif line of an #if statement.\");\n\n\t\tDefineProperty(\"fold.preprocessor\", &OptionsCPP::foldPreprocessor,\n\t\t\t\"This option enables folding preprocessor directives when using the C++ lexer. \"\n\t\t\t\"Includes C#'s explicit #region and #endregion folding directives.\");\n\n\t\tDefineProperty(\"fold.compact\", &OptionsCPP::foldCompact);\n\n\t\tDefineProperty(\"fold.at.else\", &OptionsCPP::foldAtElse,\n\t\t\t\"This option enables C++ folding on a \\\"} else {\\\" line of an if statement.\");\n\n\t\tDefineWordListSets(cppWordLists);\n\t}\n};\n\nconst char styleSubable[] = {SCE_C_IDENTIFIER, SCE_C_COMMENTDOCKEYWORD, 0};\n\nconst LexicalClass lexicalClasses[] = {\n\t// Lexer Cpp SCLEX_CPP SCE_C_:\n\t0, \"SCE_C_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_C_COMMENT\", \"comment\", \"Comment: /* */.\",\n\t2, \"SCE_C_COMMENTLINE\", \"comment line\", \"Line Comment: //.\",\n\t3, \"SCE_C_COMMENTDOC\", \"comment documentation\", \"Doc comment: block comments beginning with /** or /*!\",\n\t4, \"SCE_C_NUMBER\", \"literal numeric\", \"Number\",\n\t5, \"SCE_C_WORD\", \"keyword\", \"Keyword\",\n\t6, \"SCE_C_STRING\", \"literal string\", \"Double quoted string\",\n\t7, \"SCE_C_CHARACTER\", \"literal string character\", \"Single quoted string\",\n\t8, \"SCE_C_UUID\", \"literal uuid\", \"UUIDs (only in IDL)\",\n\t9, \"SCE_C_PREPROCESSOR\", \"preprocessor\", \"Preprocessor\",\n\t10, \"SCE_C_OPERATOR\", \"operator\", \"Operators\",\n\t11, \"SCE_C_IDENTIFIER\", \"identifier\", \"Identifiers\",\n\t12, \"SCE_C_STRINGEOL\", \"error literal string\", \"End of line where string is not closed\",\n\t13, \"SCE_C_VERBATIM\", \"literal string multiline raw\", \"Verbatim strings for C#\",\n\t14, \"SCE_C_REGEX\", \"literal regex\", \"Regular expressions for JavaScript\",\n\t15, \"SCE_C_COMMENTLINEDOC\", \"comment documentation line\", \"Doc Comment Line: line comments beginning with /// or //!.\",\n\t16, \"SCE_C_WORD2\", \"identifier\", \"Keywords2\",\n\t17, \"SCE_C_COMMENTDOCKEYWORD\", \"comment documentation keyword\", \"Comment keyword\",\n\t18, \"SCE_C_COMMENTDOCKEYWORDERROR\", \"error comment documentation keyword\", \"Comment keyword error\",\n\t19, \"SCE_C_GLOBALCLASS\", \"identifier\", \"Global class\",\n\t20, \"SCE_C_STRINGRAW\", \"literal string multiline raw\", \"Raw strings for C++0x\",\n\t21, \"SCE_C_TRIPLEVERBATIM\", \"literal string multiline raw\", \"Triple-quoted strings for Vala\",\n\t22, \"SCE_C_HASHQUOTEDSTRING\", \"literal string\", \"Hash-quoted strings for Pike\",\n\t23, \"SCE_C_PREPROCESSORCOMMENT\", \"comment preprocessor\", \"Preprocessor stream comment\",\n\t24, \"SCE_C_PREPROCESSORCOMMENTDOC\", \"comment preprocessor documentation\", \"Preprocessor stream doc comment\",\n\t25, \"SCE_C_USERLITERAL\", \"literal\", \"User defined literals\",\n\t26, \"SCE_C_TASKMARKER\", \"comment taskmarker\", \"Task Marker\",\n\t27, \"SCE_C_ESCAPESEQUENCE\", \"literal string escapesequence\", \"Escape sequence\",\n};\n\nconstexpr int sizeLexicalClasses = static_cast(std::size(lexicalClasses));\n\n}\n\nclass LexerCPP : public ILexer5 {\n\tbool caseSensitive;\n\tCharacterSet setWord;\n\tCharacterSet setNegationOp;\n\tCharacterSet setAddOp;\n\tCharacterSet setMultOp;\n\tCharacterSet setRelOp;\n\tCharacterSet setLogicalOp;\n\tCharacterSet setWordStart;\n\tPPStates vlls;\n\tstd::vector ppDefineHistory;\n\tstd::map> interpolatingAtEol;\n\tWordList keywords;\n\tWordList keywords2;\n\tWordList keywords3;\n\tWordList keywords4;\n\tWordList ppDefinitions;\n\tWordList markerList;\n\tstruct SymbolValue {\n\t\tstd::string value;\n\t\tstd::string arguments;\n\t\tSymbolValue() noexcept = default;\n\t\tSymbolValue(std::string_view value_, std::string_view arguments_) : value(value_), arguments(arguments_) {\n\t\t}\n\t\tSymbolValue &operator = (const std::string &value_) {\n\t\t\tvalue = value_;\n\t\t\targuments.clear();\n\t\t\treturn *this;\n\t\t}\n\t\t[[nodiscard]] bool IsMacro() const noexcept {\n\t\t\treturn !arguments.empty();\n\t\t}\n\t};\n\tusing SymbolTable = std::map;\n\tSymbolTable preprocessorDefinitionsStart;\n\tOptionsCPP options;\n\tOptionSetCPP osCPP;\n\tEscapeSequence escapeSeq;\n\tSparseState rawStringTerminators;\n\tenum { ssIdentifier, ssDocKeyword };\n\tSubStyles subStyles{ styleSubable, SubStylesFirst, SubStylesAvailable, inactiveFlag };\n\tstd::string returnBuffer;\npublic:\n\texplicit LexerCPP(bool caseSensitive_) :\n\t\tcaseSensitive(caseSensitive_),\n\t\tsetWord(CharacterSet::setAlphaNum, \"._\", true),\n\t\tsetNegationOp(\"!\"),\n\t\tsetAddOp(\"+-\"),\n\t\tsetMultOp(\"*/%\"),\n\t\tsetRelOp(\"=!<>\"),\n\t\tsetLogicalOp(\"|&\") {\n\t}\n\t// Deleted so LexerCPP objects can not be copied.\n\tLexerCPP(const LexerCPP &) = delete;\n\tLexerCPP(LexerCPP &&) = delete;\n\tvoid operator=(const LexerCPP &) = delete;\n\tvoid operator=(LexerCPP &&) = delete;\n\tvirtual ~LexerCPP() = default;\n\tvoid SCI_METHOD Release() noexcept override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const noexcept override {\n\t\treturn lvRelease5;\n\t}\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osCPP.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osCPP.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osCPP.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osCPP.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid *SCI_METHOD PrivateCall(int, void *) noexcept override {\n\t\treturn nullptr;\n\t}\n\n\tint SCI_METHOD LineEndTypesSupported() noexcept override {\n\t\treturn SC_LINE_END_TYPE_UNICODE;\n\t}\n\n\tint SCI_METHOD AllocateSubStyles(int styleBase, int numberStyles) override {\n\t\treturn subStyles.Allocate(styleBase, numberStyles);\n\t}\n\tint SCI_METHOD SubStylesStart(int styleBase) override {\n\t\treturn subStyles.Start(styleBase);\n\t}\n\tint SCI_METHOD SubStylesLength(int styleBase) override {\n\t\treturn subStyles.Length(styleBase);\n\t}\n\tint SCI_METHOD StyleFromSubStyle(int subStyle) override {\n\t\tconst int styleBase = subStyles.BaseStyle(MaskActive(subStyle));\n\t\tconst int inactive = subStyle & inactiveFlag;\n\t\treturn styleBase | inactive;\n\t}\n\tint SCI_METHOD PrimaryStyleFromStyle(int style) noexcept override {\n\t\treturn MaskActive(style);\n\t}\n\tvoid SCI_METHOD FreeSubStyles() override {\n\t\tsubStyles.Free();\n\t}\n\tvoid SCI_METHOD SetIdentifiers(int style, const char *identifiers) override {\n\t\tsubStyles.SetIdentifiers(style, identifiers);\n\t}\n\tint SCI_METHOD DistanceToSecondaryStyles() noexcept override {\n\t\treturn inactiveFlag;\n\t}\n\tconst char *SCI_METHOD GetSubStyleBases() noexcept override {\n\t\treturn styleSubable;\n\t}\n\tint SCI_METHOD NamedStyles() override {\n\t\treturn std::max(subStyles.LastAllocated() + 1,\n\t\t\tsizeLexicalClasses) +\n\t\t\tinactiveFlag;\n\t}\n\tconst char *SCI_METHOD NameOfStyle(int style) override {\n\t\tif (style >= NamedStyles())\n\t\t\treturn \"\";\n\t\tif (style < sizeLexicalClasses)\n\t\t\treturn lexicalClasses[style].name;\n\t\t// TODO: inactive and substyles\n\t\treturn \"\";\n\t}\n\tconst char *SCI_METHOD TagsOfStyle(int style) override {\n\t\tif (style >= NamedStyles())\n\t\t\treturn \"Excess\";\n\t\treturnBuffer.clear();\n\t\tconst int firstSubStyle = subStyles.FirstAllocated();\n\t\tif (firstSubStyle >= 0) {\n\t\t\tconst int lastSubStyle = subStyles.LastAllocated();\n\t\t\tif (((style >= firstSubStyle) && (style <= (lastSubStyle))) ||\n\t\t\t\t((style >= firstSubStyle + inactiveFlag) && (style <= (lastSubStyle + inactiveFlag)))) {\n\t\t\t\tint styleActive = style;\n\t\t\t\tif (style > lastSubStyle) {\n\t\t\t\t\treturnBuffer = \"inactive \";\n\t\t\t\t\tstyleActive -= inactiveFlag;\n\t\t\t\t}\n\t\t\t\tconst int styleMain = StyleFromSubStyle(styleActive);\n\t\t\t\treturnBuffer += lexicalClasses[styleMain].tags;\n\t\t\t\treturn returnBuffer.c_str();\n\t\t\t}\n\t\t}\n\t\tif (style < sizeLexicalClasses)\n\t\t\treturn lexicalClasses[style].tags;\n\t\tif (style >= inactiveFlag) {\n\t\t\treturnBuffer = \"inactive \";\n\t\t\tconst int styleActive = style - inactiveFlag;\n\t\t\tif (styleActive < sizeLexicalClasses)\n\t\t\t\treturnBuffer += lexicalClasses[styleActive].tags;\n\t\t\telse\n\t\t\t\treturnBuffer.clear();\n\t\t\treturn returnBuffer.c_str();\n\t\t}\n\t\treturn \"\";\n\t}\n\tconst char *SCI_METHOD DescriptionOfStyle(int style) override {\n\t\tif (style >= NamedStyles())\n\t\t\treturn \"\";\n\t\tif (style < sizeLexicalClasses)\n\t\t\treturn lexicalClasses[style].description;\n\t\t// TODO: inactive and substyles\n\t\treturn \"\";\n\t}\n\n\t// ILexer5 methods\n\tconst char *SCI_METHOD GetName() override {\n\t\treturn caseSensitive ? \"cpp\" : \"cppnocase\";\n\t}\n\tint SCI_METHOD GetIdentifier() override {\n\t\treturn caseSensitive ? SCLEX_CPP : SCLEX_CPPNOCASE;\n\t}\n\tconst char *SCI_METHOD PropertyGet(const char *key) override;\n\n\tstatic ILexer5 *LexerFactoryCPP() {\n\t\treturn new LexerCPP(true);\n\t}\n\tstatic ILexer5 *LexerFactoryCPPInsensitive() {\n\t\treturn new LexerCPP(false);\n\t}\n\tconstexpr static int MaskActive(int style) noexcept {\n\t\treturn style & ~inactiveFlag;\n\t}\n\tvoid EvaluateTokens(Tokens &tokens, const SymbolTable &preprocessorDefinitions);\n\t[[nodiscard]] Tokens Tokenize(const std::string &expr) const;\n\tbool EvaluateExpression(const std::string &expr, const SymbolTable &preprocessorDefinitions);\n};\n\nSci_Position SCI_METHOD LexerCPP::PropertySet(const char *key, const char *val) {\n\tif (osCPP.PropertySet(&options, key, val)) {\n\t\tconst std::string_view keyView(key);\n\t\tif ((keyView == \"lexer.cpp.allow.dollars\") || (keyView == \"lexer.cpp.allow.hashes\")) {\n\t\t\tsetWord = CharacterSet(CharacterSet::setAlphaNum, \"._\", true);\n\t\t\tif (options.identifiersAllowDollars) {\n\t\t\t\tsetWord.Add('$');\n\t\t\t}\n\t\t\tif (options.identifiersAllowHashes) {\n\t\t\t\tsetWord.Add('#');\n\t\t\t}\n\t\t}\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nconst char *SCI_METHOD LexerCPP::PropertyGet(const char *key) {\n\treturn osCPP.PropertyGet(key);\n}\n\nSci_Position SCI_METHOD LexerCPP::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywords2;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywords3;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywords4;\n\t\tbreak;\n\tcase 4:\n\t\twordListN = &ppDefinitions;\n\t\tbreak;\n\tcase 5:\n\t\twordListN = &markerList;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl)) {\n\t\t\tfirstModification = 0;\n\t\t\tif (n == 4) {\n\t\t\t\t// Rebuild preprocessorDefinitions\n\t\t\t\tpreprocessorDefinitionsStart.clear();\n\t\t\t\tfor (int nDefinition = 0; nDefinition < ppDefinitions.Length(); nDefinition++) {\n\t\t\t\t\tconst Definition def = ParseDefine(ppDefinitions.WordAt(nDefinition), \"(=\");\n\t\t\t\t\tpreprocessorDefinitionsStart[std::string(def.name)] = SymbolValue(def.value, def.arguments);\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerCPP::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\tconst StyleContext::Transform transform = caseSensitive ?\n\t\tStyleContext::Transform::none : StyleContext::Transform::lower;\n\n\tconst CharacterSet setOKBeforeRE(\"([{=,:;!%^&*|?~+-> \");\n\tconst CharacterSet setCouldBePostOp(\"+-\");\n\n\tconst CharacterSet setDoxygen(CharacterSet::setAlpha, \"$@\\\\&<>#{}[]\");\n\n\tsetWordStart = CharacterSet(CharacterSet::setAlpha, \"_\", true);\n\n\tconst CharacterSet setInvalidRawFirst(\" )\\\\\\t\\v\\f\\n\");\n\n\tif (options.identifiersAllowDollars) {\n\t\tsetWordStart.Add('$');\n\t}\n\tif (options.identifiersAllowHashes) {\n\t\tsetWordStart.Add('#');\n\t}\n\n\tint chPrevNonWhite = ' ';\n\tint visibleChars = 0;\n\tbool lastWordWasUUID = false;\n\tint styleBeforeDCKeyword = SCE_C_DEFAULT;\n\tint styleBeforeTaskMarker = SCE_C_DEFAULT;\n\tbool continuationLine = false;\n\tbool isIncludePreprocessor = false;\n\tbool isStringInPreprocessor = false;\n\tbool inRERange = false;\n\tbool seenDocKeyBrace = false;\n\n\tstd::vector interpolatingStack;\n\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tif (options.backQuotedStrings == BackQuotedString::TemplateLiteral) {\n\t\t// code copied from LexPython\n\t\tauto it = interpolatingAtEol.find(lineCurrent - 1);\n\t\tif (it != interpolatingAtEol.end()) {\n\t\t\tinterpolatingStack = it->second;\n\t\t}\n\t\tit = interpolatingAtEol.lower_bound(lineCurrent);\n\t\tif (it != interpolatingAtEol.end()) {\n\t\t\tinterpolatingAtEol.erase(it, interpolatingAtEol.end());\n\t\t}\n\t}\n\n\tif ((MaskActive(initStyle) == SCE_C_PREPROCESSOR) ||\n (MaskActive(initStyle) == SCE_C_COMMENTLINE) ||\n (MaskActive(initStyle) == SCE_C_COMMENTLINEDOC)) {\n\t\t// Set continuationLine if last character of previous line is '\\'\n\t\tif (lineCurrent > 0) {\n\t\t\tconst Sci_Position endLinePrevious = styler.LineEnd(lineCurrent - 1);\n\t\t\tif (endLinePrevious > 0) {\n\t\t\t\tcontinuationLine = styler.SafeGetCharAt(endLinePrevious-1) == '\\\\';\n\t\t\t}\n\t\t}\n\t}\n\n\t// look back to set chPrevNonWhite properly for better regex colouring\n\tif (startPos > 0) {\n\t\tSci_Position back = startPos;\n\t\twhile (--back && IsSpaceEquiv(MaskActive(styler.StyleAt(back))))\n\t\t\t;\n\t\tif (MaskActive(styler.StyleAt(back)) == SCE_C_OPERATOR) {\n\t\t\tchPrevNonWhite = styler.SafeGetCharAt(back);\n\t\t}\n\t}\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\tLinePPState preproc = vlls.ForLine(lineCurrent);\n\n\tbool definitionsChanged = false;\n\n\t// Truncate ppDefineHistory before current line\n\n\tif (!options.updatePreprocessor)\n\t\tppDefineHistory.clear();\n\n\tconst std::vector::iterator itInvalid = std::find_if(\n\t\tppDefineHistory.begin(), ppDefineHistory.end(),\n\t\t[lineCurrent](const PPDefinition &p) noexcept { return p.line >= lineCurrent; });\n\tif (itInvalid != ppDefineHistory.end()) {\n\t\tppDefineHistory.erase(itInvalid, ppDefineHistory.end());\n\t\tdefinitionsChanged = true;\n\t}\n\n\tSymbolTable preprocessorDefinitions = preprocessorDefinitionsStart;\n\tfor (const PPDefinition &ppDef : ppDefineHistory) {\n\t\tif (ppDef.isUndef)\n\t\t\tpreprocessorDefinitions.erase(ppDef.key);\n\t\telse\n\t\t\tpreprocessorDefinitions[ppDef.key] = SymbolValue(ppDef.value, ppDef.arguments);\n\t}\n\n\tstd::string rawStringTerminator = rawStringTerminators.ValueAt(lineCurrent-1);\n\tSparseState rawSTNew(lineCurrent);\n\n\tstd::string currentText;\n\n\tint activitySet = preproc.ActiveState();\n\n\tconst WordClassifier &classifierIdentifiers = subStyles.Classifier(SCE_C_IDENTIFIER);\n\tconst WordClassifier &classifierDocKeyWords = subStyles.Classifier(SCE_C_COMMENTDOCKEYWORD);\n\n\tSci_PositionU lineEndNext = styler.LineEnd(lineCurrent);\n\n\tif (sc.currentPos == 0 && sc.Match('#', '!')) {\n\t\t// Shell Shebang at beginning of file\n\t\tsc.SetState(SCE_C_COMMENTLINE);\n\t\tsc.Forward();\n\t}\n\n\tfor (; sc.More();) {\n\n\t\tif (sc.atLineStart) {\n\t\t\t// Using MaskActive() is not needed in the following statement.\n\t\t\t// Inside inactive preprocessor declaration, state will be reset anyway at the end of this block.\n\t\t\tif ((sc.state == SCE_C_STRING) || (sc.state == SCE_C_CHARACTER)) {\n\t\t\t\t// Prevent SCE_C_STRINGEOL from leaking back to previous line which\n\t\t\t\t// ends with a line continuation by locking in the state up to this position.\n\t\t\t\tsc.SetState(sc.state);\n\t\t\t}\n\t\t\tif ((MaskActive(sc.state) == SCE_C_PREPROCESSOR) && (!continuationLine)) {\n\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t}\n\t\t\t// Reset states to beginning of colourise so no surprises\n\t\t\t// if different sets of lines lexed.\n\t\t\tvisibleChars = 0;\n\t\t\tlastWordWasUUID = false;\n\t\t\tisIncludePreprocessor = false;\n\t\t\tinRERange = false;\n\t\t\tif (preproc.IsInactive()) {\n\t\t\t\tactivitySet = inactiveFlag;\n\t\t\t\tsc.SetState(sc.state | activitySet);\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd) {\n\t\t\tlineCurrent++;\n\t\t\tlineEndNext = styler.LineEnd(lineCurrent);\n\t\t\tvlls.Add(lineCurrent, preproc);\n\t\t\tif (!rawStringTerminator.empty()) {\n\t\t\t\trawSTNew.Set(lineCurrent-1, rawStringTerminator);\n\t\t\t}\n\t\t\tif (!interpolatingStack.empty()) {\n\t\t\t\tinterpolatingAtEol[sc.currentLine] = interpolatingStack;\n\t\t\t}\n\t\t}\n\n\t\t// Handle line continuation generically.\n\t\tif (sc.ch == '\\\\') {\n\t\t\tif ((sc.currentPos+1) >= lineEndNext) {\n\t\t\t\tlineCurrent++;\n\t\t\t\tlineEndNext = styler.LineEnd(lineCurrent);\n\t\t\t\tvlls.Add(lineCurrent, preproc);\n\t\t\t\tif (!rawStringTerminator.empty()) {\n\t\t\t\t\trawSTNew.Set(lineCurrent-1, rawStringTerminator);\n\t\t\t\t}\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\t// Even in UTF-8, \\r and \\n are separate\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinuationLine = true;\n\t\t\t\tsc.Forward();\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\tconst bool atLineEndBeforeSwitch = sc.atLineEnd;\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (MaskActive(sc.state)) {\n\t\t\tcase SCE_C_OPERATOR:\n\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_NUMBER:\n\t\t\t\t// We accept almost anything because of hex. and number suffixes\n\t\t\t\tif (sc.ch == '_') {\n\t\t\t\t\tsc.ChangeState(SCE_C_USERLITERAL|activitySet);\n\t\t\t\t} else if (!(setWord.Contains(sc.ch)\n\t\t\t\t || (sc.ch == '\\'')\n\t\t\t\t || (AnyOf(sc.chPrev, 'e', 'E', 'p', 'P') && AnyOf(sc.ch, '+', '-')))) {\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_USERLITERAL:\n\t\t\t\tif (!(setWord.Contains(sc.ch)))\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_IDENTIFIER:\n\t\t\t\tif (sc.atLineStart || sc.atLineEnd || !setWord.Contains(sc.ch) || (sc.ch == '.')) {\n\t\t\t\t\tsc.GetCurrentString(currentText, transform);\n\t\t\t\t\tif (keywords.InList(currentText)) {\n\t\t\t\t\t\tlastWordWasUUID = currentText == \"uuid\";\n\t\t\t\t\t\tsc.ChangeState(SCE_C_WORD|activitySet);\n\t\t\t\t\t} else if (keywords2.InList(currentText)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_C_WORD2|activitySet);\n\t\t\t\t\t} else if (keywords4.InList(currentText)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_C_GLOBALCLASS|activitySet);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tconst int subStyle = classifierIdentifiers.ValueFor(currentText);\n\t\t\t\t\t\tif (subStyle >= 0) {\n\t\t\t\t\t\t\tsc.ChangeState(subStyle|activitySet);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tconst bool literalString = sc.ch == '\\\"';\n\t\t\t\t\tif (literalString || sc.ch == '\\'') {\n\t\t\t\t\t\tstd::string_view s = currentText;\n\t\t\t\t\t\tsize_t lenS = s.length();\n\t\t\t\t\t\tconst bool raw = literalString && sc.chPrev == 'R' && !setInvalidRawFirst.Contains(sc.chNext);\n\t\t\t\t\t\tif (raw) {\n\t\t\t\t\t\t\ts.remove_suffix(1);\n\t\t\t\t\t\t\tlenS--;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tconst bool valid =\n\t\t\t\t\t\t\t(lenS == 0) ||\n\t\t\t\t\t\t\t((lenS == 1) && ((s[0] == 'L') || (s[0] == 'u') || (s[0] == 'U'))) ||\n\t\t\t\t\t\t\t((lenS == 2) && literalString && (s[0] == 'u') && (s[1] == '8'));\n\t\t\t\t\t\tif (valid) {\n\t\t\t\t\t\t\tif (literalString) {\n\t\t\t\t\t\t\t\tif (raw) {\n\t\t\t\t\t\t\t\t\t// Set the style of the string prefix to SCE_C_STRINGRAW but then change to\n\t\t\t\t\t\t\t\t\t// SCE_C_DEFAULT as that allows the raw string start code to run.\n\t\t\t\t\t\t\t\t\tsc.ChangeState(SCE_C_STRINGRAW|activitySet);\n\t\t\t\t\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\t\tsc.ChangeState(SCE_C_STRING|activitySet);\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\tsc.ChangeState(SCE_C_CHARACTER|activitySet);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.SetState(SCE_C_DEFAULT | activitySet);\n\t\t\t\t\t\t}\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_PREPROCESSOR:\n\t\t\t\tif (options.stylingWithinPreprocessor) {\n\t\t\t\t\tif (IsASpace(sc.ch) || (sc.ch == '(')) {\n\t\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t}\n\t\t\t\t} else if (isStringInPreprocessor && (sc.Match('>') || sc.Match('\\\"') || sc.atLineEnd)) {\n\t\t\t\t\tisStringInPreprocessor = false;\n\t\t\t\t} else if (!isStringInPreprocessor) {\n\t\t\t\t\tif ((isIncludePreprocessor && sc.Match('<')) || sc.Match('\\\"')) {\n\t\t\t\t\t\tisStringInPreprocessor = true;\n\t\t\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\t\t\tif (sc.Match(\"/**\") || sc.Match(\"/*!\")) {\n\t\t\t\t\t\t\tsc.SetState(SCE_C_PREPROCESSORCOMMENTDOC|activitySet);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.SetState(SCE_C_PREPROCESSORCOMMENT|activitySet);\n\t\t\t\t\t\t}\n\t\t\t\t\t\tsc.Forward();\t// Eat the *\n\t\t\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_PREPROCESSORCOMMENT:\n\t\t\tcase SCE_C_PREPROCESSORCOMMENTDOC:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_C_PREPROCESSOR|activitySet);\n\t\t\t\t\tcontinue;\t// Without advancing in case of '\\'.\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_COMMENT:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t} else {\n\t\t\t\t\tstyleBeforeTaskMarker = SCE_C_COMMENT;\n\t\t\t\t\thighlightTaskMarker(sc, styler, activitySet, markerList, caseSensitive);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_COMMENTDOC:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '*') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = SCE_C_COMMENTDOC;\n\t\t\t\t\t\tsc.SetState(SCE_C_COMMENTDOCKEYWORD|activitySet);\n\t\t\t\t\t}\n\t\t\t\t} else if ((sc.ch == '<' && !(IsASpace(sc.chNext) || sc.chNext == '/'))\n\t\t\t\t\t\t\t|| (sc.ch == '/' && sc.chPrev == '<')) { // XML comment style\n\t\t\t\t\tstyleBeforeDCKeyword = SCE_C_COMMENTDOC;\n\t\t\t\t\tsc.ForwardSetState(SCE_C_COMMENTDOCKEYWORD | activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart && !continuationLine) {\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t} else {\n\t\t\t\t\tstyleBeforeTaskMarker = SCE_C_COMMENTLINE;\n\t\t\t\t\thighlightTaskMarker(sc, styler, activitySet, markerList, caseSensitive);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_COMMENTLINEDOC:\n\t\t\t\tif (sc.atLineStart && !continuationLine) {\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '/' || sc.chPrev == '!') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = SCE_C_COMMENTLINEDOC;\n\t\t\t\t\t\tsc.SetState(SCE_C_COMMENTDOCKEYWORD|activitySet);\n\t\t\t\t\t}\n\t\t\t\t} else if ((sc.ch == '<' && sc.chNext != '/')\n\t\t\t\t\t\t\t|| (sc.ch == '/' && sc.chPrev == '<')) { // XML comment style\n\t\t\t\t\tstyleBeforeDCKeyword = SCE_C_COMMENTLINEDOC;\n\t\t\t\t\tsc.ForwardSetState(SCE_C_COMMENTDOCKEYWORD | activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_COMMENTDOCKEYWORD:\n\t\t\t\tif ((styleBeforeDCKeyword == SCE_C_COMMENTDOC) && sc.Match('*', '/')) {\n\t\t\t\t\tsc.ChangeState(SCE_C_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\tseenDocKeyBrace = false;\n\t\t\t\t} else if (sc.ch == '[' || sc.ch == '{') {\n\t\t\t\t\tseenDocKeyBrace = true;\n\t\t\t\t} else if (!setDoxygen.Contains(sc.ch)\n\t\t\t\t && !(seenDocKeyBrace && AnyOf(sc.ch, ',', '.'))) {\n\t\t\t\t\tif (!(IsASpace(sc.ch) || (sc.ch == 0))) {\n\t\t\t\t\t\tsc.ChangeState(SCE_C_COMMENTDOCKEYWORDERROR|activitySet);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.GetCurrentString(currentText, transform);\n\t\t\t\t\t\tassert(!currentText.empty());\n\t\t\t\t\t\tconst std::string currentSuffix = currentText.substr(1);\n\t\t\t\t\t\tif (!keywords3.InList(currentSuffix) && !keywords3.InList(currentText)) {\n\t\t\t\t\t\t\tconst int subStyleCDKW = classifierDocKeyWords.ValueFor(currentSuffix);\n\t\t\t\t\t\t\tif (subStyleCDKW >= 0) {\n\t\t\t\t\t\t\t\tsc.ChangeState(subStyleCDKW | activitySet);\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\tsc.ChangeState(SCE_C_COMMENTDOCKEYWORDERROR | activitySet);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(styleBeforeDCKeyword|activitySet);\n\t\t\t\t\tseenDocKeyBrace = false;\n\t\t\t\t} else if (sc.ch == '>') {\n\t\t\t\t\tsc.GetCurrentString(currentText, transform);\n\t\t\t\t\tif (!keywords3.InList(currentText)) {\n\t\t\t\t\t\tconst int subStyleCDKW = classifierDocKeyWords.ValueFor(currentText.substr(1));\n\t\t\t\t\t\tif (subStyleCDKW >= 0) {\n\t\t\t\t\t\t\tsc.ChangeState(subStyleCDKW | activitySet);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_C_COMMENTDOCKEYWORDERROR | activitySet);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(styleBeforeDCKeyword | activitySet);\n\t\t\t\t\tseenDocKeyBrace = false;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_STRING:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_C_STRINGEOL|activitySet);\n\t\t\t\t} else if (isIncludePreprocessor) {\n\t\t\t\t\tif (sc.ch == '>') {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t\tisIncludePreprocessor = false;\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (options.escapeSequence) {\n\t\t\t\t\t\tescapeSeq.resetEscapeState(sc.state, sc.chNext);\n\t\t\t\t\t\tsc.SetState(SCE_C_ESCAPESEQUENCE|activitySet);\n\t\t\t\t\t}\n\t\t\t\t\tsc.Forward(); // Skip all characters after the backslash\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tif (sc.chNext == '_') {\n\t\t\t\t\t\tsc.ChangeState(SCE_C_USERLITERAL|activitySet);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_ESCAPESEQUENCE:\n\t\t\t\tescapeSeq.consumeDigit();\n\t\t\t\tif (escapeSeq.atEscapeEnd(sc.ch)) {\n\t\t\t\t\tsc.SetState(escapeSeq.outerState);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_HASHQUOTEDSTRING:\n\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_STRINGRAW:\n\t\t\t\tif (sc.Match(rawStringTerminator.c_str())) {\n\t\t\t\t\tfor (size_t termPos=rawStringTerminator.size(); termPos; termPos--)\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\tif (interpolatingStack.empty()) {\n\t\t\t\t\t\trawStringTerminator.clear();\n\t\t\t\t\t}\n\t\t\t\t} else if (options.backQuotedStrings == BackQuotedString::TemplateLiteral) {\n\t\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\t\tif (options.escapeSequence) {\n\t\t\t\t\t\t\tescapeSeq.resetEscapeState(sc.state, sc.chNext);\n\t\t\t\t\t\t\tsc.SetState(SCE_C_ESCAPESEQUENCE|activitySet);\n\t\t\t\t\t\t}\n\t\t\t\t\t\tsc.Forward(); // Skip all characters after the backslash\n\t\t\t\t\t} else if (sc.Match('$', '{')) {\n\t\t\t\t\t\tinterpolatingStack.push_back({sc.state, 1});\n\t\t\t\t\t\tsc.SetState(SCE_C_OPERATOR|activitySet);\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_CHARACTER:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_C_STRINGEOL|activitySet);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\tif (sc.chNext == '_') {\n\t\t\t\t\t\tsc.ChangeState(SCE_C_USERLITERAL|activitySet);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_REGEX:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t} else if (!inRERange && sc.ch == '/') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\twhile (IsLowerCase(sc.ch))\n\t\t\t\t\t\tsc.Forward(); // gobble regex flags\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t} else if (sc.ch == '\\\\' && ((sc.currentPos+1) < lineEndNext)) {\n\t\t\t\t\t// Gobble up the escaped character\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else if (sc.ch == '[') {\n\t\t\t\t\tinRERange = true;\n\t\t\t\t} else if (sc.ch == ']') {\n\t\t\t\t\tinRERange = false;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_STRINGEOL:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_VERBATIM:\n\t\t\t\tif (options.verbatimStringsAllowEscapes && (sc.ch == '\\\\')) {\n\t\t\t\t\tsc.Forward(); // Skip all characters after the backslash\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tif (sc.chNext == '\\\"') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_TRIPLEVERBATIM:\n\t\t\t\tif (sc.Match(R\"(\"\"\")\")) {\n\t\t\t\t\twhile (sc.Match('\"')) {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_UUID:\n\t\t\t\tif (sc.atLineEnd || sc.ch == ')') {\n\t\t\t\t\tsc.SetState(SCE_C_DEFAULT|activitySet);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_C_TASKMARKER:\n\t\t\t\tif (IsOperatorOrSpace(sc.ch)) {\n\t\t\t\t\tsc.SetState(styleBeforeTaskMarker|activitySet);\n\t\t\t\t\tstyleBeforeTaskMarker = SCE_C_DEFAULT;\n\t\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd && !atLineEndBeforeSwitch) {\n\t\t\t// State exit processing consumed characters up to end of line.\n\t\t\tlineCurrent++;\n\t\t\tlineEndNext = styler.LineEnd(lineCurrent);\n\t\t\tvlls.Add(lineCurrent, preproc);\n\t\t}\n\n\t\tconst bool atLineEndBeforeStateEntry = sc.atLineEnd;\n\n\t\t// Determine if a new state should be entered.\n\t\tif (MaskActive(sc.state) == SCE_C_DEFAULT) {\n\t\t\tif (sc.Match('@', '\\\"')) {\n\t\t\t\tsc.SetState(SCE_C_VERBATIM|activitySet);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (options.triplequotedStrings && sc.Match(R\"(\"\"\")\")) {\n\t\t\t\tsc.SetState(SCE_C_TRIPLEVERBATIM|activitySet);\n\t\t\t\tsc.Forward(2);\n\t\t\t} else if (options.hashquotedStrings && sc.Match('#', '\\\"')) {\n\t\t\t\tsc.SetState(SCE_C_HASHQUOTEDSTRING|activitySet);\n\t\t\t\tsc.Forward();\n\t\t\t} else if ((options.backQuotedStrings != BackQuotedString::None) && sc.Match('`')) {\n\t\t\t\tsc.SetState(SCE_C_STRINGRAW|activitySet);\n\t\t\t\trawStringTerminator = \"`\";\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tif (lastWordWasUUID) {\n\t\t\t\t\tsc.SetState(SCE_C_UUID|activitySet);\n\t\t\t\t\tlastWordWasUUID = false;\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_C_NUMBER|activitySet);\n\t\t\t\t}\n\t\t\t} else if (!sc.atLineEnd && (setWordStart.Contains(sc.ch) || (sc.ch == '@'))) {\n\t\t\t\tif (lastWordWasUUID) {\n\t\t\t\t\tsc.SetState(SCE_C_UUID|activitySet);\n\t\t\t\t\tlastWordWasUUID = false;\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_C_IDENTIFIER|activitySet);\n\t\t\t\t}\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tif (sc.Match(\"/**\") || sc.Match(\"/*!\")) {\t// Support of Qt/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_C_COMMENTDOC|activitySet);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_C_COMMENT|activitySet);\n\t\t\t\t}\n\t\t\t\tsc.Forward();\t// Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\tif ((sc.Match(\"///\") && !sc.Match(\"////\")) || sc.Match(\"//!\"))\n\t\t\t\t\t// Support of Qt/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_C_COMMENTLINEDOC|activitySet);\n\t\t\t\telse\n\t\t\t\t\tsc.SetState(SCE_C_COMMENTLINE|activitySet);\n\t\t\t} else if (sc.ch == '/'\n\t\t\t\t && (setOKBeforeRE.Contains(chPrevNonWhite)\n\t\t\t\t || followsReturnKeyword(sc, styler))\n\t\t\t\t && (!setCouldBePostOp.Contains(chPrevNonWhite)\n\t\t\t\t || !FollowsPostfixOperator(sc, styler))) {\n\t\t\t\tsc.SetState(SCE_C_REGEX|activitySet);\t// JavaScript's RegEx\n\t\t\t\tinRERange = false;\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tif (sc.chPrev == 'R') {\n\t\t\t\t\tstyler.Flush();\n\t\t\t\t\tif (MaskActive(styler.StyleAt(sc.currentPos - 1)) == SCE_C_STRINGRAW) {\n\t\t\t\t\t\tsc.SetState(SCE_C_STRINGRAW|activitySet);\n\t\t\t\t\t\trawStringTerminator = \")\";\n\t\t\t\t\t\tfor (Sci_Position termPos = sc.currentPos + 1;; termPos++) {\n\t\t\t\t\t\t\tconst char chTerminator = styler.SafeGetCharAt(termPos, '(');\n\t\t\t\t\t\t\tif (chTerminator == '(')\n\t\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t\trawStringTerminator += chTerminator;\n\t\t\t\t\t\t}\n\t\t\t\t\t\trawStringTerminator += '\\\"';\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_C_STRING|activitySet);\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_C_STRING|activitySet);\n\t\t\t\t}\n\t\t\t\tisIncludePreprocessor = false;\t// ensure that '>' won't end the string\n\t\t\t} else if (isIncludePreprocessor && sc.ch == '<') {\n\t\t\t\tsc.SetState(SCE_C_STRING|activitySet);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_C_CHARACTER|activitySet);\n\t\t\t} else if (sc.ch == '#' && visibleChars == 0 && options.enablePreprocessor) {\n\t\t\t\t// Preprocessor commands are alone on their line\n\t\t\t\tsc.SetState(SCE_C_PREPROCESSOR|activitySet);\n\t\t\t\t// Skip whitespace between # and preprocessor word\n\t\t\t\tdo {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} while ((sc.ch == ' ' || sc.ch == '\\t') && sc.More());\n\t\t\t\tif (sc.Match(\"include\")) {\n\t\t\t\t\tisIncludePreprocessor = true;\n\t\t\t\t} else {\n\t\t\t\t\tif (options.trackPreprocessor && IsAlphaNumeric(sc.ch)) {\n\t\t\t\t\t\t// If #if is nested too deeply (>31 levels) the active/inactive appearance\n\t\t\t\t\t\t// will stop reflecting the code.\n\t\t\t\t\t\tif (sc.Match(\"ifdef\") || sc.Match(\"ifndef\")) {\n\t\t\t\t\t\t\tconst bool isIfDef = sc.Match(\"ifdef\");\n\t\t\t\t\t\t\tconst int startRest = isIfDef ? 5 : 6;\n\t\t\t\t\t\t\tconst std::string restOfLine = GetRestOfLine(styler, sc.currentPos + startRest + 1, false);\n\t\t\t\t\t\t\tconst bool foundDef = preprocessorDefinitions.find(restOfLine) != preprocessorDefinitions.end();\n\t\t\t\t\t\t\tpreproc.StartSection(isIfDef == foundDef);\n\t\t\t\t\t\t} else if (sc.Match(\"if\")) {\n\t\t\t\t\t\t\tconst std::string restOfLine = GetRestOfLine(styler, sc.currentPos + 2, true);\n\t\t\t\t\t\t\tconst bool ifGood = EvaluateExpression(restOfLine, preprocessorDefinitions);\n\t\t\t\t\t\t\tpreproc.StartSection(ifGood);\n\t\t\t\t\t\t} else if (sc.Match(\"else\")) {\n\t\t\t\t\t\t\t// #else is shown as active if either preceding or following section is active\n\t\t\t\t\t\t\t// as that means that it contributed to the result.\n\t\t\t\t\t\t\tif (preproc.ValidLevel()) {\n\t\t\t\t\t\t\t\t// If #else has no corresponding #if then take no action as invalid\n\t\t\t\t\t\t\t\tif (!preproc.CurrentIfTaken()) {\n\t\t\t\t\t\t\t\t\t// Inactive, may become active if parent scope active\n\t\t\t\t\t\t\t\t\tassert(sc.state == (SCE_C_PREPROCESSOR | inactiveFlag));\n\t\t\t\t\t\t\t\t\tpreproc.InvertCurrentLevel();\n\t\t\t\t\t\t\t\t\tactivitySet = preproc.ActiveState();\n\t\t\t\t\t\t\t\t\t// If following is active then show \"else\" as active\n\t\t\t\t\t\t\t\t\tif (!activitySet)\n\t\t\t\t\t\t\t\t\t\tsc.ChangeState(SCE_C_PREPROCESSOR);\n\t\t\t\t\t\t\t\t} else if (preproc.IsActive()) {\n\t\t\t\t\t\t\t\t\t// Active -> inactive\n\t\t\t\t\t\t\t\t\tassert(sc.state == SCE_C_PREPROCESSOR);\n\t\t\t\t\t\t\t\t\tpreproc.InvertCurrentLevel();\n\t\t\t\t\t\t\t\t\tactivitySet = preproc.ActiveState();\n\t\t\t\t\t\t\t\t\t// Continue to show \"else\" as active as it ends active section.\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.Match(\"elif\")) {\n\t\t\t\t\t\t\t// Ensure only one chosen out of #if .. #elif .. #elif .. #else .. #endif\n\t\t\t\t\t\t\t// #elif is shown as active if either preceding or following section is active\n\t\t\t\t\t\t\t// as that means that it contributed to the result.\n\t\t\t\t\t\t\tif (preproc.ValidLevel()) {\n\t\t\t\t\t\t\t\tif (!preproc.CurrentIfTaken()) {\n\t\t\t\t\t\t\t\t\t// Inactive, if expression true then may become active if parent scope active\n\t\t\t\t\t\t\t\t\tassert(sc.state == (SCE_C_PREPROCESSOR | inactiveFlag));\n\t\t\t\t\t\t\t\t\t// Similar to #if\n\t\t\t\t\t\t\t\t\tconst std::string restOfLine = GetRestOfLine(styler, sc.currentPos + 4, true);\n\t\t\t\t\t\t\t\t\tconst bool ifGood = EvaluateExpression(restOfLine, preprocessorDefinitions);\n\t\t\t\t\t\t\t\t\tif (ifGood) {\n\t\t\t\t\t\t\t\t\t\tpreproc.InvertCurrentLevel();\n\t\t\t\t\t\t\t\t\t\tactivitySet = preproc.ActiveState();\n\t\t\t\t\t\t\t\t\t\tif (!activitySet)\n\t\t\t\t\t\t\t\t\t\t\tsc.ChangeState(SCE_C_PREPROCESSOR);\n\t\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t\t} else if (preproc.IsActive()) {\n\t\t\t\t\t\t\t\t\t// Active -> inactive\n\t\t\t\t\t\t\t\t\tassert(sc.state == SCE_C_PREPROCESSOR);\n\t\t\t\t\t\t\t\t\tpreproc.InvertCurrentLevel();\n\t\t\t\t\t\t\t\t\tactivitySet = preproc.ActiveState();\n\t\t\t\t\t\t\t\t\t// Continue to show \"elif\" as active as it ends active section.\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.Match(\"endif\")) {\n\t\t\t\t\t\t\tpreproc.EndSection();\n\t\t\t\t\t\t\tactivitySet = preproc.ActiveState();\n\t\t\t\t\t\t\tsc.ChangeState(SCE_C_PREPROCESSOR|activitySet);\n\t\t\t\t\t\t} else if (sc.Match(\"define\")) {\n\t\t\t\t\t\t\tif (options.updatePreprocessor && preproc.IsActive()) {\n\t\t\t\t\t\t\t\tconst std::string restOfLine = GetRestOfLine(styler, sc.currentPos + 6, true);\n\t\t\t\t\t\t\t\tconst Definition def = ParseDefine(restOfLine, \"( \\t\");\n\t\t\t\t\t\t\t\tpreprocessorDefinitions[std::string(def.name)] = SymbolValue(def.value, def.arguments);\n\t\t\t\t\t\t\t\tppDefineHistory.emplace_back(lineCurrent, def.name, def.value, false, def.arguments);\n\t\t\t\t\t\t\t\tdefinitionsChanged = true;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (sc.Match(\"undef\")) {\n\t\t\t\t\t\t\tif (options.updatePreprocessor && preproc.IsActive()) {\n\t\t\t\t\t\t\t\tconst std::string restOfLine = GetRestOfLine(styler, sc.currentPos + 5, false);\n\t\t\t\t\t\t\t\tTokens tokens = Tokenize(restOfLine);\n\t\t\t\t\t\t\t\tif (!tokens.empty()) {\n\t\t\t\t\t\t\t\t\tconst std::string key = tokens[0];\n\t\t\t\t\t\t\t\t\tpreprocessorDefinitions.erase(key);\n\t\t\t\t\t\t\t\t\tppDefineHistory.emplace_back(lineCurrent, key, \"\", true, \"\");\n\t\t\t\t\t\t\t\t\tdefinitionsChanged = true;\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if (isoperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_C_OPERATOR|activitySet);\n\t\t\t\tif (!interpolatingStack.empty() && AnyOf(sc.ch, '{', '}')) {\n\t\t\t\t\tInterpolatingState ¤t = interpolatingStack.back();\n\t\t\t\t\tif (sc.ch == '{') {\n\t\t\t\t\t\tcurrent.braceCount += 1;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tcurrent.braceCount -= 1;\n\t\t\t\t\t\tif (current.braceCount == 0) {\n\t\t\t\t\t\t\tsc.ForwardSetState(current.state);\n\t\t\t\t\t\t\tinterpolatingStack.pop_back();\n\t\t\t\t\t\t\tcontinue;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd && !atLineEndBeforeStateEntry) {\n\t\t\t// State entry processing consumed characters up to end of line.\n\t\t\tlineCurrent++;\n\t\t\tlineEndNext = styler.LineEnd(lineCurrent);\n\t\t\tvlls.Add(lineCurrent, preproc);\n\t\t}\n\n\t\tif (!IsASpace(sc.ch) && !IsSpaceEquiv(MaskActive(sc.state))) {\n\t\t\tchPrevNonWhite = sc.ch;\n\t\t\tvisibleChars++;\n\t\t}\n\t\tcontinuationLine = false;\n\t\tsc.Forward();\n\t}\n\tconst bool rawStringsChanged = rawStringTerminators.Merge(rawSTNew, lineCurrent);\n\tif (definitionsChanged || rawStringsChanged)\n\t\tstyler.ChangeLexerState(startPos, startPos + length);\n\tsc.Complete();\n}\n\n// Store both the current line's fold level and the next lines in the\n// level store to make it easy to pick up with each increment\n// and to make it possible to fiddle the current level for \"} else {\".\n\nvoid SCI_METHOD LexerCPP::Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\n\tif (!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\n\tconst Sci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tbool inLineComment = false;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelCurrent = FoldLevelStart(styler.LevelAt(lineCurrent-1));\n\tSci_PositionU lineStartNext = styler.LineStart(lineCurrent+1);\n\tint levelMinCurrent = levelCurrent;\n\tint levelNext = levelCurrent;\n\tchar chNext = styler[startPos];\n\tint styleNext = MaskActive(styler.StyleAt(startPos));\n\tint style = MaskActive(initStyle);\n\tconst bool userDefinedFoldMarkers = !options.foldExplicitStart.empty() && !options.foldExplicitEnd.empty();\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tconst char ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tconst int stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = MaskActive(styler.StyleAt(i + 1));\n\t\tconst bool atEOL = i == (lineStartNext-1);\n\t\tif ((style == SCE_C_COMMENTLINE) || (style == SCE_C_COMMENTLINEDOC))\n\t\t\tinLineComment = true;\n\t\tif (options.foldComment && options.foldCommentMultiline && IsStreamCommentStyle(style) && !inLineComment) {\n\t\t\tif (!IsStreamCommentStyle(stylePrev)) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (!IsStreamCommentStyle(styleNext) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (options.foldComment && options.foldCommentExplicit && ((style == SCE_C_COMMENTLINE) || options.foldExplicitAnywhere)) {\n\t\t\tif (userDefinedFoldMarkers) {\n\t\t\t\tif (styler.Match(i, options.foldExplicitStart.c_str())) {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (styler.Match(i, options.foldExplicitEnd.c_str())) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\tif ((ch == '/') && (chNext == '/')) {\n\t\t\t\t\tconst char chNext2 = styler.SafeGetCharAt(i + 2);\n\t\t\t\t\tif (chNext2 == '{') {\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t\t} else if (chNext2 == '}') {\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (options.foldPreprocessor && (style == SCE_C_PREPROCESSOR)) {\n\t\t\tif (ch == '#') {\n\t\t\t\tSci_PositionU j = i + 1;\n\t\t\t\twhile ((j < endPos) && IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\tj++;\n\t\t\t\t}\n\t\t\t\tif (styler.Match(j, \"region\") || styler.Match(j, \"if\")) {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (styler.Match(j, \"end\")) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t} else if (styler.Match(j, \"pragma\")) {\n\t\t\t\t\tconstexpr size_t lenPragma = 6;\n\t\t\t\t\tj += lenPragma;\n\t\t\t\t\tif (IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\t\twhile ((j < endPos) && IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\t\t\tj++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tif (styler.Match(j, \"region\")) {\n\t\t\t\t\t\t\tlevelNext++;\n\t\t\t\t\t\t} else if (styler.Match(j, \"endregion\")) {\n\t\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\n\t\t\t\tif (options.foldPreprocessorAtElse && (styler.Match(j, \"else\") || styler.Match(j, \"elif\"))) {\n\t\t\t\t\tlevelMinCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (options.foldSyntaxBased && (style == SCE_C_OPERATOR)) {\n\t\t\tif (ch == '{' || ch == '[' || ch == '(') {\n\t\t\t\t// Measure the minimum before a '{' to allow\n\t\t\t\t// folding on \"} else {\"\n\t\t\t\tif (options.foldAtElse && levelMinCurrent > levelNext) {\n\t\t\t\t\tlevelMinCurrent = levelNext;\n\t\t\t\t}\n\t\t\t\tlevelNext++;\n\t\t\t} else if (ch == '}' || ch == ']' || ch == ')') {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (!IsASpace(ch))\n\t\t\tvisibleChars++;\n\t\tif (atEOL || (i == endPos-1)) {\n\t\t\tint levelUse = levelCurrent;\n\t\t\tif ((options.foldSyntaxBased && options.foldAtElse) ||\n\t\t\t\t(options.foldPreprocessor && options.foldPreprocessorAtElse)\n\t\t\t) {\n\t\t\t\tlevelUse = levelMinCurrent;\n\t\t\t}\n\t\t\tconst int lev = FoldLevelForCurrentNext(levelUse, levelNext) |\n\t\t\t\tFoldLevelFlags(levelUse, levelNext, visibleChars == 0 && options.foldCompact);\n\t\t\tstyler.SetLevelIfDifferent(lineCurrent, lev);\n\t\t\tlineCurrent++;\n\t\t\tlineStartNext = styler.LineStart(lineCurrent+1);\n\t\t\tlevelCurrent = levelNext;\n\t\t\tlevelMinCurrent = levelCurrent;\n\t\t\tif (atEOL && (i == static_cast(styler.Length()-1))) {\n\t\t\t\t// There is an empty line at end of file so give it same level and empty\n\t\t\t\tstyler.SetLevel(lineCurrent, FoldLevelForCurrent(levelCurrent) | SC_FOLDLEVELWHITEFLAG);\n\t\t\t}\n\t\t\tvisibleChars = 0;\n\t\t\tinLineComment = false;\n\t\t}\n\t}\n}\n\nvoid LexerCPP::EvaluateTokens(Tokens &tokens, const SymbolTable &preprocessorDefinitions) {\n\n\t// Remove whitespace tokens\n\ttokens.erase(std::remove_if(tokens.begin(), tokens.end(), OnlySpaceOrTab), tokens.end());\n\n\t// Evaluate defined statements to either 0 or 1\n\tfor (size_t i=0; (i+1))\n\t\t\t\t\tconst SymbolTable::const_iterator it = preprocessorDefinitions.find(tokens[i+2]);\n\t\t\t\t\tif (it != preprocessorDefinitions.end()) {\n\t\t\t\t\t\tval = \"1\";\n\t\t\t\t\t}\n\t\t\t\t\ttokens.erase(tokens.begin() + i + 1, tokens.begin() + i + 4);\n\t\t\t\t} else {\n\t\t\t\t\t// Spurious '(' so erase as more likely to result in false\n\t\t\t\t\ttokens.erase(tokens.begin() + i + 1, tokens.begin() + i + 2);\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\t// defined \n\t\t\t\tconst SymbolTable::const_iterator it = preprocessorDefinitions.find(tokens[i+1]);\n\t\t\t\tif (it != preprocessorDefinitions.end()) {\n\t\t\t\t\tval = \"1\";\n\t\t\t\t}\n\t\t\t\ttokens.erase(tokens.begin() + i + 1, tokens.begin() + i + 2);\n\t\t\t}\n\t\t\ttokens[i] = val;\n\t\t} else {\n\t\t\ti++;\n\t\t}\n\t}\n\n\t// Evaluate identifiers\n\tconstexpr size_t maxIterations = 100;\n\tsize_t iterations = 0;\t// Limit number of iterations in case there is a recursive macro.\n\tfor (size_t i = 0; (isecond.value);\n\t\t\t\tif (it->second.IsMacro()) {\n\t\t\t\t\tif ((i + 1 < tokens.size()) && (tokens.at(i + 1) == \"(\")) {\n\t\t\t\t\t\t// Create map of argument name to value\n\t\t\t\t\t\tconst Tokens argumentNames = StringSplit(it->second.arguments, ',');\n\t\t\t\t\t\tstd::map arguments;\n\t\t\t\t\t\tsize_t arg = 0;\n\t\t\t\t\t\tsize_t tok = i+2;\n\t\t\t\t\t\twhile ((tok < tokens.size()) && (arg < argumentNames.size()) && (tokens.at(tok) != \")\")) {\n\t\t\t\t\t\t\tif (tokens.at(tok) != \",\") {\n\t\t\t\t\t\t\t\targuments[argumentNames.at(arg)] = tokens.at(tok);\n\t\t\t\t\t\t\t\targ++;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\ttok++;\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\t// Remove invocation\n\t\t\t\t\t\ttokens.erase(tokens.begin() + i, tokens.begin() + tok + 1);\n\n\t\t\t\t\t\t// Substitute values into macro\n\t\t\t\t\t\tmacroTokens.erase(std::remove_if(macroTokens.begin(), macroTokens.end(), OnlySpaceOrTab), macroTokens.end());\n\n\t\t\t\t\t\tfor (size_t iMacro = 0; iMacro < macroTokens.size();) {\n\t\t\t\t\t\t\tif (setWordStart.Contains(macroTokens[iMacro][0])) {\n\t\t\t\t\t\t\t\tconst std::map::const_iterator itFind =\n\t\t\t\t\t\t\t\t\targuments.find(macroTokens[iMacro]);\n\t\t\t\t\t\t\t\tif (itFind != arguments.end()) {\n\t\t\t\t\t\t\t\t\t// TODO: Possible that value will be expression so should insert tokenized form\n\t\t\t\t\t\t\t\t\tmacroTokens[iMacro] = itFind->second;\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tiMacro++;\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\t// Insert results back into tokens\n\t\t\t\t\t\ttokens.insert(tokens.begin() + i, macroTokens.begin(), macroTokens.end());\n\n\t\t\t\t\t} else {\n\t\t\t\t\t\ti++;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\t// Remove invocation\n\t\t\t\t\ttokens.erase(tokens.begin() + i);\n\t\t\t\t\t// Insert results back into tokens\n\t\t\t\t\ttokens.insert(tokens.begin() + i, macroTokens.begin(), macroTokens.end());\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\t// Identifier not found and value defaults to zero\n\t\t\t\ttokens[i] = \"0\";\n\t\t\t}\n\t\t} else {\n\t\t\ti++;\n\t\t}\n\t}\n\n\t// Find bracketed subexpressions and recurse on them\n\tBracketPair bracketPair = FindBracketPair(tokens);\n\twhile (bracketPair.itBracket != tokens.end()) {\n\t\tTokens inBracket(bracketPair.itBracket + 1, bracketPair.itEndBracket);\n\t\tEvaluateTokens(inBracket, preprocessorDefinitions);\n\n\t\t// The insertion is done before the removal because there were failures with the opposite approach\n\t\ttokens.insert(bracketPair.itBracket, inBracket.begin(), inBracket.end());\n\n\t\t// insert invalidated bracketPair. Use a new variable to avoid warning from Coverity.\n\t\tconst BracketPair pairToErase = FindBracketPair(tokens);\n\t\ttokens.erase(pairToErase.itBracket, pairToErase.itEndBracket + 1);\n\n\t\tbracketPair = FindBracketPair(tokens);\n\t}\n\n\t// Evaluate logical negations\n\tfor (size_t j=0; (j+1)\")\n\t\t\t\t\tresult = valA > valB;\n\t\t\t\telse if (tokens[k+1] == \">=\")\n\t\t\t\t\tresult = valA >= valB;\n\t\t\t\telse if (tokens[k+1] == \"==\")\n\t\t\t\t\tresult = valA == valB;\n\t\t\t\telse if (tokens[k+1] == \"!=\")\n\t\t\t\t\tresult = valA != valB;\n\t\t\t\telse if (tokens[k+1] == \"||\")\n\t\t\t\t\tresult = valA || valB;\n\t\t\t\telse if (tokens[k+1] == \"&&\")\n\t\t\t\t\tresult = valA && valB;\n\t\t\t\tconst Tokens::iterator itInsert =\n\t\t\t\t\ttokens.erase(tokens.begin() + k, tokens.begin() + k + 3);\n\t\t\t\ttokens.insert(itInsert, std::to_string(result));\n\t\t\t} else {\n\t\t\t\tk++;\n\t\t\t}\n\t\t}\n\t}\n}\n\nTokens LexerCPP::Tokenize(const std::string &expr) const {\n\t// Break into tokens\n\tTokens tokens;\n\tconst char *cp = expr.c_str();\n\twhile (*cp) {\n\t\tstd::string word;\n\t\tif (setWord.Contains(*cp)) {\n\t\t\t// Identifiers and numbers\n\t\t\twhile (setWord.Contains(*cp)) {\n\t\t\t\tword += *cp;\n\t\t\t\tcp++;\n\t\t\t}\n\t\t} else if (IsASpaceOrTab(*cp)) {\n\t\t\twhile (IsASpaceOrTab(*cp)) {\n\t\t\t\tword += *cp;\n\t\t\t\tcp++;\n\t\t\t}\n\t\t} else if (setRelOp.Contains(*cp)) {\n\t\t\tword += *cp;\n\t\t\tcp++;\n\t\t\tif (setRelOp.Contains(*cp)) {\n\t\t\t\tword += *cp;\n\t\t\t\tcp++;\n\t\t\t}\n\t\t} else if (setLogicalOp.Contains(*cp)) {\n\t\t\tword += *cp;\n\t\t\tcp++;\n\t\t\tif (setLogicalOp.Contains(*cp)) {\n\t\t\t\tword += *cp;\n\t\t\t\tcp++;\n\t\t\t}\n\t\t} else {\n\t\t\t// Should handle strings, characters, and comments here\n\t\t\tword += *cp;\n\t\t\tcp++;\n\t\t}\n\t\ttokens.push_back(std::move(word));\n\t}\n\treturn tokens;\n}\n\nbool LexerCPP::EvaluateExpression(const std::string &expr, const SymbolTable &preprocessorDefinitions) {\n\tTokens tokens = Tokenize(expr);\n\n\tEvaluateTokens(tokens, preprocessorDefinitions);\n\n\t// \"0\" or \"\" -> false else true\n\tconst bool isFalse = tokens.empty() ||\n\t\t((tokens.size() == 1) && (tokens[0].empty() || tokens[0] == \"0\"));\n\treturn !isFalse;\n}\n\nextern const LexerModule lmCPP(SCLEX_CPP, LexerCPP::LexerFactoryCPP, \"cpp\", cppWordLists);\nextern const LexerModule lmCPPNoCase(SCLEX_CPPNOCASE, LexerCPP::LexerFactoryCPPInsensitive, \"cppnocase\", cppWordLists);\n" }, { "path": "lexers/LexCSS.cxx", "content": "// Scintilla source code edit control\n// Encoding: UTF-8\n/** @file LexCSS.cxx\n ** Lexer for Cascading Style Sheets\n ** Written by Jakub Vrána\n ** Improved by Philippe Lhoste (CSS2)\n ** Improved by Ross McKay (SCSS mode; see http://sass-lang.com/ )\n **/\n// Copyright 1998-2002 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n// TODO: handle SCSS nested properties like font: { weight: bold; size: 1em; }\n// TODO: handle SCSS interpolation: #{}\n// TODO: add features for Less if somebody feels like contributing; http://lesscss.org/\n// TODO: refactor this monster so that the next poor slob can read it!\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n\nstatic inline bool IsAWordChar(const unsigned int ch) {\n\t/* FIXME:\n\t * The CSS spec allows \"ISO 10646 characters U+00A1 and higher\" to be treated as word chars.\n\t * Unfortunately, we are only getting string bytes here, and not full unicode characters. We cannot guarantee\n\t * that our byte is between U+0080 - U+00A0 (to return false), so we have to allow all characters U+0080 and higher\n\t */\n\treturn ch >= 0x80 || isalnum(ch) || ch == '-' || ch == '_';\n}\n\ninline bool IsCssOperator(const int ch) {\n\tif (!((ch < 0x80) && isalnum(ch)) &&\n\t\t(ch == '{' || ch == '}' || ch == ':' || ch == ',' || ch == ';' ||\n\t\t ch == '.' || ch == '#' || ch == '!' || ch == '@' ||\n\t\t /* CSS2 */\n\t\t ch == '*' || ch == '>' || ch == '+' || ch == '=' || ch == '~' || ch == '|' ||\n\t\t ch == '[' || ch == ']' || ch == '(' || ch == ')')) {\n\t\treturn true;\n\t}\n\treturn false;\n}\n\n// look behind (from start of document to our start position) to determine current nesting level\ninline int NestingLevelLookBehind(Sci_PositionU startPos, Accessor &styler) {\n\tint ch;\n\tint nestingLevel = 0;\n\n\tfor (Sci_PositionU i = 0; i < startPos; i++) {\n\t\tch = styler.SafeGetCharAt(i);\n\t\tif (ch == '{')\n\t\t\tnestingLevel++;\n\t\telse if (ch == '}')\n\t\t\tnestingLevel--;\n\t}\n\n\treturn nestingLevel;\n}\n\nstatic void ColouriseCssDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[], Accessor &styler) {\n\tWordList &css1Props = *keywordlists[0];\n\tWordList &pseudoClasses = *keywordlists[1];\n\tWordList &css2Props = *keywordlists[2];\n\tWordList &css3Props = *keywordlists[3];\n\tWordList &pseudoElements = *keywordlists[4];\n\tWordList &exProps = *keywordlists[5];\n\tWordList &exPseudoClasses = *keywordlists[6];\n\tWordList &exPseudoElements = *keywordlists[7];\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tint lastState = -1; // before operator\n\tint lastStateC = -1; // before comment\n\tint lastStateS = -1; // before single-quoted/double-quoted string\n\tint lastStateVar = -1; // before variable (SCSS)\n\tint lastStateVal = -1; // before value (SCSS)\n\tint op = ' '; // last operator\n\tint opPrev = ' '; // last operator\n\tbool insideParentheses = false; // true if currently in a CSS url() or similar construct\n\n\t// property lexer.css.scss.language\n\t//\tSet to 1 for Sassy CSS (.scss)\n\tbool isScssDocument = styler.GetPropertyInt(\"lexer.css.scss.language\") != 0;\n\n\t// property lexer.css.less.language\n\t// Set to 1 for Less CSS (.less)\n\tbool isLessDocument = styler.GetPropertyInt(\"lexer.css.less.language\") != 0;\n\n\t// property lexer.css.hss.language\n\t// Set to 1 for HSS (.hss)\n\tbool isHssDocument = styler.GetPropertyInt(\"lexer.css.hss.language\") != 0;\n\n\t// SCSS/LESS/HSS have the concept of variable\n\tbool hasVariables = isScssDocument || isLessDocument || isHssDocument;\n\tchar varPrefix = 0;\n\tif (hasVariables)\n\t\tvarPrefix = isLessDocument ? '@' : '$';\n\n\t// SCSS/LESS/HSS support single-line comments\n\ttypedef enum _CommentModes { eCommentBlock = 0, eCommentLine = 1} CommentMode;\n\tCommentMode comment_mode = eCommentBlock;\n\tbool hasSingleLineComments = isScssDocument || isLessDocument || isHssDocument;\n\n\t// must keep track of nesting level in document types that support it (SCSS/LESS/HSS)\n\tbool hasNesting = false;\n\tint nestingLevel = 0;\n\tif (isScssDocument || isLessDocument || isHssDocument) {\n\t\thasNesting = true;\n\t\tnestingLevel = NestingLevelLookBehind(startPos, styler);\n\t}\n\n\t// \"the loop\"\n\tfor (; sc.More(); sc.Forward()) {\n\t\tif (sc.state == SCE_CSS_COMMENT && ((comment_mode == eCommentBlock && sc.Match('*', '/')) || (comment_mode == eCommentLine && sc.atLineEnd))) {\n\t\t\tif (lastStateC == -1) {\n\t\t\t\t// backtrack to get last state:\n\t\t\t\t// comments are like whitespace, so we must return to the previous state\n\t\t\t\tSci_PositionU i = startPos;\n\t\t\t\tfor (; i > 0; i--) {\n\t\t\t\t\tif ((lastStateC = styler.StyleAt(i-1)) != SCE_CSS_COMMENT) {\n\t\t\t\t\t\tif (lastStateC == SCE_CSS_OPERATOR) {\n\t\t\t\t\t\t\top = styler.SafeGetCharAt(i-1);\n\t\t\t\t\t\t\topPrev = styler.SafeGetCharAt(i-2);\n\t\t\t\t\t\t\twhile (--i) {\n\t\t\t\t\t\t\t\tlastState = styler.StyleAt(i-1);\n\t\t\t\t\t\t\t\tif (lastState != SCE_CSS_OPERATOR && lastState != SCE_CSS_COMMENT)\n\t\t\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tif (i == 0)\n\t\t\t\t\t\t\t\tlastState = SCE_CSS_DEFAULT;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tif (i == 0)\n\t\t\t\t\tlastStateC = SCE_CSS_DEFAULT;\n\t\t\t}\n\t\t\tif (comment_mode == eCommentBlock) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(lastStateC);\n\t\t\t} else /* eCommentLine */ {\n\t\t\t\tsc.SetState(lastStateC);\n\t\t\t}\n\t\t}\n\n\t\tif (sc.state == SCE_CSS_COMMENT)\n\t\t\tcontinue;\n\n\t\tif (sc.state == SCE_CSS_DOUBLESTRING || sc.state == SCE_CSS_SINGLESTRING) {\n\t\t\tif (sc.ch != (sc.state == SCE_CSS_DOUBLESTRING ? '\\\"' : '\\''))\n\t\t\t\tcontinue;\n\t\t\tSci_PositionU i = sc.currentPos;\n\t\t\twhile (i && styler[i-1] == '\\\\')\n\t\t\t\ti--;\n\t\t\tif ((sc.currentPos - i) % 2 == 1)\n\t\t\t\tcontinue;\n\t\t\tsc.ForwardSetState(lastStateS);\n\t\t}\n\n\t\tif (sc.state == SCE_CSS_OPERATOR) {\n\t\t\tif (op == ' ') {\n\t\t\t\tSci_PositionU i = startPos;\n\t\t\t\top = styler.SafeGetCharAt(i-1);\n\t\t\t\topPrev = styler.SafeGetCharAt(i-2);\n\t\t\t\twhile (--i) {\n\t\t\t\t\tlastState = styler.StyleAt(i-1);\n\t\t\t\t\tif (lastState != SCE_CSS_OPERATOR && lastState != SCE_CSS_COMMENT)\n\t\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t}\n\t\t\tswitch (op) {\n\t\t\tcase '@':\n\t\t\t\tif (lastState == SCE_CSS_DEFAULT || hasNesting)\n\t\t\t\t\tsc.SetState(SCE_CSS_DIRECTIVE);\n\t\t\t\tbreak;\n\t\t\tcase '>':\n\t\t\tcase '+':\n\t\t\t\tif (lastState == SCE_CSS_TAG || lastState == SCE_CSS_CLASS || lastState == SCE_CSS_ID ||\n\t\t\t\t\tlastState == SCE_CSS_PSEUDOCLASS || lastState == SCE_CSS_EXTENDED_PSEUDOCLASS || lastState == SCE_CSS_UNKNOWN_PSEUDOCLASS)\n\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase '[':\n\t\t\t\tif (lastState == SCE_CSS_TAG || lastState == SCE_CSS_DEFAULT || lastState == SCE_CSS_CLASS || lastState == SCE_CSS_ID ||\n\t\t\t\t\tlastState == SCE_CSS_PSEUDOCLASS || lastState == SCE_CSS_EXTENDED_PSEUDOCLASS || lastState == SCE_CSS_UNKNOWN_PSEUDOCLASS)\n\t\t\t\t\tsc.SetState(SCE_CSS_ATTRIBUTE);\n\t\t\t\tbreak;\n\t\t\tcase ']':\n\t\t\t\tif (lastState == SCE_CSS_ATTRIBUTE)\n\t\t\t\t\tsc.SetState(SCE_CSS_TAG);\n\t\t\t\tbreak;\n\t\t\tcase '{':\n\t\t\t\tnestingLevel++;\n\t\t\t\tswitch (lastState) {\n\t\t\t\tcase SCE_CSS_GROUP_RULE:\n\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\t\tbreak;\n\t\t\t\tcase SCE_CSS_TAG:\n\t\t\t\tcase SCE_CSS_DIRECTIVE:\n\t\t\t\t\tsc.SetState(SCE_CSS_IDENTIFIER);\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '}':\n\t\t\t\tif (--nestingLevel < 0)\n\t\t\t\t\tnestingLevel = 0;\n\t\t\t\tswitch (lastState) {\n\t\t\t\tcase SCE_CSS_DEFAULT:\n\t\t\t\tcase SCE_CSS_VALUE:\n\t\t\t\tcase SCE_CSS_IMPORTANT:\n\t\t\t\tcase SCE_CSS_IDENTIFIER:\n\t\t\t\tcase SCE_CSS_IDENTIFIER2:\n\t\t\t\tcase SCE_CSS_IDENTIFIER3:\n\t\t\t\t\tif (hasNesting)\n\t\t\t\t\t\tsc.SetState(nestingLevel > 0 ? SCE_CSS_IDENTIFIER : SCE_CSS_DEFAULT);\n\t\t\t\t\telse\n\t\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '(':\n\t\t\t\tif (lastState == SCE_CSS_PSEUDOCLASS)\n\t\t\t\t\tsc.SetState(SCE_CSS_TAG);\n\t\t\t\telse if (lastState == SCE_CSS_EXTENDED_PSEUDOCLASS)\n\t\t\t\t\tsc.SetState(SCE_CSS_EXTENDED_PSEUDOCLASS);\n\t\t\t\tbreak;\n\t\t\tcase ')':\n\t\t\t\tif (lastState == SCE_CSS_TAG || lastState == SCE_CSS_DEFAULT || lastState == SCE_CSS_CLASS || lastState == SCE_CSS_ID ||\n\t\t\t\t\tlastState == SCE_CSS_PSEUDOCLASS || lastState == SCE_CSS_EXTENDED_PSEUDOCLASS || lastState == SCE_CSS_UNKNOWN_PSEUDOCLASS ||\n\t\t\t\t\tlastState == SCE_CSS_PSEUDOELEMENT || lastState == SCE_CSS_EXTENDED_PSEUDOELEMENT)\n\t\t\t\t\tsc.SetState(SCE_CSS_TAG);\n\t\t\t\tbreak;\n\t\t\tcase ':':\n\t\t\t\tswitch (lastState) {\n\t\t\t\tcase SCE_CSS_TAG:\n\t\t\t\tcase SCE_CSS_DEFAULT:\n\t\t\t\tcase SCE_CSS_CLASS:\n\t\t\t\tcase SCE_CSS_ID:\n\t\t\t\tcase SCE_CSS_PSEUDOCLASS:\n\t\t\t\tcase SCE_CSS_EXTENDED_PSEUDOCLASS:\n\t\t\t\tcase SCE_CSS_UNKNOWN_PSEUDOCLASS:\n\t\t\t\tcase SCE_CSS_PSEUDOELEMENT:\n\t\t\t\tcase SCE_CSS_EXTENDED_PSEUDOELEMENT:\n\t\t\t\t\tsc.SetState(SCE_CSS_PSEUDOCLASS);\n\t\t\t\t\tbreak;\n\t\t\t\tcase SCE_CSS_IDENTIFIER:\n\t\t\t\tcase SCE_CSS_IDENTIFIER2:\n\t\t\t\tcase SCE_CSS_IDENTIFIER3:\n\t\t\t\tcase SCE_CSS_EXTENDED_IDENTIFIER:\n\t\t\t\tcase SCE_CSS_UNKNOWN_IDENTIFIER:\n\t\t\t\tcase SCE_CSS_VARIABLE:\n\t\t\t\t\tsc.SetState(SCE_CSS_VALUE);\n\t\t\t\t\tlastStateVal = lastState;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '.':\n\t\t\t\tif (lastState == SCE_CSS_TAG || lastState == SCE_CSS_DEFAULT || lastState == SCE_CSS_CLASS || lastState == SCE_CSS_ID ||\n\t\t\t\t\tlastState == SCE_CSS_PSEUDOCLASS || lastState == SCE_CSS_EXTENDED_PSEUDOCLASS || lastState == SCE_CSS_UNKNOWN_PSEUDOCLASS)\n\t\t\t\t\tsc.SetState(SCE_CSS_CLASS);\n\t\t\t\tbreak;\n\t\t\tcase '#':\n\t\t\t\tif (lastState == SCE_CSS_TAG || lastState == SCE_CSS_DEFAULT || lastState == SCE_CSS_CLASS || lastState == SCE_CSS_ID ||\n\t\t\t\t\tlastState == SCE_CSS_PSEUDOCLASS || lastState == SCE_CSS_EXTENDED_PSEUDOCLASS || lastState == SCE_CSS_UNKNOWN_PSEUDOCLASS)\n\t\t\t\t\tsc.SetState(SCE_CSS_ID);\n\t\t\t\tbreak;\n\t\t\tcase ',':\n\t\t\tcase '|':\n\t\t\tcase '~':\n\t\t\t\tif (lastState == SCE_CSS_TAG)\n\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase ';':\n\t\t\t\tswitch (lastState) {\n\t\t\t\tcase SCE_CSS_DIRECTIVE:\n\t\t\t\t\tif (hasNesting) {\n\t\t\t\t\t\tsc.SetState(nestingLevel > 0 ? SCE_CSS_IDENTIFIER : SCE_CSS_DEFAULT);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\tcase SCE_CSS_VALUE:\n\t\t\t\tcase SCE_CSS_IMPORTANT:\n\t\t\t\t\t// data URLs can have semicolons; simplistically check for wrapping parentheses and move along\n\t\t\t\t\tif (insideParentheses) {\n\t\t\t\t\t\tsc.SetState(lastState);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tif (lastStateVal == SCE_CSS_VARIABLE) {\n\t\t\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.SetState(SCE_CSS_IDENTIFIER);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\tcase SCE_CSS_VARIABLE:\n\t\t\t\t\tif (lastStateVar == SCE_CSS_VALUE) {\n\t\t\t\t\t\t// data URLs can have semicolons; simplistically check for wrapping parentheses and move along\n\t\t\t\t\t\tif (insideParentheses) {\n\t\t\t\t\t\t\tsc.SetState(SCE_CSS_VALUE);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.SetState(SCE_CSS_IDENTIFIER);\n\t\t\t\t\t\t}\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '!':\n\t\t\t\tif (lastState == SCE_CSS_VALUE)\n\t\t\t\t\tsc.SetState(SCE_CSS_IMPORTANT);\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\n\t\tif (sc.ch == '*' && sc.state == SCE_CSS_DEFAULT) {\n\t\t\tsc.SetState(SCE_CSS_TAG);\n\t\t\tcontinue;\n\t\t}\n\n\t\t// check for inside parentheses (whether part of an \"operator\" or not)\n\t\tif (sc.ch == '(')\n\t\t\tinsideParentheses = true;\n\t\telse if (sc.ch == ')')\n\t\t\tinsideParentheses = false;\n\n\t\t// SCSS special modes\n\t\tif (hasVariables) {\n\t\t\t// variable name\n\t\t\tif (sc.ch == varPrefix) {\n\t\t\t\tswitch (sc.state) {\n\t\t\t\tcase SCE_CSS_DEFAULT:\n\t\t\t\t\tif (isLessDocument) // give priority to pseudo elements\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t// Falls through.\n\t\t\t\tcase SCE_CSS_VALUE:\n\t\t\t\t\tlastStateVar = sc.state;\n\t\t\t\t\tsc.SetState(SCE_CSS_VARIABLE);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t}\n\t\t\tif (sc.state == SCE_CSS_VARIABLE) {\n\t\t\t\tif (IsAWordChar(sc.ch)) {\n\t\t\t\t\t// still looking at the variable name\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t\tif (lastStateVar == SCE_CSS_VALUE) {\n\t\t\t\t\t// not looking at the variable name any more, and it was part of a value\n\t\t\t\t\tsc.SetState(SCE_CSS_VALUE);\n\t\t\t\t}\n\t\t\t}\n\n\t\t\t// nested rule parent selector\n\t\t\tif (sc.ch == '&') {\n\t\t\t\tswitch (sc.state) {\n\t\t\t\tcase SCE_CSS_DEFAULT:\n\t\t\t\tcase SCE_CSS_IDENTIFIER:\n\t\t\t\t\tsc.SetState(SCE_CSS_TAG);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t\t// nesting rules that apply to SCSS and Less\n\t\tif (hasNesting) {\n\t\t\t// check for nested rule selector\n\t\t\tif (sc.state == SCE_CSS_IDENTIFIER && (IsAWordChar(sc.ch) || sc.ch == ':' || sc.ch == '.' || sc.ch == '#')) {\n\t\t\t\t// look ahead to see whether { comes before next ; and }\n\t\t\t\tSci_PositionU endPos = startPos + length;\n\t\t\t\tint ch;\n\n\t\t\t\tfor (Sci_PositionU i = sc.currentPos; i < endPos; i++) {\n\t\t\t\t\tch = styler.SafeGetCharAt(i);\n\t\t\t\t\tif (ch == ';' || ch == '}')\n\t\t\t\t\t\tbreak;\n\t\t\t\t\tif (ch == '{') {\n\t\t\t\t\t\tsc.SetState(SCE_CSS_DEFAULT);\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\n\t\t}\n\n\t\tif (IsAWordChar(sc.ch)) {\n\t\t\tif (sc.state == SCE_CSS_DEFAULT)\n\t\t\t\tsc.SetState(SCE_CSS_TAG);\n\t\t\tcontinue;\n\t\t}\n\n\t\tif (IsAWordChar(sc.chPrev) && (\n\t\t\tsc.state == SCE_CSS_IDENTIFIER || sc.state == SCE_CSS_IDENTIFIER2 ||\n\t\t\tsc.state == SCE_CSS_IDENTIFIER3 || sc.state == SCE_CSS_EXTENDED_IDENTIFIER ||\n\t\t\tsc.state == SCE_CSS_UNKNOWN_IDENTIFIER ||\n\t\t\tsc.state == SCE_CSS_PSEUDOCLASS || sc.state == SCE_CSS_PSEUDOELEMENT ||\n\t\t\tsc.state == SCE_CSS_EXTENDED_PSEUDOCLASS || sc.state == SCE_CSS_EXTENDED_PSEUDOELEMENT ||\n\t\t\tsc.state == SCE_CSS_UNKNOWN_PSEUDOCLASS ||\n\t\t\tsc.state == SCE_CSS_IMPORTANT ||\n\t\t\tsc.state == SCE_CSS_DIRECTIVE\n\t\t)) {\n\t\t\tchar s[100];\n\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\tchar *s2 = s;\n\t\t\twhile (*s2 && !IsAWordChar(*s2))\n\t\t\t\ts2++;\n\t\t\tswitch (sc.state) {\n\t\t\tcase SCE_CSS_IDENTIFIER:\n\t\t\tcase SCE_CSS_IDENTIFIER2:\n\t\t\tcase SCE_CSS_IDENTIFIER3:\n\t\t\tcase SCE_CSS_EXTENDED_IDENTIFIER:\n\t\t\tcase SCE_CSS_UNKNOWN_IDENTIFIER:\n\t\t\t\tif (css1Props.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_IDENTIFIER);\n\t\t\t\telse if (css2Props.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_IDENTIFIER2);\n\t\t\t\telse if (css3Props.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_IDENTIFIER3);\n\t\t\t\telse if (exProps.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_EXTENDED_IDENTIFIER);\n\t\t\t\telse\n\t\t\t\t\tsc.ChangeState(SCE_CSS_UNKNOWN_IDENTIFIER);\n\t\t\t\tbreak;\n\t\t\tcase SCE_CSS_PSEUDOCLASS:\n\t\t\tcase SCE_CSS_PSEUDOELEMENT:\n\t\t\tcase SCE_CSS_EXTENDED_PSEUDOCLASS:\n\t\t\tcase SCE_CSS_EXTENDED_PSEUDOELEMENT:\n\t\t\tcase SCE_CSS_UNKNOWN_PSEUDOCLASS:\n\t\t\t\tif (op == ':' && opPrev != ':' && pseudoClasses.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_PSEUDOCLASS);\n\t\t\t\telse if (opPrev == ':' && pseudoElements.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_PSEUDOELEMENT);\n\t\t\t\telse if ((op == ':' || (op == '(' && lastState == SCE_CSS_EXTENDED_PSEUDOCLASS)) && opPrev != ':' && exPseudoClasses.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_EXTENDED_PSEUDOCLASS);\n\t\t\t\telse if (opPrev == ':' && exPseudoElements.InList(s2))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_EXTENDED_PSEUDOELEMENT);\n\t\t\t\telse\n\t\t\t\t\tsc.ChangeState(SCE_CSS_UNKNOWN_PSEUDOCLASS);\n\t\t\t\tbreak;\n\t\t\tcase SCE_CSS_IMPORTANT:\n\t\t\t\tif (strcmp(s2, \"important\") != 0)\n\t\t\t\t\tsc.ChangeState(SCE_CSS_VALUE);\n\t\t\t\tbreak;\n\t\t\tcase SCE_CSS_DIRECTIVE:\n\t\t\t\tif (op == '@' && (strcmp(s2, \"media\") == 0 || strcmp(s2, \"supports\") == 0 || strcmp(s2, \"document\") == 0 || strcmp(s2, \"-moz-document\") == 0))\n\t\t\t\t\tsc.ChangeState(SCE_CSS_GROUP_RULE);\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\n\t\tif (sc.ch != '.' && sc.ch != ':' && sc.ch != '#' && (\n\t\t\tsc.state == SCE_CSS_CLASS || sc.state == SCE_CSS_ID ||\n\t\t\t(sc.ch != '(' && sc.ch != ')' && ( /* This line of the condition makes it possible to extend pseudo-classes with parentheses */\n\t\t\t\tsc.state == SCE_CSS_PSEUDOCLASS || sc.state == SCE_CSS_PSEUDOELEMENT ||\n\t\t\t\tsc.state == SCE_CSS_EXTENDED_PSEUDOCLASS || sc.state == SCE_CSS_EXTENDED_PSEUDOELEMENT ||\n\t\t\t\tsc.state == SCE_CSS_UNKNOWN_PSEUDOCLASS\n\t\t\t))\n\t\t))\n\t\t\tsc.SetState(SCE_CSS_TAG);\n\n\t\tif (sc.Match('/', '*')) {\n\t\t\tlastStateC = sc.state;\n\t\t\tcomment_mode = eCommentBlock;\n\t\t\tsc.SetState(SCE_CSS_COMMENT);\n\t\t\tsc.Forward();\n\t\t} else if (hasSingleLineComments && sc.Match('/', '/') && !insideParentheses) {\n\t\t\t// note that we've had to treat ([...]// as the start of a URL not a comment, e.g. url(http://example.com), url(//example.com)\n\t\t\tlastStateC = sc.state;\n\t\t\tcomment_mode = eCommentLine;\n\t\t\tsc.SetState(SCE_CSS_COMMENT);\n\t\t\tsc.Forward();\n\t\t} else if ((sc.state == SCE_CSS_VALUE || sc.state == SCE_CSS_ATTRIBUTE)\n\t\t\t&& (sc.ch == '\\\"' || sc.ch == '\\'')) {\n\t\t\tlastStateS = sc.state;\n\t\t\tsc.SetState((sc.ch == '\\\"' ? SCE_CSS_DOUBLESTRING : SCE_CSS_SINGLESTRING));\n\t\t} else if (IsCssOperator(sc.ch)\n\t\t\t&& (sc.state != SCE_CSS_ATTRIBUTE || sc.ch == ']')\n\t\t\t&& (sc.state != SCE_CSS_VALUE || sc.ch == ';' || sc.ch == '}' || sc.ch == '!')\n\t\t\t&& ((sc.state != SCE_CSS_DIRECTIVE && sc.state != SCE_CSS_GROUP_RULE) || sc.ch == ';' || sc.ch == '{')\n\t\t) {\n\t\t\tif (sc.state != SCE_CSS_OPERATOR)\n\t\t\t\tlastState = sc.state;\n\t\t\tsc.SetState(SCE_CSS_OPERATOR);\n\t\t\top = sc.ch;\n\t\t\topPrev = sc.chPrev;\n\t\t}\n\t}\n\n\tsc.Complete();\n}\n\nstatic void FoldCSSDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {\n\tbool foldComment = styler.GetPropertyInt(\"fold.comment\") != 0;\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tbool inComment = (styler.StyleAt(startPos-1) == SCE_CSS_COMMENT);\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styler.StyleAt(i);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (foldComment) {\n\t\t\tif (!inComment && (style == SCE_CSS_COMMENT))\n\t\t\t\tlevelCurrent++;\n\t\t\telse if (inComment && (style != SCE_CSS_COMMENT))\n\t\t\t\tlevelCurrent--;\n\t\t\tinComment = (style == SCE_CSS_COMMENT);\n\t\t}\n\t\tif (style == SCE_CSS_OPERATOR) {\n\t\t\tif (ch == '{') {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nstatic const char * const cssWordListDesc[] = {\n\t\"CSS1 Properties\",\n\t\"Pseudo-classes\",\n\t\"CSS2 Properties\",\n\t\"CSS3 Properties\",\n\t\"Pseudo-elements\",\n\t\"Browser-Specific CSS Properties\",\n\t\"Browser-Specific Pseudo-classes\",\n\t\"Browser-Specific Pseudo-elements\",\n\t0\n};\n\nextern const LexerModule lmCss(SCLEX_CSS, ColouriseCssDoc, \"css\", FoldCSSDoc, cssWordListDesc);\n" }, { "path": "lexers/LexCaml.cxx", "content": "// Scintilla source code edit control\n/** @file LexCaml.cxx\n ** Lexer for Objective Caml.\n **/\n// Copyright 2005-2009 by Robert Roessler \n// The License.txt file describes the conditions under which this software may be distributed.\n/*\tRelease History\n\t20050204 Initial release.\n\t20050205 Quick compiler standards/\"cleanliness\" adjustment.\n\t20050206 Added cast for IsLeadByte().\n\t20050209 Changes to \"external\" build support.\n\t20050306 Fix for 1st-char-in-doc \"corner\" case.\n\t20050502 Fix for [harmless] one-past-the-end coloring.\n\t20050515 Refined numeric token recognition logic.\n\t20051125 Added 2nd \"optional\" keywords class.\n\t20051129 Support \"magic\" (read-only) comments for RCaml.\n\t20051204 Swtich to using StyleContext infrastructure.\n\t20090629 Add full Standard ML '97 support.\n*/\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\n#if defined(__clang__)\n#pragma clang diagnostic ignored \"-Wcomma\"\n#endif\n\n//\tSince the Microsoft __iscsym[f] funcs are not ANSI...\ninline int iscaml(int c) {return isalnum(c) || c == '_';}\ninline int iscamlf(int c) {return isalpha(c) || c == '_';}\n\nstatic const int baseT[24] = {\n\t0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,\t/* A - L */\n\t0, 0, 8, 0, 0, 0, 0, 0, 0, 0, 0,16\t/* M - X */\n};\n\nusing namespace Lexilla;\n\nstatic void ColouriseCamlDoc(\n\tSci_PositionU startPos, Sci_Position length,\n\tint initStyle,\n\tWordList *keywordlists[],\n\tAccessor &styler)\n{\n\t// initialize styler\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tSci_PositionU chToken = 0;\n\tint chBase = 0, chLit = 0;\n\tWordList& keywords = *keywordlists[0];\n\tWordList& keywords2 = *keywordlists[1];\n\tWordList& keywords3 = *keywordlists[2];\n\tconst bool isSML = keywords.InList(\"andalso\");\n\tconst int useMagic = styler.GetPropertyInt(\"lexer.caml.magic\", 0);\n\n\t// set up [initial] state info (terminating states that shouldn't \"bleed\")\n\tconst int state_ = sc.state & 0x0f;\n\tif (state_ <= SCE_CAML_CHAR\n\t\t|| (isSML && state_ == SCE_CAML_STRING))\n\t\tsc.state = SCE_CAML_DEFAULT;\n\tint nesting = (state_ >= SCE_CAML_COMMENT)? (state_ - SCE_CAML_COMMENT): 0;\n\n\t// foreach char in range...\n\twhile (sc.More()) {\n\t\t// set up [per-char] state info\n\t\tint state2 = -1;\t\t\t\t// (ASSUME no state change)\n\t\tSci_Position chColor = sc.currentPos - 1;// (ASSUME standard coloring range)\n\t\tbool advance = true;\t\t\t// (ASSUME scanner \"eats\" 1 char)\n\n\t\t// step state machine\n\t\tswitch (sc.state & 0x0f) {\n\t\tcase SCE_CAML_DEFAULT:\n\t\t\tchToken = sc.currentPos;\t// save [possible] token start (JIC)\n\t\t\t// it's wide open; what do we have?\n\t\t\tif (iscamlf(sc.ch))\n\t\t\t\tstate2 = SCE_CAML_IDENTIFIER;\n\t\t\telse if (!isSML && sc.Match('`') && iscamlf(sc.chNext))\n\t\t\t\tstate2 = SCE_CAML_TAGNAME;\n\t\t\telse if (!isSML && sc.Match('#') && isdigit(sc.chNext))\n\t\t\t\tstate2 = SCE_CAML_LINENUM;\n\t\t\telse if (isdigit(sc.ch)) {\n\t\t\t\t// it's a number, assume base 10\n\t\t\t\tstate2 = SCE_CAML_NUMBER, chBase = 10;\n\t\t\t\tif (sc.Match('0')) {\n\t\t\t\t\t// there MAY be a base specified...\n\t\t\t\t\tconst char* baseC = \"bBoOxX\";\n\t\t\t\t\tif (isSML) {\n\t\t\t\t\t\tif (sc.chNext == 'w')\n\t\t\t\t\t\t\tsc.Forward();\t// (consume SML \"word\" indicator)\n\t\t\t\t\t\tbaseC = \"x\";\n\t\t\t\t\t}\n\t\t\t\t\t// ... change to specified base AS REQUIRED\n\t\t\t\t\tif (strchr(baseC, sc.chNext))\n\t\t\t\t\t\tchBase = baseT[tolower(sc.chNext) - 'a'], sc.Forward();\n\t\t\t\t}\n\t\t\t} else if (!isSML && sc.Match('\\''))\t// (Caml char literal?)\n\t\t\t\tstate2 = SCE_CAML_CHAR, chLit = 0;\n\t\t\telse if (isSML && sc.Match('#', '\"'))\t// (SML char literal?)\n\t\t\t\tstate2 = SCE_CAML_CHAR, sc.Forward();\n\t\t\telse if (sc.Match('\"'))\n\t\t\t\tstate2 = SCE_CAML_STRING;\n\t\t\telse if (sc.Match('(', '*'))\n\t\t\t\tstate2 = SCE_CAML_COMMENT, sc.Forward(), sc.ch = ' '; // (*)...\n\t\t\telse if (strchr(\"!?~\"\t\t\t/* Caml \"prefix-symbol\" */\n\t\t\t\t\t\"=<>@^|&+-*/$%\"\t\t\t/* Caml \"infix-symbol\" */\n\t\t\t\t\t\"()[]{};,:.#\", sc.ch)\t// Caml \"bracket\" or ;,:.#\n\t\t\t\t\t\t\t\t\t\t\t// SML \"extra\" ident chars\n\t\t\t\t|| (isSML && (sc.Match('\\\\') || sc.Match('`'))))\n\t\t\t\tstate2 = SCE_CAML_OPERATOR;\n\t\t\tbreak;\n\n\t\tcase SCE_CAML_IDENTIFIER:\n\t\t\t// [try to] interpret as [additional] identifier char\n\t\t\tif (!(iscaml(sc.ch) || sc.Match('\\''))) {\n\t\t\t\tconst Sci_Position n = sc.currentPos - chToken;\n\t\t\t\tif (n < 24) {\n\t\t\t\t\t// length is believable as keyword, [re-]construct token\n\t\t\t\t\tchar t[24];\n\t\t\t\t\tfor (Sci_Position i = -n; i < 0; i++)\n\t\t\t\t\t\tt[n + i] = static_cast(sc.GetRelative(i));\n\t\t\t\t\tt[n] = '\\0';\n\t\t\t\t\t// special-case \"_\" token as KEYWORD\n\t\t\t\t\tif ((n == 1 && sc.chPrev == '_') || keywords.InList(t))\n\t\t\t\t\t\tsc.ChangeState(SCE_CAML_KEYWORD);\n\t\t\t\t\telse if (keywords2.InList(t))\n\t\t\t\t\t\tsc.ChangeState(SCE_CAML_KEYWORD2);\n\t\t\t\t\telse if (keywords3.InList(t))\n\t\t\t\t\t\tsc.ChangeState(SCE_CAML_KEYWORD3);\n\t\t\t\t}\n\t\t\t\tstate2 = SCE_CAML_DEFAULT, advance = false;\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_CAML_TAGNAME:\n\t\t\t// [try to] interpret as [additional] tagname char\n\t\t\tif (!(iscaml(sc.ch) || sc.Match('\\'')))\n\t\t\t\tstate2 = SCE_CAML_DEFAULT, advance = false;\n\t\t\tbreak;\n\n\t\t/*case SCE_CAML_KEYWORD:\n\t\tcase SCE_CAML_KEYWORD2:\n\t\tcase SCE_CAML_KEYWORD3:\n\t\t\t// [try to] interpret as [additional] keyword char\n\t\t\tif (!iscaml(ch))\n\t\t\t\tstate2 = SCE_CAML_DEFAULT, advance = false;\n\t\t\tbreak;*/\n\n\t\tcase SCE_CAML_LINENUM:\n\t\t\t// [try to] interpret as [additional] linenum directive char\n\t\t\tif (!isdigit(sc.ch))\n\t\t\t\tstate2 = SCE_CAML_DEFAULT, advance = false;\n\t\t\tbreak;\n\n\t\tcase SCE_CAML_OPERATOR: {\n\t\t\t// [try to] interpret as [additional] operator char\n\t\t\tconst char* o = 0;\n\t\t\tif (iscaml(sc.ch) || isspace(sc.ch)\t\t\t// ident or whitespace\n\t\t\t\t|| (o = strchr(\")]};,\\'\\\"#\", sc.ch),o)\t// \"termination\" chars\n\t\t\t\t|| (!isSML && sc.Match('`'))\t\t\t// Caml extra term char\n\t\t\t\t|| (!strchr(\"!$%&*+-./:<=>?@^|~\", sc.ch)// \"operator\" chars\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t// SML extra ident chars\n\t\t\t\t\t&& !(isSML && (sc.Match('\\\\') || sc.Match('`'))))) {\n\t\t\t\t// check for INCLUSIVE termination\n\t\t\t\tif (o && strchr(\")]};,\", sc.ch)) {\n\t\t\t\t\tif ((sc.Match(')') && sc.chPrev == '(')\n\t\t\t\t\t\t|| (sc.Match(']') && sc.chPrev == '['))\n\t\t\t\t\t\t// special-case \"()\" and \"[]\" tokens as KEYWORDS\n\t\t\t\t\t\tsc.ChangeState(SCE_CAML_KEYWORD);\n\t\t\t\t\tchColor++;\n\t\t\t\t} else\n\t\t\t\t\tadvance = false;\n\t\t\t\tstate2 = SCE_CAML_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\t}\n\n\t\tcase SCE_CAML_NUMBER:\n\t\t\t// [try to] interpret as [additional] numeric literal char\n\t\t\tif ((!isSML && sc.Match('_')) || IsADigit(sc.ch, chBase))\n\t\t\t\tbreak;\n\t\t\t// how about an integer suffix?\n\t\t\tif (!isSML && (sc.Match('l') || sc.Match('L') || sc.Match('n'))\n\t\t\t\t&& (sc.chPrev == '_' || IsADigit(sc.chPrev, chBase)))\n\t\t\t\tbreak;\n\t\t\t// or a floating-point literal?\n\t\t\tif (chBase == 10) {\n\t\t\t\t// with a decimal point?\n\t\t\t\tif (sc.Match('.')\n\t\t\t\t\t&& ((!isSML && sc.chPrev == '_')\n\t\t\t\t\t\t|| IsADigit(sc.chPrev, chBase)))\n\t\t\t\t\tbreak;\n\t\t\t\t// with an exponent? (I)\n\t\t\t\tif ((sc.Match('e') || sc.Match('E'))\n\t\t\t\t\t&& ((!isSML && (sc.chPrev == '.' || sc.chPrev == '_'))\n\t\t\t\t\t\t|| IsADigit(sc.chPrev, chBase)))\n\t\t\t\t\tbreak;\n\t\t\t\t// with an exponent? (II)\n\t\t\t\tif (((!isSML && (sc.Match('+') || sc.Match('-')))\n\t\t\t\t\t\t|| (isSML && sc.Match('~')))\n\t\t\t\t\t&& (sc.chPrev == 'e' || sc.chPrev == 'E'))\n\t\t\t\t\tbreak;\n\t\t\t}\n\t\t\t// it looks like we have run out of number\n\t\t\tstate2 = SCE_CAML_DEFAULT, advance = false;\n\t\t\tbreak;\n\n\t\tcase SCE_CAML_CHAR:\n\t\t\tif (!isSML) {\n\t\t\t\t// [try to] interpret as [additional] char literal char\n\t\t\t\tif (sc.Match('\\\\')) {\n\t\t\t\t\tchLit = 1;\t// (definitely IS a char literal)\n\t\t\t\t\tif (sc.chPrev == '\\\\')\n\t\t\t\t\t\tsc.ch = ' ';\t// (...\\\\')\n\t\t\t\t// should we be terminating - one way or another?\n\t\t\t\t} else if ((sc.Match('\\'') && sc.chPrev != '\\\\')\n\t\t\t\t\t|| sc.atLineEnd) {\n\t\t\t\t\tstate2 = SCE_CAML_DEFAULT;\n\t\t\t\t\tif (sc.Match('\\''))\n\t\t\t\t\t\tchColor++;\n\t\t\t\t\telse\n\t\t\t\t\t\tsc.ChangeState(SCE_CAML_IDENTIFIER);\n\t\t\t\t// ... maybe a char literal, maybe not\n\t\t\t\t} else if (chLit < 1 && sc.currentPos - chToken >= 2)\n\t\t\t\t\tsc.ChangeState(SCE_CAML_IDENTIFIER), advance = false;\n\t\t\t\tbreak;\n\t\t\t}/* else\n\t\t\t\t// fall through for SML char literal (handle like string) */\n\t\t\t// Falls through.\n\n\t\tcase SCE_CAML_STRING:\n\t\t\t// [try to] interpret as [additional] [SML char/] string literal char\n\t\t\tif (isSML && sc.Match('\\\\') && sc.chPrev != '\\\\' && isspace(sc.chNext))\n\t\t\t\tstate2 = SCE_CAML_WHITE;\n\t\t\telse if (sc.Match('\\\\') && sc.chPrev == '\\\\')\n\t\t\t\tsc.ch = ' ';\t// (...\\\\\")\n\t\t\t// should we be terminating - one way or another?\n\t\t\telse if ((sc.Match('\"') && sc.chPrev != '\\\\')\n\t\t\t\t|| (isSML && sc.atLineEnd)) {\n\t\t\t\tstate2 = SCE_CAML_DEFAULT;\n\t\t\t\tif (sc.Match('\"'))\n\t\t\t\t\tchColor++;\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_CAML_WHITE:\n\t\t\t// [try to] interpret as [additional] SML embedded whitespace char\n\t\t\tif (sc.Match('\\\\')) {\n\t\t\t\t// style this puppy NOW...\n\t\t\t\tstate2 = SCE_CAML_STRING, sc.ch = ' ' /* (...\\\") */, chColor++,\n\t\t\t\t\tstyler.ColourTo(chColor, SCE_CAML_WHITE), styler.Flush();\n\t\t\t\t// ... then backtrack to determine original SML literal type\n\t\t\t\tSci_Position p = chColor - 2;\n\t\t\t\tfor (; p >= 0 && styler.StyleAt(p) == SCE_CAML_WHITE; p--) ;\n\t\t\t\tif (p >= 0)\n\t\t\t\t\tstate2 = static_cast(styler.StyleAt(p));\n\t\t\t\t// take care of state change NOW\n\t\t\t\tsc.ChangeState(state2), state2 = -1;\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_CAML_COMMENT:\n\t\tcase SCE_CAML_COMMENT1:\n\t\tcase SCE_CAML_COMMENT2:\n\t\tcase SCE_CAML_COMMENT3:\n\t\t\t// we're IN a comment - does this start a NESTED comment?\n\t\t\tif (sc.Match('(', '*'))\n\t\t\t\tstate2 = sc.state + 1, chToken = sc.currentPos,\n\t\t\t\t\tsc.Forward(), sc.ch = ' ' /* (*)... */, nesting++;\n\t\t\t// [try to] interpret as [additional] comment char\n\t\t\telse if (sc.Match(')') && sc.chPrev == '*') {\n\t\t\t\tif (nesting)\n\t\t\t\t\tstate2 = (sc.state & 0x0f) - 1, chToken = 0, nesting--;\n\t\t\t\telse\n\t\t\t\t\tstate2 = SCE_CAML_DEFAULT;\n\t\t\t\tchColor++;\n\t\t\t// enable \"magic\" (read-only) comment AS REQUIRED\n\t\t\t} else if (useMagic && sc.currentPos - chToken == 4\n\t\t\t\t&& sc.Match('c') && sc.chPrev == 'r' && sc.GetRelative(-2) == '@')\n\t\t\t\tsc.state |= 0x10;\t// (switch to read-only comment style)\n\t\t\tbreak;\n\t\t}\n\n\t\t// handle state change and char coloring AS REQUIRED\n\t\tif (state2 >= 0)\n\t\t\tstyler.ColourTo(chColor, sc.state), sc.ChangeState(state2);\n\t\t// move to next char UNLESS re-scanning current char\n\t\tif (advance)\n\t\t\tsc.Forward();\n\t}\n\n\t// do any required terminal char coloring (JIC)\n\tsc.Complete();\n}\n\nstatic\nvoid FoldCamlDoc(\n\tSci_PositionU, Sci_Position,\n\tint,\n\tWordList *[],\n\tAccessor &)\n{\n}\n\nstatic const char * const camlWordListDesc[] = {\n\t\"Keywords\",\t\t// primary Objective Caml keywords\n\t\"Keywords2\",\t// \"optional\" keywords (typically from Pervasives)\n\t\"Keywords3\",\t// \"optional\" keywords (typically typenames)\n\t0\n};\n\nextern const LexerModule lmCaml(SCLEX_CAML, ColouriseCamlDoc, \"caml\", FoldCamlDoc, camlWordListDesc);\n" }, { "path": "lexers/LexCmake.cxx", "content": "// Scintilla source code edit control\n/** @file LexCmake.cxx\n ** Lexer for Cmake\n **/\n// Copyright 2007 by Cristian Adam \n// based on the NSIS lexer\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic bool isCmakeNumber(char ch)\n{\n return(ch >= '0' && ch <= '9');\n}\n\nstatic bool isCmakeChar(char ch)\n{\n return(ch == '.' ) || (ch == '_' ) || isCmakeNumber(ch) || (ch >= 'A' && ch <= 'Z') || (ch >= 'a' && ch <= 'z');\n}\n\nstatic bool isCmakeLetter(char ch)\n{\n return(ch >= 'A' && ch <= 'Z') || (ch >= 'a' && ch <= 'z');\n}\n\nstatic bool CmakeNextLineHasElse(Sci_PositionU start, Sci_PositionU end, Accessor &styler)\n{\n Sci_Position nNextLine = -1;\n for ( Sci_PositionU i = start; i < end; i++ ) {\n char cNext = styler.SafeGetCharAt( i );\n if ( cNext == '\\n' ) {\n nNextLine = i+1;\n break;\n }\n }\n\n if ( nNextLine == -1 ) // We never foudn the next line...\n return false;\n\n for ( Sci_PositionU firstChar = nNextLine; firstChar < end; firstChar++ ) {\n char cNext = styler.SafeGetCharAt( firstChar );\n if ( cNext == ' ' )\n continue;\n if ( cNext == '\\t' )\n continue;\n if ( styler.Match(firstChar, \"ELSE\") || styler.Match(firstChar, \"else\"))\n return true;\n break;\n }\n\n return false;\n}\n\nstatic int calculateFoldCmake(Sci_PositionU start, Sci_PositionU end, int foldlevel, Accessor &styler, bool bElse)\n{\n // If the word is too long, it is not what we are looking for\n if ( end - start > 20 )\n return foldlevel;\n\n int newFoldlevel = foldlevel;\n\n char s[20]; // The key word we are looking for has atmost 13 characters\n for (unsigned int i = 0; i < end - start + 1 && i < 19; i++) {\n s[i] = static_cast( styler[ start + i ] );\n s[i + 1] = '\\0';\n }\n\n if ( CompareCaseInsensitive(s, \"IF\") == 0 || CompareCaseInsensitive(s, \"WHILE\") == 0\n || CompareCaseInsensitive(s, \"MACRO\") == 0 || CompareCaseInsensitive(s, \"FOREACH\") == 0\n || CompareCaseInsensitive(s, \"FUNCTION\") == 0)\n newFoldlevel++;\n else if ( CompareCaseInsensitive(s, \"ENDIF\") == 0 || CompareCaseInsensitive(s, \"ENDWHILE\") == 0\n || CompareCaseInsensitive(s, \"ENDMACRO\") == 0 || CompareCaseInsensitive(s, \"ENDFOREACH\") == 0\n || CompareCaseInsensitive(s, \"ENDFUNCTION\") == 0)\n newFoldlevel--;\n else if ( bElse && CompareCaseInsensitive(s, \"ELSEIF\") == 0 )\n newFoldlevel++;\n else if ( bElse && CompareCaseInsensitive(s, \"ELSE\") == 0 )\n newFoldlevel++;\n\n return newFoldlevel;\n}\n\nstatic int classifyWordCmake(Sci_PositionU start, Sci_PositionU end, WordList *keywordLists[], Accessor &styler )\n{\n char word[100] = {0};\n char lowercaseWord[100] = {0};\n\n WordList &Commands = *keywordLists[0];\n WordList &Parameters = *keywordLists[1];\n WordList &UserDefined = *keywordLists[2];\n\n for (Sci_PositionU i = 0; i < end - start + 1 && i < 99; i++) {\n word[i] = static_cast( styler[ start + i ] );\n lowercaseWord[i] = static_cast(tolower(word[i]));\n }\n\n // Check for special words...\n if ( CompareCaseInsensitive(word, \"MACRO\") == 0 || CompareCaseInsensitive(word, \"ENDMACRO\") == 0 )\n return SCE_CMAKE_MACRODEF;\n\n if ( CompareCaseInsensitive(word, \"IF\") == 0 || CompareCaseInsensitive(word, \"ENDIF\") == 0 )\n return SCE_CMAKE_IFDEFINEDEF;\n\n if ( CompareCaseInsensitive(word, \"ELSEIF\") == 0 || CompareCaseInsensitive(word, \"ELSE\") == 0 )\n return SCE_CMAKE_IFDEFINEDEF;\n\n if ( CompareCaseInsensitive(word, \"WHILE\") == 0 || CompareCaseInsensitive(word, \"ENDWHILE\") == 0)\n return SCE_CMAKE_WHILEDEF;\n\n if ( CompareCaseInsensitive(word, \"FOREACH\") == 0 || CompareCaseInsensitive(word, \"ENDFOREACH\") == 0)\n return SCE_CMAKE_FOREACHDEF;\n\n if ( Commands.InList(lowercaseWord) )\n return SCE_CMAKE_COMMANDS;\n\n if ( Parameters.InList(word) )\n return SCE_CMAKE_PARAMETERS;\n\n\n if ( UserDefined.InList(word) )\n return SCE_CMAKE_USERDEFINED;\n\n if ( strlen(word) > 3 ) {\n if ( word[1] == '{' && word[strlen(word)-1] == '}' )\n return SCE_CMAKE_VARIABLE;\n }\n\n // To check for numbers\n if ( isCmakeNumber( word[0] ) ) {\n bool bHasSimpleCmakeNumber = true;\n for (unsigned int j = 1; j < end - start + 1 && j < 99; j++) {\n if ( !isCmakeNumber( word[j] ) ) {\n bHasSimpleCmakeNumber = false;\n break;\n }\n }\n\n if ( bHasSimpleCmakeNumber )\n return SCE_CMAKE_NUMBER;\n }\n\n return SCE_CMAKE_DEFAULT;\n}\n\nstatic void ColouriseCmakeDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *keywordLists[], Accessor &styler)\n{\n int state = SCE_CMAKE_DEFAULT;\n if ( startPos > 0 )\n state = styler.StyleAt(startPos-1); // Use the style from the previous line, usually default, but could be commentbox\n\n styler.StartAt( startPos );\n styler.GetLine( startPos );\n\n Sci_PositionU nLengthDoc = startPos + length;\n styler.StartSegment( startPos );\n\n char cCurrChar;\n bool bVarInString = false;\n bool bClassicVarInString = false;\n\n Sci_PositionU i;\n for ( i = startPos; i < nLengthDoc; i++ ) {\n cCurrChar = styler.SafeGetCharAt( i );\n char cNextChar = styler.SafeGetCharAt(i+1);\n\n switch (state) {\n case SCE_CMAKE_DEFAULT:\n if ( cCurrChar == '#' ) { // we have a comment line\n styler.ColourTo(i-1, state );\n state = SCE_CMAKE_COMMENT;\n break;\n }\n if ( cCurrChar == '\"' ) {\n styler.ColourTo(i-1, state );\n state = SCE_CMAKE_STRINGDQ;\n bVarInString = false;\n bClassicVarInString = false;\n break;\n }\n if ( cCurrChar == '\\'' ) {\n styler.ColourTo(i-1, state );\n state = SCE_CMAKE_STRINGRQ;\n bVarInString = false;\n bClassicVarInString = false;\n break;\n }\n if ( cCurrChar == '`' ) {\n styler.ColourTo(i-1, state );\n state = SCE_CMAKE_STRINGLQ;\n bVarInString = false;\n bClassicVarInString = false;\n break;\n }\n\n // CMake Variable\n if ( cCurrChar == '$' || isCmakeChar(cCurrChar)) {\n styler.ColourTo(i-1,state);\n state = SCE_CMAKE_VARIABLE;\n\n // If it is a number, we must check and set style here first...\n if ( isCmakeNumber(cCurrChar) && (cNextChar == '\\t' || cNextChar == ' ' || cNextChar == '\\r' || cNextChar == '\\n' ) )\n styler.ColourTo( i, SCE_CMAKE_NUMBER);\n\n break;\n }\n\n break;\n case SCE_CMAKE_COMMENT:\n if ( cCurrChar == '\\n' || cCurrChar == '\\r' ) {\n if ( styler.SafeGetCharAt(i-1) == '\\\\' ) {\n styler.ColourTo(i-2,state);\n styler.ColourTo(i-1,SCE_CMAKE_DEFAULT);\n }\n else {\n styler.ColourTo(i-1,state);\n state = SCE_CMAKE_DEFAULT;\n }\n }\n break;\n case SCE_CMAKE_STRINGDQ:\n case SCE_CMAKE_STRINGLQ:\n case SCE_CMAKE_STRINGRQ:\n\n if ( styler.SafeGetCharAt(i-1) == '\\\\' && styler.SafeGetCharAt(i-2) == '$' )\n break; // Ignore the next character, even if it is a quote of some sort\n\n if ( cCurrChar == '\"' && state == SCE_CMAKE_STRINGDQ ) {\n styler.ColourTo(i,state);\n state = SCE_CMAKE_DEFAULT;\n break;\n }\n\n if ( cCurrChar == '`' && state == SCE_CMAKE_STRINGLQ ) {\n styler.ColourTo(i,state);\n state = SCE_CMAKE_DEFAULT;\n break;\n }\n\n if ( cCurrChar == '\\'' && state == SCE_CMAKE_STRINGRQ ) {\n styler.ColourTo(i,state);\n state = SCE_CMAKE_DEFAULT;\n break;\n }\n\n if ( cNextChar == '\\r' || cNextChar == '\\n' ) {\n Sci_Position nCurLine = styler.GetLine(i+1);\n Sci_Position nBack = i;\n // We need to check if the previous line has a \\ in it...\n bool bNextLine = false;\n\n while ( nBack > 0 ) {\n if ( styler.GetLine(nBack) != nCurLine )\n break;\n\n char cTemp = styler.SafeGetCharAt(nBack, 'a'); // Letter 'a' is safe here\n\n if ( cTemp == '\\\\' ) {\n bNextLine = true;\n break;\n }\n if ( cTemp != '\\r' && cTemp != '\\n' && cTemp != '\\t' && cTemp != ' ' )\n break;\n\n nBack--;\n }\n\n if ( bNextLine ) {\n styler.ColourTo(i+1,state);\n }\n if ( bNextLine == false ) {\n styler.ColourTo(i,state);\n state = SCE_CMAKE_DEFAULT;\n }\n }\n break;\n\n case SCE_CMAKE_VARIABLE:\n\n // CMake Variable:\n if ( cCurrChar == '$' )\n state = SCE_CMAKE_DEFAULT;\n else if ( cCurrChar == '\\\\' && (cNextChar == 'n' || cNextChar == 'r' || cNextChar == 't' ) )\n state = SCE_CMAKE_DEFAULT;\n else if ( (isCmakeChar(cCurrChar) && !isCmakeChar( cNextChar) && cNextChar != '}') || cCurrChar == '}' ) {\n state = classifyWordCmake( styler.GetStartSegment(), i, keywordLists, styler );\n styler.ColourTo( i, state);\n state = SCE_CMAKE_DEFAULT;\n }\n else if ( !isCmakeChar( cCurrChar ) && cCurrChar != '{' && cCurrChar != '}' ) {\n if ( classifyWordCmake( styler.GetStartSegment(), i-1, keywordLists, styler) == SCE_CMAKE_NUMBER )\n styler.ColourTo( i-1, SCE_CMAKE_NUMBER );\n\n state = SCE_CMAKE_DEFAULT;\n\n if ( cCurrChar == '\"' ) {\n state = SCE_CMAKE_STRINGDQ;\n bVarInString = false;\n bClassicVarInString = false;\n }\n else if ( cCurrChar == '`' ) {\n state = SCE_CMAKE_STRINGLQ;\n bVarInString = false;\n bClassicVarInString = false;\n }\n else if ( cCurrChar == '\\'' ) {\n state = SCE_CMAKE_STRINGRQ;\n bVarInString = false;\n bClassicVarInString = false;\n }\n else if ( cCurrChar == '#' ) {\n state = SCE_CMAKE_COMMENT;\n }\n }\n break;\n }\n\n if ( state == SCE_CMAKE_STRINGDQ || state == SCE_CMAKE_STRINGLQ || state == SCE_CMAKE_STRINGRQ ) {\n bool bIngoreNextDollarSign = false;\n\n if ( bVarInString && cCurrChar == '$' ) {\n bVarInString = false;\n bIngoreNextDollarSign = true;\n }\n else if ( bVarInString && cCurrChar == '\\\\' && (cNextChar == 'n' || cNextChar == 'r' || cNextChar == 't' || cNextChar == '\"' || cNextChar == '`' || cNextChar == '\\'' ) ) {\n styler.ColourTo( i+1, SCE_CMAKE_STRINGVAR);\n bVarInString = false;\n bIngoreNextDollarSign = false;\n }\n\n else if ( bVarInString && !isCmakeChar(cNextChar) ) {\n int nWordState = classifyWordCmake( styler.GetStartSegment(), i, keywordLists, styler);\n if ( nWordState == SCE_CMAKE_VARIABLE )\n styler.ColourTo( i, SCE_CMAKE_STRINGVAR);\n bVarInString = false;\n }\n // Covers \"${TEST}...\"\n else if ( bClassicVarInString && cNextChar == '}' ) {\n styler.ColourTo( i+1, SCE_CMAKE_STRINGVAR);\n bClassicVarInString = false;\n }\n\n // Start of var in string\n if ( !bIngoreNextDollarSign && cCurrChar == '$' && cNextChar == '{' ) {\n styler.ColourTo( i-1, state);\n bClassicVarInString = true;\n bVarInString = false;\n }\n else if ( !bIngoreNextDollarSign && cCurrChar == '$' ) {\n styler.ColourTo( i-1, state);\n bVarInString = true;\n bClassicVarInString = false;\n }\n }\n }\n\n // Colourise remaining document\n styler.ColourTo(nLengthDoc-1,state);\n}\n\nstatic void FoldCmakeDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler)\n{\n // No folding enabled, no reason to continue...\n if ( styler.GetPropertyInt(\"fold\") == 0 )\n return;\n\n bool foldAtElse = styler.GetPropertyInt(\"fold.at.else\", 0) == 1;\n\n Sci_Position lineCurrent = styler.GetLine(startPos);\n Sci_PositionU safeStartPos = styler.LineStart( lineCurrent );\n\n bool bArg1 = true;\n Sci_Position nWordStart = -1;\n\n int levelCurrent = SC_FOLDLEVELBASE;\n if (lineCurrent > 0)\n levelCurrent = styler.LevelAt(lineCurrent-1) >> 16;\n int levelNext = levelCurrent;\n\n for (Sci_PositionU i = safeStartPos; i < startPos + length; i++) {\n char chCurr = styler.SafeGetCharAt(i);\n\n if ( bArg1 ) {\n if ( nWordStart == -1 && (isCmakeLetter(chCurr)) ) {\n nWordStart = i;\n }\n else if ( isCmakeLetter(chCurr) == false && nWordStart > -1 ) {\n int newLevel = calculateFoldCmake( nWordStart, i-1, levelNext, styler, foldAtElse);\n\n if ( newLevel == levelNext ) {\n if ( foldAtElse ) {\n if ( CmakeNextLineHasElse(i, startPos + length, styler) )\n levelNext--;\n }\n }\n else\n levelNext = newLevel;\n bArg1 = false;\n }\n }\n\n if ( chCurr == '\\n' ) {\n if ( bArg1 && foldAtElse) {\n if ( CmakeNextLineHasElse(i, startPos + length, styler) )\n levelNext--;\n }\n\n // If we are on a new line...\n int levelUse = levelCurrent;\n int lev = levelUse | levelNext << 16;\n if (levelUse < levelNext )\n lev |= SC_FOLDLEVELHEADERFLAG;\n if (lev != styler.LevelAt(lineCurrent))\n styler.SetLevel(lineCurrent, lev);\n\n lineCurrent++;\n levelCurrent = levelNext;\n bArg1 = true; // New line, lets look at first argument again\n nWordStart = -1;\n }\n }\n\n int levelUse = levelCurrent;\n int lev = levelUse | levelNext << 16;\n if (levelUse < levelNext)\n lev |= SC_FOLDLEVELHEADERFLAG;\n if (lev != styler.LevelAt(lineCurrent))\n styler.SetLevel(lineCurrent, lev);\n}\n\nstatic const char * const cmakeWordLists[] = {\n \"Commands\",\n \"Parameters\",\n \"UserDefined\",\n 0,\n 0,};\n\nextern const LexerModule lmCmake(SCLEX_CMAKE, ColouriseCmakeDoc, \"cmake\", FoldCmakeDoc, cmakeWordLists);\n" }, { "path": "lexers/LexCoffeeScript.cxx", "content": "// Scintilla source code edit control\n/** @file LexCoffeeScript.cxx\n ** Lexer for CoffeeScript.\n **/\n// Copyright 1998-2011 by Neil Hodgson \n// Based on the Scintilla C++ Lexer\n// Written by Eric Promislow in 2011 for the Komodo IDE\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic bool IsSpaceEquiv(int state) {\n\treturn (state == SCE_COFFEESCRIPT_DEFAULT\n\t || state == SCE_COFFEESCRIPT_COMMENTLINE\n\t || state == SCE_COFFEESCRIPT_COMMENTBLOCK\n\t || state == SCE_COFFEESCRIPT_VERBOSE_REGEX\n\t || state == SCE_COFFEESCRIPT_VERBOSE_REGEX_COMMENT\n\t || state == SCE_COFFEESCRIPT_WORD\n\t || state == SCE_COFFEESCRIPT_REGEX);\n}\n\n// Store the current lexer state and brace count prior to starting a new\n// `#{}` interpolation level.\n// Based on LexRuby.cxx.\nstatic void enterInnerExpression(int *p_inner_string_types,\n int *p_inner_expn_brace_counts,\n int& inner_string_count,\n int state,\n int& brace_counts\n ) {\n\tp_inner_string_types[inner_string_count] = state;\n\tp_inner_expn_brace_counts[inner_string_count] = brace_counts;\n\tbrace_counts = 0;\n\t++inner_string_count;\n}\n\n// Restore the lexer state and brace count for the previous `#{}` interpolation\n// level upon returning to it.\n// Note the previous lexer state is the return value and needs to be restored\n// manually by the StyleContext.\n// Based on LexRuby.cxx.\nstatic int exitInnerExpression(int *p_inner_string_types,\n int *p_inner_expn_brace_counts,\n int& inner_string_count,\n int& brace_counts\n ) {\n\t--inner_string_count;\n\tbrace_counts = p_inner_expn_brace_counts[inner_string_count];\n\treturn p_inner_string_types[inner_string_count];\n}\n\n// Preconditions: sc.currentPos points to a character after '+' or '-'.\n// The test for pos reaching 0 should be redundant,\n// and is in only for safety measures.\n// Limitation: this code will give the incorrect answer for code like\n// a = b+++/ptn/...\n// Putting a space between the '++' post-inc operator and the '+' binary op\n// fixes this, and is highly recommended for readability anyway.\nstatic bool FollowsPostfixOperator(StyleContext &sc, Accessor &styler) {\n\tSci_Position pos = (Sci_Position) sc.currentPos;\n\twhile (--pos > 0) {\n\t\tchar ch = styler[pos];\n\t\tif (ch == '+' || ch == '-') {\n\t\t\treturn styler[pos - 1] == ch;\n\t\t}\n\t}\n\treturn false;\n}\n\nstatic bool followsKeyword(StyleContext &sc, Accessor &styler) {\n\tSci_Position pos = (Sci_Position) sc.currentPos;\n\tSci_Position currentLine = styler.GetLine(pos);\n\tSci_Position lineStartPos = styler.LineStart(currentLine);\n\twhile (--pos > lineStartPos) {\n\t\tchar ch = styler.SafeGetCharAt(pos);\n\t\tif (ch != ' ' && ch != '\\t') {\n\t\t\tbreak;\n\t\t}\n\t}\n\tstyler.Flush();\n\treturn styler.StyleAt(pos) == SCE_COFFEESCRIPT_WORD;\n}\n\n#if defined(__clang__)\n#if __has_warning(\"-Wunused-but-set-variable\")\n// Disable warning for visibleChars\n#pragma clang diagnostic ignored \"-Wunused-but-set-variable\"\n#endif\n#endif\n\nstatic void ColouriseCoffeeScriptDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords4 = *keywordlists[3];\n\n\tCharacterSet setOKBeforeRE(CharacterSet::setNone, \"([{=,:;!%^&*|?~+-\");\n\tCharacterSet setCouldBePostOp(CharacterSet::setNone, \"+-\");\n\n\tCharacterSet setWordStart(CharacterSet::setAlpha, \"_$@\", 0x80, true);\n\tCharacterSet setWord(CharacterSet::setAlphaNum, \"._$\", 0x80, true);\n\n\tint chPrevNonWhite = ' ';\n\tint visibleChars = 0;\n\n\t// String/Regex interpolation variables, based on LexRuby.cxx.\n\t// In most cases a value of 2 should be ample for the code the user is\n\t// likely to enter. For example,\n\t// \"Filling the #{container} with #{liquid}...\"\n\t// from the CoffeeScript homepage nests to a level of 2\n\t// If the user actually hits a 6th occurrence of '#{' in a double-quoted\n\t// string (including regexes), it will stay as a string. The problem with\n\t// this is that quotes might flip, a 7th '#{' will look like a comment,\n\t// and code-folding might be wrong.\n#define INNER_STRINGS_MAX_COUNT 5\n\t// These vars track our instances of \"...#{,,,'..#{,,,}...',,,}...\"\n\tint inner_string_types[INNER_STRINGS_MAX_COUNT];\n\t// Track # braces when we push a new #{ thing\n\tint inner_expn_brace_counts[INNER_STRINGS_MAX_COUNT];\n\tint inner_string_count = 0;\n\tint brace_counts = 0; // Number of #{ ... } things within an expression\n\tfor (int i = 0; i < INNER_STRINGS_MAX_COUNT; i++) {\n\t\tinner_string_types[i] = 0;\n\t\tinner_expn_brace_counts[i] = 0;\n\t}\n\n\t// look back to set chPrevNonWhite properly for better regex colouring\n\tSci_Position endPos = startPos + length;\n if (startPos > 0 && IsSpaceEquiv(initStyle)) {\n\t\tSci_PositionU back = startPos;\n\t\tstyler.Flush();\n\t\twhile (back > 0 && IsSpaceEquiv(styler.StyleAt(--back)))\n\t\t\t;\n\t\tif (styler.StyleAt(back) == SCE_COFFEESCRIPT_OPERATOR) {\n\t\t\tchPrevNonWhite = styler.SafeGetCharAt(back);\n\t\t}\n\t\tif (startPos != back) {\n\t\t\tinitStyle = styler.StyleAt(back);\n\t\t\tif (IsSpaceEquiv(initStyle)) {\n\t\t\t\tinitStyle = SCE_COFFEESCRIPT_DEFAULT;\n\t\t\t}\n\t\t}\n\t\tstartPos = back;\n\t}\n\n\tStyleContext sc(startPos, endPos - startPos, initStyle, styler);\n\n\tfor (; sc.More();) {\n\n\t\tif (sc.atLineStart) {\n\t\t\t// Reset states to beginning of colourise so no surprises\n\t\t\t// if different sets of lines lexed.\n\t\t\tvisibleChars = 0;\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_COFFEESCRIPT_OPERATOR:\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_NUMBER:\n\t\t\t\t// We accept almost anything because of hex. and number suffixes\n\t\t\t\tif (!setWord.Contains(sc.ch) || sc.Match('.', '.')) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_IDENTIFIER:\n\t\t\t\tif (!setWord.Contains(sc.ch) || (sc.ch == '.') || (sc.ch == '$')) {\n\t\t\t\t\tchar s[1000];\n\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_COFFEESCRIPT_WORD);\n\t\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_COFFEESCRIPT_WORD2);\n\t\t\t\t\t} else if (keywords4.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_COFFEESCRIPT_GLOBALCLASS);\n\t\t\t\t\t} else if (sc.LengthCurrent() > 0 && s[0] == '@') {\n\t\t\t\t\t\tsc.ChangeState(SCE_COFFEESCRIPT_INSTANCEPROPERTY);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_WORD:\n\t\t\tcase SCE_COFFEESCRIPT_WORD2:\n\t\t\tcase SCE_COFFEESCRIPT_GLOBALCLASS:\n\t\t\tcase SCE_COFFEESCRIPT_INSTANCEPROPERTY:\n\t\t\t\tif (!setWord.Contains(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_STRING:\n\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tsc.ForwardSetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t} else if (sc.ch == '#' && sc.chNext == '{' && inner_string_count < INNER_STRINGS_MAX_COUNT) {\n\t\t\t\t\t// process interpolated code #{ ... }\n\t\t\t\t\tenterInnerExpression(inner_string_types,\n\t\t\t\t\t inner_expn_brace_counts,\n\t\t\t\t\t inner_string_count,\n\t\t\t\t\t sc.state,\n\t\t\t\t\t brace_counts);\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_OPERATOR);\n\t\t\t\t\tsc.ForwardSetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_CHARACTER:\n\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\tsc.ForwardSetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_REGEX:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t} else if (sc.ch == '/') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\twhile ((sc.ch < 0x80) && islower(sc.ch))\n\t\t\t\t\t\tsc.Forward(); // gobble regex flags\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\t// Gobble up the quoted character\n\t\t\t\t\tif (sc.chNext == '\\\\' || sc.chNext == '/') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_STRINGEOL:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_COMMENTBLOCK:\n\t\t\t\tif (sc.Match(\"###\")) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_VERBOSE_REGEX:\n\t\t\t\tif (sc.Match(\"///\")) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_COFFEESCRIPT_DEFAULT);\n\t\t\t\t} else if (sc.Match('#')) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_VERBOSE_REGEX_COMMENT);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_COFFEESCRIPT_VERBOSE_REGEX_COMMENT:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_VERBOSE_REGEX);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_COFFEESCRIPT_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_NUMBER);\n\t\t\t} else if (setWordStart.Contains(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_IDENTIFIER);\n\t\t\t} else if (sc.Match(\"///\")) {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_VERBOSE_REGEX);\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.ch == '/'\n\t\t\t\t && (setOKBeforeRE.Contains(chPrevNonWhite)\n\t\t\t\t || followsKeyword(sc, styler))\n\t\t\t\t && (!setCouldBePostOp.Contains(chPrevNonWhite)\n\t\t\t\t || !FollowsPostfixOperator(sc, styler))) {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_REGEX);\t// JavaScript's RegEx\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_CHARACTER);\n\t\t\t} else if (sc.ch == '#') {\n\t\t\t\tif (sc.Match(\"###\")) {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_COMMENTBLOCK);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_COMMENTLINE);\n\t\t\t\t}\n\t\t\t} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_COFFEESCRIPT_OPERATOR);\n\t\t\t\t// Handle '..' and '...' operators correctly.\n\t\t\t\tif (sc.ch == '.') {\n\t\t\t\t\tfor (int i = 0; i < 2 && sc.chNext == '.'; i++, sc.Forward()) ;\n\t\t\t\t} else if (sc.ch == '{') {\n\t\t\t\t\t++brace_counts;\n\t\t\t\t} else if (sc.ch == '}' && --brace_counts <= 0 && inner_string_count > 0) {\n\t\t\t\t\t// Return to previous state before #{ ... }\n\t\t\t\t\tsc.ForwardSetState(exitInnerExpression(inner_string_types,\n\t\t\t\t\t inner_expn_brace_counts,\n\t\t\t\t\t inner_string_count,\n\t\t\t\t\t brace_counts));\n\t\t\t\t\tcontinue; // skip sc.Forward() at loop end\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t\tif (!IsASpace(sc.ch) && !IsSpaceEquiv(sc.state)) {\n\t\t\tchPrevNonWhite = sc.ch;\n\t\t\tvisibleChars++;\n\t\t}\n\t\tsc.Forward();\n\t}\n\tsc.Complete();\n}\n\nstatic bool IsCommentLine(Sci_Position line, Accessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tchar ch = styler[i];\n\t\tif (ch == '#')\n\t\t\treturn true;\n\t\telse if (ch != ' ' && ch != '\\t')\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nstatic void FoldCoffeeScriptDoc(Sci_PositionU startPos, Sci_Position length, int,\n\t\t\t\tWordList *[], Accessor &styler) {\n\t// A simplified version of FoldPyDoc\n\tconst Sci_Position maxPos = startPos + length;\n\tconst Sci_Position maxLines = styler.GetLine(maxPos - 1); // Requested last line\n\tconst Sci_Position docLines = styler.GetLine(styler.Length() - 1); // Available last line\n\n\t// property fold.coffeescript.comment\n\t// Set to 1 to allow folding of comment blocks in CoffeeScript.\n\tconst bool foldComment = styler.GetPropertyInt(\"fold.coffeescript.comment\") != 0;\n\n\tconst bool foldCompact = styler.GetPropertyInt(\"fold.compact\") != 0;\n\n\t// Backtrack to previous non-blank line so we can determine indent level\n\t// for any white space lines\n\t// and so we can fix any preceding fold level (which is why we go back\n\t// at least one line in all cases)\n\tint spaceFlags = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint indentCurrent = styler.IndentAmount(lineCurrent, &spaceFlags, NULL);\n\twhile (lineCurrent > 0) {\n\t\tlineCurrent--;\n\t\tindentCurrent = styler.IndentAmount(lineCurrent, &spaceFlags, NULL);\n\t\tif (!(indentCurrent & SC_FOLDLEVELWHITEFLAG)\n\t\t && !IsCommentLine(lineCurrent, styler))\n\t\t\tbreak;\n\t}\n\tint indentCurrentLevel = indentCurrent & SC_FOLDLEVELNUMBERMASK;\n\n\t// Set up initial loop state\n\tint prevComment = 0;\n\tif (lineCurrent >= 1)\n\t\tprevComment = foldComment && IsCommentLine(lineCurrent - 1, styler);\n\n\t// Process all characters to end of requested range\n\t// or comment that hangs over the end of the range. Cap processing in all cases\n\t// to end of document (in case of comment at end).\n\twhile ((lineCurrent <= docLines) && ((lineCurrent <= maxLines) || prevComment)) {\n\n\t\t// Gather info\n\t\tint lev = indentCurrent;\n\t\tSci_Position lineNext = lineCurrent + 1;\n\t\tint indentNext = indentCurrent;\n\t\tif (lineNext <= docLines) {\n\t\t\t// Information about next line is only available if not at end of document\n\t\t\tindentNext = styler.IndentAmount(lineNext, &spaceFlags, NULL);\n\t\t}\n\t\tconst int comment = foldComment && IsCommentLine(lineCurrent, styler);\n\t\tconst int comment_start = (comment && !prevComment && (lineNext <= docLines) &&\n\t\t IsCommentLine(lineNext, styler) && (lev > SC_FOLDLEVELBASE));\n\t\tconst int comment_continue = (comment && prevComment);\n\t\tif (!comment)\n\t\t\tindentCurrentLevel = indentCurrent & SC_FOLDLEVELNUMBERMASK;\n\t\tif (indentNext & SC_FOLDLEVELWHITEFLAG)\n\t\t\tindentNext = SC_FOLDLEVELWHITEFLAG | indentCurrentLevel;\n\n\t\tif (comment_start) {\n\t\t\t// Place fold point at start of a block of comments\n\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t} else if (comment_continue) {\n\t\t\t// Add level to rest of lines in the block\n\t\t\tlev = lev + 1;\n\t\t}\n\n\t\t// Skip past any blank lines for next indent level info; we skip also\n\t\t// comments (all comments, not just those starting in column 0)\n\t\t// which effectively folds them into surrounding code rather\n\t\t// than screwing up folding.\n\n\t\twhile ((lineNext < docLines) &&\n\t\t ((indentNext & SC_FOLDLEVELWHITEFLAG) ||\n\t\t (lineNext <= docLines && IsCommentLine(lineNext, styler)))) {\n\n\t\t\tlineNext++;\n\t\t\tindentNext = styler.IndentAmount(lineNext, &spaceFlags, NULL);\n\t\t}\n\n\t\tconst int levelAfterComments = indentNext & SC_FOLDLEVELNUMBERMASK;\n\t\tconst int levelBeforeComments = std::max(indentCurrentLevel,levelAfterComments);\n\n\t\t// Now set all the indent levels on the lines we skipped\n\t\t// Do this from end to start. Once we encounter one line\n\t\t// which is indented more than the line after the end of\n\t\t// the comment-block, use the level of the block before\n\n\t\tSci_Position skipLine = lineNext;\n\t\tint skipLevel = levelAfterComments;\n\n\t\twhile (--skipLine > lineCurrent) {\n\t\t\tint skipLineIndent = styler.IndentAmount(skipLine, &spaceFlags, NULL);\n\n\t\t\tif (foldCompact) {\n\t\t\t\tif ((skipLineIndent & SC_FOLDLEVELNUMBERMASK) > levelAfterComments)\n\t\t\t\t\tskipLevel = levelBeforeComments;\n\n\t\t\t\tint whiteFlag = skipLineIndent & SC_FOLDLEVELWHITEFLAG;\n\n\t\t\t\tstyler.SetLevel(skipLine, skipLevel | whiteFlag);\n\t\t\t} else {\n\t\t\t\tif ((skipLineIndent & SC_FOLDLEVELNUMBERMASK) > levelAfterComments &&\n\t\t\t\t\t!(skipLineIndent & SC_FOLDLEVELWHITEFLAG) &&\n\t\t\t\t\t!IsCommentLine(skipLine, styler))\n\t\t\t\t\tskipLevel = levelBeforeComments;\n\n\t\t\t\tstyler.SetLevel(skipLine, skipLevel);\n\t\t\t}\n\t\t}\n\n\t\t// Set fold header on non-comment line\n\t\tif (!comment && !(indentCurrent & SC_FOLDLEVELWHITEFLAG)) {\n\t\t\tif ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext & SC_FOLDLEVELNUMBERMASK))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t}\n\n\t\t// Keep track of block comment state of previous line\n\t\tprevComment = comment_start || comment_continue;\n\n\t\t// Set fold level for this line and move to next line\n\t\tstyler.SetLevel(lineCurrent, lev);\n\t\tindentCurrent = indentNext;\n\t\tlineCurrent = lineNext;\n\t}\n}\n\nstatic const char *const csWordLists[] = {\n \"Keywords\",\n \"Secondary keywords\",\n \"Unused\",\n \"Global classes\",\n 0,\n};\n\nextern const LexerModule lmCoffeeScript(SCLEX_COFFEESCRIPT, ColouriseCoffeeScriptDoc, \"coffeescript\", FoldCoffeeScriptDoc, csWordLists);\n" }, { "path": "lexers/LexConf.cxx", "content": "// Scintilla source code edit control\n/** @file LexConf.cxx\n ** Lexer for Apache Configuration Files.\n **\n ** First working version contributed by Ahmad Zawawi on October 28, 2000.\n ** i created this lexer because i needed something pretty when dealing\n ** when Apache Configuration files...\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic void ColouriseConfDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *keywordLists[], Accessor &styler)\n{\n\tint state = SCE_CONF_DEFAULT;\n\tchar chNext = styler[startPos];\n\tSci_Position lengthDoc = startPos + length;\n\t// create a buffer large enough to take the largest chunk...\n\tchar *buffer = new char[length+1];\n\tSci_Position bufferCount = 0;\n\n\t// this assumes that we have 2 keyword list in conf.properties\n\tWordList &directives = *keywordLists[0];\n\tWordList ¶ms = *keywordLists[1];\n\n\t// go through all provided text segment\n\t// using the hand-written state machine shown below\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\tfor (Sci_Position i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif (styler.IsLeadByte(ch)) {\n\t\t\tchNext = styler.SafeGetCharAt(i + 2);\n\t\t\ti++;\n\t\t\tcontinue;\n\t\t}\n\t\tswitch(state) {\n\t\t\tcase SCE_CONF_DEFAULT:\n\t\t\t\tif( ch == '\\n' || ch == '\\r' || ch == '\\t' || ch == ' ') {\n\t\t\t\t\t// whitespace is simply ignored here...\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_DEFAULT);\n\t\t\t\t\tbreak;\n\t\t\t\t} else if( ch == '#' ) {\n\t\t\t\t\t// signals the start of a comment...\n\t\t\t\t\tstate = SCE_CONF_COMMENT;\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_COMMENT);\n\t\t\t\t} else if( ch == '.' /*|| ch == '/'*/) {\n\t\t\t\t\t// signals the start of a file...\n\t\t\t\t\tstate = SCE_CONF_EXTENSION;\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_EXTENSION);\n\t\t\t\t} else if( ch == '\"') {\n\t\t\t\t\tstate = SCE_CONF_STRING;\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_STRING);\n\t\t\t\t} else if( IsASCII(ch) && ispunct(ch) ) {\n\t\t\t\t\t// signals an operator...\n\t\t\t\t\t// no state jump necessary for this\n\t\t\t\t\t// simple case...\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_OPERATOR);\n\t\t\t\t} else if( IsASCII(ch) && isalpha(ch) ) {\n\t\t\t\t\t// signals the start of an identifier\n\t\t\t\t\tbufferCount = 0;\n\t\t\t\t\tbuffer[bufferCount++] = static_cast(tolower(ch));\n\t\t\t\t\tstate = SCE_CONF_IDENTIFIER;\n\t\t\t\t} else if( IsASCII(ch) && isdigit(ch) ) {\n\t\t\t\t\t// signals the start of a number\n\t\t\t\t\tbufferCount = 0;\n\t\t\t\t\tbuffer[bufferCount++] = ch;\n\t\t\t\t\t//styler.ColourTo(i,SCE_CONF_NUMBER);\n\t\t\t\t\tstate = SCE_CONF_NUMBER;\n\t\t\t\t} else {\n\t\t\t\t\t// style it the default style..\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_CONF_COMMENT:\n\t\t\t\t// if we find a newline here,\n\t\t\t\t// we simply go to default state\n\t\t\t\t// else continue to work on it...\n\t\t\t\tif( ch == '\\n' || ch == '\\r' ) {\n\t\t\t\t\tstate = SCE_CONF_DEFAULT;\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_COMMENT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_CONF_EXTENSION:\n\t\t\t\t// if we find a non-alphanumeric char,\n\t\t\t\t// we simply go to default state\n\t\t\t\t// else we're still dealing with an extension...\n\t\t\t\tif( (IsASCII(ch) && isalnum(ch)) || (ch == '_') ||\n\t\t\t\t\t(ch == '-') || (ch == '$') ||\n\t\t\t\t\t(ch == '/') || (ch == '.') || (ch == '*') )\n\t\t\t\t{\n\t\t\t\t\tstyler.ColourTo(i,SCE_CONF_EXTENSION);\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_CONF_DEFAULT;\n\t\t\t\t\tchNext = styler[i--];\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_CONF_STRING:\n\t\t\t\t// if we find the end of a string char, we simply go to default state\n\t\t\t\t// else we're still dealing with an string...\n\t\t\t\tif( (ch == '\"' && styler.SafeGetCharAt(i-1)!='\\\\') || (ch == '\\n') || (ch == '\\r') ) {\n\t\t\t\t\tstate = SCE_CONF_DEFAULT;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i,SCE_CONF_STRING);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_CONF_IDENTIFIER:\n\t\t\t\t// stay in CONF_IDENTIFIER state until we find a non-alphanumeric\n\t\t\t\tif( (IsASCII(ch) && isalnum(ch)) || (ch == '_') || (ch == '-') || (ch == '/') || (ch == '$') || (ch == '.') || (ch == '*')) {\n\t\t\t\t\tbuffer[bufferCount++] = static_cast(tolower(ch));\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_CONF_DEFAULT;\n\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\n\t\t\t\t\t// check if the buffer contains a keyword, and highlight it if it is a keyword...\n\t\t\t\t\tif(directives.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_CONF_DIRECTIVE );\n\t\t\t\t\t} else if(params.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_CONF_PARAMETER );\n\t\t\t\t\t} else if(strchr(buffer,'/') || strchr(buffer,'.')) {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_CONF_EXTENSION);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_CONF_DEFAULT);\n\t\t\t\t\t}\n\n\t\t\t\t\t// push back the faulty character\n\t\t\t\t\tchNext = styler[i--];\n\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_CONF_NUMBER:\n\t\t\t\t// stay in CONF_NUMBER state until we find a non-numeric\n\t\t\t\tif( (IsASCII(ch) && isdigit(ch)) || ch == '.') {\n\t\t\t\t\tbuffer[bufferCount++] = ch;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_CONF_DEFAULT;\n\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\n\t\t\t\t\t// Colourize here...\n\t\t\t\t\tif( strchr(buffer,'.') ) {\n\t\t\t\t\t\t// it is an IP address...\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_CONF_IP);\n\t\t\t\t\t} else {\n\t\t\t\t\t\t// normal number\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_CONF_NUMBER);\n\t\t\t\t\t}\n\n\t\t\t\t\t// push back a character\n\t\t\t\t\tchNext = styler[i--];\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t}\n\t}\n\tdelete []buffer;\n}\n\nstatic const char * const confWordListDesc[] = {\n\t\"Directives\",\n\t\"Parameters\",\n\t0\n};\n\nextern const LexerModule lmConf(SCLEX_CONF, ColouriseConfDoc, \"conf\", 0, confWordListDesc);\n" }, { "path": "lexers/LexCrontab.cxx", "content": "// Scintilla source code edit control\n/** @file LexCrontab.cxx\n ** Lexer to use with extended crontab files used by a powerful\n ** Windows scheduler/event monitor/automation manager nnCron.\n ** (http://nemtsev.eserv.ru/)\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic void ColouriseNncrontabDoc(Sci_PositionU startPos, Sci_Position length, int, WordList\n*keywordLists[], Accessor &styler)\n{\n\tint state = SCE_NNCRONTAB_DEFAULT;\n\tchar chNext = styler[startPos];\n\tSci_Position lengthDoc = startPos + length;\n\t// create a buffer large enough to take the largest chunk...\n\tchar *buffer = new char[length+1];\n\tSci_Position bufferCount = 0;\n\t// used when highliting environment variables inside quoted string:\n\tbool insideString = false;\n\n\t// this assumes that we have 3 keyword list in conf.properties\n\tWordList §ion = *keywordLists[0];\n\tWordList &keyword = *keywordLists[1];\n\tWordList &modifier = *keywordLists[2];\n\n\t// go through all provided text segment\n\t// using the hand-written state machine shown below\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\tfor (Sci_Position i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif (styler.IsLeadByte(ch)) {\n\t\t\tchNext = styler.SafeGetCharAt(i + 2);\n\t\t\ti++;\n\t\t\tcontinue;\n\t\t}\n\t\tswitch(state) {\n\t\t\tcase SCE_NNCRONTAB_DEFAULT:\n\t\t\t\tif( ch == '\\n' || ch == '\\r' || ch == '\\t' || ch == ' ') {\n\t\t\t\t\t// whitespace is simply ignored here...\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_DEFAULT);\n\t\t\t\t\tbreak;\n\t\t\t\t} else if( ch == '#' && styler.SafeGetCharAt(i+1) == '(') {\n\t\t\t\t\t// signals the start of a task...\n\t\t\t\t\tstate = SCE_NNCRONTAB_TASK;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_TASK);\n\t\t\t\t}\n\t\t\t\t else if( ch == '\\\\' && (styler.SafeGetCharAt(i+1) == ' ' ||\n\t\t\t\t\t\t\t\t\t\t styler.SafeGetCharAt(i+1) == '\\t')) {\n\t\t\t\t\t// signals the start of an extended comment...\n\t\t\t\t\tstate = SCE_NNCRONTAB_COMMENT;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_COMMENT);\n\t\t\t\t} else if( ch == '#' ) {\n\t\t\t\t\t// signals the start of a plain comment...\n\t\t\t\t\tstate = SCE_NNCRONTAB_COMMENT;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_COMMENT);\n\t\t\t\t} else if( ch == ')' && styler.SafeGetCharAt(i+1) == '#') {\n\t\t\t\t\t// signals the end of a task...\n\t\t\t\t\tstate = SCE_NNCRONTAB_TASK;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_TASK);\n\t\t\t\t} else if( ch == '\"') {\n\t\t\t\t\tstate = SCE_NNCRONTAB_STRING;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_STRING);\n\t\t\t\t} else if( ch == '%') {\n\t\t\t\t\t// signals environment variables\n\t\t\t\t\tstate = SCE_NNCRONTAB_ENVIRONMENT;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_ENVIRONMENT);\n\t\t\t\t} else if( ch == '<' && styler.SafeGetCharAt(i+1) == '%') {\n\t\t\t\t\t// signals environment variables\n\t\t\t\t\tstate = SCE_NNCRONTAB_ENVIRONMENT;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_ENVIRONMENT);\n\t\t\t\t} else if( ch == '*' ) {\n\t\t\t\t\t// signals an asterisk\n\t\t\t\t\t// no state jump necessary for this simple case...\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_ASTERISK);\n\t\t\t\t} else if( (IsASCII(ch) && isalpha(ch)) || ch == '<' ) {\n\t\t\t\t\t// signals the start of an identifier\n\t\t\t\t\tbufferCount = 0;\n\t\t\t\t\tbuffer[bufferCount++] = ch;\n\t\t\t\t\tstate = SCE_NNCRONTAB_IDENTIFIER;\n\t\t\t\t} else if( IsASCII(ch) && isdigit(ch) ) {\n\t\t\t\t\t// signals the start of a number\n\t\t\t\t\tbufferCount = 0;\n\t\t\t\t\tbuffer[bufferCount++] = ch;\n\t\t\t\t\tstate = SCE_NNCRONTAB_NUMBER;\n\t\t\t\t} else {\n\t\t\t\t\t// style it the default style..\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_NNCRONTAB_COMMENT:\n\t\t\t\t// if we find a newline here,\n\t\t\t\t// we simply go to default state\n\t\t\t\t// else continue to work on it...\n\t\t\t\tif( ch == '\\n' || ch == '\\r' ) {\n\t\t\t\t\tstate = SCE_NNCRONTAB_DEFAULT;\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_COMMENT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_NNCRONTAB_TASK:\n\t\t\t\t// if we find a newline here,\n\t\t\t\t// we simply go to default state\n\t\t\t\t// else continue to work on it...\n\t\t\t\tif( ch == '\\n' || ch == '\\r' ) {\n\t\t\t\t\tstate = SCE_NNCRONTAB_DEFAULT;\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_TASK);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_NNCRONTAB_STRING:\n\t\t\t\tif( ch == '%' ) {\n\t\t\t\t\tstate = SCE_NNCRONTAB_ENVIRONMENT;\n\t\t\t\t\tinsideString = true;\n\t\t\t\t\tstyler.ColourTo(i-1,SCE_NNCRONTAB_STRING);\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\t// if we find the end of a string char, we simply go to default state\n\t\t\t\t// else we're still dealing with an string...\n\t\t\t\tif( (ch == '\"' && styler.SafeGetCharAt(i-1)!='\\\\') ||\n\t\t\t\t\t(ch == '\\n') || (ch == '\\r') ) {\n\t\t\t\t\tstate = SCE_NNCRONTAB_DEFAULT;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_STRING);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_NNCRONTAB_ENVIRONMENT:\n\t\t\t\t// if we find the end of a string char, we simply go to default state\n\t\t\t\t// else we're still dealing with an string...\n\t\t\t\tif( ch == '%' && insideString ) {\n\t\t\t\t\tstate = SCE_NNCRONTAB_STRING;\n\t\t\t\t\tinsideString = false;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tif( (ch == '%' && styler.SafeGetCharAt(i-1)!='\\\\')\n\t\t\t\t\t|| (ch == '\\n') || (ch == '\\r') || (ch == '>') ) {\n\t\t\t\t\tstate = SCE_NNCRONTAB_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_ENVIRONMENT);\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i+1,SCE_NNCRONTAB_ENVIRONMENT);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_NNCRONTAB_IDENTIFIER:\n\t\t\t\t// stay in CONF_IDENTIFIER state until we find a non-alphanumeric\n\t\t\t\tif( (IsASCII(ch) && isalnum(ch)) || (ch == '_') || (ch == '-') || (ch == '/') ||\n\t\t\t\t\t(ch == '$') || (ch == '.') || (ch == '<') || (ch == '>') ||\n\t\t\t\t\t(ch == '@') ) {\n\t\t\t\t\tbuffer[bufferCount++] = ch;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_NNCRONTAB_DEFAULT;\n\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\n\t\t\t\t\t// check if the buffer contains a keyword,\n\t\t\t\t\t// and highlight it if it is a keyword...\n\t\t\t\t\tif(section.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i,SCE_NNCRONTAB_SECTION );\n\t\t\t\t\t} else if(keyword.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_NNCRONTAB_KEYWORD );\n\t\t\t\t\t} // else if(strchr(buffer,'/') || strchr(buffer,'.')) {\n\t\t\t\t\t//\tstyler.ColourTo(i-1,SCE_NNCRONTAB_EXTENSION);\n\t\t\t\t\t// }\n\t\t\t\t\t else if(modifier.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_NNCRONTAB_MODIFIER );\n\t\t\t\t\t }\telse {\n\t\t\t\t\t\tstyler.ColourTo(i-1,SCE_NNCRONTAB_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\t// push back the faulty character\n\t\t\t\t\tchNext = styler[i--];\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_NNCRONTAB_NUMBER:\n\t\t\t\t// stay in CONF_NUMBER state until we find a non-numeric\n\t\t\t\tif( IsASCII(ch) && isdigit(ch) /* || ch == '.' */ ) {\n\t\t\t\t\tbuffer[bufferCount++] = ch;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_NNCRONTAB_DEFAULT;\n\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\t\t\t\t\t// Colourize here... (normal number)\n\t\t\t\t\tstyler.ColourTo(i-1,SCE_NNCRONTAB_NUMBER);\n\t\t\t\t\t// push back a character\n\t\t\t\t\tchNext = styler[i--];\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\t}\n\tdelete []buffer;\n}\n\nstatic const char * const cronWordListDesc[] = {\n\t\"Section keywords and Forth words\",\n\t\"nnCrontab keywords\",\n\t\"Modifiers\",\n\t0\n};\n\nextern const LexerModule lmNncrontab(SCLEX_NNCRONTAB, ColouriseNncrontabDoc, \"nncrontab\", 0, cronWordListDesc);\n" }, { "path": "lexers/LexCsound.cxx", "content": "// Scintilla source code edit control\n/** @file LexCsound.cxx\n ** Lexer for Csound (Orchestra & Score)\n ** Written by Georg Ritter - \n **/\n// Copyright 1998-2003 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '.' ||\n\t\tch == '_' || ch == '?');\n}\n\nstatic inline bool IsAWordStart(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_' || ch == '.' ||\n\t\tch == '%' || ch == '@' || ch == '$' || ch == '?');\n}\n\nstatic inline bool IsCsoundOperator(char ch) {\n\tif (IsASCII(ch) && isalnum(ch))\n\t\treturn false;\n\t// '.' left out as it is used to make up numbers\n\tif (ch == '*' || ch == '/' || ch == '-' || ch == '+' ||\n\t\tch == '(' || ch == ')' || ch == '=' || ch == '^' ||\n\t\tch == '[' || ch == ']' || ch == '<' || ch == '&' ||\n\t\tch == '>' || ch == ',' || ch == '|' || ch == '~' ||\n\t\tch == '%' || ch == ':')\n\t\treturn true;\n\treturn false;\n}\n\nstatic void ColouriseCsoundDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n\t\t\t\tAccessor &styler) {\n\n\tWordList &opcode = *keywordlists[0];\n\tWordList &headerStmt = *keywordlists[1];\n\tWordList &otherKeyword = *keywordlists[2];\n\n\t// Do not leak onto next line\n\tif (initStyle == SCE_CSOUND_STRINGEOL)\n\t\tinitStyle = SCE_CSOUND_DEFAULT;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward())\n\t{\n\t\t// Handle line continuation generically.\n\t\tif (sc.ch == '\\\\') {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_CSOUND_OPERATOR) {\n\t\t\tif (!IsCsoundOperator(static_cast(sc.ch))) {\n\t\t\t sc.SetState(SCE_CSOUND_DEFAULT);\n\t\t\t}\n\t\t}else if (sc.state == SCE_CSOUND_NUMBER) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_CSOUND_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_CSOUND_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch) ) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\n\t\t\t\tif (opcode.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_OPCODE);\n\t\t\t\t} else if (headerStmt.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_HEADERSTMT);\n\t\t\t\t} else if (otherKeyword.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_USERKEYWORD);\n\t\t\t\t} else if (s[0] == 'p') {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_PARAM);\n\t\t\t\t} else if (s[0] == 'a') {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_ARATE_VAR);\n\t\t\t\t} else if (s[0] == 'k') {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_KRATE_VAR);\n\t\t\t\t} else if (s[0] == 'i') { // covers both i-rate variables and i-statements\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_IRATE_VAR);\n\t\t\t\t} else if (s[0] == 'g') {\n\t\t\t\t\tsc.ChangeState(SCE_CSOUND_GLOBAL_VAR);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_CSOUND_DEFAULT);\n\t\t\t}\n\t\t}\n\t\telse if (sc.state == SCE_CSOUND_COMMENT ) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_CSOUND_DEFAULT);\n\t\t\t}\n\t\t}\n\t\telse if ((sc.state == SCE_CSOUND_ARATE_VAR) ||\n\t\t\t(sc.state == SCE_CSOUND_KRATE_VAR) ||\n\t\t(sc.state == SCE_CSOUND_IRATE_VAR)) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_CSOUND_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_CSOUND_DEFAULT) {\n\t\t\tif (sc.ch == ';'){\n\t\t\t\tsc.SetState(SCE_CSOUND_COMMENT);\n\t\t\t} else if (isdigit(sc.ch) || (sc.ch == '.' && isdigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_CSOUND_NUMBER);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_CSOUND_IDENTIFIER);\n\t\t\t} else if (IsCsoundOperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_CSOUND_OPERATOR);\n\t\t\t} else if (sc.ch == 'p') {\n\t\t\t\tsc.SetState(SCE_CSOUND_PARAM);\n\t\t\t} else if (sc.ch == 'a') {\n\t\t\t\tsc.SetState(SCE_CSOUND_ARATE_VAR);\n\t\t\t} else if (sc.ch == 'k') {\n\t\t\t\tsc.SetState(SCE_CSOUND_KRATE_VAR);\n\t\t\t} else if (sc.ch == 'i') { // covers both i-rate variables and i-statements\n\t\t\t\tsc.SetState(SCE_CSOUND_IRATE_VAR);\n\t\t\t} else if (sc.ch == 'g') {\n\t\t\t\tsc.SetState(SCE_CSOUND_GLOBAL_VAR);\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldCsoundInstruments(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, WordList *[],\n\t\tAccessor &styler) {\n\tSci_PositionU lengthDoc = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint stylePrev = 0;\n\tint styleNext = styler.StyleAt(startPos);\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif ((stylePrev != SCE_CSOUND_OPCODE) && (style == SCE_CSOUND_OPCODE)) {\n\t\t\tchar s[20];\n\t\t\tunsigned int j = 0;\n\t\t\twhile ((j < (sizeof(s) - 1)) && (iswordchar(styler[i + j]))) {\n\t\t\t\ts[j] = styler[i + j];\n\t\t\t\tj++;\n\t\t\t}\n\t\t\ts[j] = '\\0';\n\n\t\t\tif (strcmp(s, \"instr\") == 0)\n\t\t\t\tlevelCurrent++;\n\t\t\tif (strcmp(s, \"endin\") == 0)\n\t\t\t\tlevelCurrent--;\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t\tstylePrev = style;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\n\nstatic const char * const csoundWordListDesc[] = {\n\t\"Opcodes\",\n\t\"Header Statements\",\n\t\"User keywords\",\n\t0\n};\n\nextern const LexerModule lmCsound(SCLEX_CSOUND, ColouriseCsoundDoc, \"csound\", FoldCsoundInstruments, csoundWordListDesc);\n" }, { "path": "lexers/LexD.cxx", "content": "/** @file LexD.cxx\n ** Lexer for D.\n **\n ** Copyright (c) 2006 by Waldemar Augustyn \n ** Converted to lexer object and added further folding features/properties by \"Udo Lechner\" \n **/\n// Copyright 1998-2005 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\n/* Nested comments require keeping the value of the nesting level for every\n position in the document. But since scintilla always styles line by line,\n we only need to store one value per line. The non-negative number indicates\n nesting level at the end of the line.\n*/\n\n// Underscore, letter, digit and universal alphas from C99 Appendix D.\n\nstatic bool IsWordStart(int ch) {\n\treturn (IsASCII(ch) && (isalpha(ch) || ch == '_')) || !IsASCII(ch);\n}\n\nstatic bool IsWord(int ch) {\n\treturn (IsASCII(ch) && (isalnum(ch) || ch == '_')) || !IsASCII(ch);\n}\n\nstatic bool IsDoxygen(int ch) {\n\tif (IsASCII(ch) && islower(ch))\n\t\treturn true;\n\tif (ch == '$' || ch == '@' || ch == '\\\\' ||\n\t\tch == '&' || ch == '#' || ch == '<' || ch == '>' ||\n\t\tch == '{' || ch == '}' || ch == '[' || ch == ']')\n\t\treturn true;\n\treturn false;\n}\n\nstatic bool IsStringSuffix(int ch) {\n\treturn ch == 'c' || ch == 'w' || ch == 'd';\n}\n\nstatic bool IsStreamCommentStyle(int style) {\n\treturn style == SCE_D_COMMENT ||\n\t\tstyle == SCE_D_COMMENTDOC ||\n\t\tstyle == SCE_D_COMMENTDOCKEYWORD ||\n\t\tstyle == SCE_D_COMMENTDOCKEYWORDERROR;\n}\n\n// An individual named option for use in an OptionSet\n\n// Options used for LexerD\nstruct OptionsD {\n\tbool fold;\n\tbool foldSyntaxBased;\n\tbool foldComment;\n\tbool foldCommentMultiline;\n\tbool foldCommentExplicit;\n\tstd::string foldExplicitStart;\n\tstd::string foldExplicitEnd;\n\tbool foldExplicitAnywhere;\n\tbool foldCompact;\n\tint foldAtElseInt;\n\tbool foldAtElse;\n\tOptionsD() {\n\t\tfold = false;\n\t\tfoldSyntaxBased = true;\n\t\tfoldComment = false;\n\t\tfoldCommentMultiline = true;\n\t\tfoldCommentExplicit = true;\n\t\tfoldExplicitStart = \"\";\n\t\tfoldExplicitEnd = \"\";\n\t\tfoldExplicitAnywhere = false;\n\t\tfoldCompact = true;\n\t\tfoldAtElseInt = -1;\n\t\tfoldAtElse = false;\n\t}\n};\n\nstatic const char * const dWordLists[] = {\n\t\t\t\"Primary keywords and identifiers\",\n\t\t\t\"Secondary keywords and identifiers\",\n\t\t\t\"Documentation comment keywords\",\n\t\t\t\"Type definitions and aliases\",\n\t\t\t\"Keywords 5\",\n\t\t\t\"Keywords 6\",\n\t\t\t\"Keywords 7\",\n\t\t\t0,\n\t\t};\n\nstruct OptionSetD : public OptionSet {\n\tOptionSetD() {\n\t\tDefineProperty(\"fold\", &OptionsD::fold);\n\n\t\tDefineProperty(\"fold.d.syntax.based\", &OptionsD::foldSyntaxBased,\n\t\t\t\"Set this property to 0 to disable syntax based folding.\");\n\n\t\tDefineProperty(\"fold.comment\", &OptionsD::foldComment);\n\n\t\tDefineProperty(\"fold.d.comment.multiline\", &OptionsD::foldCommentMultiline,\n\t\t\t\"Set this property to 0 to disable folding multi-line comments when fold.comment=1.\");\n\n\t\tDefineProperty(\"fold.d.comment.explicit\", &OptionsD::foldCommentExplicit,\n\t\t\t\"Set this property to 0 to disable folding explicit fold points when fold.comment=1.\");\n\n\t\tDefineProperty(\"fold.d.explicit.start\", &OptionsD::foldExplicitStart,\n\t\t\t\"The string to use for explicit fold start points, replacing the standard //{.\");\n\n\t\tDefineProperty(\"fold.d.explicit.end\", &OptionsD::foldExplicitEnd,\n\t\t\t\"The string to use for explicit fold end points, replacing the standard //}.\");\n\n\t\tDefineProperty(\"fold.d.explicit.anywhere\", &OptionsD::foldExplicitAnywhere,\n\t\t\t\"Set this property to 1 to enable explicit fold points anywhere, not just in line comments.\");\n\n\t\tDefineProperty(\"fold.compact\", &OptionsD::foldCompact);\n\n\t\tDefineProperty(\"lexer.d.fold.at.else\", &OptionsD::foldAtElseInt,\n\t\t\t\"This option enables D folding on a \\\"} else {\\\" line of an if statement.\");\n\n\t\tDefineProperty(\"fold.at.else\", &OptionsD::foldAtElse);\n\n\t\tDefineWordListSets(dWordLists);\n\t}\n};\n\nclass LexerD : public DefaultLexer {\n\tbool caseSensitive;\n\tWordList keywords;\n\tWordList keywords2;\n\tWordList keywords3;\n\tWordList keywords4;\n\tWordList keywords5;\n\tWordList keywords6;\n\tWordList keywords7;\n\tOptionsD options;\n\tOptionSetD osD;\npublic:\n\tLexerD(bool caseSensitive_) :\n\t\tDefaultLexer(\"D\", SCLEX_D),\n\t\tcaseSensitive(caseSensitive_) {\n\t}\n\tvirtual ~LexerD() {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char * SCI_METHOD PropertyNames() override {\n\t\treturn osD.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osD.PropertyType(name);\n\t}\n\tconst char * SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osD.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osD.PropertyGet(key);\n\t}\n\tconst char * SCI_METHOD DescribeWordListSets() override {\n\t\treturn osD.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid * SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn 0;\n\t}\n\n\tstatic ILexer5 *LexerFactoryD() {\n\t\treturn new LexerD(true);\n\t}\n};\n\nSci_Position SCI_METHOD LexerD::PropertySet(const char *key, const char *val) {\n\tif (osD.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerD::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = 0;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywords2;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywords3;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywords4;\n\t\tbreak;\n\tcase 4:\n\t\twordListN = &keywords5;\n\t\tbreak;\n\tcase 5:\n\t\twordListN = &keywords6;\n\t\tbreak;\n\tcase 6:\n\t\twordListN = &keywords7;\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tWordList wlNew;\n\t\twlNew.Set(wl);\n\t\tif (*wordListN != wlNew) {\n\t\t\twordListN->Set(wl);\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerD::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\tint styleBeforeDCKeyword = SCE_D_DEFAULT;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tSci_Position curLine = styler.GetLine(startPos);\n\tint curNcLevel = curLine > 0? styler.GetLineState(curLine-1): 0;\n\tbool numFloat = false; // Float literals have '+' and '-' signs\n\tbool numHex = false;\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.atLineStart) {\n\t\t\tcurLine = styler.GetLine(sc.currentPos);\n\t\t\tstyler.SetLineState(curLine, curNcLevel);\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_D_OPERATOR:\n\t\t\t\tsc.SetState(SCE_D_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_NUMBER:\n\t\t\t\t// We accept almost anything because of hex. and number suffixes\n\t\t\t\tif (IsASCII(sc.ch) && (isalnum(sc.ch) || sc.ch == '_')) {\n\t\t\t\t\tcontinue;\n\t\t\t\t} else if (sc.ch == '.' && sc.chNext != '.' && !numFloat) {\n\t\t\t\t\t// Don't parse 0..2 as number.\n\t\t\t\t\tnumFloat=true;\n\t\t\t\t\tcontinue;\n\t\t\t\t} else if ( ( sc.ch == '-' || sc.ch == '+' ) && (\t\t/*sign and*/\n\t\t\t\t\t( !numHex && ( sc.chPrev == 'e' || sc.chPrev == 'E' ) ) || /*decimal or*/\n\t\t\t\t\t( sc.chPrev == 'p' || sc.chPrev == 'P' ) ) ) {\t\t/*hex*/\n\t\t\t\t\t// Parse exponent sign in float literals: 2e+10 0x2e+10\n\t\t\t\t\tcontinue;\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_IDENTIFIER:\n\t\t\t\tif (!IsWord(sc.ch)) {\n\t\t\t\t\tchar s[1000];\n\t\t\t\t\tif (caseSensitive) {\n\t\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\t}\n\t\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_WORD);\n\t\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_WORD2);\n\t\t\t\t\t} else if (keywords4.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_TYPEDEF);\n\t\t\t\t\t} else if (keywords5.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_WORD5);\n\t\t\t\t\t} else if (keywords6.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_WORD6);\n\t\t\t\t\t} else if (keywords7.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_WORD7);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_COMMENT:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_COMMENTDOC:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '*') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = SCE_D_COMMENTDOC;\n\t\t\t\t\t\tsc.SetState(SCE_D_COMMENTDOCKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_COMMENTLINEDOC:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_D_DEFAULT);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '/' || sc.chPrev == '!') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = SCE_D_COMMENTLINEDOC;\n\t\t\t\t\t\tsc.SetState(SCE_D_COMMENTDOCKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_COMMENTDOCKEYWORD:\n\t\t\t\tif ((styleBeforeDCKeyword == SCE_D_COMMENTDOC) && sc.Match('*', '/')) {\n\t\t\t\t\tsc.ChangeState(SCE_D_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t} else if (!IsDoxygen(sc.ch)) {\n\t\t\t\t\tchar s[100];\n\t\t\t\t\tif (caseSensitive) {\n\t\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\t}\n\t\t\t\t\tif (!IsASpace(sc.ch) || !keywords3.InList(s + 1)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_D_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(styleBeforeDCKeyword);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_COMMENTNESTED:\n\t\t\t\tif (sc.Match('+', '/')) {\n\t\t\t\t\tif (curNcLevel > 0)\n\t\t\t\t\t\tcurNcLevel -= 1;\n\t\t\t\t\tcurLine = styler.GetLine(sc.currentPos);\n\t\t\t\t\tstyler.SetLineState(curLine, curNcLevel);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tif (curNcLevel == 0) {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.Match('/','+')) {\n\t\t\t\t\tcurNcLevel += 1;\n\t\t\t\t\tcurLine = styler.GetLine(sc.currentPos);\n\t\t\t\t\tstyler.SetLineState(curLine, curNcLevel);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_STRING:\n\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\"' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\"') {\n\t\t\t\t\tif(IsStringSuffix(sc.chNext))\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_CHARACTER:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_D_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\t// Char has no suffixes\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_STRINGEOL:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_STRINGB:\n\t\t\t\tif (sc.ch == '`') {\n\t\t\t\t\tif(IsStringSuffix(sc.chNext))\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_D_STRINGR:\n\t\t\t\tif (sc.ch == '\"') {\n\t\t\t\t\tif(IsStringSuffix(sc.chNext))\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_D_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_D_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_D_NUMBER);\n\t\t\t\tnumFloat = sc.ch == '.';\n\t\t\t\t// Remember hex literal\n\t\t\t\tnumHex = sc.ch == '0' && ( sc.chNext == 'x' || sc.chNext == 'X' );\n\t\t\t} else if ( (sc.ch == 'r' || sc.ch == 'x' || sc.ch == 'q')\n\t\t\t\t&& sc.chNext == '\"' ) {\n\t\t\t\t// Limited support for hex and delimited strings: parse as r\"\"\n\t\t\t\tsc.SetState(SCE_D_STRINGR);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (IsWordStart(sc.ch) || sc.ch == '$') {\n\t\t\t\tsc.SetState(SCE_D_IDENTIFIER);\n\t\t\t} else if (sc.Match('/','+')) {\n\t\t\t\tcurNcLevel += 1;\n\t\t\t\tcurLine = styler.GetLine(sc.currentPos);\n\t\t\t\tstyler.SetLineState(curLine, curNcLevel);\n\t\t\t\tsc.SetState(SCE_D_COMMENTNESTED);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tif (sc.Match(\"/**\") || sc.Match(\"/*!\")) { // Support of Qt/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_D_COMMENTDOC);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_D_COMMENT);\n\t\t\t\t}\n\t\t\t\tsc.Forward(); // Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\tif ((sc.Match(\"///\") && !sc.Match(\"////\")) || sc.Match(\"//!\"))\n\t\t\t\t\t// Support of Qt/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_D_COMMENTLINEDOC);\n\t\t\t\telse\n\t\t\t\t\tsc.SetState(SCE_D_COMMENTLINE);\n\t\t\t} else if (sc.ch == '\"') {\n\t\t\t\tsc.SetState(SCE_D_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_D_CHARACTER);\n\t\t\t} else if (sc.ch == '`') {\n\t\t\t\tsc.SetState(SCE_D_STRINGB);\n\t\t\t} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_D_OPERATOR);\n\t\t\t\tif (sc.ch == '.' && sc.chNext == '.') sc.Forward(); // Range operator\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n\n// Store both the current line's fold level and the next lines in the\n// level store to make it easy to pick up with each increment\n// and to make it possible to fiddle the current level for \"} else {\".\n\nvoid SCI_METHOD LexerD::Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\n\tif (!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelCurrent = styler.LevelAt(lineCurrent-1) >> 16;\n\tint levelMinCurrent = levelCurrent;\n\tint levelNext = levelCurrent;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\tbool foldAtElse = options.foldAtElseInt >= 0 ? options.foldAtElseInt != 0 : options.foldAtElse;\n\tconst bool userDefinedFoldMarkers = !options.foldExplicitStart.empty() && !options.foldExplicitEnd.empty();\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (options.foldComment && options.foldCommentMultiline && IsStreamCommentStyle(style)) {\n\t\t\tif (!IsStreamCommentStyle(stylePrev)) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (!IsStreamCommentStyle(styleNext) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (options.foldComment && options.foldCommentExplicit && ((style == SCE_D_COMMENTLINE) || options.foldExplicitAnywhere)) {\n\t\t\tif (userDefinedFoldMarkers) {\n\t\t\t\tif (styler.Match(i, options.foldExplicitStart.c_str())) {\n \t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (styler.Match(i, options.foldExplicitEnd.c_str())) {\n \t\t\t\t\tlevelNext--;\n \t\t\t\t}\n\t\t\t} else {\n\t\t\t\tif ((ch == '/') && (chNext == '/')) {\n\t\t\t\t\tchar chNext2 = styler.SafeGetCharAt(i + 2);\n\t\t\t\t\tif (chNext2 == '{') {\n\t\t\t\t\t\tlevelNext++;\n\t\t\t\t\t} else if (chNext2 == '}') {\n\t\t\t\t\t\tlevelNext--;\n\t\t\t\t\t}\n\t\t\t\t}\n \t\t\t}\n \t\t}\n\t\tif (options.foldSyntaxBased && (style == SCE_D_OPERATOR)) {\n\t\t\tif (ch == '{') {\n\t\t\t\t// Measure the minimum before a '{' to allow\n\t\t\t\t// folding on \"} else {\"\n\t\t\t\tif (levelMinCurrent > levelNext) {\n\t\t\t\t\tlevelMinCurrent = levelNext;\n\t\t\t\t}\n\t\t\t\tlevelNext++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (atEOL || (i == endPos-1)) {\n\t\t\tif (options.foldComment && options.foldCommentMultiline) { // Handle nested comments\n\t\t\t\tint nc;\n\t\t\t\tnc = styler.GetLineState(lineCurrent);\n\t\t\t\tnc -= lineCurrent>0? styler.GetLineState(lineCurrent-1): 0;\n\t\t\t\tlevelNext += nc;\n\t\t\t}\n\t\t\tint levelUse = levelCurrent;\n\t\t\tif (options.foldSyntaxBased && foldAtElse) {\n\t\t\t\tlevelUse = levelMinCurrent;\n\t\t\t}\n\t\t\tint lev = levelUse | levelNext << 16;\n\t\t\tif (visibleChars == 0 && options.foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif (levelUse < levelNext)\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelCurrent = levelNext;\n\t\t\tlevelMinCurrent = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!IsASpace(ch))\n\t\t\tvisibleChars++;\n\t}\n}\n\nextern const LexerModule lmD(SCLEX_D, LexerD::LexerFactoryD, \"d\", dWordLists);\n" }, { "path": "lexers/LexDMAP.cxx", "content": "// Scintilla source code edit control\n/** @file LexDMAP.cxx\n ** Lexer for MSC Nastran DMAP.\n ** Written by Mark Robinson, based on the Fortran lexer by Chuan-jian Shen, Last changed Aug. 2013\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n/***************************************/\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n/***************************************/\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n/***************************************/\n\n#if defined(__clang__)\n#if __has_warning(\"-Wunused-but-set-variable\")\n// Disable warning for numNonBlank\n#pragma clang diagnostic ignored \"-Wunused-but-set-variable\"\n#endif\n#endif\n\nusing namespace Lexilla;\n\n/***********************************************/\nstatic inline bool IsAWordChar(const int ch) {\n return (ch < 0x80) && (isalnum(ch) || ch == '_' || ch == '%');\n}\n/**********************************************/\nstatic inline bool IsAWordStart(const int ch) {\n return (ch < 0x80) && (isalnum(ch));\n}\n/***************************************/\nstatic void ColouriseDMAPDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *keywordlists[], Accessor &styler) {\n WordList &keywords = *keywordlists[0];\n WordList &keywords2 = *keywordlists[1];\n WordList &keywords3 = *keywordlists[2];\n /***************************************/\n Sci_Position posLineStart = 0, numNonBlank = 0;\n Sci_Position endPos = startPos + length;\n /***************************************/\n // backtrack to the nearest keyword\n while ((startPos > 1) && (styler.StyleAt(startPos) != SCE_DMAP_WORD)) {\n startPos--;\n }\n startPos = styler.LineStart(styler.GetLine(startPos));\n initStyle = styler.StyleAt(startPos - 1);\n StyleContext sc(startPos, endPos-startPos, initStyle, styler);\n /***************************************/\n for (; sc.More(); sc.Forward()) {\n // remember the start position of the line\n if (sc.atLineStart) {\n posLineStart = sc.currentPos;\n numNonBlank = 0;\n sc.SetState(SCE_DMAP_DEFAULT);\n }\n if (!IsASpaceOrTab(sc.ch)) numNonBlank ++;\n /***********************************************/\n // Handle data appearing after column 72; it is ignored\n Sci_Position toLineStart = sc.currentPos - posLineStart;\n if (toLineStart >= 72 || sc.ch == '$') {\n sc.SetState(SCE_DMAP_COMMENT);\n while (!sc.atLineEnd && sc.More()) sc.Forward(); // Until line end\n continue;\n }\n /***************************************/\n // Determine if the current state should terminate.\n if (sc.state == SCE_DMAP_OPERATOR) {\n sc.SetState(SCE_DMAP_DEFAULT);\n } else if (sc.state == SCE_DMAP_NUMBER) {\n if (!(IsAWordChar(sc.ch) || sc.ch=='\\'' || sc.ch=='\\\"' || sc.ch=='.')) {\n sc.SetState(SCE_DMAP_DEFAULT);\n }\n } else if (sc.state == SCE_DMAP_IDENTIFIER) {\n if (!IsAWordChar(sc.ch) || (sc.ch == '%')) {\n char s[100];\n sc.GetCurrentLowered(s, sizeof(s));\n if (keywords.InList(s)) {\n sc.ChangeState(SCE_DMAP_WORD);\n } else if (keywords2.InList(s)) {\n sc.ChangeState(SCE_DMAP_WORD2);\n } else if (keywords3.InList(s)) {\n sc.ChangeState(SCE_DMAP_WORD3);\n }\n sc.SetState(SCE_DMAP_DEFAULT);\n }\n } else if (sc.state == SCE_DMAP_COMMENT) {\n if (sc.ch == '\\r' || sc.ch == '\\n') {\n sc.SetState(SCE_DMAP_DEFAULT);\n }\n } else if (sc.state == SCE_DMAP_STRING1) {\n if (sc.ch == '\\'') {\n if (sc.chNext == '\\'') {\n sc.Forward();\n } else {\n sc.ForwardSetState(SCE_DMAP_DEFAULT);\n }\n } else if (sc.atLineEnd) {\n sc.ChangeState(SCE_DMAP_STRINGEOL);\n sc.ForwardSetState(SCE_DMAP_DEFAULT);\n }\n } else if (sc.state == SCE_DMAP_STRING2) {\n if (sc.atLineEnd) {\n sc.ChangeState(SCE_DMAP_STRINGEOL);\n sc.ForwardSetState(SCE_DMAP_DEFAULT);\n } else if (sc.ch == '\\\"') {\n if (sc.chNext == '\\\"') {\n sc.Forward();\n } else {\n sc.ForwardSetState(SCE_DMAP_DEFAULT);\n }\n }\n }\n /***************************************/\n // Determine if a new state should be entered.\n if (sc.state == SCE_DMAP_DEFAULT) {\n if (sc.ch == '$') {\n sc.SetState(SCE_DMAP_COMMENT);\n } else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext)) || (sc.ch == '-' && IsADigit(sc.chNext))) {\n sc.SetState(SCE_F_NUMBER);\n } else if (IsAWordStart(sc.ch)) {\n sc.SetState(SCE_DMAP_IDENTIFIER);\n } else if (sc.ch == '\\\"') {\n sc.SetState(SCE_DMAP_STRING2);\n } else if (sc.ch == '\\'') {\n sc.SetState(SCE_DMAP_STRING1);\n } else if (isoperator(static_cast(sc.ch))) {\n sc.SetState(SCE_DMAP_OPERATOR);\n }\n }\n }\n sc.Complete();\n}\n/***************************************/\n// To determine the folding level depending on keywords\nstatic int classifyFoldPointDMAP(const char* s, const char* prevWord) {\n int lev = 0;\n if ((strcmp(prevWord, \"else\") == 0 && strcmp(s, \"if\") == 0) || strcmp(s, \"enddo\") == 0 || strcmp(s, \"endif\") == 0) {\n lev = -1;\n } else if ((strcmp(prevWord, \"do\") == 0 && strcmp(s, \"while\") == 0) || strcmp(s, \"then\") == 0) {\n lev = 1;\n }\n return lev;\n}\n// Folding the code\nstatic void FoldDMAPDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *[], Accessor &styler) {\n //\n // bool foldComment = styler.GetPropertyInt(\"fold.comment\") != 0;\n // Do not know how to fold the comment at the moment.\n //\n bool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n Sci_PositionU endPos = startPos + length;\n int visibleChars = 0;\n Sci_Position lineCurrent = styler.GetLine(startPos);\n int levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n int levelCurrent = levelPrev;\n char chNext = styler[startPos];\n int styleNext = styler.StyleAt(startPos);\n int style = initStyle;\n /***************************************/\n Sci_Position lastStart = 0;\n char prevWord[32] = \"\";\n /***************************************/\n for (Sci_PositionU i = startPos; i < endPos; i++) {\n char ch = chNext;\n chNext = styler.SafeGetCharAt(i + 1);\n int stylePrev = style;\n style = styleNext;\n styleNext = styler.StyleAt(i + 1);\n bool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n //\n if ((stylePrev == SCE_DMAP_DEFAULT || stylePrev == SCE_DMAP_OPERATOR || stylePrev == SCE_DMAP_COMMENT) && (style == SCE_DMAP_WORD)) {\n // Store last word and label start point.\n lastStart = i;\n }\n /***************************************/\n if (style == SCE_DMAP_WORD) {\n if(iswordchar(ch) && !iswordchar(chNext)) {\n char s[32];\n Sci_PositionU k;\n for(k=0; (k<31 ) && (k(tolower(styler[lastStart+k]));\n }\n s[k] = '\\0';\n levelCurrent += classifyFoldPointDMAP(s, prevWord);\n strcpy(prevWord, s);\n }\n }\n if (atEOL) {\n int lev = levelPrev;\n if (visibleChars == 0 && foldCompact)\n lev |= SC_FOLDLEVELWHITEFLAG;\n if ((levelCurrent > levelPrev) && (visibleChars > 0))\n lev |= SC_FOLDLEVELHEADERFLAG;\n if (lev != styler.LevelAt(lineCurrent)) {\n styler.SetLevel(lineCurrent, lev);\n }\n lineCurrent++;\n levelPrev = levelCurrent;\n visibleChars = 0;\n strcpy(prevWord, \"\");\n }\n /***************************************/\n if (!isspacechar(ch)) visibleChars++;\n }\n /***************************************/\n // Fill in the real level of the next line, keeping the current flags as they will be filled in later\n int flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n styler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n/***************************************/\nstatic const char * const DMAPWordLists[] = {\n \"Primary keywords and identifiers\",\n \"Intrinsic functions\",\n \"Extended and user defined functions\",\n 0,\n};\n/***************************************/\nextern const LexerModule lmDMAP(SCLEX_DMAP, ColouriseDMAPDoc, \"DMAP\", FoldDMAPDoc, DMAPWordLists);\n" }, { "path": "lexers/LexDMIS.cxx", "content": "// Scintilla source code edit control\n/** @file LexDMIS.cxx\n ** Lexer for DMIS.\n **/\n// Copyright 1998-2005 by Neil Hodgson \n// Copyright 2013-2014 by Andreas Tscharner \n// The License.txt file describes the conditions under which this software may be distributed.\n\n\n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Lexilla;\n\n\nstatic const char *const DMISWordListDesc[] = {\n\t\"DMIS Major Words\",\n\t\"DMIS Minor Words\",\n\t\"Unsupported DMIS Major Words\",\n\t\"Unsupported DMIS Minor Words\",\n\t\"Keywords for code folding start\",\n\t\"Corresponding keywords for code folding end\",\n\t0\n};\n\n\nclass LexerDMIS : public DefaultLexer\n{\n\tprivate:\n\t\tchar *m_wordListSets;\n\t\tWordList m_majorWords;\n\t\tWordList m_minorWords;\n\t\tWordList m_unsupportedMajor;\n\t\tWordList m_unsupportedMinor;\n\t\tWordList m_codeFoldingStart;\n\t\tWordList m_codeFoldingEnd;\n\n\t\tchar * SCI_METHOD UpperCase(char *item);\n\t\tvoid SCI_METHOD InitWordListSets(void);\n\n\tpublic:\n\t\tLexerDMIS(void);\n\t\tvirtual ~LexerDMIS(void);\n\n\t\tint SCI_METHOD Version() const override {\n\t\t\treturn Scintilla::lvRelease5;\n\t\t}\n\n\t\tvoid SCI_METHOD Release() override {\n\t\t\tdelete this;\n\t\t}\n\n\t\tconst char * SCI_METHOD PropertyNames() override {\n\t\t\treturn NULL;\n\t\t}\n\n\t\tint SCI_METHOD PropertyType(const char *) override {\n\t\t\treturn -1;\n\t\t}\n\n\t\tconst char * SCI_METHOD DescribeProperty(const char *) override {\n\t\t\treturn NULL;\n\t\t}\n\n\t\tSci_Position SCI_METHOD PropertySet(const char *, const char *) override {\n\t\t\treturn -1;\n\t\t}\n\n\t\tconst char * SCI_METHOD PropertyGet(const char *) override {\n\t\t\treturn NULL;\n\t\t}\n\n\t\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\n\t\tvoid * SCI_METHOD PrivateCall(int, void *) override {\n\t\t\treturn NULL;\n\t\t}\n\n\t\tstatic ILexer5 *LexerFactoryDMIS() {\n\t\t\treturn new LexerDMIS;\n\t\t}\n\n\t\tconst char * SCI_METHOD DescribeWordListSets() override;\n\t\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position lengthDoc, int initStyle, Scintilla::IDocument *pAccess) override;\n\t\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position lengthDoc, int initStyle, Scintilla::IDocument *pAccess) override;\n};\n\n\nchar * SCI_METHOD LexerDMIS::UpperCase(char *item)\n{\n\tchar *itemStart;\n\n\n\titemStart = item;\n\twhile (item && *item) {\n\t\t*item = toupper(*item);\n\t\titem++;\n\t};\n\treturn itemStart;\n}\n\nvoid SCI_METHOD LexerDMIS::InitWordListSets(void)\n{\n\tsize_t totalLen = 0;\n\n\n\tfor (int i=0; DMISWordListDesc[i]; i++) {\n\t\ttotalLen += strlen(DMISWordListDesc[i]);\n\t\ttotalLen++;\n\t};\n\n\ttotalLen++;\n\tthis->m_wordListSets = new char[totalLen];\n\tmemset(this->m_wordListSets, 0, totalLen);\n\n\tfor (int i=0; DMISWordListDesc[i]; i++) {\n\t\tstrcat(this->m_wordListSets, DMISWordListDesc[i]);\n\t\tstrcat(this->m_wordListSets, \"\\n\");\n\t};\n}\n\n\nLexerDMIS::LexerDMIS(void) : DefaultLexer(\"DMIS\", SCLEX_DMIS) {\n\tthis->InitWordListSets();\n\n\tthis->m_majorWords.Clear();\n\tthis->m_minorWords.Clear();\n\tthis->m_unsupportedMajor.Clear();\n\tthis->m_unsupportedMinor.Clear();\n\tthis->m_codeFoldingStart.Clear();\n\tthis->m_codeFoldingEnd.Clear();\n}\n\nLexerDMIS::~LexerDMIS(void) {\n\tdelete[] this->m_wordListSets;\n}\n\nSci_Position SCI_METHOD LexerDMIS::WordListSet(int n, const char *wl)\n{\n\tswitch (n) {\n\t\tcase 0:\n\t\t\tthis->m_majorWords.Clear();\n\t\t\tthis->m_majorWords.Set(wl);\n\t\t\tbreak;\n\t\tcase 1:\n\t\t\tthis->m_minorWords.Clear();\n\t\t\tthis->m_minorWords.Set(wl);\n\t\t\tbreak;\n\t\tcase 2:\n\t\t\tthis->m_unsupportedMajor.Clear();\n\t\t\tthis->m_unsupportedMajor.Set(wl);\n\t\t\tbreak;\n\t\tcase 3:\n\t\t\tthis->m_unsupportedMinor.Clear();\n\t\t\tthis->m_unsupportedMinor.Set(wl);\n\t\t\tbreak;\n\t\tcase 4:\n\t\t\tthis->m_codeFoldingStart.Clear();\n\t\t\tthis->m_codeFoldingStart.Set(wl);\n\t\t\tbreak;\n\t\tcase 5:\n\t\t\tthis->m_codeFoldingEnd.Clear();\n\t\t\tthis->m_codeFoldingEnd.Set(wl);\n\t\t\tbreak;\n\t\tdefault:\n\t\t\treturn -1;\n\t\t\tbreak;\n\t}\n\n\treturn 0;\n}\n\nconst char * SCI_METHOD LexerDMIS::DescribeWordListSets()\n{\n\treturn this->m_wordListSets;\n}\n\nvoid SCI_METHOD LexerDMIS::Lex(Sci_PositionU startPos, Sci_Position lengthDoc, int initStyle, Scintilla::IDocument *pAccess)\n{\n\tconst Sci_PositionU MAX_STR_LEN = 100;\n\n\tLexAccessor styler(pAccess);\n\tStyleContext scCTX(startPos, lengthDoc, initStyle, styler);\n\tCharacterSet setDMISNumber(CharacterSet::setDigits, \".-+eE\");\n\tCharacterSet setDMISWordStart(CharacterSet::setAlpha, \"-234\", 0x80, true);\n\tCharacterSet setDMISWord(CharacterSet::setAlpha);\n\n\n\tbool isIFLine = false;\n\n\tfor (; scCTX.More(); scCTX.Forward()) {\n\t\tif (scCTX.atLineEnd) {\n\t\t\tisIFLine = false;\n\t\t};\n\n\t\tswitch (scCTX.state) {\n\t\t\tcase SCE_DMIS_DEFAULT:\n\t\t\t\tif (scCTX.Match('$', '$')) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_COMMENT);\n\t\t\t\t\tscCTX.Forward();\n\t\t\t\t};\n\t\t\t\tif (scCTX.Match('\\'')) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_STRING);\n\t\t\t\t};\n\t\t\t\tif (IsADigit(scCTX.ch) || ((scCTX.Match('-') || scCTX.Match('+')) && IsADigit(scCTX.chNext))) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_NUMBER);\n\t\t\t\t\tbreak;\n\t\t\t\t};\n\t\t\t\tif (setDMISWordStart.Contains(scCTX.ch)) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_KEYWORD);\n\t\t\t\t};\n\t\t\t\tif (scCTX.Match('(') && (!isIFLine)) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_LABEL);\n\t\t\t\t};\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_DMIS_COMMENT:\n\t\t\t\tif (scCTX.atLineEnd) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_DEFAULT);\n\t\t\t\t};\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_DMIS_STRING:\n\t\t\t\tif (scCTX.Match('\\'')) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_DEFAULT);\n\t\t\t\t};\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_DMIS_NUMBER:\n\t\t\t\tif (!setDMISNumber.Contains(scCTX.ch)) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_DEFAULT);\n\t\t\t\t};\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_DMIS_KEYWORD:\n\t\t\t\tif (!setDMISWord.Contains(scCTX.ch)) {\n\t\t\t\t\tchar tmpStr[MAX_STR_LEN];\n\t\t\t\t\tmemset(tmpStr, 0, MAX_STR_LEN*sizeof(char));\n\t\t\t\t\tscCTX.GetCurrent(tmpStr, (MAX_STR_LEN-1));\n\t\t\t\t\t// The following strncpy is copying from a string back onto itself which is weird and causes warnings\n\t\t\t\t\t// but is harmless so turn off the warning\n#if defined(__GNUC__) && !defined(__clang__)\n// Disable warning for strncpy\n#pragma GCC diagnostic ignored \"-Wrestrict\"\n#endif\n\t\t\t\t\tstrncpy(tmpStr, this->UpperCase(tmpStr), (MAX_STR_LEN-1));\n\n\t\t\t\t\tif (this->m_minorWords.InList(tmpStr)) {\n\t\t\t\t\t\tscCTX.ChangeState(SCE_DMIS_MINORWORD);\n\t\t\t\t\t};\n\t\t\t\t\tif (this->m_majorWords.InList(tmpStr)) {\n\t\t\t\t\t\tisIFLine = (strcmp(tmpStr, \"IF\") == 0);\n\t\t\t\t\t\tscCTX.ChangeState(SCE_DMIS_MAJORWORD);\n\t\t\t\t\t};\n\t\t\t\t\tif (this->m_unsupportedMajor.InList(tmpStr)) {\n\t\t\t\t\t\tscCTX.ChangeState(SCE_DMIS_UNSUPPORTED_MAJOR);\n\t\t\t\t\t};\n\t\t\t\t\tif (this->m_unsupportedMinor.InList(tmpStr)) {\n\t\t\t\t\t\tscCTX.ChangeState(SCE_DMIS_UNSUPPORTED_MINOR);\n\t\t\t\t\t};\n\n\t\t\t\t\tif (scCTX.Match('(') && (!isIFLine)) {\n\t\t\t\t\t\tscCTX.SetState(SCE_DMIS_LABEL);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tscCTX.SetState(SCE_DMIS_DEFAULT);\n\t\t\t\t\t};\n\t\t\t\t};\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_DMIS_LABEL:\n\t\t\t\tif (scCTX.Match(')')) {\n\t\t\t\t\tscCTX.SetState(SCE_DMIS_DEFAULT);\n\t\t\t\t};\n\t\t\t\tbreak;\n\t\t};\n\t};\n\tscCTX.Complete();\n}\n\nvoid SCI_METHOD LexerDMIS::Fold(Sci_PositionU startPos, Sci_Position lengthDoc, int, Scintilla::IDocument *pAccess)\n{\n\tconst int MAX_STR_LEN = 100;\n\n\tLexAccessor styler(pAccess);\n\tSci_PositionU endPos = startPos + lengthDoc;\n\tchar chNext = styler[startPos];\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tint strPos = 0;\n\tbool foldWordPossible = false;\n\tCharacterSet setDMISFoldWord(CharacterSet::setAlpha);\n\tchar *tmpStr;\n\n\n\ttmpStr = new char[MAX_STR_LEN];\n\tmemset(tmpStr, 0, MAX_STR_LEN*sizeof(char));\n\n\tfor (Sci_PositionU i=startPos; i= (MAX_STR_LEN-1)) {\n\t\t\tstrPos = MAX_STR_LEN-1;\n\t\t};\n\n\t\tint style = styler.StyleAt(i);\n\t\tbool noFoldPos = ((style == SCE_DMIS_COMMENT) || (style == SCE_DMIS_STRING));\n\n\t\tif (foldWordPossible) {\n\t\t\tif (setDMISFoldWord.Contains(ch)) {\n\t\t\t\ttmpStr[strPos++] = ch;\n\t\t\t} else {\n\t\t\t\ttmpStr = this->UpperCase(tmpStr);\n\t\t\t\tif (this->m_codeFoldingStart.InList(tmpStr) && (!noFoldPos)) {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t};\n\t\t\t\tif (this->m_codeFoldingEnd.InList(tmpStr) && (!noFoldPos)) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t};\n\t\t\t\tmemset(tmpStr, 0, MAX_STR_LEN*sizeof(char));\n\t\t\t\tstrPos = 0;\n\t\t\t\tfoldWordPossible = false;\n\t\t\t};\n\t\t} else {\n\t\t\tif (setDMISFoldWord.Contains(ch)) {\n\t\t\t\ttmpStr[strPos++] = ch;\n\t\t\t\tfoldWordPossible = true;\n\t\t\t};\n\t\t};\n\n\t\tif (atEOL || (i == (endPos-1))) {\n\t\t\tint lev = levelPrev;\n\n\t\t\tif (levelCurrent > levelPrev) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t};\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t};\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t};\n\t};\n\tdelete[] tmpStr;\n}\n\n\nextern const LexerModule lmDMIS(SCLEX_DMIS, LexerDMIS::LexerFactoryDMIS, \"DMIS\", DMISWordListDesc);\n" }, { "path": "lexers/LexDart.cxx", "content": "// Scintilla source code edit control\n/** @file LexDart.cxx\n ** Lexer for Dart.\n **/\n// Based on Zufu Liu's Notepad4 Dart lexer\n// Modified for Scintilla by Jiri Techet, 2024\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n// Use an unnamed namespace to protect the functions and classes from name conflicts\n\nconstexpr bool IsEOLChar(int ch) noexcept {\n\treturn ch == '\\r' || ch == '\\n';\n}\n\nconstexpr bool IsAGraphic(int ch) noexcept {\n\t// excludes C0 control characters and whitespace\n\treturn ch > 32 && ch < 127;\n}\n\nconstexpr bool IsIdentifierChar(int ch) noexcept {\n\treturn IsAlphaNumeric(ch) || ch == '_';\n}\n\nconstexpr bool IsIdentifierStart(int ch) noexcept {\n\treturn IsUpperOrLowerCase(ch) || ch == '_';\n}\n\nconstexpr bool IsNumberContinue(int chPrev, int ch, int chNext) noexcept {\n\treturn ((ch == '+' || ch == '-') && (chPrev == 'e' || chPrev == 'E'))\n\t\t|| (ch == '.' && chNext != '.');\n}\n\nconstexpr bool IsNumberStart(int ch, int chNext) noexcept {\n\treturn IsADigit(ch) || (ch == '.' && IsADigit(chNext));\n}\n\nconstexpr bool IsDecimalNumber(int chPrev, int ch, int chNext) noexcept {\n\treturn IsIdentifierChar(ch) || IsNumberContinue(chPrev, ch, chNext);\n}\n\nstruct EscapeSequence {\n\tint outerState = SCE_DART_DEFAULT;\n\tint digitsLeft = 0;\n\tbool brace = false;\n\n\t// highlight any character as escape sequence.\n\tbool resetEscapeState(int state, int chNext) noexcept {\n\t\tif (IsEOLChar(chNext)) {\n\t\t\treturn false;\n\t\t}\n\t\touterState = state;\n\t\tbrace = false;\n\t\tdigitsLeft = (chNext == 'x')? 3 : ((chNext == 'u') ? 5 : 1);\n\t\treturn true;\n\t}\n\tbool atEscapeEnd(int ch) noexcept {\n\t\t--digitsLeft;\n\t\treturn digitsLeft <= 0 || !IsAHeXDigit(ch);\n\t}\n};\n\nconstexpr bool IsDartIdentifierStart(int ch) noexcept {\n\treturn IsIdentifierStart(ch) || ch == '$';\n}\n\nconstexpr bool IsDartIdentifierChar(int ch) noexcept {\n\treturn IsIdentifierChar(ch) || ch == '$';\n}\n\nconstexpr bool IsDefinableOperator(int ch) noexcept {\n\t// https://github.com/dart-lang/sdk/blob/main/sdk/lib/core/symbol.dart\n\treturn AnyOf(ch, '+', '-', '*', '/', '%', '~', '&', '|',\n\t\t\t\t\t '^', '<', '>', '=', '[', ']');\n}\n\nconstexpr bool IsSpaceEquiv(int state) noexcept {\n\treturn state == SCE_DART_DEFAULT ||\n\t\tstate == SCE_DART_COMMENTLINE ||\n\t\tstate == SCE_DART_COMMENTLINEDOC ||\n\t\tstate == SCE_DART_COMMENTBLOCK ||\n\t\tstate == SCE_DART_COMMENTBLOCKDOC;\n}\n\nconstexpr bool IsTripleString(int state) noexcept {\n\treturn state == SCE_DART_TRIPLE_STRING_SQ ||\n\t\tstate == SCE_DART_TRIPLE_STRING_DQ ||\n\t\tstate == SCE_DART_TRIPLE_RAWSTRING_SQ ||\n\t\tstate == SCE_DART_TRIPLE_RAWSTRING_DQ;\n}\n\nconstexpr bool IsDoubleQuoted(int state) noexcept {\n\treturn state == SCE_DART_STRING_DQ ||\n\t\tstate == SCE_DART_RAWSTRING_DQ ||\n\t\tstate == SCE_DART_TRIPLE_STRING_DQ ||\n\t\tstate == SCE_DART_TRIPLE_RAWSTRING_DQ;\n}\n\nconstexpr bool IsRaw(int state) noexcept {\n\treturn state == SCE_DART_RAWSTRING_SQ ||\n\t\tstate == SCE_DART_RAWSTRING_DQ ||\n\t\tstate == SCE_DART_TRIPLE_RAWSTRING_SQ ||\n\t\tstate == SCE_DART_TRIPLE_RAWSTRING_DQ;\n}\n\nconstexpr int GetStringQuote(int state) noexcept {\n\treturn IsDoubleQuoted(state) ? '\\\"' : '\\'';\n}\n\nenum {\n\tDartLineStateMaskLineComment = 1,\t\t\t// line comment\n\tDartLineStateMaskImport = (1 << 1),\t\t\t// import\n\tDartLineStateMaskInterpolation = (1 << 2),\t// string interpolation\n};\n\n// string interpolating state\nstruct InterpolatingState {\n\tint state;\n\tint braceCount;\n};\n\nstruct FoldLineState {\n\tint lineComment;\n\tint packageImport;\n\tconstexpr explicit FoldLineState(int lineState) noexcept:\n\t\tlineComment(lineState & DartLineStateMaskLineComment),\n\t\tpackageImport((lineState >> 1) & 1) {\n\t}\n};\n\n// Options used for LexerDart\nstruct OptionsDart {\n\tbool fold = false;\n};\n\nconst char * const dartWordListDesc[] = {\n\t\"Primary keywords\",\n\t\"Secondary keywords\",\n\t\"Tertiary keywords\",\n\t\"Global type definitions\",\n\tnullptr\n};\n\nstruct OptionSetDart : public OptionSet {\n\tOptionSetDart() {\n\t\tDefineProperty(\"fold\", &OptionsDart::fold);\n\n\t\tDefineWordListSets(dartWordListDesc);\n\t}\n};\n\n\nLexicalClass lexicalClasses[] = {\n\t// Lexer DART SCLEX_DART SCE_DART_:\n\t0, \"SCE_DART_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_DART_COMMENTLINE\", \"comment line\", \"Comment: //\",\n\t2, \"SCE_DART_COMMENTLINEDOC\", \"comment line documentation\", \"Comment: ///\",\n\t3, \"SCE_DART_COMMENTBLOCK\", \"comment\", \"Comment: /* */\",\n\t4, \"SCE_DART_COMMENTBLOCKDOC\", \"comment documentation\", \"Comment: /** */\",\n\t5, \"SCE_DART_STRING_SQ\", \"literal string\", \"Single quoted string\",\n\t6, \"SCE_DART_STRING_DQ\", \"literal string\", \"Double quoted string\",\n\t7, \"SCE_DART_TRIPLE_STRING_SQ\", \"literal string multiline\", \"Single quoted multiline string\",\n\t8, \"SCE_DART_TRIPLE_STRING_DQ\", \"literal string multiline\", \"Double quoted multiline string\",\n\t9, \"SCE_DART_RAWSTRING_SQ\", \"literal string raw\", \"Single quoted raw string\",\n\t10, \"SCE_DART_RAWSTRING_DQ\", \"literal string raw\", \"Double quoted raw string\",\n\t11, \"SCE_DART_TRIPLE_RAWSTRING_SQ\", \"literal string multiline raw\", \"Single quoted multiline raw string\",\n\t12, \"SCE_DART_TRIPLE_RAWSTRING_DQ\", \"literal string multiline raw\", \"Double quoted multiline raw string\",\n\t13, \"SCE_DART_ESCAPECHAR\", \"literal string escapesequence\", \"Escape sequence\",\n\t14, \"SCE_DART_IDENTIFIER\", \"identifier\", \"Identifier\",\n\t15, \"SCE_DART_IDENTIFIER_STRING\", \"identifier interpolated\", \"Identifier following $ inside strings\",\n\t16, \"SCE_DART_OPERATOR\", \"operator\", \"Operator\",\n\t17, \"SCE_DART_OPERATOR_STRING\", \"operator interpolated\", \"Braces following $ inside string\",\n\t18, \"SCE_DART_SYMBOL_IDENTIFIER\", \"identifier symbol\", \"Symbol name introduced by #\",\n\t19, \"SCE_DART_SYMBOL_OPERATOR\", \"operator symbol\", \"Operator introduced by #\",\n\t20, \"SCE_DART_NUMBER\", \"literal numeric\", \"Number\",\n\t21, \"SCE_DART_KEY\", \"key\", \"Keys preceding ':' and named parameters\",\n\t22, \"SCE_DART_METADATA\", \"preprocessor\", \"Metadata introduced by @\",\n\t23, \"SCE_DART_KW_PRIMARY\", \"keyword\", \"Primary keywords\",\n\t24, \"SCE_DART_KW_SECONDARY\", \"identifier\", \"Secondary keywords\",\n\t25, \"SCE_DART_KW_TERTIARY\", \"identifier\", \"Tertiary keywords\",\n\t26, \"SCE_DART_KW_TYPE\", \"identifier\", \"Global types\",\n\t27, \"SCE_DART_STRINGEOL\", \"error literal string\", \"End of line where string is not closed\",\n};\n\nclass LexerDart : public DefaultLexer {\n\tWordList keywordsPrimary;\n\tWordList keywordsSecondary;\n\tWordList keywordsTertiary;\n\tWordList keywordsTypes;\n\tOptionsDart options;\n\tOptionSetDart osDart;\npublic:\n\tLexerDart(const char *languageName_, int language_) :\n\t\tDefaultLexer(languageName_, language_, lexicalClasses, std::size(lexicalClasses)) {\n\t}\n\t// Deleted so LexerDart objects can not be copied.\n\tLexerDart(const LexerDart &) = delete;\n\tLexerDart(LexerDart &&) = delete;\n\tvoid operator=(const LexerDart &) = delete;\n\tvoid operator=(LexerDart &&) = delete;\n\t~LexerDart() override = default;\n\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osDart.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osDart.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osDart.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char *SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osDart.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osDart.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid *SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn nullptr;\n\t}\n\n\tvoid BacktrackToStart(const LexAccessor &styler, int stateMask, Sci_PositionU &startPos, Sci_Position &lengthDoc, int &initStyle);\n\tSci_PositionU LookbackNonWhite(LexAccessor &styler, Sci_PositionU startPos, int &chPrevNonWhite, int &stylePrevNonWhite);\n\n\tstatic ILexer5 *LexerFactoryDart() {\n\t\treturn new LexerDart(\"dart\", SCLEX_DART);\n\t}\n};\n\nSci_Position SCI_METHOD LexerDart::PropertySet(const char *key, const char *val) {\n\tif (osDart.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerDart::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywordsPrimary;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywordsSecondary;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywordsTertiary;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywordsTypes;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN && wordListN->Set(wl, false)) {\n\t\tfirstModification = 0;\n\t}\n\treturn firstModification;\n}\n\nvoid LexerDart::BacktrackToStart(const LexAccessor &styler, int stateMask, Sci_PositionU &startPos, Sci_Position &lengthDoc, int &initStyle) {\n\tconst Sci_Position currentLine = styler.GetLine(startPos);\n\tif (currentLine != 0) {\n\t\tSci_Position line = currentLine - 1;\n\t\tint lineState = styler.GetLineState(line);\n\t\twhile ((lineState & stateMask) != 0 && line != 0) {\n\t\t\t--line;\n\t\t\tlineState = styler.GetLineState(line);\n\t\t}\n\t\tif ((lineState & stateMask) == 0) {\n\t\t\t++line;\n\t\t}\n\t\tif (line != currentLine) {\n\t\t\tconst Sci_PositionU endPos = startPos + lengthDoc;\n\t\t\tstartPos = (line == 0) ? 0 : styler.LineStart(line);\n\t\t\tlengthDoc = endPos - startPos;\n\t\t\tinitStyle = (startPos == 0) ? 0 : styler.StyleAt(startPos - 1);\n\t\t}\n\t}\n}\n\nSci_PositionU LexerDart::LookbackNonWhite(LexAccessor &styler, Sci_PositionU startPos, int &chPrevNonWhite, int &stylePrevNonWhite) {\n\tdo {\n\t\t--startPos;\n\t\tconst unsigned style = styler.StyleAt(startPos);\n\t\tif (!IsSpaceEquiv(style)) {\n\t\t\tstylePrevNonWhite = style;\n\t\t\tchPrevNonWhite = static_cast(styler[startPos]);\n\t\t\tbreak;\n\t\t}\n\t} while (startPos != 0);\n\treturn startPos;\n}\n\nvoid LexerDart::Lex(Sci_PositionU startPos, Sci_Position lengthDoc, int initStyle, IDocument *pAccess) {\n\tAccessor styler(pAccess, nullptr);\n\n\tint lineStateLineType = 0;\n\tint commentLevel = 0;\t// nested block comment level\n\n\tstd::vector interpolatingStack;\n\n\tint visibleChars = 0;\n\tint chBefore = 0;\n\tint chPrevNonWhite = 0;\n\tEscapeSequence escSeq;\n\n\tif (initStyle == SCE_DART_STRINGEOL) {\n\t\tinitStyle = SCE_DART_DEFAULT;\n\t}\n\n\tif (startPos != 0) {\n\t\t// backtrack to the line where interpolation starts\n\t\tBacktrackToStart(styler, DartLineStateMaskInterpolation, startPos, lengthDoc, initStyle);\n\t}\n\n\tStyleContext sc(startPos, lengthDoc, initStyle, styler);\n\tif (sc.currentLine > 0) {\n\t\tconst int lineState = styler.GetLineState(sc.currentLine - 1);\n\t\tcommentLevel = lineState >> 4;\n\t}\n\tif (startPos == 0) {\n\t\tif (sc.Match('#', '!')) {\n\t\t\t// Shell Shebang at beginning of file\n\t\t\tsc.SetState(SCE_DART_COMMENTLINE);\n\t\t\tsc.Forward();\n\t\t\tlineStateLineType = DartLineStateMaskLineComment;\n\t\t}\n\t} else if (IsSpaceEquiv(initStyle)) {\n\t\tLookbackNonWhite(styler, startPos, chPrevNonWhite, initStyle);\n\t\tchBefore = chPrevNonWhite;\n\t}\n\n\twhile (sc.More()) {\n\t\tswitch (sc.state) {\n\t\tcase SCE_DART_OPERATOR:\n\t\tcase SCE_DART_OPERATOR_STRING:\n\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\tbreak;\n\n\t\tcase SCE_DART_NUMBER:\n\t\t\tif (!IsDecimalNumber(sc.chPrev, sc.ch, sc.chNext)) {\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_IDENTIFIER:\n\t\tcase SCE_DART_IDENTIFIER_STRING:\n\t\tcase SCE_DART_METADATA:\n\t\tcase SCE_DART_SYMBOL_IDENTIFIER:\n\t\t\tif (!IsDartIdentifierChar(sc.ch) || (sc.ch == '$' && sc.state == SCE_DART_IDENTIFIER_STRING)) {\n\t\t\t\tif (sc.state == SCE_DART_METADATA || sc.state == SCE_DART_SYMBOL_IDENTIFIER) {\n\t\t\t\t\tif (sc.ch == '.') {\n\t\t\t\t\t\tconst int state = sc.state;\n\t\t\t\t\t\tsc.SetState(SCE_DART_OPERATOR);\n\t\t\t\t\t\tsc.ForwardSetState(state);\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tchar s[64];\n\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\tconst int state = sc.state;\n\t\t\t\t\tif (state == SCE_DART_IDENTIFIER_STRING) {\n\t\t\t\t\t\tsc.SetState(escSeq.outerState);\n\t\t\t\t\t\tcontinue;\n\t\t\t\t\t} else if (keywordsPrimary.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_DART_KW_PRIMARY);\n\t\t\t\t\t\tif (strcmp(s, \"import\") == 0 || strcmp(s, \"part\") == 0) {\n\t\t\t\t\t\t\tif (visibleChars == sc.LengthCurrent()) {\n\t\t\t\t\t\t\t\tlineStateLineType = DartLineStateMaskImport;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (keywordsSecondary.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_DART_KW_SECONDARY);\n\t\t\t\t\t} else if (keywordsTertiary.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_DART_KW_TERTIARY);\n\t\t\t\t\t} else if (keywordsTypes.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_DART_KW_TYPE);\n\t\t\t\t\t} else if (state == SCE_DART_IDENTIFIER && sc.ch == ':') {\n\t\t\t\t\t\tif (chBefore == ',' || chBefore == '{' || chBefore == '(') {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_DART_KEY); // map key or named parameter\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_SYMBOL_OPERATOR:\n\t\t\tif (!IsDefinableOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_COMMENTLINE:\n\t\tcase SCE_DART_COMMENTLINEDOC:\n\t\t\tif (sc.atLineStart) {\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_COMMENTBLOCK:\n\t\tcase SCE_DART_COMMENTBLOCKDOC:\n\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\tsc.Forward();\n\t\t\t\t--commentLevel;\n\t\t\t\tif (commentLevel == 0) {\n\t\t\t\t\tsc.ForwardSetState(SCE_DART_DEFAULT);\n\t\t\t\t}\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tsc.Forward();\n\t\t\t\t++commentLevel;\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_STRING_SQ:\n\t\tcase SCE_DART_STRING_DQ:\n\t\tcase SCE_DART_TRIPLE_STRING_SQ:\n\t\tcase SCE_DART_TRIPLE_STRING_DQ:\n\t\tcase SCE_DART_RAWSTRING_SQ:\n\t\tcase SCE_DART_RAWSTRING_DQ:\n\t\tcase SCE_DART_TRIPLE_RAWSTRING_SQ:\n\t\tcase SCE_DART_TRIPLE_RAWSTRING_DQ:\n\t\t\tif (sc.atLineStart && !IsTripleString(sc.state)) {\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t} else if (sc.atLineEnd && !IsTripleString(sc.state)) {\n\t\t\t\tsc.ChangeState(SCE_DART_STRINGEOL);\n\t\t\t} else if (sc.ch == '\\\\' && !IsRaw(sc.state)) {\n\t\t\t\tif (escSeq.resetEscapeState(sc.state, sc.chNext)) {\n\t\t\t\t\tsc.SetState(SCE_DART_ESCAPECHAR);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tif (sc.Match('u', '{')) {\n\t\t\t\t\t\tescSeq.brace = true;\n\t\t\t\t\t\tescSeq.digitsLeft = 7; // Unicode code point\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '$' && !IsRaw(sc.state)) {\n\t\t\t\tescSeq.outerState = sc.state;\n\t\t\t\tsc.SetState(SCE_DART_OPERATOR_STRING);\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '{') {\n\t\t\t\t\tinterpolatingStack.push_back({escSeq.outerState, 1});\n\t\t\t\t} else if (sc.ch != '$' && IsDartIdentifierStart(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_DART_IDENTIFIER_STRING);\n\t\t\t\t} else { // error\n\t\t\t\t\tsc.SetState(escSeq.outerState);\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t} else if (sc.ch == GetStringQuote(sc.state) &&\n\t\t\t\t\t(!IsTripleString(sc.state) || (sc.Match(IsDoubleQuoted(sc.state) ? R\"(\"\"\")\" : R\"(''')\")))) {\n\t\t\t\tif (IsTripleString(sc.state)) {\n\t\t\t\t\tsc.Forward(2);\n\t\t\t\t}\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_STRINGEOL:\n\t\t\tif (sc.atLineStart) {\n\t\t\t\tsc.SetState(SCE_DART_DEFAULT);\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_ESCAPECHAR:\n\t\t\tif (escSeq.atEscapeEnd(sc.ch)) {\n\t\t\t\tif (escSeq.brace && sc.ch == '}') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tsc.SetState(escSeq.outerState);\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t\tbreak;\n\t\t}\n\n\t\tif (sc.state == SCE_DART_DEFAULT) {\n\t\t\tif (sc.ch == '/' && (sc.chNext == '/' || sc.chNext == '*')) {\n\t\t\t\tconst int chNext = sc.chNext;\n\t\t\t\tsc.SetState((chNext == '/') ? SCE_DART_COMMENTLINE : SCE_DART_COMMENTBLOCK);\n\t\t\t\tsc.Forward(2);\n\t\t\t\tif (sc.ch == chNext && sc.chNext != chNext) {\n\t\t\t\t\tif (sc.state == SCE_DART_COMMENTLINE) {\n\t\t\t\t\t\tsc.ChangeState(SCE_DART_COMMENTLINEDOC);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ChangeState(SCE_DART_COMMENTBLOCKDOC);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tif (chNext == '/') {\n\t\t\t\t\tif (visibleChars == 0) {\n\t\t\t\t\t\tlineStateLineType = DartLineStateMaskLineComment;\n\t\t\t\t\t}\n\t\t\t\t } else {\n\t\t\t\t\tcommentLevel = 1;\n\t\t\t\t }\n\t\t\t\t continue;\n\t\t\t}\n\t\t\tif (sc.ch == 'r' && (sc.chNext == '\\'' || sc.chNext == '\"')) {\n\t\t\t\tsc.SetState((sc.chNext == '\\'') ? SCE_DART_RAWSTRING_SQ : SCE_DART_RAWSTRING_DQ);\n\t\t\t\tsc.Forward(2);\n\t\t\t\tif (sc.chPrev == '\\'' && sc.Match('\\'', '\\'')) {\n\t\t\t\t\tsc.ChangeState(SCE_DART_TRIPLE_RAWSTRING_SQ);\n\t\t\t\t\tsc.Forward(2);\n\t\t\t\t} else if (sc.chPrev == '\"' && sc.Match('\"', '\"')) {\n\t\t\t\t\tsc.ChangeState(SCE_DART_TRIPLE_RAWSTRING_DQ);\n\t\t\t\t\tsc.Forward(2);\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t\tif (sc.ch == '\"') {\n\t\t\t\tif (sc.Match(R\"(\"\"\")\")) {\n\t\t\t\t\tsc.SetState(SCE_DART_TRIPLE_STRING_DQ);\n\t\t\t\t\tsc.Forward(2);\n\t\t\t\t} else {\n\t\t\t\t\tchBefore = chPrevNonWhite;\n\t\t\t\t\tsc.SetState(SCE_DART_STRING_DQ);\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tif (sc.Match(R\"(''')\")) {\n\t\t\t\t\tsc.SetState(SCE_DART_TRIPLE_STRING_SQ);\n\t\t\t\t\tsc.Forward(2);\n\t\t\t\t} else {\n\t\t\t\t\tchBefore = chPrevNonWhite;\n\t\t\t\t\tsc.SetState(SCE_DART_STRING_SQ);\n\t\t\t\t}\n\t\t\t} else if (IsNumberStart(sc.ch, sc.chNext)) {\n\t\t\t\tsc.SetState(SCE_DART_NUMBER);\n\t\t\t} else if ((sc.ch == '@' || sc.ch == '#') && IsDartIdentifierStart(sc.chNext)) {\n\t\t\t\tsc.SetState((sc.ch == '@') ? SCE_DART_METADATA : SCE_DART_SYMBOL_IDENTIFIER);\n\t\t\t} else if (IsDartIdentifierStart(sc.ch)) {\n\t\t\t\tchBefore = chPrevNonWhite;\n\t\t\t\tsc.SetState(SCE_DART_IDENTIFIER);\n\t\t\t} else if (sc.ch == '#' && IsDefinableOperator(sc.chNext)) {\n\t\t\t\tsc.SetState(SCE_DART_SYMBOL_OPERATOR);\n\t\t\t} else if (IsAGraphic(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_DART_OPERATOR);\n\t\t\t\tif (!interpolatingStack.empty() && AnyOf(sc.ch, '{', '}')) {\n\t\t\t\t\tInterpolatingState ¤t = interpolatingStack.back();\n\t\t\t\t\tif (sc.ch == '{') {\n\t\t\t\t\t\tcurrent.braceCount += 1;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tcurrent.braceCount -= 1;\n\t\t\t\t\t\tif (current.braceCount == 0) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_DART_OPERATOR_STRING);\n\t\t\t\t\t\t\tsc.ForwardSetState(current.state);\n\t\t\t\t\t\t\tinterpolatingStack.pop_back();\n\t\t\t\t\t\t\tcontinue;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t\tif (!isspacechar(sc.ch)) {\n\t\t\tvisibleChars++;\n\t\t\tif (!IsSpaceEquiv(sc.state)) {\n\t\t\t\tchPrevNonWhite = sc.ch;\n\t\t\t}\n\t\t}\n\t\tif (sc.atLineEnd) {\n\t\t\tint lineState = (commentLevel << 4) | lineStateLineType;\n\t\t\tif (!interpolatingStack.empty()) {\n\t\t\t\tlineState |= DartLineStateMaskInterpolation;\n\t\t\t}\n\t\t\tstyler.SetLineState(sc.currentLine, lineState);\n\t\t\tlineStateLineType = 0;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tsc.Forward();\n\t}\n\n\tsc.Complete();\n}\n\nvoid LexerDart::Fold(Sci_PositionU startPos, Sci_Position lengthDoc, int initStyle, IDocument *pAccess) {\n\tif (!options.fold)\n\t\treturn;\n\n\tAccessor styler(pAccess, nullptr);\n\tconst Sci_PositionU endPos = startPos + lengthDoc;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\twhile (lineCurrent > 0) {\n\t\tlineCurrent--;\n\t\tstartPos = styler.LineStart(lineCurrent);\n\t\tinitStyle = (startPos > 0) ? styler.StyleIndexAt(startPos) : 0;\n\t\tif (initStyle != SCE_DART_COMMENTBLOCKDOC && initStyle != SCE_DART_COMMENTBLOCK &&\n\t\t\tinitStyle != SCE_DART_TRIPLE_RAWSTRING_SQ && initStyle != SCE_DART_TRIPLE_RAWSTRING_DQ &&\n\t\t\tinitStyle != SCE_DART_TRIPLE_STRING_SQ && initStyle != SCE_DART_TRIPLE_STRING_DQ)\n\t\t\tbreak;\n\t}\n\tFoldLineState foldPrev(0);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0) {\n\t\tlevelCurrent = styler.LevelAt(lineCurrent - 1) >> 16;\n\t\tfoldPrev = FoldLineState(styler.GetLineState(lineCurrent - 1));\n\t}\n\n\tint levelNext = levelCurrent;\n\tFoldLineState foldCurrent(styler.GetLineState(lineCurrent));\n\tSci_PositionU lineStartNext = styler.LineStart(lineCurrent + 1);\n\tlineStartNext = std::min(lineStartNext, endPos);\n\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleIndexAt(startPos);\n\tint style = initStyle;\n\n\twhile (startPos < endPos) {\n\t\tconst char ch = chNext;\n\t\tconst int stylePrev = style;\n\t\tstyle = styleNext;\n\t\tchNext = styler[++startPos];\n\t\tstyleNext = styler.StyleIndexAt(startPos);\n\n\t\tswitch (style) {\n\t\tcase SCE_DART_COMMENTBLOCKDOC:\n\t\tcase SCE_DART_COMMENTBLOCK: {\n\t\t\tconst int level = (ch == '/' && chNext == '*') ? 1 : ((ch == '*' && chNext == '/') ? -1 : 0);\n\t\t\tif (level != 0) {\n\t\t\t\tlevelNext += level;\n\t\t\t\tstartPos++;\n\t\t\t\tchNext = styler[startPos];\n\t\t\t\tstyleNext = styler.StyleIndexAt(startPos);\n\t\t\t}\n\t\t} break;\n\n\t\tcase SCE_DART_TRIPLE_RAWSTRING_SQ:\n\t\tcase SCE_DART_TRIPLE_RAWSTRING_DQ:\n\t\tcase SCE_DART_TRIPLE_STRING_SQ:\n\t\tcase SCE_DART_TRIPLE_STRING_DQ:\n\t\t\tif (style != stylePrev && !AnyOf(stylePrev, SCE_DART_ESCAPECHAR, SCE_DART_OPERATOR_STRING, SCE_DART_IDENTIFIER_STRING)) {\n\t\t\t\tlevelNext++;\n\t\t\t}\n\t\t\tif (style != styleNext && !AnyOf(styleNext, SCE_DART_ESCAPECHAR, SCE_DART_OPERATOR_STRING, SCE_DART_IDENTIFIER_STRING)) {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t\tbreak;\n\n\t\tcase SCE_DART_OPERATOR:\n\t\tcase SCE_DART_OPERATOR_STRING:\n\t\t\tif (ch == '{' || ch == '[' || ch == '(') {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (ch == '}' || ch == ']' || ch == ')') {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t\tbreak;\n\t\t}\n\n\t\tif (startPos == lineStartNext) {\n\t\t\tconst FoldLineState foldNext(styler.GetLineState(lineCurrent + 1));\n\t\t\tlevelNext = std::max(levelNext, SC_FOLDLEVELBASE);\n\t\t\tif (foldCurrent.lineComment) {\n\t\t\t\tlevelNext += foldNext.lineComment - foldPrev.lineComment;\n\t\t\t} else if (foldCurrent.packageImport) {\n\t\t\t\tlevelNext += foldNext.packageImport - foldPrev.packageImport;\n\t\t\t}\n\n\t\t\tconst int levelUse = levelCurrent;\n\t\t\tint lev = levelUse | (levelNext << 16);\n\t\t\tif (levelUse < levelNext) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tstyler.SetLevel(lineCurrent, lev);\n\n\t\t\tlineCurrent++;\n\t\t\tlineStartNext = styler.LineStart(lineCurrent + 1);\n\t\t\tlineStartNext = std::min(lineStartNext, endPos);\n\t\t\tlevelCurrent = levelNext;\n\t\t\tfoldPrev = foldCurrent;\n\t\t\tfoldCurrent = foldNext;\n\t\t}\n\t}\n}\n\n} // unnamed namespace end\n\nextern const LexerModule lmDart(SCLEX_DART, LexerDart::LexerFactoryDart, \"dart\", dartWordListDesc);\n" }, { "path": "lexers/LexDataflex.cxx", "content": "// Scintilla source code edit control\n/** @file LexDataflex.cxx\n ** Lexer for DataFlex.\n ** Based on LexPascal.cxx\n ** Written by Wil van Antwerpen, June 2019\n **/\n\n/*\n// The License.txt file describes the conditions under which this software may be distributed.\n\nA few words about features of LexDataflex...\n\nGenerally speaking LexDataflex tries to support all available DataFlex features (up\nto DataFlex 19.1 at this time).\n\n~ FOLDING:\n\nFolding is supported in the following cases:\n\n- Folding of stream-like comments\n- Folding of groups of consecutive line comments\n- Folding of preprocessor blocks (the following preprocessor blocks are\nsupported: #IFDEF, #IFNDEF, #ENDIF and #HEADER / #ENDHEADER \nblocks), \n- Folding of code blocks on appropriate keywords (the following code blocks are\nsupported: \"begin, struct, type, case / end\" blocks, class & object\ndeclarations and interface declarations)\n\nRemarks:\n\n- We pass 4 arrays to the lexer:\n1. The DataFlex keyword list, these are normal DataFlex keywords\n2. The Scope Open list, for example, begin / procedure / while\n3. The Scope Close list, for example, end / end_procedure / loop\n4. Operator list, for ex. + / - / * / Lt / iand\nThese lists are all mutually exclusive, scope open words should not be in the keyword list and vice versa\n\n- Folding of code blocks tries to handle all special cases in which folding\nshould not occur. \n\n~ KEYWORDS:\n\nThe list of keywords that can be used in dataflex.properties file (up to DataFlex\n19.1):\n\n- Keywords: .. snipped .. see dataflex.properties file.\n\n*/\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n\nstatic void GetRangeLowered(Sci_PositionU start,\n\t\tSci_PositionU end,\n\t\tAccessor &styler,\n\t\tchar *s,\n\t\tSci_PositionU len) {\n\tSci_PositionU i = 0;\n\twhile ((i < end - start + 1) && (i < len-1)) {\n\t\ts[i] = static_cast(tolower(styler[start + i]));\n\t\ti++;\n\t}\n\ts[i] = '\\0';\n}\n\nstatic void GetForwardRangeLowered(Sci_PositionU start,\n\t\tCharacterSet &charSet,\n\t\tAccessor &styler,\n\t\tchar *s,\n\t\tSci_PositionU len) {\n\tSci_PositionU i = 0;\n\twhile ((i < len-1) && charSet.Contains(styler.SafeGetCharAt(start + i))) {\n\t\ts[i] = static_cast(tolower(styler.SafeGetCharAt(start + i)));\n\t\ti++;\n\t}\n\ts[i] = '\\0';\n\n}\n\nenum {\n\tstateInICode = 0x1000,\n\tstateSingleQuoteOpen = 0x2000,\n\tstateDoubleQuoteOpen = 0x4000,\n\tstateFoldInPreprocessor = 0x0100,\n\tstateFoldInCaseStatement = 0x0200,\n\tstateFoldInPreprocessorLevelMask = 0x00FF,\n\tstateFoldMaskAll = 0x0FFF\n};\n\n\nstatic bool IsFirstDataFlexWord(Sci_Position pos, Accessor &styler) {\n\tSci_Position line = styler.GetLine(pos);\n\tSci_Position start_pos = styler.LineStart(line);\n\tfor (Sci_Position i = start_pos; i < pos; i++) {\n\t\tchar ch = styler.SafeGetCharAt(i);\n\t\tif (!(ch == ' ' || ch == '\\t'))\n\t\t\treturn false;\n\t}\n\treturn true;\n}\n\n\ninline bool IsADataFlexField(int ch) {\n\treturn (ch == '.');\n}\n\n\nstatic void ClassifyDataFlexWord(WordList *keywordlists[], StyleContext &sc, Accessor &styler) {\n\tWordList& keywords = *keywordlists[0];\n\tWordList& scopeOpen = *keywordlists[1];\n\tWordList& scopeClosed = *keywordlists[2];\n\tWordList& operators = *keywordlists[3];\n\n\tchar s[100];\n\tint oldState;\n\tint newState;\n\tsize_t tokenlen;\n\n oldState = sc.state;\n\tnewState = oldState;\n\tsc.GetCurrentLowered(s, sizeof(s));\n\ttokenlen = strnlen(s,sizeof(s));\n\tif (keywords.InList(s)) {\n\t\t// keywords in DataFlex can be used as table column names (file.field) and as such they\n\t\t// should not be characterized as a keyword. So test for that.\n\t\t// for ex. somebody using date as field name.\n if (!IsADataFlexField(sc.GetRelative(-static_cast(tokenlen+1)))) {\n\t newState = SCE_DF_WORD;\n\t }\n\t}\n\tif (oldState == newState) {\n\t\tif ((scopeOpen.InList(s) || scopeClosed.InList(s)) && (strcmp(s, \"for\") != 0) && (strcmp(s, \"repeat\") != 0)) {\n\t\t\t// scope words in DataFlex can be used as table column names (file.field) and as such they\n\t\t\t// should not be characterized as a scope word. So test for that.\n\t\t\t// for ex. somebody using procedure for field name.\n\t\t\tif (!IsADataFlexField(sc.GetRelative(-static_cast(tokenlen+1)))) {\n\t\t\t\tnewState = SCE_DF_SCOPEWORD;\n\t\t\t}\n\t\t} \n\t\t// no code folding on the next words, but just want to paint them like keywords (as they are) (??? doesn't the code to the opposite?)\n\t\tif (strcmp(s, \"if\") == 0 || \n\t\t\tstrcmp(s, \"ifnot\") == 0 ||\n\t\t\tstrcmp(s, \"case\") == 0 ||\n\t\t\tstrcmp(s, \"else\") == 0 ) {\n\t\t\t\tnewState = SCE_DF_SCOPEWORD;\n\t\t} \n\t}\n\tif (oldState != newState && newState == SCE_DF_WORD) {\n\t\t// a for loop must have for at the start of the line, for is also used in \"define abc for 123\"\n\t\tif ( (strcmp(s, \"for\") == 0) && (IsFirstDataFlexWord(sc.currentPos-3, styler)) ) { \n\t\t\t\tnewState = SCE_DF_SCOPEWORD;\n\t\t} \n\t}\n\tif (oldState != newState && newState == SCE_DF_WORD) {\n\t\t// a repeat loop must have repeat at the start of the line, repeat is also used in 'move (repeat(\"d\",5)) to sFoo'\n\t\tif ( (strcmp(s, \"repeat\") == 0) && (IsFirstDataFlexWord(sc.currentPos-6, styler)) ) { \n\t\t\t\tnewState = SCE_DF_SCOPEWORD;\n\t\t} \n\t}\n\tif (oldState == newState) {\n\t if (operators.InList(s)) {\n\t\t newState = SCE_DF_OPERATOR;\n\t\t} \n\t}\n\n\tif (oldState != newState) {\n\t\tsc.ChangeState(newState);\n\t}\n\tsc.SetState(SCE_DF_DEFAULT);\n}\n\nstatic void ColouriseDataFlexDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n\t\tAccessor &styler) {\n//\tbool bSmartHighlighting = styler.GetPropertyInt(\"lexer.dataflex.smart.highlighting\", 1) != 0;\n\n\t\t\tCharacterSet setWordStart(CharacterSet::setAlpha, \"_$#@\", 0x80, true);\n\t\t\tCharacterSet setWord(CharacterSet::setAlphaNum, \"_$#@\", 0x80, true);\n\tCharacterSet setNumber(CharacterSet::setDigits, \".-+eE\");\n\tCharacterSet setHexNumber(CharacterSet::setDigits, \"abcdefABCDEF\");\n\tCharacterSet setOperator(CharacterSet::setNone, \"*+-/<=>^\");\n\n\tSci_Position curLine = styler.GetLine(startPos);\n\tint curLineState = curLine > 0 ? styler.GetLineState(curLine - 1) : 0;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\tif (sc.atLineEnd) {\n\t\t\t// Update the line state, so it can be seen by next line\n\t\t\tcurLine = styler.GetLine(sc.currentPos);\n\t\t\tstyler.SetLineState(curLine, curLineState);\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_DF_NUMBER:\n\t\t\t\tif (!setNumber.Contains(sc.ch) || (sc.ch == '.' && sc.chNext == '.')) {\n\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t} else if (sc.ch == '-' || sc.ch == '+') {\n\t\t\t\t\tif (sc.chPrev != 'E' && sc.chPrev != 'e') {\n\t\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_IDENTIFIER:\n\t\t\t\tif (!setWord.Contains(sc.ch)) {\n\t\t\t\t\tClassifyDataFlexWord(keywordlists, sc, styler);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_HEXNUMBER:\n\t\t\t\tif (!(setHexNumber.Contains(sc.ch) || sc.ch == 'I') ) { // in |CI$22a we also want to color the \"I\"\n\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_METATAG:\n\t\t\t\tif (sc.atLineStart || sc.chPrev == '}') {\n\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_PREPROCESSOR:\n\t\t\t\tif (sc.atLineStart || IsASpaceOrTab(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_IMAGE:\n\t\t\t\tif (sc.atLineStart && sc.Match(\"/*\")) {\n\t\t\t\t\tsc.Forward(); // these characters are still part of the DF Image\n\t\t\t\t\tsc.ForwardSetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_PREPROCESSOR2:\n\t\t\t\t// we don't have inline comments or preprocessor2 commands\n\t\t\t\t//if (sc.Match('*', ')')) {\n\t\t\t\t//\tsc.Forward();\n\t\t\t\t//\tsc.ForwardSetState(SCE_DF_DEFAULT);\n\t\t\t\t//}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_STRING:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_DF_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\'' && sc.chNext == '\\'') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else if (sc.ch == '\\\"' && sc.chNext == '\\\"') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else if (sc.ch == '\\'' || sc.ch == '\\\"') {\n\t\t\t\t\tif (sc.ch == '\\'' && (curLineState & stateSingleQuoteOpen) ) {\n \t\t\t\t curLineState &= ~(stateSingleQuoteOpen);\n\t\t\t\t\tsc.ForwardSetState(SCE_DF_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t\telse if (sc.ch == '\\\"' && (curLineState & stateDoubleQuoteOpen) ) {\n \t\t\t\t curLineState &= ~(stateDoubleQuoteOpen);\n\t\t\t\t\tsc.ForwardSetState(SCE_DF_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_STRINGEOL:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_SCOPEWORD:\n\t\t\t\t//if (!setHexNumber.Contains(sc.ch) && sc.ch != '$') {\n\t\t\t\t//\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t//}\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_OPERATOR:\n//\t\t\t\tif (bSmartHighlighting && sc.chPrev == ';') {\n//\t\t\t\t\tcurLineState &= ~(stateInProperty | stateInExport);\n//\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_DF_ICODE:\n\t\t\t\tif (sc.atLineStart || IsASpace(sc.ch) || isoperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_DF_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_DF_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_DF_NUMBER);\n\t\t\t} else if (sc.Match('/', '/') || sc.Match(\"#REM\")) {\n\t\t\t\tsc.SetState(SCE_DF_COMMENTLINE);\n\t\t\t} else if ((sc.ch == '#' && !sc.Match(\"#REM\")) && IsFirstDataFlexWord(sc.currentPos, styler)) {\n\t\t\t\tsc.SetState(SCE_DF_PREPROCESSOR);\n\t\t\t// || (sc.ch == '|' && sc.chNext == 'C' && sc.GetRelativeCharacter(2) == 'I' && sc.GetRelativeCharacter(3) == '$') ) {\n\t\t\t} else if ((sc.ch == '$' && ((!setWord.Contains(sc.chPrev)) || sc.chPrev == 'I' ) ) || (sc.Match(\"|CI$\")) ) {\n\t\t\t\tsc.SetState(SCE_DF_HEXNUMBER); // start with $ and previous character not in a..zA..Z0..9 excluding \"I\" OR start with |CI$\n\t\t\t} else if (setWordStart.Contains(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_DF_IDENTIFIER);\n\t\t\t} else if (sc.ch == '{') {\n\t\t\t\tsc.SetState(SCE_DF_METATAG);\n\t\t\t//} else if (sc.Match(\"(*$\")) {\n\t\t\t//\tsc.SetState(SCE_DF_PREPROCESSOR2);\n\t\t\t} else if (sc.ch == '/' && setWord.Contains(sc.chNext) && sc.atLineStart) {\n\t\t\t\tsc.SetState(SCE_DF_IMAGE);\n\t\t\t//\tsc.Forward();\t// Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.ch == '\\'' || sc.ch == '\\\"') {\n\t\t\t\tif (sc.ch == '\\'' && !(curLineState & stateDoubleQuoteOpen)) {\n\t\t\t\t curLineState |= stateSingleQuoteOpen;\n\t\t\t\t} else if (sc.ch == '\\\"' && !(curLineState & stateSingleQuoteOpen)) {\n\t\t\t\t curLineState |= stateDoubleQuoteOpen;\n\t\t\t\t}\n\t\t\t sc.SetState(SCE_DF_STRING);\n\t\t\t} else if (setOperator.Contains(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_DF_OPERATOR);\n//\t\t\t} else if (curLineState & stateInICode) {\n\t\t\t\t// ICode start ! in a string followed by close string mark is not icode\n\t\t\t} else if ((sc.ch == '!') && !(sc.ch == '!' && ((sc.chNext == '\\\"') || (sc.ch == '\\'')) )) {\n\t\t\t\tsc.SetState(SCE_DF_ICODE);\n\t\t\t}\n\t\t}\n\t}\n\n\tif (sc.state == SCE_DF_IDENTIFIER && setWord.Contains(sc.chPrev)) {\n\t\tClassifyDataFlexWord(keywordlists, sc, styler);\n\t}\n\n\tsc.Complete();\n}\n\nstatic bool IsStreamCommentStyle(int style) {\n\treturn style == SCE_DF_IMAGE;\n}\n\nstatic bool IsCommentLine(Sci_Position line, Accessor &styler) {\n\tSci_Position pos = styler.LineStart(line);\n\tSci_Position eolPos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eolPos; i++) {\n\t\tchar ch = styler[i];\n\t\tchar chNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styler.StyleAt(i);\n\t\tif (ch == '/' && chNext == '/' && style == SCE_DF_COMMENTLINE) {\n\t\t\treturn true;\n\t\t} else if (!IsASpaceOrTab(ch)) {\n\t\t\treturn false;\n\t\t}\n\t}\n\treturn false;\n}\n\n\n\nstatic unsigned int GetFoldInPreprocessorLevelFlag(int lineFoldStateCurrent) {\n\treturn lineFoldStateCurrent & stateFoldInPreprocessorLevelMask;\n}\n\nstatic void SetFoldInPreprocessorLevelFlag(int &lineFoldStateCurrent, unsigned int nestLevel) {\n\tlineFoldStateCurrent &= ~stateFoldInPreprocessorLevelMask;\n\tlineFoldStateCurrent |= nestLevel & stateFoldInPreprocessorLevelMask;\n}\n\nstatic int ClassifyDataFlexPreprocessorFoldPoint(int &levelCurrent, int &lineFoldStateCurrent,\n\t\tSci_PositionU startPos, Accessor &styler) {\n\tCharacterSet setWord(CharacterSet::setAlpha);\n\n\tchar s[100];\t// Size of the longest possible keyword + one additional character + null\n\tGetForwardRangeLowered(startPos, setWord, styler, s, sizeof(s));\n\tsize_t iLen = strnlen(s,sizeof(s));\n\tsize_t iWordSize = 0;\n\n\tunsigned int nestLevel = GetFoldInPreprocessorLevelFlag(lineFoldStateCurrent);\n\n\tif (strcmp(s, \"command\") == 0 ||\n\t\t// The #if/#ifdef etcetera commands are not currently foldable as it is easy to write code that\n\t\t// breaks the collaps logic, so we keep things simple and not include that for now.\n\t\tstrcmp(s, \"header\") == 0) {\n\t\tnestLevel++;\n\t\tSetFoldInPreprocessorLevelFlag(lineFoldStateCurrent, nestLevel);\n\t\tlineFoldStateCurrent |= stateFoldInPreprocessor;\n\t\tlevelCurrent++;\n\t\tiWordSize = iLen;\n\t} else if (strcmp(s, \"endcommand\") == 0 ||\n\t\tstrcmp(s, \"endheader\") == 0) {\n\t\tnestLevel--;\n\t\tSetFoldInPreprocessorLevelFlag(lineFoldStateCurrent, nestLevel);\n\t\tif (nestLevel == 0) {\n\t\t\tlineFoldStateCurrent &= ~stateFoldInPreprocessor;\n\t\t}\n\t\tlevelCurrent--;\n\t\tiWordSize = iLen;\n\t\tif (levelCurrent < SC_FOLDLEVELBASE) {\n\t\t\tlevelCurrent = SC_FOLDLEVELBASE;\n\t\t}\n\t}\n\treturn static_cast(iWordSize);\n}\n\n\nstatic void ClassifyDataFlexWordFoldPoint(int &levelCurrent, int &lineFoldStateCurrent,\n\t\tSci_PositionU lastStart, Sci_PositionU currentPos, WordList *[], Accessor &styler) {\n\tchar s[100];\n\n\t// property fold.dataflex.compilerlist\n\t//\tSet to 1 for enabling the code folding feature in *.prn files\n\tbool foldPRN = styler.GetPropertyInt(\"fold.dataflex.compilerlist\",0) != 0;\n\n\tGetRangeLowered(lastStart, currentPos, styler, s, sizeof(s));\n\n\tif (strcmp(s, \"case\") == 0) {\n\t\tlineFoldStateCurrent |= stateFoldInCaseStatement;\n\t} else if (strcmp(s, \"begin\") == 0) {\n\t\tlevelCurrent++;\n\t} else if (strcmp(s, \"for\") == 0 ||\n\t\tstrcmp(s, \"while\") == 0 ||\n\t\tstrcmp(s, \"repeat\") == 0 ||\n\t\tstrcmp(s, \"for_all\") == 0 ||\n\t\tstrcmp(s, \"struct\") == 0 ||\n\t\tstrcmp(s, \"type\") == 0 ||\n\t\tstrcmp(s, \"begin_row\") == 0 ||\n\t\tstrcmp(s, \"item_list\") == 0 ||\n\t\tstrcmp(s, \"begin_constraints\") == 0 ||\n\t\tstrcmp(s, \"begin_transaction\") == 0 ||\n\t\tstrcmp(s, \"enum_list\") == 0 ||\n\t\tstrcmp(s, \"class\") == 0 || \n\t\tstrcmp(s, \"object\") == 0 ||\n\t\tstrcmp(s, \"cd_popup_object\") == 0 ||\n\t\tstrcmp(s, \"procedure\") == 0 ||\n\t\tstrcmp(s, \"procedure_section\") == 0 ||\n\t\tstrcmp(s, \"function\") == 0 ) {\n\t\t\tif ((IsFirstDataFlexWord(lastStart, styler )) || foldPRN) {\n\t\t\tlevelCurrent++;\n\t\t\t}\n\t} else if (strcmp(s, \"end\") == 0) { // end is not always the first keyword, for example \"case end\"\n\t\tlevelCurrent--;\n\t\tif (levelCurrent < SC_FOLDLEVELBASE) {\n\t\t\tlevelCurrent = SC_FOLDLEVELBASE;\n\t\t}\n\t} else if (strcmp(s, \"loop\") == 0 ||\n\t\t\t\t strcmp(s, \"until\") == 0 ||\n\t\t\t\t strcmp(s, \"end_class\") == 0 ||\n\t\t\t\t strcmp(s, \"end_object\") == 0 ||\n\t\t\t\t strcmp(s, \"cd_end_object\") == 0 ||\n\t\t\t\t strcmp(s, \"end_procedure\") == 0 ||\n\t\t\t\t strcmp(s, \"end_function\") == 0 ||\n\t\t\t\t strcmp(s, \"end_for_all\") == 0 ||\n\t\t\t\t strcmp(s, \"end_struct\") == 0 ||\n\t\t\t\t strcmp(s, \"end_type\") == 0 ||\n\t\t\t\t strcmp(s, \"end_row\") == 0 ||\n\t\t\t\t strcmp(s, \"end_item_list\") == 0 ||\n\t\t\t\t strcmp(s, \"end_constraints\") == 0 ||\n\t\t\t\t strcmp(s, \"end_transaction\") == 0 ||\n\t\t\t\t strcmp(s, \"end_enum_list\") == 0 ) {\n\t//\t\tlineFoldStateCurrent &= ~stateFoldInRecord;\n\t\t\tif ((IsFirstDataFlexWord(lastStart, styler )) || foldPRN) {\n\t\t\t\tlevelCurrent--;\n\t\t\t\tif (levelCurrent < SC_FOLDLEVELBASE) {\n\t\t\t\t\tlevelCurrent = SC_FOLDLEVELBASE;\n\t\t\t\t}\n\t\t\t}\n\t}\n\n}\n\n\nstatic void ClassifyDataFlexMetaDataFoldPoint(int &levelCurrent, \n\t\tSci_PositionU lastStart, Sci_PositionU currentPos, WordList *[], Accessor &styler) {\n\tchar s[100];\n\n\tGetRangeLowered(lastStart, currentPos, styler, s, sizeof(s));\n\n if (strcmp(s, \"#beginsection\") == 0) {\n\t\tlevelCurrent++;\n\t} else if (strcmp(s, \"#endsection\") == 0) {\n\t\t\tlevelCurrent--;\n\t\t\tif (levelCurrent < SC_FOLDLEVELBASE) {\n\t\t\t\tlevelCurrent = SC_FOLDLEVELBASE;\n\t\t\t}\n\t}\n\n}\n\nstatic void FoldDataFlexDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n\t\tAccessor &styler) {\n\tbool foldComment = styler.GetPropertyInt(\"fold.comment\") != 0;\n\tbool foldPreprocessor = styler.GetPropertyInt(\"fold.preprocessor\") != 0;\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tint lineFoldStateCurrent = lineCurrent > 0 ? styler.GetLineState(lineCurrent - 1) & stateFoldMaskAll : 0;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\tint iWordSize;\n\n\tSci_Position lastStart = 0;\n\tCharacterSet setWord(CharacterSet::setAlphaNum, \"_$#@\", 0x80, true);\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\t\tif (foldComment && IsStreamCommentStyle(style)) {\n\t\t\tif (!IsStreamCommentStyle(stylePrev)) {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (!IsStreamCommentStyle(styleNext)) {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\tif (foldComment && atEOL && IsCommentLine(lineCurrent, styler))\n\t\t{\n\t\t\tif (!IsCommentLine(lineCurrent - 1, styler)\n\t\t\t && IsCommentLine(lineCurrent + 1, styler))\n\t\t\t\tlevelCurrent++;\n\t\t\telse if (IsCommentLine(lineCurrent - 1, styler)\n\t\t\t && !IsCommentLine(lineCurrent+1, styler))\n\t\t\t\tlevelCurrent--;\n\t\t}\n\t\tif (foldPreprocessor) {\n\t\t\tif (style == SCE_DF_PREPROCESSOR) {\n\t\t\t\tiWordSize = ClassifyDataFlexPreprocessorFoldPoint(levelCurrent, lineFoldStateCurrent, i + 1, styler);\n\t\t\t//} else if (style == SCE_DF_PREPROCESSOR2 && ch == '(' && chNext == '*'\n\t\t\t// && styler.SafeGetCharAt(i + 2) == '$') {\n\t\t\t//\tClassifyDataFlexPreprocessorFoldPoint(levelCurrent, lineFoldStateCurrent, i + 3, styler);\n\t\t\t\ti = i + iWordSize;\n\t\t\t}\n\t\t}\n\n\t\tif (stylePrev != SCE_DF_SCOPEWORD && style == SCE_DF_SCOPEWORD)\n\t\t{\n\t\t\t// Store last word start point.\n\t\t\tlastStart = i;\n\t\t}\n\t\tif (stylePrev == SCE_DF_SCOPEWORD) {\n\t\t\tif(setWord.Contains(ch) && !setWord.Contains(chNext)) {\n\t\t\t\tClassifyDataFlexWordFoldPoint(levelCurrent, lineFoldStateCurrent, lastStart, i, keywordlists, styler);\n\t\t\t}\n\t\t}\n\n\t\tif (stylePrev == SCE_DF_METATAG && ch == '#')\n\t\t{\n\t\t\t// Store last word start point.\n\t\t\tlastStart = i;\n\t\t}\n\t\tif (stylePrev == SCE_DF_METATAG) {\n\t\t\tif(setWord.Contains(ch) && !setWord.Contains(chNext)) {\n\t\t\t\tClassifyDataFlexMetaDataFoldPoint(levelCurrent, lastStart, i, keywordlists, styler);\n\t\t\t}\n\t\t}\n\n\t\tif (!IsASpace(ch))\n\t\t\tvisibleChars++;\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tint newLineState = (styler.GetLineState(lineCurrent) & ~stateFoldMaskAll) | lineFoldStateCurrent;\n\t\t\tstyler.SetLineState(lineCurrent, newLineState);\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t}\n\n\t// If we didn't reach the EOL in previous loop, store line level and whitespace information.\n\t// The rest will be filled in later...\n\tint lev = levelPrev;\n\tif (visibleChars == 0 && foldCompact)\n\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\tstyler.SetLevel(lineCurrent, lev);\n}\n\nstatic const char * const dataflexWordListDesc[] = {\n\t\"Keywords\",\n\t\"Scope open\",\n\t\"Scope close\",\n\t\"Operators\",\n\t0\n};\n\nextern const LexerModule lmDataflex(SCLEX_DATAFLEX, ColouriseDataFlexDoc, \"dataflex\", FoldDataFlexDoc, dataflexWordListDesc);\n" }, { "path": "lexers/LexDiff.cxx", "content": "// Scintilla source code edit control\n/** @file LexDiff.cxx\n ** Lexer for diff results.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nnamespace {\n\ninline bool AtEOL(Accessor &styler, Sci_PositionU i) {\n\treturn (styler[i] == '\\n') ||\n\t ((styler[i] == '\\r') && (styler.SafeGetCharAt(i + 1) != '\\n'));\n}\n\nvoid ColouriseDiffLine(const char *lineBuffer, Sci_Position endLine, Accessor &styler) {\n\t// It is needed to remember the current state to recognize starting\n\t// comment lines before the first \"diff \" or \"--- \". If a real\n\t// difference starts then each line starting with ' ' is a whitespace\n\t// otherwise it is considered a comment (Only in..., Binary file...)\n\tif (0 == strncmp(lineBuffer, \"diff \", 5)) {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_COMMAND);\n\t} else if (0 == strncmp(lineBuffer, \"Index: \", 7)) { // For subversion's diff\n\t\tstyler.ColourTo(endLine, SCE_DIFF_COMMAND);\n\t} else if (0 == strncmp(lineBuffer, \"---\", 3) && lineBuffer[3] != '-') {\n\t\t// In a context diff, --- appears in both the header and the position markers\n\t\tif (lineBuffer[3] == ' ' && atoi(lineBuffer + 4) && !strchr(lineBuffer, '/'))\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t\telse if (lineBuffer[3] == '\\r' || lineBuffer[3] == '\\n')\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t\telse if (lineBuffer[3] == ' ')\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_HEADER);\n\t\telse\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_DELETED);\n\t} else if (0 == strncmp(lineBuffer, \"+++ \", 4)) {\n\t\t// I don't know of any diff where \"+++ \" is a position marker, but for\n\t\t// consistency, do the same as with \"--- \" and \"*** \".\n\t\tif (atoi(lineBuffer+4) && !strchr(lineBuffer, '/'))\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t\telse\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_HEADER);\n\t} else if (0 == strncmp(lineBuffer, \"====\", 4)) { // For p4's diff\n\t\tstyler.ColourTo(endLine, SCE_DIFF_HEADER);\n\t} else if (0 == strncmp(lineBuffer, \"***\", 3)) {\n\t\t// In a context diff, *** appears in both the header and the position markers.\n\t\t// Also ******** is a chunk header, but here it's treated as part of the\n\t\t// position marker since there is no separate style for a chunk header.\n\t\tif (lineBuffer[3] == ' ' && atoi(lineBuffer+4) && !strchr(lineBuffer, '/'))\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t\telse if (lineBuffer[3] == '*')\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t\telse\n\t\t\tstyler.ColourTo(endLine, SCE_DIFF_HEADER);\n\t} else if (0 == strncmp(lineBuffer, \"? \", 2)) { // For difflib\n\t\tstyler.ColourTo(endLine, SCE_DIFF_HEADER);\n\t} else if (lineBuffer[0] == '@') {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t} else if (lineBuffer[0] >= '0' && lineBuffer[0] <= '9') {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_POSITION);\n\t} else if (0 == strncmp(lineBuffer, \"++\", 2)) {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_PATCH_ADD);\n\t} else if (0 == strncmp(lineBuffer, \"+-\", 2)) {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_PATCH_DELETE);\n\t} else if (0 == strncmp(lineBuffer, \"-+\", 2)) {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_REMOVED_PATCH_ADD);\n\t} else if (0 == strncmp(lineBuffer, \"--\", 2)) {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_REMOVED_PATCH_DELETE);\n\t} else if (lineBuffer[0] == '-' || lineBuffer[0] == '<') {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_DELETED);\n\t} else if (lineBuffer[0] == '+' || lineBuffer[0] == '>') {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_ADDED);\n\t} else if (lineBuffer[0] == '!') {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_CHANGED);\n\t} else if (lineBuffer[0] != ' ') {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_COMMENT);\n\t} else {\n\t\tstyler.ColourTo(endLine, SCE_DIFF_DEFAULT);\n\t}\n}\n\nvoid ColouriseDiffDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {\n\tstd::string lineBuffer;\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\tfor (Sci_PositionU i = startPos; i < startPos + length; i++) {\n\t\tif (AtEOL(styler, i)) {\n\t\t\tColouriseDiffLine(lineBuffer.c_str(), i, styler);\n\t\t\tlineBuffer.clear();\n\t\t} else {\n\t\t\tlineBuffer.push_back(styler[i]);\n\t\t}\n\t}\n\tif (!lineBuffer.empty()) {\t// Last line does not have ending characters\n\t\tColouriseDiffLine(lineBuffer.c_str(), startPos + length - 1, styler);\n\t}\n}\n\nvoid FoldDiffDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {\n\tSci_Position curLine = styler.GetLine(startPos);\n\tSci_Position curLineStart = styler.LineStart(curLine);\n\tint prevLevel = curLine > 0 ? styler.LevelAt(curLine - 1) : SC_FOLDLEVELBASE;\n\n\tdo {\n\t\tint nextLevel = 0;\n\t\tconst int lineType = styler.StyleAt(curLineStart);\n\t\tif (lineType == SCE_DIFF_COMMAND)\n\t\t\tnextLevel = SC_FOLDLEVELBASE | SC_FOLDLEVELHEADERFLAG;\n\t\telse if (lineType == SCE_DIFF_HEADER)\n\t\t\tnextLevel = (SC_FOLDLEVELBASE + 1) | SC_FOLDLEVELHEADERFLAG;\n\t\telse if (lineType == SCE_DIFF_POSITION && styler[curLineStart] != '-')\n\t\t\tnextLevel = (SC_FOLDLEVELBASE + 2) | SC_FOLDLEVELHEADERFLAG;\n\t\telse if (prevLevel & SC_FOLDLEVELHEADERFLAG)\n\t\t\tnextLevel = (prevLevel & SC_FOLDLEVELNUMBERMASK) + 1;\n\t\telse\n\t\t\tnextLevel = prevLevel;\n\n\t\tif ((nextLevel & SC_FOLDLEVELHEADERFLAG) && (nextLevel == prevLevel))\n\t\t\tstyler.SetLevel(curLine-1, prevLevel & ~SC_FOLDLEVELHEADERFLAG);\n\n\t\tstyler.SetLevel(curLine, nextLevel);\n\t\tprevLevel = nextLevel;\n\n\t\tcurLineStart = styler.LineStart(++curLine);\n\t} while (static_cast(startPos)+length > curLineStart);\n}\n\nconst char *const emptyWordListDesc[] = {\n\tnullptr\n};\n\n}\n\nextern const LexerModule lmDiff(SCLEX_DIFF, ColouriseDiffDoc, \"diff\", FoldDiffDoc, emptyWordListDesc);\n" }, { "path": "lexers/LexECL.cxx", "content": "// Scintilla source code edit control\n/** @file LexECL.cxx\n ** Lexer for ECL.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#ifdef _MSC_VER\n#pragma warning(disable: 4786)\n#endif\n#ifdef __BORLANDC__\n// Borland C++ displays warnings in vector header without this\n#pragma option -w-ccc -w-rch\n#endif\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"PropSetSimple.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n\n#define SET_LOWER \"abcdefghijklmnopqrstuvwxyz\"\n#define SET_UPPER \"ABCDEFGHIJKLMNOPQRSTUVWXYZ\"\n#define SET_DIGITS \"0123456789\"\n\nusing namespace Lexilla;\n\nstatic bool IsSpaceEquiv(int state) {\n\tswitch (state) {\n\tcase SCE_ECL_DEFAULT:\n\tcase SCE_ECL_COMMENT:\n\tcase SCE_ECL_COMMENTLINE:\n\tcase SCE_ECL_COMMENTLINEDOC:\n\tcase SCE_ECL_COMMENTDOCKEYWORD:\n\tcase SCE_ECL_COMMENTDOCKEYWORDERROR:\n\tcase SCE_ECL_COMMENTDOC:\n\t\treturn true;\n\n\tdefault:\n\t\treturn false;\n\t}\n}\n\nstatic void ColouriseEclDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\tWordList &keywords0 = *keywordlists[0];\n\tWordList &keywords1 = *keywordlists[1];\n\tWordList &keywords2 = *keywordlists[2];\n\tWordList &keywords3 = *keywordlists[3]; //Value Types\n\tWordList &keywords4 = *keywordlists[4];\n\tWordList &keywords5 = *keywordlists[5];\n\tWordList &keywords6 = *keywordlists[6];\t//Javadoc Tags\n\tWordList cplusplus;\n\tcplusplus.Set(\"beginc endc\");\n\n\tbool stylingWithinPreprocessor = false;\n\n\tCharacterSet setOKBeforeRE(CharacterSet::setNone, \"(=,\");\n\tCharacterSet setDoxygen(CharacterSet::setLower, \"$@\\\\&<>#{}[]\");\n\tCharacterSet setWordStart(CharacterSet::setAlpha, \"_\", 0x80, true);\n\tCharacterSet setWord(CharacterSet::setAlphaNum, \"._\", 0x80, true);\n\tCharacterSet setQualified(CharacterSet::setNone, \"uUxX\");\n\n\tint chPrevNonWhite = ' ';\n\tint visibleChars = 0;\n\tbool lastWordWasUUID = false;\n\tint styleBeforeDCKeyword = SCE_ECL_DEFAULT;\n\tbool continuationLine = false;\n\n\tif (initStyle == SCE_ECL_PREPROCESSOR) {\n\t\t// Set continuationLine if last character of previous line is '\\'\n\t\tSci_Position lineCurrent = styler.GetLine(startPos);\n\t\tif (lineCurrent > 0) {\n\t\t\tint chBack = styler.SafeGetCharAt(startPos-1, 0);\n\t\t\tint chBack2 = styler.SafeGetCharAt(startPos-2, 0);\n\t\t\tint lineEndChar = '!';\n\t\t\tif (chBack2 == '\\r' && chBack == '\\n') {\n\t\t\t\tlineEndChar = styler.SafeGetCharAt(startPos-3, 0);\n\t\t\t} else if (chBack == '\\n' || chBack == '\\r') {\n\t\t\t\tlineEndChar = chBack2;\n\t\t\t}\n\t\t\tcontinuationLine = lineEndChar == '\\\\';\n\t\t}\n\t}\n\n\t// look back to set chPrevNonWhite properly for better regex colouring\n\tif (startPos > 0) {\n\t\tSci_Position back = startPos;\n\t\twhile (--back && IsSpaceEquiv(styler.StyleAt(back)))\n\t\t\t;\n\t\tif (styler.StyleAt(back) == SCE_ECL_OPERATOR) {\n\t\t\tchPrevNonWhite = styler.SafeGetCharAt(back);\n\t\t}\n\t}\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\tif (sc.atLineStart) {\n\t\t\tif (sc.state == SCE_ECL_STRING) {\n\t\t\t\t// Prevent SCE_ECL_STRINGEOL from leaking back to previous line which\n\t\t\t\t// ends with a line continuation by locking in the state upto this position.\n\t\t\t\tsc.SetState(SCE_ECL_STRING);\n\t\t\t}\n\t\t\t// Reset states to begining of colourise so no surprises\n\t\t\t// if different sets of lines lexed.\n\t\t\tvisibleChars = 0;\n\t\t\tlastWordWasUUID = false;\n\t\t}\n\n\t\t// Handle line continuation generically.\n\t\tif (sc.ch == '\\\\') {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinuationLine = true;\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_ECL_ADDED:\n\t\t\tcase SCE_ECL_DELETED:\n\t\t\tcase SCE_ECL_CHANGED:\n\t\t\tcase SCE_ECL_MOVED:\n\t\t\tif (sc.atLineStart)\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_OPERATOR:\n\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_NUMBER:\n\t\t\t\t// We accept almost anything because of hex. and number suffixes\n\t\t\t\tif (!setWord.Contains(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_IDENTIFIER:\n\t\t\t\tif (!setWord.Contains(sc.ch) || (sc.ch == '.')) {\n\t\t\t\t\tchar s[1000];\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\tif (keywords0.InList(s)) {\n\t\t\t\t\t\tlastWordWasUUID = strcmp(s, \"uuid\") == 0;\n\t\t\t\t\t\tsc.ChangeState(SCE_ECL_WORD0);\n\t\t\t\t\t} else if (keywords1.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ECL_WORD1);\n\t\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ECL_WORD2);\n\t\t\t\t\t} else if (keywords4.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ECL_WORD4);\n\t\t\t\t\t} else if (keywords5.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ECL_WORD5);\n\t\t\t\t\t}\n\t\t\t\t\telse\t//Data types are of from KEYWORD##\n\t\t\t\t\t{\n\t\t\t\t\t\tint i = static_cast(strlen(s)) - 1;\n\t\t\t\t\t\twhile(i >= 0 && (isdigit(s[i]) || s[i] == '_'))\n\t\t\t\t\t\t\t--i;\n\n\t\t\t\t\t\tchar s2[1000];\n\t\t\t\t\t\tstrncpy(s2, s, i + 1);\n\t\t\t\t\t\ts2[i + 1] = 0;\n\t\t\t\t\t\tif (keywords3.InList(s2)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_ECL_WORD3);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_PREPROCESSOR:\n\t\t\t\tif (sc.atLineStart && !continuationLine) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t} else if (stylingWithinPreprocessor) {\n\t\t\t\t\tif (IsASpace(sc.ch)) {\n\t\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tif (sc.Match('/', '*') || sc.Match('/', '/')) {\n\t\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_COMMENT:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_COMMENTDOC:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_ECL_DEFAULT);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '*') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = SCE_ECL_COMMENTDOC;\n\t\t\t\t\t\tsc.SetState(SCE_ECL_COMMENTDOCKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_COMMENTLINEDOC:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '/' || sc.chPrev == '!') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = SCE_ECL_COMMENTLINEDOC;\n\t\t\t\t\t\tsc.SetState(SCE_ECL_COMMENTDOCKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_COMMENTDOCKEYWORD:\n\t\t\t\tif ((styleBeforeDCKeyword == SCE_ECL_COMMENTDOC) && sc.Match('*', '/')) {\n\t\t\t\t\tsc.ChangeState(SCE_ECL_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(SCE_ECL_DEFAULT);\n\t\t\t\t} else if (!setDoxygen.Contains(sc.ch)) {\n\t\t\t\t\tchar s[1000];\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\tif (!IsASpace(sc.ch) || !keywords6.InList(s+1)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ECL_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(styleBeforeDCKeyword);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_STRING:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_ECL_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tsc.ForwardSetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_CHARACTER:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_ECL_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\tsc.ForwardSetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_REGEX:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t} else if (sc.ch == '/') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\twhile ((sc.ch < 0x80) && islower(sc.ch))\n\t\t\t\t\t\tsc.Forward(); // gobble regex flags\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\t// Gobble up the quoted character\n\t\t\t\t\tif (sc.chNext == '\\\\' || sc.chNext == '/') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_STRINGEOL:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_VERBATIM:\n\t\t\t\tif (sc.ch == '\\\"') {\n\t\t\t\t\tif (sc.chNext == '\\\"') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ECL_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_ECL_UUID:\n\t\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n' || sc.ch == ')') {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tSci_Position lineCurrent = styler.GetLine(sc.currentPos);\n\t\tint lineState = styler.GetLineState(lineCurrent);\n\t\tif (sc.state == SCE_ECL_DEFAULT) {\n\t\t\tif (lineState) {\n\t\t\t\tsc.SetState(lineState);\n\t\t\t}\n\t\t\telse if (sc.Match('@', '\\\"')) {\n\t\t\t\tsc.SetState(SCE_ECL_VERBATIM);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (setQualified.Contains(sc.ch) && sc.chNext == '\\'') {\n\t\t\t\tsc.SetState(SCE_ECL_CHARACTER);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tif (lastWordWasUUID) {\n\t\t\t\t\tsc.SetState(SCE_ECL_UUID);\n\t\t\t\t\tlastWordWasUUID = false;\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_ECL_NUMBER);\n\t\t\t\t}\n\t\t\t} else if (setWordStart.Contains(sc.ch) || (sc.ch == '@')) {\n\t\t\t\tif (lastWordWasUUID) {\n\t\t\t\t\tsc.SetState(SCE_ECL_UUID);\n\t\t\t\t\tlastWordWasUUID = false;\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_ECL_IDENTIFIER);\n\t\t\t\t}\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tif (sc.Match(\"/**\") || sc.Match(\"/*!\")) {\t// Support of Qt/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_ECL_COMMENTDOC);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_ECL_COMMENT);\n\t\t\t\t}\n\t\t\t\tsc.Forward();\t// Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\tif ((sc.Match(\"///\") && !sc.Match(\"////\")) || sc.Match(\"//!\"))\n\t\t\t\t\t// Support of Qt/Doxygen doc. style\n\t\t\t\t\tsc.SetState(SCE_ECL_COMMENTLINEDOC);\n\t\t\t\telse\n\t\t\t\t\tsc.SetState(SCE_ECL_COMMENTLINE);\n\t\t\t} else if (sc.ch == '/' && setOKBeforeRE.Contains(chPrevNonWhite)) {\n\t\t\t\tsc.SetState(SCE_ECL_REGEX);\t// JavaScript's RegEx\n//\t\t\t} else if (sc.ch == '\\\"') {\n//\t\t\t\tsc.SetState(SCE_ECL_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_ECL_CHARACTER);\n\t\t\t} else if (sc.ch == '#' && visibleChars == 0) {\n\t\t\t\t// Preprocessor commands are alone on their line\n\t\t\t\tsc.SetState(SCE_ECL_PREPROCESSOR);\n\t\t\t\t// Skip whitespace between # and preprocessor word\n\t\t\t\tdo {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} while ((sc.ch == ' ' || sc.ch == '\\t') && sc.More());\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.SetState(SCE_ECL_DEFAULT);\n\t\t\t\t}\n\t\t\t} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_ECL_OPERATOR);\n\t\t\t}\n\t\t}\n\n\t\tif (!IsASpace(sc.ch) && !IsSpaceEquiv(sc.state)) {\n\t\t\tchPrevNonWhite = sc.ch;\n\t\t\tvisibleChars++;\n\t\t}\n\t\tcontinuationLine = false;\n\t}\n\tsc.Complete();\n\n}\n\nstatic bool IsStreamCommentStyle(int style) {\n\treturn style == SCE_ECL_COMMENT ||\n\t\tstyle == SCE_ECL_COMMENTDOC ||\n\t\tstyle == SCE_ECL_COMMENTDOCKEYWORD ||\n\t\tstyle == SCE_ECL_COMMENTDOCKEYWORDERROR;\n}\n\nstatic bool MatchNoCase(Accessor & styler, Sci_PositionU & pos, const char *s) {\n\tSci_Position i=0;\n\tfor (; *s; i++) {\n\t\tchar compare_char = tolower(*s);\n\t\tchar styler_char = tolower(styler.SafeGetCharAt(pos+i));\n\t\tif (compare_char != styler_char)\n\t\t\treturn false;\n\t\ts++;\n\t}\n\tpos+=i-1;\n\treturn true;\n}\n\n\n// Store both the current line's fold level and the next lines in the\n// level store to make it easy to pick up with each increment\n// and to make it possible to fiddle the current level for \"} else {\".\nstatic void FoldEclDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n\t\t\t\t\t WordList *[], Accessor &styler) {\n\tbool foldComment = true;\n\tbool foldPreprocessor = true;\n\tbool foldCompact = true;\n\tbool foldAtElse = true;\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelCurrent = styler.LevelAt(lineCurrent-1) >> 16;\n\tint levelMinCurrent = levelCurrent;\n\tint levelNext = levelCurrent;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (foldComment && IsStreamCommentStyle(style)) {\n\t\t\tif (!IsStreamCommentStyle(stylePrev) && (stylePrev != SCE_ECL_COMMENTLINEDOC)) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (!IsStreamCommentStyle(styleNext) && (styleNext != SCE_ECL_COMMENTLINEDOC) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (foldComment && (style == SCE_ECL_COMMENTLINE)) {\n\t\t\tif ((ch == '/') && (chNext == '/')) {\n\t\t\t\tchar chNext2 = styler.SafeGetCharAt(i + 2);\n\t\t\t\tif (chNext2 == '{') {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (chNext2 == '}') {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (foldPreprocessor && (style == SCE_ECL_PREPROCESSOR)) {\n\t\t\tif (ch == '#') {\n\t\t\t\tSci_PositionU j = i + 1;\n\t\t\t\twhile ((j < endPos) && IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\tj++;\n\t\t\t\t}\n\t\t\t\tif (MatchNoCase(styler, j, \"region\") || MatchNoCase(styler, j, \"if\")) {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if (MatchNoCase(styler, j, \"endregion\") || MatchNoCase(styler, j, \"end\")) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\tif (style == SCE_ECL_OPERATOR) {\n\t\t\tif (ch == '{') {\n\t\t\t\t// Measure the minimum before a '{' to allow\n\t\t\t\t// folding on \"} else {\"\n\t\t\t\tif (levelMinCurrent > levelNext) {\n\t\t\t\t\tlevelMinCurrent = levelNext;\n\t\t\t\t}\n\t\t\t\tlevelNext++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (style == SCE_ECL_WORD2) {\n\t\t\tif (MatchNoCase(styler, i, \"record\") || MatchNoCase(styler, i, \"transform\") || MatchNoCase(styler, i, \"type\") || MatchNoCase(styler, i, \"function\") ||\n\t\t\t\tMatchNoCase(styler, i, \"module\") || MatchNoCase(styler, i, \"service\") || MatchNoCase(styler, i, \"interface\") || MatchNoCase(styler, i, \"ifblock\") ||\n\t\t\t\tMatchNoCase(styler, i, \"macro\") || MatchNoCase(styler, i, \"beginc++\")) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (MatchNoCase(styler, i, \"endmacro\") || MatchNoCase(styler, i, \"endc++\") || MatchNoCase(styler, i, \"end\")) {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\t\tif (atEOL || (i == endPos-1)) {\n\t\t\tint levelUse = levelCurrent;\n\t\t\tif (foldAtElse) {\n\t\t\t\tlevelUse = levelMinCurrent;\n\t\t\t}\n\t\t\tint lev = levelUse | levelNext << 16;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif (levelUse < levelNext)\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelCurrent = levelNext;\n\t\t\tlevelMinCurrent = levelCurrent;\n\t\t\tif (atEOL && (i == static_cast(styler.Length()-1))) {\n\t\t\t\t// There is an empty line at end of file so give it same level and empty\n\t\t\t\tstyler.SetLevel(lineCurrent, (levelCurrent | levelCurrent << 16) | SC_FOLDLEVELWHITEFLAG);\n\t\t\t}\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!IsASpace(ch))\n\t\t\tvisibleChars++;\n\t}\n}\n\nstatic const char * const EclWordListDesc[] = {\n\t\"Keywords\",\n\t0\n};\n\nextern const LexerModule lmECL(\n SCLEX_ECL,\n ColouriseEclDoc,\n \"ecl\",\n FoldEclDoc,\n EclWordListDesc);\n" }, { "path": "lexers/LexEDIFACT.cxx", "content": "// Scintilla Lexer for EDIFACT\n// @file LexEDIFACT.cxx\n// Written by Iain Clarke, IMCSoft & Inobiz AB.\n// EDIFACT documented here: https://www.unece.org/cefact/edifact/welcome.html\n// and more readably here: https://en.wikipedia.org/wiki/EDIFACT\n// This code is subject to the same license terms as the rest of the scintilla project:\n// The License.txt file describes the conditions under which this software may be distributed.\n//\n\n// Header order must match order in scripts/HeaderOrder.txt\n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"LexAccessor.h\"\n#include \"LexerModule.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nclass LexerEDIFACT : public DefaultLexer\n{\npublic:\n\tLexerEDIFACT();\n\tvirtual ~LexerEDIFACT() {} // virtual destructor, as we inherit from ILexer\n\n\tstatic ILexer5 *Factory() {\n\t\treturn new LexerEDIFACT;\n\t}\n\n\tint SCI_METHOD Version() const override\n\t{\n\t\treturn lvRelease5;\n\t}\n\tvoid SCI_METHOD Release() override\n\t{\n\t\tdelete this;\n\t}\n\n\tconst char * SCI_METHOD PropertyNames() override\n\t{\n\t\treturn \"fold\\nlexer.edifact.highlight.un.all\";\n\t}\n\tint SCI_METHOD PropertyType(const char *) override\n\t{\n\t\treturn SC_TYPE_BOOLEAN; // Only one property!\n\t}\n\tconst char * SCI_METHOD DescribeProperty(const char *name) override\n\t{\n\t\tif (!strcmp(name, \"fold\"))\n\t\t\treturn \"Whether to apply folding to document or not\";\n\t\tif (!strcmp(name, \"lexer.edifact.highlight.un.all\"))\n\t\t\treturn \"Whether to apply UN* highlighting to all UN segments, or just to UNH\";\n\t\treturn NULL;\n\t}\n\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override\n\t{\n\t\tif (!strcmp(key, \"fold\"))\n\t\t{\n\t\t\tm_bFold = strcmp(val, \"0\") ? true : false;\n\t\t\treturn 0;\n\t\t}\n\t\tif (!strcmp(key, \"lexer.edifact.highlight.un.all\"))\t// GetProperty\n\t\t{\n\t\t\tm_bHighlightAllUN = strcmp(val, \"0\") ? true : false;\n\t\t\treturn 0;\n\t\t}\n\t\treturn -1;\n\t}\n\n\tconst char * SCI_METHOD PropertyGet(const char *key) override\n\t{\n\t\tm_lastPropertyValue = \"\";\n\t\tif (!strcmp(key, \"fold\"))\n\t\t{\n\t\t\tm_lastPropertyValue = m_bFold ? \"1\" : \"0\";\n\t\t}\n\t\tif (!strcmp(key, \"lexer.edifact.highlight.un.all\"))\t// GetProperty\n\t\t{\n\t\t\tm_lastPropertyValue = m_bHighlightAllUN ? \"1\" : \"0\";\n\t\t}\n\t\treturn m_lastPropertyValue.c_str();\n\t}\n\n\tconst char * SCI_METHOD DescribeWordListSets() override\n\t{\n\t\treturn NULL;\n\t}\n\tSci_Position SCI_METHOD WordListSet(int, const char *) override\n\t{\n\t\treturn -1;\n\t}\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid * SCI_METHOD PrivateCall(int, void *) override\n\t{\n\t\treturn NULL;\n\t}\n\nprotected:\n\tSci_Position InitialiseFromUNA(IDocument *pAccess, Sci_PositionU MaxLength);\n\tSci_Position FindPreviousEnd(IDocument *pAccess, Sci_Position startPos) const;\n\tSci_Position ForwardPastWhitespace(IDocument *pAccess, Sci_Position startPos, Sci_Position MaxLength) const;\n\tint DetectSegmentHeader(char SegmentHeader[3]) const;\n\n\tbool m_bFold;\n\n\t// property lexer.edifact.highlight.un.all\n\t//\tSet to 0 to highlight only UNA segments, or 1 to highlight all UNx segments.\n\tbool m_bHighlightAllUN;\n\n\tchar m_chComponent;\n\tchar m_chData;\n\tchar m_chDecimal;\n\tchar m_chRelease;\n\tchar m_chSegment;\n\n\tstd::string m_lastPropertyValue;\n};\n\nextern const LexerModule lmEDIFACT(SCLEX_EDIFACT, LexerEDIFACT::Factory, \"edifact\");\n\n///////////////////////////////////////////////////////////////////////////////\n\n\n\n///////////////////////////////////////////////////////////////////////////////\n\nLexerEDIFACT::LexerEDIFACT() : DefaultLexer(\"edifact\", SCLEX_EDIFACT)\n{\n\tm_bFold = false;\n\tm_bHighlightAllUN = false;\n\tm_chComponent = ':';\n\tm_chData = '+';\n\tm_chDecimal = '.';\n\tm_chRelease = '?';\n\tm_chSegment = '\\'';\n}\n\nvoid LexerEDIFACT::Lex(Sci_PositionU startPos, Sci_Position length, int, IDocument *pAccess)\n{\n\tSci_PositionU posFinish = startPos + length;\n\tInitialiseFromUNA(pAccess, posFinish);\n\n\t// Look backwards for a ' or a document beginning\n\tSci_PositionU posCurrent = FindPreviousEnd(pAccess, startPos);\n\t// And jump past the ' if this was not the beginning of the document\n\tif (posCurrent != 0)\n\t\tposCurrent++;\n\n\t// Style buffer, so we're not issuing loads of notifications\n\tLexAccessor styler (pAccess);\n\tpAccess->StartStyling(posCurrent);\n\tstyler.StartSegment(posCurrent);\n\tSci_Position posSegmentStart = -1;\n\n\twhile ((posCurrent < posFinish) && (posSegmentStart == -1))\n\t{\n\t\tposCurrent = ForwardPastWhitespace(pAccess, posCurrent, posFinish);\n\t\t// Mark whitespace as default\n\t\tif (posCurrent > 0)\n\t\t\tstyler.ColourTo(posCurrent - 1, SCE_EDI_DEFAULT);\n\t\tif (posCurrent >= posFinish)\n\t\t\tbreak;\n\n\t\t// Does is start with 3 charaters? ie, UNH\n\t\tchar SegmentHeader[4] = { 0 };\n\t\tpAccess->GetCharRange(SegmentHeader, posCurrent, 3);\n\n\t\tint SegmentStyle = DetectSegmentHeader(SegmentHeader);\n\t\tif (SegmentStyle == SCE_EDI_BADSEGMENT)\n\t\t\tbreak;\n\t\tif (SegmentStyle == SCE_EDI_UNA)\n\t\t{\n\t\t\tposCurrent += 9;\n\t\t\tstyler.ColourTo(posCurrent - 1, SCE_EDI_UNA); // UNA\n\t\t\tcontinue;\n\t\t}\n\t\tposSegmentStart = posCurrent;\n\t\tposCurrent += 3;\n\n\t\tstyler.ColourTo(posCurrent - 1, SegmentStyle); // UNH etc\n\n\t\t// Colour in the rest of the segment\n\t\tfor (char c; posCurrent < posFinish; posCurrent++)\n\t\t{\n\t\t\tpAccess->GetCharRange(&c, posCurrent, 1);\n\n\t\t\tif (c == m_chRelease) // ? escape character, check first, in case of ?'\n\t\t\t\tposCurrent++;\n\t\t\telse if (c == m_chSegment) // '\n\t\t\t{\n\t\t\t\t// Make sure the whole segment is on one line. styler won't let us go back in time, so we'll settle for marking the ' as bad.\n\t\t\t\tSci_Position lineSegmentStart = pAccess->LineFromPosition(posSegmentStart);\n\t\t\t\tSci_Position lineSegmentEnd = pAccess->LineFromPosition(posCurrent);\n\t\t\t\tif (lineSegmentStart == lineSegmentEnd)\n\t\t\t\t\tstyler.ColourTo(posCurrent, SCE_EDI_SEGMENTEND);\n\t\t\t\telse\n\t\t\t\t\tstyler.ColourTo(posCurrent, SCE_EDI_BADSEGMENT);\n\t\t\t\tposSegmentStart = -1;\n\t\t\t\tposCurrent++;\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\telse if (c == m_chComponent) // :\n\t\t\t\tstyler.ColourTo(posCurrent, SCE_EDI_SEP_COMPOSITE);\n\t\t\telse if (c == m_chData) // +\n\t\t\t\tstyler.ColourTo(posCurrent, SCE_EDI_SEP_ELEMENT);\n\t\t\telse\n\t\t\t\tstyler.ColourTo(posCurrent, SCE_EDI_DEFAULT);\n\t\t}\n\t}\n\tstyler.Flush();\n\n\tif (posSegmentStart == -1)\n\t\treturn;\n\n\tpAccess->StartStyling(posSegmentStart);\n\tpAccess->SetStyleFor(posFinish - posSegmentStart, SCE_EDI_BADSEGMENT);\n}\n\nvoid LexerEDIFACT::Fold(Sci_PositionU startPos, Sci_Position length, int, IDocument *pAccess)\n{\n\tif (!m_bFold)\n\t\treturn;\n\n\tSci_PositionU endPos = startPos + length;\n\tstartPos = FindPreviousEnd(pAccess, startPos);\n\tchar c;\n\tchar SegmentHeader[4] = { 0 };\n\n\tbool AwaitingSegment = true;\n\tSci_PositionU currLine = pAccess->LineFromPosition(startPos);\n\tint levelCurrentStyle = SC_FOLDLEVELBASE;\n\tif (currLine > 0)\n\t\tlevelCurrentStyle = pAccess->GetLevel(currLine - 1); // bottom 12 bits are level\n\tint indentCurrent = levelCurrentStyle & SC_FOLDLEVELNUMBERMASK;\n\tint indentNext = indentCurrent;\n\n\twhile (startPos < endPos)\n\t{\n\t\tpAccess->GetCharRange(&c, startPos, 1);\n\t\tswitch (c)\n\t\t{\n\t\tcase '\\t':\n\t\tcase '\\r':\n\t\tcase ' ':\n\t\t\tstartPos++;\n\t\t\tcontinue;\n\t\tcase '\\n':\n\t\t\tcurrLine = pAccess->LineFromPosition(startPos);\n\t\t\tpAccess->SetLevel(currLine, levelCurrentStyle | indentCurrent);\n\t\t\tstartPos++;\n\t\t\tlevelCurrentStyle = SC_FOLDLEVELBASE;\n\t\t\tindentCurrent = indentNext;\n\t\t\tcontinue;\n\t\t}\n\t\tif (c == m_chRelease)\n\t\t{\n\t\t\tstartPos += 2;\n\t\t\tcontinue;\n\t\t}\n\t\tif (c == m_chSegment)\n\t\t{\n\t\t\tAwaitingSegment = true;\n\t\t\tstartPos++;\n\t\t\tcontinue;\n\t\t}\n\n\t\tif (!AwaitingSegment)\n\t\t{\n\t\t\tstartPos++;\n\t\t\tcontinue;\n\t\t}\n\t\t\n\t\t// Segment!\n\t\tpAccess->GetCharRange(SegmentHeader, startPos, 3);\n\t\tif (SegmentHeader[0] != 'U' || SegmentHeader[1] != 'N')\n\t\t{\n\t\t\tstartPos++;\n\t\t\tcontinue;\n\t\t}\n\n\t\tAwaitingSegment = false;\n\t\tswitch (SegmentHeader[2])\n\t\t{\n\t\tcase 'H':\n\t\tcase 'G':\n\t\t\tindentNext++;\n\t\t\tlevelCurrentStyle = SC_FOLDLEVELBASE | SC_FOLDLEVELHEADERFLAG;\n\t\t\tbreak;\n\n\t\tcase 'T':\n\t\tcase 'E':\n\t\t\tif (indentNext > 0)\n\t\t\t\tindentNext--;\n\t\t\tbreak;\n\t\t}\n\n\t\tstartPos += 3;\n\t}\n}\n\nSci_Position LexerEDIFACT::InitialiseFromUNA(IDocument *pAccess, Sci_PositionU MaxLength)\n{\n\tMaxLength -= 9; // drop 9 chars, to give us room for UNA:+.? '\n\n\tSci_PositionU startPos = 0;\n\tstartPos += ForwardPastWhitespace(pAccess, 0, MaxLength);\n\tif (startPos < MaxLength)\n\t{\n\t\tchar bufUNA[9];\n\t\tpAccess->GetCharRange(bufUNA, startPos, 9);\n\n\t\t// Check it's UNA segment\n\t\tif (!memcmp(bufUNA, \"UNA\", 3))\n\t\t{\n\t\t\tm_chComponent = bufUNA[3];\n\t\t\tm_chData = bufUNA[4];\n\t\t\tm_chDecimal = bufUNA[5];\n\t\t\tm_chRelease = bufUNA[6];\n\t\t\t// bufUNA [7] should be space - reserved.\n\t\t\tm_chSegment = bufUNA[8];\n\n\t\t\treturn 0; // success!\n\t\t}\n\t}\n\n\t// We failed to find a UNA, so drop to defaults\n\tm_chComponent = ':';\n\tm_chData = '+';\n\tm_chDecimal = '.';\n\tm_chRelease = '?';\n\tm_chSegment = '\\'';\n\n\treturn -1;\n}\n\nSci_Position LexerEDIFACT::ForwardPastWhitespace(IDocument *pAccess, Sci_Position startPos, Sci_Position MaxLength) const\n{\n\tchar c;\n\n\twhile (startPos < MaxLength)\n\t{\n\t\tpAccess->GetCharRange(&c, startPos, 1);\n\t\tswitch (c)\n\t\t{\n\t\tcase '\\t':\n\t\tcase '\\r':\n\t\tcase '\\n':\n\t\tcase ' ':\n\t\t\tbreak;\n\t\tdefault:\n\t\t\treturn startPos;\n\t\t}\n\n\t\tstartPos++;\n\t}\n\n\treturn MaxLength;\n}\n\nint LexerEDIFACT::DetectSegmentHeader(char SegmentHeader[3]) const\n{\n\tif (\n\t\tSegmentHeader[0] < 'A' || SegmentHeader[0] > 'Z' ||\n\t\tSegmentHeader[1] < 'A' || SegmentHeader[1] > 'Z' ||\n\t\tSegmentHeader[2] < 'A' || SegmentHeader[2] > 'Z')\n\t\treturn SCE_EDI_BADSEGMENT;\n\n\tif (!memcmp(SegmentHeader, \"UNA\", 3))\n\t\treturn SCE_EDI_UNA;\n\n\tif (m_bHighlightAllUN && !memcmp(SegmentHeader, \"UN\", 2))\n\t\treturn SCE_EDI_UNH;\n\telse if (!memcmp(SegmentHeader, \"UNH\", 3))\n\t\treturn SCE_EDI_UNH;\n\telse if (!memcmp(SegmentHeader, \"UNG\", 3))\n\t\treturn SCE_EDI_UNH;\n\n\treturn SCE_EDI_SEGMENTSTART;\n}\n\n// Look backwards for a ' or a document beginning\nSci_Position LexerEDIFACT::FindPreviousEnd(IDocument *pAccess, Sci_Position startPos) const\n{\n\tfor (char c; startPos > 0; startPos--)\n\t{\n\t\tpAccess->GetCharRange(&c, startPos, 1);\n\t\tif (c == m_chSegment)\n\t\t\treturn startPos;\n\t}\n\t// We didn't find a ', so just go with the beginning\n\treturn 0;\n}\n\n\n" }, { "path": "lexers/LexEScript.cxx", "content": "// Scintilla source code edit control\n/** @file LexEScript.cxx\n ** Lexer for ESCRIPT\n **/\n// Copyright 2003 by Patrizio Bekerle (patrizio@bekerle.com)\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '.' || ch == '_');\n}\n\nstatic inline bool IsAWordStart(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_');\n}\n\n\n\nstatic void ColouriseESCRIPTDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n\n\t// Do not leak onto next line\n\t/*if (initStyle == SCE_ESCRIPT_STRINGEOL)\n\t\tinitStyle = SCE_ESCRIPT_DEFAULT;*/\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tbool caseSensitive = styler.GetPropertyInt(\"escript.case.sensitive\", 0) != 0;\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\t/*if (sc.atLineStart && (sc.state == SCE_ESCRIPT_STRING)) {\n\t\t\t// Prevent SCE_ESCRIPT_STRINGEOL from leaking back to previous line\n\t\t\tsc.SetState(SCE_ESCRIPT_STRING);\n\t\t}*/\n\n\t\t// Handle line continuation generically.\n\t\tif (sc.ch == '\\\\') {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_ESCRIPT_OPERATOR || sc.state == SCE_ESCRIPT_BRACE) {\n\t\t\tsc.SetState(SCE_ESCRIPT_DEFAULT);\n\t\t} else if (sc.state == SCE_ESCRIPT_NUMBER) {\n\t\t\tif (!IsADigit(sc.ch) || sc.ch != '.') {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_ESCRIPT_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch) || (sc.ch == '.')) {\n\t\t\t\tchar s[100];\n\t\t\t\tif (caseSensitive) {\n\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t} else {\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t}\n\n//\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\n if (keywords.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ESCRIPT_WORD);\n\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ESCRIPT_WORD2);\n\t\t\t\t} else if (keywords3.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_ESCRIPT_WORD3);\n // sc.state = SCE_ESCRIPT_IDENTIFIER;\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_ESCRIPT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_ESCRIPT_COMMENT) {\n\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_ESCRIPT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_ESCRIPT_COMMENTDOC) {\n\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_ESCRIPT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_ESCRIPT_COMMENTLINE) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_ESCRIPT_STRING) {\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\\\') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_ESCRIPT_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_ESCRIPT_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_NUMBER);\n\t\t\t} else if (IsAWordStart(sc.ch) || (sc.ch == '#')) {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_IDENTIFIER);\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_COMMENT);\n\t\t\t\tsc.Forward();\t// Eat the * so it isn't used for the end of the comment\n\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_COMMENTLINE);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_STRING);\n\t\t\t\t//} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t} else if (sc.ch == '+' || sc.ch == '-' || sc.ch == '*' || sc.ch == '/' || sc.ch == '=' || sc.ch == '<' || sc.ch == '>' || sc.ch == '&' || sc.ch == '|' || sc.ch == '!' || sc.ch == '?' || sc.ch == ':') {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_OPERATOR);\n\t\t\t} else if (sc.ch == '{' || sc.ch == '}') {\n\t\t\t\tsc.SetState(SCE_ESCRIPT_BRACE);\n\t\t\t}\n\t\t}\n\n\t}\n\tsc.Complete();\n}\n\n\nstatic int classifyFoldPointESCRIPT(const char* s, const char* prevWord) {\n\tint lev = 0;\n\tif (strcmp(prevWord, \"end\") == 0) return lev;\n\tif ((strcmp(prevWord, \"else\") == 0 && strcmp(s, \"if\") == 0) || strcmp(s, \"elseif\") == 0)\n\t\treturn -1;\n\n if (strcmp(s, \"for\") == 0 || strcmp(s, \"foreach\") == 0\n\t || strcmp(s, \"program\") == 0 || strcmp(s, \"function\") == 0\n\t || strcmp(s, \"while\") == 0 || strcmp(s, \"case\") == 0\n\t || strcmp(s, \"if\") == 0 ) {\n\t\tlev = 1;\n\t} else if ( strcmp(s, \"endfor\") == 0 || strcmp(s, \"endforeach\") == 0\n\t || strcmp(s, \"endprogram\") == 0 || strcmp(s, \"endfunction\") == 0\n\t || strcmp(s, \"endwhile\") == 0 || strcmp(s, \"endcase\") == 0\n\t || strcmp(s, \"endif\") == 0 ) {\n\t\tlev = -1;\n\t}\n\n\treturn lev;\n}\n\n\nstatic bool IsStreamCommentStyle(int style) {\n\treturn style == SCE_ESCRIPT_COMMENT ||\n\t style == SCE_ESCRIPT_COMMENTDOC ||\n\t style == SCE_ESCRIPT_COMMENTLINE;\n}\n\nstatic void FoldESCRIPTDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *[], Accessor &styler) {\n\t//~ bool foldComment = styler.GetPropertyInt(\"fold.comment\") != 0;\n\t// Do not know how to fold the comment at the moment.\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n bool foldComment = true;\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\n\tSci_Position lastStart = 0;\n\tchar prevWord[32] = \"\";\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\n\t\tif (foldComment && IsStreamCommentStyle(style)) {\n\t\t\tif (!IsStreamCommentStyle(stylePrev)) {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (!IsStreamCommentStyle(styleNext) && !atEOL) {\n\t\t\t\t// Comments don't end at end of line and the next character may be unstyled.\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\n\t\tif (foldComment && (style == SCE_ESCRIPT_COMMENTLINE)) {\n\t\t\tif ((ch == '/') && (chNext == '/')) {\n\t\t\t\tchar chNext2 = styler.SafeGetCharAt(i + 2);\n\t\t\t\tif (chNext2 == '{') {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t} else if (chNext2 == '}') {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t\tif (stylePrev == SCE_ESCRIPT_DEFAULT && style == SCE_ESCRIPT_WORD3)\n\t\t{\n\t\t\t// Store last word start point.\n\t\t\tlastStart = i;\n\t\t}\n\n\t\tif (style == SCE_ESCRIPT_WORD3) {\n\t\t\tif(iswordchar(ch) && !iswordchar(chNext)) {\n\t\t\t\tchar s[32];\n\t\t\t\tSci_PositionU j;\n\t\t\t\tfor(j = 0; ( j < 31 ) && ( j < i-lastStart+1 ); j++) {\n\t\t\t\t\ts[j] = static_cast(tolower(styler[lastStart + j]));\n\t\t\t\t}\n\t\t\t\ts[j] = '\\0';\n\t\t\t\tlevelCurrent += classifyFoldPointESCRIPT(s, prevWord);\n\t\t\t\tstrcpy(prevWord, s);\n\t\t\t}\n\t\t}\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t\tstrcpy(prevWord, \"\");\n\t\t}\n\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\n\n\nstatic const char * const ESCRIPTWordLists[] = {\n\t\"Primary keywords and identifiers\",\n\t\"Intrinsic functions\",\n\t\"Extended and user defined functions\",\n\t0,\n};\n\nextern const LexerModule lmESCRIPT(SCLEX_ESCRIPT, ColouriseESCRIPTDoc, \"escript\", FoldESCRIPTDoc, ESCRIPTWordLists);\n" }, { "path": "lexers/LexEiffel.cxx", "content": "// Scintilla source code edit control\n/** @file LexEiffel.cxx\n ** Lexer for Eiffel.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool isEiffelOperator(unsigned int ch) {\n\t// '.' left out as it is used to make up numbers\n\treturn ch == '*' || ch == '/' || ch == '\\\\' || ch == '-' || ch == '+' ||\n\t ch == '(' || ch == ')' || ch == '=' ||\n\t ch == '{' || ch == '}' || ch == '~' ||\n\t ch == '[' || ch == ']' || ch == ';' ||\n\t ch == '<' || ch == '>' || ch == ',' ||\n\t ch == '.' || ch == '^' || ch == '%' || ch == ':' ||\n\t\tch == '!' || ch == '@' || ch == '?';\n}\n\nstatic inline bool IsAWordChar(unsigned int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_');\n}\n\nstatic inline bool IsAWordStart(unsigned int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_');\n}\n\nstatic void ColouriseEiffelDoc(Sci_PositionU startPos,\n Sci_Position length,\n int initStyle,\n WordList *keywordlists[],\n Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.state == SCE_EIFFEL_STRINGEOL) {\n\t\t\tif (sc.ch != '\\r' && sc.ch != '\\n') {\n\t\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_EIFFEL_OPERATOR) {\n\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t} else if (sc.state == SCE_EIFFEL_WORD) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tif (!keywords.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_EIFFEL_IDENTIFIER);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_EIFFEL_NUMBER) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_EIFFEL_COMMENTLINE) {\n\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n') {\n\t\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_EIFFEL_STRING) {\n\t\t\tif (sc.ch == '%') {\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_EIFFEL_CHARACTER) {\n\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n') {\n\t\t\t\tsc.SetState(SCE_EIFFEL_STRINGEOL);\n\t\t\t} else if (sc.ch == '%') {\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.SetState(SCE_EIFFEL_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\tif (sc.state == SCE_EIFFEL_DEFAULT) {\n\t\t\tif (sc.ch == '-' && sc.chNext == '-') {\n\t\t\t\tsc.SetState(SCE_EIFFEL_COMMENTLINE);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_EIFFEL_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_EIFFEL_CHARACTER);\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.')) {\n\t\t\t\tsc.SetState(SCE_EIFFEL_NUMBER);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_EIFFEL_WORD);\n\t\t\t} else if (isEiffelOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_EIFFEL_OPERATOR);\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic bool IsEiffelComment(Accessor &styler, Sci_Position pos, Sci_Position len) {\n\treturn len>1 && styler[pos]=='-' && styler[pos+1]=='-';\n}\n\nstatic void FoldEiffelDocIndent(Sci_PositionU startPos, Sci_Position length, int,\n\t\t\t\t\t\t WordList *[], Accessor &styler) {\n\tSci_Position lengthDoc = startPos + length;\n\n\t// Backtrack to previous line in case need to fix its fold status\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tif (startPos > 0) {\n\t\tif (lineCurrent > 0) {\n\t\t\tlineCurrent--;\n\t\t\tstartPos = styler.LineStart(lineCurrent);\n\t\t}\n\t}\n\tint spaceFlags = 0;\n\tint indentCurrent = styler.IndentAmount(lineCurrent, &spaceFlags, IsEiffelComment);\n\tchar chNext = styler[startPos];\n\tfor (Sci_Position i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif ((ch == '\\r' && chNext != '\\n') || (ch == '\\n') || (i == lengthDoc)) {\n\t\t\tint lev = indentCurrent;\n\t\t\tint indentNext = styler.IndentAmount(lineCurrent + 1, &spaceFlags, IsEiffelComment);\n\t\t\tif (!(indentCurrent & SC_FOLDLEVELWHITEFLAG)) {\n\t\t\t\t// Only non whitespace lines can be headers\n\t\t\t\tif ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext & SC_FOLDLEVELNUMBERMASK)) {\n\t\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t} else if (indentNext & SC_FOLDLEVELWHITEFLAG) {\n\t\t\t\t\t// Line after is blank so check the next - maybe should continue further?\n\t\t\t\t\tint spaceFlags2 = 0;\n\t\t\t\t\tint indentNext2 = styler.IndentAmount(lineCurrent + 2, &spaceFlags2, IsEiffelComment);\n\t\t\t\t\tif ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext2 & SC_FOLDLEVELNUMBERMASK)) {\n\t\t\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tindentCurrent = indentNext;\n\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\tlineCurrent++;\n\t\t}\n\t}\n}\n\nstatic void FoldEiffelDocKeyWords(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, WordList *[],\n Accessor &styler) {\n\tSci_PositionU lengthDoc = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint stylePrev = 0;\n\tint styleNext = styler.StyleAt(startPos);\n\t// lastDeferred should be determined by looking back to last keyword in case\n\t// the \"deferred\" is on a line before \"class\"\n\tbool lastDeferred = false;\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif ((stylePrev != SCE_EIFFEL_WORD) && (style == SCE_EIFFEL_WORD)) {\n\t\t\tchar s[20];\n\t\t\tSci_PositionU j = 0;\n\t\t\twhile ((j < (sizeof(s) - 1)) && (iswordchar(styler[i + j]))) {\n\t\t\t\ts[j] = styler[i + j];\n\t\t\t\tj++;\n\t\t\t}\n\t\t\ts[j] = '\\0';\n\n\t\t\tif (\n\t\t\t\t(strcmp(s, \"check\") == 0) ||\n\t\t\t\t(strcmp(s, \"debug\") == 0) ||\n\t\t\t\t(strcmp(s, \"deferred\") == 0) ||\n\t\t\t\t(strcmp(s, \"do\") == 0) ||\n\t\t\t\t(strcmp(s, \"from\") == 0) ||\n\t\t\t\t(strcmp(s, \"if\") == 0) ||\n\t\t\t\t(strcmp(s, \"inspect\") == 0) ||\n\t\t\t\t(strcmp(s, \"once\") == 0)\n\t\t\t)\n\t\t\t\tlevelCurrent++;\n\t\t\tif (!lastDeferred && (strcmp(s, \"class\") == 0))\n\t\t\t\tlevelCurrent++;\n\t\t\tif (strcmp(s, \"end\") == 0)\n\t\t\t\tlevelCurrent--;\n\t\t\tlastDeferred = strcmp(s, \"deferred\") == 0;\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t\tstylePrev = style;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nstatic const char * const eiffelWordListDesc[] = {\n\t\"Keywords\",\n\t0\n};\n\nextern const LexerModule lmEiffel(SCLEX_EIFFEL, ColouriseEiffelDoc, \"eiffel\", FoldEiffelDocIndent, eiffelWordListDesc);\nextern const LexerModule lmEiffelkw(SCLEX_EIFFELKW, ColouriseEiffelDoc, \"eiffelkw\", FoldEiffelDocKeyWords, eiffelWordListDesc);\n" }, { "path": "lexers/LexErlang.cxx", "content": "// Scintilla source code edit control\n// Encoding: UTF-8\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n/** @file LexErlang.cxx\n ** Lexer for Erlang.\n ** Enhanced by Etienne 'Lenain' Girondel (lenaing@gmail.com)\n ** Originally wrote by Peter-Henry Mander,\n ** based on Matlab lexer by José Fonseca.\n **/\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic int is_radix(int radix, int ch) {\n\tint digit;\n\n\tif (36 < radix || 2 > radix)\n\t\treturn 0;\n\n\tif (isdigit(ch)) {\n\t\tdigit = ch - '0';\n\t} else if (isalnum(ch)) {\n\t\tdigit = toupper(ch) - 'A' + 10;\n\t} else {\n\t\treturn 0;\n\t}\n\n\treturn (digit < radix);\n}\n\ntypedef enum {\n\tSTATE_NULL,\n\tCOMMENT,\n\tCOMMENT_FUNCTION,\n\tCOMMENT_MODULE,\n\tCOMMENT_DOC,\n\tCOMMENT_DOC_MACRO,\n\tATOM_UNQUOTED,\n\tATOM_QUOTED,\n\tNODE_NAME_UNQUOTED,\n\tNODE_NAME_QUOTED,\n\tMACRO_START,\n\tMACRO_UNQUOTED,\n\tMACRO_QUOTED,\n\tRECORD_START,\n\tRECORD_UNQUOTED,\n\tRECORD_QUOTED,\n\tNUMERAL_START,\n\tNUMERAL_BASE_VALUE,\n\tNUMERAL_FLOAT,\n\tNUMERAL_EXPONENT,\n\tPREPROCESSOR\n} atom_parse_state_t;\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (ch != ' ') && (isalnum(ch) || ch == '_');\n}\n\nstatic void ColouriseErlangDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n\t\t\t\t\t\t\t\tWordList *keywordlists[], Accessor &styler) {\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\tWordList &reservedWords = *keywordlists[0];\n\tWordList &erlangBIFs = *keywordlists[1];\n\tWordList &erlangPreproc = *keywordlists[2];\n\tWordList &erlangModulesAtt = *keywordlists[3];\n\tWordList &erlangDoc = *keywordlists[4];\n\tWordList &erlangDocMacro = *keywordlists[5];\n\tint radix_digits = 0;\n\tint exponent_digits = 0;\n\tatom_parse_state_t parse_state = STATE_NULL;\n\tatom_parse_state_t old_parse_state = STATE_NULL;\n\tbool to_late_to_comment = false;\n\tchar cur[100];\n\tint old_style = SCE_ERLANG_DEFAULT;\n\n\tstyler.StartAt(startPos);\n\n\tfor (; sc.More(); sc.Forward()) {\n\t\tint style = SCE_ERLANG_DEFAULT;\n\t\tif (STATE_NULL != parse_state) {\n\n\t\t\tswitch (parse_state) {\n\n\t\t\t\tcase STATE_NULL : sc.SetState(SCE_ERLANG_DEFAULT); break;\n\n\t\t\t/* COMMENTS ------------------------------------------------------*/\n\t\t\t\tcase COMMENT : {\n\t\t\t\t\tif (sc.ch != '%') {\n\t\t\t\t\t\tto_late_to_comment = true;\n\t\t\t\t\t} else if (!to_late_to_comment && sc.ch == '%') {\n\t\t\t\t\t\t// Switch to comment level 2 (Function)\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_COMMENT_FUNCTION);\n\t\t\t\t\t\told_style = SCE_ERLANG_COMMENT_FUNCTION;\n\t\t\t\t\t\tparse_state = COMMENT_FUNCTION;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// V--- Falling through!\n\t\t\t\t// Falls through.\n\t\t\t\tcase COMMENT_FUNCTION : {\n\t\t\t\t\tif (sc.ch != '%') {\n\t\t\t\t\t\tto_late_to_comment = true;\n\t\t\t\t\t} else if (!to_late_to_comment && sc.ch == '%') {\n\t\t\t\t\t\t// Switch to comment level 3 (Module)\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_COMMENT_MODULE);\n\t\t\t\t\t\told_style = SCE_ERLANG_COMMENT_MODULE;\n\t\t\t\t\t\tparse_state = COMMENT_MODULE;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\t// V--- Falling through!\n\t\t\t\t// Falls through.\n\t\t\t\tcase COMMENT_MODULE : {\n\t\t\t\t\tif (parse_state != COMMENT) {\n\t\t\t\t\t\t// Search for comment documentation\n\t\t\t\t\t\tif (sc.chNext == '@') {\n\t\t\t\t\t\t\told_parse_state = parse_state;\n\t\t\t\t\t\t\tparse_state = ('{' == sc.ch)\n\t\t\t\t\t\t\t\t\t\t\t? COMMENT_DOC_MACRO\n\t\t\t\t\t\t\t\t\t\t\t: COMMENT_DOC;\n\t\t\t\t\t\t\tsc.ForwardSetState(sc.state);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\n\t\t\t\t\t// All comments types fall here.\n\t\t\t\t\tif (sc.MatchLineEnd()) {\n\t\t\t\t\t\tto_late_to_comment = false;\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t\tcase COMMENT_DOC :\n\t\t\t\t// V--- Falling through!\n\t\t\t\tcase COMMENT_DOC_MACRO : {\n\n\t\t\t\t\tif (!isalnum(sc.ch)) {\n\t\t\t\t\t\t// Try to match documentation comment\n\t\t\t\t\t\tsc.GetCurrent(cur, sizeof(cur));\n\n\t\t\t\t\t\tif (parse_state == COMMENT_DOC_MACRO\n\t\t\t\t\t\t\t&& erlangDocMacro.InList(cur)) {\n\t\t\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_COMMENT_DOC_MACRO);\n\t\t\t\t\t\t\t\twhile (sc.ch != '}' && !sc.atLineEnd)\n\t\t\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t} else if (erlangDoc.InList(cur)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_COMMENT_DOC);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.ChangeState(old_style);\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\t// Switch back to old state\n\t\t\t\t\t\tsc.SetState(old_style);\n\t\t\t\t\t\tparse_state = old_parse_state;\n\t\t\t\t\t}\n\n\t\t\t\t\tif (sc.MatchLineEnd()) {\n\t\t\t\t\t\tto_late_to_comment = false;\n\t\t\t\t\t\tsc.ChangeState(old_style);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* -------------------------------------------------------------- */\n\t\t\t/* Atoms ---------------------------------------------------------*/\n\t\t\t\tcase ATOM_UNQUOTED : {\n\t\t\t\t\tif ('@' == sc.ch){\n\t\t\t\t\t\tparse_state = NODE_NAME_UNQUOTED;\n\t\t\t\t\t} else if (sc.ch == ':') {\n\t\t\t\t\t\t// Searching for module name\n\t\t\t\t\t\tif (sc.chNext == ' ') {\n\t\t\t\t\t\t\t// error\n\t\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t\tif (isalnum(sc.ch) || (sc.ch == '\\'')) {\n\t\t\t\t\t\t\t\tsc.GetCurrent(cur, sizeof(cur));\n\t\t\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_MODULES);\n\t\t\t\t\t\t\t\tsc.SetState(SCE_ERLANG_MODULES);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tif (sc.ch == '\\'') {\n\t\t\t\t\t\t\t\tparse_state = ATOM_QUOTED;\n\t\t\t\t\t\t\t}\n\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (!IsAWordChar(sc.ch)) {\n\n\t\t\t\t\t\tsc.GetCurrent(cur, sizeof(cur));\n\t\t\t\t\t\tif (reservedWords.InList(cur)) {\n\t\t\t\t\t\t\tstyle = SCE_ERLANG_KEYWORD;\n\t\t\t\t\t\t} else if (erlangBIFs.InList(cur)\n\t\t\t\t\t\t\t\t\t&& strcmp(cur,\"erlang:\")){\n\t\t\t\t\t\t\tstyle = SCE_ERLANG_BIFS;\n\t\t\t\t\t\t} else if (sc.ch == '(' || '/' == sc.ch){\n\t\t\t\t\t\t\tstyle = SCE_ERLANG_FUNCTION_NAME;\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tstyle = SCE_ERLANG_ATOM;\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\tsc.ChangeState(style);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\n\t\t\t\t} break;\n\n\t\t\t\tcase ATOM_QUOTED : {\n\t\t\t\t\tif ( '@' == sc.ch ){\n\t\t\t\t\t\tparse_state = NODE_NAME_QUOTED;\n\t\t\t\t\t} else if ('\\'' == sc.ch && '\\\\' != sc.chPrev) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_ATOM_QUOTED);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* -------------------------------------------------------------- */\n\t\t\t/* Node names ----------------------------------------------------*/\n\t\t\t\tcase NODE_NAME_UNQUOTED : {\n\t\t\t\t\tif ('@' == sc.ch) {\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t} else if (!IsAWordChar(sc.ch)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_NODE_NAME);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t\tcase NODE_NAME_QUOTED : {\n\t\t\t\t\tif ('@' == sc.ch) {\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t} else if ('\\'' == sc.ch && '\\\\' != sc.chPrev) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_NODE_NAME_QUOTED);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* -------------------------------------------------------------- */\n\t\t\t/* Records -------------------------------------------------------*/\n\t\t\t\tcase RECORD_START : {\n\t\t\t\t\tif ('\\'' == sc.ch) {\n\t\t\t\t\t\tparse_state = RECORD_QUOTED;\n\t\t\t\t\t} else if (isalpha(sc.ch) && islower(sc.ch)) {\n\t\t\t\t\t\tparse_state = RECORD_UNQUOTED;\n\t\t\t\t\t} else { // error\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t\tcase RECORD_UNQUOTED : {\n\t\t\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_RECORD);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t\tcase RECORD_QUOTED : {\n\t\t\t\t\tif ('\\'' == sc.ch && '\\\\' != sc.chPrev) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_RECORD_QUOTED);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* -------------------------------------------------------------- */\n\t\t\t/* Macros --------------------------------------------------------*/\n\t\t\t\tcase MACRO_START : {\n\t\t\t\t\tif ('\\'' == sc.ch) {\n\t\t\t\t\t\tparse_state = MACRO_QUOTED;\n\t\t\t\t\t} else if (isalpha(sc.ch)) {\n\t\t\t\t\t\tparse_state = MACRO_UNQUOTED;\n\t\t\t\t\t} else { // error\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t\tcase MACRO_UNQUOTED : {\n\t\t\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_MACRO);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t\tcase MACRO_QUOTED : {\n\t\t\t\t\tif ('\\'' == sc.ch && '\\\\' != sc.chPrev) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_MACRO_QUOTED);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* -------------------------------------------------------------- */\n\t\t\t/* Numerics ------------------------------------------------------*/\n\t\t\t/* Simple integer */\n\t\t\t\tcase NUMERAL_START : {\n\t\t\t\t\tif (isdigit(sc.ch)) {\n\t\t\t\t\t\tradix_digits *= 10;\n\t\t\t\t\t\tradix_digits += sc.ch - '0'; // Assuming ASCII here!\n\t\t\t\t\t} else if ('#' == sc.ch) {\n\t\t\t\t\t\tif (2 > radix_digits || 36 < radix_digits) {\n\t\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tparse_state = NUMERAL_BASE_VALUE;\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if ('.' == sc.ch && isdigit(sc.chNext)) {\n\t\t\t\t\t\tradix_digits = 0;\n\t\t\t\t\t\tparse_state = NUMERAL_FLOAT;\n\t\t\t\t\t} else if ('e' == sc.ch || 'E' == sc.ch) {\n\t\t\t\t\t\texponent_digits = 0;\n\t\t\t\t\t\tparse_state = NUMERAL_EXPONENT;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tradix_digits = 0;\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_NUMBER);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* Integer in other base than 10 (x#yyy) */\n\t\t\t\tcase NUMERAL_BASE_VALUE : {\n\t\t\t\t\tif (!is_radix(radix_digits,sc.ch)) {\n\t\t\t\t\t\tradix_digits = 0;\n\n\t\t\t\t\t\tif (!isalnum(sc.ch))\n\t\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_NUMBER);\n\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* Float (x.yyy) */\n\t\t\t\tcase NUMERAL_FLOAT : {\n\t\t\t\t\tif ('e' == sc.ch || 'E' == sc.ch) {\n\t\t\t\t\t\texponent_digits = 0;\n\t\t\t\t\t\tparse_state = NUMERAL_EXPONENT;\n\t\t\t\t\t} else if (!isdigit(sc.ch)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_NUMBER);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* Exponent, either integer or float (xEyy, x.yyEzzz) */\n\t\t\t\tcase NUMERAL_EXPONENT : {\n\t\t\t\t\tif (('-' == sc.ch || '+' == sc.ch)\n\t\t\t\t\t\t\t&& (isdigit(sc.chNext))) {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} else if (!isdigit(sc.ch)) {\n\t\t\t\t\t\tif (0 < exponent_digits)\n\t\t\t\t\t\t\tsc.ChangeState(SCE_ERLANG_NUMBER);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t} else {\n\t\t\t\t\t\t++exponent_digits;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t/* -------------------------------------------------------------- */\n\t\t\t/* Preprocessor --------------------------------------------------*/\n\t\t\t\tcase PREPROCESSOR : {\n\t\t\t\t\tif (!IsAWordChar(sc.ch)) {\n\n\t\t\t\t\t\tsc.GetCurrent(cur, sizeof(cur));\n\t\t\t\t\t\tif (erlangPreproc.InList(cur)) {\n\t\t\t\t\t\t\tstyle = SCE_ERLANG_PREPROC;\n\t\t\t\t\t\t} else if (erlangModulesAtt.InList(cur)) {\n\t\t\t\t\t\t\tstyle = SCE_ERLANG_MODULES_ATT;\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\tsc.ChangeState(style);\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\tparse_state = STATE_NULL;\n\t\t\t\t\t}\n\t\t\t\t} break;\n\n\t\t\t}\n\n\t\t} /* End of : STATE_NULL != parse_state */\n\t\telse\n\t\t{\n\t\t\tswitch (sc.state) {\n\t\t\t\tcase SCE_ERLANG_VARIABLE : {\n\t\t\t\t\tif (!IsAWordChar(sc.ch))\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t} break;\n\t\t\t\tcase SCE_ERLANG_STRING : {\n\t\t\t\t\t if (sc.ch == '\\\"' && sc.chPrev != '\\\\')\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t} break;\n\t\t\t\tcase SCE_ERLANG_COMMENT : {\n\t\t\t\t\t if (sc.atLineEnd)\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t} break;\n\t\t\t\tcase SCE_ERLANG_CHARACTER : {\n\t\t\t\t\tif (sc.chPrev == '\\\\') {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t} else if (sc.ch != '\\\\') {\n\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t} break;\n\t\t\t\tcase SCE_ERLANG_OPERATOR : {\n\t\t\t\t\tif (sc.chPrev == '.') {\n\t\t\t\t\t\tif (sc.ch == '*' || sc.ch == '/' || sc.ch == '\\\\'\n\t\t\t\t\t\t\t|| sc.ch == '^') {\n\t\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\t\t\tsc.ForwardSetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t\t}\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t} break;\n\t\t\t}\n\t\t}\n\n\t\tif (sc.state == SCE_ERLANG_DEFAULT) {\n\t\t\tbool no_new_state = false;\n\n\t\t\tswitch (sc.ch) {\n\t\t\t\tcase '\\\"' : sc.SetState(SCE_ERLANG_STRING); break;\n\t\t\t\tcase '$' : sc.SetState(SCE_ERLANG_CHARACTER); break;\n\t\t\t\tcase '%' : {\n\t\t\t\t\tparse_state = COMMENT;\n\t\t\t\t\tsc.SetState(SCE_ERLANG_COMMENT);\n\t\t\t\t} break;\n\t\t\t\tcase '#' : {\n\t\t\t\t\tparse_state = RECORD_START;\n\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t} break;\n\t\t\t\tcase '?' : {\n\t\t\t\t\tparse_state = MACRO_START;\n\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t} break;\n\t\t\t\tcase '\\'' : {\n\t\t\t\t\tparse_state = ATOM_QUOTED;\n\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t} break;\n\t\t\t\tcase '+' :\n\t\t\t\tcase '-' : {\n\t\t\t\t\tif (IsADigit(sc.chNext)) {\n\t\t\t\t\t\tparse_state = NUMERAL_START;\n\t\t\t\t\t\tradix_digits = 0;\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t\t} else if (sc.ch != '+') {\n\t\t\t\t\t\tparse_state = PREPROCESSOR;\n\t\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t\t}\n\t\t\t\t} break;\n\t\t\t\tdefault : no_new_state = true;\n\t\t\t}\n\n\t\t\tif (no_new_state) {\n\t\t\t\tif (isdigit(sc.ch)) {\n\t\t\t\t\tparse_state = NUMERAL_START;\n\t\t\t\t\tradix_digits = sc.ch - '0';\n\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t} else if (isupper(sc.ch) || '_' == sc.ch) {\n\t\t\t\t\tsc.SetState(SCE_ERLANG_VARIABLE);\n\t\t\t\t} else if (isalpha(sc.ch)) {\n\t\t\t\t\tparse_state = ATOM_UNQUOTED;\n\t\t\t\t\tsc.SetState(SCE_ERLANG_UNKNOWN);\n\t\t\t\t} else if (isoperator(static_cast(sc.ch))\n\t\t\t\t\t\t\t|| sc.ch == '\\\\') {\n\t\t\t\t\tsc.SetState(SCE_ERLANG_OPERATOR);\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t}\n\tsc.Complete();\n}\n\nstatic int ClassifyErlangFoldPoint(\n\tAccessor &styler,\n\tint styleNext,\n\tSci_Position keyword_start\n) {\n\tint lev = 0;\n\tif (styler.Match(keyword_start,\"case\")\n\t\t|| (\n\t\t\tstyler.Match(keyword_start,\"fun\")\n\t\t\t&& (SCE_ERLANG_FUNCTION_NAME != styleNext)\n\t\t\t)\n\t\t|| styler.Match(keyword_start,\"if\")\n\t\t|| styler.Match(keyword_start,\"query\")\n\t\t|| styler.Match(keyword_start,\"receive\")\n\t) {\n\t\t++lev;\n\t} else if (styler.Match(keyword_start,\"end\")) {\n\t\t--lev;\n\t}\n\n\treturn lev;\n}\n\nstatic void FoldErlangDoc(\n\tSci_PositionU startPos, Sci_Position length, int initStyle,\n\tWordList** /*keywordlists*/, Accessor &styler\n) {\n\tSci_PositionU endPos = startPos + length;\n\tSci_Position currentLine = styler.GetLine(startPos);\n\tint lev;\n\tint previousLevel = styler.LevelAt(currentLine) & SC_FOLDLEVELNUMBERMASK;\n\tint currentLevel = previousLevel;\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\tint stylePrev;\n\tSci_Position keyword_start = 0;\n\tchar ch;\n\tchar chNext = styler.SafeGetCharAt(startPos);\n\tbool atEOL;\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\t// Get styles\n\t\tstylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tatEOL = ((ch == '\\r') && (chNext != '\\n')) || (ch == '\\n');\n\n\t\tif (stylePrev != SCE_ERLANG_KEYWORD\n\t\t\t&& style == SCE_ERLANG_KEYWORD) {\n\t\t\tkeyword_start = i;\n\t\t}\n\n\t\t// Fold on keywords\n\t\tif (stylePrev == SCE_ERLANG_KEYWORD\n\t\t\t&& style != SCE_ERLANG_KEYWORD\n\t\t\t&& style != SCE_ERLANG_ATOM\n\t\t) {\n\t\t\tcurrentLevel += ClassifyErlangFoldPoint(styler,\n\t\t\t\t\t\t\t\t\t\t\t\t\tstyleNext,\n\t\t\t\t\t\t\t\t\t\t\t\t\tkeyword_start);\n\t\t}\n\n\t\t// Fold on comments\n\t\tif (style == SCE_ERLANG_COMMENT\n\t\t\t|| style == SCE_ERLANG_COMMENT_MODULE\n\t\t\t|| style == SCE_ERLANG_COMMENT_FUNCTION) {\n\n\t\t\tif (ch == '%' && chNext == '{') {\n\t\t\t\tcurrentLevel++;\n\t\t\t} else if (ch == '%' && chNext == '}') {\n\t\t\t\tcurrentLevel--;\n\t\t\t}\n\t\t}\n\n\t\t// Fold on braces\n\t\tif (style == SCE_ERLANG_OPERATOR) {\n\t\t\tif (ch == '{' || ch == '(' || ch == '[') {\n\t\t\t\tcurrentLevel++;\n\t\t\t} else if (ch == '}' || ch == ')' || ch == ']') {\n\t\t\t\tcurrentLevel--;\n\t\t\t}\n\t\t}\n\n\n\t\tif (atEOL) {\n\t\t\tlev = previousLevel;\n\n\t\t\tif (currentLevel > previousLevel)\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\n\t\t\tif (lev != styler.LevelAt(currentLine))\n\t\t\t\tstyler.SetLevel(currentLine, lev);\n\n\t\t\tcurrentLine++;\n\t\t\tpreviousLevel = currentLevel;\n\t\t}\n\n\t}\n\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tstyler.SetLevel(currentLine,\n\t\t\t\t\tpreviousLevel\n\t\t\t\t\t| (styler.LevelAt(currentLine) & ~SC_FOLDLEVELNUMBERMASK));\n}\n\nstatic const char * const erlangWordListDesc[] = {\n\t\"Erlang Reserved words\",\n\t\"Erlang BIFs\",\n\t\"Erlang Preprocessor\",\n\t\"Erlang Module Attributes\",\n\t\"Erlang Documentation\",\n\t\"Erlang Documentation Macro\",\n\t0\n};\n\nextern const LexerModule lmErlang(\n\tSCLEX_ERLANG,\n\tColouriseErlangDoc,\n\t\"erlang\",\n\tFoldErlangDoc,\n\terlangWordListDesc);\n" }, { "path": "lexers/LexErrorList.cxx", "content": "// Scintilla source code edit control\n/** @file LexErrorList.cxx\n ** Lexer for error lists. Used for the output pane in SciTE.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"InList.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\n// Options used for LexerErrorList\nstruct OptionsErrorList {\n\tbool valueSeparate = false;\n\tbool escapeSequences = false;\n};\n\nconst char *const emptyWordListDesc[] = {\n\tnullptr\n};\n\nstruct OptionSetErrorList : public OptionSet {\n\tOptionSetErrorList() {\n\t\tDefineProperty(\"lexer.errorlist.value.separate\", &OptionsErrorList::valueSeparate,\n\t\t\t\"For lines in the output pane that are matches from Find in Files or GCC-style\"\n\t\t\t\"diagnostics, style the path and line number separately from the rest of the\"\n\t\t\t\"line with style 21 used for the rest of the line.\"\n\t\t\t\"This allows matched text to be more easily distinguished from its location.\"\n\t\t);\n\n\t\tDefineProperty(\"lexer.errorlist.escape.sequences\", &OptionsErrorList::escapeSequences,\n\t\t\t\"Set to 1 to interpret escape sequences.\"\n\t\t);\n\t}\n};\n\nconst LexicalClass lexicalClasses[] = {\n\t// Lexer errorlist SCLEX_ERRORLIST SCE_ERR_\n\t0, \"SCE_ERR_DEFAULT\", \"diagnostic\", \"Text\",\n\t1, \"SCE_ERR_PYTHON\", \"diagnostic\", \"Python Error\",\n\t2, \"SCE_ERR_GCC\", \"diagnostic\", \"GCC Error\",\n\t3, \"SCE_ERR_MS\", \"diagnostic\", \"Microsoft Error\",\n\t4, \"SCE_ERR_CMD\", \"default\", \"Command or return status\",\n\t5, \"SCE_ERR_BORLAND\", \"diagnostic\", \"Borland error and warning messages\",\n\t6, \"SCE_ERR_PERL\", \"diagnostic\", \"Perl error and warning messages\",\n\t7, \"SCE_ERR_NET\", \"diagnostic\", \".NET tracebacks\",\n\t8, \"SCE_ERR_LUA\", \"diagnostic\", \"Lua error and warning messages\",\n\t9, \"SCE_ERR_CTAG\", \"diagnostic\", \"ctags\",\n\t10, \"SCE_ERR_DIFF_CHANGED\", \"default\", \"Diff changed !\",\n\t11, \"SCE_ERR_DIFF_ADDITION\", \"default\", \"Diff addition +\",\n\t12, \"SCE_ERR_DIFF_DELETION\", \"default\", \"Diff deletion -\",\n\t13, \"SCE_ERR_DIFF_MESSAGE\", \"default\", \"Diff message ---\",\n\t14, \"SCE_ERR_PHP\", \"diagnostic\", \"PHP error\",\n\t15, \"SCE_ERR_ELF\", \"diagnostic\", \"Essential Lahey Fortran 90 error\",\n\t16, \"SCE_ERR_IFC\", \"diagnostic\", \"Intel Fortran Compiler error\",\n\t17, \"SCE_ERR_IFORT\", \"diagnostic\", \"Intel Fortran Compiler v8.0 error/warning\",\n\t18, \"SCE_ERR_ABSF\", \"diagnostic\", \"Absoft Pro Fortran 90/95 v8.2 error or warning\",\n\t19, \"SCE_ERR_TIDY\", \"diagnostic\", \"HTML Tidy\",\n\t20, \"SCE_ERR_JAVA_STACK\", \"diagnostic\", \"Java runtime stack trace\",\n\t21, \"SCE_ERR_VALUE\", \"default\", \"Text matched with find in files and message part of GCC errors\",\n\t22, \"SCE_ERR_GCC_INCLUDED_FROM\", \"diagnostic\", \"GCC showing include path to following error\",\n\t23, \"SCE_ERR_ESCSEQ\", \"escapesequence\", \"Escape sequence\",\n\t24, \"SCE_ERR_ESCSEQ_UNKNOWN\", \"escapesequence\", \"Escape sequence unknown\",\n\t25, \"SCE_ERR_GCC_EXCERPT\", \"diagnostic\", \"GCC showing excerpt of code with pointer\",\n\t26, \"SCE_ERR_BASH\", \"diagnostic\", \"Bash diagnostic\",\n\t27, \"\", \"unused\", \"\",\n\t28, \"\", \"unused\", \"\",\n\t29, \"\", \"unused\", \"\",\n\t30, \"\", \"unused\", \"\",\n\t31, \"\", \"unused\", \"\",\n\t32, \"\", \"predefined\", \"\",\n\t33, \"\", \"predefined\", \"\",\n\t34, \"\", \"predefined\", \"\",\n\t35, \"\", \"predefined\", \"\",\n\t36, \"\", \"predefined\", \"\",\n\t37, \"\", \"predefined\", \"\",\n\t38, \"\", \"predefined\", \"\",\n\t39, \"\", \"predefined\", \"\",\n\t40, \"SCE_ERR_ES_BLACK\", \"default\", \"Black\",\n\t41, \"SCE_ERR_ES_RED\", \"default\", \"Red\",\n\t42, \"SCE_ERR_ES_GREEN\", \"default\", \"Green\",\n\t43, \"SCE_ERR_ES_BROWN\", \"default\", \"Brown\",\n\t44, \"SCE_ERR_ES_BLUE\", \"default\", \"Blue\",\n\t45, \"SCE_ERR_ES_MAGENTA\", \"default\", \"Magenta\",\n\t46, \"SCE_ERR_ES_CYAN\", \"default\", \"Cyan\",\n\t47, \"SCE_ERR_ES_GRAY\", \"default\", \"Gray\",\n\t48, \"SCE_ERR_ES_DARK_GRAY\", \"default\", \"Dark Gray\",\n\t49, \"SCE_ERR_ES_BRIGHT_RED\", \"default\", \"Bright Red\",\n\t50, \"SCE_ERR_ES_BRIGHT_GREEN\", \"default\", \"Bright Green\",\n\t51, \"SCE_ERR_ES_YELLOW\", \"default\", \"Yellow\",\n\t52, \"SCE_ERR_ES_BRIGHT_BLUE\", \"default\", \"Bright Blue\",\n\t53, \"SCE_ERR_ES_BRIGHT_MAGENTA\", \"default\", \"Bright Magenta\",\n\t54, \"SCE_ERR_ES_BRIGHT_CYAN\", \"default\", \"Bright Cyan\",\n\t55, \"SCE_ERR_ES_WHITE\", \"default\", \"White\",\n};\n\nclass LexerErrorList : public DefaultLexer {\n\tOptionsErrorList options;\n\tOptionSetErrorList osErrorList;\npublic:\n\tLexerErrorList() :\n\t\tDefaultLexer(\"errorlist\", SCLEX_ERRORLIST, lexicalClasses, std::size(lexicalClasses)) {\n\t}\n\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osErrorList.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osErrorList.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osErrorList.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char *SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osErrorList.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osErrorList.DescribeWordListSets();\n\t}\n\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tstatic ILexer5 *LexerFactoryErrorList() {\n\t\treturn new LexerErrorList();\n\t}\n};\n\nSci_Position SCI_METHOD LexerErrorList::PropertySet(const char *key, const char *val) {\n\tif (osErrorList.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nconstexpr bool StartsWith(std::string_view haystack, std::string_view needle) noexcept {\n\treturn (needle.length() <= haystack.length()) &&\n\t\t(haystack.substr(0, needle.length()) == needle);\n}\n\nconstexpr bool Contains(std::string_view text, std::string_view a) noexcept {\n\tconst size_t pos = text.find(a);\n\treturn pos != std::string_view::npos;\n}\n\n// Does text contain both a and b with b after a\nconstexpr bool ContainsOrdered(std::string_view text, std::string_view a, std::string_view b) noexcept {\n\tconst size_t posA = text.find(a);\n\tif (posA == std::string_view::npos) {\n\t\treturn false;\n\t}\n\tconst size_t posB = text.find(b, posA + a.length());\n\treturn posB != std::string_view::npos;\n}\n\nconstexpr bool Is0To9(char ch) noexcept {\n\treturn (ch >= '0') && (ch <= '9');\n}\n\nconstexpr bool Is1To9(char ch) noexcept {\n\treturn (ch >= '1') && (ch <= '9');\n}\n\nbool AtEOL(Accessor &styler, Sci_Position i) {\n\treturn (styler[i] == '\\n') ||\n\t ((styler[i] == '\\r') && (styler.SafeGetCharAt(i + 1) != '\\n'));\n}\n\nstd::string_view LetterPrefix(std::string_view sv) noexcept {\n\tSci_PositionU i = 0;\n\twhile (i < sv.length() && IsUpperOrLowerCase(sv[i]))\n\t\ti++;\n\treturn sv.substr(0, i);\n}\n\nbool IsGccExcerpt(std::string_view sv) noexcept {\n\twhile (!sv.empty()) {\n\t\tif ((sv.length() >= 3) && (sv[0] == ' ' && sv[1] == '|' && (sv[2] == ' ' || sv[2] == '+'))) {\n\t\t\treturn true;\n\t\t}\n\t\tif (!(sv[0] == ' ' || sv[0] == '+' || Is0To9(sv[0]))) {\n\t\t\treturn false;\n\t\t}\n\t\tsv.remove_prefix(1);\n\t}\n\treturn true;\n}\n\nconst std::string_view bashDiagnosticMark = \": line \";\nbool IsBashDiagnostic(std::string_view sv) {\n\tconst size_t mark = sv.find(bashDiagnosticMark);\n\tif (mark == std::string_view::npos) {\n\t\treturn false;\n\t}\n\tstd::string_view rest = sv.substr(mark + bashDiagnosticMark.length());\n\tif (rest.empty() || !Is0To9(rest.front())) {\n\t\treturn false;\n\t}\n\twhile (!rest.empty() && Is0To9(rest.front())) {\n\t\trest.remove_prefix(1);\n\t}\n\treturn !rest.empty() && (rest.front() == ':');\n}\n\n\nint RecogniseErrorListLine(std::string_view lineBuffer, Sci_Position &startValue) {\n\tif (lineBuffer.empty())\n\t\treturn SCE_ERR_DEFAULT;\n\n\tswitch (lineBuffer.front()) {\n\tcase '>':\n\t\t// Command or return status\n\t\treturn SCE_ERR_CMD;\n\tcase '<':\n\t\t// Diff removal.\n\t\treturn SCE_ERR_DIFF_DELETION;\n\tcase '!':\n\t\treturn SCE_ERR_DIFF_CHANGED;\n\tcase '+':\n\t\tif (StartsWith(lineBuffer, \"+++ \")) {\n\t\t\treturn SCE_ERR_DIFF_MESSAGE;\n\t\t} else {\n\t\t\treturn SCE_ERR_DIFF_ADDITION;\n\t\t}\n\tcase '-':\n\t\tif (StartsWith(lineBuffer, \"--- \")) {\n\t\t\treturn SCE_ERR_DIFF_MESSAGE;\n\t\t} else {\n\t\t\treturn SCE_ERR_DIFF_DELETION;\n\t\t}\n\tdefault:\n\t\tbreak;\n\t}\n\n\tif (StartsWith(lineBuffer, \"cf90-\")) {\n\t\t// Absoft Pro Fortran 90/95 v8.2 error and/or warning message\n\t\treturn SCE_ERR_ABSF;\n\t} else if (StartsWith(lineBuffer, \"fortcom:\")) {\n\t\t// Intel Fortran Compiler v8.0 error/warning message\n\t\treturn SCE_ERR_IFORT;\n\t} else if (Contains(lineBuffer, \"File \\\"\") && Contains(lineBuffer, \", line \")) {\n\t\treturn SCE_ERR_PYTHON;\n\t} else if (Contains(lineBuffer, \" in \") && Contains(lineBuffer, \" on line \")) {\n\t\treturn SCE_ERR_PHP;\n\t} else if ((StartsWith(lineBuffer, \"Error \") ||\n\t StartsWith(lineBuffer, \"Warning \")) &&\n\t ContainsOrdered(lineBuffer, \" at (\", \") : \")) {\n\t\t// Intel Fortran Compiler error/warning message\n\t\treturn SCE_ERR_IFC;\n\t} else if (StartsWith(lineBuffer, \"Error \")) {\n\t\t// Borland error message\n\t\treturn SCE_ERR_BORLAND;\n\t} else if (StartsWith(lineBuffer, \"Warning \")) {\n\t\t// Borland warning message\n\t\treturn SCE_ERR_BORLAND;\n\t} else if (Contains(lineBuffer, \"at line \") &&\n\t Contains(lineBuffer, \"file \")) {\n\t\t// Lua 4 error message\n\t\treturn SCE_ERR_LUA;\n\t} else if (ContainsOrdered(lineBuffer, \" at \", \" line \")) {\n\t\t// perl error message:\n\t\t// at line \n\t\treturn SCE_ERR_PERL;\n\t} else if (StartsWith(lineBuffer, \" at \") &&\n\t Contains(lineBuffer, \":line \")) {\n\t\t// A .NET traceback\n\t\treturn SCE_ERR_NET;\n\t} else if (StartsWith(lineBuffer, \"Line \") &&\n\t Contains(lineBuffer, \", file \")) {\n\t\t// Essential Lahey Fortran error message\n\t\treturn SCE_ERR_ELF;\n\t} else if (StartsWith(lineBuffer, \"line \") &&\n\t Contains(lineBuffer, \" column \")) {\n\t\t// HTML tidy style: line 42 column 1\n\t\treturn SCE_ERR_TIDY;\n\t} else if (StartsWith(lineBuffer, \"\\tat \") &&\n\t Contains(lineBuffer, \"(\") &&\n\t Contains(lineBuffer, \".java:\")) {\n\t\t// Java stack back trace\n\t\treturn SCE_ERR_JAVA_STACK;\n\t} else if (StartsWith(lineBuffer, \"In file included from \") ||\n\t StartsWith(lineBuffer, \" from \")) {\n\t\t// GCC showing include path to following error\n\t\treturn SCE_ERR_GCC_INCLUDED_FROM;\n\t} else if (StartsWith(lineBuffer, \"NMAKE : fatal error\")) {\n\t\t// Microsoft nmake fatal error:\n\t\t// NMAKE : fatal error : : return code \n\t\treturn SCE_ERR_MS;\n\t} else if (Contains(lineBuffer, \"warning LNK\") ||\n\t\tContains(lineBuffer, \"error LNK\")) {\n\t\t// Microsoft linker warning:\n\t\t// { : } (warning|error) LNK9999\n\t\treturn SCE_ERR_MS;\n\t} else if (IsBashDiagnostic(lineBuffer)) {\n\t\t// Bash diagnostic\n\t\t// : line :\n\t\treturn SCE_ERR_BASH;\n\t} else if (IsGccExcerpt(lineBuffer)) {\n\t\t// GCC code excerpt and pointer to issue\n\t\t// 73 | GTimeVal last_popdown;\n\t\t// | ^~~~~~~~~~~~\n\t\treturn SCE_ERR_GCC_EXCERPT;\n\t} else {\n\t\t// Look for one of the following formats:\n\t\t// GCC: ::\n\t\t// Microsoft: () :\n\t\t// Common: (): warning|error|note|remark|catastrophic|fatal\n\t\t// Common: () warning|error|note|remark|catastrophic|fatal\n\t\t// Microsoft: (,)\n\t\t// CTags: \\t\\t\n\t\t// Lua 5 traceback: \\t::\n\t\t// Lua 5.1: : ::\n\t\tconst bool initialTab = (lineBuffer[0] == '\\t');\n\t\tbool initialColonPart = false;\n\t\tbool canBeCtags = !initialTab;\t// For ctags must have an identifier with no spaces then a tab\n\t\tenum { stInitial,\n\t\t\tstGccStart, stGccDigit, stGccColumn, stGcc,\n\t\t\tstMsStart, stMsDigit, stMsBracket, stMsVc, stMsDigitComma, stMsDotNet,\n\t\t\tstCtagsStart, stCtagsFile, stCtagsStartString, stCtagsStringDollar, stCtags,\n\t\t\tstUnrecognized\n\t\t} state = stInitial;\n\t\tfor (Sci_PositionU i = 0; i < lineBuffer.length(); i++) {\n\t\t\tconst char ch = lineBuffer[i];\n\t\t\tconst char chNext = ((i + 1) < lineBuffer.length()) ? lineBuffer[i + 1] : ' ';\n\t\t\tif (state == stInitial) {\n\t\t\t\tif (ch == ':') {\n\t\t\t\t\t// May be GCC, or might be Lua 5 (Lua traceback same but with tab prefix)\n\t\t\t\t\tif ((chNext != '\\\\') && (chNext != '/') && (chNext != ' ')) {\n\t\t\t\t\t\t// This check is not completely accurate as may be on\n\t\t\t\t\t\t// GTK+ with a file name that includes ':'.\n\t\t\t\t\t\tstate = stGccStart;\n\t\t\t\t\t} else if (chNext == ' ') { // indicates a Lua 5.1 error message\n\t\t\t\t\t\tinitialColonPart = true;\n\t\t\t\t\t}\n\t\t\t\t} else if ((ch == '(') && Is1To9(chNext) && (!initialTab)) {\n\t\t\t\t\t// May be Microsoft\n\t\t\t\t\t// Check against '0' often removes phone numbers\n\t\t\t\t\tstate = stMsStart;\n\t\t\t\t} else if ((ch == '\\t') && canBeCtags) {\n\t\t\t\t\t// May be CTags\n\t\t\t\t\tstate = stCtagsStart;\n\t\t\t\t} else if (ch == ' ') {\n\t\t\t\t\tcanBeCtags = false;\n\t\t\t\t}\n\t\t\t} else if (state == stGccStart) {\t// :\n\t\t\t\tstate = ((ch == '-') || Is0To9(ch)) ? stGccDigit : stUnrecognized;\n\t\t\t} else if (state == stGccDigit) {\t// :\n\t\t\t\tif (ch == ':') {\n\t\t\t\t\tstate = stGccColumn;\t// :9.*: is GCC\n\t\t\t\t\tstartValue = i + 1;\n\t\t\t\t} else if (!Is0To9(ch)) {\n\t\t\t\t\tstate = stUnrecognized;\n\t\t\t\t}\n\t\t\t} else if (state == stGccColumn) {\t// ::\n\t\t\t\tif (!Is0To9(ch)) {\n\t\t\t\t\tstate = stGcc;\n\t\t\t\t\tif (ch == ':')\n\t\t\t\t\t\tstartValue = i + 1;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t} else if (state == stMsStart) {\t// (\n\t\t\t\tstate = Is0To9(ch) ? stMsDigit : stUnrecognized;\n\t\t\t} else if (state == stMsDigit) {\t// (\n\t\t\t\tif (ch == ',') {\n\t\t\t\t\tstate = stMsDigitComma;\n\t\t\t\t} else if (ch == ')') {\n\t\t\t\t\tstate = stMsBracket;\n\t\t\t\t} else if ((ch != ' ') && !Is0To9(ch)) {\n\t\t\t\t\tstate = stUnrecognized;\n\t\t\t\t}\n\t\t\t} else if (state == stMsBracket) {\t// ()\n\t\t\t\tif ((ch == ' ') && (chNext == ':')) {\n\t\t\t\t\tstate = stMsVc;\n\t\t\t\t} else if ((ch == ':' && chNext == ' ') || (ch == ' ')) {\n\t\t\t\t\t// Possibly Microsoft or Delphi.\n\t\t\t\t\t// Move past above prefix: \" \" -> 1, \": \" -> 2\n\t\t\t\t\t// \" \" is likely a Delphi diagnostic, \": \" a Microsoft diagnostic\n\t\t\t\t\tconst Sci_PositionU numstep = (ch == ' ') ? 1 : 2;\n\t\t\t\t\tconst std::string_view word = LetterPrefix(lineBuffer.substr(i + numstep));\n\t\t\t\t\tif (InListCaseInsensitive(word, {\"error\", \"warning\", \"fatal\", \"catastrophic\", \"note\", \"remark\"})) {\n\t\t\t\t\t\tstate = stMsVc;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = stUnrecognized;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tstate = stUnrecognized;\n\t\t\t\t}\n\t\t\t} else if (state == stMsDigitComma) {\t// (,\n\t\t\t\tif (ch == ')') {\n\t\t\t\t\tstate = stMsDotNet;\n\t\t\t\t\tbreak;\n\t\t\t\t} else if ((ch != ' ') && !Is0To9(ch)) {\n\t\t\t\t\tstate = stUnrecognized;\n\t\t\t\t}\n\t\t\t} else if (state == stCtagsStart) {\n\t\t\t\tif (ch == '\\t') {\n\t\t\t\t\tstate = stCtagsFile;\n\t\t\t\t}\n\t\t\t} else if (state == stCtagsFile) {\n\t\t\t\tif ((lineBuffer[i - 1] == '\\t') &&\n\t\t\t\t ((ch == '/' && chNext == '^') || Is0To9(ch))) {\n\t\t\t\t\tstate = stCtags;\n\t\t\t\t\tbreak;\n\t\t\t\t} else if ((ch == '/') && (chNext == '^')) {\n\t\t\t\t\tstate = stCtagsStartString;\n\t\t\t\t}\n\t\t\t} else if ((state == stCtagsStartString) && ((lineBuffer[i] == '$') && (lineBuffer[i + 1] == '/'))) {\n\t\t\t\tstate = stCtagsStringDollar;\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\t\tif (state == stGcc) {\n\t\t\treturn initialColonPart ? SCE_ERR_LUA : SCE_ERR_GCC;\n\t\t} else if ((state == stMsVc) || (state == stMsDotNet)) {\n\t\t\treturn SCE_ERR_MS;\n\t\t} else if ((state == stCtagsStringDollar) || (state == stCtags)) {\n\t\t\treturn SCE_ERR_CTAG;\n\t\t} else if (initialColonPart && Contains(lineBuffer, \": warning C\")) {\n\t\t\t// Microsoft warning without line number\n\t\t\t// : warning C9999\n\t\t\treturn SCE_ERR_MS;\n\t\t} else {\n\t\t\treturn SCE_ERR_DEFAULT;\n\t\t}\n\t}\n}\n\n#define CSI \"\\033[\"\n\nconstexpr bool SequenceEnd(int ch) noexcept {\n\treturn (ch == 0) || ((ch >= '@') && (ch <= '~'));\n}\n\nint StyleFromSequence(const char *seq) noexcept {\n\tint bold = 0;\n\tint style = 0;\n\twhile (!SequenceEnd(*seq)) {\n\t\tif (Is0To9(*seq)) {\n\t\t\tint base = *seq - '0';\n\t\t\tif (Is0To9(seq[1])) {\n\t\t\t\tbase = base * 10;\n\t\t\t\tbase += seq[1] - '0';\n\t\t\t\tseq++;\n\t\t\t}\n\t\t\tif (base == 0) {\n\t\t\t\t// Reset to default.\n\t\t\t\tstyle = 0;\n\t\t\t\tbold = 0;\n\t\t\t} else if (base == 1) {\n\t\t\t\t// Set style as bright.\n\t\t\t\tbold = 1;\n\t\t\t\tif (style == 0) {\n\t\t\t\t\tstyle = 40;\n\t\t\t\t}\n\t\t\t} else if (base >= 30 && base <= 37) {\n\t\t\t\t// Set dim style which starts at 40.\n\t\t\t\tstyle = base + 10;\n\t\t\t} else if (base >= 90 && base <= 97) {\n\t\t\t\t// Set bright style which starts at 48.\n\t\t\t\tstyle = base - 42;\n\t\t\t}\n\t\t}\n\t\tseq++;\n\t}\n\t// Set dim style as bright style if bold is set.\n\tif (bold && (style >= 40 && style <= 47)) {\n\t\tstyle += 8;\n\t}\n\t// Return the style which if 0 will be SCE_ERR_DEFAULT style.\n\treturn style;\n}\n\nvoid ColouriseErrorListLine(\n const std::string &lineBuffer,\n Sci_PositionU endPos,\n Accessor &styler,\n\tbool valueSeparate,\n\tbool escapeSequences) {\n\tSci_Position startValue = -1;\n\tconst int style = RecogniseErrorListLine(lineBuffer, startValue);\n\tif (escapeSequences && Contains(lineBuffer, CSI)) {\n\t\tconst Sci_Position startPos = endPos - lineBuffer.length();\n\t\tconst char *linePortion = lineBuffer.c_str();\n\t\tSci_Position startPortion = startPos;\n\t\tint portionStyle = style;\n\t\twhile (const char *startSeq = strstr(linePortion, CSI)) {\n\t\t\tif (startSeq > linePortion) {\n\t\t\t\tstyler.ColourTo(startPortion + (startSeq - linePortion), portionStyle);\n\t\t\t}\n\t\t\tconst char *endSeq = startSeq + 2;\n\t\t\twhile (!SequenceEnd(*endSeq))\n\t\t\t\tendSeq++;\n\t\t\tconst Sci_Position endSeqPosition = startPortion + (endSeq - linePortion) + 1;\n\t\t\tswitch (*endSeq) {\n\t\t\tcase 0:\n\t\t\t\tstyler.ColourTo(endPos, SCE_ERR_ESCSEQ_UNKNOWN);\n\t\t\t\treturn;\n\t\t\tcase 'm':\t// Colour command\n\t\t\t\tstyler.ColourTo(endSeqPosition, SCE_ERR_ESCSEQ);\n\t\t\t\tportionStyle = StyleFromSequence(startSeq+2);\n\t\t\t\tbreak;\n\t\t\tcase 'K':\t// Erase to end of line -> ignore\n\t\t\t\tstyler.ColourTo(endSeqPosition, SCE_ERR_ESCSEQ);\n\t\t\t\tbreak;\n\t\t\tdefault:\n\t\t\t\tstyler.ColourTo(endSeqPosition, SCE_ERR_ESCSEQ_UNKNOWN);\n\t\t\t\tportionStyle = style;\n\t\t\t}\n\t\t\tstartPortion = endSeqPosition;\n\t\t\tlinePortion = endSeq + 1;\n\t\t}\n\t\tstyler.ColourTo(endPos, portionStyle);\n\t} else {\n\t\tif (valueSeparate && (startValue >= 0)) {\n\t\t\tstyler.ColourTo(endPos - (lineBuffer.length() - startValue), style);\n\t\t\tstyler.ColourTo(endPos, SCE_ERR_VALUE);\n\t\t} else {\n\t\t\tstyler.ColourTo(endPos, style);\n\t\t}\n\t}\n}\n\nvoid LexerErrorList::Lex(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, IDocument *pAccess) {\n\tAccessor styler(pAccess, nullptr);\n\tstd::string lineBuffer;\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\n\tfor (Sci_PositionU i = startPos; i < startPos + length; i++) {\n\t\tlineBuffer.push_back(styler[i]);\n\t\tif (AtEOL(styler, i)) {\n\t\t\t// End of line met, colourise it\n\t\t\tColouriseErrorListLine(lineBuffer, i, styler, options.valueSeparate, options.escapeSequences);\n\t\t\tlineBuffer.clear();\n\t\t}\n\t}\n\tif (!lineBuffer.empty()) {\t// Last line does not have ending characters\n\t\tColouriseErrorListLine(lineBuffer, startPos + length - 1, styler, options.valueSeparate, options.escapeSequences);\n\t}\n\n\tstyler.Flush();\n}\n\n}\n\nextern const LexerModule lmErrorList(SCLEX_ERRORLIST, LexerErrorList::LexerFactoryErrorList, \"errorlist\", emptyWordListDesc);\n" }, { "path": "lexers/LexEscSeq.cxx", "content": "// Scintilla source code edit control\n/** @file LexEscSeq.cxx\n ** Lexer for terminal escape sequences.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"InList.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\n#define CSI \"\\033[\"\n\n// Options used for LexerEscSeq\nstruct OptionsEscSeq {\n\tbool colourText = false;\n};\n\n\nconst char *const emptyWordListDesc[] = {\n\tnullptr\n};\n\n\nstruct OptionSetEscSeq : public OptionSet {\n\tOptionSetEscSeq() {\n\t\tDefineProperty(\"lexer.escseq.colour.text\", &OptionsEscSeq::colourText,\n\t\t\t\"Set to 1 to colour text following the escape sequences.\"\n\t\t);\n\n\t\tDefineWordListSets(emptyWordListDesc);\n\t}\n};\n\n\nconst LexicalClass lexicalClasses[] = {\n\t// Lexer escseq SCLEX_ESCSEQ SCE_ESCSEQ_\n\t0, \"SCE_ESCSEQ_DEFAULT\", \"default\", \"Default\",\n\t1, \"SCE_ESCSEQ_BLACK_DEFAULT\", \"default\", \"Black Default\",\n\t2, \"SCE_ESCSEQ_RED_DEFAULT\", \"default\", \"Red Default\",\n\t3, \"SCE_ESCSEQ_GREEN_DEFAULT\", \"default\", \"Green Default\",\n\t4, \"SCE_ESCSEQ_YELLOW_DEFAULT\", \"default\", \"Yellow Default\",\n\t5, \"SCE_ESCSEQ_BLUE_DEFAULT\", \"default\", \"Blue Default\",\n\t6, \"SCE_ESCSEQ_MAGENTA_DEFAULT\", \"default\", \"Magenta Default\",\n\t7, \"SCE_ESCSEQ_CYAN_DEFAULT\", \"default\", \"Cyan Default\",\n\t8, \"SCE_ESCSEQ_WHITE_DEFAULT\", \"default\", \"White Default\",\n\t9, \"SCE_ESCSEQ_DEFAULT_BLACK\", \"default\", \"Default Black\",\n\t10, \"SCE_ESCSEQ_BLACK_BLACK\", \"default\", \"Black Black\",\n\t11, \"SCE_ESCSEQ_RED_BLACK\", \"default\", \"Red Black\",\n\t12, \"SCE_ESCSEQ_GREEN_BLACK\", \"default\", \"Green Black\",\n\t13, \"SCE_ESCSEQ_YELLOW_BLACK\", \"default\", \"Yellow Black\",\n\t14, \"SCE_ESCSEQ_BLUE_BLACK\", \"default\", \"Blue Black\",\n\t15, \"SCE_ESCSEQ_MAGENTA_BLACK\", \"default\", \"Magenta Black\",\n\t16, \"SCE_ESCSEQ_CYAN_BLACK\", \"default\", \"Cyan Black\",\n\t17, \"SCE_ESCSEQ_WHITE_BLACK\", \"default\", \"White Black\",\n\t18, \"SCE_ESCSEQ_DEFAULT_RED\", \"default\", \"Default Red\",\n\t19, \"SCE_ESCSEQ_BLACK_RED\", \"default\", \"Black Red\",\n\t20, \"SCE_ESCSEQ_RED_RED\", \"default\", \"Red Red\",\n\t21, \"SCE_ESCSEQ_GREEN_RED\", \"default\", \"Green Red\",\n\t22, \"SCE_ESCSEQ_YELLOW_RED\", \"default\", \"Yellow Red\",\n\t23, \"SCE_ESCSEQ_BLUE_RED\", \"default\", \"Blue Red\",\n\t24, \"SCE_ESCSEQ_MAGENTA_RED\", \"default\", \"Magenta Red\",\n\t25, \"SCE_ESCSEQ_CYAN_RED\", \"default\", \"Cyan Red\",\n\t26, \"SCE_ESCSEQ_WHITE_RED\", \"default\", \"White Red\",\n\t27, \"SCE_ESCSEQ_DEFAULT_GREEN\", \"default\", \"Default Green\",\n\t28, \"SCE_ESCSEQ_BLACK_GREEN\", \"default\", \"Black Green\",\n\t29, \"SCE_ESCSEQ_RED_GREEN\", \"default\", \"Red Green\",\n\t30, \"SCE_ESCSEQ_GREEN_GREEN\", \"default\", \"Green Green\",\n\t31, \"\", \"unused\", \"\",\n\t32, \"\", \"predefined\", \"\",\n\t33, \"\", \"predefined\", \"\",\n\t34, \"\", \"predefined\", \"\",\n\t35, \"\", \"predefined\", \"\",\n\t36, \"\", \"predefined\", \"\",\n\t37, \"\", \"predefined\", \"\",\n\t38, \"\", \"predefined\", \"\",\n\t39, \"\", \"predefined\", \"\",\n\t40, \"SCE_ESCSEQ_YELLOW_GREEN\", \"default\", \"Yellow Green\",\n\t41, \"SCE_ESCSEQ_BLUE_GREEN\", \"default\", \"Blue Green\",\n\t42, \"SCE_ESCSEQ_MAGENTA_GREEN\", \"default\", \"Magenta Green\",\n\t43, \"SCE_ESCSEQ_CYAN_GREEN\", \"default\", \"Cyan Green\",\n\t44, \"SCE_ESCSEQ_WHITE_GREEN\", \"default\", \"White Green\",\n\t45, \"SCE_ESCSEQ_DEFAULT_YELLOW\", \"default\", \"Default Yellow\",\n\t46, \"SCE_ESCSEQ_BLACK_YELLOW\", \"default\", \"Black Yellow\",\n\t47, \"SCE_ESCSEQ_RED_YELLOW\", \"default\", \"Red Yellow\",\n\t48, \"SCE_ESCSEQ_GREEN_YELLOW\", \"default\", \"Green Yellow\",\n\t49, \"SCE_ESCSEQ_YELLOW_YELLOW\", \"default\", \"Yellow Yellow\",\n\t50, \"SCE_ESCSEQ_BLUE_YELLOW\", \"default\", \"Blue Yellow\",\n\t51, \"SCE_ESCSEQ_MAGENTA_YELLOW\", \"default\", \"Magenta Yellow\",\n\t52, \"SCE_ESCSEQ_CYAN_YELLOW\", \"default\", \"Cyan Yellow\",\n\t53, \"SCE_ESCSEQ_WHITE_YELLOW\", \"default\", \"White Yellow\",\n\t54, \"SCE_ESCSEQ_DEFAULT_BLUE\", \"default\", \"Default Blue\",\n\t55, \"SCE_ESCSEQ_BLACK_BLUE\", \"default\", \"Black Blue\",\n\t56, \"SCE_ESCSEQ_RED_BLUE\", \"default\", \"Red Blue\",\n\t57, \"SCE_ESCSEQ_GREEN_BLUE\", \"default\", \"Green Blue\",\n\t58, \"SCE_ESCSEQ_YELLOW_BLUE\", \"default\", \"Yellow Blue\",\n\t59, \"SCE_ESCSEQ_BLUE_BLUE\", \"default\", \"Blue Blue\",\n\t60, \"SCE_ESCSEQ_MAGENTA_BLUE\", \"default\", \"Magenta Blue\",\n\t61, \"SCE_ESCSEQ_CYAN_BLUE\", \"default\", \"Cyan Blue\",\n\t62, \"SCE_ESCSEQ_WHITE_BLUE\", \"default\", \"White Blue\",\n\t63, \"SCE_ESCSEQ_DEFAULT_MAGENTA\", \"default\", \"Default Magenta\",\n\t64, \"SCE_ESCSEQ_BLACK_MAGENTA\", \"default\", \"Black Magenta\",\n\t65, \"SCE_ESCSEQ_RED_MAGENTA\", \"default\", \"Red Magenta\",\n\t66, \"SCE_ESCSEQ_GREEN_MAGENTA\", \"default\", \"Green Magenta\",\n\t67, \"SCE_ESCSEQ_YELLOW_MAGENTA\", \"default\", \"Yellow Magenta\",\n\t68, \"SCE_ESCSEQ_BLUE_MAGENTA\", \"default\", \"Blue Magenta\",\n\t69, \"SCE_ESCSEQ_MAGENTA_MAGENTA\", \"default\", \"Magenta Magenta\",\n\t70, \"SCE_ESCSEQ_CYAN_MAGENTA\", \"default\", \"Cyan Magenta\",\n\t71, \"SCE_ESCSEQ_WHITE_MAGENTA\", \"default\", \"White Magenta\",\n\t72, \"SCE_ESCSEQ_DEFAULT_CYAN\", \"default\", \"Default Cyan\",\n\t73, \"SCE_ESCSEQ_BLACK_CYAN\", \"default\", \"Black Cyan\",\n\t74, \"SCE_ESCSEQ_RED_CYAN\", \"default\", \"Red Cyan\",\n\t75, \"SCE_ESCSEQ_GREEN_CYAN\", \"default\", \"Green Cyan\",\n\t76, \"SCE_ESCSEQ_YELLOW_CYAN\", \"default\", \"Yellow Cyan\",\n\t77, \"SCE_ESCSEQ_BLUE_CYAN\", \"default\", \"Blue Cyan\",\n\t78, \"SCE_ESCSEQ_MAGENTA_CYAN\", \"default\", \"Magenta Cyan\",\n\t79, \"SCE_ESCSEQ_CYAN_CYAN\", \"default\", \"Cyan Cyan\",\n\t80, \"SCE_ESCSEQ_WHITE_CYAN\", \"default\", \"White Cyan\",\n\t81, \"SCE_ESCSEQ_DEFAULT_WHITE\", \"default\", \"Default White\",\n\t82, \"SCE_ESCSEQ_BLACK_WHITE\", \"default\", \"Black White\",\n\t83, \"SCE_ESCSEQ_RED_WHITE\", \"default\", \"Red White\",\n\t84, \"SCE_ESCSEQ_GREEN_WHITE\", \"default\", \"Green White\",\n\t85, \"SCE_ESCSEQ_YELLOW_WHITE\", \"default\", \"Yellow White\",\n\t86, \"SCE_ESCSEQ_BLUE_WHITE\", \"default\", \"Blue White\",\n\t87, \"SCE_ESCSEQ_MAGENTA_WHITE\", \"default\", \"Magenta White\",\n\t88, \"SCE_ESCSEQ_CYAN_WHITE\", \"default\", \"Cyan White\",\n\t89, \"SCE_ESCSEQ_WHITE_WHITE\", \"default\", \"White White\",\n\t90, \"SCE_ESCSEQ_BOLD_DEFAULT\", \"default\", \"Bold Default\",\n\t91, \"SCE_ESCSEQ_BOLD_BLACK_DEFAULT\", \"default\", \"Bold Black Default\",\n\t92, \"SCE_ESCSEQ_BOLD_RED_DEFAULT\", \"default\", \"Bold Red Default\",\n\t93, \"SCE_ESCSEQ_BOLD_GREEN_DEFAULT\", \"default\", \"Bold Green Default\",\n\t94, \"SCE_ESCSEQ_BOLD_YELLOW_DEFAULT\", \"default\", \"Bold Yellow Default\",\n\t95, \"SCE_ESCSEQ_BOLD_BLUE_DEFAULT\", \"default\", \"Bold Blue Default\",\n\t96, \"SCE_ESCSEQ_BOLD_MAGENTA_DEFAULT\", \"default\", \"Bold Magenta Default\",\n\t97, \"SCE_ESCSEQ_BOLD_CYAN_DEFAULT\", \"default\", \"Bold Cyan Default\",\n\t98, \"SCE_ESCSEQ_BOLD_WHITE_DEFAULT\", \"default\", \"Bold White Default\",\n\t99, \"SCE_ESCSEQ_BOLD_DEFAULT_BLACK\", \"default\", \"Bold Default Black\",\n\t100, \"SCE_ESCSEQ_BOLD_BLACK_BLACK\", \"default\", \"Bold Black Black\",\n\t101, \"SCE_ESCSEQ_BOLD_RED_BLACK\", \"default\", \"Bold Red Black\",\n\t102, \"SCE_ESCSEQ_BOLD_GREEN_BLACK\", \"default\", \"Bold Green Black\",\n\t103, \"SCE_ESCSEQ_BOLD_YELLOW_BLACK\", \"default\", \"Bold Yellow Black\",\n\t104, \"SCE_ESCSEQ_BOLD_BLUE_BLACK\", \"default\", \"Bold Blue Black\",\n\t105, \"SCE_ESCSEQ_BOLD_MAGENTA_BLACK\", \"default\", \"Bold Magenta Black\",\n\t106, \"SCE_ESCSEQ_BOLD_CYAN_BLACK\", \"default\", \"Bold Cyan Black\",\n\t107, \"SCE_ESCSEQ_BOLD_WHITE_BLACK\", \"default\", \"Bold White Black\",\n\t108, \"SCE_ESCSEQ_BOLD_DEFAULT_RED\", \"default\", \"Bold Default Red\",\n\t109, \"SCE_ESCSEQ_BOLD_BLACK_RED\", \"default\", \"Bold Black Red\",\n\t110, \"SCE_ESCSEQ_BOLD_RED_RED\", \"default\", \"Bold Red Red\",\n\t111, \"SCE_ESCSEQ_BOLD_GREEN_RED\", \"default\", \"Bold Green Red\",\n\t112, \"SCE_ESCSEQ_BOLD_YELLOW_RED\", \"default\", \"Bold Yellow Red\",\n\t113, \"SCE_ESCSEQ_BOLD_BLUE_RED\", \"default\", \"Bold Blue Red\",\n\t114, \"SCE_ESCSEQ_BOLD_MAGENTA_RED\", \"default\", \"Bold Magenta Red\",\n\t115, \"SCE_ESCSEQ_BOLD_CYAN_RED\", \"default\", \"Bold Cyan Red\",\n\t116, \"SCE_ESCSEQ_BOLD_WHITE_RED\", \"default\", \"Bold White Red\",\n\t117, \"SCE_ESCSEQ_BOLD_DEFAULT_GREEN\", \"default\", \"Bold Default Green\",\n\t118, \"SCE_ESCSEQ_BOLD_BLACK_GREEN\", \"default\", \"Bold Black Green\",\n\t119, \"SCE_ESCSEQ_BOLD_RED_GREEN\", \"default\", \"Bold Red Green\",\n\t120, \"SCE_ESCSEQ_BOLD_GREEN_GREEN\", \"default\", \"Bold Green Green\",\n\t121, \"SCE_ESCSEQ_BOLD_YELLOW_GREEN\", \"default\", \"Bold Yellow Green\",\n\t122, \"SCE_ESCSEQ_BOLD_BLUE_GREEN\", \"default\", \"Bold Blue Green\",\n\t123, \"SCE_ESCSEQ_BOLD_MAGENTA_GREEN\", \"default\", \"Bold Magenta Green\",\n\t124, \"SCE_ESCSEQ_BOLD_CYAN_GREEN\", \"default\", \"Bold Cyan Green\",\n\t125, \"SCE_ESCSEQ_BOLD_WHITE_GREEN\", \"default\", \"Bold White Green\",\n\t126, \"SCE_ESCSEQ_BOLD_DEFAULT_YELLOW\", \"default\", \"Bold Default Yellow\",\n\t127, \"SCE_ESCSEQ_BOLD_BLACK_YELLOW\", \"default\", \"Bold Black Yellow\",\n\t128, \"SCE_ESCSEQ_BOLD_RED_YELLOW\", \"default\", \"Bold Red Yellow\",\n\t129, \"SCE_ESCSEQ_BOLD_GREEN_YELLOW\", \"default\", \"Bold Green Yellow\",\n\t130, \"SCE_ESCSEQ_BOLD_YELLOW_YELLOW\", \"default\", \"Bold Yellow Yellow\",\n\t131, \"SCE_ESCSEQ_BOLD_BLUE_YELLOW\", \"default\", \"Bold Blue Yellow\",\n\t132, \"SCE_ESCSEQ_BOLD_MAGENTA_YELLOW\", \"default\", \"Bold Magenta Yellow\",\n\t133, \"SCE_ESCSEQ_BOLD_CYAN_YELLOW\", \"default\", \"Bold Cyan Yellow\",\n\t134, \"SCE_ESCSEQ_BOLD_WHITE_YELLOW\", \"default\", \"Bold White Yellow\",\n\t135, \"SCE_ESCSEQ_BOLD_DEFAULT_BLUE\", \"default\", \"Bold Default Blue\",\n\t136, \"SCE_ESCSEQ_BOLD_BLACK_BLUE\", \"default\", \"Bold Black Blue\",\n\t137, \"SCE_ESCSEQ_BOLD_RED_BLUE\", \"default\", \"Bold Red Blue\",\n\t138, \"SCE_ESCSEQ_BOLD_GREEN_BLUE\", \"default\", \"Bold Green Blue\",\n\t139, \"SCE_ESCSEQ_BOLD_YELLOW_BLUE\", \"default\", \"Bold Yellow Blue\",\n\t140, \"SCE_ESCSEQ_BOLD_BLUE_BLUE\", \"default\", \"Bold Blue Blue\",\n\t141, \"SCE_ESCSEQ_BOLD_MAGENTA_BLUE\", \"default\", \"Bold Magenta Blue\",\n\t142, \"SCE_ESCSEQ_BOLD_CYAN_BLUE\", \"default\", \"Bold Cyan Blue\",\n\t143, \"SCE_ESCSEQ_BOLD_WHITE_BLUE\", \"default\", \"Bold White Blue\",\n\t144, \"SCE_ESCSEQ_BOLD_DEFAULT_MAGENTA\", \"default\", \"Bold Default Magenta\",\n\t145, \"SCE_ESCSEQ_BOLD_BLACK_MAGENTA\", \"default\", \"Bold Black Magenta\",\n\t146, \"SCE_ESCSEQ_BOLD_RED_MAGENTA\", \"default\", \"Bold Red Magenta\",\n\t147, \"SCE_ESCSEQ_BOLD_GREEN_MAGENTA\", \"default\", \"Bold Green Magenta\",\n\t148, \"SCE_ESCSEQ_BOLD_YELLOW_MAGENTA\", \"default\", \"Bold Yellow Magenta\",\n\t149, \"SCE_ESCSEQ_BOLD_BLUE_MAGENTA\", \"default\", \"Bold Blue Magenta\",\n\t150, \"SCE_ESCSEQ_BOLD_MAGENTA_MAGENTA\", \"default\", \"Bold Magenta Magenta\",\n\t151, \"SCE_ESCSEQ_BOLD_CYAN_MAGENTA\", \"default\", \"Bold Cyan Magenta\",\n\t152, \"SCE_ESCSEQ_BOLD_WHITE_MAGENTA\", \"default\", \"Bold White Magenta\",\n\t153, \"SCE_ESCSEQ_BOLD_DEFAULT_CYAN\", \"default\", \"Bold Default Cyan\",\n\t154, \"SCE_ESCSEQ_BOLD_BLACK_CYAN\", \"default\", \"Bold Black Cyan\",\n\t155, \"SCE_ESCSEQ_BOLD_RED_CYAN\", \"default\", \"Bold Red Cyan\",\n\t156, \"SCE_ESCSEQ_BOLD_GREEN_CYAN\", \"default\", \"Bold Green Cyan\",\n\t157, \"SCE_ESCSEQ_BOLD_YELLOW_CYAN\", \"default\", \"Bold Yellow Cyan\",\n\t158, \"SCE_ESCSEQ_BOLD_BLUE_CYAN\", \"default\", \"Bold Blue Cyan\",\n\t159, \"SCE_ESCSEQ_BOLD_MAGENTA_CYAN\", \"default\", \"Bold Magenta Cyan\",\n\t160, \"SCE_ESCSEQ_BOLD_CYAN_CYAN\", \"default\", \"Bold Cyan Cyan\",\n\t161, \"SCE_ESCSEQ_BOLD_WHITE_CYAN\", \"default\", \"Bold White Cyan\",\n\t162, \"SCE_ESCSEQ_BOLD_DEFAULT_WHITE\", \"default\", \"Bold Default White\",\n\t163, \"SCE_ESCSEQ_BOLD_BLACK_WHITE\", \"default\", \"Bold Black White\",\n\t164, \"SCE_ESCSEQ_BOLD_RED_WHITE\", \"default\", \"Bold Red White\",\n\t165, \"SCE_ESCSEQ_BOLD_GREEN_WHITE\", \"default\", \"Bold Green White\",\n\t166, \"SCE_ESCSEQ_BOLD_YELLOW_WHITE\", \"default\", \"Bold Yellow White\",\n\t167, \"SCE_ESCSEQ_BOLD_BLUE_WHITE\", \"default\", \"Bold Blue White\",\n\t168, \"SCE_ESCSEQ_BOLD_MAGENTA_WHITE\", \"default\", \"Bold Magenta White\",\n\t169, \"SCE_ESCSEQ_BOLD_CYAN_WHITE\", \"default\", \"Bold Cyan White\",\n\t170, \"SCE_ESCSEQ_BOLD_WHITE_WHITE\", \"default\", \"Bold White White\",\n\t171, \"SCE_ESCSEQ_IDENTIFIER\", \"default\", \"Sequence Identifier\",\n\t172, \"SCE_ESCSEQ_UNKNOWN\", \"default\", \"Sequence Unknown\",\n};\n\n\nclass LexerEscSeq : public DefaultLexer {\n\tOptionsEscSeq options;\n\tOptionSetEscSeq osEscSeq;\npublic:\n\tLexerEscSeq() :\n\t\tDefaultLexer(\"escseq\", SCLEX_ESCSEQ, lexicalClasses, std::size(lexicalClasses)) {\n\t}\n\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osEscSeq.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osEscSeq.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osEscSeq.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char *SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osEscSeq.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osEscSeq.DescribeWordListSets();\n\t}\n\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tstatic ILexer5 *LexerFactoryEscSeq() {\n\t\treturn new LexerEscSeq();\n\t}\n};\n\n\nSci_Position SCI_METHOD LexerEscSeq::PropertySet(const char *key, const char *val) {\n\tif (osEscSeq.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\n\nconstexpr bool Is0To9(char ch) noexcept {\n\treturn (ch >= '0') && (ch <= '9');\n}\n\n\nbool AtEOL(Accessor &styler, Sci_Position i) {\n\treturn (styler[i] == '\\n') ||\n\t ((styler[i] == '\\r') && (styler.SafeGetCharAt(i + 1) != '\\n'));\n}\n\n\nconstexpr bool SequenceEnd(int ch) noexcept {\n\treturn (ch == 0) || ((ch >= '@') && (ch <= '~'));\n}\n\n\nint StyleFromSequence(const char *seq) noexcept {\n\tint fore = 0;\n\tint back = 0;\n\tint bold = 0;\n\n\twhile (!SequenceEnd(*seq)) {\n\t\tif (Is0To9(*seq)) {\n\t\t\t// Get up to 3 digits\n\t\t\tint base = *seq - '0';\n\n\t\t\tfor (int i = 0; i < 2; ++i) {\n\t\t\t\tif (!Is0To9(seq[1])) {\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\n\t\t\t\tbase *= 10;\n\t\t\t\tbase += seq[1] - '0';\n\t\t\t\tseq++;\n\t\t\t}\n\n\t\t\tif (base == 0) {\n\t\t\t\t// Reset to default\n\t\t\t\tfore = 0;\n\t\t\t\tback = 0;\n\t\t\t\tbold = 0;\n\t\t\t} else if (base == 1) {\n\t\t\t\t// Set style as bright\n\t\t\t\tbold = 1;\n\t\t\t} else if (base == 22) {\n\t\t\t\t// Set style as not bright\n\t\t\t\tbold = 0;\n\t\t\t} else if (base >= 30 && base <= 37) {\n\t\t\t\t// Set dim fore style\n\t\t\t\tfore = base - 29;\n\t\t\t} else if (base >= 90 && base <= 97) {\n\t\t\t\t// Set bright fore style\n\t\t\t\tfore = base - 89;\n\t\t\t\tbold = 1;\n\t\t\t} else if (base >= 40 && base <= 47) {\n\t\t\t\t// Set dim back style\n\t\t\t\tback = base - 39;\n\t\t\t} else if (base >= 100 && base <= 107) {\n\t\t\t\t// Set dim back style\n\t\t\t\tback = base - 99;\n\t\t\t}\n\t\t}\n\n\t\tseq++;\n\t}\n\n\t// Set fore style as bright style if bold is set\n\tif (bold) {\n\t\tfore += 81;\n\t}\n\n\t// Set to a single style\n\tint style = fore + back * 9;\n\n\t// Skip the reserved style range between 30 and 40\n\tif (style >= 31) {\n\t\tstyle += 9;\n\t}\n\n\treturn style;\n}\n\n\nvoid ColouriseEscSeqLine(const std::string &lineBuffer,\n Sci_PositionU endPos,\n Accessor &styler,\n bool colourText) {\n\tconst Sci_PositionU lengthLine = lineBuffer.length();\n\tconst int style = SCE_ESCSEQ_DEFAULT;\n\n\tif (strstr(lineBuffer.c_str(), CSI)) {\n\t\tconst Sci_Position startPos = endPos - lengthLine;\n\t\tconst char *linePortion = lineBuffer.c_str();\n\t\tSci_Position startPortion = startPos;\n\t\tint portionStyle = style;\n\n\t\twhile (const char *startSeq = strstr(linePortion, CSI)) {\n\t\t\tif (startSeq > linePortion) {\n\t\t\t\tstyler.ColourTo(startPortion + (startSeq - linePortion), portionStyle);\n\t\t\t}\n\n\t\t\tconst char *endSeq = startSeq + 2;\n\n\t\t\twhile (!SequenceEnd(*endSeq))\n\t\t\t\tendSeq++;\n\n\t\t\tconst Sci_Position endSeqPosition = startPortion + (endSeq - linePortion) + 1;\n\n\t\t\tswitch (*endSeq) {\n\t\t\tcase 0:\n\t\t\t\tstyler.ColourTo(endPos, SCE_ESCSEQ_UNKNOWN);\n\t\t\t\treturn;\n\t\t\tcase 'm': // Colour command\n\t\t\t\tstyler.ColourTo(endSeqPosition, SCE_ESCSEQ_IDENTIFIER);\n\t\t\t\tportionStyle = colourText ? StyleFromSequence(startSeq + 2) : style;\n\t\t\t\tbreak;\n\t\t\tcase 'K': // Erase to end of line -> ignore\n\t\t\t\tstyler.ColourTo(endSeqPosition, SCE_ESCSEQ_IDENTIFIER);\n\t\t\t\tbreak;\n\t\t\tdefault:\n\t\t\t\tstyler.ColourTo(endSeqPosition, SCE_ESCSEQ_UNKNOWN);\n\t\t\t\tportionStyle = style;\n\t\t\t}\n\n\t\t\tstartPortion = endSeqPosition;\n\t\t\tlinePortion = endSeq + 1;\n\t\t}\n\n\t\tstyler.ColourTo(endPos, portionStyle);\n\t}\n}\n\n\nvoid LexerEscSeq::Lex(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, IDocument *pAccess) {\n\tAccessor styler(pAccess, nullptr);\n\tstd::string lineBuffer;\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\n\tfor (Sci_PositionU i = startPos; i < startPos + length; i++) {\n\t\tlineBuffer.push_back(styler[i]);\n\n\t\t// End of line met, colourise it\n\t\tif (AtEOL(styler, i)) {\n\t\t\tColouriseEscSeqLine(lineBuffer, i, styler, options.colourText);\n\t\t\tlineBuffer.clear();\n\t\t}\n\t}\n\n\t// Last line does not have ending characters\n\tif (!lineBuffer.empty()) {\n\t\tColouriseEscSeqLine(lineBuffer, startPos + length - 1, styler, options.colourText);\n\t}\n\n\tstyler.Flush();\n}\n\n\n}\n\nextern const LexerModule lmEscSeq(SCLEX_ESCSEQ, LexerEscSeq::LexerFactoryEscSeq, \"escseq\", emptyWordListDesc);\n" }, { "path": "lexers/LexFSharp.cxx", "content": "/**\n * @file LexFSharp.cxx\n * Lexer for F# 5.0\n * Copyright (c) 2021 Robert Di Pardo \n * Parts of LexerFSharp::Lex were adapted from LexCaml.cxx by Robert Roessler (\"RR\").\n * Parts of LexerFSharp::Fold were adapted from LexBash.cxx by Neil Hodgson and Kein-Hong Man.\n * The License.txt file describes the conditions under which this software may be distributed.\n */\n// clang-format off\n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n// clang-format on\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nstatic const char *const lexerName = \"fsharp\";\nstatic constexpr int WORDLIST_SIZE = 5;\nstatic const char *const fsharpWordLists[] = {\n\t\"standard language keywords\",\n\t\"core functions, including those in the FSharp.Collections namespace\",\n\t\"built-in types, core namespaces, modules\",\n\t\"optional\",\n\t\"optional\",\n\tnullptr,\n};\nstatic constexpr int keywordClasses[] = {\n\tSCE_FSHARP_KEYWORD, SCE_FSHARP_KEYWORD2, SCE_FSHARP_KEYWORD3, SCE_FSHARP_KEYWORD4, SCE_FSHARP_KEYWORD5,\n};\n\nnamespace {\n\nstruct OptionsFSharp {\n\tbool fold = true;\n\tbool foldCompact = true;\n\tbool foldComment = true;\n\tbool foldCommentStream = true;\n\tbool foldCommentMultiLine = true;\n\tbool foldPreprocessor = false;\n\tbool foldQuotes = false;\n\tbool foldImports = true;\n};\n\nstruct OptionSetFSharp : public OptionSet {\n\tOptionSetFSharp() {\n\t\tDefineProperty(\"fold\", &OptionsFSharp::fold);\n\t\tDefineProperty(\"fold.compact\", &OptionsFSharp::foldCompact);\n\t\tDefineProperty(\"fold.comment\", &OptionsFSharp::foldComment,\n\t\t\t\t \"Setting this option to 0 disables comment folding in F# files.\");\n\n\t\tDefineProperty(\"fold.fsharp.comment.stream\", &OptionsFSharp::foldCommentStream,\n\t\t\t\t \"Setting this option to 0 disables folding of ML-style comments in F# files when \"\n\t\t\t\t \"fold.comment=1.\");\n\n\t\tDefineProperty(\"fold.fsharp.comment.multiline\", &OptionsFSharp::foldCommentMultiLine,\n\t\t\t\t \"Setting this option to 0 disables folding of grouped line comments in F# files when \"\n\t\t\t\t \"fold.comment=1.\");\n\n\t\tDefineProperty(\"fold.fsharp.preprocessor\", &OptionsFSharp::foldPreprocessor,\n\t\t\t\t \"Setting this option to 1 enables folding of F# compiler directives.\");\n\n\t\tDefineProperty(\"fold.fsharp.quotes\", &OptionsFSharp::foldQuotes,\n\t\t\t\t \"Setting this option to 1 enables folding of multi-line strings in F# files.\");\n\n\t\tDefineProperty(\"fold.fsharp.imports\", &OptionsFSharp::foldImports,\n\t\t\t\t \"Setting this option to 0 disables folding of F# import declarations.\");\n\n\t\tDefineWordListSets(fsharpWordLists);\n\t}\n};\n\nclass UnicodeChar {\n\tenum class Notation { none, asciiDec, asciiHex, utf16, utf32 };\n\tNotation type = Notation::none;\n\t// single-byte Unicode char (000 - 255)\n\tint asciiDigits[3] = { 0 };\n\tint maxDigit = '9';\n\tint toEnd = 0;\n\tbool invalid = false;\n\npublic:\n\tUnicodeChar() noexcept = default;\n\texplicit UnicodeChar(const int prefix) {\n\t\tif (IsADigit(prefix)) {\n\t\t\t*asciiDigits = prefix;\n\t\t\tif (*asciiDigits >= '0' && *asciiDigits <= '2') {\n\t\t\t\ttype = Notation::asciiDec;\n\t\t\t\t// count first digit as \"prefix\"\n\t\t\t\ttoEnd = 2;\n\t\t\t}\n\t\t} else if (prefix == 'x' || prefix == 'u' || prefix == 'U') {\n\t\t\tswitch (prefix) {\n\t\t\t\tcase 'x':\n\t\t\t\t\ttype = Notation::asciiHex;\n\t\t\t\t\ttoEnd = 2;\n\t\t\t\t\tbreak;\n\t\t\t\tcase 'u':\n\t\t\t\t\ttype = Notation::utf16;\n\t\t\t\t\ttoEnd = 4;\n\t\t\t\t\tbreak;\n\t\t\t\tcase 'U':\n\t\t\t\t\ttype = Notation::utf32;\n\t\t\t\t\ttoEnd = 8;\n\t\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\t}\n\tvoid Parse(const int ch) {\n\t\tinvalid = false;\n\t\tswitch (type) {\n\t\t\tcase Notation::asciiDec: {\n\t\t\t\tmaxDigit = (*asciiDigits < '2') ? '9' : (asciiDigits[1] <= '4') ? '9' : '5';\n\t\t\t\tif (IsADigit(ch) && asciiDigits[1] <= maxDigit && ch <= maxDigit) {\n\t\t\t\t\tasciiDigits[1] = ch;\n\t\t\t\t\ttoEnd--;\n\t\t\t\t} else {\n\t\t\t\t\tinvalid = true;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tcase Notation::asciiHex:\n\t\t\tcase Notation::utf16:\n\t\t\t\tif (IsADigit(ch, 16)) {\n\t\t\t\t\ttoEnd--;\n\t\t\t\t} else {\n\t\t\t\t\tinvalid = true;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase Notation::utf32:\n\t\t\t\tif ((toEnd > 6 && ch == '0') || (toEnd <= 6 && IsADigit(ch, 16))) {\n\t\t\t\t\ttoEnd--;\n\t\t\t\t} else {\n\t\t\t\t\tinvalid = true;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase Notation::none:\n\t\t\t\tbreak;\n\t\t}\n\t}\n\tconstexpr bool AtEnd() noexcept {\n\t\treturn invalid || type == Notation::none || (type != Notation::none && toEnd < 0);\n\t}\n};\n\ninline bool MatchStreamCommentStart(StyleContext &cxt) {\n\t// match (* ... *), but allow point-free usage of the `*` operator,\n\t// e.g. List.fold (*) 1 [ 1; 2; 3 ]\n\treturn (cxt.Match('(', '*') && cxt.GetRelative(2) != ')');\n}\n\ninline bool MatchStreamCommentEnd(const StyleContext &cxt) {\n\treturn (cxt.ch == ')' && cxt.chPrev == '*');\n}\n\ninline bool MatchLineComment(const StyleContext &cxt) {\n\t// style shebang lines as comments in F# scripts:\n\t// https://fsharp.org/specs/language-spec/4.1/FSharpSpec-4.1-latest.pdf#page=30&zoom=auto,-98,537\n\treturn cxt.Match('/', '/') || cxt.Match('#', '!');\n}\n\ninline bool MatchLineNumberStart(StyleContext &cxt) {\n\treturn cxt.atLineStart && (cxt.MatchIgnoreCase(\"#line\") ||\n\t\t(cxt.ch == '#' && (IsADigit(cxt.chNext) || IsADigit(cxt.GetRelative(2)))));\n}\n\ninline bool MatchPPDirectiveStart(const StyleContext &cxt) {\n\treturn (cxt.atLineStart && cxt.ch == '#' && iswordstart(cxt.chNext));\n}\n\ninline bool MatchTypeAttributeStart(const StyleContext &cxt) {\n\treturn cxt.Match('[', '<');\n}\n\ninline bool MatchTypeAttributeEnd(const StyleContext &cxt) {\n\treturn (cxt.ch == ']' && cxt.chPrev == '>');\n}\n\ninline bool MatchQuotedExpressionStart(const StyleContext &cxt) {\n\treturn cxt.Match('<', '@');\n}\n\ninline bool MatchQuotedExpressionEnd(const StyleContext &cxt) {\n\treturn (cxt.ch == '>' && cxt.chPrev == '@');\n}\n\ninline bool MatchStringStart(StyleContext &cxt) {\n\treturn (cxt.ch == '\"' || (cxt.chNext == '\"' && AnyOf(cxt.ch, '@', '$')) ||\n\t\t(cxt.GetRelative(2, '\"') && (cxt.Match('@', '$') || cxt.Match('$', '@'))));\n}\n\ninline bool FollowsEscapedBackslash(StyleContext &cxt) {\n\tint count = 0;\n\tfor (Sci_Position offset = 1; cxt.GetRelative(-offset) == '\\\\'; offset++)\n\t\tcount++;\n\treturn count % 2 != 0;\n}\n\ninline bool MatchStringEnd(StyleContext &cxt, bool &rawString) {\n\tbool result = false;\n\tswitch (cxt.state) {\n\t\tcase SCE_FSHARP_STRING:\n\t\t\tresult =\n\t\t\t (rawString && cxt.Match(\"\\\"\\\"\\\"\") && cxt.chPrev != '$') ||\n\t\t\t (!rawString && cxt.ch == '\"' &&\n\t\t\t (cxt.chPrev != '\\\\' || (cxt.GetRelative(-2) == '\\\\' && !FollowsEscapedBackslash(cxt))));\n\t\t\tbreak;\n\t\tcase SCE_FSHARP_VERBATIM:\n\t\t\tresult =\n\t\t\t // embedded quotes must be in pairs\n\t\t\t cxt.ch == '\"' && cxt.chNext != '\"' &&\n\t\t\t (cxt.chPrev != '\"' ||\n\t\t\t // empty verbatim string?\n\t\t\t (AnyOf(cxt.GetRelative(-2), '@', '$') ||\n\t\t\t // pair of quotes at end of verbatim string?\n\t\t\t (cxt.GetRelative(-2) == '\"' && !(AnyOf(cxt.GetRelative(-3), '@', '$')))));\n\t\t\tbreak;\n\t\tdefault:\n\t\t\tbreak;\n\t}\n\tif (rawString && result)\n\t\trawString = false;\n\treturn result;\n}\n\ninline bool MatchCharacterStart(StyleContext &cxt) {\n\t// don't style generic type parameters: 'a, 'b, 'T, etc.\n\treturn (cxt.ch == '\\'' && !(cxt.chPrev == ':' || cxt.GetRelative(-2) == ':'));\n}\n\ninline bool IsLineEnd(StyleContext &cxt, const Sci_Position offset) {\n\tconst int ch = cxt.GetRelative(offset, '\\n');\n\treturn (ch == '\\r' || ch == '\\n');\n}\n\nclass LexerFSharp : public DefaultLexer {\n\tWordList keywords[WORDLIST_SIZE];\n\tOptionsFSharp options;\n\tOptionSetFSharp optionSet;\n\tCharacterSet setOperators;\n\tCharacterSet setFormatSpecs;\n\tCharacterSet setDotNetFormatSpecs;\n\tCharacterSet setFormatFlags;\n\tCharacterSet numericMetaChars1;\n\tCharacterSet numericMetaChars2;\n\tstd::map numericPrefixes = { { 'b', 2 }, { 'o', 8 }, { 'x', 16 } };\n\tstatic constexpr int rawStringMask = 0x10000;\n\tstatic constexpr int interpolatedStringMask = 0x20000;\n\npublic:\n\texplicit LexerFSharp()\n\t : DefaultLexer(lexerName, SCLEX_FSHARP),\n\t setOperators(CharacterSet::setNone, \"~^'-+*/%=@|&<>()[]{};,:!?\"),\n\t setFormatSpecs(CharacterSet::setNone, \".%aAbBcdeEfFgGiMoOstuxX0123456789\"),\n\t setDotNetFormatSpecs(CharacterSet::setNone, \"cCdDeEfFgGnNpPxX\"),\n\t setFormatFlags(CharacterSet::setNone, \".-+0 \"),\n\t numericMetaChars1(CharacterSet::setNone, \"_uU\"),\n\t numericMetaChars2(CharacterSet::setNone, \"fFIlLmMnsy\") {\n\t\tSetOptionSet(&optionSet);\n\t}\n\tLexerFSharp(const LexerFSharp &) = delete;\n\tLexerFSharp(LexerFSharp &&) = delete;\n\tLexerFSharp &operator=(const LexerFSharp &) = delete;\n\tLexerFSharp &operator=(LexerFSharp &&) = delete;\n\t~LexerFSharp() override = default;\n\tstatic ILexer5 *LexerFactoryFSharp() {\n\t\treturn new LexerFSharp();\n\t}\n\tvoid SCI_METHOD Release() noexcept override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const noexcept override {\n\t\treturn lvRelease5;\n\t}\n\tconst char *SCI_METHOD GetName() noexcept override {\n\t\treturn lexerName;\n\t}\n\tint SCI_METHOD GetIdentifier() noexcept override {\n\t\treturn SCLEX_FSHARP;\n\t}\n\tint SCI_METHOD LineEndTypesSupported() noexcept override {\n\t\treturn SC_LINE_END_TYPE_DEFAULT;\n\t}\n\tvoid *SCI_METHOD PrivateCall(int, void *) noexcept override {\n\t\treturn nullptr;\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override {\n\t\tif (optionSet.PropertySet(&options, key, val)) {\n\t\t\treturn 0;\n\t\t}\n\t\treturn INVALID_POSITION;\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU start, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU start, Sci_Position length, int initStyle,IDocument *pAccess) override;\n\nprivate:\n\tinline bool IsNumber(StyleContext &cxt, const int base = 10) {\n\t\treturn IsADigit(cxt.ch, base) || (IsADigit(cxt.chPrev, base) && numericMetaChars1.Contains(cxt.ch)) ||\n\t\t (IsADigit(cxt.GetRelative(-2), base) && numericMetaChars2.Contains(cxt.ch));\n\t}\n\n\tinline bool IsFloat(StyleContext &cxt) {\n\t\tif (cxt.MatchIgnoreCase(\"e+\") || cxt.MatchIgnoreCase(\"e-\")) {\n\t\t\tcxt.Forward();\n\t\t\treturn true;\n\t\t}\n\t\treturn ((cxt.chPrev == '.' && IsADigit(cxt.ch)) ||\n\t\t\t(IsADigit(cxt.chPrev) && (cxt.ch == '.' || numericMetaChars2.Contains(cxt.ch))));\n\t}\n};\n\nSci_Position SCI_METHOD LexerFSharp::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tSci_Position firstModification = INVALID_POSITION;\n\n\tif (n < WORDLIST_SIZE) {\n\t\twordListN = &keywords[n];\n\t}\n\tif (wordListN && wordListN->Set(wl)) {\n\t\tfirstModification = 0;\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerFSharp::Lex(Sci_PositionU start, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\tStyleContext sc(start, static_cast(length), initStyle, styler);\n\tSci_Position lineCurrent = styler.GetLine(static_cast(start));\n\tSci_PositionU cursor = 0;\n\tUnicodeChar uniCh = UnicodeChar();\n\tstd::string token;\n\tconstexpr Sci_Position MAX_WORD_LEN = 64;\n\tconstexpr int SPACE = ' ';\n\tint currentBase = 10;\n\tint stringResumeState = SCE_FSHARP_STRING;\n\tint lineState = (lineCurrent >= 1) ? styler.GetLineState(lineCurrent - 1) : 0;\n\tint levelNesting = lineState & 0xff;\n\tbool isRawString = (lineState & rawStringMask) != 0;\n\tbool canInterpolate = (lineState & interpolatedStringMask) != 0;\n\tbool isInterpolated = false;\n\n\twhile (sc.More()) {\n\t\tSci_PositionU colorSpan = sc.currentPos - 1;\n\t\tint state = -1;\n\t\tbool advance = true;\n\n\t\tswitch (sc.state & 0xff) {\n\t\t\tcase SCE_FSHARP_DEFAULT:\n\t\t\t\tcursor = sc.currentPos;\n\n\t\t\t\tif (MatchLineNumberStart(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_LINENUM;\n\t\t\t\t} else if (MatchPPDirectiveStart(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_PREPROCESSOR;\n\t\t\t\t} else if (MatchLineComment(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_COMMENTLINE;\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ch = SPACE;\n\t\t\t\t} else if (MatchStreamCommentStart(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_COMMENT;\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ch = SPACE;\n\t\t\t\t} else if (MatchTypeAttributeStart(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_ATTRIBUTE;\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else if (MatchQuotedExpressionStart(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_QUOTATION;\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else if (MatchCharacterStart(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_CHARACTER;\n\t\t\t\t} else if (MatchStringStart(sc)) {\n\t\t\t\t\tbool isVerbatim = sc.ch == '@' || sc.Match('$', '@');\n\t\t\t\t\tcanInterpolate = sc.ch == '$' || sc.Match('@', '$');\n\t\t\t\t\t// allow unescaped double quotes inside literal or interpolated raw strings\n\t\t\t\t\tisRawString = sc.Match(\"$\\\"\\\"\\\"\") || sc.Match(\"\\\"\\\"\\\"\") ||\n\t\t\t\t\t\t sc.Match(\"@$\\\"\\\"\\\"\") || sc.Match(\"$@\\\"\\\"\\\"\");\n\t\t\t\t\tstate = isVerbatim ? SCE_FSHARP_VERBATIM : SCE_FSHARP_STRING;\n\t\t\t\t} else if (IsADigit(sc.ch, currentBase) ||\n\t\t\t\t\t ((sc.ch == '+' || sc.ch == '-') && IsADigit(sc.chNext))) {\n\t\t\t\t\tstate = SCE_FSHARP_NUMBER;\n\t\t\t\t} else if (setOperators.Contains(sc.ch) &&\n\t\t\t\t\t // don't use operator style in async keywords (e.g. `return!`)\n\t\t\t\t\t !(sc.ch == '!' && iswordstart(sc.chPrev)) &&\n\t\t\t\t\t // don't use operator style in member access, array/string indexing\n\t\t\t\t\t !(sc.ch == '.' && (sc.chPrev == '\\\"' || iswordstart(sc.chPrev)) &&\n\t\t\t\t\t (iswordstart(sc.chNext) || sc.chNext == '['))) {\n\t\t\t\t\tstate = SCE_FSHARP_OPERATOR;\n\t\t\t\t} else if (sc.Match('`', '`')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tstate = SCE_FSHARP_QUOT_IDENTIFIER;\n\t\t\t\t} else if (iswordstart(sc.ch)) {\n\t\t\t\t\tstate = SCE_FSHARP_IDENTIFIER;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_LINENUM:\n\t\t\tcase SCE_FSHARP_PREPROCESSOR:\n\t\t\t\tif (sc.MatchLineEnd()) {\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t\tadvance = false;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_COMMENT:\n\t\t\t\tif (MatchStreamCommentStart(sc)) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ch = SPACE;\n\t\t\t\t\tlevelNesting++;\n\t\t\t\t} else if (MatchStreamCommentEnd(sc)) {\n\t\t\t\t\tif (levelNesting > 0)\n\t\t\t\t\t\tlevelNesting--;\n\t\t\t\t\telse {\n\t\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t\t\tcolorSpan++;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_ATTRIBUTE:\n\t\t\tcase SCE_FSHARP_QUOTATION:\n\t\t\t\tif (MatchTypeAttributeEnd(sc) || MatchQuotedExpressionEnd(sc)) {\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t\tcolorSpan++;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_CHARACTER:\n\t\t\t\tif (sc.chPrev == '\\\\' && sc.GetRelative(-2) != '\\\\') {\n\t\t\t\t\tuniCh = UnicodeChar(sc.ch);\n\t\t\t\t} else if (sc.ch == '\\'' &&\n\t\t\t\t\t ((sc.chPrev == ' ' && sc.GetRelative(-2) == '\\'') || sc.chPrev != '\\\\' ||\n\t\t\t\t\t\t(sc.chPrev == '\\\\' && sc.GetRelative(-2) == '\\\\'))) {\n\t\t\t\t\t// byte literal?\n\t\t\t\t\tif (sc.Match('\\'', 'B')) {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\tcolorSpan++;\n\t\t\t\t\t}\n\t\t\t\t\tif (!sc.atLineEnd) {\n\t\t\t\t\t\tcolorSpan++;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ChangeState(SCE_FSHARP_IDENTIFIER);\n\t\t\t\t\t}\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t} else {\n\t\t\t\t\tuniCh.Parse(sc.ch);\n\t\t\t\t\tif (uniCh.AtEnd() && (sc.currentPos - cursor) >= 2) {\n\t\t\t\t\t\t// terminate now, since we left the char behind\n\t\t\t\t\t\tsc.ChangeState(SCE_FSHARP_IDENTIFIER);\n\t\t\t\t\t\tadvance = false;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_STRING:\n\t\t\tcase SCE_FSHARP_VERBATIM:\n\t\t\t\tif (MatchStringEnd(sc, isRawString)) {\n\t\t\t\t\tconst Sci_Position strLen = static_cast(sc.currentPos - cursor);\n\t\t\t\t\t// backtrack to start of string\n\t\t\t\t\tfor (Sci_Position i = -strLen; i < 0; i++) {\n\t\t\t\t\t\tconst int startQuote = sc.GetRelative(i);\n\t\t\t\t\t\tif (startQuote == '\\\"') {\n\t\t\t\t\t\t\t// byte array?\n\t\t\t\t\t\t\tif (sc.Match('\\\"', 'B')) {\n\t\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t\t\tcolorSpan++;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tif (!sc.atLineEnd) {\n\t\t\t\t\t\t\t\tcolorSpan++;\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\tsc.ChangeState(SCE_FSHARP_IDENTIFIER);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t\t\t\tcanInterpolate = false;\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '%' && !(sc.Match(\"% \") || sc.Match(\"% \\\"\")) &&\n\t\t\t\t\t (setFormatSpecs.Contains(sc.chNext) || setFormatFlags.Contains(sc.chNext))) {\n\t\t\t\t\tif (canInterpolate && sc.chNext != '%') {\n\t\t\t\t\t\tfor (Sci_Position i = 2; i < length && !IsLineEnd(sc, i); i++) {\n\t\t\t\t\t\t\tif (sc.GetRelative(i) == '{') {\n\t\t\t\t\t\t\t\tstate = setFormatSpecs.Contains(sc.GetRelative(i - 1))\n\t\t\t\t\t\t\t\t\t ? SCE_FSHARP_FORMAT_SPEC\n\t\t\t\t\t\t\t\t\t : state;\n\t\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = SCE_FSHARP_FORMAT_SPEC;\n\t\t\t\t\t}\n\t\t\t\t} else if (isInterpolated) {\n\t\t\t\t\tif (sc.ch == ',') {\n\t\t\t\t\t\t// .NET alignment specifier?\n\t\t\t\t\t\tstate = (sc.chNext == '+' || sc.chNext == '-' || IsADigit(sc.chNext))\n\t\t\t\t\t\t\t ? SCE_FSHARP_FORMAT_SPEC\n\t\t\t\t\t\t\t : state;\n\t\t\t\t\t} else if (sc.ch == ':') {\n\t\t\t\t\t\t// .NET format specifier?\n\t\t\t\t\t\tstate = setDotNetFormatSpecs.Contains(sc.chNext)\n\t\t\t\t\t\t\t ? SCE_FSHARP_FORMAT_SPEC\n\t\t\t\t\t\t\t : state;\n\t\t\t\t\t} else if (sc.chNext == '}') {\n\t\t\t\t\t\tisInterpolated = false;\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (canInterpolate && sc.ch == '{') {\n\t\t\t\t\tisInterpolated = true;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_QUOT_IDENTIFIER:\n\t\t\t\tif (sc.ch == '`' && sc.chPrev == '`') {\n\t\t\t\t\tcolorSpan++;\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_IDENTIFIER:\n\t\t\t\tif (!(iswordstart(sc.ch) || AnyOf(sc.ch, '\\'', '!'))) {\n\t\t\t\t\tconst Sci_PositionU wordLen = sc.currentPos - cursor;\n\t\t\t\t\tif (wordLen < MAX_WORD_LEN) {\n\t\t\t\t\t\t// wordLength is believable as keyword, [re-]construct token - RR\n\t\t\t\t\t\ttoken = styler.GetRange(sc.currentPos - wordLen, sc.currentPos);\n\t\t\t\t\t\t// except for the standard source file macros,\n\t\t\t\t\t\t// a snake_case_identifier can never be a keyword\n\t\t\t\t\t\tif (token.find('_') == token.npos) {\n\t\t\t\t\t\t\tfor (int i = 0; i < WORDLIST_SIZE; i++) {\n\t\t\t\t\t\t\t\tif (keywords[i].InList(token)) {\n\t\t\t\t\t\t\t\t\tsc.ChangeState(keywordClasses[i]);\n\t\t\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t\t\t}\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t} else if (token == \"__LINE__\" || token == \"__SOURCE_DIRECTORY__\" ||\n\t\t\t\t\t\t\t token == \"__SOURCE_FILE__\") {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_FSHARP_KEYWORD);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\t\tadvance = false;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_OPERATOR:\n\t\t\t\t// special-case \"()\" and \"[]\" tokens as KEYWORDS - RR\n\t\t\t\tif ((sc.ch == ')' && sc.chPrev == '(') || (sc.ch == ']' && sc.chPrev == '[')) {\n\t\t\t\t\tsc.ChangeState(SCE_FSHARP_KEYWORD);\n\t\t\t\t\tcolorSpan++;\n\t\t\t\t} else {\n\t\t\t\t\tadvance = false;\n\t\t\t\t}\n\t\t\t\tstate = SCE_FSHARP_DEFAULT;\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_NUMBER:\n\t\t\t\tif ((setOperators.Contains(sc.chPrev) || IsASpaceOrTab(sc.chPrev)) && sc.ch == '0') {\n\t\t\t\t\tif (numericPrefixes.find(sc.chNext) != numericPrefixes.end()) {\n\t\t\t\t\t\tcurrentBase = numericPrefixes[sc.chNext];\n\t\t\t\t\t\tsc.Forward(2);\n\t\t\t\t\t}\n\t\t\t\t} else if ((setOperators.Contains(sc.GetRelative(-2)) || IsASpaceOrTab(sc.GetRelative(-2))) &&\n\t\t\t\t\t sc.chPrev == '0') {\n\t\t\t\t\tif (numericPrefixes.find(sc.ch) != numericPrefixes.end()) {\n\t\t\t\t\t\tcurrentBase = numericPrefixes[sc.ch];\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tstate = (IsNumber(sc, currentBase) || IsFloat(sc))\n\t\t\t\t\t? SCE_FSHARP_NUMBER\n\t\t\t\t\t// change style even when operators aren't spaced\n\t\t\t\t\t: setOperators.Contains(sc.ch) ? SCE_FSHARP_OPERATOR : SCE_FSHARP_DEFAULT;\n\t\t\t\tcurrentBase = (state == SCE_FSHARP_NUMBER) ? currentBase : 10;\n\t\t\t\tbreak;\n\t\t\tcase SCE_FSHARP_FORMAT_SPEC:\n\t\t\t\tif (!(isInterpolated && IsADigit(sc.chNext)) &&\n\t\t\t\t\t(!setFormatSpecs.Contains(sc.chNext) ||\n\t\t\t\t !(setFormatFlags.Contains(sc.ch) || IsADigit(sc.ch)) ||\n\t\t\t\t (setFormatFlags.Contains(sc.ch) && sc.ch == sc.chNext))) {\n\t\t\t\t\tcolorSpan++;\n\t\t\t\t\tstate = stringResumeState;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\tif (sc.MatchLineEnd()) {\n\t\t\tlineState = (sc.state == SCE_FSHARP_COMMENT) ? levelNesting : 0;\n\t\t\tif (sc.state == SCE_FSHARP_STRING || sc.state == SCE_FSHARP_VERBATIM)\n\t\t\t\tlineState |= (sc.state << 8);\n\t\t\tif (isRawString)\n\t\t\t\tlineState |= rawStringMask;\n\t\t\tif (canInterpolate)\n\t\t\t\tlineState |= interpolatedStringMask;\n\t\t\tstyler.SetLineState(lineCurrent++, lineState);\n\t\t\tadvance = true;\n\t\t}\n\n\t\tif (state >= SCE_FSHARP_DEFAULT) {\n\t\t\tif (state == SCE_FSHARP_FORMAT_SPEC)\n\t\t\t\tstringResumeState = sc.state;\n\t\t\tstyler.ColourTo(colorSpan, sc.state);\n\t\t\tsc.ChangeState(state);\n\t\t}\n\n\t\tif (advance) {\n\t\t\tsc.Forward();\n\t\t}\n\t}\n\n\tsc.Complete();\n}\n\nbool LineContains(LexAccessor &styler, const char *word, const Sci_Position start,\n\t\t const int chAttr = SCE_FSHARP_DEFAULT);\n\nvoid FoldLexicalGroup(LexAccessor &styler, int &levelNext, const Sci_Position lineCurrent, const char *word,\n\t\t const int chAttr);\n\nvoid SCI_METHOD LexerFSharp::Fold(Sci_PositionU start, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tif (!options.fold) {\n\t\treturn;\n\t}\n\n\tLexAccessor styler(pAccess);\n\tSci_Position startPos = static_cast(start);\n\tconst Sci_PositionU endPos = start + length;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tif (lineCurrent > 0) {\n\t\tlineCurrent--;\n\t\tstartPos = styler.LineStart(lineCurrent);\n\t\tinitStyle = (startPos > 0) ? styler.StyleAt(startPos - 1) : SCE_FSHARP_DEFAULT;\n\t}\n\tSci_Position lineNext = lineCurrent + 1;\n\tSci_Position lineStartNext = styler.LineStart(lineNext);\n\tint style = initStyle;\n\tint styleNext = styler.StyleAt(startPos);\n\tchar chNext = styler[startPos];\n\tint levelCurrent = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelNext = levelCurrent;\n\tint visibleChars = 0;\n\n\tfor (Sci_PositionU i = static_cast(startPos); i < endPos; i++) {\n\t\tconst Sci_Position currentPos = static_cast(i);\n\t\tconst bool atEOL = (currentPos == (lineStartNext - 1));\n\t\tconst bool atLineOrDocEnd = (atEOL || (i == (endPos - 1)));\n\t\tconst int stylePrev = style;\n\t\tconst char ch = chNext;\n\t\tconst bool inLineComment = (stylePrev == SCE_FSHARP_COMMENTLINE);\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(currentPos + 1);\n\t\tchNext = styler.SafeGetCharAt(currentPos + 1);\n\n\t\tif (options.foldComment) {\n\t\t\tif (options.foldCommentMultiLine && inLineComment && atEOL) {\n\t\t\t\tFoldLexicalGroup(styler, levelNext, lineCurrent, \"//\", SCE_FSHARP_COMMENTLINE);\n\t\t\t}\n\n\t\t\tif (options.foldCommentStream && style == SCE_FSHARP_COMMENT && !inLineComment) {\n\t\t\t\tif (stylePrev != SCE_FSHARP_COMMENT ||\n\t\t\t\t (styler.Match(currentPos, \"(*\") &&\n\t\t\t\t !LineContains(styler, \"*)\", currentPos + 2, SCE_FSHARP_COMMENT))) {\n\t\t\t\t\tlevelNext++;\n\t\t\t\t} else if ((styleNext != SCE_FSHARP_COMMENT ||\n\t\t\t\t\t ((styler.Match(currentPos, \"*)\") &&\n\t\t\t\t\t !LineContains(styler, \"(*\", styler.LineStart(lineCurrent), SCE_FSHARP_COMMENT)) &&\n\t\t\t\t\t styler.GetLineState(lineCurrent - 1) > 0)) &&\n\t\t\t\t\t !atEOL) {\n\t\t\t\t\tlevelNext--;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t\tif (options.foldQuotes && atEOL) {\n\t\t\tconst int lineState = (styler.GetLineState(lineCurrent > 0 ? lineCurrent - 1 : lineCurrent) >> 8) & 0xff;\n\t\t\tconst bool isQuoted = (lineState == SCE_FSHARP_STRING || lineState == SCE_FSHARP_VERBATIM);\n\t\t\tconst bool isStringlike = (style == SCE_FSHARP_STRING || style == SCE_FSHARP_VERBATIM);\n\t\t\tif (isStringlike && (!isQuoted || lineCurrent == 0)) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (!isStringlike && isQuoted) {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\n\t\tif (options.foldPreprocessor && style == SCE_FSHARP_PREPROCESSOR) {\n\t\t\tif (styler.Match(currentPos, \"#if\")) {\n\t\t\t\tlevelNext++;\n\t\t\t} else if (styler.Match(currentPos, \"#endif\")) {\n\t\t\t\tlevelNext--;\n\t\t\t}\n\t\t}\n\n\t\tif (options.foldImports && styler.Match(currentPos, \"open \") && styleNext == SCE_FSHARP_KEYWORD) {\n\t\t\tFoldLexicalGroup(styler, levelNext, lineCurrent, \"open \", SCE_FSHARP_KEYWORD);\n\t\t}\n\n\t\tif (atLineOrDocEnd) {\n\t\t\tint levelUse = levelCurrent;\n\t\t\tint lev = levelUse | levelNext << 16;\n\n\t\t\tif (visibleChars == 0 && options.foldCompact) {\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t}\n\t\t\tif ((levelUse < levelNext) && (visibleChars > 0)) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\n\t\t\tvisibleChars = 0;\n\t\t\tlineCurrent++;\n\t\t\tlineNext = lineCurrent + 1;\n\t\t\tlineStartNext = styler.LineStart(lineNext);\n\t\t\tlevelCurrent = levelNext;\n\t\t}\n\n\t\tif (!IsASpace(ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n\tconst int flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelCurrent | flagsNext);\n}\n\nbool LineContains(LexAccessor &styler, const char *word, const Sci_Position start, const int chAttr) {\n\tbool found = false;\n\tbool requireStyle = (chAttr > SCE_FSHARP_DEFAULT);\n\tfor (Sci_Position i = start; i < styler.LineStart(styler.GetLine(start) + 1) - 1; i++) {\n\t\tif (styler.Match(i, word)) {\n\t\t\tfound = requireStyle ? styler.StyleAt(i) == chAttr : true;\n\t\t\tbreak;\n\t\t}\n\t}\n\treturn found;\n}\n\nvoid FoldLexicalGroup(LexAccessor &styler, int &levelNext, const Sci_Position lineCurrent, const char *word,\n\t\t const int chAttr) {\n\tconst Sci_Position linePrev = styler.LineStart(lineCurrent - 1);\n\tconst Sci_Position lineNext = styler.LineStart(lineCurrent + 1);\n\tconst bool follows = (lineCurrent > 0) && LineContains(styler, word, linePrev, chAttr);\n\tconst bool isFollowed = LineContains(styler, word, lineNext, chAttr);\n\n\tif (isFollowed && !follows) {\n\t\tlevelNext++;\n\t} else if (!isFollowed && follows && levelNext > SC_FOLDLEVELBASE) {\n\t\tlevelNext--;\n\t}\n}\n} // namespace\n\nextern const LexerModule lmFSharp(SCLEX_FSHARP, LexerFSharp::LexerFactoryFSharp, \"fsharp\", fsharpWordLists);\n" }, { "path": "lexers/LexFlagship.cxx", "content": "// Scintilla source code edit control\n/** @file LexFlagship.cxx\n ** Lexer for Harbour and FlagShip.\n ** (Syntactically compatible to other xBase dialects, like Clipper, dBase, Clip, FoxPro etc.)\n **/\n// Copyright 2005 by Randy Butler\n// Copyright 2010 by Xavi (Harbour)\n// Copyright 1998-2003 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n// Extended to accept accented characters\nstatic inline bool IsAWordChar(int ch)\n{\n\treturn ch >= 0x80 ||\n\t\t\t\t(isalnum(ch) || ch == '_');\n}\n\nstatic void ColouriseFlagShipDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *keywordlists[], Accessor &styler)\n{\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n\tWordList &keywords4 = *keywordlists[3];\n\tWordList &keywords5 = *keywordlists[4];\n\n\t// property lexer.flagship.styling.within.preprocessor\n\t//\tFor Harbour code, determines whether all preprocessor code is styled in the preprocessor style (0) or only from the\n\t//\tinitial # to the end of the command word(1, the default). It also determines how to present text, dump, and disabled code.\n\tbool stylingWithinPreprocessor = styler.GetPropertyInt(\"lexer.flagship.styling.within.preprocessor\", 1) != 0;\n\n\tCharacterSet setDoxygen(CharacterSet::setAlpha, \"$@\\\\&<>#{}[]\");\n\n\tint visibleChars = 0;\n\tint closeStringChar = 0;\n\tint styleBeforeDCKeyword = SCE_FS_DEFAULT;\n\tbool bEnableCode = initStyle < SCE_FS_DISABLEDCODE;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\t// Determine if the current state should terminate.\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_FS_OPERATOR:\n\t\t\tcase SCE_FS_OPERATOR_C:\n\t\t\tcase SCE_FS_WORDOPERATOR:\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_IDENTIFIER:\n\t\t\tcase SCE_FS_IDENTIFIER_C:\n\t\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\t\tchar s[64];\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(bEnableCode ? SCE_FS_KEYWORD : SCE_FS_KEYWORD_C);\n\t\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(bEnableCode ? SCE_FS_KEYWORD2 : SCE_FS_KEYWORD2_C);\n\t\t\t\t\t} else if (bEnableCode && keywords3.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_FS_KEYWORD3);\n\t\t\t\t\t} else if (bEnableCode && keywords4.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_FS_KEYWORD4);\n\t\t\t\t\t}// Else, it is really an identifier...\n\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_NUMBER:\n\t\t\t\tif (!IsAWordChar(sc.ch) && !(sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\t\tsc.SetState(SCE_FS_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_NUMBER_C:\n\t\t\t\tif (!IsAWordChar(sc.ch) && sc.ch != '.') {\n\t\t\t\t\tsc.SetState(SCE_FS_DEFAULT_C);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_CONSTANT:\n\t\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_FS_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_STRING:\n\t\t\tcase SCE_FS_STRING_C:\n\t\t\t\tif (sc.ch == closeStringChar) {\n\t\t\t\t\tsc.ForwardSetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(bEnableCode ? SCE_FS_STRINGEOL : SCE_FS_STRINGEOL_C);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_STRINGEOL:\n\t\t\tcase SCE_FS_STRINGEOL_C:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_COMMENTDOC:\n\t\t\tcase SCE_FS_COMMENTDOC_C:\n\t\t\t\tif (sc.Match('*', '/')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '*') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = bEnableCode ? SCE_FS_COMMENTDOC : SCE_FS_COMMENTDOC_C;\n\t\t\t\t\t\tsc.SetState(SCE_FS_COMMENTDOCKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_COMMENT:\n\t\t\tcase SCE_FS_COMMENTLINE:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_FS_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_COMMENTLINEDOC:\n\t\t\tcase SCE_FS_COMMENTLINEDOC_C:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t} else if (sc.ch == '@' || sc.ch == '\\\\') { // JavaDoc and Doxygen support\n\t\t\t\t\t// Verify that we have the conditions to mark a comment-doc-keyword\n\t\t\t\t\tif ((IsASpace(sc.chPrev) || sc.chPrev == '/' || sc.chPrev == '!') && (!IsASpace(sc.chNext))) {\n\t\t\t\t\t\tstyleBeforeDCKeyword = bEnableCode ? SCE_FS_COMMENTLINEDOC : SCE_FS_COMMENTLINEDOC_C;\n\t\t\t\t\t\tsc.SetState(SCE_FS_COMMENTDOCKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_COMMENTDOCKEYWORD:\n\t\t\t\tif ((styleBeforeDCKeyword == SCE_FS_COMMENTDOC || styleBeforeDCKeyword == SCE_FS_COMMENTDOC_C) &&\n\t\t\t\t\t\tsc.Match('*', '/')) {\n\t\t\t\t\tsc.ChangeState(SCE_FS_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tsc.ForwardSetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t} else if (!setDoxygen.Contains(sc.ch)) {\n\t\t\t\t\tchar s[64];\n\t\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\t\tif (!IsASpace(sc.ch) || !keywords5.InList(s + 1)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_FS_COMMENTDOCKEYWORDERROR);\n\t\t\t\t\t}\n\t\t\t\t\tsc.SetState(styleBeforeDCKeyword);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_PREPROCESSOR:\n\t\t\tcase SCE_FS_PREPROCESSOR_C:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tif (!(sc.chPrev == ';' || sc.GetRelative(-2) == ';')) {\n\t\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t\t}\n\t\t\t\t} else if (stylingWithinPreprocessor) {\n\t\t\t\t\tif (IsASpaceOrTab(sc.ch)) {\n\t\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.Match('/', '*') || sc.Match('/', '/') || sc.Match('&', '&')) {\n\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_DISABLEDCODE:\n\t\t\t\tif (sc.ch == '#' && visibleChars == 0) {\n\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_PREPROCESSOR : SCE_FS_PREPROCESSOR_C);\n\t\t\t\t\tdo {\t// Skip whitespace between # and preprocessor word\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} while (IsASpaceOrTab(sc.ch) && sc.More());\n\t\t\t\t\tif (sc.MatchIgnoreCase(\"pragma\")) {\n\t\t\t\t\t\tsc.Forward(6);\n\t\t\t\t\t\tdo {\t// Skip more whitespace until keyword\n\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t} while (IsASpaceOrTab(sc.ch) && sc.More());\n\t\t\t\t\t\tif (sc.MatchIgnoreCase(\"enddump\") || sc.MatchIgnoreCase(\"__endtext\")) {\n\t\t\t\t\t\t\tbEnableCode = true;\n\t\t\t\t\t\t\tsc.SetState(SCE_FS_DISABLEDCODE);\n\t\t\t\t\t\t\tsc.Forward(sc.ch == '_' ? 8 : 6);\n\t\t\t\t\t\t\tsc.ForwardSetState(SCE_FS_DEFAULT);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_FS_DISABLEDCODE);\n\t\t\t\t\t\t}\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ChangeState(SCE_FS_DISABLEDCODE);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_FS_DATE:\n\t\t\t\tif (sc.ch == '}') {\n\t\t\t\t\tsc.ForwardSetState(SCE_FS_DEFAULT);\n\t\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_FS_STRINGEOL);\n\t\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_FS_DEFAULT || sc.state == SCE_FS_DEFAULT_C) {\n\t\t\tif (bEnableCode &&\n\t\t\t\t\t(sc.MatchIgnoreCase(\".and.\") || sc.MatchIgnoreCase(\".not.\"))) {\n\t\t\t\tsc.SetState(SCE_FS_WORDOPERATOR);\n\t\t\t\tsc.Forward(4);\n\t\t\t} else if (bEnableCode && sc.MatchIgnoreCase(\".or.\")) {\n\t\t\t\tsc.SetState(SCE_FS_WORDOPERATOR);\n\t\t\t\tsc.Forward(3);\n\t\t\t} else if (bEnableCode &&\n\t\t\t\t\t(sc.MatchIgnoreCase(\".t.\") || sc.MatchIgnoreCase(\".f.\") ||\n\t\t\t\t\t(!IsAWordChar(sc.GetRelative(3)) && sc.MatchIgnoreCase(\"nil\")))) {\n\t\t\t\tsc.SetState(SCE_FS_CONSTANT);\n\t\t\t\tsc.Forward(2);\n\t\t\t} else if (sc.Match('/', '*')) {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_COMMENTDOC : SCE_FS_COMMENTDOC_C);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (bEnableCode && sc.Match('&', '&')) {\n\t\t\t\tsc.SetState(SCE_FS_COMMENTLINE);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match('/', '/')) {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_COMMENTLINEDOC : SCE_FS_COMMENTLINEDOC_C);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (bEnableCode && sc.ch == '*' && visibleChars == 0) {\n\t\t\t\tsc.SetState(SCE_FS_COMMENT);\n\t\t\t} else if (sc.ch == '\\\"' || sc.ch == '\\'') {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_STRING : SCE_FS_STRING_C);\n\t\t\t\tcloseStringChar = sc.ch;\n\t\t\t} else if (closeStringChar == '>' && sc.ch == '<') {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_STRING : SCE_FS_STRING_C);\n\t\t\t} else if (sc.ch == '#' && visibleChars == 0) {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_PREPROCESSOR : SCE_FS_PREPROCESSOR_C);\n\t\t\t\tdo {\t// Skip whitespace between # and preprocessor word\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} while (IsASpaceOrTab(sc.ch) && sc.More());\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_DEFAULT : SCE_FS_DEFAULT_C);\n\t\t\t\t} else if (sc.MatchIgnoreCase(\"include\")) {\n\t\t\t\t\tif (stylingWithinPreprocessor) {\n\t\t\t\t\t\tcloseStringChar = '>';\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.MatchIgnoreCase(\"pragma\")) {\n\t\t\t\t\tsc.Forward(6);\n\t\t\t\t\tdo {\t// Skip more whitespace until keyword\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t} while (IsASpaceOrTab(sc.ch) && sc.More());\n\t\t\t\t\tif (sc.MatchIgnoreCase(\"begindump\") || sc.MatchIgnoreCase(\"__cstream\")) {\n\t\t\t\t\t\tbEnableCode = false;\n\t\t\t\t\t\tif (stylingWithinPreprocessor) {\n\t\t\t\t\t\t\tsc.SetState(SCE_FS_DISABLEDCODE);\n\t\t\t\t\t\t\tsc.Forward(8);\n\t\t\t\t\t\t\tsc.ForwardSetState(SCE_FS_DEFAULT_C);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tsc.SetState(SCE_FS_DISABLEDCODE);\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (sc.MatchIgnoreCase(\"enddump\") || sc.MatchIgnoreCase(\"__endtext\")) {\n\t\t\t\t\t\tbEnableCode = true;\n\t\t\t\t\t\tsc.SetState(SCE_FS_DISABLEDCODE);\n\t\t\t\t\t\tsc.Forward(sc.ch == '_' ? 8 : 6);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_FS_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if (bEnableCode && sc.ch == '{') {\n\t\t\t\tSci_Position p = 0;\n\t\t\t\tint chSeek;\n\t\t\t\tSci_PositionU endPos(startPos + length);\n\t\t\t\tdo {\t// Skip whitespace\n\t\t\t\t\tchSeek = sc.GetRelative(++p);\n\t\t\t\t} while (IsASpaceOrTab(chSeek) && (sc.currentPos + p < endPos));\n\t\t\t\tif (chSeek == '^') {\n\t\t\t\t\tsc.SetState(SCE_FS_DATE);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_FS_OPERATOR);\n\t\t\t\t}\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_NUMBER : SCE_FS_NUMBER_C);\n\t\t\t} else if (IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_IDENTIFIER : SCE_FS_IDENTIFIER_C);\n\t\t\t} else if (isoperator(static_cast(sc.ch)) || (bEnableCode && sc.ch == '@')) {\n\t\t\t\tsc.SetState(bEnableCode ? SCE_FS_OPERATOR : SCE_FS_OPERATOR_C);\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd) {\n\t\t\tvisibleChars = 0;\n\t\t\tcloseStringChar = 0;\n\t\t}\n\t\tif (!IsASpace(sc.ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldFlagShipDoc(Sci_PositionU startPos, Sci_Position length, int,\n\t\t\t\t\t\t\t\t\tWordList *[], Accessor &styler)\n{\n\n\tSci_Position endPos = startPos + length;\n\n\t// Backtrack to previous line in case need to fix its fold status\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tif (startPos > 0 && lineCurrent > 0) {\n\t\t\tlineCurrent--;\n\t\t\tstartPos = styler.LineStart(lineCurrent);\n\t}\n\tint spaceFlags = 0;\n\tint indentCurrent = styler.IndentAmount(lineCurrent, &spaceFlags);\n\tchar chNext = styler[startPos];\n\tfor (Sci_Position i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif ((ch == '\\r' && chNext != '\\n') || (ch == '\\n') || (i == endPos-1)) {\n\t\t\tint lev = indentCurrent;\n\t\t\tint indentNext = styler.IndentAmount(lineCurrent + 1, &spaceFlags);\n\t\t\tif (!(indentCurrent & SC_FOLDLEVELWHITEFLAG)) {\n\t\t\t\tif ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext & SC_FOLDLEVELNUMBERMASK)) {\n\t\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t} else if (indentNext & SC_FOLDLEVELWHITEFLAG) {\n\t\t\t\t\tint spaceFlags2 = 0;\n\t\t\t\t\tint indentNext2 = styler.IndentAmount(lineCurrent + 2, &spaceFlags2);\n\t\t\t\t\tif ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext2 & SC_FOLDLEVELNUMBERMASK)) {\n\t\t\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tindentCurrent = indentNext;\n\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\tlineCurrent++;\n\t\t}\n\t}\n}\n\nstatic const char * const FSWordListDesc[] = {\n\t\"Keywords Commands\",\n\t\"Std Library Functions\",\n\t\"Procedure, return, exit\",\n\t\"Class (oop)\",\n\t\"Doxygen keywords\",\n\t0\n};\n\nextern const LexerModule lmFlagShip(SCLEX_FLAGSHIP, ColouriseFlagShipDoc, \"flagship\", FoldFlagShipDoc, FSWordListDesc);\n" }, { "path": "lexers/LexForth.cxx", "content": "// Scintilla source code edit control\n/** @file LexForth.cxx\n ** Lexer for FORTH\n **/\n// Copyright 1998-2003 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsAWordStart(int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) ||\n\t\t// symbolic standard words and word prefixes (https://forth-standard.org/standard/core)\n\t\tAnyOf(ch, '!', '#', '\\'', '(', '*', '+', ',', '-', '.', '/', '<', '=', '>', '?', '@', '[', '\\\\', ']', '_'));\n}\n\nstatic inline bool IsANumChar(int ch) {\n\treturn (ch < 0x80) && (isxdigit(ch) || ch == '.' || ch == 'e' || ch == 'E' );\n}\n\nstatic inline bool IsASpaceChar(int ch) {\n\treturn (ch < 0x80) && isspace(ch);\n}\n\nstatic void ColouriseForthDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordLists[],\n Accessor &styler) {\n\n WordList &control = *keywordLists[0];\n WordList &keyword = *keywordLists[1];\n WordList &defword = *keywordLists[2];\n WordList &preword1 = *keywordLists[3];\n WordList &preword2 = *keywordLists[4];\n WordList &strings = *keywordLists[5];\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward())\n\t{\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_FORTH_COMMENT) {\n\t\t\tif (sc.MatchLineEnd()) {\n\t\t\t\tsc.SetState(SCE_FORTH_DEFAULT);\n\t\t\t}\n\t\t}else if (sc.state == SCE_FORTH_COMMENT_ML) {\n\t\t\tif (sc.ch == ')') {\n\t\t\t\tsc.ForwardSetState(SCE_FORTH_DEFAULT);\n\t\t\t}\n\t\t}else if (sc.state == SCE_FORTH_IDENTIFIER || sc.state == SCE_FORTH_NUMBER) {\n\t\t\t// handle numbers here too, because what we thought was a number might\n\t\t\t// turn out to be a keyword e.g. 2DUP\n\t\t\tif (IsASpaceChar(sc.ch) ) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tint newState = sc.state == SCE_FORTH_NUMBER ? SCE_FORTH_NUMBER : SCE_FORTH_DEFAULT;\n\t\t\t\tif (control.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_CONTROL);\n\t\t\t\t} else if (keyword.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_KEYWORD);\n\t\t\t\t} else if (defword.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_DEFWORD);\n\t\t\t\t} else if (preword1.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_PREWORD1);\n\t\t\t\t} else if (preword2.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_PREWORD2);\n\t\t\t\t} else if (strings.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_STRING);\n\t\t\t\t\tnewState = SCE_FORTH_STRING;\n\t\t\t\t}\n\t\t\t\tsc.SetState(newState);\n\t\t\t}\n\t\t\tif (sc.state == SCE_FORTH_NUMBER) {\n\t\t\t\tif (IsASpaceChar(sc.ch)) {\n\t\t\t\t\tsc.SetState(SCE_FORTH_DEFAULT);\n\t\t\t\t} else if (!IsANumChar(sc.ch)) {\n\t\t\t\t\tsc.ChangeState(SCE_FORTH_IDENTIFIER);\n\t\t\t\t}\n\t\t\t}\n\t\t}else if (sc.state == SCE_FORTH_STRING) {\n\t\t\tif (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_FORTH_DEFAULT);\n\t\t\t}\n\t\t}else if (sc.state == SCE_FORTH_LOCALE) {\n\t\t\tif (sc.ch == '}') {\n\t\t\t\tsc.ForwardSetState(SCE_FORTH_DEFAULT);\n\t\t\t}\n\t\t}else if (sc.state == SCE_FORTH_DEFWORD) {\n\t\t\tif (IsASpaceChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_FORTH_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_FORTH_DEFAULT) {\n\t\t\tif (sc.ch == '\\\\' && (sc.atLineStart || IsASpaceChar(sc.chPrev)) && IsASpaceChar(sc.chNext)) {\n\t\t\t\tsc.SetState(SCE_FORTH_COMMENT);\n\t\t\t} else if (sc.ch == '(' &&\n\t\t\t\t\t(sc.atLineStart || IsASpaceChar(sc.chPrev)) &&\n\t\t\t\t\t(sc.MatchLineEnd() || IsASpaceChar(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_FORTH_COMMENT_ML);\n\t\t\t} else if (\t(sc.ch == '$' && (IsASCII(sc.chNext) && isxdigit(sc.chNext))) ) {\n\t\t\t\t// number starting with $ is a hex number\n\t\t\t\tsc.SetState(SCE_FORTH_NUMBER);\n\t\t\t\twhile(sc.More() && IsASCII(sc.chNext) && isxdigit(sc.chNext))\n\t\t\t\t\tsc.Forward();\n\t\t\t} else if ( (sc.ch == '%' && (IsASCII(sc.chNext) && (sc.chNext == '0' || sc.chNext == '1'))) ) {\n\t\t\t\t// number starting with % is binary\n\t\t\t\tsc.SetState(SCE_FORTH_NUMBER);\n\t\t\t\twhile(sc.More() && IsASCII(sc.chNext) && (sc.chNext == '0' || sc.chNext == '1'))\n\t\t\t\t\tsc.Forward();\n\t\t\t} else if (\tIsASCII(sc.ch) &&\n\t\t\t\t\t\t(isxdigit(sc.ch) || ((sc.ch == '.' || sc.ch == '-') && IsASCII(sc.chNext) && isxdigit(sc.chNext)) )\n\t\t\t\t\t){\n\t\t\t\tsc.SetState(SCE_FORTH_NUMBER);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_FORTH_IDENTIFIER);\n\t\t\t} else if (sc.ch == '{') {\n\t\t\t\tsc.SetState(SCE_FORTH_LOCALE);\n\t\t\t} else if (sc.ch == ':' && IsASCII(sc.chNext) && isspace(sc.chNext)) {\n\t\t\t\t// highlight word definitions e.g. : GCD ( n n -- n ) ..... ;\n\t\t\t\t// ^ ^^^\n\t\t\t\tsc.SetState(SCE_FORTH_DEFWORD);\n\t\t\t\twhile(sc.More() && IsASCII(sc.chNext) && isspace(sc.chNext))\n\t\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.ch == ';' &&\n\t\t\t\t\t(sc.atLineStart || IsASpaceChar(sc.chPrev)) &&\n\t\t\t\t\t(sc.MatchLineEnd() || IsASpaceChar(sc.chNext))\t) {\n\t\t\t\t// mark the ';' that ends a word\n\t\t\t\tsc.SetState(SCE_FORTH_DEFWORD);\n\t\t\t\tsc.ForwardSetState(SCE_FORTH_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldForthDoc(Sci_PositionU, Sci_Position, int, WordList *[],\n\t\t\t\t\t\tAccessor &) {\n}\n\nstatic const char * const forthWordLists[] = {\n\t\t\t\"control keywords\",\n\t\t\t\"keywords\",\n\t\t\t\"definition words\",\n\t\t\t\"prewords with one argument\",\n\t\t\t\"prewords with two arguments\",\n\t\t\t\"string definition keywords\",\n\t\t\t0,\n\t\t};\n\nextern const LexerModule lmForth(SCLEX_FORTH, ColouriseForthDoc, \"forth\", FoldForthDoc, forthWordLists);\n\n\n" }, { "path": "lexers/LexFortran.cxx", "content": "// Scintilla source code edit control\n/** @file LexFortran.cxx\n ** Lexer for Fortran.\n ** Written by Chuan-jian Shen, Last changed Sep. 2003\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n/***************************************/\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n/***************************************/\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n/***************************************/\n\nusing namespace Lexilla;\n\n/***********************************************/\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '_' || ch == '%');\n}\n/**********************************************/\nstatic inline bool IsAWordStart(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch));\n}\n/***************************************/\nstatic inline bool IsABlank(unsigned int ch) {\n\treturn (ch == ' ') || (ch == 0x09) || (ch == 0x0b) ;\n}\n/***************************************/\nstatic inline bool IsALineEnd(char ch) {\n\treturn ((ch == '\\n') || (ch == '\\r')) ;\n}\n/***************************************/\nstatic Sci_PositionU GetContinuedPos(Sci_PositionU pos, Accessor &styler) {\n\twhile (!IsALineEnd(styler.SafeGetCharAt(pos++))) continue;\n\tif (styler.SafeGetCharAt(pos) == '\\n') pos++;\n\twhile (IsABlank(styler.SafeGetCharAt(pos++))) continue;\n\tchar chCur = styler.SafeGetCharAt(pos);\n\tif (chCur == '&') {\n\t\twhile (IsABlank(styler.SafeGetCharAt(++pos))) continue;\n\t\treturn pos;\n\t} else {\n\t\treturn pos;\n\t}\n}\n/***************************************/\nstatic void ColouriseFortranDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *keywordlists[], Accessor &styler, bool isFixFormat) {\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n\t/***************************************/\n\tSci_Position posLineStart = 0;\n\tint numNonBlank = 0, prevState = 0;\n\tSci_Position endPos = startPos + length;\n\t/***************************************/\n\t// backtrack to the nearest keyword\n\twhile ((startPos > 1) && (styler.StyleAt(startPos) != SCE_F_WORD)) {\n\t\tstartPos--;\n\t}\n\tstartPos = styler.LineStart(styler.GetLine(startPos));\n\tinitStyle = styler.StyleAt(startPos - 1);\n\tStyleContext sc(startPos, endPos-startPos, initStyle, styler);\n\t/***************************************/\n\tfor (; sc.More(); sc.Forward()) {\n\t\t// remember the start position of the line\n\t\tif (sc.atLineStart) {\n\t\t\tposLineStart = sc.currentPos;\n\t\t\tnumNonBlank = 0;\n\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t}\n\t\tif (!IsASpaceOrTab(sc.ch)) numNonBlank ++;\n\t\t/***********************************************/\n\t\t// Handle the fix format generically\n\t\tSci_Position toLineStart = sc.currentPos - posLineStart;\n\t\tif (isFixFormat && (toLineStart < 6 || toLineStart >= 72)) {\n\t\t\tif ((toLineStart == 0 && (tolower(sc.ch) == 'c' || sc.ch == '*')) || sc.ch == '!') {\n\t\t\t\tif (sc.MatchIgnoreCase(\"cdec$\") || sc.MatchIgnoreCase(\"*dec$\") || sc.MatchIgnoreCase(\"!dec$\") ||\n\t\t\t\t sc.MatchIgnoreCase(\"cdir$\") || sc.MatchIgnoreCase(\"*dir$\") || sc.MatchIgnoreCase(\"!dir$\") ||\n\t\t\t\t sc.MatchIgnoreCase(\"cms$\") || sc.MatchIgnoreCase(\"*ms$\") || sc.MatchIgnoreCase(\"!ms$\") ||\n\t\t\t\t sc.chNext == '$') {\n\t\t\t\t\tsc.SetState(SCE_F_PREPROCESSOR);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_F_COMMENT);\n\t\t\t\t}\n\n\t\t\t\twhile (!sc.atLineEnd && sc.More()) sc.Forward(); // Until line end\n\t\t\t} else if (toLineStart >= 72) {\n\t\t\t\tsc.SetState(SCE_F_COMMENT);\n\t\t\t\twhile (!sc.atLineEnd && sc.More()) sc.Forward(); // Until line end\n\t\t\t} else if (toLineStart < 5) {\n\t\t\t\tif (IsADigit(sc.ch))\n\t\t\t\t\tsc.SetState(SCE_F_LABEL);\n\t\t\t\telse\n\t\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t} else if (toLineStart == 5) {\n\t\t\t\t//if (!IsASpace(sc.ch) && sc.ch != '0') {\n\t\t\t\tif (sc.ch != '\\r' && sc.ch != '\\n') {\n\t\t\t\t\tsc.SetState(SCE_F_CONTINUATION);\n\t\t\t\t\tif (!IsASpace(sc.ch) && sc.ch != '0')\n\t\t\t\t\t\tsc.ForwardSetState(prevState);\n\t\t\t\t} else\n\t\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t\tcontinue;\n\t\t}\n\t\t/***************************************/\n\t\t// Handle line continuation generically.\n\t\tif (!isFixFormat && sc.ch == '&' && sc.state != SCE_F_COMMENT) {\n\t\t\tchar chTemp = ' ';\n\t\t\tSci_Position j = 1;\n\t\t\twhile (IsABlank(chTemp) && j<132) {\n\t\t\t\tchTemp = static_cast(sc.GetRelative(j));\n\t\t\t\tj++;\n\t\t\t}\n\t\t\tif (chTemp == '!') {\n\t\t\t\tsc.SetState(SCE_F_CONTINUATION);\n\t\t\t\tif (sc.chNext == '!') sc.ForwardSetState(SCE_F_COMMENT);\n\t\t\t} else if (chTemp == '\\r' || chTemp == '\\n') {\n\t\t\t\tint currentState = sc.state;\n\t\t\t\tsc.SetState(SCE_F_CONTINUATION);\n\t\t\t\tsc.ForwardSetState(SCE_F_DEFAULT);\n\t\t\t\twhile (IsASpace(sc.ch) && sc.More()) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tif (sc.atLineStart) numNonBlank = 0;\n\t\t\t\t\tif (!IsASpaceOrTab(sc.ch)) numNonBlank ++;\n\t\t\t\t}\n\t\t\t\tif (sc.ch == '&') {\n\t\t\t\t\tsc.SetState(SCE_F_CONTINUATION);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tsc.SetState(currentState);\n\t\t\t}\n\t\t}\n\t\t/***************************************/\n\t\t// Hanndle preprocessor directives\n\t\tif (sc.ch == '#' && numNonBlank == 1)\n\t\t{\n\t\t\tsc.SetState(SCE_F_PREPROCESSOR);\n\t\t\twhile (!sc.atLineEnd && sc.More())\n\t\t\t\tsc.Forward(); // Until line end\n\t\t}\n\t\t/***************************************/\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_F_OPERATOR) {\n\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t} else if (sc.state == SCE_F_NUMBER) {\n\t\t\tif (!(IsAWordChar(sc.ch) || sc.ch=='\\'' || sc.ch=='\\\"' || sc.ch=='.')) {\n\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_F_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch) || (sc.ch == '%')) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_F_WORD);\n\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_F_WORD2);\n\t\t\t\t} else if (keywords3.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_F_WORD3);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_F_COMMENT || sc.state == SCE_F_PREPROCESSOR) {\n\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n') {\n\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_F_STRING1) {\n\t\t\tprevState = sc.state;\n\t\t\tif (sc.ch == '\\'') {\n\t\t\t\tif (sc.chNext == '\\'') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else {\n\t\t\t\t\tsc.ForwardSetState(SCE_F_DEFAULT);\n\t\t\t\t\tprevState = SCE_F_DEFAULT;\n\t\t\t\t}\n\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_F_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_F_STRING2) {\n\t\t\tprevState = sc.state;\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_F_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_F_DEFAULT);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tif (sc.chNext == '\\\"') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t} else {\n\t\t\t\t\tsc.ForwardSetState(SCE_F_DEFAULT);\n\t\t\t\t\tprevState = SCE_F_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (sc.state == SCE_F_OPERATOR2) {\n\t\t\tif (sc.ch == '.') {\n\t\t\t\tsc.ForwardSetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_F_CONTINUATION) {\n\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t} else if (sc.state == SCE_F_LABEL) {\n\t\t\tif (!IsADigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t} else {\n\t\t\t\tif (isFixFormat && sc.currentPos-posLineStart > 4)\n\t\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t\telse if (numNonBlank > 5)\n\t\t\t\t\tsc.SetState(SCE_F_DEFAULT);\n\t\t\t}\n\t\t}\n\t\t/***************************************/\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_F_DEFAULT) {\n\t\t\tif (sc.ch == '!') {\n\t\t\t\tif (sc.MatchIgnoreCase(\"!dec$\") || sc.MatchIgnoreCase(\"!dir$\") ||\n\t\t\t\t\tsc.MatchIgnoreCase(\"!ms$\") || sc.chNext == '$') {\n\t\t\t\t\tsc.SetState(SCE_F_PREPROCESSOR);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_F_COMMENT);\n\t\t\t\t}\n\t\t\t} else if ((!isFixFormat) && IsADigit(sc.ch) && numNonBlank == 1) {\n\t\t\t\tsc.SetState(SCE_F_LABEL);\n\t\t\t} else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_F_NUMBER);\n\t\t\t} else if ((tolower(sc.ch) == 'b' || tolower(sc.ch) == 'o' ||\n\t\t\t\ttolower(sc.ch) == 'z') && (sc.chNext == '\\\"' || sc.chNext == '\\'')) {\n\t\t\t\tsc.SetState(SCE_F_NUMBER);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.ch == '.' && isalpha(sc.chNext)) {\n\t\t\t\tsc.SetState(SCE_F_OPERATOR2);\n\t\t\t} else if (IsAWordStart(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_F_IDENTIFIER);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_F_STRING2);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_F_STRING1);\n\t\t\t} else if (isoperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_F_OPERATOR);\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n/***************************************/\nstatic void CheckLevelCommentLine(const unsigned int nComL,\n\t\t\t\t Sci_Position nComColB[], Sci_Position nComColF[], Sci_Position &nComCur,\n\t\t\t\t bool comLineB[], bool comLineF[], bool &comLineCur,\n\t\t\t\t int &levelDeltaNext) {\n\tlevelDeltaNext = 0;\n\tif (!comLineCur) {\n\t\treturn;\n\t}\n\n\tif (!comLineF[0] || nComColF[0] != nComCur) {\n\t\tunsigned int i=0;\n\t\tfor (; i= nLineTotal) {\n\t\treturn;\n\t}\n\n\tfor (int i=nComL-2; i>=0; i--) {\n\t\tnComColB[i+1] = nComColB[i];\n\t\tcomLineB[i+1] = comLineB[i];\n\t}\n\tnComColB[0] = nComCur;\n\tcomLineB[0] = comLineCur;\n\tnComCur = nComColF[0];\n\tcomLineCur = comLineF[0];\n\tfor (unsigned int i=0; i+1 0) {\n\t\tlineCurrent--;\n\t\tstartPos = styler.LineStart(lineCurrent);\n\t\tisPrevLine = true;\n\t} else {\n\t\tisPrevLine = false;\n\t}\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\tint levelDeltaNext = 0;\n\n\tconst unsigned int nComL = 3; // defines how many comment lines should be before they are folded\n\tSci_Position nComColB[nComL] = {};\n\tSci_Position nComColF[nComL] = {};\n\tSci_Position nComCur = 0;\n\tbool comLineB[nComL] = {};\n\tbool comLineF[nComL] = {};\n\tbool comLineCur;\n\tSci_Position nLineTotal = styler.GetLine(styler.Length()-1) + 1;\n\tif (foldComment) {\n\t\tfor (unsigned int i=0; i= nLineTotal) {\n\t\t\t\tcomLineF[i] = false;\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tGetIfLineComment(styler, isFixFormat, chL, comLineF[i], nComColF[i]);\n\t\t}\n\t\tGetIfLineComment(styler, isFixFormat, lineCurrent, comLineCur, nComCur);\n\t\tCheckBackComLines(styler, isFixFormat, lineCurrent, nComL, nComColB, nComColF, nComCur, \n\t\t\t\tcomLineB, comLineF, comLineCur);\n\t}\n\tint levelCurrent = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\n\t/***************************************/\n\tSci_Position lastStart = 0;\n\tchar prevWord[32] = \"\";\n\t/***************************************/\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tchar chNextNonBlank = chNext;\n\t\tbool nextEOL = false;\n\t\tif (IsALineEnd(chNextNonBlank)) {\n\t\t\tnextEOL = true;\n\t\t}\n\t\tSci_PositionU j=i+1;\n\t\twhile(IsABlank(chNextNonBlank) && j(tolower(styler[lastStart+k]));\n\t\t\t\t}\n\t\t\t\ts[k] = '\\0';\n\t\t\t\t// Handle the forall and where statement and structure.\n\t\t\t\tif (strcmp(s, \"forall\") == 0 || (strcmp(s, \"where\") == 0 && strcmp(prevWord, \"else\") != 0)) {\n\t\t\t\t\tif (strcmp(prevWord, \"end\") != 0) {\n\t\t\t\t\t\tj = i + 1;\n\t\t\t\t\t\tchar chBrace = '(', chSeek = ')', ch1 = styler.SafeGetCharAt(j);\n\t\t\t\t\t\t// Find the position of the first (\n\t\t\t\t\t\twhile (ch1 != chBrace && j 0) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent))\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\n\t\t\tlineCurrent++;\n\t\t\tlevelCurrent += levelDeltaNext;\n\t\t\tlevelDeltaNext = 0;\n\t\t\tvisibleChars = 0;\n\t\t\tstrcpy(prevWord, \"\");\n\t\t\tisPrevLine = false;\n\n\t\t\tif (foldComment) {\n\t\t\t\tStepCommentLine(styler, isFixFormat, lineCurrent, nComL, nComColB, nComColF, nComCur,\n\t\t\t\t\t\tcomLineB, comLineF, comLineCur);\n\t\t\t}\n\t\t}\n\t\t/***************************************/\n\t\tif (!isspacechar(ch)) visibleChars++;\n\t}\n\t/***************************************/\n}\n/***************************************/\nstatic const char * const FortranWordLists[] = {\n\t\"Primary keywords and identifiers\",\n\t\"Intrinsic functions\",\n\t\"Extended and user defined functions\",\n\t0,\n};\n/***************************************/\nstatic void ColouriseFortranDocFreeFormat(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\tColouriseFortranDoc(startPos, length, initStyle, keywordlists, styler, false);\n}\n/***************************************/\nstatic void ColouriseFortranDocFixFormat(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\tColouriseFortranDoc(startPos, length, initStyle, keywordlists, styler, true);\n}\n/***************************************/\nstatic void FoldFortranDocFreeFormat(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *[], Accessor &styler) {\n\tFoldFortranDoc(startPos, length, initStyle,styler, false);\n}\n/***************************************/\nstatic void FoldFortranDocFixFormat(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *[], Accessor &styler) {\n\tFoldFortranDoc(startPos, length, initStyle,styler, true);\n}\n/***************************************/\nextern const LexerModule lmFortran(SCLEX_FORTRAN, ColouriseFortranDocFreeFormat, \"fortran\", FoldFortranDocFreeFormat, FortranWordLists);\nextern const LexerModule lmF77(SCLEX_F77, ColouriseFortranDocFixFormat, \"f77\", FoldFortranDocFixFormat, FortranWordLists);\n" }, { "path": "lexers/LexGAP.cxx", "content": "// Scintilla source code edit control\n/** @file LexGAP.cxx\n ** Lexer for the GAP language. (The GAP System for Computational Discrete Algebra)\n ** http://www.gap-system.org\n **/\n// Copyright 2007 by Istvan Szollosi ( szteven gmail com )\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsGAPOperator(char ch) {\n\tif (IsASCII(ch) && isalnum(ch)) return false;\n\tif (ch == '+' || ch == '-' || ch == '*' || ch == '/' ||\n\t\tch == '^' || ch == ',' || ch == '!' || ch == '.' ||\n\t\tch == '=' || ch == '<' || ch == '>' || ch == '(' ||\n\t\tch == ')' || ch == ';' || ch == '[' || ch == ']' ||\n\t\tch == '{' || ch == '}' || ch == ':' )\n\t\treturn true;\n\treturn false;\n}\n\nstatic void GetRange(Sci_PositionU start, Sci_PositionU end, Accessor &styler, char *s, Sci_PositionU len) {\n\tSci_PositionU i = 0;\n\twhile ((i < end - start + 1) && (i < len-1)) {\n\t\ts[i] = static_cast(styler[start + i]);\n\t\ti++;\n\t}\n\ts[i] = '\\0';\n}\n\nstatic void ColouriseGAPDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[], Accessor &styler) {\n\n\tWordList &keywords1 = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n\tWordList &keywords4 = *keywordlists[3];\n\n\t// Do not leak onto next line\n\tif (initStyle == SCE_GAP_STRINGEOL) initStyle = SCE_GAP_DEFAULT;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\t// Prevent SCE_GAP_STRINGEOL from leaking back to previous line\n\t\tif ( sc.atLineStart ) {\n\t\t\tif (sc.state == SCE_GAP_STRING) sc.SetState(SCE_GAP_STRING);\n\t\t\tif (sc.state == SCE_GAP_CHAR) sc.SetState(SCE_GAP_CHAR);\n\t\t}\n\n\t\t// Handle line continuation generically\n\t\tif (sc.ch == '\\\\' ) {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_GAP_OPERATOR :\n\t\t\t\tsc.SetState(SCE_GAP_DEFAULT);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_GAP_NUMBER :\n\t\t\t\tif (!IsADigit(sc.ch)) {\n\t\t\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\t\t\tif (!sc.atLineEnd) {\n\t\t\t\t\t\t\tif (!IsADigit(sc.chNext)) {\n\t\t\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t\t\t\tsc.ChangeState(SCE_GAP_IDENTIFIER);\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if (isalpha(sc.ch) || sc.ch == '_') {\n\t\t\t\t\t\tsc.ChangeState(SCE_GAP_IDENTIFIER);\n\t\t\t\t\t}\n\t\t\t\t\telse sc.SetState(SCE_GAP_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_GAP_IDENTIFIER :\n\t\t\t\tif (!(iswordstart(static_cast(sc.ch)) || sc.ch == '$')) {\n\t\t\t\t\tif (sc.ch == '\\\\') sc.Forward();\n\t\t\t\t\telse {\n\t\t\t\t\t\tchar s[1000];\n\t\t\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\t\t\tif (keywords1.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_GAP_KEYWORD);\n\t\t\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_GAP_KEYWORD2);\n\t\t\t\t\t\t} else if (keywords3.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_GAP_KEYWORD3);\n\t\t\t\t\t\t} else if (keywords4.InList(s)) {\n\t\t\t\t\t\t\tsc.ChangeState(SCE_GAP_KEYWORD4);\n\t\t\t\t\t\t}\n\t\t\t\t\t\tsc.SetState(SCE_GAP_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_GAP_COMMENT :\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.SetState(SCE_GAP_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_GAP_STRING:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_GAP_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\t\tsc.ForwardSetState(SCE_GAP_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_GAP_CHAR:\n\t\t\t\tif (sc.atLineEnd) {\n\t\t\t\t\tsc.ChangeState(SCE_GAP_STRINGEOL);\n\t\t\t\t} else if (sc.ch == '\\\\') {\n\t\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\'' || sc.chNext == '\\\\') {\n\t\t\t\t\t\tsc.Forward();\n\t\t\t\t\t}\n\t\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\t\tsc.ForwardSetState(SCE_GAP_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_GAP_STRINGEOL:\n\t\t\t\tif (sc.atLineStart) {\n\t\t\t\t\tsc.SetState(SCE_GAP_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Determine if a new state should be entered\n\t\tif (sc.state == SCE_GAP_DEFAULT) {\n\t\t\tif (IsGAPOperator(static_cast(sc.ch))) {\n\t\t\t\tsc.SetState(SCE_GAP_OPERATOR);\n\t\t\t}\n\t\t\telse if (IsADigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_GAP_NUMBER);\n\t\t\t} else if (isalpha(sc.ch) || sc.ch == '_' || sc.ch == '\\\\' || sc.ch == '$' || sc.ch == '~') {\n\t\t\t\tsc.SetState(SCE_GAP_IDENTIFIER);\n\t\t\t\tif (sc.ch == '\\\\') sc.Forward();\n\t\t\t} else if (sc.ch == '#') {\n\t\t\t\tsc.SetState(SCE_GAP_COMMENT);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_GAP_STRING);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_GAP_CHAR);\n\t\t\t}\n\t\t}\n\n\t}\n\tsc.Complete();\n}\n\nstatic int ClassifyFoldPointGAP(const char* s) {\n\tint level = 0;\n\tif (strcmp(s, \"function\") == 0 ||\n\t\tstrcmp(s, \"do\") == 0 ||\n\t\tstrcmp(s, \"if\") == 0 ||\n\t\tstrcmp(s, \"repeat\") == 0 ) {\n\t\tlevel = 1;\n\t} else if (strcmp(s, \"end\") == 0 ||\n\t\t\tstrcmp(s, \"od\") == 0 ||\n\t\t\tstrcmp(s, \"fi\") == 0 ||\n\t\t\tstrcmp(s, \"until\") == 0 ) {\n\t\tlevel = -1;\n\t}\n\treturn level;\n}\n\nstatic void FoldGAPDoc( Sci_PositionU startPos, Sci_Position length, int initStyle, WordList** , Accessor &styler) {\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n\n\tSci_Position lastStart = 0;\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint stylePrev = style;\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\t\tif (stylePrev != SCE_GAP_KEYWORD && style == SCE_GAP_KEYWORD) {\n\t\t\t// Store last word start point.\n\t\t\tlastStart = i;\n\t\t}\n\n\t\tif (stylePrev == SCE_GAP_KEYWORD) {\n\t\t\tif(iswordchar(ch) && !iswordchar(chNext)) {\n\t\t\t\tchar s[100];\n\t\t\t\tGetRange(lastStart, i, styler, s, sizeof(s));\n\t\t\t\tlevelCurrent += ClassifyFoldPointGAP(s);\n\t\t\t}\n\t\t}\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nstatic const char * const GAPWordListDesc[] = {\n\t\"Keywords 1\",\n\t\"Keywords 2\",\n\t\"Keywords 3 (unused)\",\n\t\"Keywords 4 (unused)\",\n\t0\n};\n\nextern const LexerModule lmGAP(\n SCLEX_GAP,\n ColouriseGAPDoc,\n \"gap\",\n FoldGAPDoc,\n GAPWordListDesc);\n" }, { "path": "lexers/LexGDScript.cxx", "content": "// Scintilla source code edit control\n/** @file LexGDScript.cxx\n ** Lexer for GDScript.\n **/\n// Copyright 1998-2002 by Neil Hodgson \n// Heavily modified later for GDScript\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"StringCopy.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"CharacterCategory.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"SubStyles.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\nenum kwType { kwOther, kwClass, kwDef, kwExtends};\n\nconstexpr int indicatorWhitespace = 1;\n\nbool IsGDStringStart(int ch) {\n return (ch == '\\'' || ch == '\"');\n}\n\nbool IsGDComment(Accessor &styler, Sci_Position pos, Sci_Position len) {\n\treturn len > 0 && styler[pos] == '#';\n}\n\nconstexpr bool IsGDSingleQuoteStringState(int st) noexcept {\n\treturn ((st == SCE_GD_CHARACTER) || (st == SCE_GD_STRING));\n}\n\nconstexpr bool IsGDTripleQuoteStringState(int st) noexcept {\n\treturn ((st == SCE_GD_TRIPLE) || (st == SCE_GD_TRIPLEDOUBLE));\n}\n\nchar GetGDStringQuoteChar(int st) noexcept {\n\tif ((st == SCE_GD_CHARACTER) || (st == SCE_GD_TRIPLE))\n\t\treturn '\\'';\n\tif ((st == SCE_GD_STRING) || (st == SCE_GD_TRIPLEDOUBLE))\n\t\treturn '\"';\n\n\treturn '\\0';\n}\n\n/* Return the state to use for the string starting at i; *nextIndex will be set to the first index following the quote(s) */\nint GetGDStringState(Accessor &styler, Sci_Position i, Sci_PositionU *nextIndex) {\n\tchar ch = styler.SafeGetCharAt(i);\n\tchar chNext = styler.SafeGetCharAt(i + 1);\n\n\tif (ch != '\"' && ch != '\\'') {\n\t\t*nextIndex = i + 1;\n\t\treturn SCE_GD_DEFAULT;\n\t}\n\n\tif (ch == chNext && ch == styler.SafeGetCharAt(i + 2)) {\n\t\t*nextIndex = i + 3;\n\n\t\tif (ch == '\"')\n\t\t\treturn SCE_GD_TRIPLEDOUBLE;\n\t\telse\n\t\t\treturn SCE_GD_TRIPLE;\n\t} else {\n\t\t*nextIndex = i + 1;\n\n\t\tif (ch == '\"')\n\t\t\treturn SCE_GD_STRING;\n\t\telse\n\t\t\treturn SCE_GD_CHARACTER;\n\t}\n}\n\nint GetGDStringState(int ch) {\n\tif (ch != '\"' && ch != '\\'')\n\t\treturn SCE_GD_DEFAULT;\n\n\tif (ch == '\"')\n\t\treturn SCE_GD_STRING;\n\telse\n\t\treturn SCE_GD_CHARACTER;\n}\n\ninline bool IsAWordChar(int ch, bool unicodeIdentifiers) {\n\tif (IsASCII(ch))\n\t\treturn (IsAlphaNumeric(ch) || ch == '.' || ch == '_');\n\n\tif (!unicodeIdentifiers)\n\t\treturn false;\n\n\treturn IsXidContinue(ch);\n}\n\ninline bool IsANodePathChar(int ch, bool unicodeIdentifiers) {\n\tif (IsASCII(ch))\n\t\treturn (IsAlphaNumeric(ch) || ch == '_' || ch == '/' || ch =='%');\n\n\tif (!unicodeIdentifiers)\n\t\treturn false;\n\n\treturn IsXidContinue(ch);\n}\n\ninline bool IsAWordStart(int ch, bool unicodeIdentifiers) {\n\tif (IsASCII(ch))\n\t\treturn (IsUpperOrLowerCase(ch) || ch == '_');\n\n\tif (!unicodeIdentifiers)\n\t\treturn false;\n\n\treturn IsXidStart(ch);\n}\n\nbool IsFirstNonWhitespace(Sci_Position pos, Accessor &styler) {\n\tconst Sci_Position line = styler.GetLine(pos);\n\tconst Sci_Position start_pos = styler.LineStart(line);\n\tfor (Sci_Position i = start_pos; i < pos; i++) {\n\t\tconst char ch = styler[i];\n\t\tif (!(ch == ' ' || ch == '\\t'))\n\t\t\treturn false;\n\t}\n\treturn true;\n}\n\n// Options used for LexerGDScript\nstruct OptionsGDScript {\n\tint whingeLevel;\n\tbool base2or8Literals;\n\tbool stringsOverNewline;\n\tbool keywords2NoSubIdentifiers;\n\tbool fold;\n\tbool foldQuotes;\n\tbool foldCompact;\n\tbool unicodeIdentifiers;\n\n\tOptionsGDScript() noexcept {\n\t\twhingeLevel = 0;\n\t\tbase2or8Literals = true;\n\t\tstringsOverNewline = false;\n\t\tkeywords2NoSubIdentifiers = false;\n\t\tfold = false;\n\t\tfoldQuotes = false;\n\t\tfoldCompact = false;\n\t\tunicodeIdentifiers = true;\n\t}\n};\n\nconst char *const gdscriptWordListDesc[] = {\n\t\"Keywords\",\n\t\"Highlighted identifiers\",\n\tnullptr\n};\n\nstruct OptionSetGDScript : public OptionSet {\n\tOptionSetGDScript() {\n\t\tDefineProperty(\"lexer.gdscript.whinge.level\", &OptionsGDScript::whingeLevel,\n\t\t\t \"For GDScript code, checks whether indenting is consistent. \"\n\t\t\t \"The default, 0 turns off indentation checking, \"\n\t\t\t \"1 checks whether each line is potentially inconsistent with the previous line, \"\n\t\t\t \"2 checks whether any space characters occur before a tab character in the indentation, \"\n\t\t\t \"3 checks whether any spaces are in the indentation, and \"\n\t\t\t \"4 checks for any tab characters in the indentation. \"\n\t\t\t \"1 is a good level to use.\");\n\n\t\tDefineProperty(\"lexer.gdscript.literals.binary\", &OptionsGDScript::base2or8Literals,\n\t\t\t \"Set to 0 to not recognise binary and octal literals: 0b1011 0o712.\");\n\n\t\tDefineProperty(\"lexer.gdscript.strings.over.newline\", &OptionsGDScript::stringsOverNewline,\n\t\t\t \"Set to 1 to allow strings to span newline characters.\");\n\n\t\tDefineProperty(\"lexer.gdscript.keywords2.no.sub.identifiers\", &OptionsGDScript::keywords2NoSubIdentifiers,\n\t\t\t \"When enabled, it will not style keywords2 items that are used as a sub-identifier. \"\n\t\t\t \"Example: when set, will not highlight \\\"foo.open\\\" when \\\"open\\\" is a keywords2 item.\");\n\n\t\tDefineProperty(\"fold\", &OptionsGDScript::fold);\n\n\t\tDefineProperty(\"fold.gdscript.quotes\", &OptionsGDScript::foldQuotes,\n\t\t\t \"This option enables folding multi-line quoted strings when using the GDScript lexer.\");\n\n\t\tDefineProperty(\"fold.compact\", &OptionsGDScript::foldCompact);\n\n\t\tDefineProperty(\"lexer.gdscript.unicode.identifiers\", &OptionsGDScript::unicodeIdentifiers,\n\t\t\t \"Set to 0 to not recognise Unicode identifiers.\");\n\n\t\tDefineWordListSets(gdscriptWordListDesc);\n\t}\n};\n\nconst char styleSubable[] = { SCE_GD_IDENTIFIER, 0 };\n\nLexicalClass lexicalClasses[] = {\n\t// Lexer GDScript SCLEX_GDSCRIPT SCE_GD_:\n\t0, \"SCE_GD_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_GD_COMMENTLINE\", \"comment line\", \"Comment\",\n\t2, \"SCE_GD_NUMBER\", \"literal numeric\", \"Number\",\n\t3, \"SCE_GD_STRING\", \"literal string\", \"String\",\n\t4, \"SCE_GD_CHARACTER\", \"literal string\", \"Single quoted string\",\n\t5, \"SCE_GD_WORD\", \"keyword\", \"Keyword\",\n\t6, \"SCE_GD_TRIPLE\", \"literal string\", \"Triple quotes\",\n\t7, \"SCE_GD_TRIPLEDOUBLE\", \"literal string\", \"Triple double quotes\",\n\t8, \"SCE_GD_CLASSNAME\", \"identifier\", \"Class name definition\",\n\t9, \"SCE_GD_FUNCNAME\", \"identifier\", \"Function or method name definition\",\n\t10, \"SCE_GD_OPERATOR\", \"operator\", \"Operators\",\n\t11, \"SCE_GD_IDENTIFIER\", \"identifier\", \"Identifiers\",\n\t12, \"SCE_GD_COMMENTBLOCK\", \"comment\", \"Comment-blocks\",\n\t13, \"SCE_GD_STRINGEOL\", \"error literal string\", \"End of line where string is not closed\",\n\t14, \"SCE_GD_WORD2\", \"identifier\", \"Highlighted identifiers\",\n\t15, \"SCE_GD_ANNOTATION\", \"annotation\", \"Annotations\",\n\t16, \"SCE_GD_NODEPATH\", \"path\", \"Node path\",\n};\n\n}\n\nclass LexerGDScript : public DefaultLexer {\n\tWordList keywords;\n\tWordList keywords2;\n\tOptionsGDScript options;\n\tOptionSetGDScript osGDScript;\n\tenum { ssIdentifier };\n\tSubStyles subStyles{styleSubable};\npublic:\n\texplicit LexerGDScript() :\n\t\tDefaultLexer(\"gdscript\", SCLEX_GDSCRIPT, lexicalClasses, ELEMENTS(lexicalClasses)) {\n\t}\n\t~LexerGDScript() override {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osGDScript.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osGDScript.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osGDScript.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osGDScript.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osGDScript.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid *SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn nullptr;\n\t}\n\n\tint SCI_METHOD LineEndTypesSupported() override {\n\t\treturn SC_LINE_END_TYPE_UNICODE;\n\t}\n\n\tint SCI_METHOD AllocateSubStyles(int styleBase, int numberStyles) override {\n\t\treturn subStyles.Allocate(styleBase, numberStyles);\n\t}\n\tint SCI_METHOD SubStylesStart(int styleBase) override {\n\t\treturn subStyles.Start(styleBase);\n\t}\n\tint SCI_METHOD SubStylesLength(int styleBase) override {\n\t\treturn subStyles.Length(styleBase);\n\t}\n\tint SCI_METHOD StyleFromSubStyle(int subStyle) override {\n\t\tconst int styleBase = subStyles.BaseStyle(subStyle);\n\t\treturn styleBase;\n\t}\n\tint SCI_METHOD PrimaryStyleFromStyle(int style) override {\n\t\treturn style;\n\t}\n\tvoid SCI_METHOD FreeSubStyles() override {\n\t\tsubStyles.Free();\n\t}\n\tvoid SCI_METHOD SetIdentifiers(int style, const char *identifiers) override {\n\t\tsubStyles.SetIdentifiers(style, identifiers);\n\t}\n\tint SCI_METHOD DistanceToSecondaryStyles() override {\n\t\treturn 0;\n\t}\n\tconst char *SCI_METHOD GetSubStyleBases() override {\n\t\treturn styleSubable;\n\t}\n\n\tstatic ILexer5 *LexerFactoryGDScript() {\n\t\treturn new LexerGDScript();\n\t}\n\nprivate:\n\tvoid ProcessLineEnd(StyleContext &sc, bool &inContinuedString);\n};\n\nSci_Position SCI_METHOD LexerGDScript::PropertySet(const char *key, const char *val) {\n\tif (osGDScript.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerGDScript::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywords2;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tWordList wlNew;\n\t\twlNew.Set(wl);\n\t\tif (*wordListN != wlNew) {\n\t\t\twordListN->Set(wl);\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid LexerGDScript::ProcessLineEnd(StyleContext &sc, bool &inContinuedString) {\n\tif ((sc.state == SCE_GD_DEFAULT)\n\t\t\t|| IsGDTripleQuoteStringState(sc.state)) {\n\t\t// Perform colourisation of white space and triple quoted strings at end of each line to allow\n\t\t// tab marking to work inside white space and triple quoted strings\n\t\tsc.SetState(sc.state);\n\t}\n\n\tif (IsGDSingleQuoteStringState(sc.state)) {\n\t\tif (inContinuedString || options.stringsOverNewline) {\n\t\t\tinContinuedString = false;\n\t\t} else {\n\t\t\tsc.ChangeState(SCE_GD_STRINGEOL);\n\t\t\tsc.ForwardSetState(SCE_GD_DEFAULT);\n\t\t}\n\t}\n}\n\nvoid SCI_METHOD LexerGDScript::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tAccessor styler(pAccess, nullptr);\n\n\tconst Sci_Position endPos = startPos + length;\n\n\t// Backtrack to previous line in case need to fix its tab whinging\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tif (startPos > 0) {\n\t\tif (lineCurrent > 0) {\n\t\t\tlineCurrent--;\n\t\t\t// Look for backslash-continued lines\n\t\t\twhile (lineCurrent > 0) {\n\t\t\t\tconst Sci_Position eolPos = styler.LineStart(lineCurrent) - 1;\n\t\t\t\tconst int eolStyle = styler.StyleAt(eolPos);\n\t\t\t\tif (eolStyle == SCE_GD_STRING || eolStyle == SCE_GD_CHARACTER\n\t\t\t\t\t\t|| eolStyle == SCE_GD_STRINGEOL) {\n\t\t\t\t\tlineCurrent -= 1;\n\t\t\t\t} else {\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t}\n\t\t\tstartPos = styler.LineStart(lineCurrent);\n\t\t}\n\t\tinitStyle = startPos == 0 ? SCE_GD_DEFAULT : styler.StyleAt(startPos - 1);\n\t}\n\n\tinitStyle = initStyle & 31;\n\tif (initStyle == SCE_GD_STRINGEOL) {\n\t\tinitStyle = SCE_GD_DEFAULT;\n\t}\n\n\tkwType kwLast = kwOther;\n\tint spaceFlags = 0;\n\tstyler.IndentAmount(lineCurrent, &spaceFlags, IsGDComment);\n\tbool base_n_number = false;\n\n\tconst WordClassifier &classifierIdentifiers = subStyles.Classifier(SCE_GD_IDENTIFIER);\n\n\tStyleContext sc(startPos, endPos - startPos, initStyle, styler);\n\n\tbool indentGood = true;\n\tSci_Position startIndicator = sc.currentPos;\n\tbool inContinuedString = false;\n\tbool percentIsNodePath = false;\n\tint nodePathStringState = SCE_GD_DEFAULT;\n\t\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.atLineStart) {\n\t\t\tstyler.IndentAmount(lineCurrent, &spaceFlags, IsGDComment);\n\t\t\tindentGood = true;\n\t\t\tif (options.whingeLevel == 1) {\n\t\t\t\tindentGood = (spaceFlags & wsInconsistent) == 0;\n\t\t\t} else if (options.whingeLevel == 2) {\n\t\t\t\tindentGood = (spaceFlags & wsSpaceTab) == 0;\n\t\t\t} else if (options.whingeLevel == 3) {\n\t\t\t\tindentGood = (spaceFlags & wsSpace) == 0;\n\t\t\t} else if (options.whingeLevel == 4) {\n\t\t\t\tindentGood = (spaceFlags & wsTab) == 0;\n\t\t\t}\n\t\t\tif (!indentGood) {\n\t\t\t\tstyler.IndicatorFill(startIndicator, sc.currentPos, indicatorWhitespace, 0);\n\t\t\t\tstartIndicator = sc.currentPos;\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd) {\n\t\t\tpercentIsNodePath = false;\n\t\t\tProcessLineEnd(sc, inContinuedString);\n\t\t\tlineCurrent++;\n\t\t\tif (!sc.More())\n\t\t\t\tbreak;\n\t\t}\n\n\t\tbool needEOLCheck = false;\n\n\t\tif (sc.state == SCE_GD_OPERATOR) {\n\t\t\tkwLast = kwOther;\n\t\t\tsc.SetState(SCE_GD_DEFAULT);\n\t\t} else if (sc.state == SCE_GD_NUMBER) {\n\t\t\tif (!IsAWordChar(sc.ch, false) &&\n\t\t\t\t\t!(!base_n_number && ((sc.ch == '+' || sc.ch == '-') && (sc.chPrev == 'e' || sc.chPrev == 'E')))) {\n\t\t\t\tsc.SetState(SCE_GD_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_GD_IDENTIFIER) {\n\t\t\tif ((sc.ch == '.') || (!IsAWordChar(sc.ch, options.unicodeIdentifiers))) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\t\t\t\tint style = SCE_GD_IDENTIFIER;\n\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\tstyle = SCE_GD_WORD;\n\t\t\t\t} else if (kwLast == kwClass) {\n\t\t\t\t\tstyle = SCE_GD_CLASSNAME;\n\t\t\t\t} else if (kwLast == kwDef) {\n\t\t\t\t\tstyle = SCE_GD_FUNCNAME;\n\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\tif (options.keywords2NoSubIdentifiers) {\n\t\t\t\t\t\t// We don't want to highlight keywords2\n\t\t\t\t\t\t// that are used as a sub-identifier,\n\t\t\t\t\t\t// i.e. not open in \"foo.open\".\n\t\t\t\t\t\tconst Sci_Position pos = styler.GetStartSegment() - 1;\n\t\t\t\t\t\tif (pos < 0 || (styler.SafeGetCharAt(pos, '\\0') != '.'))\n\t\t\t\t\t\t\tstyle = SCE_GD_WORD2;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyle = SCE_GD_WORD2;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tconst int subStyle = classifierIdentifiers.ValueFor(s);\n\t\t\t\t\tif (subStyle >= 0) {\n\t\t\t\t\t\tstyle = subStyle;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tsc.ChangeState(style);\n\t\t\t\tsc.SetState(SCE_GD_DEFAULT);\n\t\t\t\tif (style == SCE_GD_WORD) {\n\t\t\t\t\tif (0 == strcmp(s, \"class\"))\n\t\t\t\t\t\tkwLast = kwClass;\n\t\t\t\t\telse if (0 == strcmp(s, \"func\"))\n\t\t\t\t\t\tkwLast = kwDef;\n\t\t\t\t\telse if (0 == strcmp(s, \"extends\"))\n\t\t\t\t\t\tkwLast = kwExtends;\n\t\t\t\t\telse\n\t\t\t\t\t\tkwLast = kwOther;\n\t\t\t\t} else {\n\t\t\t\t\tkwLast = kwOther;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if ((sc.state == SCE_GD_COMMENTLINE) || (sc.state == SCE_GD_COMMENTBLOCK)) {\n\t\t\tif (sc.ch == '\\r' || sc.ch == '\\n') {\n\t\t\t\tsc.SetState(SCE_GD_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_GD_ANNOTATION) {\n\t\t\tif (!IsAWordStart(sc.ch, options.unicodeIdentifiers)) {\n\t\t\t\tsc.SetState(SCE_GD_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_GD_NODEPATH) {\n\t\t\tif (nodePathStringState != SCE_GD_DEFAULT) {\n\t\t\t\tif (sc.ch == GetGDStringQuoteChar(nodePathStringState) ) {\n\t\t\t\t\tnodePathStringState = SCE_GD_DEFAULT;\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\tif (IsGDStringStart(sc.ch)) {\n\t\t\t\t\tnodePathStringState = GetGDStringState(sc.ch);\n\t\t\t\t} else if (!IsANodePathChar(sc.ch, options.unicodeIdentifiers)) {\n\t\t\t\t\tsc.SetState(SCE_GD_DEFAULT);\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (IsGDSingleQuoteStringState(sc.state)) {\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tif ((sc.chNext == '\\r') && (sc.GetRelative(2) == '\\n')) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\t\tinContinuedString = true;\n\t\t\t\t} else {\n\t\t\t\t\t// Don't roll over the newline.\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t} else if (sc.ch == GetGDStringQuoteChar(sc.state)) {\n\t\t\t\tsc.ForwardSetState(SCE_GD_DEFAULT);\n\t\t\t\tneedEOLCheck = true;\n\t\t\t}\n\t\t} else if (sc.state == SCE_GD_TRIPLE) {\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match(R\"(''')\")) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_GD_DEFAULT);\n\t\t\t\tneedEOLCheck = true;\n\t\t\t}\n\t\t} else if (sc.state == SCE_GD_TRIPLEDOUBLE) {\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match(R\"(\"\"\")\")) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_GD_DEFAULT);\n\t\t\t\tneedEOLCheck = true;\n\t\t\t}\n\t\t}\n\n\t\tif (!indentGood && !IsASpaceOrTab(sc.ch)) {\n\t\t\tstyler.IndicatorFill(startIndicator, sc.currentPos, indicatorWhitespace, 1);\n\t\t\tstartIndicator = sc.currentPos;\n\t\t\tindentGood = true;\n\t\t}\n\n\t\t// State exit code may have moved on to end of line\n\t\tif (needEOLCheck && sc.atLineEnd) {\n\t\t\tProcessLineEnd(sc, inContinuedString);\n\t\t\tlineCurrent++;\n\t\t\tstyler.IndentAmount(lineCurrent, &spaceFlags, IsGDComment);\n\t\t\tif (!sc.More())\n\t\t\t\tbreak;\n\t\t}\n\n\t\t// Check for a new state starting character\n\t\tif (sc.state == SCE_GD_DEFAULT) {\n\t\t\tif (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tif (sc.ch == '0' && (sc.chNext == 'x' || sc.chNext == 'X')) {\n\t\t\t\t\tbase_n_number = true;\n\t\t\t\t\tsc.SetState(SCE_GD_NUMBER);\n\t\t\t\t} else if (sc.ch == '0' &&\n\t\t\t\t\t\t(sc.chNext == 'o' || sc.chNext == 'O' || sc.chNext == 'b' || sc.chNext == 'B')) {\n\t\t\t\t\tif (options.base2or8Literals) {\n\t\t\t\t\t\tbase_n_number = true;\n\t\t\t\t\t\tsc.SetState(SCE_GD_NUMBER);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.SetState(SCE_GD_NUMBER);\n\t\t\t\t\t\tsc.ForwardSetState(SCE_GD_IDENTIFIER);\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tbase_n_number = false;\n\t\t\t\t\tsc.SetState(SCE_GD_NUMBER);\n\t\t\t\t}\n\t\t\t} else if ((sc.ch == '$') || (sc.ch == '%' && (percentIsNodePath || IsFirstNonWhitespace(sc.currentPos, styler)))) {\n\t\t\t\tpercentIsNodePath = false;\n\t\t\t\tsc.SetState(SCE_GD_NODEPATH);\n\t\t\t} else if (isoperator(sc.ch) || sc.ch == '`') {\n\t\t\t\tpercentIsNodePath = !((sc.ch == ')') || (sc.ch == ']') || (sc.ch == '}'));\n\t\t\t\tsc.SetState(SCE_GD_OPERATOR);\n\t\t\t} else if (sc.ch == '#') {\n\t\t\t\tsc.SetState(sc.chNext == '#' ? SCE_GD_COMMENTBLOCK : SCE_GD_COMMENTLINE);\n\t\t\t} else if (sc.ch == '@') {\n\t\t\t\tif (IsFirstNonWhitespace(sc.currentPos, styler))\n\t\t\t\t\tsc.SetState(SCE_GD_ANNOTATION);\n\t\t\t\telse\n\t\t\t\t\tsc.SetState(SCE_GD_OPERATOR);\n\t\t\t} else if (IsGDStringStart(sc.ch)) {\n\t\t\t\tSci_PositionU nextIndex = 0;\n\t\t\t\tsc.SetState(GetGDStringState(styler, sc.currentPos, &nextIndex));\n\t\t\t\twhile (nextIndex > (sc.currentPos + 1) && sc.More()) {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n } else if (IsAWordStart(sc.ch, options.unicodeIdentifiers)) {\n\t\t\t\tsc.SetState(SCE_GD_IDENTIFIER);\n\t\t\t}\n\t\t}\n\t}\n\tstyler.IndicatorFill(startIndicator, sc.currentPos, indicatorWhitespace, 0);\n\tsc.Complete();\n}\n\nstatic bool IsCommentLine(Sci_Position line, Accessor &styler) {\n\tconst Sci_Position pos = styler.LineStart(line);\n\tconst Sci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\tfor (Sci_Position i = pos; i < eol_pos; i++) {\n\t\tconst char ch = styler[i];\n\t\tif (ch == '#')\n\t\t\treturn true;\n\t\telse if (ch != ' ' && ch != '\\t')\n\t\t\treturn false;\n\t}\n\treturn false;\n}\n\nstatic bool IsQuoteLine(Sci_Position line, const Accessor &styler) {\n\tconst int style = styler.StyleAt(styler.LineStart(line)) & 31;\n\treturn IsGDTripleQuoteStringState(style);\n}\n\n\nvoid SCI_METHOD LexerGDScript::Fold(Sci_PositionU startPos, Sci_Position length, int /*initStyle - unused*/, IDocument *pAccess) {\n\tif (!options.fold)\n\t\treturn;\n\n\tAccessor styler(pAccess, nullptr);\n\n\tconst Sci_Position maxPos = startPos + length;\n\tconst Sci_Position maxLines = (maxPos == styler.Length()) ? styler.GetLine(maxPos) : styler.GetLine(maxPos - 1);\t// Requested last line\n\tconst Sci_Position docLines = styler.GetLine(styler.Length());\t// Available last line\n\n\t// Backtrack to previous non-blank line so we can determine indent level\n\t// for any white space lines (needed esp. within triple quoted strings)\n\t// and so we can fix any preceding fold level (which is why we go back\n\t// at least one line in all cases)\n\tint spaceFlags = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint indentCurrent = styler.IndentAmount(lineCurrent, &spaceFlags, nullptr);\n\twhile (lineCurrent > 0) {\n\t\tlineCurrent--;\n\t\tindentCurrent = styler.IndentAmount(lineCurrent, &spaceFlags, nullptr);\n\t\tif (!(indentCurrent & SC_FOLDLEVELWHITEFLAG) &&\n\t\t\t\t(!IsCommentLine(lineCurrent, styler)) &&\n\t\t\t\t(!IsQuoteLine(lineCurrent, styler)))\n\t\t\tbreak;\n\t}\n\tint indentCurrentLevel = indentCurrent & SC_FOLDLEVELNUMBERMASK;\n\n\t// Set up initial loop state\n\tstartPos = styler.LineStart(lineCurrent);\n\tint prev_state = SCE_GD_DEFAULT & 31;\n\tif (lineCurrent >= 1)\n\t\tprev_state = styler.StyleAt(startPos - 1) & 31;\n\tint prevQuote = options.foldQuotes && IsGDTripleQuoteStringState(prev_state);\n\n\t// Process all characters to end of requested range or end of any triple quote\n\t//that hangs over the end of the range. Cap processing in all cases\n\t// to end of document (in case of unclosed quote at end).\n\twhile ((lineCurrent <= docLines) && ((lineCurrent <= maxLines) || prevQuote)) {\n\n\t\t// Gather info\n\t\tint lev = indentCurrent;\n\t\tSci_Position lineNext = lineCurrent + 1;\n\t\tint indentNext = indentCurrent;\n\t\tint quote = false;\n\t\tif (lineNext <= docLines) {\n\t\t\t// Information about next line is only available if not at end of document\n\t\t\tindentNext = styler.IndentAmount(lineNext, &spaceFlags, nullptr);\n\t\t\tconst Sci_Position lookAtPos = (styler.LineStart(lineNext) == styler.Length()) ? styler.Length() - 1 : styler.LineStart(lineNext);\n\t\t\tconst int style = styler.StyleAt(lookAtPos) & 31;\n\t\t\tquote = options.foldQuotes && IsGDTripleQuoteStringState(style);\n\t\t}\n\t\tconst bool quote_start = (quote && !prevQuote);\n\t\tconst bool quote_continue = (quote && prevQuote);\n\t\tif (!quote || !prevQuote)\n\t\t\tindentCurrentLevel = indentCurrent & SC_FOLDLEVELNUMBERMASK;\n\t\tif (quote)\n\t\t\tindentNext = indentCurrentLevel;\n\t\tif (indentNext & SC_FOLDLEVELWHITEFLAG)\n\t\t\tindentNext = SC_FOLDLEVELWHITEFLAG | indentCurrentLevel;\n\n\t\tif (quote_start) {\n\t\t\t// Place fold point at start of triple quoted string\n\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t} else if (quote_continue || prevQuote) {\n\t\t\t// Add level to rest of lines in the string\n\t\t\tlev = lev + 1;\n\t\t}\n\n\t\t// Skip past any blank lines for next indent level info; we skip also\n\t\t// comments (all comments, not just those starting in column 0)\n\t\t// which effectively folds them into surrounding code rather\n\t\t// than screwing up folding. If comments end file, use the min\n\t\t// comment indent as the level after\n\n\t\tint minCommentLevel = indentCurrentLevel;\n\t\twhile (!quote &&\n\t\t\t\t(lineNext < docLines) &&\n\t\t\t\t((indentNext & SC_FOLDLEVELWHITEFLAG) || (IsCommentLine(lineNext, styler)))) {\n\n\t\t\tif (IsCommentLine(lineNext, styler) && indentNext < minCommentLevel) {\n\t\t\t\tminCommentLevel = indentNext;\n\t\t\t}\n\n\t\t\tlineNext++;\n\t\t\tindentNext = styler.IndentAmount(lineNext, &spaceFlags, nullptr);\n\t\t}\n\n\t\tconst int levelAfterComments = ((lineNext < docLines) ? indentNext & SC_FOLDLEVELNUMBERMASK : minCommentLevel);\n\t\tconst int levelBeforeComments = std::max(indentCurrentLevel, levelAfterComments);\n\n\t\t// Now set all the indent levels on the lines we skipped\n\t\t// Do this from end to start. Once we encounter one line\n\t\t// which is indented more than the line after the end of\n\t\t// the comment-block, use the level of the block before\n\n\t\tSci_Position skipLine = lineNext;\n\t\tint skipLevel = levelAfterComments;\n\n\t\twhile (--skipLine > lineCurrent) {\n\t\t\tconst int skipLineIndent = styler.IndentAmount(skipLine, &spaceFlags, nullptr);\n\n\t\t\tif (options.foldCompact) {\n\t\t\t\tif ((skipLineIndent & SC_FOLDLEVELNUMBERMASK) > levelAfterComments)\n\t\t\t\t\tskipLevel = levelBeforeComments;\n\n\t\t\t\tconst int whiteFlag = skipLineIndent & SC_FOLDLEVELWHITEFLAG;\n\n\t\t\t\tstyler.SetLevel(skipLine, skipLevel | whiteFlag);\n\t\t\t} else {\n\t\t\t\tif ((skipLineIndent & SC_FOLDLEVELNUMBERMASK) > levelAfterComments &&\n\t\t\t\t\t\t!(skipLineIndent & SC_FOLDLEVELWHITEFLAG) &&\n\t\t\t\t\t\t!IsCommentLine(skipLine, styler))\n\t\t\t\t\tskipLevel = levelBeforeComments;\n\n\t\t\t\tstyler.SetLevel(skipLine, skipLevel);\n\t\t\t}\n\t\t}\n\n\t\t// Set fold header on non-quote line\n\t\tif (!quote && !(indentCurrent & SC_FOLDLEVELWHITEFLAG)) {\n\t\t\tif ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext & SC_FOLDLEVELNUMBERMASK))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t}\n\n\t\t// Keep track of triple quote state of previous line\n\t\tprevQuote = quote;\n\n\t\t// Set fold level for this line and move to next line\n\t\tstyler.SetLevel(lineCurrent, options.foldCompact ? lev : lev & ~SC_FOLDLEVELWHITEFLAG);\n\t\tindentCurrent = indentNext;\n\t\tlineCurrent = lineNext;\n\t}\n\n\t// NOTE: Cannot set level of last line here because indentCurrent doesn't have\n\t// header flag set; the loop above is crafted to take care of this case!\n\t//styler.SetLevel(lineCurrent, indentCurrent);\n}\n\nextern const LexerModule lmGDScript(SCLEX_GDSCRIPT, LexerGDScript::LexerFactoryGDScript, \"gdscript\",\n\t\t gdscriptWordListDesc);\n" }, { "path": "lexers/LexGui4Cli.cxx", "content": "// Scintilla source code edit control\n// Copyright 1998-2002 by Neil Hodgson \n// @file LexGui4Cli.cxx\n/*\nThis is the Lexer for Gui4Cli, included in SciLexer.dll\n- by d. Keletsekis, 2/10/2003\n\nTo add to SciLexer.dll:\n1. Add the values below to INCLUDE\\Scintilla.iface\n2. Run the scripts/HFacer.py script\n3. Run the scripts/LexGen.py script\n\nval SCE_GC_DEFAULT=0\nval SCE_GC_COMMENTLINE=1\nval SCE_GC_COMMENTBLOCK=2\nval SCE_GC_GLOBAL=3\nval SCE_GC_EVENT=4\nval SCE_GC_ATTRIBUTE=5\nval SCE_GC_CONTROL=6\nval SCE_GC_COMMAND=7\nval SCE_GC_STRING=8\nval SCE_GC_OPERATOR=9\n*/\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n#define debug Platform::DebugPrintf\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalnum(ch) || ch == '.' || ch == '_' || ch =='\\\\');\n}\n\ninline bool isGCOperator(int ch)\n{\tif (isalnum(ch))\n\t\treturn false;\n\t// '.' left out as it is used to make up numbers\n\tif (ch == '*' || ch == '/' || ch == '-' || ch == '+' ||\n\t\t ch == '(' || ch == ')' || ch == '=' || ch == '%' ||\n\t\t ch == '[' || ch == ']' || ch == '<' || ch == '>' ||\n\t\t ch == ',' || ch == ';' || ch == ':')\n\t\treturn true;\n\treturn false;\n}\n\n#define isSpace(x)\t\t((x)==' ' || (x)=='\\t')\n#define isNL(x)\t\t\t((x)=='\\n' || (x)=='\\r')\n#define isSpaceOrNL(x) (isSpace(x) || isNL(x))\n#define BUFFSIZE 500\n#define isFoldPoint(x) ((styler.LevelAt(x) & SC_FOLDLEVELNUMBERMASK) == 1024)\n\nstatic void colorFirstWord(WordList *keywordlists[], Accessor &styler,\n\t\t\t\t\t\t\t\t\tStyleContext *sc, char *buff, Sci_Position length, Sci_Position)\n{\n\tSci_Position c = 0;\n\twhile (sc->More() && isSpaceOrNL(sc->ch))\n\t{\tsc->Forward();\n\t}\n\tstyler.ColourTo(sc->currentPos - 1, sc->state);\n\n\tif (!IsAWordChar(sc->ch)) // comment, marker, etc..\n\t\treturn;\n\n\twhile (sc->More() && !isSpaceOrNL(sc->ch) && (c < length-1) && !isGCOperator(sc->ch))\n\t{\tbuff[c] = static_cast(sc->ch);\n\t\t++c; sc->Forward();\n\t}\n\tbuff[c] = '\\0';\n\tchar *p = buff;\n\twhile (*p)\t// capitalize..\n\t{\tif (islower(*p)) *p = static_cast(toupper(*p));\n\t\t++p;\n\t}\n\n\tWordList &kGlobal\t\t= *keywordlists[0];\t// keyword lists set by the user\n\tWordList &kEvent\t\t= *keywordlists[1];\n\tWordList &kAttribute\t= *keywordlists[2];\n\tWordList &kControl\t= *keywordlists[3];\n\tWordList &kCommand\t= *keywordlists[4];\n\n\tint state = 0;\n\t// int level = styler.LevelAt(line) & SC_FOLDLEVELNUMBERMASK;\n\t// debug (\"line = %d, level = %d\", line, level);\n\n\tif\t (kGlobal.InList(buff))\t\tstate = SCE_GC_GLOBAL;\n\telse if (kAttribute.InList(buff))\tstate = SCE_GC_ATTRIBUTE;\n\telse if (kControl.InList(buff))\t\tstate = SCE_GC_CONTROL;\n\telse if (kCommand.InList(buff))\t\tstate = SCE_GC_COMMAND;\n\telse if (kEvent.InList(buff))\t\t\tstate = SCE_GC_EVENT;\n\n\tif (state)\n\t{\tsc->ChangeState(state);\n\t\tstyler.ColourTo(sc->currentPos - 1, sc->state);\n\t\tsc->ChangeState(SCE_GC_DEFAULT);\n\t}\n\telse\n\t{\tsc->ChangeState(SCE_GC_DEFAULT);\n\t\tstyler.ColourTo(sc->currentPos - 1, sc->state);\n\t}\n}\n\n// Main colorizing function called by Scintilla\nstatic void\nColouriseGui4CliDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *keywordlists[], Accessor &styler)\n{\n\tstyler.StartAt(startPos);\n\n\tSci_Position currentline = styler.GetLine(startPos);\n\tint quotestart = 0, oldstate;\n\tstyler.StartSegment(startPos);\n\tbool noforward;\n\tchar buff[BUFFSIZE+1];\t// buffer for command name\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\tbuff[0] = '\\0'; // cbuff = 0;\n\n\tif (sc.state != SCE_GC_COMMENTBLOCK) // colorize 1st word..\n\t\tcolorFirstWord(keywordlists, styler, &sc, buff, BUFFSIZE, currentline);\n\n\twhile (sc.More())\n\t{\tnoforward = 0;\n\n\t\tswitch (sc.ch)\n\t\t{\n\t\t\tcase '/':\n\t\t\t\tif (sc.state == SCE_GC_COMMENTBLOCK || sc.state == SCE_GC_STRING)\n\t\t\t\t\tbreak;\n\t\t\t\tif (sc.chNext == '/')\t// line comment\n\t\t\t\t{\tsc.SetState (SCE_GC_COMMENTLINE);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\t}\n\t\t\t\telse if (sc.chNext == '*')\t// block comment\n\t\t\t\t{\tsc.SetState(SCE_GC_COMMENTBLOCK);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\t}\n\t\t\t\telse\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\tbreak;\n\n\t\t\tcase '*':\t// end of comment block, or operator..\n\t\t\t\tif (sc.state == SCE_GC_STRING)\n\t\t\t\t\tbreak;\n\t\t\t\tif (sc.state == SCE_GC_COMMENTBLOCK && sc.chNext == '/')\n\t\t\t\t{\tsc.Forward();\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\t\tsc.ChangeState (SCE_GC_DEFAULT);\n\t\t\t\t}\n\t\t\t\telse\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\tbreak;\n\n\t\t\tcase '\\'':\tcase '\\\"': // strings..\n\t\t\t\tif (sc.state == SCE_GC_COMMENTBLOCK || sc.state == SCE_GC_COMMENTLINE)\n\t\t\t\t\tbreak;\n\t\t\t\tif (sc.state == SCE_GC_STRING)\n\t\t\t\t{\tif (sc.ch == quotestart)\t// match same quote char..\n\t\t\t\t\t{\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\t\t\tsc.ChangeState(SCE_GC_DEFAULT);\n\t\t\t\t\t\tquotestart = 0;\n\t\t\t\t}\t}\n\t\t\t\telse\n\t\t\t\t{\tstyler.ColourTo(sc.currentPos - 1, sc.state);\n\t\t\t\t\tsc.ChangeState(SCE_GC_STRING);\n\t\t\t\t\tquotestart = sc.ch;\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase ';':\t// end of commandline character\n\t\t\t\tif (sc.state != SCE_GC_COMMENTBLOCK && sc.state != SCE_GC_COMMENTLINE &&\n\t\t\t\t\t sc.state != SCE_GC_STRING)\n\t\t\t\t{\n\t\t\t\t\tstyler.ColourTo(sc.currentPos - 1, sc.state);\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, SCE_GC_OPERATOR);\n\t\t\t\t\tsc.ChangeState(SCE_GC_DEFAULT);\n\t\t\t\t\tsc.Forward();\n\t\t\t\t\tcolorFirstWord(keywordlists, styler, &sc, buff, BUFFSIZE, currentline);\n\t\t\t\t\tnoforward = 1; // don't move forward - already positioned at next char..\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase '+': case '-': case '=':\tcase '!':\t// operators..\n\t\t\tcase '<': case '>': case '&': case '|': case '$':\n\t\t\t\tif (sc.state != SCE_GC_COMMENTBLOCK && sc.state != SCE_GC_COMMENTLINE &&\n\t\t\t\t\t sc.state != SCE_GC_STRING)\n\t\t\t\t{\n\t\t\t\t\tstyler.ColourTo(sc.currentPos - 1, sc.state);\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, SCE_GC_OPERATOR);\n\t\t\t\t\tsc.ChangeState(SCE_GC_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase '\\\\':\t// escape - same as operator, but also mark in strings..\n\t\t\t\tif (sc.state != SCE_GC_COMMENTBLOCK && sc.state != SCE_GC_COMMENTLINE)\n\t\t\t\t{\n\t\t\t\t\toldstate = sc.state;\n\t\t\t\t\tstyler.ColourTo(sc.currentPos - 1, sc.state);\n\t\t\t\t\tsc.Forward(); // mark also the next char..\n\t\t\t\t\tstyler.ColourTo(sc.currentPos, SCE_GC_OPERATOR);\n\t\t\t\t\tsc.ChangeState(oldstate);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase '\\n': case '\\r':\n\t\t\t\t++currentline;\n\t\t\t\tif (sc.state == SCE_GC_COMMENTLINE)\n\t\t\t\t{\tstyler.ColourTo(sc.currentPos, sc.state);\n\t\t\t\t\tsc.ChangeState (SCE_GC_DEFAULT);\n\t\t\t\t}\n\t\t\t\telse if (sc.state != SCE_GC_COMMENTBLOCK)\n\t\t\t\t{\tcolorFirstWord(keywordlists, styler, &sc, buff, BUFFSIZE, currentline);\n\t\t\t\t\tnoforward = 1; // don't move forward - already positioned at next char..\n\t\t\t\t}\n\t\t\t\tbreak;\n\n//\t\t\tcase ' ': case '\\t':\n//\t\t\tdefault :\n\t\t}\n\n\t\tif (!noforward) sc.Forward();\n\n\t}\n\tsc.Complete();\n}\n\n// Main folding function called by Scintilla - (based on props (.ini) files function)\nstatic void FoldGui4Cli(Sci_PositionU startPos, Sci_Position length, int,\n\t\t\t\t\t\t\t\tWordList *[], Accessor &styler)\n{\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tbool headerPoint = false;\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++)\n\t{\n\t\tchar ch = chNext;\n\t\tchNext = styler[i+1];\n\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\t\tif (style == SCE_GC_EVENT || style == SCE_GC_GLOBAL)\n\t\t{\theaderPoint = true; // fold at events and globals\n\t\t}\n\n\t\tif (atEOL)\n\t\t{\tint lev = SC_FOLDLEVELBASE+1;\n\n\t\t\tif (headerPoint)\n\t\t\t\tlev = SC_FOLDLEVELBASE;\n\n\t\t\tif (visibleChars == 0 && foldCompact)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\n\t\t\tif (headerPoint)\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) // set level, if not already correct\n\t\t\t{\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\n\t\t\tlineCurrent++;\t\t// re-initialize our flags\n\t\t\tvisibleChars = 0;\n\t\t\theaderPoint = false;\n\t\t}\n\n\t\tif (!(isspacechar(ch))) // || (style == SCE_GC_COMMENTLINE) || (style != SCE_GC_COMMENTBLOCK)))\n\t\t\tvisibleChars++;\n\t}\n\n\tint lev = headerPoint ? SC_FOLDLEVELBASE : SC_FOLDLEVELBASE+1;\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, lev | flagsNext);\n}\n\n// I have no idea what these are for.. probably accessible by some message.\nstatic const char * const gui4cliWordListDesc[] = {\n\t\"Globals\", \"Events\", \"Attributes\", \"Control\", \"Commands\",\n\t0\n};\n\n// Declare language & pass our function pointers to Scintilla\nextern const LexerModule lmGui4Cli(SCLEX_GUI4CLI, ColouriseGui4CliDoc, \"gui4cli\", FoldGui4Cli, gui4cliWordListDesc);\n\n#undef debug\n\n" }, { "path": "lexers/LexHTML.cxx", "content": "// Scintilla source code edit control\n/** @file LexHTML.cxx\n ** Lexer for HTML.\n **/\n// Copyright 1998-2005 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n#include \"InList.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"SubStyles.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\n#define SCE_HA_JS (SCE_HJA_START - SCE_HJ_START)\n#define SCE_HA_VBS (SCE_HBA_START - SCE_HB_START)\n#define SCE_HA_PYTHON (SCE_HPA_START - SCE_HP_START)\n\nenum script_type { eScriptNone = 0, eScriptJS, eScriptVBS, eScriptPython, eScriptPHP, eScriptXML, eScriptSGML, eScriptSGMLblock, eScriptComment };\nenum script_mode { eHtml = 0, eNonHtmlScript, eNonHtmlPreProc, eNonHtmlScriptPreProc };\n\nconstexpr bool IsAWordChar(int ch) noexcept {\n\treturn IsAlphaNumeric(ch) || ch == '.' || ch == '_';\n}\n\nconstexpr bool IsAWordStart(int ch) noexcept {\n\treturn IsAlphaNumeric(ch) || ch == '_';\n}\n\nbool IsOperator(int ch) noexcept {\n\tif (IsAlphaNumeric(ch))\n\t\treturn false;\n\t// '.' left out as it is used to make up numbers\n\tif (ch == '%' || ch == '^' || ch == '&' || ch == '*' ||\n\t ch == '(' || ch == ')' || ch == '-' || ch == '+' ||\n\t ch == '=' || ch == '|' || ch == '{' || ch == '}' ||\n\t ch == '[' || ch == ']' || ch == ':' || ch == ';' ||\n\t ch == '<' || ch == '>' || ch == ',' || ch == '/' ||\n\t ch == '?' || ch == '!' || ch == '.' || ch == '~')\n\t\treturn true;\n\treturn false;\n}\n\nunsigned char SafeGetUnsignedCharAt(Accessor &styler, Sci_Position position, char chDefault = ' ') {\n\treturn styler.SafeGetCharAt(position, chDefault);\n}\n\n// Put an upper limit to bound time taken for unexpected text.\nconstexpr Sci_PositionU maxLengthCheck = 200;\n\nstd::string GetNextWord(Accessor &styler, Sci_PositionU start) {\n\tstd::string ret;\n\tfor (Sci_PositionU i = 0; i < maxLengthCheck; i++) {\n\t\tconst char ch = styler.SafeGetCharAt(start + i);\n\t\tif ((i == 0) && !IsAWordStart(ch))\n\t\t\tbreak;\n\t\tif ((i > 0) && !IsAWordChar(ch))\n\t\t\tbreak;\n\t\tret.push_back(ch);\n\t}\n\treturn ret;\n}\n\nbool Contains(const std::string &s, std::string_view search) noexcept {\n\treturn s.find(search) != std::string::npos;\n}\n\nscript_type segIsScriptingIndicator(const Accessor &styler, Sci_PositionU start, Sci_PositionU end, script_type prevValue) {\n\tconst std::string s = styler.GetRangeLowered(start, end+1);\n\tif (Contains(s, \"vbs\"))\n\t\treturn eScriptVBS;\n\tif (Contains(s, \"pyth\"))\n\t\treturn eScriptPython;\n\t// https://html.spec.whatwg.org/multipage/scripting.html#attr-script-type\n\t// https://mimesniff.spec.whatwg.org/#javascript-mime-type\n\tif (Contains(s, \"javas\") || Contains(s, \"ecmas\") || Contains(s, \"module\") || Contains(s, \"jscr\"))\n\t\treturn eScriptJS;\n\tif (Contains(s, \"php\"))\n\t\treturn eScriptPHP;\n\n\tconst size_t xml = s.find(\"xml\");\n\tif (xml != std::string::npos) {\n\t\tfor (size_t t = 0; t < xml; t++) {\n\t\t\tif (!IsASpace(s[t])) {\n\t\t\t\treturn prevValue;\n\t\t\t}\n\t\t}\n\t\treturn eScriptXML;\n\t}\n\n\treturn prevValue;\n}\n\nconstexpr bool IsPHPScriptState(int state) noexcept {\n\treturn (state >= SCE_HPHP_DEFAULT && state <= SCE_HPHP_OPERATOR) || (state == SCE_HPHP_COMPLEX_VARIABLE);\n}\n\nscript_type ScriptOfState(int state) noexcept {\n\tif ((state >= SCE_HP_START) && (state <= SCE_HP_IDENTIFIER)) {\n\t\treturn eScriptPython;\n\t} else if ((state >= SCE_HB_START && state <= SCE_HB_STRINGEOL) || (state == SCE_H_ASPAT || state == SCE_H_XCCOMMENT)) {\n\t\treturn eScriptVBS;\n\t} else if ((state >= SCE_HJ_START) && (state <= SCE_HJ_TEMPLATELITERAL)) {\n\t\treturn eScriptJS;\n\t} else if (IsPHPScriptState(state)) {\n\t\treturn eScriptPHP;\n\t} else if ((state >= SCE_H_SGML_DEFAULT) && (state < SCE_H_SGML_BLOCK_DEFAULT)) {\n\t\treturn eScriptSGML;\n\t} else if (state == SCE_H_SGML_BLOCK_DEFAULT) {\n\t\treturn eScriptSGMLblock;\n\t} else {\n\t\treturn eScriptNone;\n\t}\n}\n\nconstexpr int statePrintForState(int state, script_mode inScriptType) noexcept {\n\tint StateToPrint = state;\n\n\tif (state >= SCE_HJ_START) {\n\t\tif ((state >= SCE_HP_START) && (state <= SCE_HP_IDENTIFIER)) {\n\t\t\tStateToPrint = state + ((inScriptType == eNonHtmlScript) ? 0 : SCE_HA_PYTHON);\n\t\t} else if ((state >= SCE_HB_START) && (state <= SCE_HB_STRINGEOL)) {\n\t\t\tStateToPrint = state + ((inScriptType == eNonHtmlScript) ? 0 : SCE_HA_VBS);\n\t\t} else if ((state >= SCE_HJ_START) && (state <= SCE_HJ_TEMPLATELITERAL)) {\n\t\t\tStateToPrint = state + ((inScriptType == eNonHtmlScript) ? 0 : SCE_HA_JS);\n\t\t}\n\t}\n\n\treturn StateToPrint;\n}\n\nconstexpr int stateForPrintState(int StateToPrint) noexcept {\n\tint state = StateToPrint;\n\n\tif ((StateToPrint >= SCE_HPA_START) && (StateToPrint <= SCE_HPA_IDENTIFIER)) {\n\t\tstate = StateToPrint - SCE_HA_PYTHON;\n\t} else if ((StateToPrint >= SCE_HBA_START) && (StateToPrint <= SCE_HBA_STRINGEOL)) {\n\t\tstate = StateToPrint - SCE_HA_VBS;\n\t} else if ((StateToPrint >= SCE_HJA_START) && (StateToPrint <= SCE_HJA_TEMPLATELITERAL)) {\n\t\tstate = StateToPrint - SCE_HA_JS;\n\t}\n\n\treturn state;\n}\n\nconstexpr bool IsNumberChar(char ch) noexcept {\n\treturn IsADigit(ch) || ch == '.' || ch == '-' || ch == '#';\n}\n\nconstexpr bool isStringState(int state) noexcept {\n\tbool bResult = false;\n\n\tswitch (state) {\n\tcase SCE_HJ_DOUBLESTRING:\n\tcase SCE_HJ_SINGLESTRING:\n\tcase SCE_HJ_REGEX:\n\tcase SCE_HJ_TEMPLATELITERAL:\n\tcase SCE_HJA_DOUBLESTRING:\n\tcase SCE_HJA_SINGLESTRING:\n\tcase SCE_HJA_REGEX:\n\tcase SCE_HJA_TEMPLATELITERAL:\n\tcase SCE_HB_STRING:\n\tcase SCE_HBA_STRING:\n\tcase SCE_HP_STRING:\n\tcase SCE_HP_CHARACTER:\n\tcase SCE_HP_TRIPLE:\n\tcase SCE_HP_TRIPLEDOUBLE:\n\tcase SCE_HPA_STRING:\n\tcase SCE_HPA_CHARACTER:\n\tcase SCE_HPA_TRIPLE:\n\tcase SCE_HPA_TRIPLEDOUBLE:\n\tcase SCE_HPHP_HSTRING:\n\tcase SCE_HPHP_SIMPLESTRING:\n\tcase SCE_HPHP_HSTRING_VARIABLE:\n\tcase SCE_HPHP_COMPLEX_VARIABLE:\n\t\tbResult = true;\n\t\tbreak;\n\tdefault :\n\t\tbreak;\n\t}\n\treturn bResult;\n}\n\nconstexpr bool stateAllowsTermination(int state) noexcept {\n\tbool allowTermination = !isStringState(state);\n\tif (allowTermination) {\n\t\tswitch (state) {\n\t\tcase SCE_HPHP_COMMENT:\n\t\tcase SCE_HP_COMMENTLINE:\n\t\tcase SCE_HPA_COMMENTLINE:\n\t\t\tallowTermination = false;\n\t\t\tbreak;\n\t\tdefault:\n\t\t\tbreak;\n\t\t}\n\t}\n\treturn allowTermination;\n}\n\nbool isPreProcessorEndTag(int state, int ch) noexcept {\n\tconst script_type type = ScriptOfState(state);\n\tif (state == SCE_H_ASP || AnyOf(type, eScriptVBS, eScriptJS, eScriptPython)) {\n\t\treturn ch == '%';\n\t}\n\tif (type == eScriptPHP) {\n\t\treturn ch == '%' || ch == '?';\n\t}\n\treturn ch == '?';\n}\n\n// not really well done, since it's only comments that should lex the %> and <%\nconstexpr bool isCommentASPState(int state) noexcept {\n\tbool bResult = false;\n\n\tswitch (state) {\n\tcase SCE_HJ_COMMENT:\n\tcase SCE_HJ_COMMENTLINE:\n\tcase SCE_HJ_COMMENTDOC:\n\tcase SCE_HB_COMMENTLINE:\n\tcase SCE_HP_COMMENTLINE:\n\tcase SCE_HPHP_COMMENT:\n\tcase SCE_HPHP_COMMENTLINE:\n\t\tbResult = true;\n\t\tbreak;\n\tdefault :\n\t\tbreak;\n\t}\n\treturn bResult;\n}\n\nbool classifyAttribHTML(script_mode inScriptType, Sci_PositionU start, Sci_PositionU end, const WordList &keywords, const WordClassifier &classifier, Accessor &styler, const std::string &tag) {\n\tint chAttr = SCE_H_ATTRIBUTEUNKNOWN;\n\tbool isLanguageType = false;\n\tif (IsNumberChar(styler[start])) {\n\t\tchAttr = SCE_H_NUMBER;\n\t} else {\n\t\tconst std::string s = styler.GetRangeLowered(start, end+1);\n\t\tif (keywords.InList(s)) {\n\t\t\tchAttr = SCE_H_ATTRIBUTE;\n\t\t} else {\n\t\t\tint subStyle = classifier.ValueFor(s);\n\t\t\tif (subStyle < 0) {\n\t\t\t\t// Didn't find attribute, check for tag.attribute\n\t\t\t\tconst std::string tagAttribute = tag + \".\" + s;\n\t\t\t\tsubStyle = classifier.ValueFor(tagAttribute);\n\t\t\t}\n\t\t\tif (subStyle >= 0) {\n\t\t\t\tchAttr = subStyle;\n\t\t\t}\n\t\t}\n\n\t\tif (inScriptType == eNonHtmlScript) {\n\t\t\t// see https://html.spec.whatwg.org/multipage/scripting.html#script-processing-model\n\t\t\tif (s == \"type\" || s == \"language\") {\n\t\t\t\tisLanguageType = true;\n\t\t\t}\n\t\t}\n\t}\n\tif ((chAttr == SCE_H_ATTRIBUTEUNKNOWN) && !keywords)\n\t\t// No keywords -> all are known\n\t\tchAttr = SCE_H_ATTRIBUTE;\n\tstyler.ColourTo(end, chAttr);\n\treturn isLanguageType;\n}\n\n// https://html.spec.whatwg.org/multipage/custom-elements.html#custom-elements-core-concepts\nbool isHTMLCustomElement(const std::string &tag) noexcept {\n\t// check valid HTML custom element name: starts with an ASCII lower alpha and contains hyphen.\n\t// IsUpperOrLowerCase() is used for `html.tags.case.sensitive=1`.\n\tif (tag.length() < 2 || !IsUpperOrLowerCase(tag[0])) {\n\t\treturn false;\n\t}\n\tif (tag.find('-') == std::string::npos) {\n\t\treturn false;\n\t}\n\treturn true;\n}\n\nint classifyTagHTML(Sci_PositionU start, Sci_PositionU end,\n const WordList &keywords, const WordClassifier &classifier, Accessor &styler, bool &tagDontFold,\n bool caseSensitive, bool isXml, bool allowScripts,\n const std::set &nonFoldingTags,\n std::string &tag) {\n\ttag.clear();\n\t// Copy after the '<' and stop before ' '\n\tfor (Sci_PositionU cPos = start; cPos <= end; cPos++) {\n\t\tconst char ch = styler[cPos];\n\t\tif (IsASpace(ch)) {\n\t\t\tbreak;\n\t\t}\n\t\tif ((ch != '<') && (ch != '/')) {\n\t\t\ttag.push_back(caseSensitive ? ch : MakeLowerCase(ch));\n\t\t}\n\t}\n\t// if the current language is XML, I can fold any tag\n\t// if the current language is HTML, I don't want to fold certain tags (input, meta, etc.)\n\t//...to find it in the list of no-container-tags\n\ttagDontFold = (!isXml) && (nonFoldingTags.count(tag) > 0);\n\t// No keywords -> all are known\n\tint chAttr = SCE_H_TAGUNKNOWN;\n\tif (!tag.empty() && (tag[0] == '!')) {\n\t\tchAttr = SCE_H_SGML_DEFAULT;\n\t} else if (!keywords || keywords.InList(tag)) {\n\t\tchAttr = SCE_H_TAG;\n\t} else if (!isXml && isHTMLCustomElement(tag)) {\n\t\tchAttr = SCE_H_TAG;\n\t} else {\n\t\tconst int subStyle = classifier.ValueFor(tag);\n\t\tif (subStyle >= 0) {\n\t\t\tchAttr = subStyle;\n\t\t}\n\t}\n\tif (chAttr != SCE_H_TAGUNKNOWN) {\n\t\tstyler.ColourTo(end, chAttr);\n\t}\n\tif (chAttr == SCE_H_TAG) {\n\t\tif (allowScripts && (tag == \"script\")) {\n\t\t\t// check to see if this is a self-closing tag by sniffing ahead\n\t\t\tbool isSelfClose = false;\n\t\t\tfor (Sci_PositionU cPos = end; cPos <= end + maxLengthCheck; cPos++) {\n\t\t\t\tconst char ch = styler.SafeGetCharAt(cPos, '\\0');\n\t\t\t\tif (ch == '\\0' || ch == '>')\n\t\t\t\t\tbreak;\n\t\t\t\tif (ch == '/' && styler.SafeGetCharAt(cPos + 1, '\\0') == '>') {\n\t\t\t\t\tisSelfClose = true;\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t}\n\n\t\t\t// do not enter a script state if the tag self-closed\n\t\t\tif (!isSelfClose)\n\t\t\t\tchAttr = SCE_H_SCRIPT;\n\t\t} else if (!isXml && (tag == \"comment\")) {\n\t\t\tchAttr = SCE_H_COMMENT;\n\t\t}\n\t}\n\treturn chAttr;\n}\n\nvoid classifyWordHTJS(Sci_PositionU start, Sci_PositionU end,\n const WordList &keywords, const WordClassifier &classifier, const WordClassifier &classifierServer, Accessor &styler, script_mode inScriptType) {\n\tconst std::string s = styler.GetRange(start, end+1);\n\tint chAttr = SCE_HJ_WORD;\n\tconst bool wordIsNumber = IsADigit(s[0]) || ((s[0] == '.') && IsADigit(s[1]));\n\tif (wordIsNumber) {\n\t\tchAttr = SCE_HJ_NUMBER;\n\t} else if (keywords.InList(s)) {\n\t\tchAttr = SCE_HJ_KEYWORD;\n\t} else {\n\t\tconst int subStyle = (inScriptType == eNonHtmlScript) ? classifier.ValueFor(s) : classifierServer.ValueFor(s);\n\t\tif (subStyle >= 0) {\n\t\t\tchAttr = subStyle;\n\t\t}\n\t}\n\n\tstyler.ColourTo(end, statePrintForState(chAttr, inScriptType));\n}\n\nint classifyWordHTVB(Sci_PositionU start, Sci_PositionU end, const WordList &keywords, const WordClassifier &classifier, Accessor &styler, script_mode inScriptType) {\n\tint chAttr = SCE_HB_IDENTIFIER;\n\tconst bool wordIsNumber = IsADigit(styler[start]) || (styler[start] == '.');\n\tif (wordIsNumber) {\n\t\tchAttr = SCE_HB_NUMBER;\n\t} else {\n\t\tconst std::string s = styler.GetRangeLowered(start, end+1);\n\t\tif (keywords.InList(s)) {\n\t\t\tchAttr = SCE_HB_WORD;\n\t\t\tif (s == \"rem\")\n\t\t\t\tchAttr = SCE_HB_COMMENTLINE;\n\t\t} else {\n\t\t\tconst int subStyle = classifier.ValueFor(s);\n\t\t\tif (subStyle >= 0) {\n\t\t\t\tchAttr = subStyle;\n\t\t\t}\n\t\t}\n\t}\n\tstyler.ColourTo(end, statePrintForState(chAttr, inScriptType));\n\tif (chAttr == SCE_HB_COMMENTLINE)\n\t\treturn SCE_HB_COMMENTLINE;\n\telse\n\t\treturn SCE_HB_DEFAULT;\n}\n\nvoid classifyWordHTPy(Sci_PositionU start, Sci_PositionU end, const WordList &keywords, const WordClassifier &classifier, Accessor &styler, std::string &prevWord, script_mode inScriptType, bool isMako) {\n\tconst bool wordIsNumber = IsADigit(styler[start]);\n\tconst std::string s = styler.GetRange(start, end + 1);\n\tint chAttr = SCE_HP_IDENTIFIER;\n\tif (prevWord == \"class\")\n\t\tchAttr = SCE_HP_CLASSNAME;\n\telse if (prevWord == \"def\")\n\t\tchAttr = SCE_HP_DEFNAME;\n\telse if (wordIsNumber)\n\t\tchAttr = SCE_HP_NUMBER;\n\telse if (keywords.InList(s))\n\t\tchAttr = SCE_HP_WORD;\n\telse if (isMako && (s == \"block\"))\n\t\tchAttr = SCE_HP_WORD;\n\telse {\n\t\tconst int subStyle = classifier.ValueFor(s);\n\t\tif (subStyle >= 0) {\n\t\t\tchAttr = subStyle;\n\t\t}\n\t}\n\tstyler.ColourTo(end, statePrintForState(chAttr, inScriptType));\n\tprevWord = s;\n}\n\n// Update the word colour to default or keyword\n// Called when in a PHP word\nvoid classifyWordHTPHP(Sci_PositionU start, Sci_PositionU end, const WordList &keywords, const WordClassifier &classifier, Accessor &styler) {\n\tint chAttr = SCE_HPHP_DEFAULT;\n\tconst bool wordIsNumber = IsADigit(styler[start]) || (styler[start] == '.' && start+1 <= end && IsADigit(styler[start+1]));\n\tif (wordIsNumber) {\n\t\tchAttr = SCE_HPHP_NUMBER;\n\t} else {\n\t\tconst std::string s = styler.GetRangeLowered(start, end+1);;\n\t\tif (keywords.InList(s)) {\n\t\t\tchAttr = SCE_HPHP_WORD;\n\t\t} else {\n\t\t\tconst int subStyle = classifier.ValueFor(s);\n\t\t\tif (subStyle >= 0) {\n\t\t\t\tchAttr = subStyle;\n\t\t\t}\n\t\t}\n\t}\n\tstyler.ColourTo(end, chAttr);\n}\n\nbool isWordHSGML(Sci_PositionU start, Sci_PositionU end, const WordList &keywords, const Accessor &styler) {\n\tconst std::string s = styler.GetRange(start, end + 1);\n\treturn keywords.InList(s);\n}\n\nbool isWordCdata(Sci_PositionU start, Sci_PositionU end, const Accessor &styler) {\n\tconst std::string s = styler.GetRange(start, end + 1);\n\treturn s == \"[CDATA[\";\n}\n\n// Return the first state to reach when entering a scripting language\nconstexpr int StateForScript(script_type scriptLanguage) noexcept {\n\tint Result = SCE_HJ_START;\n\tswitch (scriptLanguage) {\n\tcase eScriptVBS:\n\t\tResult = SCE_HB_START;\n\t\tbreak;\n\tcase eScriptPython:\n\t\tResult = SCE_HP_START;\n\t\tbreak;\n\tcase eScriptPHP:\n\t\tResult = SCE_HPHP_DEFAULT;\n\t\tbreak;\n\tcase eScriptXML:\n\t\tResult = SCE_H_TAGUNKNOWN;\n\t\tbreak;\n\tcase eScriptSGML:\n\t\tResult = SCE_H_SGML_DEFAULT;\n\t\tbreak;\n\tcase eScriptComment:\n\t\tResult = SCE_H_COMMENT;\n\t\tbreak;\n\tdefault :\n\t\tbreak;\n\t}\n\treturn Result;\n}\n\nconstexpr int defaultStateForSGML(script_type scriptLanguage) noexcept {\n\treturn (scriptLanguage == eScriptSGMLblock)? SCE_H_SGML_BLOCK_DEFAULT : SCE_H_SGML_DEFAULT;\n}\n\nconstexpr bool issgmlwordchar(int ch) noexcept {\n\treturn !IsASCII(ch) ||\n\t\t(IsAlphaNumeric(ch) || ch == '.' || ch == '_' || ch == ':' || ch == '!' || ch == '#');\n}\n\nconstexpr bool IsPhpWordStart(int ch) noexcept {\n\treturn (IsUpperOrLowerCase(ch) || (ch == '_')) || (ch >= 0x7f);\n}\n\nconstexpr bool IsPhpWordChar(int ch) noexcept {\n\treturn IsADigit(ch) || IsPhpWordStart(ch);\n}\n\nconstexpr bool InTagState(int state) noexcept {\n\treturn AnyOf(state, SCE_H_TAG, SCE_H_TAGUNKNOWN, SCE_H_SCRIPT,\n\t SCE_H_ATTRIBUTE, SCE_H_ATTRIBUTEUNKNOWN,\n\t SCE_H_NUMBER, SCE_H_OTHER,\n\t SCE_H_DOUBLESTRING, SCE_H_SINGLESTRING);\n}\n\nconstexpr bool isLineEnd(int ch) noexcept {\n\treturn ch == '\\r' || ch == '\\n';\n}\n\nbool isMakoBlockEnd(const int ch, const int chNext, const std::string &blockType) noexcept {\n\tif (blockType.empty()) {\n\t\treturn ((ch == '%') && (chNext == '>'));\n\t} else if (InList(blockType, { \"inherit\", \"namespace\", \"include\", \"page\" })) {\n\t\treturn ((ch == '/') && (chNext == '>'));\n\t} else if (blockType == \"%\") {\n\t\tif (ch == '/' && isLineEnd(chNext))\n\t\t\treturn true;\n\t\telse\n\t\t\treturn isLineEnd(ch);\n\t} else if (blockType == \"{\") {\n\t\treturn ch == '}';\n\t} else {\n\t\treturn (ch == '>');\n\t}\n}\n\nbool isDjangoBlockEnd(const int ch, const int chNext, const std::string &blockType) noexcept {\n\tif (blockType.empty()) {\n\t\treturn false;\n\t} else if (blockType == \"%\") {\n\t\treturn ((ch == '%') && (chNext == '}'));\n\t} else if (blockType == \"{\") {\n\t\treturn ((ch == '}') && (chNext == '}'));\n\t} else {\n\t\treturn false;\n\t}\n}\n\nclass PhpNumberState {\n\tenum NumberBase { BASE_10 = 0, BASE_2, BASE_8, BASE_16 };\n\tstatic constexpr const char *const digitList[] = { \"_0123456789\", \"_01\", \"_01234567\", \"_0123456789abcdefABCDEF\" };\n\n\tNumberBase base = BASE_10;\n\tbool decimalPart = false;\n\tbool exponentPart = false;\n\tbool invalid = false;\n\tbool finished = false;\n\n\tbool leadingZero = false;\n\tbool invalidBase8 = false;\n\n\tbool betweenDigits = false;\n\tbool decimalChar = false;\n\tbool exponentChar = false;\n\npublic:\n\t[[nodiscard]] bool isInvalid() const noexcept { return invalid; }\n\t[[nodiscard]] bool isFinished() const noexcept { return finished; }\n\n\tbool init(int ch, int chPlus1, int chPlus2) noexcept {\n\t\tbase = BASE_10;\n\t\tdecimalPart = false;\n\t\texponentPart = false;\n\t\tinvalid = false;\n\t\tfinished = false;\n\n\t\tleadingZero = false;\n\t\tinvalidBase8 = false;\n\n\t\tbetweenDigits = false;\n\t\tdecimalChar = false;\n\t\texponentChar = false;\n\n\t\tif (ch == '.' && strchr(digitList[BASE_10] + !betweenDigits, chPlus1) != nullptr) {\n\t\t\tdecimalPart = true;\n\t\t\tbetweenDigits = true;\n\t\t} else if (ch == '0' && (chPlus1 == 'b' || chPlus1 == 'B')) {\n\t\t\tbase = BASE_2;\n\t\t} else if (ch == '0' && (chPlus1 == 'o' || chPlus1 == 'O')) {\n\t\t\tbase = BASE_8;\n\t\t} else if (ch == '0' && (chPlus1 == 'x' || chPlus1 == 'X')) {\n\t\t\tbase = BASE_16;\n\t\t} else if (strchr(digitList[BASE_10] + !betweenDigits, ch) != nullptr) {\n\t\t\tleadingZero = ch == '0';\n\t\t\tbetweenDigits = true;\n\t\t\tcheck(chPlus1, chPlus2);\n\t\t\tif (finished && leadingZero) {\n\t\t\t\t// single zero should be base 10\n\t\t\t\tbase = BASE_10;\n\t\t\t}\n\t\t} else {\n\t\t\treturn false;\n\t\t}\n\t\treturn true;\n\t}\n\n\tbool check(int ch, int chPlus1) noexcept {\n\t\tif (strchr(digitList[base] + !betweenDigits, ch) != nullptr) {\n\t\t\tif (leadingZero) {\n\t\t\t\tinvalidBase8 = invalidBase8 || strchr(digitList[BASE_8] + !betweenDigits, ch) == nullptr;\n\t\t\t}\n\n\t\t\tbetweenDigits = ch != '_';\n\t\t\tdecimalChar = false;\n\t\t\texponentChar = false;\n\t\t} else if (ch == '_') {\n\t\t\tinvalid = true;\n\n\t\t\tbetweenDigits = false;\n\t\t\tdecimalChar = false;\n\t\t\t// exponentChar is unchanged\n\t\t} else if (base == BASE_10 && ch == '.' && (\n\t\t\t\t\t!(decimalPart || exponentPart) || strchr(digitList[BASE_10] + !betweenDigits, chPlus1) != nullptr)\n\t\t\t ) {\n\t\t\tinvalid = invalid || !betweenDigits || decimalPart || exponentPart;\n\t\t\tdecimalPart = true;\n\n\t\t\tbetweenDigits = false;\n\t\t\tdecimalChar = true;\n\t\t\texponentChar = false;\n\t\t} else if (base == BASE_10 && (ch == 'e' || ch == 'E')) {\n\t\t\tinvalid = invalid || !(betweenDigits || decimalChar) || exponentPart;\n\t\t\texponentPart = true;\n\n\t\t\tbetweenDigits = false;\n\t\t\tdecimalChar = false;\n\t\t\texponentChar = true;\n\t\t} else if (base == BASE_10 && (ch == '-' || ch == '+') && exponentChar) {\n\t\t\tinvalid = invalid || strchr(digitList[BASE_10] + !betweenDigits, chPlus1) == nullptr;\n\n\t\t\tbetweenDigits = false;\n\t\t\tdecimalChar = false;\n\t\t\t// exponentChar is unchanged\n\t\t} else if (IsPhpWordChar(ch)) {\n\t\t\tinvalid = true;\n\n\t\t\tbetweenDigits = false;\n\t\t\tdecimalChar = false;\n\t\t\texponentChar = false;\n\t\t} else {\n\t\t\tinvalid = invalid || !(betweenDigits || decimalChar);\n\t\t\tfinished = true;\n\t\t\tif (base == BASE_10 && leadingZero && !decimalPart && !exponentPart) {\n\t\t\t\tbase = BASE_8;\n\t\t\t\tinvalid = invalid || invalidBase8;\n\t\t\t}\n\t\t}\n\t\treturn finished;\n\t}\n};\n\nconstexpr bool isPHPStringState(int state) noexcept {\n\treturn\n\t (state == SCE_HPHP_HSTRING) ||\n\t (state == SCE_HPHP_SIMPLESTRING) ||\n\t (state == SCE_HPHP_HSTRING_VARIABLE) ||\n\t (state == SCE_HPHP_COMPLEX_VARIABLE);\n}\n\nconstexpr bool StyleNeedsBacktrack(int state) noexcept {\n\treturn InTagState(state) || isPHPStringState(state);\n}\n\nenum class AllowPHP : int {\n\tNone, // No PHP\n\tPHP, // short open tag\n\tEcho,// short echo tag\n\tPHP, // standard tag\n};\n\nInstructionTag segIsScriptInstruction(AllowPHP allowPHP, int state, const Accessor &styler, Sci_PositionU start, bool isXml) {\n\tconstexpr std::string_view phpTag = \"php\";\n\tconstexpr std::string_view xmlTag = \"xml\";\n\tconst std::string tag = styler.GetRangeLowered(start, start + phpTag.length());\n\tif (allowPHP != AllowPHP::None) {\n\t\t// Require {\n\texplicit OptionSetHTML(bool isPHPScript_) {\n\n\t\tDefineProperty(\"asp.default.language\", &OptionsHTML::aspDefaultLanguage,\n\t\t\t\"Script in ASP code is initially assumed to be in JavaScript. \"\n\t\t\t\"To change this to VBScript set asp.default.language to 2. Python is 3.\");\n\n\t\tDefineProperty(\"html.tags.case.sensitive\", &OptionsHTML::caseSensitive,\n\t\t\t\"For XML and HTML, setting this property to 1 will make tags match in a case \"\n\t\t\t\"sensitive way which is the expected behaviour for XML and XHTML.\");\n\n\t\tDefineProperty(\"lexer.xml.allow.scripts\", &OptionsHTML::allowScripts,\n\t\t\t\"Set to 0 to disable scripts in XML.\");\n\n\t\tDefineProperty(\"lexer.xml.allow.php\", &OptionsHTML::allowPHPinXML,\n\t\t\t\"Set to 0 to disable PHP in XML, 1 to accept '\",\n\t12, \"SCE_H_XMLSTART\", \"identifier\", \"XML identifier start ''\",\n\t14, \"SCE_H_SCRIPT\", \"error\", \"Internal state which should never be visible\",\n\t15, \"SCE_H_ASP\", \"preprocessor\", \"ASP <% ... %>\",\n\t16, \"SCE_H_ASPAT\", \"preprocessor\", \"ASP <% ... %>\",\n\t17, \"SCE_H_CDATA\", \"literal\", \"CDATA\",\n\t18, \"SCE_H_QUESTION\", \"preprocessor\", \"PHP\",\n\t19, \"SCE_H_VALUE\", \"literal string\", \"Unquoted values\",\n\t20, \"SCE_H_XCCOMMENT\", \"comment\", \"ASP.NET, JSP Comment <%-- ... --%>\",\n\t21, \"SCE_H_SGML_DEFAULT\", \"default\", \"SGML tags \",\n\t22, \"SCE_H_SGML_COMMAND\", \"preprocessor\", \"SGML command\",\n\t23, \"SCE_H_SGML_1ST_PARAM\", \"preprocessor\", \"SGML 1st param\",\n\t24, \"SCE_H_SGML_DOUBLESTRING\", \"literal string\", \"SGML double string\",\n\t25, \"SCE_H_SGML_SIMPLESTRING\", \"literal string\", \"SGML single string\",\n\t26, \"SCE_H_SGML_ERROR\", \"error\", \"SGML error\",\n\t27, \"SCE_H_SGML_SPECIAL\", \"literal\", \"SGML special (#XXXX type)\",\n\t28, \"SCE_H_SGML_ENTITY\", \"literal\", \"SGML entity\",\n\t29, \"SCE_H_SGML_COMMENT\", \"comment\", \"SGML comment\",\n\t30, \"SCE_H_SGML_1ST_PARAM_COMMENT\", \"error comment\", \"SGML first parameter - lexer internal. It is an error if any text is in this style.\",\n\t31, \"SCE_H_SGML_BLOCK_DEFAULT\", \"default\", \"SGML block\",\n\t32, \"\", \"predefined\", \"\",\n\t33, \"\", \"predefined\", \"\",\n\t34, \"\", \"predefined\", \"\",\n\t35, \"\", \"predefined\", \"\",\n\t36, \"\", \"predefined\", \"\",\n\t37, \"\", \"predefined\", \"\",\n\t38, \"\", \"predefined\", \"\",\n\t39, \"\", \"predefined\", \"\",\n\t40, \"SCE_HJ_START\", \"client javascript default\", \"JS Start - allows eol filled background to not start on same line as SCRIPT tag\",\n\t41, \"SCE_HJ_DEFAULT\", \"client javascript default\", \"JS Default\",\n\t42, \"SCE_HJ_COMMENT\", \"client javascript comment\", \"JS Comment\",\n\t43, \"SCE_HJ_COMMENTLINE\", \"client javascript comment line\", \"JS Line Comment\",\n\t44, \"SCE_HJ_COMMENTDOC\", \"client javascript comment documentation\", \"JS Doc comment\",\n\t45, \"SCE_HJ_NUMBER\", \"client javascript literal numeric\", \"JS Number\",\n\t46, \"SCE_HJ_WORD\", \"client javascript identifier\", \"JS Word\",\n\t47, \"SCE_HJ_KEYWORD\", \"client javascript keyword\", \"JS Keyword\",\n\t48, \"SCE_HJ_DOUBLESTRING\", \"client javascript literal string\", \"JS Double quoted string\",\n\t49, \"SCE_HJ_SINGLESTRING\", \"client javascript literal string\", \"JS Single quoted string\",\n\t50, \"SCE_HJ_SYMBOLS\", \"client javascript operator\", \"JS Symbols\",\n\t51, \"SCE_HJ_STRINGEOL\", \"client javascript error literal string\", \"JavaScript EOL\",\n\t52, \"SCE_HJ_REGEX\", \"client javascript literal regex\", \"JavaScript RegEx\",\n\t53, \"SCE_HJ_TEMPLATELITERAL\", \"client javascript literal template\", \"JS Template Literal\",\n\t54, \"\", \"unused\", \"\",\n\t55, \"SCE_HJA_START\", \"server javascript default\", \"JS Start - allows eol filled background to not start on same line as SCRIPT tag\",\n\t56, \"SCE_HJA_DEFAULT\", \"server javascript default\", \"JS Default\",\n\t57, \"SCE_HJA_COMMENT\", \"server javascript comment\", \"JS Comment\",\n\t58, \"SCE_HJA_COMMENTLINE\", \"server javascript comment line\", \"JS Line Comment\",\n\t59, \"SCE_HJA_COMMENTDOC\", \"server javascript comment documentation\", \"JS Doc comment\",\n\t60, \"SCE_HJA_NUMBER\", \"server javascript literal numeric\", \"JS Number\",\n\t61, \"SCE_HJA_WORD\", \"server javascript identifier\", \"JS Word\",\n\t62, \"SCE_HJA_KEYWORD\", \"server javascript keyword\", \"JS Keyword\",\n\t63, \"SCE_HJA_DOUBLESTRING\", \"server javascript literal string\", \"JS Double quoted string\",\n\t64, \"SCE_HJA_SINGLESTRING\", \"server javascript literal string\", \"JS Single quoted string\",\n\t65, \"SCE_HJA_SYMBOLS\", \"server javascript operator\", \"JS Symbols\",\n\t66, \"SCE_HJA_STRINGEOL\", \"server javascript error literal string\", \"JavaScript EOL\",\n\t67, \"SCE_HJA_REGEX\", \"server javascript literal regex\", \"JavaScript RegEx\",\n\t68, \"SCE_HJA_TEMPLATELITERAL\", \"server javascript literal template\", \"JS Template Literal\",\n\t69, \"\", \"unused\", \"\",\n\t70, \"SCE_HB_START\", \"client basic default\", \"Start\",\n\t71, \"SCE_HB_DEFAULT\", \"client basic default\", \"Default\",\n\t72, \"SCE_HB_COMMENTLINE\", \"client basic comment line\", \"Comment\",\n\t73, \"SCE_HB_NUMBER\", \"client basic literal numeric\", \"Number\",\n\t74, \"SCE_HB_WORD\", \"client basic keyword\", \"KeyWord\",\n\t75, \"SCE_HB_STRING\", \"client basic literal string\", \"String\",\n\t76, \"SCE_HB_IDENTIFIER\", \"client basic identifier\", \"Identifier\",\n\t77, \"SCE_HB_STRINGEOL\", \"client basic literal string\", \"Unterminated string\",\n\t78, \"\", \"unused\", \"\",\n\t79, \"\", \"unused\", \"\",\n\t80, \"SCE_HBA_START\", \"server basic default\", \"Start\",\n\t81, \"SCE_HBA_DEFAULT\", \"server basic default\", \"Default\",\n\t82, \"SCE_HBA_COMMENTLINE\", \"server basic comment line\", \"Comment\",\n\t83, \"SCE_HBA_NUMBER\", \"server basic literal numeric\", \"Number\",\n\t84, \"SCE_HBA_WORD\", \"server basic keyword\", \"KeyWord\",\n\t85, \"SCE_HBA_STRING\", \"server basic literal string\", \"String\",\n\t86, \"SCE_HBA_IDENTIFIER\", \"server basic identifier\", \"Identifier\",\n\t87, \"SCE_HBA_STRINGEOL\", \"server basic literal string\", \"Unterminated string\",\n\t88, \"\", \"unused\", \"\",\n\t89, \"\", \"unused\", \"\",\n\t90, \"SCE_HP_START\", \"client python default\", \"Embedded Python\",\n\t91, \"SCE_HP_DEFAULT\", \"client python default\", \"Embedded Python\",\n\t92, \"SCE_HP_COMMENTLINE\", \"client python comment line\", \"Comment\",\n\t93, \"SCE_HP_NUMBER\", \"client python literal numeric\", \"Number\",\n\t94, \"SCE_HP_STRING\", \"client python literal string\", \"String\",\n\t95, \"SCE_HP_CHARACTER\", \"client python literal string character\", \"Single quoted string\",\n\t96, \"SCE_HP_WORD\", \"client python keyword\", \"Keyword\",\n\t97, \"SCE_HP_TRIPLE\", \"client python literal string\", \"Triple quotes\",\n\t98, \"SCE_HP_TRIPLEDOUBLE\", \"client python literal string\", \"Triple double quotes\",\n\t99, \"SCE_HP_CLASSNAME\", \"client python identifier\", \"Class name definition\",\n\t100, \"SCE_HP_DEFNAME\", \"client python identifier\", \"Function or method name definition\",\n\t101, \"SCE_HP_OPERATOR\", \"client python operator\", \"Operators\",\n\t102, \"SCE_HP_IDENTIFIER\", \"client python identifier\", \"Identifiers\",\n\t103, \"\", \"unused\", \"\",\n\t104, \"SCE_HPHP_COMPLEX_VARIABLE\", \"server php identifier\", \"PHP complex variable\",\n\t105, \"SCE_HPA_START\", \"server python default\", \"ASP Python\",\n\t106, \"SCE_HPA_DEFAULT\", \"server python default\", \"ASP Python\",\n\t107, \"SCE_HPA_COMMENTLINE\", \"server python comment line\", \"Comment\",\n\t108, \"SCE_HPA_NUMBER\", \"server python literal numeric\", \"Number\",\n\t109, \"SCE_HPA_STRING\", \"server python literal string\", \"String\",\n\t110, \"SCE_HPA_CHARACTER\", \"server python literal string character\", \"Single quoted string\",\n\t111, \"SCE_HPA_WORD\", \"server python keyword\", \"Keyword\",\n\t112, \"SCE_HPA_TRIPLE\", \"server python literal string\", \"Triple quotes\",\n\t113, \"SCE_HPA_TRIPLEDOUBLE\", \"server python literal string\", \"Triple double quotes\",\n\t114, \"SCE_HPA_CLASSNAME\", \"server python identifier\", \"Class name definition\",\n\t115, \"SCE_HPA_DEFNAME\", \"server python identifier\", \"Function or method name definition\",\n\t116, \"SCE_HPA_OPERATOR\", \"server python operator\", \"Operators\",\n\t117, \"SCE_HPA_IDENTIFIER\", \"server python identifier\", \"Identifiers\",\n\t118, \"SCE_HPHP_DEFAULT\", \"server php default\", \"Default\",\n\t119, \"SCE_HPHP_HSTRING\", \"server php literal string\", \"Double quoted String\",\n\t120, \"SCE_HPHP_SIMPLESTRING\", \"server php literal string\", \"Single quoted string\",\n\t121, \"SCE_HPHP_WORD\", \"server php keyword\", \"Keyword\",\n\t122, \"SCE_HPHP_NUMBER\", \"server php literal numeric\", \"Number\",\n\t123, \"SCE_HPHP_VARIABLE\", \"server php identifier\", \"Variable\",\n\t124, \"SCE_HPHP_COMMENT\", \"server php comment\", \"Comment\",\n\t125, \"SCE_HPHP_COMMENTLINE\", \"server php comment line\", \"One line comment\",\n\t126, \"SCE_HPHP_HSTRING_VARIABLE\", \"server php literal string identifier\", \"PHP variable in double quoted string\",\n\t127, \"SCE_HPHP_OPERATOR\", \"server php operator\", \"PHP operator\",\n};\n\nconst LexicalClass lexicalClassesXML[] = {\n\t// Lexer.Secondary XML SCLEX_XML SCE_H_:\n\t0, \"SCE_H_DEFAULT\", \"default\", \"Default\",\n\t1, \"SCE_H_TAG\", \"tag\", \"Tags\",\n\t2, \"SCE_H_TAGUNKNOWN\", \"error tag\", \"Unknown Tags\",\n\t3, \"SCE_H_ATTRIBUTE\", \"attribute\", \"Attributes\",\n\t4, \"SCE_H_ATTRIBUTEUNKNOWN\", \"error attribute\", \"Unknown Attributes\",\n\t5, \"SCE_H_NUMBER\", \"literal numeric\", \"Numbers\",\n\t6, \"SCE_H_DOUBLESTRING\", \"literal string\", \"Double quoted strings\",\n\t7, \"SCE_H_SINGLESTRING\", \"literal string\", \"Single quoted strings\",\n\t8, \"SCE_H_OTHER\", \"tag operator\", \"Other inside tag, including space and '='\",\n\t9, \"SCE_H_COMMENT\", \"comment\", \"Comment\",\n\t10, \"SCE_H_ENTITY\", \"literal\", \"Entities\",\n\t11, \"SCE_H_TAGEND\", \"tag\", \"XML style tag ends '/>'\",\n\t12, \"SCE_H_XMLSTART\", \"identifier\", \"XML identifier start ''\",\n\t14, \"\", \"unused\", \"\",\n\t15, \"\", \"unused\", \"\",\n\t16, \"\", \"unused\", \"\",\n\t17, \"SCE_H_CDATA\", \"literal\", \"CDATA\",\n\t18, \"SCE_H_QUESTION\", \"preprocessor\", \"Question\",\n\t19, \"SCE_H_VALUE\", \"literal string\", \"Unquoted Value\",\n\t20, \"\", \"unused\", \"\",\n\t21, \"SCE_H_SGML_DEFAULT\", \"default\", \"SGML tags \",\n\t22, \"SCE_H_SGML_COMMAND\", \"preprocessor\", \"SGML command\",\n\t23, \"SCE_H_SGML_1ST_PARAM\", \"preprocessor\", \"SGML 1st param\",\n\t24, \"SCE_H_SGML_DOUBLESTRING\", \"literal string\", \"SGML double string\",\n\t25, \"SCE_H_SGML_SIMPLESTRING\", \"literal string\", \"SGML single string\",\n\t26, \"SCE_H_SGML_ERROR\", \"error\", \"SGML error\",\n\t27, \"SCE_H_SGML_SPECIAL\", \"literal\", \"SGML special (#XXXX type)\",\n\t28, \"SCE_H_SGML_ENTITY\", \"literal\", \"SGML entity\",\n\t29, \"SCE_H_SGML_COMMENT\", \"comment\", \"SGML comment\",\n\t30, \"\", \"unused\", \"\",\n\t31, \"SCE_H_SGML_BLOCK_DEFAULT\", \"default\", \"SGML block\",\n};\n\nconst char * const tagsThatDoNotFold[] = {\n\t\"area\",\n\t\"base\",\n\t\"basefont\",\n\t\"br\",\n\t\"col\",\n\t\"command\",\n\t\"embed\",\n\t\"frame\",\n\t\"hr\",\n\t\"img\",\n\t\"input\",\n\t\"isindex\",\n\t\"keygen\",\n\t\"link\",\n\t\"meta\",\n\t\"param\",\n\t\"source\",\n\t\"track\",\n\t\"wbr\"\n};\n\n}\n\nclass LexerHTML : public DefaultLexer {\n\tbool isXml;\n\tbool isPHPScript;\n\tWordList keywordsHTML;\n\tWordList keywordsJS;\n\tWordList keywordsVB;\n\tWordList keywordsPy;\n\tWordList keywordsPHP;\n\tWordList keywordsSGML; // SGML (DTD) keywords\n\tOptionsHTML options;\n\tOptionSetHTML osHTML;\n\tstd::set nonFoldingTags;\n\tSubStyles subStyles{styleSubable,SubStylesHTML,SubStylesAvailable,0};\npublic:\n\texplicit LexerHTML(bool isXml_, bool isPHPScript_) :\n\t\tDefaultLexer(\n\t\t\tisXml_ ? \"xml\" : (isPHPScript_ ? \"phpscript\" : \"hypertext\"),\n\t\t\tisXml_ ? SCLEX_XML : (isPHPScript_ ? SCLEX_PHPSCRIPT : SCLEX_HTML),\n\t\t\tisXml_ ? lexicalClassesXML : lexicalClassesHTML,\n\t\t\tisXml_ ? std::size(lexicalClassesXML) : std::size(lexicalClassesHTML)),\n\t\tisXml(isXml_),\n\t\tisPHPScript(isPHPScript_),\n\t\tosHTML(isPHPScript_),\n\t\tnonFoldingTags(std::begin(tagsThatDoNotFold), std::end(tagsThatDoNotFold)) {\n\t}\n\t~LexerHTML() override {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn osHTML.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osHTML.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osHTML.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osHTML.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn osHTML.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\t// No Fold as all folding performs in Lex.\n\n\tint SCI_METHOD AllocateSubStyles(int styleBase, int numberStyles) override {\n\t\treturn subStyles.Allocate(styleBase, numberStyles);\n\t}\n\tint SCI_METHOD SubStylesStart(int styleBase) override {\n\t\treturn subStyles.Start(styleBase);\n\t}\n\tint SCI_METHOD SubStylesLength(int styleBase) override {\n\t\treturn subStyles.Length(styleBase);\n\t}\n\tint SCI_METHOD StyleFromSubStyle(int subStyle) override {\n\t\tconst int styleBase = subStyles.BaseStyle(subStyle);\n\t\treturn styleBase;\n\t}\n\tint SCI_METHOD PrimaryStyleFromStyle(int style) override {\n\t\treturn style;\n\t}\n\tvoid SCI_METHOD FreeSubStyles() override {\n\t\tsubStyles.Free();\n\t}\n\tvoid SCI_METHOD SetIdentifiers(int style, const char *identifiers) override {\n\t\tconst int styleBase = subStyles.BaseStyle(style);\n\t\tconst bool lowerCase = AnyOf(styleBase, SCE_H_TAG, SCE_H_ATTRIBUTE, SCE_HB_WORD);\n\t\tsubStyles.SetIdentifiers(style, identifiers, lowerCase);\n\t}\n\tint SCI_METHOD DistanceToSecondaryStyles() override {\n\t\treturn 0;\n\t}\n\tconst char *SCI_METHOD GetSubStyleBases() override {\n\t\treturn styleSubable;\n\t}\n\n\tstatic ILexer5 *LexerFactoryHTML() {\n\t\treturn new LexerHTML(false, false);\n\t}\n\tstatic ILexer5 *LexerFactoryXML() {\n\t\treturn new LexerHTML(true, false);\n\t}\n\tstatic ILexer5 *LexerFactoryPHPScript() {\n\t\treturn new LexerHTML(false, true);\n\t}\n};\n\nSci_Position SCI_METHOD LexerHTML::PropertySet(const char *key, const char *val) {\n\tif (osHTML.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerHTML::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tbool lowerCase = false;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywordsHTML;\n\t\tlowerCase = true;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywordsJS;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywordsVB;\n\t\tlowerCase = true;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywordsPy;\n\t\tbreak;\n\tcase 4:\n\t\twordListN = &keywordsPHP;\n\t\tbreak;\n\tcase 5:\n\t\twordListN = &keywordsSGML;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl, lowerCase)) {\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nvoid SCI_METHOD LexerHTML::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tAccessor styler(pAccess, nullptr);\n\n\tconst WordClassifier &classifierTags = subStyles.Classifier(SCE_H_TAG);\n\tconst WordClassifier &classifierAttributes = subStyles.Classifier(SCE_H_ATTRIBUTE);\n\tconst WordClassifier &classifierJavaScript = subStyles.Classifier(SCE_HJ_WORD);\n\tconst WordClassifier &classifierJavaScriptServer = subStyles.Classifier(SCE_HJA_WORD);\n\tconst WordClassifier &classifierBasic = subStyles.Classifier(SCE_HB_WORD);\n\tconst WordClassifier &classifierPython = subStyles.Classifier(SCE_HP_WORD);\n\tconst WordClassifier &classifierPHP = subStyles.Classifier(SCE_HPHP_WORD);\n\n\tif (isPHPScript && (startPos == 0)) {\n\t\tinitStyle = SCE_HPHP_DEFAULT;\n\t}\n\tstd::string lastTag;\n\tstd::string prevWord;\n\tPhpNumberState phpNumber;\n\tstd::string phpStringDelimiter;\n\tint StateToPrint = initStyle;\n\tint state = stateForPrintState(StateToPrint);\n\tstd::string makoBlockType;\n\tint makoComment = 0;\n\tstd::string djangoBlockType;\n\t// If inside a tag, it may be a script tag, so reread from the start of line starting tag to ensure any language tags are seen\n\t// PHP string can be heredoc, must find a delimiter first. Reread from beginning of line containing the string, to get the correct lineState\n\tif (StyleNeedsBacktrack(state)) {\n\t\twhile ((startPos > 0) && (StyleNeedsBacktrack(styler.StyleIndexAt(startPos - 1)))) {\n\t\t\tconst Sci_Position backLineStart = styler.LineStart(styler.GetLine(startPos-1));\n\t\t\tlength += startPos - backLineStart;\n\t\t\tstartPos = backLineStart;\n\t\t}\n\t\tif (startPos > 0) {\n\t\t\tstate = styler.StyleIndexAt(startPos - 1);\n\t\t} else {\n\t\t\tstate = isPHPScript ? SCE_HPHP_DEFAULT : SCE_H_DEFAULT;\n\t\t}\n\t}\n\tstyler.StartAt(startPos);\n\n\t/* Nothing handles getting out of these, so we need not start in any of them.\n\t * As we're at line start and they can't span lines, we'll re-detect them anyway */\n\tswitch (state) {\n\t\tcase SCE_H_QUESTION:\n\t\tcase SCE_H_XMLSTART:\n\t\tcase SCE_H_XMLEND:\n\t\tcase SCE_H_ASP:\n\t\t\tstate = SCE_H_DEFAULT;\n\t\t\tbreak;\n\t\tdefault:\n\t\t\tbreak;\n\t}\n\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint lineState;\n\tif (lineCurrent > 0) {\n\t\tlineState = styler.GetLineState(lineCurrent-1);\n\t} else {\n\t\t// Default client and ASP scripting language is JavaScript\n\t\tlineState = eScriptJS << 8;\n\t\tlineState |= options.aspDefaultLanguage << 4;\n\t}\n\tscript_mode inScriptType = static_cast((lineState >> 0) & 0x03); // 2 bits of scripting mode\n\n\tbool tagOpened = (lineState >> 2) & 0x01; // 1 bit to know if we are in an opened tag\n\tbool tagClosing = (lineState >> 3) & 0x01; // 1 bit to know if we are in a closing tag\n\tbool tagDontFold = false; //some HTML tags should not be folded\n\tscript_type aspScript = static_cast((lineState >> 4) & 0x0F); // 4 bits of script name\n\tscript_type clientScript = static_cast((lineState >> 8) & 0x0F); // 4 bits of script name\n\tint beforePreProc = (lineState >> 12) & 0xFF; // 8 bits of state\n\tbool isLanguageType = (lineState >> 20) & 1; // type or language attribute for script tag\n\tint sgmlBlockLevel = (lineState >> 21);\n\n\tscript_type scriptLanguage = ScriptOfState(state);\n\t// If eNonHtmlScript coincides with SCE_H_COMMENT, assume eScriptComment\n\tif (inScriptType == eNonHtmlScript && state == SCE_H_COMMENT) {\n\t\tscriptLanguage = eScriptComment;\n\t}\n\tscript_type beforeLanguage = ScriptOfState(beforePreProc);\n\tconst bool foldHTML = options.foldHTML;\n\tconst bool fold = foldHTML && options.fold;\n\tconst bool foldHTMLPreprocessor = foldHTML && options.foldHTMLPreprocessor;\n\tconst bool foldCompact = options.foldCompact;\n\tconst bool foldComment = fold && options.foldComment;\n\tconst bool foldHeredoc = fold && options.foldHeredoc;\n\tconst bool foldXmlAtTagOpen = isXml && fold && options.foldXmlAtTagOpen;\n\tconst bool caseSensitive = options.caseSensitive;\n\tconst bool allowScripts = options.allowScripts;\n\tconst AllowPHP allowPHP = isXml ? options.allowPHPinXML : options.allowPHPinHTML;\n\tconst bool isMako = options.isMako;\n\tconst bool isDjango = options.isDjango;\n\tconst bool allowASP = (isXml ? options.allowASPinXML : options.allowASPinHTML) && !isMako && !isDjango;\n\tconst CharacterSet setHTMLWord(CharacterSet::setAlphaNum, \".-_:!#\", true);\n\tconst CharacterSet setTagContinue(CharacterSet::setAlphaNum, \".-_:!#[\", true);\n\tconst CharacterSet setAttributeContinue(CharacterSet::setAlphaNum, \".-_:!#/\", true);\n\t// TODO: also handle + and - (except if they're part of ++ or --) and return keywords\n\tconst CharacterSet setOKBeforeJSRE(CharacterSet::setNone, \"([{=,:;!%^&*|?~> \");\n\t// Only allow [A-Za-z0-9.#-_:] in entities\n\tconst CharacterSet setEntity(CharacterSet::setAlphaNum, \".#-_:\");\n\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tSci_Position visibleChars = 0;\n\tint lineStartVisibleChars = 0;\n\n\tint chPrev = ' ';\n\tint ch = ' ';\n\tint chPrevNonWhite = ' ';\n\t// look back to set chPrevNonWhite properly for better regex colouring\n\tif (scriptLanguage == eScriptJS && startPos > 0) {\n\t\tSci_Position back = startPos;\n\t\tint style = 0;\n\t\twhile (--back) {\n\t\t\tstyle = styler.StyleIndexAt(back);\n\t\t\tif (style < SCE_HJ_DEFAULT || style > SCE_HJ_COMMENTDOC)\n\t\t\t\t// includes SCE_HJ_COMMENT & SCE_HJ_COMMENTLINE\n\t\t\t\tbreak;\n\t\t}\n\t\tif (style == SCE_HJ_SYMBOLS) {\n\t\t\tchPrevNonWhite = SafeGetUnsignedCharAt(styler, back);\n\t\t}\n\t}\n\n\tstyler.StartSegment(startPos);\n\tconst Sci_Position lengthDoc = startPos + length;\n\tfor (Sci_Position i = startPos; i < lengthDoc; i++) {\n\t\tconst int chPrev2 = chPrev;\n\t\tchPrev = ch;\n\t\tif (!IsASpace(ch) && state != SCE_HJ_COMMENT &&\n\t\t\tstate != SCE_HJ_COMMENTLINE && state != SCE_HJ_COMMENTDOC)\n\t\t\tchPrevNonWhite = ch;\n\t\tch = static_cast(styler[i]);\n\t\tint chNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\tconst int chNext2 = SafeGetUnsignedCharAt(styler, i + 2);\n\n\t\t// Handle DBCS codepages\n\t\tif (styler.IsLeadByte(static_cast(ch))) {\n\t\t\tchPrev = ' ';\n\t\t\ti += 1;\n\t\t\tcontinue;\n\t\t}\n\n\t\tif ((!IsASpace(ch) || !foldCompact) && fold)\n\t\t\tvisibleChars++;\n\t\tif (!IsASpace(ch))\n\t\t\tlineStartVisibleChars++;\n\n\t\t// decide what is the current state to print (depending of the script tag)\n\t\tStateToPrint = statePrintForState(state, inScriptType);\n\n\t\t// handle script folding\n\t\tif (fold) {\n\t\t\tswitch (scriptLanguage) {\n\t\t\tcase eScriptJS:\n\t\t\tcase eScriptPHP:\n\t\t\t\t//not currently supported\t\t\t\tcase eScriptVBS:\n\n\t\t\t\tif (!AnyOf(state, SCE_HPHP_COMMENT, SCE_HPHP_COMMENTLINE, SCE_HJ_COMMENT, SCE_HJ_COMMENTLINE, SCE_HJ_COMMENTDOC) &&\n\t\t\t\t !isStringState(state)) {\n\t\t\t\t//Platform::DebugPrintf(\"state=%d, StateToPrint=%d, initStyle=%d\\n\", state, StateToPrint, initStyle);\n\t\t\t\t//if ((state == SCE_HPHP_OPERATOR) || (state == SCE_HPHP_DEFAULT) || (state == SCE_HJ_SYMBOLS) || (state == SCE_HJ_START) || (state == SCE_HJ_DEFAULT)) {\n\t\t\t\t\tif (ch == '#') {\n\t\t\t\t\t\tSci_Position j = i + 1;\n\t\t\t\t\t\twhile ((j < lengthDoc) && IsASpaceOrTab(styler.SafeGetCharAt(j))) {\n\t\t\t\t\t\t\tj++;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tif (styler.Match(j, \"region\") || styler.Match(j, \"if\")) {\n\t\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t\t} else if (styler.Match(j, \"end\")) {\n\t\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\t}\n\t\t\t\t\t} else if ((ch == '{') || (ch == '}') || (foldComment && (ch == '/') && (chNext == '*'))) {\n\t\t\t\t\t\tlevelCurrent += (((ch == '{') || (ch == '/')) ? 1 : -1);\n\t\t\t\t\t}\n\t\t\t\t} else if (((state == SCE_HPHP_COMMENT) || (state == SCE_HJ_COMMENT || state == SCE_HJ_COMMENTDOC)) && foldComment && (ch == '*') && (chNext == '/')) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase eScriptPython:\n\t\t\t\tif (state != SCE_HP_COMMENTLINE && !isMako) {\n\t\t\t\t\tif ((ch == ':') && ((chNext == '\\n') || (chNext == '\\r' && chNext2 == '\\n'))) {\n\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t} else if ((ch == '\\n') && !((chNext == '\\r') && (chNext2 == '\\n')) && (chNext != '\\n')) {\n\t\t\t\t\t\t// check if the number of tabs is lower than the level\n\t\t\t\t\t\tconstexpr int tabWidth = 8;\n\t\t\t\t\t\tint Findlevel = (levelCurrent & ~SC_FOLDLEVELBASE) * tabWidth;\n\t\t\t\t\t\tfor (Sci_Position j = 0; Findlevel > 0; j++) {\n\t\t\t\t\t\t\tconst char chTmp = styler.SafeGetCharAt(i + j + 1);\n\t\t\t\t\t\t\tif (chTmp == '\\t') {\n\t\t\t\t\t\t\t\tFindlevel -= tabWidth;\n\t\t\t\t\t\t\t} else if (chTmp == ' ') {\n\t\t\t\t\t\t\t\tFindlevel--;\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\tif (Findlevel > 0) {\n\t\t\t\t\t\t\tlevelCurrent -= Findlevel / tabWidth;\n\t\t\t\t\t\t\tif (Findlevel % tabWidth)\n\t\t\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tdefault:\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\n\t\tif ((ch == '\\r' && chNext != '\\n') || (ch == '\\n')) {\n\t\t\t// Trigger on CR only (Mac style) or either on LF from CR+LF (Dos/Win) or on LF alone (Unix)\n\t\t\t// Avoid triggering two times on Dos/Win\n\t\t\t// New line -> record any line state onto /next/ line\n\t\t\tif (fold) {\n\t\t\t\tint lev = levelPrev;\n\t\t\t\tif (visibleChars == 0)\n\t\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t\tvisibleChars = 0;\n\t\t\t\tlevelPrev = levelCurrent;\n\t\t\t}\n\t\t\tstyler.SetLineState(lineCurrent,\n\t\t\t ((inScriptType & 0x03) << 0) |\n\t\t\t ((tagOpened ? 1 : 0) << 2) |\n\t\t\t ((tagClosing ? 1 : 0) << 3) |\n\t\t\t ((aspScript & 0x0F) << 4) |\n\t\t\t ((clientScript & 0x0F) << 8) |\n\t\t\t ((beforePreProc & 0xFF) << 12) |\n\t\t\t ((isLanguageType ? 1 : 0) << 20) |\n\t\t\t (sgmlBlockLevel << 21));\n\t\t\tlineCurrent++;\n\t\t\tlineStartVisibleChars = 0;\n\t\t}\n\n\t\t// handle start of Mako comment line\n\t\tif (isMako && ch == '#' && chNext == '#') {\n\t\t\tmakoComment = 1;\n\t\t\tstate = SCE_HP_COMMENTLINE;\n\t\t}\n\n\t\t// handle end of Mako comment line\n\t\telse if (isMako && makoComment && (ch == '\\r' || ch == '\\n')) {\n\t\t\tmakoComment = 0;\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\tif (scriptLanguage == eScriptPython) {\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t} else {\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t}\n\t\t}\n\t\t// Allow falling through to mako handling code if newline is going to end a block\n\t\tif (((ch == '\\r' && chNext != '\\n') || (ch == '\\n')) &&\n\t\t\t(!isMako || (makoBlockType != \"%\"))) {\n\t\t}\n\t\t// Ignore everything in mako comment until the line ends\n\t\telse if (isMako && makoComment) {\n\t\t}\n\n\t\t// generic end of script processing\n\t\telse if ((inScriptType == eNonHtmlScript) && (ch == '<') && (chNext == '/')) {\n\t\t\t// Check if it's the end of the script tag (or any other HTML tag)\n\t\t\tswitch (state) {\n\t\t\t\t// in these cases, you can embed HTML tags (to confirm !!!!!!!!!!!!!!!!!!!!!!)\n\t\t\tcase SCE_H_DOUBLESTRING:\n\t\t\tcase SCE_H_SINGLESTRING:\n\t\t\tcase SCE_HJ_COMMENT:\n\t\t\tcase SCE_HJ_COMMENTDOC:\n\t\t\t//case SCE_HJ_COMMENTLINE: // removed as this is a common thing done to hide\n\t\t\t// the end of script marker from some JS interpreters.\n\t\t\t//case SCE_HB_COMMENTLINE:\n\t\t\tcase SCE_HBA_COMMENTLINE:\n\t\t\tcase SCE_HJ_DOUBLESTRING:\n\t\t\tcase SCE_HJ_SINGLESTRING:\n\t\t\tcase SCE_HJ_REGEX:\n\t\t\tcase SCE_HJ_TEMPLATELITERAL:\n\t\t\tcase SCE_HB_STRING:\n\t\t\tcase SCE_HBA_STRING:\n\t\t\tcase SCE_HP_STRING:\n\t\t\tcase SCE_HP_TRIPLE:\n\t\t\tcase SCE_HP_TRIPLEDOUBLE:\n\t\t\tcase SCE_HPHP_HSTRING:\n\t\t\tcase SCE_HPHP_SIMPLESTRING:\n\t\t\tcase SCE_HPHP_COMMENT:\n\t\t\tcase SCE_HPHP_COMMENTLINE:\n\t\t\t\tbreak;\n\t\t\tdefault :\n\t\t\t\t// check if the closing tag is a script tag\n\t\t\t\tif (const char *tag =\n\t\t\t\t\t\t(state == SCE_HJ_COMMENTLINE || state == SCE_HB_COMMENTLINE || isXml) ? \"script\" :\n\t\t\t\t\t\tstate == SCE_H_COMMENT ? \"comment\" : nullptr) {\n\t\t\t\t\tSci_Position j = i + 2;\n\t\t\t\t\tint chr;\n\t\t\t\t\tdo {\n\t\t\t\t\t\tchr = static_cast(*tag++);\n\t\t\t\t\t} while (chr != 0 && chr == MakeLowerCase(styler.SafeGetCharAt(j++)));\n\t\t\t\t\tif (chr != 0) break;\n\t\t\t\t}\n\t\t\t\t// closing tag of the script (it's a closing HTML tag anyway)\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_TAGUNKNOWN;\n\t\t\t\tinScriptType = eHtml;\n\t\t\t\tscriptLanguage = eScriptNone;\n\t\t\t\tclientScript = eScriptJS;\n\t\t\t\tisLanguageType = false;\n\t\t\t\ti += 2;\n\t\t\t\tvisibleChars += 2;\n\t\t\t\ttagClosing = true;\n\t\t\t\tif (foldXmlAtTagOpen) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t/////////////////////////////////////\n\t\t// handle the start of PHP pre-processor = Non-HTML\n\t\telse if ((ch == '<') && (chNext == '?') && !IsPHPScriptState(state)) {\n \t\t\tconst InstructionTag tag = segIsScriptInstruction(allowPHP, state, styler, i + 2, isXml);\n \t\t\tif (tag != InstructionTag::None) {\n\t\t\t\tbeforeLanguage = scriptLanguage;\n\t\t\t\tscriptLanguage = (tag == InstructionTag::XML) ? eScriptXML : eScriptPHP;\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tbeforePreProc = state;\n\t\t\t\ti++;\n\t\t\t\tvisibleChars++;\n\t\t\t\tif (tag >= InstructionTag::Echo) {\n\t\t\t\t\ti += (tag == InstructionTag::Echo) ? 1 : 3;\n\t\t\t\t}\n\t\t\t\tif (scriptLanguage == eScriptXML)\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_XMLSTART);\n\t\t\t\telse\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_QUESTION);\n\t\t\t\tstate = StateForScript(scriptLanguage);\n\t\t\t\tif (inScriptType == eNonHtmlScript)\n\t\t\t\t\tinScriptType = eNonHtmlScriptPreProc;\n\t\t\t\telse\n\t\t\t\t\tinScriptType = eNonHtmlPreProc;\n\t\t\t\t// Fold whole script, but not if the XML first tag (all XML-like tags in this case)\n\t\t\t\tif (foldHTMLPreprocessor && (scriptLanguage != eScriptXML)) {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t}\n\t\t\t\t// should be better\n\t\t\t\tch = SafeGetUnsignedCharAt(styler, i);\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// handle the start Mako template Python code\n\t\telse if (isMako && scriptLanguage == eScriptNone && ((ch == '<' && chNext == '%') ||\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t (lineStartVisibleChars == 1 && ch == '%') ||\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t (lineStartVisibleChars == 1 && ch == '/' && chNext == '%') ||\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t (ch == '$' && chNext == '{') ||\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t (ch == '<' && chNext == '/' && chNext2 == '%'))) {\n\t\t\tif (ch == '%' || ch == '/')\n\t\t\t\tmakoBlockType = \"%\";\n\t\t\telse if (ch == '$')\n\t\t\t\tmakoBlockType = \"{\";\n\t\t\telse if (chNext == '/')\n\t\t\t\tmakoBlockType = GetNextWord(styler, i+3);\t// Tag end: \n\t\t\telse\n\t\t\t\tmakoBlockType = GetNextWord(styler, i+2);\t// Tag: <%tag...>\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\tbeforePreProc = state;\n\t\t\tif (inScriptType == eNonHtmlScript)\n\t\t\t\tinScriptType = eNonHtmlScriptPreProc;\n\t\t\telse\n\t\t\t\tinScriptType = eNonHtmlPreProc;\n\n\t\t\tif (chNext == '/') {\n\t\t\t\ti += 2;\n\t\t\t\tvisibleChars += 2;\n\t\t\t} else if (ch != '%') {\n\t\t\t\ti++;\n\t\t\t\tvisibleChars++;\n\t\t\t}\n\t\t\tstate = SCE_HP_START;\n\t\t\tscriptLanguage = eScriptPython;\n\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\tif (ch != '%' && ch != '$' && ch != '/') {\n\t\t\t\ti += makoBlockType.length();\n\t\t\t\tvisibleChars += makoBlockType.length();\n\t\t\t\tif (keywordsPy.InList(makoBlockType))\n\t\t\t\t\tstyler.ColourTo(i, SCE_HP_WORD);\n\t\t\t\telse\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_TAGUNKNOWN);\n\t\t\t}\n\n\t\t\tch = SafeGetUnsignedCharAt(styler, i);\n\t\t\tcontinue;\n\t\t}\n\n\t\t// handle the start/end of Django comment\n\t\telse if (isDjango && state != SCE_H_COMMENT && (ch == '{' && chNext == '#')) {\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\tbeforePreProc = state;\n\t\t\tbeforeLanguage = scriptLanguage;\n\t\t\tif (inScriptType == eNonHtmlScript)\n\t\t\t\tinScriptType = eNonHtmlScriptPreProc;\n\t\t\telse\n\t\t\t\tinScriptType = eNonHtmlPreProc;\n\t\t\ti += 1;\n\t\t\tvisibleChars += 1;\n\t\t\tscriptLanguage = eScriptComment;\n\t\t\tstate = SCE_H_COMMENT;\n\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\tch = SafeGetUnsignedCharAt(styler, i);\n\t\t\tcontinue;\n\t\t} else if (isDjango && state == SCE_H_COMMENT && (ch == '#' && chNext == '}')) {\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\ti += 1;\n\t\t\tvisibleChars += 1;\n\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\tstate = beforePreProc;\n\t\t\tif (inScriptType == eNonHtmlScriptPreProc)\n\t\t\t\tinScriptType = eNonHtmlScript;\n\t\t\telse\n\t\t\t\tinScriptType = eHtml;\n\t\t\tscriptLanguage = beforeLanguage;\n\t\t\tcontinue;\n\t\t}\n\n\t\t// handle the start Django template code\n\t\telse if (isDjango && scriptLanguage != eScriptPython && scriptLanguage != eScriptComment && (ch == '{' && (chNext == '%' || chNext == '{'))) {\n\t\t\tif (chNext == '%')\n\t\t\t\tdjangoBlockType = \"%\";\n\t\t\telse\n\t\t\t\tdjangoBlockType = \"{\";\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\tbeforePreProc = state;\n\t\t\tif (inScriptType == eNonHtmlScript)\n\t\t\t\tinScriptType = eNonHtmlScriptPreProc;\n\t\t\telse\n\t\t\t\tinScriptType = eNonHtmlPreProc;\n\n\t\t\ti += 1;\n\t\t\tvisibleChars += 1;\n\t\t\tstate = SCE_HP_START;\n\t\t\tbeforeLanguage = scriptLanguage;\n\t\t\tscriptLanguage = eScriptPython;\n\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\n\t\t\tch = SafeGetUnsignedCharAt(styler, i);\n\t\t\tcontinue;\n\t\t}\n\n\t\t// handle the start of ASP pre-processor = Non-HTML\n\t\telse if ((ch == '<') && (chNext == '%') && allowASP && !isCommentASPState(state) && !isPHPStringState(state)) {\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\tbeforePreProc = state;\n\t\t\tif (inScriptType == eNonHtmlScript)\n\t\t\t\tinScriptType = eNonHtmlScriptPreProc;\n\t\t\telse\n\t\t\t\tinScriptType = eNonHtmlPreProc;\n\t\t\t// fold whole script\n\t\t\tif (foldHTMLPreprocessor)\n\t\t\t\tlevelCurrent++;\n\t\t\tif (chNext2 == '@') {\n\t\t\t\ti += 2; // place as if it was the second next char treated\n\t\t\t\tvisibleChars += 2;\n\t\t\t\tstate = SCE_H_ASPAT;\n\t\t\t\tscriptLanguage = eScriptVBS;\n\t\t\t} else if ((chNext2 == '-') && (styler.SafeGetCharAt(i + 3) == '-')) {\n\t\t\t\tstyler.ColourTo(i + 3, SCE_H_ASP);\n\t\t\t\tstate = SCE_H_XCCOMMENT;\n\t\t\t\tscriptLanguage = eScriptVBS;\n\t\t\t\tcontinue;\n\t\t\t} else {\n\t\t\t\tif (chNext2 == '=') {\n\t\t\t\t\ti += 2; // place as if it was the second next char treated\n\t\t\t\t\tvisibleChars += 2;\n\t\t\t\t} else {\n\t\t\t\t\ti++; // place as if it was the next char treated\n\t\t\t\t\tvisibleChars++;\n\t\t\t\t}\n\n\t\t\t\tstate = StateForScript(aspScript);\n\t\t\t\tscriptLanguage = aspScript;\n\t\t\t}\n\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\t// should be better\n\t\t\tch = SafeGetUnsignedCharAt(styler, i);\n\t\t\tcontinue;\n\t\t}\n\n\t\t/////////////////////////////////////\n\t\t// handle the start of SGML language (DTD)\n\t\telse if (AnyOf(scriptLanguage, eScriptNone, eScriptXML, eScriptSGMLblock) &&\n\t\t\t\t (chPrev == '<') &&\n\t\t\t\t (ch == '!') &&\n\t\t\t\t AnyOf(state, SCE_H_DEFAULT, SCE_H_SGML_BLOCK_DEFAULT)) {\n\t\t\tbeforePreProc = state;\n\t\t\tstyler.ColourTo(i - 2, StateToPrint);\n\t\t\tif ((state != SCE_H_SGML_BLOCK_DEFAULT) && (chNext == '-') && (chNext2 == '-')) {\n\t\t\t\tstate = SCE_H_COMMENT; // wait for a pending command\n\t\t\t\tstyler.ColourTo(i + 2, SCE_H_COMMENT);\n\t\t\t\ti += 2; // follow styling after the --\n\t\t\t\tif (!isXml) {\n\t\t\t\t\t// handle empty comment: , \n\t\t\t\t\t// https://html.spec.whatwg.org/multipage/parsing.html#parse-error-abrupt-closing-of-empty-comment\n\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t\tif ((chNext == '>') || (chNext == '-' && SafeGetUnsignedCharAt(styler, i + 2) == '>')) {\n\t\t\t\t\t\tif (chNext == '-') {\n\t\t\t\t\t\t\ti += 1;\n\t\t\t\t\t\t}\n\t\t\t\t\t\tchPrev = '-';\n\t\t\t\t\t\tch = '-';\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if ((state != SCE_H_SGML_BLOCK_DEFAULT) && isWordCdata(i + 1, i + 7, styler)) {\n\t\t\t\tstate = SCE_H_CDATA;\n\t\t\t} else {\n\t\t\t\tstyler.ColourTo(i, SCE_H_SGML_DEFAULT); // ') {\n\t\t\t\ti++;\n\t\t\t\tvisibleChars++;\n\t\t\t} else if ((makoBlockType == \"%\") && ch == '/') {\n\t\t\t\ti++;\n\t\t\t\tvisibleChars++;\n\t\t\t}\n\t\t\tif ((makoBlockType != \"%\") || ch == '/') {\n\t\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\t}\n\t\t\tstate = beforePreProc;\n\t\t\tif (inScriptType == eNonHtmlScriptPreProc)\n\t\t\t\tinScriptType = eNonHtmlScript;\n\t\t\telse\n\t\t\t\tinScriptType = eHtml;\n\t\t\tscriptLanguage = eScriptNone;\n\t\t\tcontinue;\n\t\t}\n\n\t\t// handle the end of Django template code\n\t\telse if (isDjango &&\n\t\t\t ((inScriptType == eNonHtmlPreProc) || (inScriptType == eNonHtmlScriptPreProc)) &&\n\t\t\t\t (scriptLanguage != eScriptNone) && stateAllowsTermination(state) &&\n\t\t\t\t isDjangoBlockEnd(ch, chNext, djangoBlockType)) {\n\t\t\tif (state == SCE_H_ASPAT) {\n\t\t\t\taspScript = segIsScriptingIndicator(styler,\n\t\t\t\t styler.GetStartSegment(), i - 1, aspScript);\n\t\t\t}\n\t\t\tif (state == SCE_HP_WORD) {\n\t\t\t\tclassifyWordHTPy(styler.GetStartSegment(), i - 1, keywordsPy, classifierPython, styler, prevWord, inScriptType, isMako);\n\t\t\t} else {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t}\n\t\t\ti += 1;\n\t\t\tvisibleChars += 1;\n\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\tstate = beforePreProc;\n\t\t\tif (inScriptType == eNonHtmlScriptPreProc)\n\t\t\t\tinScriptType = eNonHtmlScript;\n\t\t\telse\n\t\t\t\tinScriptType = eHtml;\n\t\t\tscriptLanguage = beforeLanguage;\n\t\t\tcontinue;\n\t\t}\n\n\t\t// handle the end of a pre-processor = Non-HTML\n\t\telse if ((!isMako && !isDjango && ((inScriptType == eNonHtmlPreProc) || (inScriptType == eNonHtmlScriptPreProc)) &&\n\t\t\t\t (((scriptLanguage != eScriptNone) && stateAllowsTermination(state))) &&\n\t\t\t\t ((chNext == '>') && isPreProcessorEndTag(state, ch))) ||\n\t\t ((scriptLanguage == eScriptSGML) && (ch == '>') && !AnyOf(state, SCE_H_SGML_COMMENT, SCE_H_SGML_DOUBLESTRING, SCE_H_SGML_SIMPLESTRING))) {\n\t\t\tif (state == SCE_H_ASPAT) {\n\t\t\t\taspScript = segIsScriptingIndicator(styler,\n\t\t\t\t styler.GetStartSegment(), i - 1, aspScript);\n\t\t\t}\n\t\t\t// Bounce out of any ASP mode\n\t\t\tswitch (state) {\n\t\t\tcase SCE_HJ_WORD:\n\t\t\t\tclassifyWordHTJS(styler.GetStartSegment(), i - 1, keywordsJS, classifierJavaScript, classifierJavaScriptServer, styler, inScriptType);\n\t\t\t\tbreak;\n\t\t\tcase SCE_HB_WORD:\n\t\t\t\tclassifyWordHTVB(styler.GetStartSegment(), i - 1, keywordsVB, classifierBasic, styler, inScriptType);\n\t\t\t\tbreak;\n\t\t\tcase SCE_HP_WORD:\n\t\t\t\tclassifyWordHTPy(styler.GetStartSegment(), i - 1, keywordsPy, classifierPython, styler, prevWord, inScriptType, isMako);\n\t\t\t\tbreak;\n\t\t\tcase SCE_HPHP_WORD:\n\t\t\t\tclassifyWordHTPHP(styler.GetStartSegment(), i - 1, keywordsPHP, classifierPHP, styler);\n\t\t\t\tbreak;\n\t\t\tcase SCE_H_XCCOMMENT:\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tbreak;\n\t\t\tdefault :\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tif (scriptLanguage != eScriptSGML) {\n\t\t\t\ti++;\n\t\t\t\tvisibleChars++;\n\t\t\t}\n\t\t\tif (ch == '%')\n\t\t\t\tstyler.ColourTo(i, SCE_H_ASP);\n\t\t\telse if (scriptLanguage == eScriptXML)\n\t\t\t\tstyler.ColourTo(i, SCE_H_XMLEND);\n\t\t\telse if (scriptLanguage == eScriptSGML)\n\t\t\t\tstyler.ColourTo(i, SCE_H_SGML_DEFAULT);\n\t\t\telse\n\t\t\t\tstyler.ColourTo(i, SCE_H_QUESTION);\n\t\t\tstate = beforePreProc;\n\t\t\tif (inScriptType == eNonHtmlScriptPreProc)\n\t\t\t\tinScriptType = eNonHtmlScript;\n\t\t\telse\n\t\t\t\tinScriptType = eHtml;\n\t\t\t// Unfold all scripting languages, except for XML tag\n\t\t\tif (foldHTMLPreprocessor && (scriptLanguage != eScriptXML)) {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\tscriptLanguage = beforeLanguage;\n\t\t\tcontinue;\n\t\t}\n\t\t/////////////////////////////////////\n\n\t\tswitch (state) {\n\t\tcase SCE_H_DEFAULT:\n\t\t\tif (ch == '<') {\n\t\t\t\t// in HTML, fold on tag open and unfold on tag close\n\t\t\t\ttagOpened = true;\n\t\t\t\ttagClosing = (chNext == '/');\n\t\t\t\tif (foldXmlAtTagOpen && !AnyOf(chNext, '/', '?', '!', '-', '%')) {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t}\n\t\t\t\tif (foldXmlAtTagOpen && chNext == '/') {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tif (chNext != '!')\n\t\t\t\t\tstate = SCE_H_TAGUNKNOWN;\n\t\t\t} else if (ch == '&') {\n\t\t\t\tstyler.ColourTo(i - 1, SCE_H_DEFAULT);\n\t\t\t\tstate = SCE_H_ENTITY;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_DEFAULT:\n\t\tcase SCE_H_SGML_BLOCK_DEFAULT:\n//\t\t\tif (scriptLanguage == eScriptSGMLblock)\n//\t\t\t\tStateToPrint = SCE_H_SGML_BLOCK_DEFAULT;\n\n\t\t\tif (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_DOUBLESTRING;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_SIMPLESTRING;\n\t\t\t} else if ((ch == '-') && (chPrev == '-')) {\n\t\t\t\tif (static_cast(styler.GetStartSegment()) <= (i - 2)) {\n\t\t\t\t\tstyler.ColourTo(i - 2, StateToPrint);\n\t\t\t\t}\n\t\t\t\tstate = SCE_H_SGML_COMMENT;\n\t\t\t} else if (ch == '%' && IsUpperOrLowerCase(chNext)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_ENTITY;\n\t\t\t} else if (ch == '#') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_SPECIAL;\n\t\t\t} else if (ch == '[') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i, SCE_H_SGML_DEFAULT);\n\t\t\t\t++sgmlBlockLevel;\n\t\t\t\tscriptLanguage = eScriptSGMLblock;\n\t\t\t\tstate = SCE_H_SGML_BLOCK_DEFAULT;\n\t\t\t} else if (ch == ']') {\n\t\t\t\tif (sgmlBlockLevel > 0) {\n\t\t\t\t\t--sgmlBlockLevel;\n\t\t\t\t\tif (sgmlBlockLevel == 0) {\n\t\t\t\t\t\tbeforePreProc = SCE_H_DEFAULT;\n\t\t\t\t\t}\n\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_SGML_DEFAULT);\n\t\t\t\t\tscriptLanguage = eScriptSGML;\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_SGML_ERROR);\n\t\t\t\t}\n\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_COMMAND:\n\t\t\tif (!issgmlwordchar(ch)) {\n\t\t\t\tif (isWordHSGML(styler.GetStartSegment(), i - 1, keywordsSGML, styler)) {\n\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\tstate = SCE_H_SGML_1ST_PARAM;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_H_SGML_ERROR;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_1ST_PARAM:\n\t\t\t// wait for the beginning of the word\n\t\t\tif ((ch == '-') && (chPrev == '-')) {\n\t\t\t\tstyler.ColourTo(i - 2, SCE_H_SGML_DEFAULT);\n\t\t\t\tstate = SCE_H_SGML_1ST_PARAM_COMMENT;\n\t\t\t} else if (issgmlwordchar(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, SCE_H_SGML_DEFAULT);\n\t\t\t\t// find the length of the word\n\t\t\t\tSci_Position size = 1;\n\t\t\t\twhile (setHTMLWord.Contains(SafeGetUnsignedCharAt(styler, i + size)))\n\t\t\t\t\tsize++;\n\t\t\t\tstyler.ColourTo(i + size - 1, StateToPrint);\n\t\t\t\ti += size - 1;\n\t\t\t\tvisibleChars += size - 1;\n\t\t\t\tch = SafeGetUnsignedCharAt(styler, i);\n\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_ERROR:\n\t\t\tif ((ch == '-') && (chPrev == '-')) {\n\t\t\t\tstyler.ColourTo(i - 2, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_COMMENT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_DOUBLESTRING:\n\t\t\tif (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_SIMPLESTRING:\n\t\t\tif (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_COMMENT:\n\t\t\tif ((ch == '-') && (chPrev == '-')) {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_CDATA:\n\t\t\tif ((chPrev2 == ']') && (chPrev == ']') && (ch == '>')) {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_COMMENT:\n\t\t\tif ((scriptLanguage != eScriptComment) && (chPrev2 == '-') && (chPrev == '-') && (ch == '>' || (!isXml && ch == '!' && chNext == '>'))) {\n\t\t\t\t// close HTML comment with --!>\n\t\t\t\t// https://html.spec.whatwg.org/multipage/parsing.html#parse-error-incorrectly-closed-comment\n\t\t\t\tif (ch == '!') {\n\t\t\t\t\ti += 1;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_1ST_PARAM_COMMENT:\n\t\t\tif ((ch == '-') && (chPrev == '-')) {\n\t\t\t\tstyler.ColourTo(i, SCE_H_SGML_COMMENT);\n\t\t\t\tstate = SCE_H_SGML_1ST_PARAM;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_SPECIAL:\n\t\t\tif (!IsUpperCase(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tif (IsAlphaNumeric(ch)) {\n\t\t\t\t\tstate = SCE_H_SGML_ERROR;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SGML_ENTITY:\n\t\t\tif (!(IsAlphaNumeric(ch)) && ch != '-' && ch != '.' && ch != '_') {\n\t\t\t\tstyler.ColourTo(i, ((ch == ';') ? StateToPrint : SCE_H_SGML_ERROR));\n\t\t\t\tstate = defaultStateForSGML(scriptLanguage);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_ENTITY:\n\t\t\tif (ch == ';') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t} else if (!setEntity.Contains(ch)) {\n\t\t\t\tstyler.ColourTo(i-1, SCE_H_TAGUNKNOWN);\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\tif (!isLineEnd(ch)) {\n\t\t\t\t\t// Retreat one byte so the character that is invalid inside entity\n\t\t\t\t\t// may start something else like a tag.\n\t\t\t\t\t--i;\n\t\t\t\t\tcontinue;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_TAGUNKNOWN:\n\t\t\tif (!setTagContinue.Contains(ch) && !((ch == '/') && (chPrev == '<'))) {\n\t\t\t\tint eClass = classifyTagHTML(styler.GetStartSegment(),\n\t\t\t\t\ti - 1, keywordsHTML, classifierTags, styler, tagDontFold, caseSensitive, isXml, allowScripts, nonFoldingTags, lastTag);\n\t\t\t\tif (eClass == SCE_H_SCRIPT || eClass == SCE_H_COMMENT) {\n\t\t\t\t\tif (!tagClosing) {\n\t\t\t\t\t\tinScriptType = eNonHtmlScript;\n\t\t\t\t\t\tscriptLanguage = eClass == SCE_H_SCRIPT ? clientScript : eScriptComment;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tscriptLanguage = eScriptNone;\n\t\t\t\t\t}\n\t\t\t\t\tisLanguageType = false;\n\t\t\t\t\teClass = SCE_H_TAG;\n\t\t\t\t}\n\t\t\t\tif (ch == '>') {\n\t\t\t\t\tstyler.ColourTo(i, eClass);\n\t\t\t\t\tif (inScriptType == eNonHtmlScript) {\n\t\t\t\t\t\tstate = StateForScript(scriptLanguage);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\t\t}\n\t\t\t\t\ttagOpened = false;\n\t\t\t\t\tif (!(foldXmlAtTagOpen || tagDontFold)) {\n\t\t\t\t\t\tif (tagClosing) {\n\t\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\ttagClosing = false;\n\t\t\t\t} else if (ch == '/' && chNext == '>') {\n\t\t\t\t\tif (eClass == SCE_H_TAGUNKNOWN) {\n\t\t\t\t\t\tstyler.ColourTo(i + 1, SCE_H_TAGUNKNOWN);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\t\tstyler.ColourTo(i + 1, SCE_H_TAGEND);\n\t\t\t\t\t}\n\t\t\t\t\ti++;\n\t\t\t\t\tch = chNext;\n\t\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\t\ttagOpened = false;\n\t\t\t\t\tif (foldXmlAtTagOpen) {\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tif (eClass != SCE_H_TAGUNKNOWN) {\n\t\t\t\t\t\tif (eClass == SCE_H_SGML_DEFAULT) {\n\t\t\t\t\t\t\tstate = SCE_H_SGML_DEFAULT;\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tstate = SCE_H_OTHER;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_ATTRIBUTE:\n\t\t\tif (!setAttributeContinue.Contains(ch)) {\n\t\t\t\tisLanguageType = classifyAttribHTML(inScriptType, styler.GetStartSegment(), i - 1, keywordsHTML, classifierAttributes, styler, lastTag);\n\t\t\t\tif (ch == '>') {\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_TAG);\n\t\t\t\t\tif (inScriptType == eNonHtmlScript) {\n\t\t\t\t\t\tstate = StateForScript(scriptLanguage);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\t\t}\n\t\t\t\t\ttagOpened = false;\n\t\t\t\t\tif (!(foldXmlAtTagOpen || tagDontFold)) {\n\t\t\t\t\t\tif (tagClosing) {\n\t\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\ttagClosing = false;\n\t\t\t\t} else if (ch == '=') {\n\t\t\t\t\tstyler.ColourTo(i, SCE_H_OTHER);\n\t\t\t\t\tstate = SCE_H_VALUE;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_H_OTHER;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_OTHER:\n\t\t\tif (ch == '>') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i, SCE_H_TAG);\n\t\t\t\tif (inScriptType == eNonHtmlScript) {\n\t\t\t\t\tstate = StateForScript(scriptLanguage);\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\t}\n\t\t\t\ttagOpened = false;\n\t\t\t\tif (!(foldXmlAtTagOpen || tagDontFold)) {\n\t\t\t\t\tif (tagClosing) {\n\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\ttagClosing = false;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_DOUBLESTRING;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_SINGLESTRING;\n\t\t\t} else if (ch == '=') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_H_VALUE;\n\t\t\t} else if (ch == '/' && chNext == '>') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i + 1, SCE_H_TAGEND);\n\t\t\t\ti++;\n\t\t\t\tch = chNext;\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\ttagOpened = false;\n\t\t\t\tif (foldXmlAtTagOpen) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t} else if (ch == '?' && chNext == '>') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i + 1, SCE_H_XMLEND);\n\t\t\t\ti++;\n\t\t\t\tch = chNext;\n\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t} else if (setHTMLWord.Contains(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_H_ATTRIBUTE;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_DOUBLESTRING:\n\t\t\tif (ch == '\\\"') {\n\t\t\t\tif (isLanguageType) {\n\t\t\t\t\tscriptLanguage = segIsScriptingIndicator(styler, styler.GetStartSegment(), i, scriptLanguage);\n\t\t\t\t\tclientScript = scriptLanguage;\n\t\t\t\t\tisLanguageType = false;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i, SCE_H_DOUBLESTRING);\n\t\t\t\tstate = SCE_H_OTHER;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_SINGLESTRING:\n\t\t\tif (ch == '\\'') {\n\t\t\t\tif (isLanguageType) {\n\t\t\t\t\tscriptLanguage = segIsScriptingIndicator(styler, styler.GetStartSegment(), i, scriptLanguage);\n\t\t\t\t\tclientScript = scriptLanguage;\n\t\t\t\t\tisLanguageType = false;\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i, SCE_H_SINGLESTRING);\n\t\t\t\tstate = SCE_H_OTHER;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_H_VALUE:\n\t\t\tif (!setHTMLWord.Contains(ch)) {\n\t\t\t\tif (ch == '\\\"' && chPrev == '=') {\n\t\t\t\t\t// Should really test for being first character\n\t\t\t\t\tstate = SCE_H_DOUBLESTRING;\n\t\t\t\t} else if (ch == '\\'' && chPrev == '=') {\n\t\t\t\t\tstate = SCE_H_SINGLESTRING;\n\t\t\t\t} else {\n\t\t\t\t\tif (IsNumberChar(styler[styler.GetStartSegment()])) {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_H_NUMBER);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\t}\n\t\t\t\t\tif (ch == '>') {\n\t\t\t\t\t\tstyler.ColourTo(i, SCE_H_TAG);\n\t\t\t\t\t\tif (inScriptType == eNonHtmlScript) {\n\t\t\t\t\t\t\tstate = StateForScript(scriptLanguage);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tstate = SCE_H_DEFAULT;\n\t\t\t\t\t\t}\n\t\t\t\t\t\ttagOpened = false;\n\t\t\t\t\t\tif (!tagDontFold) {\n\t\t\t\t\t\t\tif (tagClosing) {\n\t\t\t\t\t\t\t\tlevelCurrent--;\n\t\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\t\tlevelCurrent++;\n\t\t\t\t\t\t\t}\n\t\t\t\t\t\t}\n\t\t\t\t\t\ttagClosing = false;\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = SCE_H_OTHER;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_DEFAULT:\n\t\tcase SCE_HJ_START:\n\t\tcase SCE_HJ_SYMBOLS:\n\t\t\tif (IsAWordStart(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_WORD;\n\t\t\t} else if (ch == '/' && chNext == '*') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\ti++;\n\t\t\t\tif (chNext2 == '*')\n\t\t\t\t\tstate = SCE_HJ_COMMENTDOC;\n\t\t\t\telse\n\t\t\t\t\tstate = SCE_HJ_COMMENT;\n\t\t\t} else if (ch == '/' && chNext == '/') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_COMMENTLINE;\n\t\t\t} else if (ch == '/' && setOKBeforeJSRE.Contains(chPrevNonWhite)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_REGEX;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_DOUBLESTRING;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_SINGLESTRING;\n\t\t\t} else if (ch == '`') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_TEMPLATELITERAL;\n\t\t\t} else if ((ch == '<') && (chNext == '!') && (chNext2 == '-') &&\n\t\t\t styler.SafeGetCharAt(i + 3) == '-') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_COMMENTLINE;\n\t\t\t} else if ((ch == '-') && (chNext == '-') && (chNext2 == '>')) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_COMMENTLINE;\n\t\t\t\ti += 2;\n\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HJ_SYMBOLS, inScriptType));\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t} else if ((ch == ' ') || (ch == '\\t')) {\n\t\t\t\tif (state == SCE_HJ_START) {\n\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_WORD:\n\t\t\tif (!IsAWordChar(ch)) {\n\t\t\t\tclassifyWordHTJS(styler.GetStartSegment(), i - 1, keywordsJS,\n\t\t\t\t\tclassifierJavaScript, classifierJavaScriptServer, styler, inScriptType);\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_COMMENT:\n\t\tcase SCE_HJ_COMMENTDOC:\n\t\t\tif (ch == '/' && chPrev == '*') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\tch = ' ';\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_COMMENTLINE:\n\t\t\tif (ch == '\\r' || ch == '\\n') {\n\t\t\t\tstyler.ColourTo(i - 1, statePrintForState(SCE_HJ_COMMENTLINE, inScriptType));\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\tch = ' ';\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_DOUBLESTRING:\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t}\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HJ_DOUBLESTRING, inScriptType));\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\tcontinue;\n\t\t\t} else if (isLineEnd(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tif (chPrev != '\\\\' && (chPrev2 != '\\\\' || chPrev != '\\r' || ch != '\\n')) {\n\t\t\t\t\tstate = SCE_HJ_STRINGEOL;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_SINGLESTRING:\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t}\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HJ_SINGLESTRING, inScriptType));\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\tcontinue;\n\t\t\t} else if (isLineEnd(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tif (chPrev != '\\\\' && (chPrev2 != '\\\\' || chPrev != '\\r' || ch != '\\n')) {\n\t\t\t\t\tstate = SCE_HJ_STRINGEOL;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_TEMPLATELITERAL:\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tif (chNext == '$' || chNext == '`' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t}\n\t\t\t} else if (ch == '`') {\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HJ_TEMPLATELITERAL, inScriptType));\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_STRINGEOL:\n\t\t\tif (!isLineEnd(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t} else if (!isLineEnd(chNext)) {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HJ_REGEX:\n\t\t\tif (ch == '\\r' || ch == '\\n' || ch == '/') {\n\t\t\t\tif (ch == '/') {\n\t\t\t\t\twhile (IsLowerCase(chNext)) { // gobble regex flags\n\t\t\t\t\t\ti++;\n\t\t\t\t\t\tch = chNext;\n\t\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HJ_DEFAULT;\n\t\t\t\tcontinue;\n\t\t\t} else if (ch == '\\\\') {\n\t\t\t\t// Gobble up the quoted character\n\t\t\t\tif (chNext == '\\\\' || chNext == '/') {\n\t\t\t\t\ti++;\n\t\t\t\t\tch = chNext;\n\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HB_DEFAULT:\n\t\tcase SCE_HB_START:\n\t\t\tif (IsAWordStart(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_WORD;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_COMMENTLINE;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_STRING;\n\t\t\t} else if ((ch == '<') && (chNext == '!') && (chNext2 == '-') &&\n\t\t\t styler.SafeGetCharAt(i + 3) == '-') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_COMMENTLINE;\n\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HB_DEFAULT, inScriptType));\n\t\t\t\tstate = SCE_HB_DEFAULT;\n\t\t\t} else if ((ch == ' ') || (ch == '\\t')) {\n\t\t\t\tif (state == SCE_HB_START) {\n\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\tstate = SCE_HB_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HB_WORD:\n\t\t\tif (!IsAWordChar(ch)) {\n\t\t\t\tstate = classifyWordHTVB(styler.GetStartSegment(), i - 1, keywordsVB, classifierBasic, styler, inScriptType);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HB_STRING:\n\t\t\tif (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HB_DEFAULT;\n\t\t\t\tcontinue;\n\t\t\t} else if (ch == '\\r' || ch == '\\n') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_STRINGEOL;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HB_COMMENTLINE:\n\t\t\tif (ch == '\\r' || ch == '\\n') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HB_STRINGEOL:\n\t\t\tif (!isLineEnd(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HB_DEFAULT;\n\t\t\t} else if (!isLineEnd(chNext)) {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HB_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_DEFAULT:\n\t\tcase SCE_HP_START:\n\t\t\tif (IsAWordStart(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HP_WORD;\n\t\t\t} else if ((ch == '<') && (chNext == '!') && (chNext2 == '-') &&\n\t\t\t styler.SafeGetCharAt(i + 3) == '-') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HP_COMMENTLINE;\n\t\t\t} else if (ch == '#') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HP_COMMENTLINE;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tif (chNext == '\\\"' && chNext2 == '\\\"') {\n\t\t\t\t\ti += 2;\n\t\t\t\t\tstate = SCE_HP_TRIPLEDOUBLE;\n\t\t\t\t\tch = ' ';\n\t\t\t\t\tchPrev = ' ';\n\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t} else {\n\t\t\t\t\t//\t\t\t\t\tstate = statePrintForState(SCE_HP_STRING,inScriptType);\n\t\t\t\t\tstate = SCE_HP_STRING;\n\t\t\t\t}\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tif (chNext == '\\'' && chNext2 == '\\'') {\n\t\t\t\t\ti += 2;\n\t\t\t\t\tstate = SCE_HP_TRIPLE;\n\t\t\t\t\tch = ' ';\n\t\t\t\t\tchPrev = ' ';\n\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_HP_CHARACTER;\n\t\t\t\t}\n\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HP_OPERATOR, inScriptType));\n\t\t\t} else if ((ch == ' ') || (ch == '\\t')) {\n\t\t\t\tif (state == SCE_HP_START) {\n\t\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_WORD:\n\t\t\tif (!IsAWordChar(ch)) {\n\t\t\t\tclassifyWordHTPy(styler.GetStartSegment(), i - 1, keywordsPy, classifierPython, styler, prevWord, inScriptType, isMako);\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t\tif (ch == '#') {\n\t\t\t\t\tstate = SCE_HP_COMMENTLINE;\n\t\t\t\t} else if (ch == '\\\"') {\n\t\t\t\t\tif (chNext == '\\\"' && chNext2 == '\\\"') {\n\t\t\t\t\t\ti += 2;\n\t\t\t\t\t\tstate = SCE_HP_TRIPLEDOUBLE;\n\t\t\t\t\t\tch = ' ';\n\t\t\t\t\t\tchPrev = ' ';\n\t\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = SCE_HP_STRING;\n\t\t\t\t\t}\n\t\t\t\t} else if (ch == '\\'') {\n\t\t\t\t\tif (chNext == '\\'' && chNext2 == '\\'') {\n\t\t\t\t\t\ti += 2;\n\t\t\t\t\t\tstate = SCE_HP_TRIPLE;\n\t\t\t\t\t\tch = ' ';\n\t\t\t\t\t\tchPrev = ' ';\n\t\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstate = SCE_HP_CHARACTER;\n\t\t\t\t\t}\n\t\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HP_OPERATOR, inScriptType));\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_COMMENTLINE:\n\t\t\tif (ch == '\\r' || ch == '\\n') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_STRING:\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t\tch = chNext;\n\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t}\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_CHARACTER:\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\ti++;\n\t\t\t\t\tch = chNext;\n\t\t\t\t\tchNext = SafeGetUnsignedCharAt(styler, i + 1);\n\t\t\t\t}\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_TRIPLE:\n\t\t\tif (ch == '\\'' && chPrev == '\\'' && chPrev2 == '\\'') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HP_TRIPLEDOUBLE:\n\t\t\tif (ch == '\\\"' && chPrev == '\\\"' && chPrev2 == '\\\"') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\t\t///////////// start - PHP state handling\n\t\tcase SCE_HPHP_WORD:\n\t\t\tif (!IsPhpWordChar(ch)) {\n\t\t\t\tclassifyWordHTPHP(styler.GetStartSegment(), i - 1, keywordsPHP, classifierPHP, styler);\n\t\t\t\tif (ch == '/' && chNext == '*') {\n\t\t\t\t\ti++;\n\t\t\t\t\tstate = SCE_HPHP_COMMENT;\n\t\t\t\t} else if (ch == '/' && chNext == '/') {\n\t\t\t\t\ti++;\n\t\t\t\t\tstate = SCE_HPHP_COMMENTLINE;\n\t\t\t\t} else if (ch == '#' && chNext != '[') {\n\t\t\t\t\tstate = SCE_HPHP_COMMENTLINE;\n\t\t\t\t} else if (ch == '\\\"') {\n\t\t\t\t\tstate = SCE_HPHP_HSTRING;\n\t\t\t\t\tphpStringDelimiter = \"\\\"\";\n\t\t\t\t} else if (styler.Match(i, \"<<<\")) {\n\t\t\t\t\tbool isSimpleString = false;\n\t\t\t\t\ti = FindPhpStringDelimiter(phpStringDelimiter, i + 3, lengthDoc, styler, isSimpleString);\n\t\t\t\t\tif (!phpStringDelimiter.empty()) {\n\t\t\t\t\t\tstate = (isSimpleString ? SCE_HPHP_SIMPLESTRING : SCE_HPHP_HSTRING);\n\t\t\t\t\t\tif (foldHeredoc) levelCurrent++;\n\t\t\t\t\t}\n\t\t\t\t} else if (ch == '\\'') {\n\t\t\t\t\tstate = SCE_HPHP_SIMPLESTRING;\n\t\t\t\t\tphpStringDelimiter = \"\\'\";\n\t\t\t\t} else if (ch == '$' && IsPhpWordStart(chNext)) {\n\t\t\t\t\tstate = SCE_HPHP_VARIABLE;\n\t\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\t\tstate = SCE_HPHP_OPERATOR;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_NUMBER:\n\t\t\tif (phpNumber.check(chNext, chNext2)) {\n\t\t\t\tstyler.ColourTo(i, phpNumber.isInvalid() ? SCE_HPHP_DEFAULT : SCE_HPHP_NUMBER);\n\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_VARIABLE:\n\t\t\tif (!IsPhpWordChar(chNext)) {\n\t\t\t\tstyler.ColourTo(i, SCE_HPHP_VARIABLE);\n\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_COMMENT:\n\t\t\tif (ch == '/' && chPrev == '*') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_COMMENTLINE:\n\t\t\tif (ch == '\\r' || ch == '\\n') {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_HSTRING:\n\t\t\tif (ch == '\\\\' && ((phpStringDelimiter == \"\\\"\") || chNext == '$' || chNext == '{')) {\n\t\t\t\t// skip the next char\n\t\t\t\ti++;\n\t\t\t} else if (((ch == '{' && chNext == '$') || (ch == '$' && chNext == '{'))\n\t\t\t\t&& IsPhpWordStart(chNext2)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HPHP_COMPLEX_VARIABLE;\n\t\t\t} else if (ch == '$' && IsPhpWordStart(chNext)) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HPHP_HSTRING_VARIABLE;\n\t\t\t} else if (styler.Match(i, phpStringDelimiter.c_str())) {\n\t\t\t\tif (phpStringDelimiter == \"\\\"\") {\n\t\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t\t} else if (lineStartVisibleChars == 1) {\n\t\t\t\t\tconst int psdLength = static_cast(phpStringDelimiter.length());\n\t\t\t\t\tif (!IsPhpWordChar(styler.SafeGetCharAt(i + psdLength))) {\n\t\t\t\t\t\ti += (((i + psdLength) < lengthDoc) ? psdLength : lengthDoc) - 1;\n\t\t\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t\t\t\tif (foldHeredoc) levelCurrent--;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_SIMPLESTRING:\n\t\t\tif (phpStringDelimiter == \"\\'\") {\n\t\t\t\tif (ch == '\\\\') {\n\t\t\t\t\t// skip the next char\n\t\t\t\t\ti++;\n\t\t\t\t} else if (ch == '\\'') {\n\t\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t\t}\n\t\t\t} else if (lineStartVisibleChars == 1 && styler.Match(i, phpStringDelimiter.c_str())) {\n\t\t\t\tconst int psdLength = static_cast(phpStringDelimiter.length());\n\t\t\t\tif (!IsPhpWordChar(styler.SafeGetCharAt(i + psdLength))) {\n\t\t\t\t\ti += (((i + psdLength) < lengthDoc) ? psdLength : lengthDoc) - 1;\n\t\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t\t\tif (foldHeredoc) levelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_HSTRING_VARIABLE:\n\t\t\tif (!IsPhpWordChar(chNext)) {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HPHP_HSTRING;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_COMPLEX_VARIABLE:\n\t\t\tif (ch == '}') {\n\t\t\t\tstyler.ColourTo(i, StateToPrint);\n\t\t\t\tstate = SCE_HPHP_HSTRING;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_HPHP_OPERATOR:\n\t\tcase SCE_HPHP_DEFAULT:\n\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\tif (phpNumber.init(ch, chNext, chNext2)) {\n\t\t\t\tif (phpNumber.isFinished()) {\n\t\t\t\t\tstyler.ColourTo(i, phpNumber.isInvalid() ? SCE_HPHP_DEFAULT : SCE_HPHP_NUMBER);\n\t\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_HPHP_NUMBER;\n\t\t\t\t}\n\t\t\t} else if (IsAWordStart(ch)) {\n\t\t\t\tstate = SCE_HPHP_WORD;\n\t\t\t} else if (ch == '/' && chNext == '*') {\n\t\t\t\ti++;\n\t\t\t\tstate = SCE_HPHP_COMMENT;\n\t\t\t} else if (ch == '/' && chNext == '/') {\n\t\t\t\ti++;\n\t\t\t\tstate = SCE_HPHP_COMMENTLINE;\n\t\t\t} else if (ch == '#' && chNext != '[') {\n\t\t\t\tstate = SCE_HPHP_COMMENTLINE;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstate = SCE_HPHP_HSTRING;\n\t\t\t\tphpStringDelimiter = \"\\\"\";\n\t\t\t} else if (styler.Match(i, \"<<<\")) {\n\t\t\t\tbool isSimpleString = false;\n\t\t\t\ti = FindPhpStringDelimiter(phpStringDelimiter, i + 3, lengthDoc, styler, isSimpleString);\n\t\t\t\tif (!phpStringDelimiter.empty()) {\n\t\t\t\t\tstate = (isSimpleString ? SCE_HPHP_SIMPLESTRING : SCE_HPHP_HSTRING);\n\t\t\t\t\tif (foldHeredoc) levelCurrent++;\n\t\t\t\t}\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstate = SCE_HPHP_SIMPLESTRING;\n\t\t\t\tphpStringDelimiter = \"\\'\";\n\t\t\t} else if (ch == '$' && IsPhpWordStart(chNext)) {\n\t\t\t\tstate = SCE_HPHP_VARIABLE;\n\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\tstate = SCE_HPHP_OPERATOR;\n\t\t\t} else if ((state == SCE_HPHP_OPERATOR) && (IsASpace(ch))) {\n\t\t\t\tstate = SCE_HPHP_DEFAULT;\n\t\t\t}\n\t\t\tbreak;\n\t\t\t///////////// end - PHP state handling\n\t\t}\n\n\t\t// Some of the above terminated their lexeme\n\n\t\tif (state == SCE_HB_DEFAULT) { // One of the above succeeded\n\t\t\tif (ch == '\\\"') {\n\t\t\t\tstate = SCE_HB_STRING;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstate = SCE_HB_COMMENTLINE;\n\t\t\t} else if (IsAWordStart(ch)) {\n\t\t\t\tstate = SCE_HB_WORD;\n\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HB_DEFAULT, inScriptType));\n\t\t\t}\n\t\t} else if (state == SCE_HJ_DEFAULT) { // One of the above succeeded\n\t\t\tif (ch == '/' && chNext == '*') {\n\t\t\t\ti++;\n\t\t\t\tif (chNext2 == '*')\n\t\t\t\t\tstate = SCE_HJ_COMMENTDOC;\n\t\t\t\telse\n\t\t\t\t\tstate = SCE_HJ_COMMENT;\n\t\t\t} else if (ch == '/' && chNext == '/') {\n\t\t\t\tstate = SCE_HJ_COMMENTLINE;\n\t\t\t} else if (ch == '\\\"') {\n\t\t\t\tstate = SCE_HJ_DOUBLESTRING;\n\t\t\t} else if (ch == '\\'') {\n\t\t\t\tstate = SCE_HJ_SINGLESTRING;\n\t\t\t} else if (ch == '`') {\n\t\t\t\tstate = SCE_HJ_TEMPLATELITERAL;\n\t\t\t} else if (IsAWordStart(ch)) {\n\t\t\t\tstate = SCE_HJ_WORD;\n\t\t\t} else if ((ch == '-') && (chNext == '-') && (chNext2 == '>')) {\n\t\t\t\tstyler.ColourTo(i - 1, StateToPrint);\n\t\t\t\tstate = SCE_HJ_COMMENTLINE;\n\t\t\t\ti += 2;\n\t\t\t} else if (IsOperator(ch)) {\n\t\t\t\tstyler.ColourTo(i, statePrintForState(SCE_HJ_SYMBOLS, inScriptType));\n\t\t\t}\n\t\t}\n\t}\n\n\tswitch (state) {\n\tcase SCE_HJ_WORD:\n\t\tclassifyWordHTJS(styler.GetStartSegment(), lengthDoc - 1, keywordsJS,\n\t\t\tclassifierJavaScript, classifierJavaScriptServer, styler, inScriptType);\n\t\tbreak;\n\tcase SCE_HB_WORD:\n\t\tclassifyWordHTVB(styler.GetStartSegment(), lengthDoc - 1, keywordsVB, classifierBasic, styler, inScriptType);\n\t\tbreak;\n\tcase SCE_HP_WORD:\n\t\tclassifyWordHTPy(styler.GetStartSegment(), lengthDoc - 1, keywordsPy, classifierPython, styler, prevWord, inScriptType, isMako);\n\t\tbreak;\n\tcase SCE_HPHP_WORD:\n\t\tclassifyWordHTPHP(styler.GetStartSegment(), lengthDoc - 1, keywordsPHP, classifierPHP, styler);\n\t\tbreak;\n\tdefault:\n\t\tStateToPrint = statePrintForState(state, inScriptType);\n\t\tif (static_cast(styler.GetStartSegment()) < lengthDoc)\n\t\t\tstyler.ColourTo(lengthDoc - 1, StateToPrint);\n\t\tbreak;\n\t}\n\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tif (fold) {\n\t\tconst int flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\t\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n\t}\n\tstyler.Flush();\n}\n\nextern const LexerModule lmHTML(SCLEX_HTML, LexerHTML::LexerFactoryHTML, \"hypertext\", htmlWordListDesc);\nextern const LexerModule lmXML(SCLEX_XML, LexerHTML::LexerFactoryXML, \"xml\", htmlWordListDesc);\nextern const LexerModule lmPHPSCRIPT(SCLEX_PHPSCRIPT, LexerHTML::LexerFactoryPHPScript, \"phpscript\", phpscriptWordListDesc);\n" }, { "path": "lexers/LexHaskell.cxx", "content": "/******************************************************************\n * LexHaskell.cxx\n *\n * A haskell lexer for the scintilla code control.\n * Some stuff \"lended\" from LexPython.cxx and LexCPP.cxx.\n * External lexer stuff inspired from the caml external lexer.\n * Folder copied from Python's.\n *\n * Written by Tobias Engvall - tumm at dtek dot chalmers dot se\n *\n * Several bug fixes by Krasimir Angelov - kr.angelov at gmail.com\n *\n * Improved by kudah \n *\n * TODO:\n * * A proper lexical folder to fold group declarations, comments, pragmas,\n * #ifdefs, explicit layout, lists, tuples, quasi-quotes, splces, etc, etc,\n * etc.\n *\n *****************************************************************/\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"PropSetSimple.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"CharacterCategory.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\n// See https://github.com/ghc/ghc/blob/master/compiler/parser/Lexer.x#L1682\n// Note, letter modifiers are prohibited.\n\nstatic int u_iswupper (int ch) {\n CharacterCategory c = CategoriseCharacter(ch);\n return c == ccLu || c == ccLt;\n}\n\nstatic int u_iswalpha (int ch) {\n CharacterCategory c = CategoriseCharacter(ch);\n return c == ccLl || c == ccLu || c == ccLt || c == ccLo;\n}\n\nstatic int u_iswalnum (int ch) {\n CharacterCategory c = CategoriseCharacter(ch);\n return c == ccLl || c == ccLu || c == ccLt || c == ccLo\n || c == ccNd || c == ccNo;\n}\n\nstatic int u_IsHaskellSymbol(int ch) {\n CharacterCategory c = CategoriseCharacter(ch);\n return c == ccPc || c == ccPd || c == ccPo\n || c == ccSm || c == ccSc || c == ccSk || c == ccSo;\n}\n\nstatic inline bool IsHaskellLetter(const int ch) {\n if (IsASCII(ch)) {\n return (ch >= 'a' && ch <= 'z')\n || (ch >= 'A' && ch <= 'Z');\n } else {\n return u_iswalpha(ch) != 0;\n }\n}\n\nstatic inline bool IsHaskellAlphaNumeric(const int ch) {\n if (IsASCII(ch)) {\n return IsAlphaNumeric(ch);\n } else {\n return u_iswalnum(ch) != 0;\n }\n}\n\nstatic inline bool IsHaskellUpperCase(const int ch) {\n if (IsASCII(ch)) {\n return ch >= 'A' && ch <= 'Z';\n } else {\n return u_iswupper(ch) != 0;\n }\n}\n\nstatic inline bool IsAnHaskellOperatorChar(const int ch) {\n if (IsASCII(ch)) {\n return\n ( ch == '!' || ch == '#' || ch == '$' || ch == '%'\n || ch == '&' || ch == '*' || ch == '+' || ch == '-'\n || ch == '.' || ch == '/' || ch == ':' || ch == '<'\n || ch == '=' || ch == '>' || ch == '?' || ch == '@'\n || ch == '^' || ch == '|' || ch == '~' || ch == '\\\\');\n } else {\n return u_IsHaskellSymbol(ch) != 0;\n }\n}\n\nstatic inline bool IsAHaskellWordStart(const int ch) {\n return IsHaskellLetter(ch) || ch == '_';\n}\n\nstatic inline bool IsAHaskellWordChar(const int ch) {\n return ( IsHaskellAlphaNumeric(ch)\n || ch == '_'\n || ch == '\\'');\n}\n\nstatic inline bool IsCommentBlockStyle(int style) {\n return (style >= SCE_HA_COMMENTBLOCK && style <= SCE_HA_COMMENTBLOCK3);\n}\n\nstatic inline bool IsCommentStyle(int style) {\n return (style >= SCE_HA_COMMENTLINE && style <= SCE_HA_COMMENTBLOCK3)\n || ( style == SCE_HA_LITERATE_COMMENT\n || style == SCE_HA_LITERATE_CODEDELIM);\n}\n\n// styles which do not belong to Haskell, but to external tools\nstatic inline bool IsExternalStyle(int style) {\n return ( style == SCE_HA_PREPROCESSOR\n || style == SCE_HA_LITERATE_COMMENT\n || style == SCE_HA_LITERATE_CODEDELIM);\n}\n\nstatic inline int CommentBlockStyleFromNestLevel(const unsigned int nestLevel) {\n return SCE_HA_COMMENTBLOCK + (nestLevel % 3);\n}\n\n// Mangled version of lexlib/Accessor.cxx IndentAmount.\n// Modified to treat comment blocks as whitespace\n// plus special case for commentline/preprocessor.\nstatic int HaskellIndentAmount(Accessor &styler, const Sci_Position line) {\n\n // Determines the indentation level of the current line\n // Comment blocks are treated as whitespace\n\n Sci_Position pos = styler.LineStart(line);\n Sci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\n char ch = styler[pos];\n int style = styler.StyleAt(pos);\n\n int indent = 0;\n bool inPrevPrefix = line > 0;\n\n Sci_Position posPrev = inPrevPrefix ? styler.LineStart(line-1) : 0;\n\n while (( ch == ' ' || ch == '\\t'\n || IsCommentBlockStyle(style)\n || style == SCE_HA_LITERATE_CODEDELIM)\n && (pos < eol_pos)) {\n if (inPrevPrefix) {\n char chPrev = styler[posPrev++];\n if (chPrev != ' ' && chPrev != '\\t') {\n inPrevPrefix = false;\n }\n }\n if (ch == '\\t') {\n indent = (indent / 8 + 1) * 8;\n } else { // Space or comment block\n indent++;\n }\n pos++;\n ch = styler[pos];\n style = styler.StyleAt(pos);\n }\n\n indent += SC_FOLDLEVELBASE;\n // if completely empty line or the start of a comment or preprocessor...\n if ( styler.LineStart(line) == styler.Length()\n || ch == ' '\n || ch == '\\t'\n || ch == '\\n'\n || ch == '\\r'\n || IsCommentStyle(style)\n || style == SCE_HA_PREPROCESSOR)\n return indent | SC_FOLDLEVELWHITEFLAG;\n else\n return indent;\n}\n\nstruct OptionsHaskell {\n bool magicHash;\n bool allowQuotes;\n bool implicitParams;\n bool highlightSafe;\n bool cpp;\n bool stylingWithinPreprocessor;\n bool fold;\n bool foldComment;\n bool foldCompact;\n bool foldImports;\n OptionsHaskell() {\n magicHash = true; // Widespread use, enabled by default.\n allowQuotes = true; // Widespread use, enabled by default.\n implicitParams = false; // Fell out of favor, seldom used, disabled.\n highlightSafe = true; // Moderately used, doesn't hurt to enable.\n cpp = true; // Widespread use, enabled by default;\n stylingWithinPreprocessor = false;\n fold = false;\n foldComment = false;\n foldCompact = false;\n foldImports = false;\n }\n};\n\nstatic const char * const haskellWordListDesc[] = {\n \"Keywords\",\n \"FFI\",\n \"Reserved operators\",\n 0\n};\n\nstruct OptionSetHaskell : public OptionSet {\n OptionSetHaskell() {\n DefineProperty(\"lexer.haskell.allow.hash\", &OptionsHaskell::magicHash,\n \"Set to 0 to disallow the '#' character at the end of identifiers and \"\n \"literals with the haskell lexer \"\n \"(GHC -XMagicHash extension)\");\n\n DefineProperty(\"lexer.haskell.allow.quotes\", &OptionsHaskell::allowQuotes,\n \"Set to 0 to disable highlighting of Template Haskell name quotations \"\n \"and promoted constructors \"\n \"(GHC -XTemplateHaskell and -XDataKinds extensions)\");\n\n DefineProperty(\"lexer.haskell.allow.questionmark\", &OptionsHaskell::implicitParams,\n \"Set to 1 to allow the '?' character at the start of identifiers \"\n \"with the haskell lexer \"\n \"(GHC & Hugs -XImplicitParams extension)\");\n\n DefineProperty(\"lexer.haskell.import.safe\", &OptionsHaskell::highlightSafe,\n \"Set to 0 to disallow \\\"safe\\\" keyword in imports \"\n \"(GHC -XSafe, -XTrustworthy, -XUnsafe extensions)\");\n\n DefineProperty(\"lexer.haskell.cpp\", &OptionsHaskell::cpp,\n \"Set to 0 to disable C-preprocessor highlighting \"\n \"(-XCPP extension)\");\n\n DefineProperty(\"styling.within.preprocessor\", &OptionsHaskell::stylingWithinPreprocessor,\n \"For Haskell code, determines whether all preprocessor code is styled in the \"\n \"preprocessor style (0, the default) or only from the initial # to the end \"\n \"of the command word(1).\"\n );\n\n DefineProperty(\"fold\", &OptionsHaskell::fold);\n\n DefineProperty(\"fold.comment\", &OptionsHaskell::foldComment);\n\n DefineProperty(\"fold.compact\", &OptionsHaskell::foldCompact);\n\n DefineProperty(\"fold.haskell.imports\", &OptionsHaskell::foldImports,\n \"Set to 1 to enable folding of import declarations\");\n\n DefineWordListSets(haskellWordListDesc);\n }\n};\n\nclass LexerHaskell : public DefaultLexer {\n bool literate;\n Sci_Position firstImportLine;\n int firstImportIndent;\n WordList keywords;\n WordList ffi;\n WordList reserved_operators;\n OptionsHaskell options;\n OptionSetHaskell osHaskell;\n\n enum HashCount {\n oneHash\n ,twoHashes\n ,unlimitedHashes\n };\n\n enum KeywordMode {\n HA_MODE_DEFAULT = 0\n ,HA_MODE_IMPORT1 = 1 // after \"import\", before \"qualified\" or \"safe\" or package name or module name.\n ,HA_MODE_IMPORT2 = 2 // after module name, before \"as\" or \"hiding\".\n ,HA_MODE_IMPORT3 = 3 // after \"as\", before \"hiding\"\n ,HA_MODE_MODULE = 4 // after \"module\", before module name.\n ,HA_MODE_FFI = 5 // after \"foreign\", before FFI keywords\n ,HA_MODE_TYPE = 6 // after \"type\" or \"data\", before \"family\"\n };\n\n enum LiterateMode {\n LITERATE_BIRD = 0 // if '>' is the first character on the line,\n // color '>' as a codedelim and the rest of\n // the line as code.\n // else if \"\\begin{code}\" is the only word on the\n // line except whitespace, switch to LITERATE_BLOCK\n // otherwise color the line as a literate comment.\n ,LITERATE_BLOCK = 1 // if the string \"\\end{code}\" is encountered at column\n // 0 ignoring all later characters, color the line\n // as a codedelim and switch to LITERATE_BIRD\n // otherwise color the line as code.\n };\n\n struct HaskellLineInfo {\n unsigned int nestLevel; // 22 bits ought to be enough for anybody\n unsigned int nonexternalStyle; // 5 bits, widen if number of styles goes\n // beyond 31.\n bool pragma;\n LiterateMode lmode;\n KeywordMode mode;\n\n HaskellLineInfo(int state) :\n nestLevel (state >> 10)\n , nonexternalStyle ((state >> 5) & 0x1F)\n , pragma ((state >> 4) & 0x1)\n , lmode (static_cast((state >> 3) & 0x1))\n , mode (static_cast(state & 0x7))\n {}\n\n int ToLineState() {\n return\n (nestLevel << 10)\n | (nonexternalStyle << 5)\n | (pragma << 4)\n | (lmode << 3)\n | mode;\n }\n };\n\n inline void skipMagicHash(StyleContext &sc, const HashCount hashes) const {\n if (options.magicHash && sc.ch == '#') {\n sc.Forward();\n if (hashes == twoHashes && sc.ch == '#') {\n sc.Forward();\n } else if (hashes == unlimitedHashes) {\n while (sc.ch == '#') {\n sc.Forward();\n }\n }\n }\n }\n\n bool LineContainsImport(const Sci_Position line, Accessor &styler) const {\n if (options.foldImports) {\n Sci_Position currentPos = styler.LineStart(line);\n int style = styler.StyleAt(currentPos);\n\n Sci_Position eol_pos = styler.LineStart(line + 1) - 1;\n\n while (currentPos < eol_pos) {\n int ch = styler[currentPos];\n style = styler.StyleAt(currentPos);\n\n if (ch == ' ' || ch == '\\t'\n || IsCommentBlockStyle(style)\n || style == SCE_HA_LITERATE_CODEDELIM) {\n currentPos++;\n } else {\n break;\n }\n }\n\n return (style == SCE_HA_KEYWORD\n && styler.Match(currentPos, \"import\"));\n } else {\n return false;\n }\n }\n\n inline int IndentAmountWithOffset(Accessor &styler, const Sci_Position line) const {\n const int indent = HaskellIndentAmount(styler, line);\n const int indentLevel = indent & SC_FOLDLEVELNUMBERMASK;\n return indentLevel <= ((firstImportIndent - 1) + SC_FOLDLEVELBASE)\n ? indent\n : (indentLevel + firstImportIndent) | (indent & ~SC_FOLDLEVELNUMBERMASK);\n }\n\n inline int IndentLevelRemoveIndentOffset(const int indentLevel) const {\n return indentLevel <= ((firstImportIndent - 1) + SC_FOLDLEVELBASE)\n ? indentLevel\n : indentLevel - firstImportIndent;\n }\n\npublic:\n LexerHaskell(bool literate_)\n : DefaultLexer(literate_ ? \"literatehaskell\" : \"haskell\", literate_ ? SCLEX_LITERATEHASKELL : SCLEX_HASKELL)\n\t , literate(literate_)\n , firstImportLine(-1)\n , firstImportIndent(0)\n {}\n virtual ~LexerHaskell() {}\n\n void SCI_METHOD Release() override {\n delete this;\n }\n\n int SCI_METHOD Version() const override {\n return lvRelease5;\n }\n\n const char * SCI_METHOD PropertyNames() override {\n return osHaskell.PropertyNames();\n }\n\n int SCI_METHOD PropertyType(const char *name) override {\n return osHaskell.PropertyType(name);\n }\n\n const char * SCI_METHOD DescribeProperty(const char *name) override {\n return osHaskell.DescribeProperty(name);\n }\n\n Sci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\n const char * SCI_METHOD PropertyGet(const char *key) override {\n\t return osHaskell.PropertyGet(key);\n }\n\n const char * SCI_METHOD DescribeWordListSets() override {\n return osHaskell.DescribeWordListSets();\n }\n\n Sci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\n void SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n void SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n void * SCI_METHOD PrivateCall(int, void *) override {\n return 0;\n }\n\n static ILexer5 *LexerFactoryHaskell() {\n return new LexerHaskell(false);\n }\n\n static ILexer5 *LexerFactoryLiterateHaskell() {\n return new LexerHaskell(true);\n }\n};\n\nSci_Position SCI_METHOD LexerHaskell::PropertySet(const char *key, const char *val) {\n if (osHaskell.PropertySet(&options, key, val)) {\n return 0;\n }\n return -1;\n}\n\nSci_Position SCI_METHOD LexerHaskell::WordListSet(int n, const char *wl) {\n WordList *wordListN = 0;\n switch (n) {\n case 0:\n wordListN = &keywords;\n break;\n case 1:\n wordListN = &ffi;\n break;\n case 2:\n wordListN = &reserved_operators;\n break;\n }\n Sci_Position firstModification = -1;\n if (wordListN) {\n WordList wlNew;\n wlNew.Set(wl);\n if (*wordListN != wlNew) {\n wordListN->Set(wl);\n firstModification = 0;\n }\n }\n return firstModification;\n}\n\nvoid SCI_METHOD LexerHaskell::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle\n ,IDocument *pAccess) {\n LexAccessor styler(pAccess);\n\n Sci_Position lineCurrent = styler.GetLine(startPos);\n\n HaskellLineInfo hs = HaskellLineInfo(lineCurrent ? styler.GetLineState(lineCurrent-1) : 0);\n\n // Do not leak onto next line\n if (initStyle == SCE_HA_STRINGEOL)\n initStyle = SCE_HA_DEFAULT;\n else if (initStyle == SCE_HA_LITERATE_CODEDELIM)\n initStyle = hs.nonexternalStyle;\n\n StyleContext sc(startPos, length, initStyle, styler);\n\n int base = 10;\n bool dot = false;\n\n bool inDashes = false;\n bool alreadyInTheMiddleOfOperator = false;\n\n assert(!(IsCommentBlockStyle(initStyle) && hs.nestLevel == 0));\n\n while (sc.More()) {\n // Check for state end\n\n if (!IsExternalStyle(sc.state)) {\n hs.nonexternalStyle = sc.state;\n }\n\n // For lexer to work, states should unconditionally forward at least one\n // character.\n // If they don't, they should still check if they are at line end and\n // forward if so.\n // If a state forwards more than one character, it should check every time\n // that it is not a line end and cease forwarding otherwise.\n if (sc.atLineEnd) {\n // Remember the line state for future incremental lexing\n styler.SetLineState(lineCurrent, hs.ToLineState());\n lineCurrent++;\n }\n\n // Handle line continuation generically.\n if (sc.ch == '\\\\' && (sc.chNext == '\\n' || sc.chNext == '\\r')\n && ( sc.state == SCE_HA_STRING\n || sc.state == SCE_HA_PREPROCESSOR)) {\n // Remember the line state for future incremental lexing\n styler.SetLineState(lineCurrent, hs.ToLineState());\n lineCurrent++;\n\n sc.Forward();\n if (sc.ch == '\\r' && sc.chNext == '\\n') {\n sc.Forward();\n }\n sc.Forward();\n\n continue;\n }\n\n if (sc.atLineStart) {\n\n if (sc.state == SCE_HA_STRING || sc.state == SCE_HA_CHARACTER) {\n // Prevent SCE_HA_STRINGEOL from leaking back to previous line\n sc.SetState(sc.state);\n }\n\n if (literate && hs.lmode == LITERATE_BIRD) {\n if (!IsExternalStyle(sc.state)) {\n sc.SetState(SCE_HA_LITERATE_COMMENT);\n }\n }\n }\n\n // External\n // Literate\n if ( literate && hs.lmode == LITERATE_BIRD && sc.atLineStart\n && sc.ch == '>') {\n sc.SetState(SCE_HA_LITERATE_CODEDELIM);\n sc.ForwardSetState(hs.nonexternalStyle);\n }\n else if (literate && hs.lmode == LITERATE_BIRD && sc.atLineStart\n && ( sc.ch == ' ' || sc.ch == '\\t'\n || sc.Match(\"\\\\begin{code}\"))) {\n sc.SetState(sc.state);\n\n while ((sc.ch == ' ' || sc.ch == '\\t') && sc.More())\n sc.Forward();\n\n if (sc.Match(\"\\\\begin{code}\")) {\n sc.Forward(static_cast(strlen(\"\\\\begin{code}\")));\n\n bool correct = true;\n\n while (!sc.atLineEnd && sc.More()) {\n if (sc.ch != ' ' && sc.ch != '\\t') {\n correct = false;\n }\n sc.Forward();\n }\n\n if (correct) {\n sc.ChangeState(SCE_HA_LITERATE_CODEDELIM); // color the line end\n hs.lmode = LITERATE_BLOCK;\n }\n }\n }\n else if (literate && hs.lmode == LITERATE_BLOCK && sc.atLineStart\n && sc.Match(\"\\\\end{code}\")) {\n sc.SetState(SCE_HA_LITERATE_CODEDELIM);\n\n sc.Forward(static_cast(strlen(\"\\\\end{code}\")));\n\n while (!sc.atLineEnd && sc.More()) {\n sc.Forward();\n }\n\n sc.SetState(SCE_HA_LITERATE_COMMENT);\n hs.lmode = LITERATE_BIRD;\n }\n // Preprocessor\n else if (sc.atLineStart && sc.ch == '#' && options.cpp\n && (!options.stylingWithinPreprocessor || sc.state == SCE_HA_DEFAULT)) {\n sc.SetState(SCE_HA_PREPROCESSOR);\n sc.Forward();\n }\n // Literate\n else if (sc.state == SCE_HA_LITERATE_COMMENT) {\n sc.Forward();\n }\n else if (sc.state == SCE_HA_LITERATE_CODEDELIM) {\n sc.ForwardSetState(hs.nonexternalStyle);\n }\n // Preprocessor\n else if (sc.state == SCE_HA_PREPROCESSOR) {\n if (sc.atLineEnd) {\n sc.SetState(options.stylingWithinPreprocessor\n ? SCE_HA_DEFAULT\n : hs.nonexternalStyle);\n sc.Forward(); // prevent double counting a line\n } else if (options.stylingWithinPreprocessor && !IsHaskellLetter(sc.ch)) {\n sc.SetState(SCE_HA_DEFAULT);\n } else {\n sc.Forward();\n }\n }\n // Haskell\n // Operator\n else if (sc.state == SCE_HA_OPERATOR) {\n int style = SCE_HA_OPERATOR;\n\n if ( sc.ch == ':'\n && !alreadyInTheMiddleOfOperator\n // except \"::\"\n && !( sc.chNext == ':'\n && !IsAnHaskellOperatorChar(sc.GetRelative(2)))) {\n style = SCE_HA_CAPITAL;\n }\n\n alreadyInTheMiddleOfOperator = false;\n\n while (IsAnHaskellOperatorChar(sc.ch))\n sc.Forward();\n\n char s[100];\n sc.GetCurrent(s, sizeof(s));\n\n if (reserved_operators.InList(s))\n style = SCE_HA_RESERVED_OPERATOR;\n\n sc.ChangeState(style);\n sc.SetState(SCE_HA_DEFAULT);\n }\n // String\n else if (sc.state == SCE_HA_STRING) {\n if (sc.atLineEnd) {\n sc.ChangeState(SCE_HA_STRINGEOL);\n sc.ForwardSetState(SCE_HA_DEFAULT);\n } else if (sc.ch == '\\\"') {\n sc.Forward();\n skipMagicHash(sc, oneHash);\n sc.SetState(SCE_HA_DEFAULT);\n } else if (sc.ch == '\\\\') {\n sc.Forward(2);\n } else {\n sc.Forward();\n }\n }\n // Char\n else if (sc.state == SCE_HA_CHARACTER) {\n if (sc.atLineEnd) {\n sc.ChangeState(SCE_HA_STRINGEOL);\n sc.ForwardSetState(SCE_HA_DEFAULT);\n } else if (sc.ch == '\\'') {\n sc.Forward();\n skipMagicHash(sc, oneHash);\n sc.SetState(SCE_HA_DEFAULT);\n } else if (sc.ch == '\\\\') {\n sc.Forward(2);\n } else {\n sc.Forward();\n }\n }\n // Number\n else if (sc.state == SCE_HA_NUMBER) {\n if (sc.atLineEnd) {\n sc.SetState(SCE_HA_DEFAULT);\n sc.Forward(); // prevent double counting a line\n } else if (IsADigit(sc.ch, base)) {\n sc.Forward();\n } else if (sc.ch=='.' && dot && IsADigit(sc.chNext, base)) {\n sc.Forward(2);\n dot = false;\n } else if ((base == 10) &&\n (sc.ch == 'e' || sc.ch == 'E') &&\n (IsADigit(sc.chNext) || sc.chNext == '+' || sc.chNext == '-')) {\n sc.Forward();\n if (sc.ch == '+' || sc.ch == '-')\n sc.Forward();\n } else {\n skipMagicHash(sc, twoHashes);\n sc.SetState(SCE_HA_DEFAULT);\n }\n }\n // Keyword or Identifier\n else if (sc.state == SCE_HA_IDENTIFIER) {\n int style = IsHaskellUpperCase(sc.ch) ? SCE_HA_CAPITAL : SCE_HA_IDENTIFIER;\n\n assert(IsAHaskellWordStart(sc.ch));\n\n sc.Forward();\n\n while (sc.More()) {\n if (IsAHaskellWordChar(sc.ch)) {\n sc.Forward();\n } else if (sc.ch == '.' && style == SCE_HA_CAPITAL) {\n if (IsHaskellUpperCase(sc.chNext)) {\n sc.Forward();\n style = SCE_HA_CAPITAL;\n } else if (IsAHaskellWordStart(sc.chNext)) {\n sc.Forward();\n style = SCE_HA_IDENTIFIER;\n } else if (IsAnHaskellOperatorChar(sc.chNext)) {\n sc.Forward();\n style = sc.ch == ':' ? SCE_HA_CAPITAL : SCE_HA_OPERATOR;\n while (IsAnHaskellOperatorChar(sc.ch))\n sc.Forward();\n break;\n } else {\n break;\n }\n } else {\n break;\n }\n }\n\n skipMagicHash(sc, unlimitedHashes);\n\n char s[100];\n sc.GetCurrent(s, sizeof(s));\n\n KeywordMode new_mode = HA_MODE_DEFAULT;\n\n if (keywords.InList(s)) {\n style = SCE_HA_KEYWORD;\n } else if (style == SCE_HA_CAPITAL) {\n if (hs.mode == HA_MODE_IMPORT1 || hs.mode == HA_MODE_IMPORT3) {\n style = SCE_HA_MODULE;\n new_mode = HA_MODE_IMPORT2;\n } else if (hs.mode == HA_MODE_MODULE) {\n style = SCE_HA_MODULE;\n }\n } else if (hs.mode == HA_MODE_IMPORT1 &&\n strcmp(s,\"qualified\") == 0) {\n style = SCE_HA_KEYWORD;\n new_mode = HA_MODE_IMPORT1;\n } else if (options.highlightSafe &&\n hs.mode == HA_MODE_IMPORT1 &&\n strcmp(s,\"safe\") == 0) {\n style = SCE_HA_KEYWORD;\n new_mode = HA_MODE_IMPORT1;\n } else if (hs.mode == HA_MODE_IMPORT2) {\n if (strcmp(s,\"as\") == 0) {\n style = SCE_HA_KEYWORD;\n new_mode = HA_MODE_IMPORT3;\n } else if (strcmp(s,\"hiding\") == 0) {\n style = SCE_HA_KEYWORD;\n }\n } else if (hs.mode == HA_MODE_TYPE) {\n if (strcmp(s,\"family\") == 0)\n style = SCE_HA_KEYWORD;\n }\n\n if (hs.mode == HA_MODE_FFI) {\n if (ffi.InList(s)) {\n style = SCE_HA_KEYWORD;\n new_mode = HA_MODE_FFI;\n }\n }\n\n sc.ChangeState(style);\n sc.SetState(SCE_HA_DEFAULT);\n\n if (strcmp(s,\"import\") == 0 && hs.mode != HA_MODE_FFI)\n new_mode = HA_MODE_IMPORT1;\n else if (strcmp(s,\"module\") == 0)\n new_mode = HA_MODE_MODULE;\n else if (strcmp(s,\"foreign\") == 0)\n new_mode = HA_MODE_FFI;\n else if (strcmp(s,\"type\") == 0\n || strcmp(s,\"data\") == 0)\n new_mode = HA_MODE_TYPE;\n\n hs.mode = new_mode;\n }\n\n // Comments\n // Oneliner\n else if (sc.state == SCE_HA_COMMENTLINE) {\n if (sc.atLineEnd) {\n sc.SetState(hs.pragma ? SCE_HA_PRAGMA : SCE_HA_DEFAULT);\n sc.Forward(); // prevent double counting a line\n } else if (inDashes && sc.ch != '-' && !hs.pragma) {\n inDashes = false;\n if (IsAnHaskellOperatorChar(sc.ch)) {\n alreadyInTheMiddleOfOperator = true;\n sc.ChangeState(SCE_HA_OPERATOR);\n }\n } else {\n sc.Forward();\n }\n }\n // Nested\n else if (IsCommentBlockStyle(sc.state)) {\n if (sc.Match('{','-')) {\n sc.SetState(CommentBlockStyleFromNestLevel(hs.nestLevel));\n sc.Forward(2);\n hs.nestLevel++;\n } else if (sc.Match('-','}')) {\n sc.Forward(2);\n assert(hs.nestLevel > 0);\n if (hs.nestLevel > 0)\n hs.nestLevel--;\n sc.SetState(\n hs.nestLevel == 0\n ? (hs.pragma ? SCE_HA_PRAGMA : SCE_HA_DEFAULT)\n : CommentBlockStyleFromNestLevel(hs.nestLevel - 1));\n } else {\n sc.Forward();\n }\n }\n // Pragma\n else if (sc.state == SCE_HA_PRAGMA) {\n if (sc.Match(\"#-}\")) {\n hs.pragma = false;\n sc.Forward(3);\n sc.SetState(SCE_HA_DEFAULT);\n } else if (sc.Match('-','-')) {\n sc.SetState(SCE_HA_COMMENTLINE);\n sc.Forward(2);\n inDashes = false;\n } else if (sc.Match('{','-')) {\n sc.SetState(CommentBlockStyleFromNestLevel(hs.nestLevel));\n sc.Forward(2);\n hs.nestLevel = 1;\n } else {\n sc.Forward();\n }\n }\n // New state?\n else if (sc.state == SCE_HA_DEFAULT) {\n // Digit\n if (IsADigit(sc.ch)) {\n hs.mode = HA_MODE_DEFAULT;\n\n sc.SetState(SCE_HA_NUMBER);\n if (sc.ch == '0' && (sc.chNext == 'X' || sc.chNext == 'x')) {\n // Match anything starting with \"0x\" or \"0X\", too\n sc.Forward(2);\n base = 16;\n dot = false;\n } else if (sc.ch == '0' && (sc.chNext == 'O' || sc.chNext == 'o')) {\n // Match anything starting with \"0o\" or \"0O\", too\n sc.Forward(2);\n base = 8;\n dot = false;\n } else {\n sc.Forward();\n base = 10;\n dot = true;\n }\n }\n // Pragma\n else if (sc.Match(\"{-#\")) {\n hs.pragma = true;\n sc.SetState(SCE_HA_PRAGMA);\n sc.Forward(3);\n }\n // Comment line\n else if (sc.Match('-','-')) {\n sc.SetState(SCE_HA_COMMENTLINE);\n sc.Forward(2);\n inDashes = true;\n }\n // Comment block\n else if (sc.Match('{','-')) {\n sc.SetState(CommentBlockStyleFromNestLevel(hs.nestLevel));\n sc.Forward(2);\n hs.nestLevel = 1;\n }\n // String\n else if (sc.ch == '\\\"') {\n sc.SetState(SCE_HA_STRING);\n sc.Forward();\n }\n // Character or quoted name or promoted term\n else if (sc.ch == '\\'') {\n hs.mode = HA_MODE_DEFAULT;\n\n sc.SetState(SCE_HA_CHARACTER);\n sc.Forward();\n\n if (options.allowQuotes) {\n // Quoted type ''T\n if (sc.ch=='\\'' && IsAHaskellWordStart(sc.chNext)) {\n sc.Forward();\n sc.ChangeState(SCE_HA_IDENTIFIER);\n } else if (sc.chNext != '\\'') {\n // Quoted name 'n or promoted constructor 'N\n if (IsAHaskellWordStart(sc.ch)) {\n sc.ChangeState(SCE_HA_IDENTIFIER);\n // Promoted constructor operator ':~>\n } else if (sc.ch == ':') {\n alreadyInTheMiddleOfOperator = false;\n sc.ChangeState(SCE_HA_OPERATOR);\n // Promoted list or tuple '[T]\n } else if (sc.ch == '[' || sc.ch== '(') {\n sc.ChangeState(SCE_HA_OPERATOR);\n sc.ForwardSetState(SCE_HA_DEFAULT);\n }\n }\n }\n }\n // Operator starting with '?' or an implicit parameter\n else if (sc.ch == '?') {\n hs.mode = HA_MODE_DEFAULT;\n\n alreadyInTheMiddleOfOperator = false;\n sc.SetState(SCE_HA_OPERATOR);\n\n if ( options.implicitParams\n && IsAHaskellWordStart(sc.chNext)\n && !IsHaskellUpperCase(sc.chNext)) {\n sc.Forward();\n sc.ChangeState(SCE_HA_IDENTIFIER);\n }\n }\n // Operator\n else if (IsAnHaskellOperatorChar(sc.ch)) {\n hs.mode = HA_MODE_DEFAULT;\n\n sc.SetState(SCE_HA_OPERATOR);\n }\n // Braces and punctuation\n else if (sc.ch == ',' || sc.ch == ';'\n || sc.ch == '(' || sc.ch == ')'\n || sc.ch == '[' || sc.ch == ']'\n || sc.ch == '{' || sc.ch == '}') {\n sc.SetState(SCE_HA_OPERATOR);\n sc.ForwardSetState(SCE_HA_DEFAULT);\n }\n // Keyword or Identifier\n else if (IsAHaskellWordStart(sc.ch)) {\n sc.SetState(SCE_HA_IDENTIFIER);\n // Something we don't care about\n } else {\n sc.Forward();\n }\n }\n // This branch should never be reached.\n else {\n assert(false);\n sc.Forward();\n }\n }\n sc.Complete();\n}\n\nvoid SCI_METHOD LexerHaskell::Fold(Sci_PositionU startPos, Sci_Position length, int // initStyle\n ,IDocument *pAccess) {\n if (!options.fold)\n return;\n\n Accessor styler(pAccess, NULL);\n\n Sci_Position lineCurrent = styler.GetLine(startPos);\n\n if (lineCurrent <= firstImportLine) {\n firstImportLine = -1; // readjust first import position\n firstImportIndent = 0;\n }\n\n const Sci_Position maxPos = startPos + length;\n const Sci_Position maxLines =\n maxPos == styler.Length()\n ? styler.GetLine(maxPos)\n : styler.GetLine(maxPos - 1); // Requested last line\n const Sci_Position docLines = styler.GetLine(styler.Length()); // Available last line\n\n // Backtrack to previous non-blank line so we can determine indent level\n // for any white space lines\n // and so we can fix any preceding fold level (which is why we go back\n // at least one line in all cases)\n bool importHere = LineContainsImport(lineCurrent, styler);\n int indentCurrent = IndentAmountWithOffset(styler, lineCurrent);\n\n while (lineCurrent > 0) {\n lineCurrent--;\n importHere = LineContainsImport(lineCurrent, styler);\n indentCurrent = IndentAmountWithOffset(styler, lineCurrent);\n if (!(indentCurrent & SC_FOLDLEVELWHITEFLAG))\n break;\n }\n\n int indentCurrentLevel = indentCurrent & SC_FOLDLEVELNUMBERMASK;\n\n if (importHere) {\n indentCurrentLevel = IndentLevelRemoveIndentOffset(indentCurrentLevel);\n if (firstImportLine == -1) {\n firstImportLine = lineCurrent;\n firstImportIndent = (1 + indentCurrentLevel) - SC_FOLDLEVELBASE;\n }\n if (firstImportLine != lineCurrent) {\n indentCurrentLevel++;\n }\n }\n\n indentCurrent = indentCurrentLevel | (indentCurrent & ~SC_FOLDLEVELNUMBERMASK);\n\n // Process all characters to end of requested range\n //that hangs over the end of the range. Cap processing in all cases\n // to end of document.\n while (lineCurrent <= docLines && lineCurrent <= maxLines) {\n\n // Gather info\n Sci_Position lineNext = lineCurrent + 1;\n importHere = false;\n int indentNext = indentCurrent;\n\n if (lineNext <= docLines) {\n // Information about next line is only available if not at end of document\n importHere = LineContainsImport(lineNext, styler);\n indentNext = IndentAmountWithOffset(styler, lineNext);\n }\n if (indentNext & SC_FOLDLEVELWHITEFLAG)\n indentNext = SC_FOLDLEVELWHITEFLAG | indentCurrentLevel;\n\n // Skip past any blank lines for next indent level info; we skip also\n // comments (all comments, not just those starting in column 0)\n // which effectively folds them into surrounding code rather\n // than screwing up folding.\n\n while (lineNext < docLines && (indentNext & SC_FOLDLEVELWHITEFLAG)) {\n lineNext++;\n importHere = LineContainsImport(lineNext, styler);\n indentNext = IndentAmountWithOffset(styler, lineNext);\n }\n\n int indentNextLevel = indentNext & SC_FOLDLEVELNUMBERMASK;\n\n if (importHere) {\n indentNextLevel = IndentLevelRemoveIndentOffset(indentNextLevel);\n if (firstImportLine == -1) {\n firstImportLine = lineNext;\n firstImportIndent = (1 + indentNextLevel) - SC_FOLDLEVELBASE;\n }\n if (firstImportLine != lineNext) {\n indentNextLevel++;\n }\n }\n\n indentNext = indentNextLevel | (indentNext & ~SC_FOLDLEVELNUMBERMASK);\n\n const int levelBeforeComments = Maximum(indentCurrentLevel,indentNextLevel);\n\n // Now set all the indent levels on the lines we skipped\n // Do this from end to start. Once we encounter one line\n // which is indented more than the line after the end of\n // the comment-block, use the level of the block before\n\n Sci_Position skipLine = lineNext;\n int skipLevel = indentNextLevel;\n\n while (--skipLine > lineCurrent) {\n int skipLineIndent = IndentAmountWithOffset(styler, skipLine);\n\n if (options.foldCompact) {\n if ((skipLineIndent & SC_FOLDLEVELNUMBERMASK) > indentNextLevel) {\n skipLevel = levelBeforeComments;\n }\n\n int whiteFlag = skipLineIndent & SC_FOLDLEVELWHITEFLAG;\n\n styler.SetLevel(skipLine, skipLevel | whiteFlag);\n } else {\n if ( (skipLineIndent & SC_FOLDLEVELNUMBERMASK) > indentNextLevel\n && !(skipLineIndent & SC_FOLDLEVELWHITEFLAG)) {\n skipLevel = levelBeforeComments;\n }\n\n styler.SetLevel(skipLine, skipLevel);\n }\n }\n\n int lev = indentCurrent;\n\n if (!(indentCurrent & SC_FOLDLEVELWHITEFLAG)) {\n if ((indentCurrent & SC_FOLDLEVELNUMBERMASK) < (indentNext & SC_FOLDLEVELNUMBERMASK))\n lev |= SC_FOLDLEVELHEADERFLAG;\n }\n\n // Set fold level for this line and move to next line\n styler.SetLevel(lineCurrent, options.foldCompact ? lev : lev & ~SC_FOLDLEVELWHITEFLAG);\n\n indentCurrent = indentNext;\n indentCurrentLevel = indentNextLevel;\n lineCurrent = lineNext;\n }\n\n // NOTE: Cannot set level of last line here because indentCurrent doesn't have\n // header flag set; the loop above is crafted to take care of this case!\n //styler.SetLevel(lineCurrent, indentCurrent);\n}\n\nextern const LexerModule lmHaskell(SCLEX_HASKELL, LexerHaskell::LexerFactoryHaskell, \"haskell\", haskellWordListDesc);\nextern const LexerModule lmLiterateHaskell(SCLEX_LITERATEHASKELL, LexerHaskell::LexerFactoryLiterateHaskell, \"literatehaskell\", haskellWordListDesc);\n" }, { "path": "lexers/LexHex.cxx", "content": "// Scintilla source code edit control\n/** @file LexHex.cxx\n ** Lexers for Motorola S-Record, Intel HEX and Tektronix extended HEX.\n **\n ** Written by Markus Heidelberg\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n/*\n * Motorola S-Record\n * ===============================\n *\n * Each record (line) is built as follows:\n *\n * field digits states\n *\n * +----------+\n * | start | 1 ('S') SCE_HEX_RECSTART\n * +----------+\n * | type | 1 SCE_HEX_RECTYPE, (SCE_HEX_RECTYPE_UNKNOWN)\n * +----------+\n * | count | 2 SCE_HEX_BYTECOUNT, SCE_HEX_BYTECOUNT_WRONG\n * +----------+\n * | address | 4/6/8 SCE_HEX_NOADDRESS, SCE_HEX_DATAADDRESS, SCE_HEX_RECCOUNT, SCE_HEX_STARTADDRESS, (SCE_HEX_ADDRESSFIELD_UNKNOWN)\n * +----------+\n * | data | 0..504/502/500 SCE_HEX_DATA_ODD, SCE_HEX_DATA_EVEN, SCE_HEX_DATA_EMPTY, (SCE_HEX_DATA_UNKNOWN)\n * +----------+\n * | checksum | 2 SCE_HEX_CHECKSUM, SCE_HEX_CHECKSUM_WRONG\n * +----------+\n *\n *\n * Intel HEX\n * ===============================\n *\n * Each record (line) is built as follows:\n *\n * field digits states\n *\n * +----------+\n * | start | 1 (':') SCE_HEX_RECSTART\n * +----------+\n * | count | 2 SCE_HEX_BYTECOUNT, SCE_HEX_BYTECOUNT_WRONG\n * +----------+\n * | address | 4 SCE_HEX_NOADDRESS, SCE_HEX_DATAADDRESS, (SCE_HEX_ADDRESSFIELD_UNKNOWN)\n * +----------+\n * | type | 2 SCE_HEX_RECTYPE, (SCE_HEX_RECTYPE_UNKNOWN)\n * +----------+\n * | data | 0..510 SCE_HEX_DATA_ODD, SCE_HEX_DATA_EVEN, SCE_HEX_DATA_EMPTY, SCE_HEX_EXTENDEDADDRESS, SCE_HEX_STARTADDRESS, (SCE_HEX_DATA_UNKNOWN)\n * +----------+\n * | checksum | 2 SCE_HEX_CHECKSUM, SCE_HEX_CHECKSUM_WRONG\n * +----------+\n *\n *\n * Folding:\n *\n * Data records (type 0x00), which follow an extended address record (type\n * 0x02 or 0x04), can be folded. The extended address record is the fold\n * point at fold level 0, the corresponding data records are set to level 1.\n *\n * Any record, which is not a data record, sets the fold level back to 0.\n * Any line, which is not a record (blank lines and lines starting with a\n * character other than ':'), leaves the fold level unchanged.\n *\n *\n * Tektronix extended HEX\n * ===============================\n *\n * Each record (line) is built as follows:\n *\n * field digits states\n *\n * +----------+\n * | start | 1 ('%') SCE_HEX_RECSTART\n * +----------+\n * | length | 2 SCE_HEX_BYTECOUNT, SCE_HEX_BYTECOUNT_WRONG\n * +----------+\n * | type | 1 SCE_HEX_RECTYPE, (SCE_HEX_RECTYPE_UNKNOWN)\n * +----------+\n * | checksum | 2 SCE_HEX_CHECKSUM, SCE_HEX_CHECKSUM_WRONG\n * +----------+\n * | address | 9 SCE_HEX_DATAADDRESS, SCE_HEX_STARTADDRESS, (SCE_HEX_ADDRESSFIELD_UNKNOWN)\n * +----------+\n * | data | 0..241 SCE_HEX_DATA_ODD, SCE_HEX_DATA_EVEN\n * +----------+\n *\n *\n * General notes for all lexers\n * ===============================\n *\n * - Depending on where the helper functions are invoked, some of them have to\n * read beyond the current position. In case of malformed data (record too\n * short), it has to be ensured that this either does not have bad influence\n * or will be captured deliberately.\n *\n * - States in parentheses in the upper format descriptions indicate that they\n * should not appear in a valid hex file.\n *\n * - State SCE_HEX_GARBAGE means garbage data after the intended end of the\n * record, the line is too long then. This state is used in all lexers.\n */\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n// prototypes for general helper functions\nstatic inline bool IsNewline(const int ch);\nstatic int GetHexaNibble(char hd);\nstatic int GetHexaChar(char hd1, char hd2);\nstatic int GetHexaChar(Sci_PositionU pos, Accessor &styler);\nstatic bool ForwardWithinLine(StyleContext &sc, Sci_Position nb = 1);\nstatic bool PosInSameRecord(Sci_PositionU pos1, Sci_PositionU pos2, Accessor &styler);\nstatic Sci_Position CountByteCount(Sci_PositionU startPos, Sci_Position uncountedDigits, Accessor &styler);\nstatic int CalcChecksum(Sci_PositionU startPos, Sci_Position cnt, bool twosCompl, Accessor &styler);\n\n// prototypes for file format specific helper functions\nstatic Sci_PositionU GetSrecRecStartPosition(Sci_PositionU pos, Accessor &styler);\nstatic int GetSrecByteCount(Sci_PositionU recStartPos, Accessor &styler);\nstatic Sci_Position CountSrecByteCount(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetSrecAddressFieldSize(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetSrecAddressFieldType(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetSrecDataFieldType(Sci_PositionU recStartPos, Accessor &styler);\nstatic Sci_Position GetSrecRequiredDataFieldSize(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetSrecChecksum(Sci_PositionU recStartPos, Accessor &styler);\nstatic int CalcSrecChecksum(Sci_PositionU recStartPos, Accessor &styler);\n\nstatic Sci_PositionU GetIHexRecStartPosition(Sci_PositionU pos, Accessor &styler);\nstatic int GetIHexByteCount(Sci_PositionU recStartPos, Accessor &styler);\nstatic Sci_Position CountIHexByteCount(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetIHexAddressFieldType(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetIHexDataFieldType(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetIHexRequiredDataFieldSize(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetIHexChecksum(Sci_PositionU recStartPos, Accessor &styler);\nstatic int CalcIHexChecksum(Sci_PositionU recStartPos, Accessor &styler);\n\nstatic int GetTEHexDigitCount(Sci_PositionU recStartPos, Accessor &styler);\nstatic Sci_Position CountTEHexDigitCount(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetTEHexAddressFieldType(Sci_PositionU recStartPos, Accessor &styler);\nstatic int GetTEHexChecksum(Sci_PositionU recStartPos, Accessor &styler);\nstatic int CalcTEHexChecksum(Sci_PositionU recStartPos, Accessor &styler);\n\nstatic inline bool IsNewline(const int ch)\n{\n return (ch == '\\n' || ch == '\\r');\n}\n\nstatic int GetHexaNibble(char hd)\n{\n\tint hexValue = 0;\n\n\tif (hd >= '0' && hd <= '9') {\n\t\thexValue += hd - '0';\n\t} else if (hd >= 'A' && hd <= 'F') {\n\t\thexValue += hd - 'A' + 10;\n\t} else if (hd >= 'a' && hd <= 'f') {\n\t\thexValue += hd - 'a' + 10;\n\t} else {\n\t\treturn -1;\n\t}\n\n\treturn hexValue;\n}\n\nstatic int GetHexaChar(char hd1, char hd2)\n{\n\tint hexValue = 0;\n\n\tif (hd1 >= '0' && hd1 <= '9') {\n\t\thexValue += 16 * (hd1 - '0');\n\t} else if (hd1 >= 'A' && hd1 <= 'F') {\n\t\thexValue += 16 * (hd1 - 'A' + 10);\n\t} else if (hd1 >= 'a' && hd1 <= 'f') {\n\t\thexValue += 16 * (hd1 - 'a' + 10);\n\t} else {\n\t\treturn -1;\n\t}\n\n\tif (hd2 >= '0' && hd2 <= '9') {\n\t\thexValue += hd2 - '0';\n\t} else if (hd2 >= 'A' && hd2 <= 'F') {\n\t\thexValue += hd2 - 'A' + 10;\n\t} else if (hd2 >= 'a' && hd2 <= 'f') {\n\t\thexValue += hd2 - 'a' + 10;\n\t} else {\n\t\treturn -1;\n\t}\n\n\treturn hexValue;\n}\n\nstatic int GetHexaChar(Sci_PositionU pos, Accessor &styler)\n{\n\tchar highNibble, lowNibble;\n\n\thighNibble = styler.SafeGetCharAt(pos);\n\tlowNibble = styler.SafeGetCharAt(pos + 1);\n\n\treturn GetHexaChar(highNibble, lowNibble);\n}\n\n// Forward characters, but abort (and return false) if hitting the line\n// end. Return true if forwarding within the line was possible.\n// Avoids influence on highlighting of the subsequent line if the current line\n// is malformed (too short).\nstatic bool ForwardWithinLine(StyleContext &sc, Sci_Position nb)\n{\n\tfor (Sci_Position i = 0; i < nb; i++) {\n\t\tif (sc.atLineEnd) {\n\t\t\t// line is too short\n\t\t\tsc.SetState(SCE_HEX_DEFAULT);\n\t\t\tsc.Forward();\n\t\t\treturn false;\n\t\t} else {\n\t\t\tsc.Forward();\n\t\t}\n\t}\n\n\treturn true;\n}\n\n// Checks whether the given positions are in the same record.\nstatic bool PosInSameRecord(Sci_PositionU pos1, Sci_PositionU pos2, Accessor &styler)\n{\n\treturn styler.GetLine(pos1) == styler.GetLine(pos2);\n}\n\n// Count the number of digit pairs from till end of record, ignoring\n// digits.\n// If the record is too short, a negative count may be returned.\nstatic Sci_Position CountByteCount(Sci_PositionU startPos, Sci_Position uncountedDigits, Accessor &styler)\n{\n\tSci_Position cnt;\n\tSci_PositionU pos;\n\n\tpos = startPos;\n\n\twhile (!IsNewline(styler.SafeGetCharAt(pos, '\\n'))) {\n\t\tpos++;\n\t}\n\n\t// number of digits in this line minus number of digits of uncounted fields\n\tcnt = static_cast(pos - startPos) - uncountedDigits;\n\n\t// Prepare round up if odd (digit pair incomplete), this way the byte\n\t// count is considered to be valid if the checksum is incomplete.\n\tif (cnt >= 0) {\n\t\tcnt++;\n\t}\n\n\t// digit pairs\n\tcnt /= 2;\n\n\treturn cnt;\n}\n\n// Calculate the checksum of the record.\n// is the position of the first character of the starting digit\n// pair, is the number of digit pairs.\nstatic int CalcChecksum(Sci_PositionU startPos, Sci_Position cnt, bool twosCompl, Accessor &styler)\n{\n\tint cs = 0;\n\n\tfor (Sci_PositionU pos = startPos; pos < startPos + cnt; pos += 2) {\n\t\tint val = GetHexaChar(pos, styler);\n\n\t\tif (val < 0) {\n\t\t\treturn val;\n\t\t}\n\n\t\t// overflow does not matter\n\t\tcs += val;\n\t}\n\n\tif (twosCompl) {\n\t\t// low byte of two's complement\n\t\treturn -cs & 0xFF;\n\t} else {\n\t\t// low byte of one's complement\n\t\treturn ~cs & 0xFF;\n\t}\n}\n\n// Get the position of the record \"start\" field (first character in line) in\n// the record around position .\nstatic Sci_PositionU GetSrecRecStartPosition(Sci_PositionU pos, Accessor &styler)\n{\n\twhile (styler.SafeGetCharAt(pos) != 'S') {\n\t\tpos--;\n\t}\n\n\treturn pos;\n}\n\n// Get the value of the \"byte count\" field, it counts the number of bytes in\n// the subsequent fields (\"address\", \"data\" and \"checksum\" fields).\nstatic int GetSrecByteCount(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tint val;\n\n\tval = GetHexaChar(recStartPos + 2, styler);\n\tif (val < 0) {\n\t val = 0;\n\t}\n\n\treturn val;\n}\n\n// Count the number of digit pairs for the \"address\", \"data\" and \"checksum\"\n// fields in this record. Has to be equal to the \"byte count\" field value.\n// If the record is too short, a negative count may be returned.\nstatic Sci_Position CountSrecByteCount(Sci_PositionU recStartPos, Accessor &styler)\n{\n\treturn CountByteCount(recStartPos, 4, styler);\n}\n\n// Get the size of the \"address\" field.\nstatic int GetSrecAddressFieldSize(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (styler.SafeGetCharAt(recStartPos + 1)) {\n\t\tcase '0':\n\t\tcase '1':\n\t\tcase '5':\n\t\tcase '9':\n\t\t\treturn 2; // 16 bit\n\n\t\tcase '2':\n\t\tcase '6':\n\t\tcase '8':\n\t\t\treturn 3; // 24 bit\n\n\t\tcase '3':\n\t\tcase '7':\n\t\t\treturn 4; // 32 bit\n\n\t\tdefault:\n\t\t\treturn 0;\n\t}\n}\n\n// Get the type of the \"address\" field content.\nstatic int GetSrecAddressFieldType(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (styler.SafeGetCharAt(recStartPos + 1)) {\n\t\tcase '0':\n\t\t\treturn SCE_HEX_NOADDRESS;\n\n\t\tcase '1':\n\t\tcase '2':\n\t\tcase '3':\n\t\t\treturn SCE_HEX_DATAADDRESS;\n\n\t\tcase '5':\n\t\tcase '6':\n\t\t\treturn SCE_HEX_RECCOUNT;\n\n\t\tcase '7':\n\t\tcase '8':\n\t\tcase '9':\n\t\t\treturn SCE_HEX_STARTADDRESS;\n\n\t\tdefault: // handle possible format extension in the future\n\t\t\treturn SCE_HEX_ADDRESSFIELD_UNKNOWN;\n\t}\n}\n\n// Get the type of the \"data\" field content.\nstatic int GetSrecDataFieldType(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (styler.SafeGetCharAt(recStartPos + 1)) {\n\t\tcase '0':\n\t\tcase '1':\n\t\tcase '2':\n\t\tcase '3':\n\t\t\treturn SCE_HEX_DATA_ODD;\n\n\t\tcase '5':\n\t\tcase '6':\n\t\tcase '7':\n\t\tcase '8':\n\t\tcase '9':\n\t\t\treturn SCE_HEX_DATA_EMPTY;\n\n\t\tdefault: // handle possible format extension in the future\n\t\t\treturn SCE_HEX_DATA_UNKNOWN;\n\t}\n}\n\n// Get the required size of the \"data\" field. Useless for block header and\n// ordinary data records (type S0, S1, S2, S3), return the value calculated\n// from the \"byte count\" and \"address field\" size in this case.\nstatic Sci_Position GetSrecRequiredDataFieldSize(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (styler.SafeGetCharAt(recStartPos + 1)) {\n\t\tcase '5':\n\t\tcase '6':\n\t\tcase '7':\n\t\tcase '8':\n\t\tcase '9':\n\t\t\treturn 0;\n\n\t\tdefault:\n\t\t\treturn GetSrecByteCount(recStartPos, styler)\n\t\t\t\t- GetSrecAddressFieldSize(recStartPos, styler)\n\t\t\t\t- 1; // -1 for checksum field\n\t}\n}\n\n// Get the value of the \"checksum\" field.\nstatic int GetSrecChecksum(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tint byteCount;\n\n\tbyteCount = GetSrecByteCount(recStartPos, styler);\n\n\treturn GetHexaChar(recStartPos + 2 + byteCount * 2, styler);\n}\n\n// Calculate the checksum of the record.\nstatic int CalcSrecChecksum(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tSci_Position byteCount;\n\n\tbyteCount = GetSrecByteCount(recStartPos, styler);\n\n\t// sum over \"byte count\", \"address\" and \"data\" fields (6..510 digits)\n\treturn CalcChecksum(recStartPos + 2, byteCount * 2, false, styler);\n}\n\n// Get the position of the record \"start\" field (first character in line) in\n// the record around position .\nstatic Sci_PositionU GetIHexRecStartPosition(Sci_PositionU pos, Accessor &styler)\n{\n\twhile (styler.SafeGetCharAt(pos) != ':') {\n\t\tpos--;\n\t}\n\n\treturn pos;\n}\n\n// Get the value of the \"byte count\" field, it counts the number of bytes in\n// the \"data\" field.\nstatic int GetIHexByteCount(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tint val;\n\n\tval = GetHexaChar(recStartPos + 1, styler);\n\tif (val < 0) {\n\t val = 0;\n\t}\n\n\treturn val;\n}\n\n// Count the number of digit pairs for the \"data\" field in this record. Has to\n// be equal to the \"byte count\" field value.\n// If the record is too short, a negative count may be returned.\nstatic Sci_Position CountIHexByteCount(Sci_PositionU recStartPos, Accessor &styler)\n{\n\treturn CountByteCount(recStartPos, 11, styler);\n}\n\n// Get the type of the \"address\" field content.\nstatic int GetIHexAddressFieldType(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tif (!PosInSameRecord(recStartPos, recStartPos + 7, styler)) {\n\t\t// malformed (record too short)\n\t\t// type cannot be determined\n\t\treturn SCE_HEX_ADDRESSFIELD_UNKNOWN;\n\t}\n\n\tswitch (GetHexaChar(recStartPos + 7, styler)) {\n\t\tcase 0x00:\n\t\t\treturn SCE_HEX_DATAADDRESS;\n\n\t\tcase 0x01:\n\t\tcase 0x02:\n\t\tcase 0x03:\n\t\tcase 0x04:\n\t\tcase 0x05:\n\t\t\treturn SCE_HEX_NOADDRESS;\n\n\t\tdefault: // handle possible format extension in the future\n\t\t\treturn SCE_HEX_ADDRESSFIELD_UNKNOWN;\n\t}\n}\n\n// Get the type of the \"data\" field content.\nstatic int GetIHexDataFieldType(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (GetHexaChar(recStartPos + 7, styler)) {\n\t\tcase 0x00:\n\t\t\treturn SCE_HEX_DATA_ODD;\n\n\t\tcase 0x01:\n\t\t\treturn SCE_HEX_DATA_EMPTY;\n\n\t\tcase 0x02:\n\t\tcase 0x04:\n\t\t\treturn SCE_HEX_EXTENDEDADDRESS;\n\n\t\tcase 0x03:\n\t\tcase 0x05:\n\t\t\treturn SCE_HEX_STARTADDRESS;\n\n\t\tdefault: // handle possible format extension in the future\n\t\t\treturn SCE_HEX_DATA_UNKNOWN;\n\t}\n}\n\n// Get the required size of the \"data\" field. Useless for an ordinary data\n// record (type 00), return the \"byte count\" in this case.\nstatic int GetIHexRequiredDataFieldSize(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (GetHexaChar(recStartPos + 7, styler)) {\n\t\tcase 0x01:\n\t\t\treturn 0;\n\n\t\tcase 0x02:\n\t\tcase 0x04:\n\t\t\treturn 2;\n\n\t\tcase 0x03:\n\t\tcase 0x05:\n\t\t\treturn 4;\n\n\t\tdefault:\n\t\t\treturn GetIHexByteCount(recStartPos, styler);\n\t}\n}\n\n// Get the value of the \"checksum\" field.\nstatic int GetIHexChecksum(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tint byteCount;\n\n\tbyteCount = GetIHexByteCount(recStartPos, styler);\n\n\treturn GetHexaChar(recStartPos + 9 + byteCount * 2, styler);\n}\n\n// Calculate the checksum of the record.\nstatic int CalcIHexChecksum(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tint byteCount;\n\n\tbyteCount = GetIHexByteCount(recStartPos, styler);\n\n\t// sum over \"byte count\", \"address\", \"type\" and \"data\" fields (8..518 digits)\n\treturn CalcChecksum(recStartPos + 1, 8 + byteCount * 2, true, styler);\n}\n\n\n// Get the value of the \"record length\" field, it counts the number of digits in\n// the record excluding the percent.\nstatic int GetTEHexDigitCount(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tint val = GetHexaChar(recStartPos + 1, styler);\n\tif (val < 0)\n\t val = 0;\n\n\treturn val;\n}\n\n// Count the number of digits in this record. Has to\n// be equal to the \"record length\" field value.\nstatic Sci_Position CountTEHexDigitCount(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tSci_PositionU pos;\n\n\tpos = recStartPos+1;\n\n\twhile (!IsNewline(styler.SafeGetCharAt(pos, '\\n'))) {\n\t\tpos++;\n\t}\n\n\treturn static_cast(pos - (recStartPos+1));\n}\n\n// Get the type of the \"address\" field content.\nstatic int GetTEHexAddressFieldType(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tswitch (styler.SafeGetCharAt(recStartPos + 3)) {\n\t\tcase '6':\n\t\t\treturn SCE_HEX_DATAADDRESS;\n\n\t\tcase '8':\n\t\t\treturn SCE_HEX_STARTADDRESS;\n\n\t\tdefault: // handle possible format extension in the future\n\t\t\treturn SCE_HEX_ADDRESSFIELD_UNKNOWN;\n\t}\n}\n\n// Get the value of the \"checksum\" field.\nstatic int GetTEHexChecksum(Sci_PositionU recStartPos, Accessor &styler)\n{\n\treturn GetHexaChar(recStartPos+4, styler);\n}\n\n// Calculate the checksum of the record (excluding the checksum field).\nstatic int CalcTEHexChecksum(Sci_PositionU recStartPos, Accessor &styler)\n{\n\tSci_PositionU pos = recStartPos +1;\n\tSci_PositionU length = GetTEHexDigitCount(recStartPos, styler);\n\n\tint cs = GetHexaNibble(styler.SafeGetCharAt(pos++));//length\n\tcs += GetHexaNibble(styler.SafeGetCharAt(pos++));//length\n\n\tcs += GetHexaNibble(styler.SafeGetCharAt(pos++));//type\n\n\tpos += 2;// jump over CS field\n\n\tfor (; pos <= recStartPos + length; ++pos) {\n\t\tint val = GetHexaNibble(styler.SafeGetCharAt(pos));\n\n\t\tif (val < 0) {\n\t\t\treturn val;\n\t\t}\n\n\t\t// overflow does not matter\n\t\tcs += val;\n\t}\n\n\t// low byte\n\treturn cs & 0xFF;\n\n}\n\nstatic void ColouriseSrecDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *[], Accessor &styler)\n{\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\twhile (sc.More()) {\n\t\tSci_PositionU recStartPos;\n\t\tSci_Position reqByteCount;\n\t\tSci_Position dataFieldSize;\n\t\tint byteCount, addrFieldSize, addrFieldType, dataFieldType;\n\t\tint cs1, cs2;\n\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_HEX_DEFAULT:\n\t\t\t\tif (sc.atLineStart && sc.Match('S')) {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECSTART);\n\t\t\t\t}\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_RECSTART:\n\t\t\t\trecStartPos = sc.currentPos - 1;\n\t\t\t\taddrFieldType = GetSrecAddressFieldType(recStartPos, styler);\n\n\t\t\t\tif (addrFieldType == SCE_HEX_ADDRESSFIELD_UNKNOWN) {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECTYPE_UNKNOWN);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECTYPE);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_RECTYPE:\n\t\t\tcase SCE_HEX_RECTYPE_UNKNOWN:\n\t\t\t\trecStartPos = sc.currentPos - 2;\n\t\t\t\tbyteCount = GetSrecByteCount(recStartPos, styler);\n\t\t\t\treqByteCount = GetSrecAddressFieldSize(recStartPos, styler)\n\t\t\t\t\t\t+ GetSrecRequiredDataFieldSize(recStartPos, styler)\n\t\t\t\t\t\t+ 1; // +1 for checksum field\n\n\t\t\t\tif (byteCount == CountSrecByteCount(recStartPos, styler)\n\t\t\t\t\t\t&& byteCount == reqByteCount) {\n\t\t\t\t\tsc.SetState(SCE_HEX_BYTECOUNT);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_BYTECOUNT_WRONG);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_BYTECOUNT:\n\t\t\tcase SCE_HEX_BYTECOUNT_WRONG:\n\t\t\t\trecStartPos = sc.currentPos - 4;\n\t\t\t\taddrFieldSize = GetSrecAddressFieldSize(recStartPos, styler);\n\t\t\t\taddrFieldType = GetSrecAddressFieldType(recStartPos, styler);\n\n\t\t\t\tsc.SetState(addrFieldType);\n\t\t\t\tForwardWithinLine(sc, addrFieldSize * 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_NOADDRESS:\n\t\t\tcase SCE_HEX_DATAADDRESS:\n\t\t\tcase SCE_HEX_RECCOUNT:\n\t\t\tcase SCE_HEX_STARTADDRESS:\n\t\t\tcase SCE_HEX_ADDRESSFIELD_UNKNOWN:\n\t\t\t\trecStartPos = GetSrecRecStartPosition(sc.currentPos, styler);\n\t\t\t\tdataFieldType = GetSrecDataFieldType(recStartPos, styler);\n\n\t\t\t\t// Using the required size here if possible has the effect that the\n\t\t\t\t// checksum is highlighted at a fixed position after this field for\n\t\t\t\t// specific record types, independent on the \"byte count\" value.\n\t\t\t\tdataFieldSize = GetSrecRequiredDataFieldSize(recStartPos, styler);\n\n\t\t\t\tsc.SetState(dataFieldType);\n\n\t\t\t\tif (dataFieldType == SCE_HEX_DATA_ODD) {\n\t\t\t\t\tfor (int i = 0; i < dataFieldSize * 2; i++) {\n\t\t\t\t\t\tif ((i & 0x3) == 0) {\n\t\t\t\t\t\t\tsc.SetState(SCE_HEX_DATA_ODD);\n\t\t\t\t\t\t} else if ((i & 0x3) == 2) {\n\t\t\t\t\t\t\tsc.SetState(SCE_HEX_DATA_EVEN);\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\tif (!ForwardWithinLine(sc)) {\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tForwardWithinLine(sc, dataFieldSize * 2);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_DATA_ODD:\n\t\t\tcase SCE_HEX_DATA_EVEN:\n\t\t\tcase SCE_HEX_DATA_EMPTY:\n\t\t\tcase SCE_HEX_DATA_UNKNOWN:\n\t\t\t\trecStartPos = GetSrecRecStartPosition(sc.currentPos, styler);\n\t\t\t\tcs1 = CalcSrecChecksum(recStartPos, styler);\n\t\t\t\tcs2 = GetSrecChecksum(recStartPos, styler);\n\n\t\t\t\tif (cs1 != cs2 || cs1 < 0 || cs2 < 0) {\n\t\t\t\t\tsc.SetState(SCE_HEX_CHECKSUM_WRONG);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_CHECKSUM);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_CHECKSUM:\n\t\t\tcase SCE_HEX_CHECKSUM_WRONG:\n\t\t\tcase SCE_HEX_GARBAGE:\n\t\t\t\t// record finished or line too long\n\t\t\t\tsc.SetState(SCE_HEX_GARBAGE);\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tdefault:\n\t\t\t\t// prevent endless loop in faulty state\n\t\t\t\tsc.SetState(SCE_HEX_DEFAULT);\n\t\t\t\tbreak;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void ColouriseIHexDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *[], Accessor &styler)\n{\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\twhile (sc.More()) {\n\t\tSci_PositionU recStartPos;\n\t\tint byteCount, addrFieldType, dataFieldSize, dataFieldType;\n\t\tint cs1, cs2;\n\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_HEX_DEFAULT:\n\t\t\t\tif (sc.atLineStart && sc.Match(':')) {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECSTART);\n\t\t\t\t}\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_RECSTART:\n\t\t\t\trecStartPos = sc.currentPos - 1;\n\t\t\t\tbyteCount = GetIHexByteCount(recStartPos, styler);\n\t\t\t\tdataFieldSize = GetIHexRequiredDataFieldSize(recStartPos, styler);\n\n\t\t\t\tif (byteCount == CountIHexByteCount(recStartPos, styler)\n\t\t\t\t\t\t&& byteCount == dataFieldSize) {\n\t\t\t\t\tsc.SetState(SCE_HEX_BYTECOUNT);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_BYTECOUNT_WRONG);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_BYTECOUNT:\n\t\t\tcase SCE_HEX_BYTECOUNT_WRONG:\n\t\t\t\trecStartPos = sc.currentPos - 3;\n\t\t\t\taddrFieldType = GetIHexAddressFieldType(recStartPos, styler);\n\n\t\t\t\tsc.SetState(addrFieldType);\n\t\t\t\tForwardWithinLine(sc, 4);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_NOADDRESS:\n\t\t\tcase SCE_HEX_DATAADDRESS:\n\t\t\tcase SCE_HEX_ADDRESSFIELD_UNKNOWN:\n\t\t\t\trecStartPos = sc.currentPos - 7;\n\t\t\t\taddrFieldType = GetIHexAddressFieldType(recStartPos, styler);\n\n\t\t\t\tif (addrFieldType == SCE_HEX_ADDRESSFIELD_UNKNOWN) {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECTYPE_UNKNOWN);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECTYPE);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_RECTYPE:\n\t\t\tcase SCE_HEX_RECTYPE_UNKNOWN:\n\t\t\t\trecStartPos = sc.currentPos - 9;\n\t\t\t\tdataFieldType = GetIHexDataFieldType(recStartPos, styler);\n\n\t\t\t\t// Using the required size here if possible has the effect that the\n\t\t\t\t// checksum is highlighted at a fixed position after this field for\n\t\t\t\t// specific record types, independent on the \"byte count\" value.\n\t\t\t\tdataFieldSize = GetIHexRequiredDataFieldSize(recStartPos, styler);\n\n\t\t\t\tsc.SetState(dataFieldType);\n\n\t\t\t\tif (dataFieldType == SCE_HEX_DATA_ODD) {\n\t\t\t\t\tfor (int i = 0; i < dataFieldSize * 2; i++) {\n\t\t\t\t\t\tif ((i & 0x3) == 0) {\n\t\t\t\t\t\t\tsc.SetState(SCE_HEX_DATA_ODD);\n\t\t\t\t\t\t} else if ((i & 0x3) == 2) {\n\t\t\t\t\t\t\tsc.SetState(SCE_HEX_DATA_EVEN);\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\tif (!ForwardWithinLine(sc)) {\n\t\t\t\t\t\t\tbreak;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tForwardWithinLine(sc, dataFieldSize * 2);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_DATA_ODD:\n\t\t\tcase SCE_HEX_DATA_EVEN:\n\t\t\tcase SCE_HEX_DATA_EMPTY:\n\t\t\tcase SCE_HEX_EXTENDEDADDRESS:\n\t\t\tcase SCE_HEX_STARTADDRESS:\n\t\t\tcase SCE_HEX_DATA_UNKNOWN:\n\t\t\t\trecStartPos = GetIHexRecStartPosition(sc.currentPos, styler);\n\t\t\t\tcs1 = CalcIHexChecksum(recStartPos, styler);\n\t\t\t\tcs2 = GetIHexChecksum(recStartPos, styler);\n\n\t\t\t\tif (cs1 != cs2 || cs1 < 0 || cs2 < 0) {\n\t\t\t\t\tsc.SetState(SCE_HEX_CHECKSUM_WRONG);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_CHECKSUM);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_CHECKSUM:\n\t\t\tcase SCE_HEX_CHECKSUM_WRONG:\n\t\t\tcase SCE_HEX_GARBAGE:\n\t\t\t\t// record finished or line too long\n\t\t\t\tsc.SetState(SCE_HEX_GARBAGE);\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tdefault:\n\t\t\t\t// prevent endless loop in faulty state\n\t\t\t\tsc.SetState(SCE_HEX_DEFAULT);\n\t\t\t\tbreak;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldIHexDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler)\n{\n\tSci_PositionU endPos = startPos + length;\n\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n\tif (lineCurrent > 0)\n\t\tlevelCurrent = styler.LevelAt(lineCurrent - 1);\n\n\tSci_PositionU lineStartNext = styler.LineStart(lineCurrent + 1);\n\tint levelNext = SC_FOLDLEVELBASE; // default if no specific line found\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tbool atEOL = i == (lineStartNext - 1);\n\t\tint style = styler.StyleAt(i);\n\n\t\t// search for specific lines\n\t\tif (style == SCE_HEX_EXTENDEDADDRESS) {\n\t\t\t// extended addres record\n\t\t\tlevelNext = SC_FOLDLEVELBASE | SC_FOLDLEVELHEADERFLAG;\n\t\t} else if (style == SCE_HEX_DATAADDRESS\n\t\t\t|| (style == SCE_HEX_DEFAULT\n\t\t\t\t&& i == (Sci_PositionU)styler.LineStart(lineCurrent))) {\n\t\t\t// data record or no record start code at all\n\t\t\tif (levelCurrent & SC_FOLDLEVELHEADERFLAG) {\n\t\t\t\tlevelNext = SC_FOLDLEVELBASE + 1;\n\t\t\t} else {\n\t\t\t\t// continue level 0 or 1, no fold point\n\t\t\t\tlevelNext = levelCurrent;\n\t\t\t}\n\t\t}\n\n\t\tif (atEOL || (i == endPos - 1)) {\n\t\t\tstyler.SetLevel(lineCurrent, levelNext);\n\n\t\t\tlineCurrent++;\n\t\t\tlineStartNext = styler.LineStart(lineCurrent + 1);\n\t\t\tlevelCurrent = levelNext;\n\t\t\tlevelNext = SC_FOLDLEVELBASE;\n\t\t}\n\t}\n}\n\nstatic void ColouriseTEHexDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *[], Accessor &styler)\n{\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\twhile (sc.More()) {\n\t\tSci_PositionU recStartPos;\n\t\tint digitCount, addrFieldType;\n\t\tint cs1, cs2;\n\n\t\tswitch (sc.state) {\n\t\t\tcase SCE_HEX_DEFAULT:\n\t\t\t\tif (sc.atLineStart && sc.Match('%')) {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECSTART);\n\t\t\t\t}\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_RECSTART:\n\n\t\t\t\trecStartPos = sc.currentPos - 1;\n\n\t\t\t\tif (GetTEHexDigitCount(recStartPos, styler) == CountTEHexDigitCount(recStartPos, styler)) {\n\t\t\t\t\tsc.SetState(SCE_HEX_BYTECOUNT);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_BYTECOUNT_WRONG);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_BYTECOUNT:\n\t\t\tcase SCE_HEX_BYTECOUNT_WRONG:\n\t\t\t\trecStartPos = sc.currentPos - 3;\n\t\t\t\taddrFieldType = GetTEHexAddressFieldType(recStartPos, styler);\n\n\t\t\t\tif (addrFieldType == SCE_HEX_ADDRESSFIELD_UNKNOWN) {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECTYPE_UNKNOWN);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_RECTYPE);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_RECTYPE:\n\t\t\tcase SCE_HEX_RECTYPE_UNKNOWN:\n\t\t\t\trecStartPos = sc.currentPos - 4;\n\t\t\t\tcs1 = CalcTEHexChecksum(recStartPos, styler);\n\t\t\t\tcs2 = GetTEHexChecksum(recStartPos, styler);\n\n\t\t\t\tif (cs1 != cs2 || cs1 < 0 || cs2 < 0) {\n\t\t\t\t\tsc.SetState(SCE_HEX_CHECKSUM_WRONG);\n\t\t\t\t} else {\n\t\t\t\t\tsc.SetState(SCE_HEX_CHECKSUM);\n\t\t\t\t}\n\n\t\t\t\tForwardWithinLine(sc, 2);\n\t\t\t\tbreak;\n\n\n\t\t\tcase SCE_HEX_CHECKSUM:\n\t\t\tcase SCE_HEX_CHECKSUM_WRONG:\n\t\t\t\trecStartPos = sc.currentPos - 6;\n\t\t\t\taddrFieldType = GetTEHexAddressFieldType(recStartPos, styler);\n\n\t\t\t\tsc.SetState(addrFieldType);\n\t\t\t\tForwardWithinLine(sc, 9);\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_DATAADDRESS:\n\t\t\tcase SCE_HEX_STARTADDRESS:\n\t\t\tcase SCE_HEX_ADDRESSFIELD_UNKNOWN:\n\t\t\t\trecStartPos = sc.currentPos - 15;\n\t\t\t\tdigitCount = GetTEHexDigitCount(recStartPos, styler) - 14;\n\n\t\t\t\tsc.SetState(SCE_HEX_DATA_ODD);\n\n\t\t\t\tfor (int i = 0; i < digitCount; i++) {\n\t\t\t\t\tif ((i & 0x3) == 0) {\n\t\t\t\t\t\tsc.SetState(SCE_HEX_DATA_ODD);\n\t\t\t\t\t} else if ((i & 0x3) == 2) {\n\t\t\t\t\t\tsc.SetState(SCE_HEX_DATA_EVEN);\n\t\t\t\t\t}\n\n\t\t\t\t\tif (!ForwardWithinLine(sc)) {\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_HEX_DATA_ODD:\n\t\t\tcase SCE_HEX_DATA_EVEN:\n\t\t\tcase SCE_HEX_GARBAGE:\n\t\t\t\t// record finished or line too long\n\t\t\t\tsc.SetState(SCE_HEX_GARBAGE);\n\t\t\t\tForwardWithinLine(sc);\n\t\t\t\tbreak;\n\n\t\t\tdefault:\n\t\t\t\t// prevent endless loop in faulty state\n\t\t\t\tsc.SetState(SCE_HEX_DEFAULT);\n\t\t\t\tbreak;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nextern const LexerModule lmSrec(SCLEX_SREC, ColouriseSrecDoc, \"srec\", 0, NULL);\nextern const LexerModule lmIHex(SCLEX_IHEX, ColouriseIHexDoc, \"ihex\", FoldIHexDoc, NULL);\nextern const LexerModule lmTEHex(SCLEX_TEHEX, ColouriseTEHexDoc, \"tehex\", 0, NULL);\n" }, { "path": "lexers/LexHollywood.cxx", "content": "// Scintilla source code edit control\n/** @file LexHollywood.cxx\n ** Lexer for Hollywood\n ** Written by Andreas Falkenhahn, based on the BlitzBasic/PureBasic/Lua lexers\n ** Thanks to Nicholai Benalal\n ** For more information on Hollywood, see http://www.hollywood-mal.com/\n ** Mail me (andreas airsoftsoftwair de) for any bugs.\n ** This code is subject to the same license terms as the rest of the Scintilla project:\n ** The License.txt file describes the conditions under which this software may be distributed. \n **/\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\n/* Bits:\n * 1 - whitespace\n * 2 - operator\n * 4 - identifier\n * 8 - decimal digit\n * 16 - hex digit\n * 32 - bin digit\n * 64 - letter\n */\nstatic int character_classification[128] =\n{\n\t0, // NUL ($0)\n\t0, // SOH ($1)\n\t0, // STX ($2)\n\t0, // ETX ($3)\n\t0, // EOT ($4)\n\t0, // ENQ ($5)\n\t0, // ACK ($6)\n\t0, // BEL ($7)\n\t0, // BS ($8)\n\t1, // HT ($9)\n\t1, // LF ($A)\n\t0, // VT ($B)\n\t0, // FF ($C)\n\t1, // CR ($D)\n\t0, // SO ($E)\n\t0, // SI ($F)\n\t0, // DLE ($10)\n\t0, // DC1 ($11)\n\t0, // DC2 ($12)\n\t0, // DC3 ($13)\n\t0, // DC4 ($14)\n\t0, // NAK ($15)\n\t0, // SYN ($16)\n\t0, // ETB ($17)\n\t0, // CAN ($18)\n\t0, // EM ($19)\n\t0, // SUB ($1A)\n\t0, // ESC ($1B)\n\t0, // FS ($1C)\n\t0, // GS ($1D)\n\t0, // RS ($1E)\n\t0, // US ($1F)\n\t1, // space ($20)\n\t4, // ! ($21)\n\t0, // \" ($22)\n\t0, // # ($23)\n\t4, // $ ($24)\n\t2, // % ($25)\n\t2, // & ($26)\n\t2, // ' ($27)\n\t2, // ( ($28)\n\t2, // ) ($29)\n\t2, // * ($2A)\n\t2, // + ($2B)\n\t2, // , ($2C)\n\t2, // - ($2D)\n\t// NB: we treat \".\" as an identifier although it is also an operator and a decimal digit\n\t// the reason why we treat it as an identifier is to support syntax highlighting for\n\t// plugin commands which always use a \".\" in their names, e.g. pdf.OpenDocument();\n\t// we handle the decimal digit case manually below so that 3.1415 and .123 is styled correctly\n\t// the collateral damage of treating \".\" as an identifier is that \".\" is never styled\n\t// SCE_HOLLYWOOD_OPERATOR\n\t4, // . ($2E) \n\t2, // / ($2F)\n\t28, // 0 ($30)\n\t28, // 1 ($31)\n\t28, // 2 ($32)\n\t28, // 3 ($33)\n\t28, // 4 ($34)\n\t28, // 5 ($35)\n\t28, // 6 ($36)\n\t28, // 7 ($37)\n\t28, // 8 ($38)\n\t28, // 9 ($39)\n\t2, // : ($3A)\n\t2, // ; ($3B)\n\t2, // < ($3C)\n\t2, // = ($3D)\n\t2, // > ($3E)\n\t2, // ? ($3F)\n\t0, // @ ($40)\n\t84, // A ($41)\n\t84, // B ($42)\n\t84, // C ($43)\n\t84, // D ($44)\n\t84, // E ($45)\n\t84, // F ($46)\n\t68, // G ($47)\n\t68, // H ($48)\n\t68, // I ($49)\n\t68, // J ($4A)\n\t68, // K ($4B)\n\t68, // L ($4C)\n\t68, // M ($4D)\n\t68, // N ($4E)\n\t68, // O ($4F)\n\t68, // P ($50)\n\t68, // Q ($51)\n\t68, // R ($52)\n\t68, // S ($53)\n\t68, // T ($54)\n\t68, // U ($55)\n\t68, // V ($56)\n\t68, // W ($57)\n\t68, // X ($58)\n\t68, // Y ($59)\n\t68, // Z ($5A)\n\t2, // [ ($5B)\n\t2, // \\ ($5C)\n\t2, // ] ($5D)\n\t2, // ^ ($5E)\n\t68, // _ ($5F)\n\t2, // ` ($60)\n\t84, // a ($61)\n\t84, // b ($62)\n\t84, // c ($63)\n\t84, // d ($64)\n\t84, // e ($65)\n\t84, // f ($66)\n\t68, // g ($67)\n\t68, // h ($68)\n\t68, // i ($69)\n\t68, // j ($6A)\n\t68, // k ($6B)\n\t68, // l ($6C)\n\t68, // m ($6D)\n\t68, // n ($6E)\n\t68, // o ($6F)\n\t68, // p ($70)\n\t68, // q ($71)\n\t68, // r ($72)\n\t68, // s ($73)\n\t68, // t ($74)\n\t68, // u ($75)\n\t68, // v ($76)\n\t68, // w ($77)\n\t68, // x ($78)\n\t68, // y ($79)\n\t68, // z ($7A)\n\t2, // { ($7B)\n\t2, // | ($7C)\n\t2, // } ($7D)\n\t2, // ~ ($7E)\n\t0, //  ($7F)\n};\n\nstatic bool IsSpace(int c) {\n\treturn c < 128 && (character_classification[c] & 1);\n}\n\nstatic bool IsOperator(int c) {\n\treturn c < 128 && (character_classification[c] & 2);\n}\n\nstatic bool IsIdentifier(int c) {\n\treturn c < 128 && (character_classification[c] & 4);\n}\n\nstatic bool IsDigit(int c) {\n\treturn c < 128 && (character_classification[c] & 8);\n}\n\nstatic bool IsHexDigit(int c) {\n\treturn c < 128 && (character_classification[c] & 16);\n}\n\nstatic int LowerCase(int c)\n{\n\tif (c >= 'A' && c <= 'Z')\n\t\treturn 'a' + c - 'A';\n\treturn c;\n}\n\nstatic int CheckHollywoodFoldPoint(char const *token) {\n\tif (!strcmp(token, \"function\")) {\n\t\treturn 1;\n\t}\n\tif (!strcmp(token, \"endfunction\")) {\n\t\treturn -1;\n\t}\n\treturn 0;\n}\n\n// An individual named option for use in an OptionSet\n\n// Options used for LexerHollywood\nstruct OptionsHollywood {\n\tbool fold;\n\tbool foldCompact;\n\tOptionsHollywood() {\n\t\tfold = false;\n\t\tfoldCompact = false;\n\t}\n};\n\nstatic const char * const hollywoodWordListDesc[] = {\n\t\"Hollywood keywords\",\n\t\"Hollywood standard API functions\",\n\t\"Hollywood plugin API functions\",\n\t\"Hollywood plugin methods\",\n\t0\n};\n\nstruct OptionSetHollywood : public OptionSet {\n\tOptionSetHollywood(const char * const wordListDescriptions[]) {\n\t\tDefineProperty(\"fold\", &OptionsHollywood::fold);\n\t\tDefineProperty(\"fold.compact\", &OptionsHollywood::foldCompact);\n\t\tDefineWordListSets(wordListDescriptions);\n\t}\n};\n\nclass LexerHollywood : public DefaultLexer {\n\tint (*CheckFoldPoint)(char const *);\n\tWordList keywordlists[4];\t\n\tOptionsHollywood options;\n\tOptionSetHollywood osHollywood;\npublic:\n\tLexerHollywood(int (*CheckFoldPoint_)(char const *), const char * const wordListDescriptions[]) :\n\t\t\t\t\t\t DefaultLexer(\"hollywood\", SCLEX_HOLLYWOOD),\n\t\t\t\t\t\t CheckFoldPoint(CheckFoldPoint_),\n\t\t\t\t\t\t osHollywood(wordListDescriptions) {\n\t}\n\tvirtual ~LexerHollywood() {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char * SCI_METHOD PropertyNames() override {\n\t\treturn osHollywood.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osHollywood.PropertyType(name);\n\t}\n\tconst char * SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osHollywood.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char * SCI_METHOD PropertyGet(const char* key) override {\n\t\treturn osHollywood.PropertyGet(key);\n\t}\n\tconst char * SCI_METHOD DescribeWordListSets() override {\n\t\treturn osHollywood.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tvoid * SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn 0;\n\t}\n\tstatic ILexer5 *LexerFactoryHollywood() {\n\t\treturn new LexerHollywood(CheckHollywoodFoldPoint, hollywoodWordListDesc);\n\t}\n};\n\nSci_Position SCI_METHOD LexerHollywood::PropertySet(const char *key, const char *val) {\n\tif (osHollywood.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerHollywood::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = 0;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywordlists[0];\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywordlists[1];\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywordlists[2];\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywordlists[3];\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tWordList wlNew;\n\t\twlNew.Set(wl);\n\t\tif (*wordListN != wlNew) {\n\t\t\twordListN->Set(wl);\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\t\n}\n\nvoid SCI_METHOD LexerHollywood::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\tstyler.StartAt(startPos);\n\tbool inString = false;\n\t\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\t// Can't use sc.More() here else we miss the last character\n\tfor (; ; sc.Forward())\n\t {\n\t \tif (sc.atLineStart) inString = false;\n\t \t\t\n\t \tif (sc.ch == '\\\"' && sc.chPrev != '\\\\') inString = !inString;\n\t \t\t\n\t\tif (sc.state == SCE_HOLLYWOOD_IDENTIFIER) {\n\t\t\tif (!IsIdentifier(sc.ch)) {\t\t\t\t\n\t\t\t\tchar s[100];\n\t\t\t\tint kstates[4] = {\n\t\t\t\t\tSCE_HOLLYWOOD_KEYWORD,\n\t\t\t\t\tSCE_HOLLYWOOD_STDAPI,\n\t\t\t\t\tSCE_HOLLYWOOD_PLUGINAPI,\n\t\t\t\t\tSCE_HOLLYWOOD_PLUGINMETHOD,\n\t\t\t\t};\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\t\t\t\tfor (int i = 0; i < 4; i++) {\n\t\t\t\t\tif (keywordlists[i].InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(kstates[i]);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\t\t\t\t\n\t\t\t}\n\t\t} else if (sc.state == SCE_HOLLYWOOD_OPERATOR) {\n\t\t\t\n\t\t\t// always reset to default on operators because otherwise\n\t\t\t// comments won't be recognized in sequences like \"+/* Hello*/\"\n\t\t\t// --> \"+/*\" would be recognized as a sequence of operators\n\t\t\t\n\t\t\t// if (!IsOperator(sc.ch)) sc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\t\n\t\t} else if (sc.state == SCE_HOLLYWOOD_PREPROCESSOR) {\n\t\t\tif (!IsIdentifier(sc.ch))\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t} else if (sc.state == SCE_HOLLYWOOD_CONSTANT) {\n\t\t\tif (!IsIdentifier(sc.ch))\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t} else if (sc.state == SCE_HOLLYWOOD_NUMBER) {\n\t\t\tif (!IsDigit(sc.ch) && sc.ch != '.')\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t} else if (sc.state == SCE_HOLLYWOOD_HEXNUMBER) {\n\t\t\tif (!IsHexDigit(sc.ch))\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t} else if (sc.state == SCE_HOLLYWOOD_STRING) {\n\t\t\tif (sc.ch == '\"') {\n\t\t\t\tsc.ForwardSetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\t}\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_HOLLYWOOD_COMMENT) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_HOLLYWOOD_COMMENTBLOCK) {\n\t\t\tif (sc.Match(\"*/\") && !inString) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_HOLLYWOOD_STRINGBLOCK) {\n\t\t\tif (sc.Match(\"]]\") && !inString) {\n\t\t\t\tsc.Forward();\n\t\t\t\tsc.ForwardSetState(SCE_HOLLYWOOD_DEFAULT);\n\t\t\t}\t\t\t\n\t\t}\n\n\t\tif (sc.state == SCE_HOLLYWOOD_DEFAULT) {\n\t\t\tif (sc.Match(';')) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_COMMENT);\n\t\t\t} else if (sc.Match(\"/*\")) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_COMMENTBLOCK);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.Match(\"[[\")) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_STRINGBLOCK);\n\t\t\t\tsc.Forward();\t\t\t\t\n\t\t\t} else if (sc.Match('\"')) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_STRING);\n\t\t\t} else if (sc.Match('$')) { \n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_HEXNUMBER);\n\t\t\t} else if (sc.Match(\"0x\") || sc.Match(\"0X\")) { // must be before IsDigit() because of 0x\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_HEXNUMBER);\n\t\t\t\tsc.Forward();\n\t\t\t} else if (sc.ch == '.' && (sc.chNext >= '0' && sc.chNext <= '9')) { // \".1234\" style numbers\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_NUMBER);\n\t\t\t\tsc.Forward();\t\n\t\t\t} else if (IsDigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_NUMBER);\n\t\t\t} else if (sc.Match('#')) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_CONSTANT);\n\t\t\t} else if (sc.Match('@')) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_PREPROCESSOR);\t\n\t\t\t} else if (IsOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_OPERATOR);\n\t\t\t} else if (IsIdentifier(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_HOLLYWOOD_IDENTIFIER);\n\t\t\t}\n\t\t}\n\n\t\tif (!sc.More())\n\t\t\tbreak;\n\t}\n\tsc.Complete();\n}\n\nvoid SCI_METHOD LexerHollywood::Fold(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, IDocument *pAccess) {\n\n\tif (!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\t\n\tSci_PositionU lengthDoc = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tint done = 0;\n\tchar word[256];\n\tint wordlen = 0;\n\t\t\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (!done) {\n\t\t\tif (wordlen) { // are we scanning a token already?\n\t\t\t\tword[wordlen] = static_cast(LowerCase(ch));\n\t\t\t\tif (!IsIdentifier(ch)) { // done with token\n\t\t\t\t\tword[wordlen] = '\\0';\n\t\t\t\t\tlevelCurrent += CheckFoldPoint(word);\n\t\t\t\t\tdone = 1;\n\t\t\t\t} else if (wordlen < 255) {\n\t\t\t\t\twordlen++;\n\t\t\t\t}\n\t\t\t} else { // start scanning at first non-whitespace character\n\t\t\t\tif (!IsSpace(ch)) {\n\t\t\t\t\tif (style != SCE_HOLLYWOOD_COMMENTBLOCK && IsIdentifier(ch)) {\n\t\t\t\t\t\tword[0] = static_cast(LowerCase(ch));\n\t\t\t\t\t\twordlen = 1;\n\t\t\t\t\t} else // done with this line\n\t\t\t\t\t\tdone = 1;\n\t\t\t\t}\n\t\t\t}\n\t\t}\t\t\n\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && options.foldCompact) {\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t}\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0)) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t\tdone = 0;\n\t\t\twordlen = 0;\t\t\t\n\t\t}\n\t\tif (!IsSpace(ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\t\n}\n\nextern const LexerModule lmHollywood(SCLEX_HOLLYWOOD, LexerHollywood::LexerFactoryHollywood, \"hollywood\", hollywoodWordListDesc);\n" }, { "path": "lexers/LexIndent.cxx", "content": "// Scintilla source code edit control\n/** @file LexIndent.cxx\n ** Lexer for no language. Used for indentation-based folding of files.\n **/\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic void ColouriseIndentDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[],\n Accessor &styler) {\n\t// Indent language means all style bytes are 0 so just mark the end - no need to fill in.\n\tif (length > 0) {\n\t\tstyler.StartAt(startPos + length - 1);\n\t\tstyler.StartSegment(startPos + length - 1);\n\t\tstyler.ColourTo(startPos + length - 1, 0);\n\t}\n}\n\nstatic void FoldIndentDoc(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, WordList *[], Accessor &styler) {\n\tint visibleCharsCurrent, visibleCharsNext;\n\tint levelCurrent, levelNext;\n\tSci_PositionU i, lineEnd;\n\tSci_PositionU lengthDoc = startPos + length;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\n\ti = styler.LineStart(lineCurrent );\n\tlineEnd = styler.LineStart(lineCurrent+1)-1;\n\tif(lineEnd>=lengthDoc) lineEnd = lengthDoc-1;\n\twhile(styler[lineEnd]=='\\n' || styler[lineEnd]=='\\r') lineEnd--;\n\tfor(visibleCharsCurrent=0, levelCurrent=SC_FOLDLEVELBASE; !visibleCharsCurrent && i<=lineEnd; i++){\n\t\tif(isspacechar(styler[i])) levelCurrent++;\n\t\telse visibleCharsCurrent=1;\n\t}\n\n\tfor(; i=lengthDoc) lineEnd = lengthDoc-1;\n\t\twhile(styler[lineEnd]=='\\n' || styler[lineEnd]=='\\r') lineEnd--;\n\t\tfor(visibleCharsNext=0, levelNext=SC_FOLDLEVELBASE; !visibleCharsNext && i<=lineEnd; i++){\n\t\t\tif(isspacechar(styler[i])) levelNext++;\n\t\t\telse visibleCharsNext=1;\n\t\t}\n\t\tint lev = levelCurrent;\n\t\tif(!visibleCharsCurrent) lev |= SC_FOLDLEVELWHITEFLAG;\n\t\telse if(levelNext > levelCurrent) lev |= SC_FOLDLEVELHEADERFLAG;\n\t\tstyler.SetLevel(lineCurrent, lev);\n\t\tlevelCurrent = levelNext;\n\t\tvisibleCharsCurrent = visibleCharsNext;\n\t}\n}\n\nextern const LexerModule lmIndent(SCLEX_INDENT, ColouriseIndentDoc, \"indent\", FoldIndentDoc);\n" }, { "path": "lexers/LexInno.cxx", "content": "// Scintilla source code edit control\n/** @file LexInno.cxx\n ** Lexer for Inno Setup scripts.\n **/\n// Written by Friedrich Vedder , using code from LexOthers.cxx.\n// Modified by Michael Heath.\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic bool innoIsBlank(int ch) {\n\treturn (ch == ' ') || (ch == '\\t');\n}\n\nstatic bool innoNextNotBlankIs(Sci_Position i, Accessor &styler, char needle) {\n\tchar ch;\n\n\twhile (i < styler.Length()) {\n\t\tch = styler.SafeGetCharAt(i);\n\n\t\tif (ch == needle)\n\t\t\treturn true;\n\n\t\tif (!innoIsBlank(ch))\n\t\t\treturn false;\n\n\t\ti++;\n\t}\n\treturn false;\n}\n\nstatic void ColouriseInnoDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *keywordLists[], Accessor &styler) {\n\tint state = SCE_INNO_DEFAULT;\n\tchar chPrev;\n\tchar ch = 0;\n\tchar chNext = styler[startPos];\n\tSci_Position lengthDoc = startPos + length;\n\tchar *buffer = new char[length + 1];\n\tSci_Position bufferCount = 0;\n\tbool isBOL, isEOL, isWS, isBOLWS = 0;\n\n\t// Save line state later with bitState and bitand with bit... to get line state\n\tint bitState = 0;\n\tint const bitCode = 1, bitMessages = 2, bitCommentCurly = 4, bitCommentRound = 8;\n\n\t// Get keyword lists\n\tWordList §ionKeywords = *keywordLists[0];\n\tWordList &standardKeywords = *keywordLists[1];\n\tWordList ¶meterKeywords = *keywordLists[2];\n\tWordList &preprocessorKeywords = *keywordLists[3];\n\tWordList &pascalKeywords = *keywordLists[4];\n\tWordList &userKeywords = *keywordLists[5];\n\n\t// Get line state\n\tSci_Position curLine = styler.GetLine(startPos);\n\tint curLineState = curLine > 0 ? styler.GetLineState(curLine - 1) : 0;\n\tbool isCode = (curLineState & bitCode);\n\tbool isMessages = (curLineState & bitMessages);\n\tbool isCommentCurly = (curLineState & bitCommentCurly);\n\tbool isCommentRound = (curLineState & bitCommentRound);\n\tbool isCommentSlash = false;\n\n\t// Continue Pascal multline comment state\n\tif (isCommentCurly || isCommentRound)\n\t\tstate = SCE_INNO_COMMENT_PASCAL;\n\n\t// Go through all provided text segment\n\t// using the hand-written state machine shown below\n\tstyler.StartAt(startPos);\n\tstyler.StartSegment(startPos);\n\n\tfor (Sci_Position i = startPos; i < lengthDoc; i++) {\n\t\tchPrev = ch;\n\t\tch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif (styler.IsLeadByte(ch)) {\n\t\t\tchNext = styler.SafeGetCharAt(i + 2);\n\t\t\ti++;\n\t\t\tcontinue;\n\t\t}\n\n\t\tisBOL = (chPrev == 0) || (chPrev == '\\n') || (chPrev == '\\r' && ch != '\\n');\n\t\tisBOLWS = (isBOL) ? 1 : (isBOLWS && (chPrev == ' ' || chPrev == '\\t'));\n\t\tisEOL = (ch == '\\n' || ch == '\\r');\n\t\tisWS = (ch == ' ' || ch == '\\t');\n\n\t\tif ((ch == '\\r' && chNext != '\\n') || (ch == '\\n')) {\n\t\t\t// Remember the line state for future incremental lexing\n\t\t\tcurLine = styler.GetLine(i);\n\t\t\tbitState = 0;\n\n\t\t\tif (isCode)\n\t\t\t\tbitState |= bitCode;\n\n\t\t\tif (isMessages)\n\t\t\t\tbitState |= bitMessages;\n\n\t\t\tif (isCommentCurly)\n\t\t\t\tbitState |= bitCommentCurly;\n\n\t\t\tif (isCommentRound)\n\t\t\t\tbitState |= bitCommentRound;\n\n\t\t\tstyler.SetLineState(curLine, bitState);\n\t\t}\n\n\t\tswitch(state) {\n\t\t\tcase SCE_INNO_DEFAULT:\n\t\t\t\tif (!isCode && ch == ';' && isBOLWS) {\n\t\t\t\t\t// Start of a comment\n\t\t\t\t\tstate = SCE_INNO_COMMENT;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_COMMENT);\n\t\t\t\t} else if (ch == '[' && isBOLWS) {\n\t\t\t\t\t// Start of a section name\n\t\t\t\t\tstate = SCE_INNO_SECTION;\n\t\t\t\t\tbufferCount = 0;\n\t\t\t\t} else if (ch == '#' && isBOLWS) {\n\t\t\t\t\t// Start of a preprocessor directive\n\t\t\t\t\tstate = SCE_INNO_PREPROC;\n\t\t\t\t} else if (!isCode && ch == '{' && chNext != '{' && chPrev != '{') {\n\t\t\t\t\t// Start of an inline expansion\n\t\t\t\t\tstate = SCE_INNO_INLINE_EXPANSION;\n\t\t\t\t} else if (isCode && ch == '{') {\n\t\t\t\t\t// Start of a Pascal comment\n\t\t\t\t\tstate = SCE_INNO_COMMENT_PASCAL;\n\t\t\t\t\tisCommentCurly = true;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t} else if (isCode && (ch == '(' && chNext == '*')) {\n\t\t\t\t\t// Start of a Pascal comment\n\t\t\t\t\tstate = SCE_INNO_COMMENT_PASCAL;\n\t\t\t\t\tisCommentRound = true;\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t} else if (isCode && ch == '/' && chNext == '/') {\n\t\t\t\t\t// Start of C-style comment\n\t\t\t\t\tstate = SCE_INNO_COMMENT_PASCAL;\n\t\t\t\t\tisCommentSlash = true;\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t} else if (!isMessages && ch == '\"') {\n\t\t\t\t\t// Start of a double-quote string\n\t\t\t\t\tstate = SCE_INNO_STRING_DOUBLE;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_STRING_DOUBLE);\n\t\t\t\t} else if (!isMessages && ch == '\\'') {\n\t\t\t\t\t// Start of a single-quote string\n\t\t\t\t\tstate = SCE_INNO_STRING_SINGLE;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_STRING_SINGLE);\n\t\t\t\t} else if (!isMessages && IsASCII(ch) && (isalpha(ch) || (ch == '_'))) {\n\t\t\t\t\t// Start of an identifier\n\t\t\t\t\tstate = SCE_INNO_IDENTIFIER;\n\t\t\t\t\tbufferCount = 0;\n\t\t\t\t\tbuffer[bufferCount++] = static_cast(tolower(ch));\n\t\t\t\t} else {\n\t\t\t\t\t// Style it the default style\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_COMMENT:\n\t\t\t\tif (isEOL) {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_COMMENT);\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_COMMENT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_IDENTIFIER:\n\t\t\t\tif (IsASCII(ch) && (isalnum(ch) || (ch == '_'))) {\n\t\t\t\t\tbuffer[bufferCount++] = static_cast(tolower(ch));\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\n\t\t\t\t\t// Check if the buffer contains a keyword\n\t\t\t\t\tif (!isCode && standardKeywords.InList(buffer) && innoNextNotBlankIs(i, styler, '=')) {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_KEYWORD);\n\t\t\t\t\t} else if (!isCode && parameterKeywords.InList(buffer) && innoNextNotBlankIs(i, styler, ':')) {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_PARAMETER);\n\t\t\t\t\t} else if (isCode && pascalKeywords.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_KEYWORD_PASCAL);\n\t\t\t\t\t} else if (!isCode && userKeywords.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_KEYWORD_USER);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_DEFAULT);\n\t\t\t\t\t}\n\n\t\t\t\t\t// Push back the faulty character\n\t\t\t\t\tchNext = styler[i--];\n\t\t\t\t\tch = chPrev;\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_SECTION:\n\t\t\t\tif (ch == ']') {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\n\t\t\t\t\t// Check if the buffer contains a section name\n\t\t\t\t\tif (sectionKeywords.InList(buffer)) {\n\t\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_SECTION);\n\t\t\t\t\t\tisCode = !CompareCaseInsensitive(buffer, \"code\");\n\n\t\t\t\t\t\tisMessages = isCode ? false : (\n\t\t\t\t\t\t\t\t\t!CompareCaseInsensitive(buffer, \"custommessages\")\n\t\t\t\t\t\t\t\t\t|| !CompareCaseInsensitive(buffer, \"messages\"));\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t} else if (IsASCII(ch) && (isalnum(ch) || (ch == '_'))) {\n\t\t\t\t\tbuffer[bufferCount++] = static_cast(tolower(ch));\n\t\t\t\t} else {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_PREPROC:\n\t\t\t\tif (isWS || isEOL) {\n\t\t\t\t\tif (IsASCII(chPrev) && isalpha(chPrev)) {\n\t\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\t\tbuffer[bufferCount] = '\\0';\n\n\t\t\t\t\t\t// Check if the buffer contains a preprocessor directive\n\t\t\t\t\t\tif (preprocessorKeywords.InList(buffer)) {\n\t\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_PREPROC);\n\t\t\t\t\t\t} else {\n\t\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_DEFAULT);\n\t\t\t\t\t\t}\n\n\t\t\t\t\t\t// Push back the faulty character\n\t\t\t\t\t\tchNext = styler[i--];\n\t\t\t\t\t\tch = chPrev;\n\t\t\t\t\t}\n\t\t\t\t} else if (IsASCII(ch) && isalpha(ch)) {\n\t\t\t\t\tif (chPrev == '#' || chPrev == ' ' || chPrev == '\\t')\n\t\t\t\t\t\tbufferCount = 0;\n\t\t\t\t\tbuffer[bufferCount++] = static_cast(tolower(ch));\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_STRING_DOUBLE:\n\t\t\t\tif (ch == '\"') {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_STRING_DOUBLE);\n\t\t\t\t} else if (isEOL) {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_STRING_DOUBLE);\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_STRING_DOUBLE);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_STRING_SINGLE:\n\t\t\t\tif (ch == '\\'') {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_STRING_SINGLE);\n\t\t\t\t} else if (isEOL) {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_STRING_SINGLE);\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_STRING_SINGLE);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_INLINE_EXPANSION:\n\t\t\t\tif (ch == '}') {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_INLINE_EXPANSION);\n\t\t\t\t} else if (isEOL) {\n\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t\tcase SCE_INNO_COMMENT_PASCAL:\n\t\t\t\tif (isCommentSlash) {\n\t\t\t\t\tif (isEOL) {\n\t\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\t\tisCommentSlash = false;\n\t\t\t\t\t\tstyler.ColourTo(i - 1, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_DEFAULT);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t\t}\n\t\t\t\t} else if (isCommentCurly) {\n\t\t\t\t\tif (ch == '}') {\n\t\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\t\tisCommentCurly = false;\n\t\t\t\t\t}\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t} else if (isCommentRound) {\n\t\t\t\t\tif (ch == ')' && chPrev == '*') {\n\t\t\t\t\t\tstate = SCE_INNO_DEFAULT;\n\t\t\t\t\t\tisCommentRound = false;\n\t\t\t\t\t}\n\t\t\t\t\tstyler.ColourTo(i, SCE_INNO_COMMENT_PASCAL);\n\t\t\t\t}\n\t\t\t\tbreak;\n\n\t\t}\n\t}\n\tdelete []buffer;\n}\n\nstatic const char * const innoWordListDesc[] = {\n\t\"Sections\",\n\t\"Keywords\",\n\t\"Parameters\",\n\t\"Preprocessor directives\",\n\t\"Pascal keywords\",\n\t\"User defined keywords\",\n\t0\n};\n\nstatic void FoldInnoDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[], Accessor &styler) {\n\tSci_PositionU endPos = startPos + length;\n\tchar chNext = styler[startPos];\n\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\n\tbool sectionFlag = false;\n\tint levelPrev = lineCurrent > 0 ? styler.LevelAt(lineCurrent - 1) : SC_FOLDLEVELBASE;\n\tint level;\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler[i + 1];\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tint style = styler.StyleAt(i);\n\n\t\tif (style == SCE_INNO_SECTION)\n\t\t\tsectionFlag = true;\n\n\t\tif (atEOL || i == endPos - 1) {\n\t\t\tif (sectionFlag) {\n\t\t\t\tlevel = SC_FOLDLEVELBASE | SC_FOLDLEVELHEADERFLAG;\n\t\t\t\tif (level == levelPrev)\n\t\t\t\t\tstyler.SetLevel(lineCurrent - 1, levelPrev & ~SC_FOLDLEVELHEADERFLAG);\n\t\t\t} else {\n\t\t\t\tlevel = levelPrev & SC_FOLDLEVELNUMBERMASK;\n\t\t\t\tif (levelPrev & SC_FOLDLEVELHEADERFLAG)\n\t\t\t\t\tlevel++;\n\t\t\t}\n\n\t\t\tstyler.SetLevel(lineCurrent, level);\n\n\t\t\tlevelPrev = level;\n\t\t\tlineCurrent++;\n\t\t\tsectionFlag = false;\n\t\t}\n\t}\n}\n\nextern const LexerModule lmInno(SCLEX_INNOSETUP, ColouriseInnoDoc, \"inno\", FoldInnoDoc, innoWordListDesc);\n" }, { "path": "lexers/LexJSON.cxx", "content": "// Scintilla source code edit control\n/**\n * @file LexJSON.cxx\n * @date February 19, 2016\n * @brief Lexer for JSON and JSON-LD formats\n * @author nkmathew\n *\n * The License.txt file describes the conditions under which this software may\n * be distributed.\n *\n */\n\n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\nconst char *const JSONWordListDesc[] = {\n\t\"JSON Keywords\",\n\t\"JSON-LD Keywords\",\n\tnullptr\n};\n\n/**\n * Used to detect compact IRI/URLs in JSON-LD without first looking ahead for the\n * colon separating the prefix and suffix\n *\n * https://www.w3.org/TR/json-ld/#dfn-compact-iri\n */\nstruct CompactIRI {\n\tint colonCount;\n\tbool foundInvalidChar;\n\tCharacterSet setCompactIRI;\n\tCompactIRI() {\n\t\tcolonCount = 0;\n\t\tfoundInvalidChar = false;\n\t\tsetCompactIRI = CharacterSet(CharacterSet::setAlpha, \"$_-\");\n\t}\n\tvoid resetState() noexcept {\n\t\tcolonCount = 0;\n\t\tfoundInvalidChar = false;\n\t}\n\tvoid checkChar(int ch) noexcept {\n\t\tif (ch == ':') {\n\t\t\tcolonCount++;\n\t\t} else {\n\t\t\tfoundInvalidChar |= !setCompactIRI.Contains(ch);\n\t\t}\n\t}\n\t[[nodiscard]] bool shouldHighlight() const noexcept {\n\t\treturn !foundInvalidChar && colonCount == 1;\n\t}\n};\n\n/**\n * Keeps track of escaped characters in strings as per:\n *\n * https://tools.ietf.org/html/rfc7159#section-7\n */\nstruct EscapeSequence {\n\tint digitsLeft;\n\tCharacterSet setHexDigits;\n\tCharacterSet setEscapeChars;\n\tEscapeSequence() {\n\t\tdigitsLeft = 0;\n\t\tsetHexDigits = CharacterSet(CharacterSet::setDigits, \"ABCDEFabcdef\");\n\t\tsetEscapeChars = CharacterSet(CharacterSet::setNone, \"\\\\\\\"tnbfru/\");\n\t}\n\t// Returns true if the following character is a valid escaped character\n\tbool newSequence(int nextChar) noexcept {\n\t\tdigitsLeft = 0;\n\t\tif (nextChar == 'u') {\n\t\t\tdigitsLeft = 5;\n\t\t} else if (!setEscapeChars.Contains(nextChar)) {\n\t\t\treturn false;\n\t\t}\n\t\treturn true;\n\t}\n\t[[nodiscard]] bool atEscapeEnd() const noexcept {\n\t\treturn digitsLeft <= 0;\n\t}\n\t[[nodiscard]] bool isInvalidChar(int currChar) const noexcept {\n\t\treturn !setHexDigits.Contains(currChar);\n\t}\n};\n\nstruct OptionsJSON {\n\tbool foldCompact;\n\tbool fold;\n\tbool allowComments;\n\tbool escapeSequence;\n\tOptionsJSON() {\n\t\tfoldCompact = false;\n\t\tfold = false;\n\t\tallowComments = false;\n\t\tescapeSequence = false;\n\t}\n};\n\nstruct OptionSetJSON : public OptionSet {\n\tOptionSetJSON() {\n\t\tDefineProperty(\"lexer.json.escape.sequence\", &OptionsJSON::escapeSequence,\n\t\t\t\t\t \"Set to 1 to enable highlighting of escape sequences in strings\");\n\n\t\tDefineProperty(\"lexer.json.allow.comments\", &OptionsJSON::allowComments,\n\t\t\t\t\t \"Set to 1 to enable highlighting of line/block comments in JSON\");\n\n\t\tDefineProperty(\"fold.compact\", &OptionsJSON::foldCompact);\n\t\tDefineProperty(\"fold\", &OptionsJSON::fold);\n\t\tDefineWordListSets(JSONWordListDesc);\n\t}\n};\n\nclass LexerJSON : public DefaultLexer {\n\tOptionsJSON options;\n\tOptionSetJSON optSetJSON;\n\tEscapeSequence escapeSeq;\n\tWordList keywordsJSON;\n\tWordList keywordsJSONLD;\n\tCharacterSet setOperators;\n\tCharacterSet setURL;\n\tCharacterSet setKeywordJSONLD;\n\tCharacterSet setKeywordJSON;\n\tCompactIRI compactIRI;\n\n\tstatic bool IsNextNonWhitespace(LexAccessor &styler, Sci_Position start, char ch) {\n\t\tSci_Position i = 0;\n\t\twhile (i < 50) {\n\t\t\ti++;\n\t\t\tconst char curr = styler.SafeGetCharAt(start+i, '\\0');\n\t\t\tconst char next = styler.SafeGetCharAt(start+i+1, '\\0');\n\t\t\tconst bool atEOL = (curr == '\\r' && next != '\\n') || (curr == '\\n');\n\t\t\tif (curr == ch) {\n\t\t\t\treturn true;\n\t\t\t} else if (!isspacechar(curr) || atEOL) {\n\t\t\t\treturn false;\n\t\t\t}\n\t\t}\n\t\treturn false;\n\t}\n\n\t/**\n\t * Looks for the colon following the end quote\n\t *\n\t * Assumes property names of lengths no longer than a 100 characters.\n\t * The colon is also expected to be less than 50 spaces after the end\n\t * quote for the string to be considered a property name\n\t */\n\tstatic bool AtPropertyName(LexAccessor &styler, Sci_Position start) {\n\t\tSci_Position i = 0;\n\t\tbool escaped = false;\n\t\twhile (i < 100) {\n\t\t\ti++;\n\t\t\tconst char curr = styler.SafeGetCharAt(start+i, '\\0');\n\t\t\tif (escaped) {\n\t\t\t\tescaped = false;\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t\tescaped = curr == '\\\\';\n\t\t\tif (curr == '\"') {\n\t\t\t\treturn IsNextNonWhitespace(styler, start+i, ':');\n\t\t\t} else if (!curr) {\n\t\t\t\treturn false;\n\t\t\t}\n\t\t}\n\t\treturn false;\n\t}\n\n\tstatic bool IsNextWordInList(const WordList &keywordList, const CharacterSet &wordSet,\n\t\t\t\t\t\t\t\t const StyleContext &context, LexAccessor &styler) {\n\t\tchar word[51];\n\t\tconst Sci_Position currPos = static_cast(context.currentPos);\n\t\tint i = 0;\n\t\twhile (i < 50) {\n\t\t\tconst char ch = styler.SafeGetCharAt(currPos + i);\n\t\t\tif (!wordSet.Contains(ch)) {\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tword[i] = ch;\n\t\t\ti++;\n\t\t}\n\t\tword[i] = '\\0';\n\t\treturn keywordList.InList(word);\n\t}\n\n\tpublic:\n\tLexerJSON() :\n\t\tDefaultLexer(\"json\", SCLEX_JSON),\n\t\tsetOperators(CharacterSet::setNone, \"[{}]:,\"),\n\t\tsetURL(CharacterSet::setAlphaNum, \"-._~:/?#[]@!$&'()*+,),=\"),\n\t\tsetKeywordJSONLD(CharacterSet::setAlpha, \":@\"),\n\t\tsetKeywordJSON(CharacterSet::setAlpha, \"$_\") {\n\t}\n\tvirtual ~LexerJSON() = default;\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tconst char *SCI_METHOD PropertyNames() override {\n\t\treturn optSetJSON.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn optSetJSON.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn optSetJSON.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override {\n\t\tif (optSetJSON.PropertySet(&options, key, val)) {\n\t\t\treturn 0;\n\t\t}\n\t\treturn -1;\n\t}\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn optSetJSON.PropertyGet(key);\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override {\n\t\tWordList *wordListN = nullptr;\n\t\tswitch (n) {\n\t\t\tcase 0:\n\t\t\t\twordListN = &keywordsJSON;\n\t\t\t\tbreak;\n\t\t\tcase 1:\n\t\t\t\twordListN = &keywordsJSONLD;\n\t\t\t\tbreak;\n\t\t}\n\t\tSci_Position firstModification = -1;\n\t\tif (wordListN) {\n\t\t\tif (wordListN->Set(wl)) {\n\t\t\t\tfirstModification = 0;\n\t\t\t}\n\t\t}\n\t\treturn firstModification;\n\t}\n\tvoid *SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn nullptr;\n\t}\n\tstatic ILexer5 *LexerFactoryJSON() {\n\t\treturn new LexerJSON;\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() override {\n\t\treturn optSetJSON.DescribeWordListSets();\n\t}\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos,\n\t\t\t\t\t\t\t\tSci_Position length,\n\t\t\t\t\t\t\t\tint initStyle,\n\t\t\t\t\t\t\t\tIDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos,\n\t\t\t\t\t\t\t\t Sci_Position length,\n\t\t\t\t\t\t\t\t int initStyle,\n\t\t\t\t\t\t\t\t IDocument *pAccess) override;\n};\n\nvoid SCI_METHOD LexerJSON::Lex(Sci_PositionU startPos,\n\t\t\t\t\t\t\t Sci_Position length,\n\t\t\t\t\t\t\t int initStyle,\n\t\t\t\t\t\t\t IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\tStyleContext context(startPos, length, initStyle, styler);\n\tint stringStyleBefore = SCE_JSON_STRING;\n\twhile (context.More()) {\n\t\tswitch (context.state) {\n\t\t\tcase SCE_JSON_BLOCKCOMMENT:\n\t\t\t\tif (context.Match(\"*/\")) {\n\t\t\t\t\tcontext.Forward();\n\t\t\t\t\tcontext.ForwardSetState(SCE_JSON_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_LINECOMMENT:\n\t\t\t\tif (context.MatchLineEnd()) {\n\t\t\t\t\tcontext.SetState(SCE_JSON_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_STRINGEOL:\n\t\t\t\tif (context.atLineStart) {\n\t\t\t\t\tcontext.SetState(SCE_JSON_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_ESCAPESEQUENCE:\n\t\t\t\tescapeSeq.digitsLeft--;\n\t\t\t\tif (!escapeSeq.atEscapeEnd()) {\n\t\t\t\t\tif (escapeSeq.isInvalidChar(context.ch)) {\n\t\t\t\t\t\tcontext.SetState(SCE_JSON_ERROR);\n\t\t\t\t\t}\n\t\t\t\t\tbreak;\n\t\t\t\t}\n\t\t\t\tif (context.ch == '\"') {\n\t\t\t\t\tcontext.SetState(stringStyleBefore);\n\t\t\t\t\tcontext.ForwardSetState(SCE_JSON_DEFAULT);\n\t\t\t\t} else if (context.ch == '\\\\') {\n\t\t\t\t\tif (!escapeSeq.newSequence(context.chNext)) {\n\t\t\t\t\t\tcontext.SetState(SCE_JSON_ERROR);\n\t\t\t\t\t}\n\t\t\t\t\tcontext.Forward();\n\t\t\t\t} else {\n\t\t\t\t\tcontext.SetState(stringStyleBefore);\n\t\t\t\t\tif (context.atLineEnd) {\n\t\t\t\t\t\tcontext.ChangeState(SCE_JSON_STRINGEOL);\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_PROPERTYNAME:\n\t\t\tcase SCE_JSON_STRING:\n\t\t\t\tif (context.ch == '\"') {\n\t\t\t\t\tif (compactIRI.shouldHighlight()) {\n\t\t\t\t\t\tcontext.ChangeState(SCE_JSON_COMPACTIRI);\n\t\t\t\t\t\tcontext.ForwardSetState(SCE_JSON_DEFAULT);\n\t\t\t\t\t\tcompactIRI.resetState();\n\t\t\t\t\t} else {\n\t\t\t\t\t\tcontext.ForwardSetState(SCE_JSON_DEFAULT);\n\t\t\t\t\t}\n\t\t\t\t} else if (context.atLineEnd) {\n\t\t\t\t\tcontext.ChangeState(SCE_JSON_STRINGEOL);\n\t\t\t\t} else if (context.ch == '\\\\') {\n\t\t\t\t\tstringStyleBefore = context.state;\n\t\t\t\t\tif (options.escapeSequence) {\n\t\t\t\t\t\tcontext.SetState(SCE_JSON_ESCAPESEQUENCE);\n\t\t\t\t\t\tif (!escapeSeq.newSequence(context.chNext)) {\n\t\t\t\t\t\t\tcontext.SetState(SCE_JSON_ERROR);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tcontext.Forward();\n\t\t\t\t} else if (context.Match(\"https://\") ||\n\t\t\t\t\t\t context.Match(\"http://\") ||\n\t\t\t\t\t\t context.Match(\"ssh://\") ||\n\t\t\t\t\t\t context.Match(\"git://\") ||\n\t\t\t\t\t\t context.Match(\"svn://\") ||\n\t\t\t\t\t\t context.Match(\"ftp://\") ||\n\t\t\t\t\t\t context.Match(\"mailto:\")) {\n\t\t\t\t\t// Handle most common URI schemes only\n\t\t\t\t\tstringStyleBefore = context.state;\n\t\t\t\t\tcontext.SetState(SCE_JSON_URI);\n\t\t\t\t} else if (context.ch == '@') {\n\t\t\t\t\t// https://www.w3.org/TR/json-ld/#dfn-keyword\n\t\t\t\t\tif (IsNextWordInList(keywordsJSONLD, setKeywordJSONLD, context, styler)) {\n\t\t\t\t\t\tstringStyleBefore = context.state;\n\t\t\t\t\t\tcontext.SetState(SCE_JSON_LDKEYWORD);\n\t\t\t\t\t}\n\t\t\t\t} else {\n\t\t\t\t\tcompactIRI.checkChar(context.ch);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_LDKEYWORD:\n\t\t\tcase SCE_JSON_URI:\n\t\t\t\tif ((!setKeywordJSONLD.Contains(context.ch) &&\n\t\t\t\t\t (context.state == SCE_JSON_LDKEYWORD)) ||\n\t\t\t\t\t(!setURL.Contains(context.ch))) {\n\t\t\t\t\tcontext.SetState(stringStyleBefore);\n\t\t\t\t}\n\t\t\t\tif (context.ch == '\"') {\n\t\t\t\t\tcontext.ForwardSetState(SCE_JSON_DEFAULT);\n\t\t\t\t} else if (context.ch == '\\\\') {\n\t\t\t\t\tif (options.escapeSequence) {\n\t\t\t\t\t\tcontext.SetState(SCE_JSON_ESCAPESEQUENCE);\n\t\t\t\t\t\tif (!escapeSeq.newSequence(context.chNext)) {\n\t\t\t\t\t\t\tcontext.SetState(SCE_JSON_ERROR);\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tcontext.Forward();\n\t\t\t\t} else if (context.atLineEnd) {\n\t\t\t\t\tcontext.ChangeState(SCE_JSON_STRINGEOL);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_OPERATOR:\n\t\t\tcase SCE_JSON_NUMBER:\n\t\t\t\tcontext.SetState(SCE_JSON_DEFAULT);\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_ERROR:\n\t\t\t\tif (context.MatchLineEnd()) {\n\t\t\t\t\tcontext.SetState(SCE_JSON_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase SCE_JSON_KEYWORD:\n\t\t\t\tif (!setKeywordJSON.Contains(context.ch)) {\n\t\t\t\t\tcontext.SetState(SCE_JSON_DEFAULT);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t}\n\t\tif (context.state == SCE_JSON_DEFAULT) {\n\t\t\tif (context.ch == '\"') {\n\t\t\t\tcompactIRI.resetState();\n\t\t\t\tcontext.SetState(SCE_JSON_STRING);\n\t\t\t\tconst Sci_Position currPos = static_cast(context.currentPos);\n\t\t\t\tif (AtPropertyName(styler, currPos)) {\n\t\t\t\t\tcontext.SetState(SCE_JSON_PROPERTYNAME);\n\t\t\t\t}\n\t\t\t} else if (setOperators.Contains(context.ch)) {\n\t\t\t\tcontext.SetState(SCE_JSON_OPERATOR);\n\t\t\t} else if (options.allowComments && context.Match(\"/*\")) {\n\t\t\t\tcontext.SetState(SCE_JSON_BLOCKCOMMENT);\n\t\t\t\tcontext.Forward();\n\t\t\t} else if (options.allowComments && context.Match(\"//\")) {\n\t\t\t\tcontext.SetState(SCE_JSON_LINECOMMENT);\n\t\t\t} else if (setKeywordJSON.Contains(context.ch)) {\n\t\t\t\tif (IsNextWordInList(keywordsJSON, setKeywordJSON, context, styler)) {\n\t\t\t\t\tcontext.SetState(SCE_JSON_KEYWORD);\n\t\t\t\t}\n\t\t\t}\n\t\t\tconst bool numberStart =\n\t\t\t\tIsADigit(context.ch) && (context.chPrev == '+'||\n\t\t\t\t\t\t\t\t\t\t context.chPrev == '-' ||\n\t\t\t\t\t\t\t\t\t\t context.atLineStart ||\n\t\t\t\t\t\t\t\t\t\t IsASpace(context.chPrev) ||\n\t\t\t\t\t\t\t\t\t\t setOperators.Contains(context.chPrev));\n\t\t\tconst bool exponentPart =\n\t\t\t\ttolower(context.ch) == 'e' &&\n\t\t\t\tIsADigit(context.chPrev) &&\n\t\t\t\t(IsADigit(context.chNext) ||\n\t\t\t\t context.chNext == '+' ||\n\t\t\t\t context.chNext == '-');\n\t\t\tconst bool signPart =\n\t\t\t\t(context.ch == '-' || context.ch == '+') &&\n\t\t\t\t((tolower(context.chPrev) == 'e' && IsADigit(context.chNext)) ||\n\t\t\t\t ((IsASpace(context.chPrev) || setOperators.Contains(context.chPrev))\n\t\t\t\t && IsADigit(context.chNext)));\n\t\t\tconst bool adjacentDigit =\n\t\t\t\tIsADigit(context.ch) && IsADigit(context.chPrev);\n\t\t\tconst bool afterExponent = IsADigit(context.ch) && tolower(context.chPrev) == 'e';\n\t\t\tconst bool dotPart = context.ch == '.' &&\n\t\t\t\tIsADigit(context.chPrev) &&\n\t\t\t\tIsADigit(context.chNext);\n\t\t\tconst bool afterDot = IsADigit(context.ch) && context.chPrev == '.';\n\t\t\tif (numberStart ||\n\t\t\t\texponentPart ||\n\t\t\t\tsignPart ||\n\t\t\t\tadjacentDigit ||\n\t\t\t\tdotPart ||\n\t\t\t\tafterExponent ||\n\t\t\t\tafterDot) {\n\t\t\t\tcontext.SetState(SCE_JSON_NUMBER);\n\t\t\t} else if (context.state == SCE_JSON_DEFAULT && !IsASpace(context.ch)) {\n\t\t\t\tcontext.SetState(SCE_JSON_ERROR);\n\t\t\t}\n\t\t}\n\t\tcontext.Forward();\n\t}\n\tcontext.Complete();\n}\n\nvoid SCI_METHOD LexerJSON::Fold(Sci_PositionU startPos,\n\t\t\t\t\t\t\t\tSci_Position length,\n\t\t\t\t\t\t\t\tint,\n\t\t\t\t\t\t\t\tIDocument *pAccess) {\n\tif (!options.fold) {\n\t\treturn;\n\t}\n\tLexAccessor styler(pAccess);\n\tSci_PositionU currLine = styler.GetLine(startPos);\n\tconst Sci_PositionU endPos = startPos + length;\n\tint currLevel = SC_FOLDLEVELBASE;\n\tif (currLine > 0)\n\t\tcurrLevel = styler.LevelAt(currLine - 1) >> 16;\n\tint nextLevel = currLevel;\n\tint visibleChars = 0;\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tconst char curr = styler.SafeGetCharAt(i);\n\t\tconst char next = styler.SafeGetCharAt(i+1);\n\t\tconst bool atEOL = (curr == '\\r' && next != '\\n') || (curr == '\\n');\n\t\tif (styler.StyleAt(i) == SCE_JSON_OPERATOR) {\n\t\t\tif (curr == '{' || curr == '[') {\n\t\t\t\tnextLevel++;\n\t\t\t} else if (curr == '}' || curr == ']') {\n\t\t\t\tnextLevel--;\n\t\t\t}\n\t\t}\n\t\tif (atEOL || i == (endPos-1)) {\n\t\t\tint level = currLevel | nextLevel << 16;\n\t\t\tif (!visibleChars && options.foldCompact) {\n\t\t\t\tlevel |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t} else if (nextLevel > currLevel) {\n\t\t\t\tlevel |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tif (level != styler.LevelAt(currLine)) {\n\t\t\t\tstyler.SetLevel(currLine, level);\n\t\t\t}\n\t\t\tcurrLine++;\n\t\t\tcurrLevel = nextLevel;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(curr)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n}\n\n}\n\nextern const LexerModule lmJSON(SCLEX_JSON,\n\t\t\t\t LexerJSON::LexerFactoryJSON,\n\t\t\t\t \"json\",\n\t\t\t\t JSONWordListDesc);\n" }, { "path": "lexers/LexJulia.cxx", "content": "// Scintilla source code edit control\n// Encoding: UTF-8\n/** @file LexJulia.cxx\n ** Lexer for Julia.\n ** Reusing code from LexMatlab, LexPython and LexRust\n **\n ** Written by Bertrand Lacoste\n **\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"StringCopy.h\"\n#include \"PropSetSimple.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"CharacterCategory.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nstatic const int MAX_JULIA_IDENT_CHARS = 1023;\n\n// Options used for LexerJulia\nstruct OptionsJulia {\n bool fold;\n bool foldComment;\n bool foldCompact;\n bool foldDocstring;\n bool foldSyntaxBased;\n bool highlightTypeannotation;\n bool highlightLexerror;\n\tOptionsJulia() {\n fold = true;\n foldComment = true;\n foldCompact = false;\n foldDocstring = true;\n foldSyntaxBased = true;\n highlightTypeannotation = false;\n highlightLexerror = false;\n\t}\n};\n\nconst char * const juliaWordLists[] = {\n \"Primary keywords and identifiers\",\n \"Built in types\",\n \"Other keywords\",\n \"Built in functions\",\n 0,\n};\n\nstruct OptionSetJulia : public OptionSet {\n\tOptionSetJulia() {\n\t\tDefineProperty(\"fold\", &OptionsJulia::fold);\n\n\t\tDefineProperty(\"fold.compact\", &OptionsJulia::foldCompact);\n\n\t\tDefineProperty(\"fold.comment\", &OptionsJulia::foldComment);\n\n\t\tDefineProperty(\"fold.julia.docstring\", &OptionsJulia::foldDocstring,\n\t\t\t\"Fold multiline triple-doublequote strings, usually used to document a function or type above the definition.\");\n\n\t\tDefineProperty(\"fold.julia.syntax.based\", &OptionsJulia::foldSyntaxBased,\n\t\t\t\"Set this property to 0 to disable syntax based folding.\");\n\n\t\tDefineProperty(\"lexer.julia.highlight.typeannotation\", &OptionsJulia::highlightTypeannotation,\n\t\t\t\"This option enables highlighting of the type identifier after `::`.\");\n\n\t\tDefineProperty(\"lexer.julia.highlight.lexerror\", &OptionsJulia::highlightLexerror,\n\t\t\t\"This option enables highlighting of syntax error int character or number definition.\");\n\n\t\tDefineWordListSets(juliaWordLists);\n\t}\n};\n\nLexicalClass juliaLexicalClasses[] = {\n\t// Lexer Julia SCLEX_JULIA SCE_JULIA_:\n\t0, \"SCE_JULIA_DEFAULT\", \"default\", \"White space\",\n\t1, \"SCE_JULIA_COMMENT\", \"comment\", \"Comment\",\n\t2, \"SCE_JULIA_NUMBER\", \"literal numeric\", \"Number\",\n\t3, \"SCE_JULIA_KEYWORD1\", \"keyword\", \"Reserved keywords\",\n\t4, \"SCE_JULIA_KEYWORD2\", \"identifier\", \"Builtin type names\",\n\t5, \"SCE_JULIA_KEYWORD3\", \"identifier\", \"Constants\",\n\t6, \"SCE_JULIA_CHAR\", \"literal string character\", \"Single quoted string\",\n\t7, \"SCE_JULIA_OPERATOR\", \"operator\", \"Operator\",\n\t8, \"SCE_JULIA_BRACKET\", \"bracket operator\", \"Bracket operator\",\n\t9, \"SCE_JULIA_IDENTIFIER\", \"identifier\", \"Identifier\",\n\t10, \"SCE_JULIA_STRING\", \"literal string\", \"Double quoted String\",\n\t11, \"SCE_JULIA_SYMBOL\", \"literal string symbol\", \"Symbol\",\n\t12, \"SCE_JULIA_MACRO\", \"macro preprocessor\", \"Macro\",\n\t13, \"SCE_JULIA_STRINGINTERP\", \"literal string interpolated\", \"String interpolation\",\n\t14, \"SCE_JULIA_DOCSTRING\", \"literal string documentation\", \"Docstring\",\n\t15, \"SCE_JULIA_STRINGLITERAL\", \"literal string\", \"String literal prefix\",\n\t16, \"SCE_JULIA_COMMAND\", \"literal string command\", \"Command\",\n\t17, \"SCE_JULIA_COMMANDLITERAL\", \"literal string command\", \"Command literal prefix\",\n\t18, \"SCE_JULIA_TYPEANNOT\", \"identifier type\", \"Type annotation identifier\",\n\t19, \"SCE_JULIA_LEXERROR\", \"lexer error\", \"Lexing error\",\n\t20, \"SCE_JULIA_KEYWORD4\", \"identifier\", \"Builtin function names\",\n\t21, \"SCE_JULIA_TYPEOPERATOR\", \"operator type\", \"Type annotation operator\",\n};\n\nclass LexerJulia : public DefaultLexer {\n\tWordList keywords;\n\tWordList identifiers2;\n\tWordList identifiers3;\n\tWordList identifiers4;\n\tOptionsJulia options;\n\tOptionSetJulia osJulia;\npublic:\n\texplicit LexerJulia() :\n\t\tDefaultLexer(\"julia\", SCLEX_JULIA, juliaLexicalClasses, ELEMENTS(juliaLexicalClasses)) {\n\t}\n\tvirtual ~LexerJulia() {\n\t}\n\tvoid SCI_METHOD Release() override {\n\t\tdelete this;\n\t}\n\tint SCI_METHOD Version() const override {\n\t\treturn lvRelease5;\n\t}\n\tconst char * SCI_METHOD PropertyNames() override {\n\t\treturn osJulia.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osJulia.PropertyType(name);\n\t}\n\tconst char * SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osJulia.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char * SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osJulia.PropertyGet(key);\n\t}\n\tconst char * SCI_METHOD DescribeWordListSets() override {\n\t\treturn osJulia.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid * SCI_METHOD PrivateCall(int, void *) override {\n\t\treturn 0;\n\t}\n\n\tstatic ILexer5 *LexerFactoryJulia() {\n\t\treturn new LexerJulia();\n\t}\n};\n\nSci_Position SCI_METHOD LexerJulia::PropertySet(const char *key, const char *val) {\n\tif (osJulia.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerJulia::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &identifiers2;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &identifiers3;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &identifiers4;\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl)) {\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nstatic inline bool IsJuliaOperator(int ch) {\n if (ch == '%' || ch == '^' || ch == '&' || ch == '*' ||\n ch == '-' || ch == '+' || ch == '=' || ch == '|' ||\n ch == '<' || ch == '>' || ch == '/' || ch == '~' ||\n ch == '\\\\' ) {\n return true;\n }\n return false;\n}\n\n// The list contains non-ascii unary operators\nstatic inline bool IsJuliaUnaryOperator (int ch) {\n if (ch == 0x00ac || ch == 0x221a || ch == 0x221b ||\n ch == 0x221c || ch == 0x22c6 || ch == 0x00b1 ||\n ch == 0x2213 ) {\n return true;\n }\n return false;\n}\n\nstatic inline bool IsJuliaParen (int ch) {\n if (ch == '(' || ch == ')' || ch == '{' || ch == '}' ||\n ch == '[' || ch == ']' ) {\n return true;\n }\n return false;\n}\n\n// Unicode parsing from Julia source code:\n// https://github.com/JuliaLang/julia/blob/master/src/flisp/julia_extensions.c\n// keep the same function name to be easy to find again\nstatic int is_wc_cat_id_start(uint32_t wc) {\n const CharacterCategory cat = CategoriseCharacter((int) wc);\n\n return (cat == ccLu || cat == ccLl ||\n cat == ccLt || cat == ccLm ||\n cat == ccLo || cat == ccNl ||\n cat == ccSc || // allow currency symbols\n // other symbols, but not arrows or replacement characters\n (cat == ccSo && !(wc >= 0x2190 && wc <= 0x21FF) &&\n wc != 0xfffc && wc != 0xfffd &&\n wc != 0x233f && // notslash\n wc != 0x00a6) || // broken bar\n\n // math symbol (category Sm) whitelist\n (wc >= 0x2140 && wc <= 0x2a1c &&\n ((wc >= 0x2140 && wc <= 0x2144) || // ⅀, ⅁, ⅂, ⅃, ⅄\n wc == 0x223f || wc == 0x22be || wc == 0x22bf || // ∿, ⊾, ⊿\n wc == 0x22a4 || wc == 0x22a5 || // ⊤ ⊥\n\n (wc >= 0x2200 && wc <= 0x2233 &&\n (wc == 0x2202 || wc == 0x2205 || wc == 0x2206 || // ∂, ∅, ∆\n wc == 0x2207 || wc == 0x220e || wc == 0x220f || // ∇, ∎, ∏\n wc == 0x2200 || wc == 0x2203 || wc == 0x2204 || // ∀, ∃, ∄\n wc == 0x2210 || wc == 0x2211 || // ∐, ∑\n wc == 0x221e || wc == 0x221f || // ∞, ∟\n wc >= 0x222b)) || // ∫, ∬, ∭, ∮, ∯, ∰, ∱, ∲, ∳\n\n (wc >= 0x22c0 && wc <= 0x22c3) || // N-ary big ops: ⋀, ⋁, ⋂, ⋃\n (wc >= 0x25F8 && wc <= 0x25ff) || // ◸, ◹, ◺, ◻, ◼, ◽, ◾, ◿\n\n (wc >= 0x266f &&\n (wc == 0x266f || wc == 0x27d8 || wc == 0x27d9 || // ♯, ⟘, ⟙\n (wc >= 0x27c0 && wc <= 0x27c1) || // ⟀, ⟁\n (wc >= 0x29b0 && wc <= 0x29b4) || // ⦰, ⦱, ⦲, ⦳, ⦴\n (wc >= 0x2a00 && wc <= 0x2a06) || // ⨀, ⨁, ⨂, ⨃, ⨄, ⨅, ⨆\n (wc >= 0x2a09 && wc <= 0x2a16) || // ⨉, ⨊, ⨋, ⨌, ⨍, ⨎, ⨏, ⨐, ⨑, ⨒, ⨓, ⨔, ⨕, ⨖\n wc == 0x2a1b || wc == 0x2a1c)))) || // ⨛, ⨜\n\n (wc >= 0x1d6c1 && // variants of \\nabla and \\partial\n (wc == 0x1d6c1 || wc == 0x1d6db ||\n wc == 0x1d6fb || wc == 0x1d715 ||\n wc == 0x1d735 || wc == 0x1d74f ||\n wc == 0x1d76f || wc == 0x1d789 ||\n wc == 0x1d7a9 || wc == 0x1d7c3)) ||\n\n // super- and subscript +-=()\n (wc >= 0x207a && wc <= 0x207e) ||\n (wc >= 0x208a && wc <= 0x208e) ||\n\n // angle symbols\n (wc >= 0x2220 && wc <= 0x2222) || // ∠, ∡, ∢\n (wc >= 0x299b && wc <= 0x29af) || // ⦛, ⦜, ⦝, ⦞, ⦟, ⦠, ⦡, ⦢, ⦣, ⦤, ⦥, ⦦, ⦧, ⦨, ⦩, ⦪, ⦫, ⦬, ⦭, ⦮, ⦯\n\n // Other_ID_Start\n wc == 0x2118 || wc == 0x212E || // ℘, ℮\n (wc >= 0x309B && wc <= 0x309C) || // katakana-hiragana sound marks\n\n // bold-digits and double-struck digits\n (wc >= 0x1D7CE && wc <= 0x1D7E1)); // 𝟎 through 𝟗 (inclusive), 𝟘 through 𝟡 (inclusive)\n}\n\nstatic inline bool IsIdentifierFirstCharacter (int ch) {\n if (IsASCII(ch)) {\n return (bool) (isalpha(ch) || ch == '_');\n }\n if (ch < 0xA1 || ch > 0x10ffff) {\n return false;\n }\n\n return is_wc_cat_id_start((uint32_t) ch);\n}\n\nstatic inline bool IsIdentifierCharacter (int ch) {\n if (IsASCII(ch)) {\n return (bool) (isalnum(ch) || ch == '_' || ch == '!');\n }\n if (ch < 0xA1 || ch > 0x10ffff) {\n return false;\n }\n\n if (is_wc_cat_id_start((uint32_t) ch)) {\n return true;\n }\n\n const CharacterCategory cat = CategoriseCharacter(ch);\n\n if (cat == ccMn || cat == ccMc ||\n cat == ccNd || cat == ccPc ||\n cat == ccSk || cat == ccMe ||\n cat == ccNo ||\n // primes (single, double, triple, their reverses, and quadruple)\n (ch >= 0x2032 && ch <= 0x2037) || (ch == 0x2057)) {\n return true;\n }\n return false;\n}\n\n// keep the same function name to be easy to find again\nstatic const uint32_t opsuffs[] = {\n 0x00b2, // ²\n 0x00b3, // ³\n 0x00b9, // ¹\n 0x02b0, // ʰ\n 0x02b2, // ʲ\n 0x02b3, // ʳ\n 0x02b7, // ʷ\n 0x02b8, // ʸ\n 0x02e1, // ˡ\n 0x02e2, // ˢ\n 0x02e3, // ˣ\n 0x1d2c, // ᴬ\n 0x1d2e, // ᴮ\n 0x1d30, // ᴰ\n 0x1d31, // ᴱ\n 0x1d33, // ᴳ\n 0x1d34, // ᴴ\n 0x1d35, // ᴵ\n 0x1d36, // ᴶ\n 0x1d37, // ᴷ\n 0x1d38, // ᴸ\n 0x1d39, // ᴹ\n 0x1d3a, // ᴺ\n 0x1d3c, // ᴼ\n 0x1d3e, // ᴾ\n 0x1d3f, // ᴿ\n 0x1d40, // ᵀ\n 0x1d41, // ᵁ\n 0x1d42, // ᵂ\n 0x1d43, // ᵃ\n 0x1d47, // ᵇ\n 0x1d48, // ᵈ\n 0x1d49, // ᵉ\n 0x1d4d, // ᵍ\n 0x1d4f, // ᵏ\n 0x1d50, // ᵐ\n 0x1d52, // ᵒ\n 0x1d56, // ᵖ\n 0x1d57, // ᵗ\n 0x1d58, // ᵘ\n 0x1d5b, // ᵛ\n 0x1d5d, // ᵝ\n 0x1d5e, // ᵞ\n 0x1d5f, // ᵟ\n 0x1d60, // ᵠ\n 0x1d61, // ᵡ\n 0x1d62, // ᵢ\n 0x1d63, // ᵣ\n 0x1d64, // ᵤ\n 0x1d65, // ᵥ\n 0x1d66, // ᵦ\n 0x1d67, // ᵧ\n 0x1d68, // ᵨ\n 0x1d69, // ᵩ\n 0x1d6a, // ᵪ\n 0x1d9c, // ᶜ\n 0x1da0, // ᶠ\n 0x1da5, // ᶥ\n 0x1da6, // ᶦ\n 0x1dab, // ᶫ\n 0x1db0, // ᶰ\n 0x1db8, // ᶸ\n 0x1dbb, // ᶻ\n 0x1dbf, // ᶿ\n 0x2032, // ′\n 0x2033, // ″\n 0x2034, // ‴\n 0x2035, // ‵\n 0x2036, // ‶\n 0x2037, // ‷\n 0x2057, // ⁗\n 0x2070, // ⁰\n 0x2071, // ⁱ\n 0x2074, // ⁴\n 0x2075, // ⁵\n 0x2076, // ⁶\n 0x2077, // ⁷\n 0x2078, // ⁸\n 0x2079, // ⁹\n 0x207a, // ⁺\n 0x207b, // ⁻\n 0x207c, // ⁼\n 0x207d, // ⁽\n 0x207e, // ⁾\n 0x207f, // ⁿ\n 0x2080, // ₀\n 0x2081, // ₁\n 0x2082, // ₂\n 0x2083, // ₃\n 0x2084, // ₄\n 0x2085, // ₅\n 0x2086, // ₆\n 0x2087, // ₇\n 0x2088, // ₈\n 0x2089, // ₉\n 0x208a, // ₊\n 0x208b, // ₋\n 0x208c, // ₌\n 0x208d, // ₍\n 0x208e, // ₎\n 0x2090, // ₐ\n 0x2091, // ₑ\n 0x2092, // ₒ\n 0x2093, // ₓ\n 0x2095, // ₕ\n 0x2096, // ₖ\n 0x2097, // ₗ\n 0x2098, // ₘ\n 0x2099, // ₙ\n 0x209a, // ₚ\n 0x209b, // ₛ\n 0x209c, // ₜ\n 0x2c7c, // ⱼ\n 0x2c7d, // ⱽ\n 0xa71b, // ꜛ\n 0xa71c, // ꜜ\n 0xa71d // ꜝ\n};\nstatic const size_t opsuffs_len = sizeof(opsuffs) / (sizeof(uint32_t));\n\n// keep the same function name to be easy to find again\nstatic bool jl_op_suffix_char(uint32_t wc) {\n if (wc < 0xA1 || wc > 0x10ffff) {\n return false;\n }\n const CharacterCategory cat = CategoriseCharacter((int) wc);\n if (cat == ccMn || cat == ccMc ||\n cat == ccMe) {\n return true;\n }\n\n for (size_t i = 0; i < opsuffs_len; ++i) {\n if (wc == opsuffs[i]) {\n return true;\n }\n }\n return false;\n}\n\n// keep the same function name to be easy to find again\nstatic bool never_id_char(uint32_t wc) {\n const CharacterCategory cat = CategoriseCharacter((int) wc);\n return (\n // spaces and control characters:\n (cat >= ccZs && cat <= ccCs) ||\n\n // ASCII and Latin1 non-connector punctuation\n (wc < 0xff &&\n cat >= ccPd && cat <= ccPo) ||\n\n wc == '`' ||\n\n // mathematical brackets\n (wc >= 0x27e6 && wc <= 0x27ef) ||\n // angle, corner, and lenticular brackets\n (wc >= 0x3008 && wc <= 0x3011) ||\n // tortoise shell, square, and more lenticular brackets\n (wc >= 0x3014 && wc <= 0x301b) ||\n // fullwidth parens\n (wc == 0xff08 || wc == 0xff09) ||\n // fullwidth square brackets\n (wc == 0xff3b || wc == 0xff3d));\n}\n\n\nstatic bool IsOperatorFirstCharacter (int ch) {\n if (IsASCII(ch)) {\n if (IsJuliaOperator(ch) ||\n ch == '!' || ch == '?' ||\n ch == ':' || ch == ';' ||\n ch == ',' || ch == '.' ) {\n return true;\n }else {\n return false;\n }\n } else if (is_wc_cat_id_start((uint32_t) ch)) {\n return false;\n } else if (IsJuliaUnaryOperator(ch) ||\n ! never_id_char((uint32_t) ch)) {\n return true;\n }\n return false;\n}\n\nstatic bool IsOperatorCharacter (int ch) {\n if (IsOperatorFirstCharacter(ch) ||\n (!IsASCII(ch) && jl_op_suffix_char((uint32_t) ch)) ) {\n return true;\n }\n return false;\n}\n\nstatic bool CheckBoundsIndexing(char *str) {\n if (strcmp(\"begin\", str) == 0 || strcmp(\"end\", str) == 0 ) {\n return true;\n }\n return false;\n}\n\nstatic int CheckKeywordFoldPoint(char *str) {\n if (strcmp (\"if\", str) == 0 ||\n strcmp (\"for\", str) == 0 ||\n strcmp (\"while\", str) == 0 ||\n strcmp (\"try\", str) == 0 ||\n strcmp (\"do\", str) == 0 ||\n strcmp (\"begin\", str) == 0 ||\n strcmp (\"let\", str) == 0 ||\n strcmp (\"baremodule\", str) == 0 ||\n strcmp (\"quote\", str) == 0 ||\n strcmp (\"module\", str) == 0 ||\n strcmp (\"struct\", str) == 0 ||\n strcmp (\"type\", str) == 0 ||\n strcmp (\"macro\", str) == 0 ||\n strcmp (\"function\", str) == 0) {\n return 1;\n }\n if (strcmp(\"end\", str) == 0) {\n return -1;\n }\n return 0;\n}\n\nstatic bool IsNumberExpon(int ch, int base) {\n if ((base == 10 && (ch == 'e' || ch == 'E' || ch == 'f')) ||\n (base == 16 && (ch == 'p' || ch == 'P'))) {\n return true;\n }\n return false;\n}\n\n/* Scans a sequence of digits, returning true if it found any. */\nstatic bool ScanDigits(StyleContext& sc, int base, bool allow_sep) {\n\tbool found = false;\n for (;;) {\n\t\tif (IsADigit(sc.chNext, base) || (allow_sep && sc.chNext == '_')) {\n\t\t\tfound = true;\n sc.Forward();\n\t\t} else {\n\t\t\tbreak;\n }\n\t}\n\treturn found;\n}\n\nstatic inline bool ScanNHexas(StyleContext &sc, int max) {\n int n = 0;\n bool error = false;\n\n sc.Forward();\n if (!IsADigit(sc.ch, 16)) {\n error = true;\n } else {\n while (IsADigit(sc.ch, 16) && n < max) {\n sc.Forward();\n n++;\n }\n }\n return error;\n}\n\nstatic void resumeCharacter(StyleContext &sc, bool lexerror) {\n bool error = false;\n\n // ''' case\n if (sc.chPrev == '\\'' && sc.ch == '\\'' && sc.chNext == '\\'') {\n sc.Forward();\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n return;\n } else if (lexerror && sc.chPrev == '\\'' && sc.ch == '\\'') {\n sc.ChangeState(SCE_JULIA_LEXERROR);\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n\n // Escape characters\n } else if (sc.ch == '\\\\') {\n sc.Forward();\n if (sc.ch == '\\'' || sc.ch == '\\\\' ) {\n sc.Forward();\n } else if (sc.ch == 'n' || sc.ch == 't' || sc.ch == 'a' ||\n sc.ch == 'b' || sc.ch == 'e' || sc.ch == 'f' ||\n sc.ch == 'r' || sc.ch == 'v' ) {\n sc.Forward();\n } else if (sc.ch == 'x') {\n error |= ScanNHexas(sc, 2);\n } else if (sc.ch == 'u') {\n error |= ScanNHexas(sc, 4);\n } else if (sc.ch == 'U') {\n error |= ScanNHexas(sc, 8);\n } else if (IsADigit(sc.ch, 8)) {\n int n = 1;\n int max = 3;\n sc.Forward();\n while (IsADigit(sc.ch, 8) && n < max) {\n sc.Forward();\n n++;\n }\n }\n\n if (lexerror) {\n if (sc.ch != '\\'') {\n error = true;\n while (sc.ch != '\\'' &&\n sc.ch != '\\r' &&\n sc.ch != '\\n') {\n sc.Forward();\n }\n }\n\n if (error) {\n sc.ChangeState(SCE_JULIA_LEXERROR);\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n }\n }\n } else if (lexerror) {\n if (sc.ch < 0x20 || sc.ch > 0x10ffff) {\n error = true;\n } else {\n // single character\n sc.Forward();\n\n if (sc.ch != '\\'') {\n error = true;\n while (sc.ch != '\\'' &&\n sc.ch != '\\r' &&\n sc.ch != '\\n') {\n sc.Forward();\n }\n }\n }\n\n if (error) {\n sc.ChangeState(SCE_JULIA_LEXERROR);\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n }\n }\n\n // closing quote\n if (sc.ch == '\\'') {\n if (sc.chNext == '\\'') {\n sc.Forward();\n } else {\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n }\n }\n}\n\nstatic inline bool IsACharacter(StyleContext &sc) {\n return (sc.chPrev == '\\'' && sc.chNext == '\\'');\n}\n\nstatic void ScanParenInterpolation(StyleContext &sc) {\n // TODO: no syntax highlighting inside a string interpolation\n\n // Level of nested parenthesis\n int interp_level = 0;\n\n // If true, it is inside a string and parenthesis are not counted.\n bool allow_paren_string = false;\n\n\n // check for end of states\n for (; sc.More(); sc.Forward()) {\n // TODO: check corner cases for nested string interpolation\n // TODO: check corner cases with Command inside interpolation\n\n if ( sc.ch == '\\\"' && sc.chPrev != '\\\\') {\n // Toggle the string environment (parenthesis are not counted inside a string)\n allow_paren_string = !allow_paren_string;\n } else if ( !allow_paren_string ) {\n if ( sc.ch == '(' && !IsACharacter(sc) ) {\n interp_level ++;\n } else if ( sc.ch == ')' && !IsACharacter(sc) && interp_level > 0 ) {\n interp_level --;\n if (interp_level == 0) {\n // Exit interpolation\n return;\n }\n }\n }\n }\n}\n/*\n * Start parsing a number, parse the base.\n */\nstatic void initNumber (StyleContext &sc, int &base, bool &with_dot) {\n base = 10;\n with_dot = false;\n sc.SetState(SCE_JULIA_NUMBER);\n if (sc.ch == '0') {\n if (sc.chNext == 'x') {\n sc.Forward();\n base = 16;\n if (sc.chNext == '.') {\n sc.Forward();\n with_dot = true;\n }\n } else if (sc.chNext == 'o') {\n sc.Forward();\n base = 8;\n } else if (sc.chNext == 'b') {\n sc.Forward();\n base = 2;\n }\n } else if (sc.ch == '.') {\n with_dot = true;\n }\n}\n\n/*\n * Resume parsing a String or Command, bounded by the `quote` character (\\\" or \\`)\n * The `triple` argument specifies if it is a triple-quote String or Command.\n * Interpolation is detected (with `$`), and parsed if `allow_interp` is true.\n */\nstatic void resumeStringLike(StyleContext &sc, int quote, bool triple, bool allow_interp, bool full_highlight) {\n int stylePrev = sc.state;\n bool checkcurrent = false;\n\n // Escape characters\n if (sc.ch == '\\\\') {\n if (sc.chNext == quote || sc.chNext == '\\\\' || sc.chNext == '$') {\n sc.Forward();\n }\n } else if (allow_interp && sc.ch == '$') {\n // If the interpolation is only of a variable, do not change state\n if (sc.chNext == '(') {\n if (full_highlight) {\n sc.SetState(SCE_JULIA_STRINGINTERP);\n } else {\n sc.ForwardSetState(SCE_JULIA_STRINGINTERP);\n }\n ScanParenInterpolation(sc);\n sc.ForwardSetState(stylePrev);\n\n checkcurrent = true;\n\n } else if (full_highlight && IsIdentifierFirstCharacter(sc.chNext)) {\n sc.SetState(SCE_JULIA_STRINGINTERP);\n sc.Forward();\n sc.Forward();\n for (; sc.More(); sc.Forward()) {\n if (! IsIdentifierCharacter(sc.ch)) {\n break;\n }\n }\n sc.SetState(stylePrev);\n\n checkcurrent = true;\n }\n\n if (checkcurrent) {\n // Check that the current character is not a special char,\n // otherwise it will be skipped\n resumeStringLike(sc, quote, triple, allow_interp, full_highlight);\n }\n\n } else if (sc.ch == quote) {\n if (triple) {\n if (sc.chNext == quote && sc.GetRelativeCharacter(2) == quote) {\n // Move to the end of the triple quotes\n Sci_PositionU nextIndex = sc.currentPos + 2;\n while (nextIndex > sc.currentPos && sc.More()) {\n sc.Forward();\n }\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n }\n } else {\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n }\n }\n}\n\nstatic void resumeCommand(StyleContext &sc, bool triple, bool allow_interp) {\n return resumeStringLike(sc, '`', triple, allow_interp, true);\n}\n\nstatic void resumeString(StyleContext &sc, bool triple, bool allow_interp) {\n return resumeStringLike(sc, '\"', triple, allow_interp, true);\n}\n\nstatic void resumeNumber (StyleContext &sc, int base, bool &with_dot, bool lexerror) {\n if (IsNumberExpon(sc.ch, base)) {\n if (IsADigit(sc.chNext) || sc.chNext == '+' || sc.chNext == '-') {\n sc.Forward();\n // Capture all digits\n ScanDigits(sc, 10, false);\n sc.Forward();\n }\n sc.SetState(SCE_JULIA_DEFAULT);\n } else if (sc.ch == '.' && sc.chNext == '.') {\n // Interval operator `..`\n sc.SetState(SCE_JULIA_OPERATOR);\n sc.Forward();\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n } else if (sc.ch == '.' && !with_dot) {\n with_dot = true;\n ScanDigits(sc, base, true);\n } else if (IsADigit(sc.ch, base) || sc.ch == '_') {\n ScanDigits(sc, base, true);\n } else if (IsADigit(sc.ch) && !IsADigit(sc.ch, base)) {\n if (lexerror) {\n sc.ChangeState(SCE_JULIA_LEXERROR);\n }\n ScanDigits(sc, 10, false);\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n } else {\n sc.SetState(SCE_JULIA_DEFAULT);\n }\n}\n\nstatic void resumeOperator (StyleContext &sc) {\n if (sc.chNext == ':' && (sc.ch == ':' || sc.ch == '<' ||\n (sc.ch == '>' && (sc.chPrev != '-' && sc.chPrev != '=')))) {\n // Case `:a=>:b`\n sc.Forward();\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n } else if (sc.ch == ':') {\n // Case `foo(:baz,:baz)` or `:one+:two`\n // Let the default case switch decide if it is a symbol\n sc.SetState(SCE_JULIA_DEFAULT);\n } else if (sc.ch == '\\'') {\n sc.SetState(SCE_JULIA_DEFAULT);\n } else if ((sc.ch == '.' && sc.chPrev != '.') || IsIdentifierFirstCharacter(sc.ch) ||\n (! (sc.chPrev == '.' && IsOperatorFirstCharacter(sc.ch)) &&\n ! IsOperatorCharacter(sc.ch)) ) {\n sc.SetState(SCE_JULIA_DEFAULT);\n }\n}\n\nvoid SCI_METHOD LexerJulia::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tPropSetSimple props;\n\tAccessor styler(pAccess, &props);\n\n\tSci_Position pos = startPos;\n\tstyler.StartAt(pos);\n\tstyler.StartSegment(pos);\n\n // use the line state of each line to store block/multiline states\n Sci_Position curLine = styler.GetLine(startPos);\n // Default is false for everything and 0 counters.\n\tint lineState = (curLine > 0) ? styler.GetLineState(curLine-1) : 0;\n\n bool transpose = (lineState >> 0) & 0x01; // 1 bit to know if ' is allowed to mean transpose\n bool istripledocstring = (lineState >> 1) & 0x01; // 1 bit to know if we are in a triple doublequotes string\n\tbool triple_backtick = (lineState >> 2) & 0x01; // 1 bit to know if we are in a triple backtick command\n\tbool israwstring = (lineState >> 3) & 0x01; // 1 bit to know if we are in a raw string\n int indexing_level = (int)((lineState >> 4) & 0x0F); // 4 bits of bracket nesting counter\n int list_comprehension = (int)((lineState >> 8) & 0x0F); // 4 bits of parenthesis nesting counter\n int commentDepth = (int)((lineState >> 12) & 0x0F); // 4 bits of nested comment counter\n\n // base for parsing number\n int base = 10;\n // number has a float dot ?\n bool with_dot = false;\n\n StyleContext sc(startPos, length, initStyle, styler);\n\n for (; sc.More(); sc.Forward()) {\n\n //// check for end of states\n switch (sc.state) {\n case SCE_JULIA_BRACKET:\n sc.SetState(SCE_JULIA_DEFAULT);\n break;\n case SCE_JULIA_OPERATOR:\n resumeOperator(sc);\n break;\n case SCE_JULIA_TYPEOPERATOR:\n sc.SetState(SCE_JULIA_DEFAULT);\n break;\n case SCE_JULIA_TYPEANNOT:\n if (! IsIdentifierCharacter(sc.ch)) {\n sc.SetState(SCE_JULIA_DEFAULT);\n }\n break;\n case SCE_JULIA_IDENTIFIER:\n // String literal\n if (sc.ch == '\\\"') {\n // If the string literal has a prefix, interpolation is disabled\n israwstring = true;\n sc.ChangeState(SCE_JULIA_STRINGLITERAL);\n sc.SetState(SCE_JULIA_DEFAULT);\n\n } else if (sc.ch == '`') {\n // If the string literal has a prefix, interpolation is disabled\n israwstring = true;\n sc.ChangeState(SCE_JULIA_COMMANDLITERAL);\n sc.SetState(SCE_JULIA_DEFAULT);\n\n // Continue if the character is an identifier character\n } else if (! IsIdentifierCharacter(sc.ch)) {\n char s[MAX_JULIA_IDENT_CHARS + 1];\n sc.GetCurrent(s, sizeof(s));\n\n // Treat the keywords differently if we are indexing or not\n if ( indexing_level > 0 && CheckBoundsIndexing(s)) {\n // Inside [], (), `begin` and `end` are numbers not block keywords\n sc.ChangeState(SCE_JULIA_NUMBER);\n transpose = false;\n\n } else {\n if (keywords.InList(s)) {\n sc.ChangeState(SCE_JULIA_KEYWORD1);\n transpose = false;\n } else if (identifiers2.InList(s)) {\n sc.ChangeState(SCE_JULIA_KEYWORD2);\n transpose = false;\n } else if (identifiers3.InList(s)) {\n sc.ChangeState(SCE_JULIA_KEYWORD3);\n transpose = false;\n } else if (identifiers4.InList(s)) {\n sc.ChangeState(SCE_JULIA_KEYWORD4);\n // These identifiers can be used for variable names also,\n // so transpose is not forbidden.\n //transpose = false;\n }\n }\n sc.SetState(SCE_JULIA_DEFAULT);\n\n // TODO: recognize begin-end blocks inside list comprehension\n // b = [(begin n%2; n*2 end) for n in 1:10]\n // TODO: recognize better comprehension for-if to avoid problem with code-folding\n // c = [(if isempty(a); missing else first(b) end) for (a, b) in zip(l1, l2)]\n }\n break;\n case SCE_JULIA_NUMBER:\n resumeNumber(sc, base, with_dot, options.highlightLexerror);\n break;\n case SCE_JULIA_CHAR:\n resumeCharacter(sc, options.highlightLexerror);\n break;\n case SCE_JULIA_DOCSTRING:\n resumeString(sc, true, !israwstring);\n if (sc.state == SCE_JULIA_DEFAULT && israwstring) {\n israwstring = false;\n }\n break;\n case SCE_JULIA_STRING:\n resumeString(sc, false, !israwstring);\n if (sc.state == SCE_JULIA_DEFAULT && israwstring) {\n israwstring = false;\n }\n break;\n case SCE_JULIA_COMMAND:\n resumeCommand(sc, triple_backtick, !israwstring);\n break;\n case SCE_JULIA_MACRO:\n if (IsASpace(sc.ch) || ! IsIdentifierCharacter(sc.ch)) {\n sc.SetState(SCE_JULIA_DEFAULT);\n }\n break;\n case SCE_JULIA_SYMBOL:\n if (! IsIdentifierCharacter(sc.ch)) {\n sc.SetState(SCE_JULIA_DEFAULT);\n }\n break;\n case SCE_JULIA_COMMENT:\n if( commentDepth > 0 ) {\n // end or start of a nested a block comment\n if ( sc.ch == '=' && sc.chNext == '#') {\n commentDepth --;\n sc.Forward();\n\n if (commentDepth == 0) {\n sc.ForwardSetState(SCE_JULIA_DEFAULT);\n }\n } else if( sc.ch == '#' && sc.chNext == '=') {\n commentDepth ++;\n sc.Forward();\n }\n } else {\n // single line comment\n if (sc.atLineEnd || sc.ch == '\\r' || sc.ch == '\\n') {\n sc.SetState(SCE_JULIA_DEFAULT);\n transpose = false;\n }\n }\n break;\n }\n\n // check start of a new state\n if (sc.state == SCE_JULIA_DEFAULT) {\n if (sc.ch == '#') {\n sc.SetState(SCE_JULIA_COMMENT);\n // increment depth if we are a block comment\n if(sc.chNext == '=') {\n commentDepth ++;\n sc.Forward();\n }\n } else if (sc.ch == '!') {\n sc.SetState(SCE_JULIA_OPERATOR);\n transpose = false;\n } else if (sc.ch == '\\'') {\n if (transpose) {\n sc.SetState(SCE_JULIA_OPERATOR);\n } else {\n sc.SetState(SCE_JULIA_CHAR);\n }\n } else if (sc.ch == '\\\"') {\n istripledocstring = (sc.chNext == '\\\"' && sc.GetRelativeCharacter(2) == '\\\"');\n if (istripledocstring) {\n sc.SetState(SCE_JULIA_DOCSTRING);\n // Move to the end of the triple quotes\n Sci_PositionU nextIndex = sc.currentPos + 2;\n while (nextIndex > sc.currentPos && sc.More()) {\n sc.Forward();\n }\n } else {\n sc.SetState(SCE_JULIA_STRING);\n }\n } else if (sc.ch == '`') {\n triple_backtick = (sc.chNext == '`' && sc.GetRelativeCharacter(2) == '`');\n sc.SetState(SCE_JULIA_COMMAND);\n if (triple_backtick) {\n // Move to the end of the triple backticks\n Sci_PositionU nextIndex = sc.currentPos + 2;\n while (nextIndex > sc.currentPos && sc.More()) {\n sc.Forward();\n }\n }\n } else if (IsADigit(sc.ch) || (sc.ch == '.' && IsADigit(sc.chNext))) {\n initNumber(sc, base, with_dot);\n } else if (IsIdentifierFirstCharacter(sc.ch)) {\n sc.SetState(SCE_JULIA_IDENTIFIER);\n transpose = true;\n } else if (sc.ch == '@') {\n sc.SetState(SCE_JULIA_MACRO);\n transpose = false;\n\n // Several parsing of operators, should keep the order of `if` blocks\n } else if ((sc.ch == ':' || sc.ch == '<' || sc.ch == '>') && sc.chNext == ':') {\n sc.SetState(SCE_JULIA_TYPEOPERATOR);\n sc.Forward();\n // Highlight the next identifier, if option is set\n if (options.highlightTypeannotation &&\n IsIdentifierFirstCharacter(sc.chNext)) {\n sc.ForwardSetState(SCE_JULIA_TYPEANNOT);\n }\n } else if (sc.ch == ':') {\n // TODO: improve detection of range\n // should be solved with begin-end parsing\n // `push!(arr, s1 :s2)` and `a[begin :end]\n if (IsIdentifierFirstCharacter(sc.chNext) &&\n ! IsIdentifierCharacter(sc.chPrev) &&\n sc.chPrev != ')' && sc.chPrev != ']' ) {\n sc.SetState(SCE_JULIA_SYMBOL);\n } else {\n sc.SetState(SCE_JULIA_OPERATOR);\n }\n } else if (IsJuliaParen(sc.ch)) {\n if (sc.ch == '[') {\n list_comprehension ++;\n indexing_level ++;\n } else if (sc.ch == ']' && (indexing_level > 0)) {\n list_comprehension --;\n indexing_level --;\n } else if (sc.ch == '(') {\n list_comprehension ++;\n } else if (sc.ch == ')' && (list_comprehension > 0)) {\n list_comprehension --;\n }\n\n if (sc.ch == ')' || sc.ch == ']' || sc.ch == '}') {\n transpose = true;\n } else {\n transpose = false;\n }\n sc.SetState(SCE_JULIA_BRACKET);\n } else if (IsOperatorFirstCharacter(sc.ch)) {\n transpose = false;\n sc.SetState(SCE_JULIA_OPERATOR);\n } else {\n transpose = false;\n }\n }\n\n // update the line information (used for line-by-line lexing and folding)\n if (sc.atLineEnd) {\n // set the line state to the current state\n curLine = styler.GetLine(sc.currentPos);\n\n lineState = ((transpose ? 1 : 0) << 0) |\n ((istripledocstring ? 1 : 0) << 1) |\n ((triple_backtick ? 1 : 0) << 2) |\n ((israwstring ? 1 : 0) << 3) |\n ((indexing_level & 0x0F) << 4) |\n ((list_comprehension & 0x0F) << 8) |\n ((commentDepth & 0x0F) << 12);\n styler.SetLineState(curLine, lineState);\n }\n }\n sc.Complete();\n}\n\nvoid SCI_METHOD LexerJulia::Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\n\tif (!options.fold)\n\t\treturn;\n\n\tLexAccessor styler(pAccess);\n\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelCurrent = SC_FOLDLEVELBASE;\n int lineState = 0;\n\tif (lineCurrent > 0) {\n\t\tlevelCurrent = styler.LevelAt(lineCurrent-1) >> 16;\n lineState = styler.GetLineState(lineCurrent-1);\n }\n\n // level of nested brackets\n int indexing_level = (int)((lineState >> 4) & 0x0F); // 4 bits of bracket nesting counter\n // level of nested parenthesis or brackets\n int list_comprehension = (int)((lineState >> 8) & 0x0F); // 4 bits of parenthesis nesting counter\n //int commentDepth = (int)((lineState >> 12) & 0x0F); // 4 bits of nested comment counter\n \n\tSci_PositionU lineStartNext = styler.LineStart(lineCurrent+1);\n\tint levelNext = levelCurrent;\n\tchar chNext = styler[startPos];\n\tint stylePrev = styler.StyleAt(startPos - 1);\n\tint styleNext = styler.StyleAt(startPos);\n\tint style = initStyle;\n char word[100];\n int wordlen = 0;\n for (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tstyle = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = i == (lineStartNext-1);\n\n // a start/end of comment block\n if (options.foldComment && style == SCE_JULIA_COMMENT) {\n // start of block comment\n if (ch == '#' && chNext == '=') {\n levelNext ++;\n }\n // end of block comment\n if (ch == '=' && chNext == '#' && levelNext > 0) {\n levelNext --;\n }\n }\n\n // Syntax based folding, accounts for list comprehension\n if (options.foldSyntaxBased) {\n // list comprehension allow `for`, `if` and `begin` without `end`\n if (style == SCE_JULIA_BRACKET) {\n if (ch == '[') {\n list_comprehension ++;\n indexing_level ++;\n levelNext ++;\n } else if (ch == ']') {\n list_comprehension --;\n indexing_level --;\n levelNext --;\n } else if (ch == '(') {\n list_comprehension ++;\n levelNext ++;\n } else if (ch == ')') {\n list_comprehension --;\n levelNext --;\n }\n // check non-negative\n if (indexing_level < 0) {\n indexing_level = 0;\n }\n if (list_comprehension < 0) {\n list_comprehension = 0;\n }\n }\n\n // keyword\n if (style == SCE_JULIA_KEYWORD1) {\n word[wordlen++] = static_cast(ch);\n if (wordlen == 100) { // prevent overflow\n word[0] = '\\0';\n wordlen = 1;\n }\n if (styleNext != SCE_JULIA_KEYWORD1) {\n word[wordlen] = '\\0';\n wordlen = 0;\n if (list_comprehension <= 0 && indexing_level <= 0) {\n levelNext += CheckKeywordFoldPoint(word);\n }\n }\n }\n }\n\n // Docstring\n if (options.foldDocstring) {\n if (stylePrev != SCE_JULIA_DOCSTRING && style == SCE_JULIA_DOCSTRING) {\n levelNext ++;\n } else if (style == SCE_JULIA_DOCSTRING && styleNext != SCE_JULIA_DOCSTRING) {\n levelNext --;\n }\n }\n\n // check non-negative level\n if (levelNext < 0) {\n levelNext = 0;\n }\n\n if (!IsASpace(ch)) {\n visibleChars++;\n }\n stylePrev = style;\n\n if (atEOL || (i == endPos-1)) {\n int levelUse = levelCurrent;\n int lev = levelUse | levelNext << 16;\n if (visibleChars == 0 && options.foldCompact) {\n lev |= SC_FOLDLEVELWHITEFLAG;\n }\n if (levelUse < levelNext) {\n lev |= SC_FOLDLEVELHEADERFLAG;\n }\n if (lev != styler.LevelAt(lineCurrent)) {\n styler.SetLevel(lineCurrent, lev);\n }\n lineCurrent++;\n lineStartNext = styler.LineStart(lineCurrent+1);\n levelCurrent = levelNext;\n if (atEOL && (i == static_cast(styler.Length() - 1))) {\n // There is an empty line at end of file so give it same level and empty\n styler.SetLevel(lineCurrent, (levelCurrent | levelCurrent << 16) | SC_FOLDLEVELWHITEFLAG);\n }\n visibleChars = 0;\n }\n }\n}\n\nextern const LexerModule lmJulia(SCLEX_JULIA, LexerJulia::LexerFactoryJulia, \"julia\", juliaWordLists);\n" }, { "path": "lexers/LexKVIrc.cxx", "content": "// Scintilla source code edit control\n/** @file LexKVIrc.cxx\n ** Lexer for KVIrc script.\n **/\n// Copyright 2013 by OmegaPhil , based in\n// part from LexPython Copyright 1998-2002 by Neil Hodgson \n// and LexCmake Copyright 2007 by Cristian Adam \n\n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n\n/* KVIrc Script syntactic rules: http://www.kvirc.net/doc/doc_syntactic_rules.html */\n\n/* Utility functions */\nstatic inline bool IsAWordChar(int ch) {\n\n /* Keyword list includes modules, i.e. words including '.', and\n * alias namespaces include ':' */\n return (ch < 0x80) && (isalnum(ch) || ch == '_' || ch == '.'\n || ch == ':');\n}\nstatic inline bool IsAWordStart(int ch) {\n\n /* Functions (start with '$') are treated separately to keywords */\n return (ch < 0x80) && (isalnum(ch) || ch == '_' );\n}\n\n/* Interface function called by Scintilla to request some text to be\n syntax highlighted */\nstatic void ColouriseKVIrcDoc(Sci_PositionU startPos, Sci_Position length,\n int initStyle, WordList *keywordlists[],\n Accessor &styler)\n{\n /* Fetching style context */\n StyleContext sc(startPos, length, initStyle, styler);\n\n /* Accessing keywords and function-marking keywords */\n WordList &keywords = *keywordlists[0];\n WordList &functionKeywords = *keywordlists[1];\n\n /* Looping for all characters - only automatically moving forward\n * when asked for (transitions leaving strings and keywords do this\n * already) */\n bool next = true;\n for( ; sc.More(); next ? sc.Forward() : (void)0 )\n {\n /* Resetting next */\n next = true;\n\n /* Dealing with different states */\n switch (sc.state)\n {\n case SCE_KVIRC_DEFAULT:\n\n /* Detecting single-line comments\n * Unfortunately KVIrc script allows raw '#' to be used, and appending # to an array returns\n * its length...\n * Going for a compromise where single line comments not\n * starting on a newline are allowed in all cases except\n * when they are preceeded with an opening bracket or comma\n * (this will probably be the most common style a valid\n * string-less channel name will be used with), with the\n * array length case included\n */\n if (\n (sc.ch == '#' && sc.atLineStart) ||\n (sc.ch == '#' && (\n sc.chPrev != '(' && sc.chPrev != ',' &&\n sc.chPrev != ']')\n )\n )\n {\n sc.SetState(SCE_KVIRC_COMMENT);\n break;\n }\n\n /* Detecting multi-line comments */\n if (sc.Match('/', '*'))\n {\n sc.SetState(SCE_KVIRC_COMMENTBLOCK);\n break;\n }\n\n /* Detecting strings */\n if (sc.ch == '\"')\n {\n sc.SetState(SCE_KVIRC_STRING);\n break;\n }\n\n /* Detecting functions */\n if (sc.ch == '$')\n {\n sc.SetState(SCE_KVIRC_FUNCTION);\n break;\n }\n\n /* Detecting variables */\n if (sc.ch == '%')\n {\n sc.SetState(SCE_KVIRC_VARIABLE);\n break;\n }\n\n /* Detecting numbers - isdigit is unsafe as it does not\n * validate, use CharacterSet.h functions */\n if (IsADigit(sc.ch))\n {\n sc.SetState(SCE_KVIRC_NUMBER);\n break;\n }\n\n /* Detecting words */\n if (IsAWordStart(sc.ch) && IsAWordChar(sc.chNext))\n {\n sc.SetState(SCE_KVIRC_WORD);\n sc.Forward();\n break;\n }\n\n /* Detecting operators */\n if (isoperator(sc.ch))\n {\n sc.SetState(SCE_KVIRC_OPERATOR);\n break;\n }\n\n break;\n\n case SCE_KVIRC_COMMENT:\n\n /* Breaking out of single line comment when a newline\n * is introduced */\n if (sc.ch == '\\r' || sc.ch == '\\n')\n {\n sc.SetState(SCE_KVIRC_DEFAULT);\n break;\n }\n\n break;\n\n case SCE_KVIRC_COMMENTBLOCK:\n\n /* Detecting end of multi-line comment */\n if (sc.Match('*', '/'))\n {\n // Moving the current position forward two characters\n // so that '*/' is included in the comment\n sc.Forward(2);\n sc.SetState(SCE_KVIRC_DEFAULT);\n\n /* Comment has been exited and the current position\n * moved forward, yet the new current character\n * has yet to be defined - loop without moving\n * forward again */\n next = false;\n break;\n }\n\n break;\n\n case SCE_KVIRC_STRING:\n\n /* Detecting end of string - closing speechmarks */\n if (sc.ch == '\"')\n {\n /* Allowing escaped speechmarks to pass */\n if (sc.chPrev == '\\\\')\n break;\n\n /* Moving the current position forward to capture the\n * terminating speechmarks, and ending string */\n sc.ForwardSetState(SCE_KVIRC_DEFAULT);\n\n /* String has been exited and the current position\n * moved forward, yet the new current character\n * has yet to be defined - loop without moving\n * forward again */\n next = false;\n break;\n }\n\n /* Functions and variables are now highlighted in strings\n * Detecting functions */\n if (sc.ch == '$')\n {\n /* Allowing escaped functions to pass */\n if (sc.chPrev == '\\\\')\n break;\n\n sc.SetState(SCE_KVIRC_STRING_FUNCTION);\n break;\n }\n\n /* Detecting variables */\n if (sc.ch == '%')\n {\n /* Allowing escaped variables to pass */\n if (sc.chPrev == '\\\\')\n break;\n\n sc.SetState(SCE_KVIRC_STRING_VARIABLE);\n break;\n }\n\n /* Breaking out of a string when a newline is introduced */\n if (sc.ch == '\\r' || sc.ch == '\\n')\n {\n /* Allowing escaped newlines */\n if (sc.chPrev == '\\\\')\n break;\n\n sc.SetState(SCE_KVIRC_DEFAULT);\n break;\n }\n\n break;\n\n case SCE_KVIRC_FUNCTION:\n case SCE_KVIRC_VARIABLE:\n\n /* Detecting the end of a function/variable (word) */\n if (!IsAWordChar(sc.ch))\n {\n sc.SetState(SCE_KVIRC_DEFAULT);\n\n /* Word has been exited yet the current character\n * has yet to be defined - loop without moving\n * forward again */\n next = false;\n break;\n }\n\n break;\n\n case SCE_KVIRC_STRING_FUNCTION:\n case SCE_KVIRC_STRING_VARIABLE:\n\n /* A function or variable in a string\n * Detecting the end of a function/variable (word) */\n if (!IsAWordChar(sc.ch))\n {\n sc.SetState(SCE_KVIRC_STRING);\n\n /* Word has been exited yet the current character\n * has yet to be defined - loop without moving\n * forward again */\n next = false;\n break;\n }\n\n break;\n\n case SCE_KVIRC_NUMBER:\n\n /* Detecting the end of a number */\n if (!IsADigit(sc.ch))\n {\n sc.SetState(SCE_KVIRC_DEFAULT);\n\n /* Number has been exited yet the current character\n * has yet to be defined - loop without moving\n * forward */\n next = false;\n break;\n }\n\n break;\n\n case SCE_KVIRC_OPERATOR:\n\n /* Because '%' is an operator but is also the marker for\n * a variable, I need to always treat operators as single\n * character strings and therefore redo their detection\n * after every character */\n sc.SetState(SCE_KVIRC_DEFAULT);\n\n /* Operator has been exited yet the current character\n * has yet to be defined - loop without moving\n * forward */\n next = false;\n break;\n\n case SCE_KVIRC_WORD:\n\n /* Detecting the end of a word */\n if (!IsAWordChar(sc.ch))\n {\n /* Checking if the word was actually a keyword -\n * fetching the current word, NULL-terminated like\n * the keyword list */\n char s[100];\n Sci_Position wordLen = sc.currentPos - styler.GetStartSegment();\n if (wordLen > 99)\n wordLen = 99; /* Include '\\0' in buffer */\n Sci_Position i;\n for( i = 0; i < wordLen; ++i )\n {\n s[i] = styler.SafeGetCharAt( styler.GetStartSegment() + i );\n }\n s[wordLen] = '\\0';\n\n /* Actually detecting keywords and fixing the state */\n if (keywords.InList(s))\n {\n /* The SetState call actually commits the\n * previous keyword state */\n sc.ChangeState(SCE_KVIRC_KEYWORD);\n }\n else if (functionKeywords.InList(s))\n {\n // Detecting function keywords and fixing the state\n sc.ChangeState(SCE_KVIRC_FUNCTION_KEYWORD);\n }\n\n /* Transitioning to default and committing the previous\n * word state */\n sc.SetState(SCE_KVIRC_DEFAULT);\n\n /* Word has been exited yet the current character\n * has yet to be defined - loop without moving\n * forward again */\n next = false;\n break;\n }\n\n break;\n }\n }\n\n /* Indicating processing is complete */\n sc.Complete();\n}\n\nstatic void FoldKVIrcDoc(Sci_PositionU startPos, Sci_Position length, int /*initStyle - unused*/,\n WordList *[], Accessor &styler)\n{\n /* Based on CMake's folder */\n\n /* Exiting if folding isnt enabled */\n if ( styler.GetPropertyInt(\"fold\") == 0 )\n return;\n\n /* Obtaining current line number*/\n Sci_Position currentLine = styler.GetLine(startPos);\n\n /* Obtaining starting character - indentation is done on a line basis,\n * not character */\n Sci_PositionU safeStartPos = styler.LineStart( currentLine );\n\n /* Initialising current level - this is defined as indentation level\n * in the low 12 bits, with flag bits in the upper four bits.\n * It looks like two indentation states are maintained in the returned\n * 32bit value - 'nextLevel' in the most-significant bits, 'currentLevel'\n * in the least-significant bits. Since the next level is the most\n * up to date, this must refer to the current state of indentation.\n * So the code bitshifts the old current level out of existence to\n * get at the actual current state of indentation\n * Based on the LexerCPP.cxx line 958 comment */\n int currentLevel = SC_FOLDLEVELBASE;\n if (currentLine > 0)\n currentLevel = styler.LevelAt(currentLine - 1) >> 16;\n int nextLevel = currentLevel;\n\n // Looping for characters in range\n for (Sci_PositionU i = safeStartPos; i < startPos + length; ++i)\n {\n /* Folding occurs after syntax highlighting, meaning Scintilla\n * already knows where the comments are\n * Fetching the current state */\n int state = styler.StyleAt(i) & 31;\n\n switch( styler.SafeGetCharAt(i) )\n {\n case '{':\n\n /* Indenting only when the braces are not contained in\n * a comment */\n if (state != SCE_KVIRC_COMMENT &&\n state != SCE_KVIRC_COMMENTBLOCK)\n ++nextLevel;\n break;\n\n case '}':\n\n /* Outdenting only when the braces are not contained in\n * a comment */\n if (state != SCE_KVIRC_COMMENT &&\n state != SCE_KVIRC_COMMENTBLOCK)\n --nextLevel;\n break;\n\n case '\\n':\n case '\\r':\n\n /* Preparing indentation information to return - combining\n * current and next level data */\n int lev = currentLevel | nextLevel << 16;\n\n /* If the next level increases the indent level, mark the\n * current line as a fold point - current level data is\n * in the least significant bits */\n if (nextLevel > currentLevel )\n lev |= SC_FOLDLEVELHEADERFLAG;\n\n /* Updating indentation level if needed */\n if (lev != styler.LevelAt(currentLine))\n styler.SetLevel(currentLine, lev);\n\n /* Updating variables */\n ++currentLine;\n currentLevel = nextLevel;\n\n /* Dealing with problematic Windows newlines -\n * incrementing to avoid the extra newline breaking the\n * fold point */\n if (styler.SafeGetCharAt(i) == '\\r' &&\n styler.SafeGetCharAt(i + 1) == '\\n')\n ++i;\n break;\n }\n }\n\n /* At this point the data has ended, so presumably the end of the line?\n * Preparing indentation information to return - combining current\n * and next level data */\n int lev = currentLevel | nextLevel << 16;\n\n /* If the next level increases the indent level, mark the current\n * line as a fold point - current level data is in the least\n * significant bits */\n if (nextLevel > currentLevel )\n lev |= SC_FOLDLEVELHEADERFLAG;\n\n /* Updating indentation level if needed */\n if (lev != styler.LevelAt(currentLine))\n styler.SetLevel(currentLine, lev);\n}\n\n/* Registering wordlists */\nstatic const char *const kvircWordListDesc[] = {\n\t\"primary\",\n\t\"function_keywords\",\n\t0\n};\n\n\n/* Registering functions and wordlists */\nextern const LexerModule lmKVIrc(SCLEX_KVIRC, ColouriseKVIrcDoc, \"kvirc\", FoldKVIrcDoc,\n kvircWordListDesc);\n" }, { "path": "lexers/LexKix.cxx", "content": "// Scintilla source code edit control\n/** @file LexKix.cxx\n ** Lexer for KIX-Scripts.\n **/\n// Copyright 2004 by Manfred Becker \n// The License.txt file describes the conditions under which this software may be distributed.\n// Edited by Lee Wilmott (24-Jun-2014) added support for block comments\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n// Extended to accept accented characters\nstatic inline bool IsAWordChar(int ch) {\n\treturn ch >= 0x80 || isalnum(ch) || ch == '_';\n}\n\nstatic inline bool IsOperator(const int ch) {\n\treturn (ch == '+' || ch == '-' || ch == '*' || ch == '/' || ch == '&' || ch == '|' || ch == '<' || ch == '>' || ch == '=');\n}\n\nstatic void ColouriseKixDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n WordList *keywordlists[], Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n//\tWordList &keywords4 = *keywordlists[3];\n\n\tstyler.StartAt(startPos);\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.state == SCE_KIX_COMMENT) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_COMMENTSTREAM) {\n\t\t\tif (sc.ch == '/' && sc.chPrev == '*') {\n\t\t\t\tsc.ForwardSetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_STRING1) {\n\t\t\t// This is a doubles quotes string\n\t\t\tif (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_STRING2) {\n\t\t\t// This is a single quote string\n\t\t\tif (sc.ch == '\\'') {\n\t\t\t\tsc.ForwardSetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_NUMBER) {\n\t\t\tif (!IsADigit(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_VAR) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_MACRO) {\n\t\t\tif (!IsAWordChar(sc.ch) && !IsADigit(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\n\t\t\t\tif (!keywords3.InList(&s[1])) {\n\t\t\t\t\tsc.ChangeState(SCE_KIX_DEFAULT);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_OPERATOR) {\n\t\t\tif (!IsOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_KIX_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrentLowered(s, sizeof(s));\n\n\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_KIX_KEYWORD);\n\t\t\t\t} else if (keywords2.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_KIX_FUNCTIONS);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_KIX_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_KIX_DEFAULT) {\n\t\t\tif (sc.ch == ';') {\n\t\t\t\tsc.SetState(SCE_KIX_COMMENT);\n\t\t\t} else if (sc.ch == '/' && sc.chNext == '*') {\n\t\t\t\tsc.SetState(SCE_KIX_COMMENTSTREAM);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_KIX_STRING1);\n\t\t\t} else if (sc.ch == '\\'') {\n\t\t\t\tsc.SetState(SCE_KIX_STRING2);\n\t\t\t} else if (sc.ch == '$') {\n\t\t\t\tsc.SetState(SCE_KIX_VAR);\n\t\t\t} else if (sc.ch == '@') {\n\t\t\t\tsc.SetState(SCE_KIX_MACRO);\n\t\t\t} else if (IsADigit(sc.ch) || ((sc.ch == '.' || sc.ch == '&') && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_KIX_NUMBER);\n\t\t\t} else if (IsOperator(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_KIX_OPERATOR);\n\t\t\t} else if (IsAWordChar(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_KIX_IDENTIFIER);\n\t\t\t}\n\t\t}\n\t}\n\tsc.Complete();\n}\n\n\nextern const LexerModule lmKix(SCLEX_KIX, ColouriseKixDoc, \"kix\");\n\n" }, { "path": "lexers/LexLaTeX.cxx", "content": "// Scintilla source code edit control\n/** @file LexLaTeX.cxx\n ** Lexer for LaTeX2e.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n// Modified by G. HU in 2013. Added folding, syntax highting inside math environments, and changed some minor behaviors.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"PropSetSimple.h\"\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"DefaultLexer.h\"\n#include \"LexerBase.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nusing namespace std;\n\nstruct latexFoldSave {\n\tlatexFoldSave() : structLev(0) {\n\t\tfor (int i = 0; i < 8; ++i) openBegins[i] = 0;\n\t}\n\tlatexFoldSave(const latexFoldSave &save) : structLev(save.structLev) {\n\t\tfor (int i = 0; i < 8; ++i) openBegins[i] = save.openBegins[i];\n\t}\n\tlatexFoldSave &operator=(const latexFoldSave &save) {\n\t\tif (this != &save) {\n\t\t\tstructLev = save.structLev;\n\t\t\tfor (int i = 0; i < 8; ++i) openBegins[i] = save.openBegins[i];\n\t\t}\n\t\treturn *this;\n\t}\n\tint openBegins[8];\n\tSci_Position structLev;\n};\n\nclass LexerLaTeX : public LexerBase {\nprivate:\n\tvector modes;\n\tvoid setMode(Sci_Position line, int mode) {\n\t\tif (line >= static_cast(modes.size())) modes.resize(line + 1, 0);\n\t\tmodes[line] = mode;\n\t}\n\tint getMode(Sci_Position line) {\n\t\tif (line >= 0 && line < static_cast(modes.size())) return modes[line];\n\t\treturn 0;\n\t}\n\tvoid truncModes(Sci_Position numLines) {\n\t\tif (static_cast(modes.size()) > numLines * 2 + 256)\n\t\t\tmodes.resize(numLines + 128);\n\t}\n\n\tvector saves;\n\tvoid setSave(Sci_Position line, const latexFoldSave &save) {\n\t\tif (line >= static_cast(saves.size())) saves.resize(line + 1);\n\t\tsaves[line] = save;\n\t}\n\tvoid getSave(Sci_Position line, latexFoldSave &save) {\n\t\tif (line >= 0 && line < static_cast(saves.size())) save = saves[line];\n\t\telse {\n\t\t\tsave.structLev = 0;\n\t\t\tfor (int i = 0; i < 8; ++i) save.openBegins[i] = 0;\n\t\t}\n\t}\n\tvoid truncSaves(Sci_Position numLines) {\n\t\tif (static_cast(saves.size()) > numLines * 2 + 256)\n\t\t\tsaves.resize(numLines + 128);\n\t}\npublic:\n\tstatic ILexer5 *LexerFactoryLaTeX() {\n\t\treturn new LexerLaTeX();\n\t}\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\t// ILexer5 methods\n\tconst char * SCI_METHOD GetName() override {\n\t\treturn \"latex\";\n\t}\n\tint SCI_METHOD GetIdentifier() override {\n\t\treturn SCLEX_LATEX;\n\t}\n};\n\nstatic bool latexIsSpecial(int ch) {\n\treturn (ch == '#') || (ch == '$') || (ch == '%') || (ch == '&') || (ch == '_') ||\n\t\t (ch == '{') || (ch == '}') || (ch == ' ');\n}\n\nstatic bool latexIsBlank(int ch) {\n\treturn (ch == ' ') || (ch == '\\t');\n}\n\nstatic bool latexIsBlankAndNL(int ch) {\n\treturn (ch == ' ') || (ch == '\\t') || (ch == '\\r') || (ch == '\\n');\n}\n\nstatic bool latexIsLetter(int ch) {\n\treturn IsASCII(ch) && isalpha(ch);\n}\n\nstatic bool latexIsTagValid(Sci_Position &i, Sci_Position l, Accessor &styler) {\n\twhile (i < l) {\n\t\tif (styler.SafeGetCharAt(i) == '{') {\n\t\t\twhile (i < l) {\n\t\t\t\ti++;\n\t\t\t\tif (styler.SafeGetCharAt(i) == '}') {\n\t\t\t\t\treturn true;\n\t\t\t\t}\telse if (!latexIsLetter(styler.SafeGetCharAt(i)) &&\n styler.SafeGetCharAt(i)!='*') {\n\t\t\t\t\treturn false;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (!latexIsBlank(styler.SafeGetCharAt(i))) {\n\t\t\treturn false;\n\t\t}\n\t\ti++;\n\t}\n\treturn false;\n}\n\nstatic bool latexNextNotBlankIs(Sci_Position i, Accessor &styler, char needle) {\n char ch;\n\twhile (i < styler.Length()) {\n ch = styler.SafeGetCharAt(i);\n\t\tif (!latexIsBlankAndNL(ch) && ch != '*') {\n if (ch == needle)\n return true;\n else\n return false;\n\t\t}\n\t\ti++;\n\t}\n\treturn false;\n}\n\nstatic bool latexLastWordIs(Sci_Position start, Accessor &styler, const char *needle) {\n\tSci_PositionU i = 0;\n\tSci_PositionU l = static_cast(strlen(needle));\n\tSci_Position ini = start-l+1;\n\tchar s[32];\n\n\twhile (i < l && i < 31) {\n\t\ts[i] = styler.SafeGetCharAt(ini + i);\n\t\ti++;\n\t}\n\ts[i] = '\\0';\n\n\treturn (strcmp(s, needle) == 0);\n}\n\nstatic bool latexLastWordIsMathEnv(Sci_Position pos, Accessor &styler) {\n\tSci_Position i, j;\n\tchar s[32];\n\tconst char *mathEnvs[] = { \"align\", \"alignat\", \"flalign\", \"gather\",\n\t\t\"multiline\", \"displaymath\", \"eqnarray\", \"equation\" };\n\tif (styler.SafeGetCharAt(pos) != '}') return false;\n\tfor (i = pos - 1; i >= 0; --i) {\n\t\tif (styler.SafeGetCharAt(i) == '{') break;\n\t\tif (pos - i >= 20) return false;\n\t}\n\tif (i < 0 || i == pos - 1) return false;\n\t++i;\n\tfor (j = 0; i + j < pos; ++j)\n\t\ts[j] = styler.SafeGetCharAt(i + j);\n\ts[j] = '\\0';\n\tif (j == 0) return false;\n\tif (s[j - 1] == '*') s[--j] = '\\0';\n\tfor (i = 0; i < static_cast(sizeof(mathEnvs) / sizeof(const char *)); ++i)\n\t\tif (strcmp(s, mathEnvs[i]) == 0) return true;\n\treturn false;\n}\n\nstatic inline void latexStateReset(int &mode, int &state) {\n\tswitch (mode) {\n\tcase 1: state = SCE_L_MATH; break;\n\tcase 2: state = SCE_L_MATH2; break;\n\tdefault: state = SCE_L_DEFAULT; break;\n\t}\n}\n\n// There are cases not handled correctly, like $abcd\\textrm{what is $x+y$}z+w$.\n// But I think it's already good enough.\nvoid SCI_METHOD LexerLaTeX::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\t// startPos is assumed to be the first character of a line\n\tAccessor styler(pAccess, &props);\n\tstyler.StartAt(startPos);\n\tint mode = getMode(styler.GetLine(startPos) - 1);\n\tint state = initStyle;\n\tif (state == SCE_L_ERROR || state == SCE_L_SHORTCMD || state == SCE_L_SPECIAL) // should not happen\n\t\tlatexStateReset(mode, state);\n\n\tchar chNext = styler.SafeGetCharAt(startPos);\n\tchar chVerbatimDelim = '\\0';\n\tstyler.StartSegment(startPos);\n\tSci_Position lengthDoc = startPos + length;\n\n\tfor (Sci_Position i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tif (styler.IsLeadByte(ch)) {\n\t\t\ti++;\n\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\tcontinue;\n\t\t}\n\n\t\tif (ch == '\\r' || ch == '\\n')\n\t\t\tsetMode(styler.GetLine(i), mode);\n\n\t\tswitch (state) {\n\t\tcase SCE_L_DEFAULT :\n\t\t\tswitch (ch) {\n\t\t\tcase '\\\\' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tif ((i + 1) >= styler.Length())\n\t\t\t\t\tbreak;\n\t\t\t\tif (latexIsLetter(chNext)) {\n\t\t\t\t\tstate = SCE_L_COMMAND;\n\t\t\t\t} else if (latexIsSpecial(chNext)) {\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SPECIAL);\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t} else if (chNext == '\\r' || chNext == '\\n') {\n\t\t\t\t\tstyler.ColourTo(i, SCE_L_ERROR);\n\t\t\t\t} else if (IsASCII(chNext)) {\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SHORTCMD);\n\t\t\t\t\tif (chNext == '(') {\n\t\t\t\t\t\tmode = 1;\n\t\t\t\t\t\tstate = SCE_L_MATH;\n\t\t\t\t\t} else if (chNext == '[') {\n\t\t\t\t\t\tmode = 2;\n\t\t\t\t\t\tstate = SCE_L_MATH2;\n\t\t\t\t\t}\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '$' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tif (chNext == '$') {\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SHORTCMD);\n\t\t\t\t\tmode = 2;\n\t\t\t\t\tstate = SCE_L_MATH2;\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i, SCE_L_SHORTCMD);\n\t\t\t\t\tmode = 1;\n\t\t\t\t\tstate = SCE_L_MATH;\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '%' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_L_COMMENT;\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tbreak;\n\t\t// These 3 will never be reached.\n\t\tcase SCE_L_ERROR:\n\t\tcase SCE_L_SPECIAL:\n\t\tcase SCE_L_SHORTCMD:\n\t\t\tbreak;\n\t\tcase SCE_L_COMMAND :\n\t\t\tif (!latexIsLetter(chNext)) {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tif (latexNextNotBlankIs(i + 1, styler, '[' )) {\n\t\t\t\t\tstate = SCE_L_CMDOPT;\n\t\t\t\t} else if (latexLastWordIs(i, styler, \"\\\\begin\")) {\n\t\t\t\t\tstate = SCE_L_TAG;\n\t\t\t\t} else if (latexLastWordIs(i, styler, \"\\\\end\")) {\n\t\t\t\t\tstate = SCE_L_TAG2;\n\t\t\t\t} else if (latexLastWordIs(i, styler, \"\\\\verb\") && chNext != '*' && chNext != ' ') {\n\t\t\t\t\tchVerbatimDelim = chNext;\n\t\t\t\t\tstate = SCE_L_VERBATIM;\n\t\t\t\t} else {\n\t\t\t\t\tlatexStateReset(mode, state);\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_L_CMDOPT :\n\t\t\tif (ch == ']') {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_L_TAG :\n\t\t\tif (latexIsTagValid(i, lengthDoc, styler)) {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t\tif (latexLastWordIs(i, styler, \"{verbatim}\")) {\n\t\t\t\t\tstate = SCE_L_VERBATIM;\n\t\t\t\t} else if (latexLastWordIs(i, styler, \"{lstlisting}\")) {\n\t\t\t\t\tstate = SCE_L_VERBATIM;\n\t\t\t\t} else if (latexLastWordIs(i, styler, \"{comment}\")) {\n\t\t\t\t\tstate = SCE_L_COMMENT2;\n\t\t\t\t} else if (latexLastWordIs(i, styler, \"{math}\") && mode == 0) {\n\t\t\t\t\tmode = 1;\n\t\t\t\t\tstate = SCE_L_MATH;\n\t\t\t\t} else if (latexLastWordIsMathEnv(i, styler) && mode == 0) {\n\t\t\t\t\tmode = 2;\n\t\t\t\t\tstate = SCE_L_MATH2;\n\t\t\t\t}\n\t\t\t} else {\n\t\t\t\tstyler.ColourTo(i < styler.Length() ? i : styler.Length() - 1, SCE_L_ERROR);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t\tch = styler.SafeGetCharAt(i);\n\t\t\t\tif (ch == '\\r' || ch == '\\n') setMode(styler.GetLine(i), mode);\n\t\t\t}\n\t\t\tchNext = styler.SafeGetCharAt(i+1);\n\t\t\tbreak;\n\t\tcase SCE_L_TAG2 :\n\t\t\tif (latexIsTagValid(i, lengthDoc, styler)) {\n\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t} else {\n\t\t\t\tstyler.ColourTo(i < styler.Length() ? i : styler.Length() - 1, SCE_L_ERROR);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t\tch = styler.SafeGetCharAt(i);\n\t\t\t\tif (ch == '\\r' || ch == '\\n') setMode(styler.GetLine(i), mode);\n\t\t\t}\n\t\t\tchNext = styler.SafeGetCharAt(i+1);\n\t\t\tbreak;\n\t\tcase SCE_L_MATH :\n\t\t\tswitch (ch) {\n\t\t\tcase '\\\\' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tif (latexIsLetter(chNext)) {\n\t\t\t\t\tSci_Position match = i + 3;\n\t\t\t\t\tif (latexLastWordIs(match, styler, \"\\\\end\")) {\n\t\t\t\t\t\tmatch++;\n\t\t\t\t\t\tif (latexIsTagValid(match, lengthDoc, styler)) {\n\t\t\t\t\t\t\tif (latexLastWordIs(match, styler, \"{math}\"))\n\t\t\t\t\t\t\t\tmode = 0;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tstate = SCE_L_COMMAND;\n\t\t\t\t} else if (latexIsSpecial(chNext)) {\n\t\t\t\t\tif ((i + 1) >= styler.Length())\n\t\t\t\t\t\tbreak;\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SPECIAL);\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t} else if (chNext == '\\r' || chNext == '\\n') {\n\t\t\t\t\tstyler.ColourTo(i, SCE_L_ERROR);\n\t\t\t\t} else if (IsASCII(chNext)) {\n\t\t\t\t\tif (chNext == ')') {\n\t\t\t\t\t\tmode = 0;\n\t\t\t\t\t\tstate = SCE_L_DEFAULT;\n\t\t\t\t\t}\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SHORTCMD);\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '$' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstyler.ColourTo(i, SCE_L_SHORTCMD);\n\t\t\t\tmode = 0;\n\t\t\t\tstate = SCE_L_DEFAULT;\n\t\t\t\tbreak;\n\t\t\tcase '%' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_L_COMMENT;\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_L_MATH2 :\n\t\t\tswitch (ch) {\n\t\t\tcase '\\\\' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tif (latexIsLetter(chNext)) {\n\t\t\t\t\tSci_Position match = i + 3;\n\t\t\t\t\tif (latexLastWordIs(match, styler, \"\\\\end\")) {\n\t\t\t\t\t\tmatch++;\n\t\t\t\t\t\tif (latexIsTagValid(match, lengthDoc, styler)) {\n\t\t\t\t\t\t\tif (latexLastWordIsMathEnv(match, styler))\n\t\t\t\t\t\t\t\tmode = 0;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tstate = SCE_L_COMMAND;\n\t\t\t\t} else if (latexIsSpecial(chNext)) {\n\t\t\t\t\tif ((i + 1) >= styler.Length())\n\t\t\t\t\t\tbreak;\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SPECIAL);\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t} else if (chNext == '\\r' || chNext == '\\n') {\n\t\t\t\t\tstyler.ColourTo(i, SCE_L_ERROR);\n\t\t\t\t} else if (IsASCII(chNext)) {\n\t\t\t\t\tif (chNext == ']') {\n\t\t\t\t\t\tmode = 0;\n\t\t\t\t\t\tstate = SCE_L_DEFAULT;\n\t\t\t\t\t}\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SHORTCMD);\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '$' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tif (chNext == '$') {\n\t\t\t\t\tstyler.ColourTo(i + 1, SCE_L_SHORTCMD);\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t\tmode = 0;\n\t\t\t\t\tstate = SCE_L_DEFAULT;\n\t\t\t\t} else { // This may not be an error, e.g. \\begin{equation}\\text{$a$}\\end{equation}\n\t\t\t\t\tstyler.ColourTo(i, SCE_L_SHORTCMD);\n\t\t\t\t}\n\t\t\t\tbreak;\n\t\t\tcase '%' :\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_L_COMMENT;\n\t\t\t\tbreak;\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_L_COMMENT :\n\t\t\tif (ch == '\\r' || ch == '\\n') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_L_COMMENT2 :\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tSci_Position match = i + 3;\n\t\t\t\tif (latexLastWordIs(match, styler, \"\\\\end\")) {\n\t\t\t\t\tmatch++;\n\t\t\t\t\tif (latexIsTagValid(match, lengthDoc, styler)) {\n\t\t\t\t\t\tif (latexLastWordIs(match, styler, \"{comment}\")) {\n\t\t\t\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\t\t\t\tstate = SCE_L_COMMAND;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t\tbreak;\n\t\tcase SCE_L_VERBATIM :\n\t\t\tif (ch == '\\\\') {\n\t\t\t\tSci_Position match = i + 3;\n\t\t\t\tif (latexLastWordIs(match, styler, \"\\\\end\")) {\n\t\t\t\t\tmatch++;\n\t\t\t\t\tif (latexIsTagValid(match, lengthDoc, styler)) {\n\t\t\t\t\t\tif (latexLastWordIs(match, styler, \"{verbatim}\")) {\n\t\t\t\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\t\t\t\tstate = SCE_L_COMMAND;\n\t\t\t\t\t\t} else if (latexLastWordIs(match, styler, \"{lstlisting}\")) {\n\t\t\t\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\t\t\t\tstate = SCE_L_COMMAND;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t} else if (chNext == chVerbatimDelim) {\n\t\t\t\tstyler.ColourTo(i + 1, state);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t\tchVerbatimDelim = '\\0';\n\t\t\t\ti++;\n\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t} else if (chVerbatimDelim != '\\0' && (ch == '\\n' || ch == '\\r')) {\n\t\t\t\tstyler.ColourTo(i - 1, SCE_L_ERROR);\n\t\t\t\tlatexStateReset(mode, state);\n\t\t\t\tchVerbatimDelim = '\\0';\n\t\t\t}\n\t\t\tbreak;\n\t\t}\n\t}\n\tif (lengthDoc == styler.Length()) truncModes(styler.GetLine(lengthDoc - 1));\n\tstyler.ColourTo(lengthDoc - 1, state);\n\tstyler.Flush();\n}\n\nstatic int latexFoldSaveToInt(const latexFoldSave &save) {\n\tint sum = 0;\n\tfor (int i = 0; i <= save.structLev; ++i)\n\t\tsum += save.openBegins[i];\n\treturn ((sum + save.structLev + SC_FOLDLEVELBASE) & SC_FOLDLEVELNUMBERMASK);\n}\n\n// Change folding state while processing a line\n// Return the level before the first relevant command\nvoid SCI_METHOD LexerLaTeX::Fold(Sci_PositionU startPos, Sci_Position length, int, IDocument *pAccess) {\n\tconst char *structWords[7] = {\"part\", \"chapter\", \"section\", \"subsection\",\n\t\t\"subsubsection\", \"paragraph\", \"subparagraph\"};\n\tAccessor styler(pAccess, &props);\n\tSci_PositionU endPos = startPos + length;\n\tSci_Position curLine = styler.GetLine(startPos);\n\tlatexFoldSave save;\n\tgetSave(curLine - 1, save);\n\tdo {\n\t\tchar ch, buf[16];\n\t\tSci_Position i, j;\n\t\tint lev = -1;\n\t\tbool needFold = false;\n\t\tfor (i = static_cast(startPos); i < static_cast(endPos); ++i) {\n\t\t\tch = styler.SafeGetCharAt(i);\n\t\t\tif (ch == '\\r' || ch == '\\n') break;\n\t\t\tif (ch != '\\\\' || styler.StyleAt(i) != SCE_L_COMMAND) continue;\n\t\t\tfor (j = 0; j < 15 && i + 1 < static_cast(endPos); ++j, ++i) {\n\t\t\t\tbuf[j] = styler.SafeGetCharAt(i + 1);\n\t\t\t\tif (!latexIsLetter(buf[j])) break;\n\t\t\t}\n\t\t\tbuf[j] = '\\0';\n\t\t\tif (strcmp(buf, \"begin\") == 0) {\n\t\t\t\tif (lev < 0) lev = latexFoldSaveToInt(save);\n\t\t\t\t++save.openBegins[save.structLev];\n\t\t\t\tneedFold = true;\n\t\t\t}\n\t\t\telse if (strcmp(buf, \"end\") == 0) {\n\t\t\t\twhile (save.structLev > 0 && save.openBegins[save.structLev] == 0)\n\t\t\t\t\t--save.structLev;\n\t\t\t\tif (lev < 0) lev = latexFoldSaveToInt(save);\n\t\t\t\tif (save.openBegins[save.structLev] > 0) --save.openBegins[save.structLev];\n\t\t\t}\n\t\t\telse {\n\t\t\t\tfor (j = 0; j < 7; ++j)\n\t\t\t\t\tif (strcmp(buf, structWords[j]) == 0) break;\n\t\t\t\tif (j >= 7) continue;\n\t\t\t\tsave.structLev = j; // level before the command\n\t\t\t\tfor (j = save.structLev + 1; j < 8; ++j) {\n\t\t\t\t\tsave.openBegins[save.structLev] += save.openBegins[j];\n\t\t\t\t\tsave.openBegins[j] = 0;\n\t\t\t\t}\n\t\t\t\tif (lev < 0) lev = latexFoldSaveToInt(save);\n\t\t\t\t++save.structLev; // level after the command\n\t\t\t\tneedFold = true;\n\t\t\t}\n\t\t}\n\t\tif (lev < 0) lev = latexFoldSaveToInt(save);\n\t\tif (needFold) lev |= SC_FOLDLEVELHEADERFLAG;\n\t\tstyler.SetLevel(curLine, lev);\n\t\tsetSave(curLine, save);\n\t\t++curLine;\n\t\tstartPos = styler.LineStart(curLine);\n\t\tif (static_cast(startPos) == styler.Length()) {\n\t\t\tlev = latexFoldSaveToInt(save);\n\t\t\tstyler.SetLevel(curLine, lev);\n\t\t\tsetSave(curLine, save);\n\t\t\ttruncSaves(curLine);\n\t\t}\n\t} while (startPos < endPos);\n\tstyler.Flush();\n}\n\nstatic const char *const emptyWordListDesc[] = {\n\t0\n};\n\nextern const LexerModule lmLatex(SCLEX_LATEX, LexerLaTeX::LexerFactoryLaTeX, \"latex\", emptyWordListDesc);\n" }, { "path": "lexers/LexLisp.cxx", "content": "// Scintilla source code edit control\n/** @file LexLisp.cxx\n ** Lexer for Lisp.\n ** Written by Alexey Yutkin.\n **/\n// Copyright 1998-2001 by Neil Hodgson \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\n#define SCE_LISP_CHARACTER 29\n#define SCE_LISP_MACRO 30\n#define SCE_LISP_MACRO_DISPATCH 31\n\nstatic inline bool isLispoperator(char ch) {\n\tif (IsASCII(ch) && isalnum(ch))\n\t\treturn false;\n\tif (ch == '\\'' || ch == '`' || ch == '(' || ch == ')' || ch == '[' || ch == ']' || ch == '{' || ch == '}')\n\t\treturn true;\n\treturn false;\n}\n\nstatic inline bool isLispwordstart(char ch) {\n\treturn IsASCII(ch) && ch != ';' && !isspacechar(ch) && !isLispoperator(ch) &&\n\t\tch != '\\n' && ch != '\\r' && ch != '\\\"';\n}\n\n\nstatic void classifyWordLisp(Sci_PositionU start, Sci_PositionU end, WordList &keywords, WordList &keywords_kw, Accessor &styler) {\n\tassert(end >= start);\n\tchar s[100];\n\tSci_PositionU i;\n\tbool digit_flag = true;\n\tfor (i = 0; (i < end - start + 1) && (i < 99); i++) {\n\t\ts[i] = styler[start + i];\n\t\ts[i + 1] = '\\0';\n\t\tif (!isdigit(s[i]) && (s[i] != '.')) digit_flag = false;\n\t}\n\tchar chAttr = SCE_LISP_IDENTIFIER;\n\n\tif(digit_flag) chAttr = SCE_LISP_NUMBER;\n\telse {\n\t\tif (keywords.InList(s)) {\n\t\t\tchAttr = SCE_LISP_KEYWORD;\n\t\t} else if (keywords_kw.InList(s)) {\n\t\t\tchAttr = SCE_LISP_KEYWORD_KW;\n\t\t} else if ((s[0] == '*' && s[i-1] == '*') ||\n\t\t\t (s[0] == '+' && s[i-1] == '+')) {\n\t\t\tchAttr = SCE_LISP_SPECIAL;\n\t\t}\n\t}\n\tstyler.ColourTo(end, chAttr);\n\treturn;\n}\n\n\nstatic void ColouriseLispDoc(Sci_PositionU startPos, Sci_Position length, int initStyle, WordList *keywordlists[],\n Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords_kw = *keywordlists[1];\n\n\tstyler.StartAt(startPos);\n\n\tint state = initStyle, radix = -1;\n\tchar chNext = styler[startPos];\n\tSci_PositionU lengthDoc = startPos + length;\n\tstyler.StartSegment(startPos);\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\t\tif (styler.IsLeadByte(ch)) {\n\t\t\tchNext = styler.SafeGetCharAt(i + 2);\n\t\t\ti += 1;\n\t\t\tcontinue;\n\t\t}\n\n\t\tif (state == SCE_LISP_DEFAULT) {\n\t\t\tif (ch == '#') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tradix = -1;\n\t\t\t\tstate = SCE_LISP_MACRO_DISPATCH;\n\t\t\t} else if (ch == ':' && isLispwordstart(chNext)) {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_LISP_SYMBOL;\n\t\t\t} else if (isLispwordstart(ch)) {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_LISP_IDENTIFIER;\n\t\t\t}\n\t\t\telse if (ch == ';') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_LISP_COMMENT;\n\t\t\t}\n\t\t\telse if (isLispoperator(ch) || ch=='\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstyler.ColourTo(i, SCE_LISP_OPERATOR);\n\t\t\t\tif (ch=='\\'' && isLispwordstart(chNext)) {\n\t\t\t\t\tstate = SCE_LISP_SYMBOL;\n\t\t\t\t}\n\t\t\t}\n\t\t\telse if (ch == '\\\"') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_LISP_STRING;\n\t\t\t}\n\t\t} else if (state == SCE_LISP_IDENTIFIER || state == SCE_LISP_SYMBOL) {\n\t\t\tif (!isLispwordstart(ch)) {\n\t\t\t\tif (state == SCE_LISP_IDENTIFIER) {\n\t\t\t\t\tclassifyWordLisp(styler.GetStartSegment(), i - 1, keywords, keywords_kw, styler);\n\t\t\t\t} else {\n\t\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\t}\n\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t} /*else*/\n\t\t\tif (isLispoperator(ch) || ch=='\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstyler.ColourTo(i, SCE_LISP_OPERATOR);\n\t\t\t\tif (ch=='\\'' && isLispwordstart(chNext)) {\n\t\t\t\t\tstate = SCE_LISP_SYMBOL;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (state == SCE_LISP_MACRO_DISPATCH) {\n\t\t\tif (!(IsASCII(ch) && isdigit(ch))) {\n\t\t\t\tif (ch != 'r' && ch != 'R' && (i - styler.GetStartSegment()) > 1) {\n\t\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t\t} else {\n\t\t\t\t\tswitch (ch) {\n\t\t\t\t\t\tcase '|': state = SCE_LISP_MULTI_COMMENT; break;\n\t\t\t\t\t\tcase 'o':\n\t\t\t\t\t\tcase 'O': radix = 8; state = SCE_LISP_MACRO; break;\n\t\t\t\t\t\tcase 'x':\n\t\t\t\t\t\tcase 'X': radix = 16; state = SCE_LISP_MACRO; break;\n\t\t\t\t\t\tcase 'b':\n\t\t\t\t\t\tcase 'B': radix = 2; state = SCE_LISP_MACRO; break;\n\t\t\t\t\t\tcase '\\\\': state = SCE_LISP_CHARACTER; break;\n\t\t\t\t\t\tcase ':':\n\t\t\t\t\t\tcase '-':\n\t\t\t\t\t\tcase '+': state = SCE_LISP_MACRO; break;\n\t\t\t\t\t\tcase '\\'': if (isLispwordstart(chNext)) {\n\t\t\t\t\t\t\t\t state = SCE_LISP_SPECIAL;\n\t\t\t\t\t\t\t } else {\n\t\t\t\t\t\t\t\t styler.ColourTo(i - 1, SCE_LISP_DEFAULT);\n\t\t\t\t\t\t\t\t styler.ColourTo(i, SCE_LISP_OPERATOR);\n\t\t\t\t\t\t\t\t state = SCE_LISP_DEFAULT;\n\t\t\t\t\t\t\t }\n\t\t\t\t\t\t\t break;\n\t\t\t\t\t\tdefault: if (isLispoperator(ch)) {\n\t\t\t\t\t\t\t\t styler.ColourTo(i - 1, SCE_LISP_DEFAULT);\n\t\t\t\t\t\t\t\t styler.ColourTo(i, SCE_LISP_OPERATOR);\n\t\t\t\t\t\t\t }\n\t\t\t\t\t\t\t state = SCE_LISP_DEFAULT;\n\t\t\t\t\t\t\t break;\n\t\t\t\t\t}\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (state == SCE_LISP_MACRO) {\n\t\t\tif (isLispwordstart(ch) && (radix == -1 || IsADigit(ch, radix))) {\n\t\t\t\tstate = SCE_LISP_SPECIAL;\n\t\t\t} else {\n\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t}\n\t\t} else if (state == SCE_LISP_CHARACTER) {\n\t\t\tif (isLispoperator(ch)) {\n\t\t\t\tstyler.ColourTo(i, SCE_LISP_SPECIAL);\n\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t} else if (isLispwordstart(ch)) {\n\t\t\t\tstyler.ColourTo(i, SCE_LISP_SPECIAL);\n\t\t\t\tstate = SCE_LISP_SPECIAL;\n\t\t\t} else {\n\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t}\n\t\t} else if (state == SCE_LISP_SPECIAL) {\n\t\t\tif (!isLispwordstart(ch) || (radix != -1 && !IsADigit(ch, radix))) {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t}\n\t\t\tif (isLispoperator(ch) || ch=='\\'') {\n\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\tstyler.ColourTo(i, SCE_LISP_OPERATOR);\n\t\t\t\tif (ch=='\\'' && isLispwordstart(chNext)) {\n\t\t\t\t\tstate = SCE_LISP_SYMBOL;\n\t\t\t\t}\n\t\t\t}\n\t\t} else {\n\t\t\tif (state == SCE_LISP_COMMENT) {\n\t\t\t\tif (atEOL) {\n\t\t\t\t\tstyler.ColourTo(i - 1, state);\n\t\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t\t}\n\t\t\t} else if (state == SCE_LISP_MULTI_COMMENT) {\n\t\t\t\tif (ch == '|' && chNext == '#') {\n\t\t\t\t\ti++;\n\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t\t}\n\t\t\t} else if (state == SCE_LISP_STRING) {\n\t\t\t\tif (ch == '\\\\') {\n\t\t\t\t\tif (chNext == '\\\"' || chNext == '\\'' || chNext == '\\\\') {\n\t\t\t\t\t\ti++;\n\t\t\t\t\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\t\t\t\t}\n\t\t\t\t} else if (ch == '\\\"') {\n\t\t\t\t\tstyler.ColourTo(i, state);\n\t\t\t\t\tstate = SCE_LISP_DEFAULT;\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\n\t}\n\tstyler.ColourTo(lengthDoc - 1, state);\n}\n\nstatic void FoldLispDoc(Sci_PositionU startPos, Sci_Position length, int /* initStyle */, WordList *[],\n Accessor &styler) {\n\tSci_PositionU lengthDoc = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tint styleNext = styler.StyleAt(startPos);\n\tfor (Sci_PositionU i = startPos; i < lengthDoc; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\t\tif (style == SCE_LISP_OPERATOR) {\n\t\t\tif (ch == '(' || ch == '[' || ch == '{') {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (ch == ')' || ch == ']' || ch == '}') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0)\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0))\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nstatic const char * const lispWordListDesc[] = {\n\t\"Functions and special operators\",\n\t\"Keywords\",\n\t0\n};\n\nextern const LexerModule lmLISP(SCLEX_LISP, ColouriseLispDoc, \"lisp\", FoldLispDoc, lispWordListDesc);\n" }, { "path": "lexers/LexLout.cxx", "content": "// Scintilla source code edit control\n/** @file LexLout.cxx\n ** Lexer for the Basser Lout (>= version 3) typesetting language\n **/\n// Copyright 2003 by Kein-Hong Man \n// The License.txt file describes the conditions under which this software may be distributed.\n\n#include \n#include \n#include \n#include \n#include \n#include \n\n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n\nusing namespace Lexilla;\n\nstatic inline bool IsAWordChar(const int ch) {\n\treturn (ch < 0x80) && (isalpha(ch) || ch == '@' || ch == '_');\n}\n\nstatic inline bool IsAnOther(const int ch) {\n\treturn (ch < 0x80) && (ch == '{' || ch == '}' ||\n\tch == '!' || ch == '$' || ch == '%' || ch == '&' || ch == '\\'' ||\n\tch == '(' || ch == ')' || ch == '*' || ch == '+' || ch == ',' ||\n\tch == '-' || ch == '.' || ch == '/' || ch == ':' || ch == ';' ||\n\tch == '<' || ch == '=' || ch == '>' || ch == '?' || ch == '[' ||\n\tch == ']' || ch == '^' || ch == '`' || ch == '|' || ch == '~');\n}\n\nstatic void ColouriseLoutDoc(Sci_PositionU startPos, Sci_Position length, int initStyle,\n\t\t\t WordList *keywordlists[], Accessor &styler) {\n\n\tWordList &keywords = *keywordlists[0];\n\tWordList &keywords2 = *keywordlists[1];\n\tWordList &keywords3 = *keywordlists[2];\n\n\tint visibleChars = 0;\n\tint firstWordInLine = 0;\n\tint leadingAtSign = 0;\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\n\tfor (; sc.More(); sc.Forward()) {\n\n\t\tif (sc.atLineStart && (sc.state == SCE_LOUT_STRING)) {\n\t\t\t// Prevent SCE_LOUT_STRINGEOL from leaking back to previous line\n\t\t\tsc.SetState(SCE_LOUT_STRING);\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_LOUT_COMMENT) {\n\t\t\tif (sc.atLineEnd) {\n\t\t\t\tsc.SetState(SCE_LOUT_DEFAULT);\n\t\t\t\tvisibleChars = 0;\n\t\t\t}\n\t\t} else if (sc.state == SCE_LOUT_NUMBER) {\n\t\t\tif (!IsADigit(sc.ch) && sc.ch != '.') {\n\t\t\t\tsc.SetState(SCE_LOUT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_LOUT_STRING) {\n\t\t\tif (sc.ch == '\\\\') {\n\t\t\t\tif (sc.chNext == '\\\"' || sc.chNext == '\\\\') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.ForwardSetState(SCE_LOUT_DEFAULT);\n\t\t\t} else if (sc.atLineEnd) {\n\t\t\t\tsc.ChangeState(SCE_LOUT_STRINGEOL);\n\t\t\t\tsc.ForwardSetState(SCE_LOUT_DEFAULT);\n\t\t\t\tvisibleChars = 0;\n\t\t\t}\n\t\t} else if (sc.state == SCE_LOUT_IDENTIFIER) {\n\t\t\tif (!IsAWordChar(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\n\t\t\t\tif (leadingAtSign) {\n\t\t\t\t\tif (keywords.InList(s)) {\n\t\t\t\t\t\tsc.ChangeState(SCE_LOUT_WORD);\n\t\t\t\t\t} else {\n\t\t\t\t\t\tsc.ChangeState(SCE_LOUT_WORD4);\n\t\t\t\t\t}\n\t\t\t\t} else if (firstWordInLine && keywords3.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_LOUT_WORD3);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_LOUT_DEFAULT);\n\t\t\t}\n\t\t} else if (sc.state == SCE_LOUT_OPERATOR) {\n\t\t\tif (!IsAnOther(sc.ch)) {\n\t\t\t\tchar s[100];\n\t\t\t\tsc.GetCurrent(s, sizeof(s));\n\n\t\t\t\tif (keywords2.InList(s)) {\n\t\t\t\t\tsc.ChangeState(SCE_LOUT_WORD2);\n\t\t\t\t}\n\t\t\t\tsc.SetState(SCE_LOUT_DEFAULT);\n\t\t\t}\n\t\t}\n\n\t\t// Determine if a new state should be entered.\n\t\tif (sc.state == SCE_LOUT_DEFAULT) {\n\t\t\tif (sc.ch == '#') {\n\t\t\t\tsc.SetState(SCE_LOUT_COMMENT);\n\t\t\t} else if (sc.ch == '\\\"') {\n\t\t\t\tsc.SetState(SCE_LOUT_STRING);\n\t\t\t} else if (IsADigit(sc.ch) ||\n\t\t\t\t (sc.ch == '.' && IsADigit(sc.chNext))) {\n\t\t\t\tsc.SetState(SCE_LOUT_NUMBER);\n\t\t\t} else if (IsAWordChar(sc.ch)) {\n\t\t\t\tfirstWordInLine = (visibleChars == 0);\n\t\t\t\tleadingAtSign = (sc.ch == '@');\n\t\t\t\tsc.SetState(SCE_LOUT_IDENTIFIER);\n\t\t\t} else if (IsAnOther(sc.ch)) {\n\t\t\t\tsc.SetState(SCE_LOUT_OPERATOR);\n\t\t\t}\n\t\t}\n\n\t\tif (sc.atLineEnd) {\n\t\t\t// Reset states to begining of colourise so no surprises\n\t\t\t// if different sets of lines lexed.\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!IsASpace(sc.ch)) {\n\t\t\tvisibleChars++;\n\t\t}\n\t}\n\tsc.Complete();\n}\n\nstatic void FoldLoutDoc(Sci_PositionU startPos, Sci_Position length, int, WordList *[],\n Accessor &styler) {\n\n\tSci_PositionU endPos = startPos + length;\n\tint visibleChars = 0;\n\tSci_Position lineCurrent = styler.GetLine(startPos);\n\tint levelPrev = styler.LevelAt(lineCurrent) & SC_FOLDLEVELNUMBERMASK;\n\tint levelCurrent = levelPrev;\n\tchar chNext = styler[startPos];\n\tbool foldCompact = styler.GetPropertyInt(\"fold.compact\", 1) != 0;\n\tint styleNext = styler.StyleAt(startPos);\n\tchar s[10] = \"\";\n\n\tfor (Sci_PositionU i = startPos; i < endPos; i++) {\n\t\tchar ch = chNext;\n\t\tchNext = styler.SafeGetCharAt(i + 1);\n\t\tint style = styleNext;\n\t\tstyleNext = styler.StyleAt(i + 1);\n\t\tbool atEOL = (ch == '\\r' && chNext != '\\n') || (ch == '\\n');\n\n\t\tif (style == SCE_LOUT_WORD) {\n\t\t\tif (ch == '@') {\n\t\t\t\tfor (Sci_PositionU j = 0; j < 8; j++) {\n\t\t\t\t\tif (!IsAWordChar(styler[i + j])) {\n\t\t\t\t\t\tbreak;\n\t\t\t\t\t}\n\t\t\t\t\ts[j] = styler[i + j];\n\t\t\t\t\ts[j + 1] = '\\0';\n\t\t\t\t}\n\t\t\t\tif (strcmp(s, \"@Begin\") == 0) {\n\t\t\t\t\tlevelCurrent++;\n\t\t\t\t} else if (strcmp(s, \"@End\") == 0) {\n\t\t\t\t\tlevelCurrent--;\n\t\t\t\t}\n\t\t\t}\n\t\t} else if (style == SCE_LOUT_OPERATOR) {\n\t\t\tif (ch == '{') {\n\t\t\t\tlevelCurrent++;\n\t\t\t} else if (ch == '}') {\n\t\t\t\tlevelCurrent--;\n\t\t\t}\n\t\t}\n\t\tif (atEOL) {\n\t\t\tint lev = levelPrev;\n\t\t\tif (visibleChars == 0 && foldCompact) {\n\t\t\t\tlev |= SC_FOLDLEVELWHITEFLAG;\n\t\t\t}\n\t\t\tif ((levelCurrent > levelPrev) && (visibleChars > 0)) {\n\t\t\t\tlev |= SC_FOLDLEVELHEADERFLAG;\n\t\t\t}\n\t\t\tif (lev != styler.LevelAt(lineCurrent)) {\n\t\t\t\tstyler.SetLevel(lineCurrent, lev);\n\t\t\t}\n\t\t\tlineCurrent++;\n\t\t\tlevelPrev = levelCurrent;\n\t\t\tvisibleChars = 0;\n\t\t}\n\t\tif (!isspacechar(ch))\n\t\t\tvisibleChars++;\n\t}\n\t// Fill in the real level of the next line, keeping the current flags as they will be filled in later\n\tint flagsNext = styler.LevelAt(lineCurrent) & ~SC_FOLDLEVELNUMBERMASK;\n\tstyler.SetLevel(lineCurrent, levelPrev | flagsNext);\n}\n\nstatic const char * const loutWordLists[] = {\n \"Predefined identifiers\",\n \"Predefined delimiters\",\n \"Predefined keywords\",\n 0,\n };\n\nextern const LexerModule lmLout(SCLEX_LOUT, ColouriseLoutDoc, \"lout\", FoldLoutDoc, loutWordLists);\n" }, { "path": "lexers/LexLua.cxx", "content": "// Scintilla source code edit control\n/** @file LexLua.cxx\n ** Lexer for Lua language.\n **\n ** Written by Paul Winwood.\n ** Folder by Alexey Yutkin.\n ** Modified by Marcos E. Wurzius & Philippe Lhoste\n **/\n\n#include \n#include \n#include \n\n#include \n#include \n#include \n#include \n\n#include \"ILexer.h\"\n#include \"Scintilla.h\"\n#include \"SciLexer.h\"\n\n#include \"WordList.h\"\n#include \"LexAccessor.h\"\n#include \"Accessor.h\"\n#include \"StyleContext.h\"\n#include \"CharacterSet.h\"\n#include \"LexerModule.h\"\n#include \"OptionSet.h\"\n#include \"SubStyles.h\"\n#include \"DefaultLexer.h\"\n\nusing namespace Scintilla;\nusing namespace Lexilla;\n\nnamespace {\n\n// Test for [=[ ... ]=] delimiters, returns 0 if it's only a [ or ],\n// return 1 for [[ or ]], returns >=2 for [=[ or ]=] and so on.\n// The maximum number of '=' characters allowed is 254.\nint LongDelimCheck(StyleContext &sc) {\n\tconstexpr int maximumEqualCharacters = 254;\n\tint sep = 1;\n\twhile (sc.GetRelative(sep) == '=' && sep <= maximumEqualCharacters)\n\t\tsep++;\n\tif (sc.GetRelative(sep) == sc.ch)\n\t\treturn sep;\n\treturn 0;\n}\n\nconst char *const luaWordListDesc[] = {\n\t\"Keywords\",\n\t\"Basic functions\",\n\t\"String, (table) & math functions\",\n\t\"(coroutines), I/O & system facilities\",\n\t\"user1\",\n\t\"user2\",\n\t\"user3\",\n\t\"user4\",\n\tnullptr\n};\n\nconst char styleSubable[] = { SCE_LUA_IDENTIFIER, 0 };\n\nconst LexicalClass lexicalClasses[] = {\n\t// Lexer Lua SCLEX_LUA SCE_LUA_:\n\t0, \"SCE_LUA_DEFAULT\", \"default\", \"White space: Visible only in View Whitespace mode (or if it has a back colour)\",\n\t1, \"SCE_LUA_COMMENT\", \"comment\", \"Block comment (Lua 5.0)\",\n\t2, \"SCE_LUA_COMMENTLINE\", \"comment line\", \"Line comment\",\n\t3, \"SCE_LUA_COMMENTDOC\", \"comment documentation\", \"Doc comment\",\n\t4, \"SCE_LUA_NUMBER\", \"literal numeric\", \"Number\",\n\t5, \"SCE_LUA_WORD\", \"keyword\", \"Keyword\",\n\t6, \"SCE_LUA_STRING\", \"literal string\", \"(Double quoted) String\",\n\t7, \"SCE_LUA_CHARACTER\", \"literal string character\", \"Character (Single quoted string)\",\n\t8, \"SCE_LUA_LITERALSTRING\", \"literal string\", \"Literal string\",\n\t9, \"SCE_LUA_PREPROCESSOR\", \"preprocessor\", \"Preprocessor (obsolete in Lua 4.0 and up)\",\n\t10, \"SCE_LUA_OPERATOR\", \"operator\", \"Operators\",\n\t11, \"SCE_LUA_IDENTIFIER\", \"identifier\", \"Identifier (everything else...)\",\n\t12, \"SCE_LUA_STRINGEOL\", \"error literal string\", \"End of line where string is not closed\",\n\t13, \"SCE_LUA_WORD2\", \"identifier\", \"Other keywords\",\n\t14, \"SCE_LUA_WORD3\", \"identifier\", \"Other keywords\",\n\t15, \"SCE_LUA_WORD4\", \"identifier\", \"Other keywords\",\n\t16, \"SCE_LUA_WORD5\", \"identifier\", \"Other keywords\",\n\t17, \"SCE_LUA_WORD6\", \"identifier\", \"Other keywords\",\n\t18, \"SCE_LUA_WORD7\", \"identifier\", \"Other keywords\",\n\t19, \"SCE_LUA_WORD8\", \"identifier\", \"Other keywords\",\n\t20, \"SCE_LUA_LABEL\", \"label\", \"Labels\",\n};\n\n// Options used for LexerLua\nstruct OptionsLua {\n\tbool foldCompact = true;\n};\n\nstruct OptionSetLua : public OptionSet {\n\tOptionSetLua() {\n\t\tDefineProperty(\"fold.compact\", &OptionsLua::foldCompact);\n\n\t\tDefineWordListSets(luaWordListDesc);\n\t}\n};\n\nclass LexerLua : public DefaultLexer {\n\tWordList keywords;\n\tWordList keywords2;\n\tWordList keywords3;\n\tWordList keywords4;\n\tWordList keywords5;\n\tWordList keywords6;\n\tWordList keywords7;\n\tWordList keywords8;\n\tOptionsLua options;\n\tOptionSetLua osLua;\n\tSubStyles subStyles{styleSubable};\npublic:\n\texplicit LexerLua() :\n\t\tDefaultLexer(\"lua\", SCLEX_LUA, lexicalClasses, std::size(lexicalClasses)) {\n\t}\n\tLexerLua(const LexerLua &) = delete;\n\tLexerLua(LexerLua &&) = delete;\n\tLexerLua &operator=(const LexerLua &) = delete;\n\tLexerLua &operator=(LexerLua &&) = delete;\n\t~LexerLua() override = default;\n\tvoid SCI_METHOD Release() noexcept override {\n\t\tdelete this;\n\t}\n\t[[nodiscard]] int SCI_METHOD Version() const noexcept override {\n\t\treturn lvRelease5;\n\t}\n\tconst char *SCI_METHOD PropertyNames() noexcept override {\n\t\treturn osLua.PropertyNames();\n\t}\n\tint SCI_METHOD PropertyType(const char *name) override {\n\t\treturn osLua.PropertyType(name);\n\t}\n\tconst char *SCI_METHOD DescribeProperty(const char *name) override {\n\t\treturn osLua.DescribeProperty(name);\n\t}\n\tSci_Position SCI_METHOD PropertySet(const char *key, const char *val) override;\n\tconst char *SCI_METHOD PropertyGet(const char *key) override {\n\t\treturn osLua.PropertyGet(key);\n\t}\n\tconst char *SCI_METHOD DescribeWordListSets() noexcept override {\n\t\treturn osLua.DescribeWordListSets();\n\t}\n\tSci_Position SCI_METHOD WordListSet(int n, const char *wl) override;\n\tvoid SCI_METHOD Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\tvoid SCI_METHOD Fold(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) override;\n\n\tint SCI_METHOD AllocateSubStyles(int styleBase, int numberStyles) override {\n\t\treturn subStyles.Allocate(styleBase, numberStyles);\n\t}\n\tint SCI_METHOD SubStylesStart(int styleBase) override {\n\t\treturn subStyles.Start(styleBase);\n\t}\n\tint SCI_METHOD SubStylesLength(int styleBase) override {\n\t\treturn subStyles.Length(styleBase);\n\t}\n\tint SCI_METHOD StyleFromSubStyle(int subStyle) override {\n\t\tconst int styleBase = subStyles.BaseStyle(subStyle);\n\t\treturn styleBase;\n\t}\n\tint SCI_METHOD PrimaryStyleFromStyle(int style) override {\n\t\treturn style;\n\t}\n\tvoid SCI_METHOD FreeSubStyles() override {\n\t\tsubStyles.Free();\n\t}\n\tvoid SCI_METHOD SetIdentifiers(int style, const char *identifiers) override {\n\t\tsubStyles.SetIdentifiers(style, identifiers);\n\t}\n\tint SCI_METHOD DistanceToSecondaryStyles() override {\n\t\treturn 0;\n\t}\n\tconst char *SCI_METHOD GetSubStyleBases() override {\n\t\treturn styleSubable;\n\t}\n\n\tstatic ILexer5 *LexerFactoryLua() {\n\t\treturn new LexerLua();\n\t}\n};\n\nSci_Position SCI_METHOD LexerLua::PropertySet(const char *key, const char *val) {\n\tif (osLua.PropertySet(&options, key, val)) {\n\t\treturn 0;\n\t}\n\treturn -1;\n}\n\nSci_Position SCI_METHOD LexerLua::WordListSet(int n, const char *wl) {\n\tWordList *wordListN = nullptr;\n\tswitch (n) {\n\tcase 0:\n\t\twordListN = &keywords;\n\t\tbreak;\n\tcase 1:\n\t\twordListN = &keywords2;\n\t\tbreak;\n\tcase 2:\n\t\twordListN = &keywords3;\n\t\tbreak;\n\tcase 3:\n\t\twordListN = &keywords4;\n\t\tbreak;\n\tcase 4:\n\t\twordListN = &keywords5;\n\t\tbreak;\n\tcase 5:\n\t\twordListN = &keywords6;\n\t\tbreak;\n\tcase 6:\n\t\twordListN = &keywords7;\n\t\tbreak;\n\tcase 7:\n\t\twordListN = &keywords8;\n\t\tbreak;\n\tdefault:\n\t\tbreak;\n\t}\n\tSci_Position firstModification = -1;\n\tif (wordListN) {\n\t\tif (wordListN->Set(wl)) {\n\t\t\tfirstModification = 0;\n\t\t}\n\t}\n\treturn firstModification;\n}\n\nconstexpr int maskSeparator = 0xFF;\nconstexpr int maskStringWs = 0x100;\nconstexpr int maskDocComment = 0x200;\n\nvoid LexerLua::Lex(Sci_PositionU startPos, Sci_Position length, int initStyle, IDocument *pAccess) {\n\tLexAccessor styler(pAccess);\n\n\t// Accepts accented characters\n\tconst CharacterSet setWordStart(CharacterSet::setAlpha, \"_\", true);\n\tconst CharacterSet setWord(CharacterSet::setAlphaNum, \"_\", true);\n\t// Not exactly following number definition (several dots are seen as OK, etc.)\n\t// but probably enough in most cases. [pP] is for hex floats.\n\tconst CharacterSet setNumber(CharacterSet::setDigits, \".-+abcdefpABCDEFP\");\n\tconst CharacterSet setExponent(\"eEpP\");\n\tconst CharacterSet setLuaOperator(\"*/-+()={}~[];<>,.^%:#&|\");\n\tconst CharacterSet setEscapeSkip(\"\\\"'\\\\\");\n\n\tconst WordClassifier &classifierIdentifiers = subStyles.Classifier(SCE_LUA_IDENTIFIER);\n\n\tSci_Position currentLine = styler.GetLine(startPos);\n\t// Initialize long string [[ ... ]] or block comment --[[ ... ]],\n\t// if we are inside such a string. Block comment was introduced in Lua 5.0,\n\t// blocks with separators [=[ ... ]=] in Lua 5.1.\n\t// Continuation of a string (\\z whitespace escaping) is controlled by stringWs.\n\tint sepCount = 0;\n\tint stringWs = 0;\n\tint lastLineDocComment = 0;\n\tif ((currentLine > 0) &&\n\t\tAnyOf(initStyle, SCE_LUA_DEFAULT, SCE_LUA_LITERALSTRING, SCE_LUA_COMMENT, SCE_LUA_COMMENTDOC, SCE_LUA_STRING, SCE_LUA_CHARACTER)) {\n\t\tconst int lineState = styler.GetLineState(currentLine - 1);\n\t\tsepCount = lineState & maskSeparator;\n\t\tstringWs = lineState & maskStringWs;\n\t\tlastLineDocComment = lineState & maskDocComment;\n\t}\n\n\t// results of identifier/keyword matching\n\tSci_Position idenPos = 0;\n\tSci_Position idenStartCharWidth = 0;\n\tSci_Position idenWordPos = 0;\n\tint idenStyle = SCE_LUA_IDENTIFIER;\n\tbool foundGoto = false;\n\n\t// Do not leak onto next line\n\tif (AnyOf(initStyle, SCE_LUA_STRINGEOL, SCE_LUA_COMMENTLINE, SCE_LUA_COMMENTDOC, SCE_LUA_PREPROCESSOR)) {\n\t\tinitStyle = SCE_LUA_DEFAULT;\n\t}\n\n\tStyleContext sc(startPos, length, initStyle, styler);\n\tif (startPos == 0 && sc.ch == '#' && sc.chNext == '!') {\n\t\t// shbang line: \"#!\" is a comment only if located at the start of the script\n\t\tsc.SetState(SCE_LUA_COMMENTLINE);\n\t}\n\tfor (; sc.More(); sc.Forward()) {\n\t\tif (sc.atLineEnd) {\n\t\t\t// Update the line state, so it can be seen by next line\n\t\t\tcurrentLine = styler.GetLine(sc.currentPos);\n\t\t\tswitch (sc.state) {\n\t\t\tcase SCE_LUA_DEFAULT:\n\t\t\tcase SCE_LUA_LITERALSTRING:\n\t\t\tcase SCE_LUA_COMMENT:\n\t\t\tcase SCE_LUA_COMMENTDOC:\n\t\t\tcase SCE_LUA_STRING:\n\t\t\tcase SCE_LUA_CHARACTER:\n\t\t\t\t// Inside a literal string, block comment or string, we set the line state\n\t\t\t\tstyler.SetLineState(currentLine, lastLineDocComment | stringWs | sepCount);\n\t\t\t\tbreak;\n\t\t\tdefault:\n\t\t\t\t// Reset the line state\n\t\t\t\tstyler.SetLineState(currentLine, 0);\n\t\t\t\tbreak;\n\t\t\t}\n\t\t}\n\t\tif (sc.atLineStart && (sc.state == SCE_LUA_STRING)) {\n\t\t\t// Prevent SCE_LUA_STRINGEOL from leaking back to previous line\n\t\t\tsc.SetState(SCE_LUA_STRING);\n\t\t}\n\n\t\t// Handle string line continuation\n\t\tif ((sc.state == SCE_LUA_STRING || sc.state == SCE_LUA_CHARACTER) &&\n\t\t\t\tsc.ch == '\\\\') {\n\t\t\tif (sc.chNext == '\\n' || sc.chNext == '\\r') {\n\t\t\t\tsc.Forward();\n\t\t\t\tif (sc.ch == '\\r' && sc.chNext == '\\n') {\n\t\t\t\t\tsc.Forward();\n\t\t\t\t}\n\t\t\t\tcontinue;\n\t\t\t}\n\t\t}\n\n\t\t// Determine if the current state should terminate.\n\t\tif (sc.state == SCE_LUA_OPERATOR) {\n\t\t\tif (sc.ch == ':' && sc.chPrev == ':') {\t// ::