[ { "path": ".ctags.d/exclusion.ctags", "content": "# Exclude directories that don't contain real code\n--exclude=Units\n--exclude=tinst-root\n--exclude=Tmain\n" }, { "path": ".dir-locals.el", "content": ";; Don't forget putting (add-hook 'hack-local-variables-hook (lambda () (editorconfig-apply))) to your .emacs.\n((c-mode . ((c-file-style . \"linux\"))))\n" }, { "path": ".editorconfig", "content": "root = true\n\n[*]\nend_of_line = lf\ninsert_final_newline = true\n\n[*.{c,h,sh}]\nindent_size = 4\nindent_style = tab\ntrim_trailing_whitespace = true\ntab_width = 4\n\n[misc/packcc/packcc.c]\nindent_size = 4\nindent_style = space\ntrim_trailing_whitespace = true\ntab_width = 4\n\n[*.{ctags,ps}]\nindent_size = 4\nindent_style = space\ntrim_trailing_whitespace = true\ntab_width = 4\n\n[{Makefile*,*.mak}]\nindent_size = 8\nindent_style = tab\ntrim_trailing_whitespace = true\ntab_width = 8\n\n[*.rst*]\nindent_size = 4\nindent_style = tab\ntrim_trailing_whitespace = true\ntab_width = 4\n\n[gnulib/*.{c,h}]\ntab_width = 8\n\n[misc/optlib2c]\ntrim_trailing_whitespace = true\n\n[win32/*.{bat,sln,vcxproj,vcxproj.filters}]\nend_of_line = crlf\n\n[win32/*.vcxproj*]\ninsert_final_newline = false\n" }, { "path": ".gdbinit", "content": "define pst\n call ps(st)\nend\n" }, { "path": ".gitattributes", "content": "*\ttext=auto\n\n/win32/*.bat\ttext eol=crlf\n/win32/*.sln\ttext eol=crlf\n/win32/*.vcxproj\ttext eol=crlf\n/win32/*.vcxproj.filters\ttext eol=crlf\n" }, { "path": ".github/ISSUE_TEMPLATE.md", "content": "(\nThank you for contacting us.\n\nIf you are reporting an issue with the parsing output, please fill\nthe following template. As your custom CTags configuration can\naffect results, please always use `--options=NONE` as the first\noption when running `ctags`.\n\nOtherwise, delete the template and write your issue from scratch.\nExamples may help developers understanding your issue better.\n\nUse GitHub web interface and markdown notation.\nUsing mail results broken text rendering that makes\nthe developers go crazy.\n)\n\n*****\n\nThe name of the parser:\n\n\nThe command line you used to run ctags:\n\n```\n$ ctags --options=NONE ...\n```\n\nThe content of input file:\n\n```C\n/* THIS IS AN EXAMPLE */\nint\nmain(void)\n{\n\t...\n```\n\nThe tags output you are not satisfied with:\n\n```\n!_THIS_IS_AN_EXAMPLE\nmainVoid\tfoo.c\t/^main(void)$/;\"\tkind:function\tline:2\tlanguage:C\ttyperef:typename:int\tsignature:(void)\troles:def\n...\n```\n\nThe tags output you expect:\n\n```\n!_THIS_IS_AN_EXAMPLE\nmain\tfoo.c\t/^main(void)$/;\"\tkind:function\tline:2\tlanguage:C\ttyperef:typename:int\tsignature:(void)\troles:def\n...\n```\n\nThe version of ctags:\n\n```\n$ ctags --version\nUniversal Ctags 0.0.0(EXAMPLE), Copyright (C) 2015 Universal Ctags Team\nUniversal Ctags is derived from Exuberant Ctags.\nExuberant Ctags 5.8, Copyright (C) 1996-2009 Darren Hiebert\n Compiled: May 11 1018, 23:16:36\n URL: https://ctags.io/\n Optional compiled features: +wildcards, +regex, +iconv, +option-directory, +xpath, +json, +interactive, +sandbox, +yaml\n```\n\nHow do you get ctags binary:\n\n(\nBuilding it locally, via GNU/Linux distribution, as BSD's package,\nwin32 binary taken from Universal-ctags/ctags-win32 project, macosx\nbinary taken from Universal-ctags/homebrew-universal-ctags project,\netc.\n)\n" }, { "path": ".github/dependabot.yml", "content": "# To get started with Dependabot version updates, you'll need to specify which\n# package ecosystems to update and where the package manifests are located.\n# Please see the documentation for all configuration options:\n# https://docs.github.com/github/administering-a-repository/configuration-options-for-dependency-updates\n\nversion: 2\nupdates:\n - package-ecosystem: \"github-actions\" # See documentation for possible values\n directory: \"/\" # Location of package manifests\n schedule:\n interval: \"weekly\"\n" }, { "path": ".github/workflows/building-with-nmake.yml", "content": "name: build with Vistual Studio / NMake\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n test:\n\n strategy:\n fail-fast: false\n matrix:\n version: [2022]\n arch: [x64, x86]\n\n runs-on: windows-${{ matrix.version }}\n\n defaults:\n run:\n shell: cmd /C {0}\n\n steps:\n - run: choco install -y file\n\n - uses: actions/checkout@v6\n\n - name: setup nmake\n run: |\n if \"${{ matrix.version }}\" == \"2019\" (\n set \"XX= (x86)\"\n ) else (\n set \"XX=\"\n )\n\n @echo on\n\n echo call \"C:\\Program Files%XX%\\Microsoft Visual Studio\\${{ matrix.version }}\\Enterprise\\VC\\Auxiliary\\Build\\vcvarsall.bat\" ${{ matrix.arch }} > nmake-setup.cmd\n type nmake-setup.cmd\n\n - name: build libiconv\n run: |\n @echo on\n\n git clone --depth=1 https://github.com/koron/libiconv libiconv-source\n cd libiconv-source\\msvc10\n\n call \"${{ github.workspace }}\\nmake-setup.cmd\"\n nmake NODEBUG=1 NOMSVCRT=1\n\n - name: install libiconv\n run: |\n @echo on\n\n mkdir libiconv-installed\\include\n mkdir libiconv-installed\\lib\n\n copy libiconv-source\\msvc10\\iconv.h libiconv-installed\\include\n copy libiconv-source\\msvc10\\iconv.lib libiconv-installed\\lib\n copy libiconv-source\\msvc10\\iconv.dll .\n\n - name: build ctags with nmake\n run: |\n @echo on\n call nmake-setup.cmd\n nmake -f mk_mvc.mak WITH_ICONV=yes ICONV_DIR=libiconv-installed PDB=yes\n\n - run: dir\n\n - name: dumpbin ctags.exe\n run: |\n @echo on\n call nmake-setup.cmd\n dumpbin /dependents ctags.exe\n\n - run: file ctags.exe\n - run: ctags.exe --version\n" }, { "path": ".github/workflows/building-with-pegof.yml", "content": "name: build ctags with pegof and run units target on Ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n\n strategy:\n matrix:\n os: [ubuntu-24.04]\n\n runs-on: ${{ matrix.os }}\n\n env:\n DEBIAN_FRONTEND: noninteractive\n\n steps:\n - run: sudo apt -y update\n - run: sudo apt -y install cmake g++ pkg-config automake libseccomp-dev libjansson-dev libyaml-dev libxml2-dev libpcre2-dev bash gdb python3-docutils\n # cmake and g++ are used to build pegof\n\n - uses: actions/checkout@v6\n\n - uses: actions/checkout@v6\n with:\n repository: dolik-rce/pegof\n submodules: recursive\n fetch-tags: true\n path: pegof\n\n - run: cmake -S pegof -B pegof/build.d\n - run: cmake --build pegof/build.d\n\n - run: pegof/build.d/pegof --version\n\n - run: ./autogen.sh\n - run: ./configure --enable-debugging --enable-iconv --with-pegof=$PWD/pegof/build.d/pegof\n\n - run: make -j2\n\n - run: ./ctags --list-features | grep pegof\n\n - run: |\n echo \"Targets: $(./ctags --list-languages=_packcc | while read LANG REST; do echo \"$LANG\"; done | tr '\\n' ',')\"\n - run: make units LANGUAGES=\"$(./ctags --list-languages=_packcc | while read LANG REST; do echo \"$LANG\"; done | tr '\\n' ',')\"\n - run: make dist\n # See EXTRA_DIST in Makefile.am.\n # Currently we add .pego files.\n" }, { "path": ".github/workflows/code-coverage-on-ubuntu.yml", "content": "name: upload coverage report to codecov.io\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n coverage:\n\n runs-on: ubuntu-22.04\n\n env:\n DEBIAN_FRONTEND: noninteractive\n\n CC: gcc\n\n steps:\n - uses: actions/checkout@v6\n with:\n fetch-depth: 0\n\n - run: sudo apt-get -y -o APT::Immediate-Configure=false update\n - run: sudo apt-get -y -o APT::Immediate-Configure=false install bash pkg-config automake gcc gdb lcov libseccomp-dev libjansson-dev libyaml-dev libxml2-dev libpcre2-dev\n\n - run: gcc --version\n - run: make --version\n\n - run: ./autogen.sh\n\n - run: mkdir -p build.d\n\n - run: cd build.d && ../configure --enable-debugging --enable-coverage-gcov\n - run: cd build.d && make -j2\n\n - run: cd build.d && ./ctags --list-features\n - run: cd build.d && ./ctags --help\n - run: cd build.d && ./ctags --version\n\n - run: cd build.d && make check\n - run: cd build.d && make roundtrip\n\n - run: cd build.d && lcov -c -b . -d . -o coverage.info\n\n - uses: codecov/codecov-action@v5\n with:\n files: build.d/coverage.info\n name: travis-ubuntu-latest\n token: ${{ secrets.CODECOV_TOKEN }}\n" }, { "path": ".github/workflows/cross-compile-for--netbsd-on-ubuntu.yml", "content": "name: cross compile for NetBSD on Ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n build:\n strategy:\n fail-fast: false\n matrix:\n netbsd-release-version: ['10.1', '10.0', '9.4', '9.3']\n # https://ftp.netbsd.org/pub/NetBSD/\n\n runs-on: ubuntu-latest\n\n env:\n CC: clang --target=amd64-unknown-netbsd --sysroot=${{ github.workspace }}/amd64-unknown-netbsd-sysroot\n CFLAGS: -I${{ github.workspace }}/amd64-unknown-netbsd-3rdroot/include -fPIC\n LDFLAGS: -L${{ github.workspace }}/amd64-unknown-netbsd-3rdroot/lib\n PKG_CONFIG_PATH: ${{ github.workspace }}/amd64-unknown-netbsd-3rdroot/lib/pkgconfig\n\n steps:\n - uses: actions/checkout@v6\n\n - run: sudo apt-get -y update\n - run: sudo apt-get -y install clang cmake make automake autoconf pkg-config curl file\n\n - run: install -d amd64-unknown-netbsd-sysroot\n - run: install -d amd64-unknown-netbsd-3rdroot\n\n - name: install amd64-unknown-netbsd-sysroot\n run: |\n for item in base comp\n do\n FILENAME=\"$item.tar.xz\"\n curl -LO \"https://ftp.netbsd.org/pub/NetBSD/NetBSD-${{ matrix.netbsd-release-version }}/amd64/binary/sets/$FILENAME\"\n tar vxf \"$FILENAME\" -C amd64-unknown-netbsd-sysroot\n done\n\n - name: build zlib\n run: |\n install -d src/zlib\n cd src/zlib\n curl -L -o src.tar.gz https://distfiles.macports.org/zlib/zlib-1.3.1.tar.xz\n tar vxf src.tar.gz --strip-components=1\n sed -i 's|/share/pkgconfig|/lib/pkgconfig|' CMakeLists.txt\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-netbsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF\n cmake --build build.d\n cmake --install build.d\n\n - name: build libiconv\n run: |\n install -d src/libiconv\n cd src/libiconv\n curl -L -o src.tar.gz https://distfiles.macports.org/libiconv/libiconv-1.17.tar.gz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-netbsd --prefix=${{ github.workspace }}/amd64-unknown-netbsd-3rdroot --enable-extra-encodings --enable-static --disable-shared\n make V=1\n make install\n\n - name: build libxml2\n run: |\n install -d src/libxml2\n cd src/libxml2\n curl -L -o src.tar.gz https://download.gnome.org/sources/libxml2/2.11/libxml2-2.11.6.tar.xz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-netbsd --prefix=${{ github.workspace }}/amd64-unknown-netbsd-3rdroot --with-zlib --without-lzma --without-python --without-readline --without-coverage --enable-ipv6 --enable-static --disable-shared LIBS=-liconv\n make V=1\n make install\n\n - name: build libyaml\n run: |\n install -d src/libyaml\n cd src/libyaml\n curl -L -o src.tar.gz https://github.com/yaml/libyaml/releases/download/0.2.5/yaml-0.2.5.tar.gz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-netbsd --prefix=${{ github.workspace }}/amd64-unknown-netbsd-3rdroot\n make V=1\n make install\n\n - name: build jansson\n run: |\n install -d src/jansson\n cd src/jansson\n curl -L -o src.tar.gz https://github.com/akheron/jansson/releases/download/v2.14/jansson-2.14.tar.gz\n tar vxf src.tar.gz --strip-components=1\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-netbsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF -DJANSSON_BUILD_SHARED_LIBS=OFF -DJANSSON_BUILD_DOCS=OFF -DJANSSON_COVERAGE=OFF -DJANSSON_EXAMPLES=OFF -DJANSSON_WITHOUT_TESTS=ON\n cmake --build build.d\n cmake --install build.d\n\n - name: build libpcre2\n run: |\n install -d src/libpcre2\n cd src/libpcre2\n curl -L -o src.tar.gz https://github.com/PCRE2Project/pcre2/releases/download/pcre2-10.42/pcre2-10.42.tar.bz2\n tar vxf src.tar.gz --strip-components=1\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-netbsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF -DJANSSON_BUILD_SHARED_LIBS=OFF -DCMAKE_C_STANDARD=99 -DCMAKE_C_STANDARD_REQUIRED=ON -DPCRE2_BUILD_PCRE2_8=ON -DPCRE2_BUILD_PCRE2_16=ON -DPCRE2_BUILD_PCRE2_32=ON -DPCRE2_BUILD_PCRE2GREP=OFF -DPCRE2_BUILD_TESTS=OFF -DPCRE2_SUPPORT_VALGRIND=OFF -DPCRE2_SUPPORT_UNICODE=ON\n cmake --build build.d\n cmake --install build.d\n\n - run: ./autogen.sh\n - run: |\n ./configure --host=amd64-unknown-netbsd --prefix=${{ github.workspace }}/uctags-netbsd-amd64 --enable-static || {\n cat config.log\n exit 1\n }\n - run: make V=1\n - run: make install\n\n - run: readelf -h ctags\n - run: readelf -d ctags\n - run: file ctags | grep NetBSD\n" }, { "path": ".github/workflows/cross-compile-for-android-on-macos.yml", "content": "name: cross compile for Android on macOS\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n cross-compile:\n strategy:\n fail-fast: false\n matrix:\n build-machine-os: [macos-15, macos-14, macos-26]\n\n runs-on: ${{ matrix.build-machine-os }}\n\n steps:\n - uses: actions/checkout@v6\n\n - run: brew install make automake autoconf file\n\n - run: ./autogen.sh\n\n - name: Run ./configure ...\n run: |\n TOOLCHAIN_BASE_DIR=$ANDROID_NDK_HOME/toolchains/llvm/prebuilt/darwin-x86_64\n TOOLCHAIN_BIN_DIR=$TOOLCHAIN_BASE_DIR/bin\n SYSROOT=$TOOLCHAIN_BASE_DIR/sysroot\n\n export CC=$TOOLCHAIN_BIN_DIR/armv7a-linux-androideabi24-clang\n export AR=$TOOLCHAIN_BIN_DIR/llvm-ar\n export RANLIB=$TOOLCHAIN_BIN_DIR/llvm-ranlib\n\n export CFLAGS=\"--sysroot $SYSROOT -Qunused-arguments -Os -fpic\"\n export CPPFLAGS=\"--sysroot $SYSROOT -Qunused-arguments\"\n export LDFLAGS=\"--sysroot $SYSROOT\"\n\n ./configure \\\n --host=armv7a-linux-androideabi \\\n --disable-iconv \\\n --disable-xml \\\n --disable-json \\\n --disable-yaml \\\n --disable-pcre2\n\n - run: make V=1\n\n - run: file ctags | grep 'ELF 32-bit LSB pie executable, ARM, EABI5'\n" }, { "path": ".github/workflows/cross-compile-for-android-on-ubuntu.yml", "content": "name: cross compile for Android on ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n cross-compile:\n strategy:\n fail-fast: false\n matrix:\n build-machine-os: [ubuntu-24.04, ubuntu-22.04]\n\n runs-on: ${{ matrix.build-machine-os }}\n\n steps:\n - uses: actions/checkout@v6\n\n - run: sudo apt-get -y -o APT::Immediate-Configure=false update\n - run: sudo apt-get -y -o APT::Immediate-Configure=false install gcc make automake autoconf file\n\n - run: ./autogen.sh\n\n - name: Run ./configure ...\n run: |\n TOOLCHAIN_BASE_DIR=$ANDROID_NDK_HOME/toolchains/llvm/prebuilt/linux-x86_64\n TOOLCHAIN_BIN_DIR=$TOOLCHAIN_BASE_DIR/bin\n SYSROOT=$TOOLCHAIN_BASE_DIR/sysroot\n\n export CC=$TOOLCHAIN_BIN_DIR/armv7a-linux-androideabi24-clang\n export AR=$TOOLCHAIN_BIN_DIR/llvm-ar\n export RANLIB=$TOOLCHAIN_BIN_DIR/llvm-ranlib\n\n export CFLAGS=\"--sysroot $SYSROOT -Qunused-arguments -Os -fpic\"\n export CPPFLAGS=\"--sysroot $SYSROOT -Qunused-arguments\"\n export LDFLAGS=\"--sysroot $SYSROOT\"\n\n set -ex\n\n ./configure \\\n --host=armv7a-linux-androideabi \\\n --disable-iconv \\\n --disable-xml \\\n --disable-json \\\n --disable-yaml \\\n --disable-pcre2\n\n - run: make V=1\n\n # pie executable or shared object\n - run: file ctags | grep 'ELF 32-bit LSB .*, ARM, EABI5'\n" }, { "path": ".github/workflows/cross-compile-for-freebsd-on-ubuntu.yml", "content": "name: cross compile for FreeBSD on Ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n build:\n strategy:\n fail-fast: false\n matrix:\n freebsd-release-version: ['14.2', '14.1', '14.0', '13.4', '13.3', '13.2', '13.1', '13.0']\n # https://archive.freebsd.org/old-releases/amd64/\n\n runs-on: ubuntu-latest\n\n env:\n CC: clang --target=amd64-unknown-freebsd --sysroot=${{ github.workspace }}/amd64-unknown-freebsd-sysroot\n CFLAGS: -I${{ github.workspace }}/amd64-unknown-freebsd-3rdroot/include -fPIC\n LDFLAGS: -L${{ github.workspace }}/amd64-unknown-freebsd-3rdroot/lib\n PKG_CONFIG_PATH: ${{ github.workspace }}/amd64-unknown-freebsd-3rdroot/lib/pkgconfig\n\n steps:\n - uses: actions/checkout@v6\n\n - run: sudo apt-get -y update\n - run: sudo apt-get -y install clang cmake make automake autoconf curl file\n\n - run: install -d amd64-unknown-freebsd-sysroot\n - run: install -d amd64-unknown-freebsd-3rdroot\n\n - run: curl -L -o amd64-unknown-freebsd-sysroot.txz https://archive.freebsd.org/old-releases/amd64/${{ matrix.freebsd-release-version }}-RELEASE/base.txz\n - run: tar vxf amd64-unknown-freebsd-sysroot.txz -C amd64-unknown-freebsd-sysroot\n\n - name: build zlib\n run: |\n install -d src/zlib\n cd src/zlib\n curl -L -o src.tar.gz https://distfiles.macports.org/zlib/zlib-1.3.1.tar.xz\n tar vxf src.tar.gz --strip-components=1\n sed -i 's|/share/pkgconfig|/lib/pkgconfig|' CMakeLists.txt\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-freebsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF\n cmake --build build.d\n cmake --install build.d\n\n - name: build libiconv\n run: |\n install -d src/libiconv\n cd src/libiconv\n curl -L -o src.tar.gz https://distfiles.macports.org/libiconv/libiconv-1.17.tar.gz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-freebsd --prefix=${{ github.workspace }}/amd64-unknown-freebsd-3rdroot --enable-extra-encodings --enable-static --disable-shared\n make V=1\n make install\n\n - name: build libxml2\n run: |\n install -d src/libxml2\n cd src/libxml2\n curl -L -o src.tar.gz https://download.gnome.org/sources/libxml2/2.11/libxml2-2.11.6.tar.xz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-freebsd --prefix=${{ github.workspace }}/amd64-unknown-freebsd-3rdroot --with-zlib --without-lzma --without-python --without-readline --without-coverage --enable-ipv6 --enable-static --disable-shared LIBS=-liconv\n make V=1\n make install\n\n - name: build libyaml\n run: |\n install -d src/libyaml\n cd src/libyaml\n curl -L -o src.tar.gz https://github.com/yaml/libyaml/releases/download/0.2.5/yaml-0.2.5.tar.gz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-freebsd --prefix=${{ github.workspace }}/amd64-unknown-freebsd-3rdroot\n make V=1\n make install\n\n - name: build jansson\n run: |\n install -d src/jansson\n cd src/jansson\n curl -L -o src.tar.gz https://github.com/akheron/jansson/releases/download/v2.14/jansson-2.14.tar.gz\n tar vxf src.tar.gz --strip-components=1\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-freebsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF -DJANSSON_BUILD_SHARED_LIBS=OFF -DJANSSON_BUILD_DOCS=OFF -DJANSSON_COVERAGE=OFF -DJANSSON_EXAMPLES=OFF -DJANSSON_WITHOUT_TESTS=ON\n cmake --build build.d\n cmake --install build.d\n\n - name: build libpcre2\n run: |\n install -d src/libpcre2\n cd src/libpcre2\n curl -L -o src.tar.gz https://github.com/PCRE2Project/pcre2/releases/download/pcre2-10.42/pcre2-10.42.tar.bz2\n tar vxf src.tar.gz --strip-components=1\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-freebsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF -DJANSSON_BUILD_SHARED_LIBS=OFF -DCMAKE_C_STANDARD=99 -DCMAKE_C_STANDARD_REQUIRED=ON -DPCRE2_BUILD_PCRE2_8=ON -DPCRE2_BUILD_PCRE2_16=ON -DPCRE2_BUILD_PCRE2_32=ON -DPCRE2_BUILD_PCRE2GREP=OFF -DPCRE2_BUILD_TESTS=OFF -DPCRE2_SUPPORT_VALGRIND=OFF -DPCRE2_SUPPORT_UNICODE=ON\n cmake --build build.d\n cmake --install build.d\n\n - run: ./autogen.sh\n - run: |\n ./configure --host=amd64-unknown-freebsd --prefix=${{ github.workspace }}/uctags-freebsd-amd64 --enable-static || {\n cat config.log\n exit 1\n }\n - run: make V=1\n - run: make install\n\n - run: readelf -h ctags\n - run: readelf -d ctags\n - run: file ctags | grep FreeBSD\n" }, { "path": ".github/workflows/cross-compile-for-openbsd-on-ubuntu.yml", "content": "name: cross compile for OpenBSD on Ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n build:\n strategy:\n fail-fast: false\n matrix:\n openbsd-release-version: ['7.8', '7.7']\n # https://cdn.openbsd.org/pub/OpenBSD/\n\n runs-on: ubuntu-latest\n\n env:\n CC: clang --target=amd64-unknown-openbsd --sysroot=${{ github.workspace }}/amd64-unknown-openbsd-sysroot\n CFLAGS: -I${{ github.workspace }}/amd64-unknown-openbsd-3rdroot/include -fPIC\n LDFLAGS: -L${{ github.workspace }}/amd64-unknown-openbsd-3rdroot/lib\n PKG_CONFIG_PATH: ${{ github.workspace }}/amd64-unknown-openbsd-3rdroot/lib/pkgconfig\n\n steps:\n - uses: actions/checkout@v6\n\n - run: sudo apt-get -y update\n - run: sudo apt-get -y install clang cmake make automake autoconf pkg-config curl file\n\n - run: install -d amd64-unknown-openbsd-sysroot\n - run: install -d amd64-unknown-openbsd-3rdroot\n\n - name: install amd64-unknown-openbsd-sysroot\n run: |\n major=\"$(printf '%s\\n' ${{ matrix.openbsd-release-version }} | cut -d. -f1)\"\n minor=\"$(printf '%s\\n' ${{ matrix.openbsd-release-version }} | cut -d. -f2)\"\n\n for item in base comp\n do\n FILENAME=\"$item$major$minor.tgz\"\n curl -LO \"https://cdn.openbsd.org/pub/OpenBSD/${{ matrix.openbsd-release-version }}/amd64/$FILENAME\"\n tar vxf \"$FILENAME\" -C amd64-unknown-openbsd-sysroot\n done\n\n - name: build zlib\n run: |\n install -d src/zlib\n cd src/zlib\n curl -L -o src.tar.gz https://distfiles.macports.org/zlib/zlib-1.3.1.tar.xz\n tar vxf src.tar.gz --strip-components=1\n sed -i 's|/share/pkgconfig|/lib/pkgconfig|' CMakeLists.txt\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-openbsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF\n cmake --build build.d\n cmake --install build.d\n\n - name: build libiconv\n run: |\n install -d src/libiconv\n cd src/libiconv\n curl -L -o src.tar.gz https://distfiles.macports.org/libiconv/libiconv-1.17.tar.gz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-openbsd --prefix=${{ github.workspace }}/amd64-unknown-openbsd-3rdroot --enable-extra-encodings --enable-static --disable-shared\n make V=1\n make install\n\n - name: build libxml2\n run: |\n install -d src/libxml2\n cd src/libxml2\n curl -L -o src.tar.gz https://download.gnome.org/sources/libxml2/2.11/libxml2-2.11.6.tar.xz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-openbsd --prefix=${{ github.workspace }}/amd64-unknown-openbsd-3rdroot --with-zlib --without-lzma --without-python --without-readline --without-coverage --enable-ipv6 --enable-static --disable-shared LIBS=-liconv\n make V=1\n make install\n cd ${{ github.workspace }}/amd64-unknown-openbsd-3rdroot/lib/pkgconfig\n sed -i '/^Requires: /d' libxml-2.0.pc\n printf 'Requires: zlib\\n' >> libxml-2.0.pc\n\n - name: build libyaml\n run: |\n install -d src/libyaml\n cd src/libyaml\n curl -L -o src.tar.gz https://github.com/yaml/libyaml/releases/download/0.2.5/yaml-0.2.5.tar.gz\n tar vxf src.tar.gz --strip-components=1\n ./configure --host=amd64-unknown-openbsd --prefix=${{ github.workspace }}/amd64-unknown-openbsd-3rdroot\n make V=1\n make install\n\n - name: build jansson\n run: |\n install -d src/jansson\n cd src/jansson\n curl -L -o src.tar.gz https://github.com/akheron/jansson/releases/download/v2.14/jansson-2.14.tar.gz\n tar vxf src.tar.gz --strip-components=1\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-openbsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF -DJANSSON_BUILD_SHARED_LIBS=OFF -DJANSSON_BUILD_DOCS=OFF -DJANSSON_COVERAGE=OFF -DJANSSON_EXAMPLES=OFF -DJANSSON_WITHOUT_TESTS=ON\n cmake --build build.d\n cmake --install build.d\n\n - name: build libpcre2\n run: |\n install -d src/libpcre2\n cd src/libpcre2\n curl -L -o src.tar.gz https://github.com/PCRE2Project/pcre2/releases/download/pcre2-10.42/pcre2-10.42.tar.bz2\n tar vxf src.tar.gz --strip-components=1\n cmake -S . -B build.d -DCMAKE_INSTALL_PREFIX=${{ github.workspace }}/amd64-unknown-openbsd-3rdroot -DCMAKE_VERBOSE_MAKEFILE=ON -DENABLE_TESTING=OFF -DJANSSON_BUILD_SHARED_LIBS=OFF -DCMAKE_C_STANDARD=99 -DCMAKE_C_STANDARD_REQUIRED=ON -DPCRE2_BUILD_PCRE2_8=ON -DPCRE2_BUILD_PCRE2_16=ON -DPCRE2_BUILD_PCRE2_32=ON -DPCRE2_BUILD_PCRE2GREP=OFF -DPCRE2_BUILD_TESTS=OFF -DPCRE2_SUPPORT_VALGRIND=OFF -DPCRE2_SUPPORT_UNICODE=ON\n cmake --build build.d\n cmake --install build.d\n\n - run: rm ${{ github.workspace }}/amd64-unknown-openbsd-3rdroot/lib/lib*.so\n\n - run: ./autogen.sh\n - run: |\n ./configure --host=amd64-unknown-openbsd --prefix=${{ github.workspace }}/uctags-openbsd-amd64 || {\n cat config.log\n exit 1\n }\n - run: cat config.log\n - run: make V=1\n - run: make install\n\n - run: readelf -h ctags\n - run: readelf -d ctags\n - run: file ctags | grep OpenBSD\n" }, { "path": ".github/workflows/cross-compile-for-windows-on-macos.yml", "content": "name: cross compile for Windows on macOS\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n cross-compile:\n strategy:\n fail-fast: false\n matrix:\n build-machine-os: [macos-15, macos-14, macos-26]\n target: [i686-w64-mingw32,x86_64-w64-mingw32]\n\n runs-on: ${{ matrix.build-machine-os }}\n\n steps:\n - uses: actions/checkout@v6\n\n - run: brew install mingw-w64 make automake autoconf file\n\n - run: ./autogen.sh\n\n - name: Run ./configure ...\n run: |\n ./configure \\\n --host=${{ matrix.target }} \\\n --disable-iconv \\\n --disable-xml \\\n --disable-json \\\n --disable-yaml \\\n --disable-pcre2 \\\n CC=${{ matrix.target }}-gcc \\\n CFLAGS='-v' \\\n AR=${{ matrix.target }}-ar \\\n RANLIB=${{ matrix.target }}-ranlib \\\n WINDRES=${{ matrix.target }}-windres\n\n - run: make V=1\n\n - run: file ctags.exe | grep PE32\n" }, { "path": ".github/workflows/cross-compile-for-windows-on-ubuntu.yml", "content": "name: cross compile for Windows on Ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n cross-compile:\n strategy:\n fail-fast: false\n matrix:\n build-machine-os: [ubuntu-22.04, ubuntu-24.04]\n target: [i686-w64-mingw32,x86_64-w64-mingw32]\n\n runs-on: ${{ matrix.build-machine-os }}\n\n steps:\n - uses: actions/checkout@v6\n\n - run: sudo apt-get -y -o APT::Immediate-Configure=false update\n - run: sudo apt-get -y -o APT::Immediate-Configure=false install mingw-w64 gcc make automake autoconf file\n\n - run: ./autogen.sh\n\n - name: Run ./configure ...\n run: |\n ./configure \\\n --host=${{ matrix.target }} \\\n --disable-iconv \\\n --disable-xml \\\n --disable-json \\\n --disable-yaml \\\n --disable-pcre2 \\\n CC=${{ matrix.target }}-gcc \\\n CFLAGS='-v' \\\n AR=${{ matrix.target }}-ar \\\n RANLIB=${{ matrix.target }}-ranlib \\\n WINDRES=${{ matrix.target }}-windres\n\n - run: make V=1\n\n - run: file ctags.exe | grep PE32\n" }, { "path": ".github/workflows/run-citre-tests.yml", "content": "# Citre (https://github.com/universal-ctags/citre) is a readtags frontend for\n# Emacs. This workflow runs unit tests of Citre to make sure changes in\n# readtags doesn't break the behavior that Citre expects.\n\n# Ref: https://github.com/universal-ctags/citre/issues/58#issuecomment-846229409\n\nname: run Citre tests on GNU/Linux\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n runs-on: ubuntu-latest\n\n env:\n CC: gcc\n READTAGS: '${{ github.workspace }}/readtags'\n\n steps:\n - uses: actions/checkout@v6\n - name: update package information\n run: sudo apt-get -y -o APT::Immediate-Configure=false update\n - name: install tools and libraries\n run: sudo apt-get -y -o APT::Immediate-Configure=false install pkg-config automake libjansson-dev libyaml-dev libseccomp-dev libxml2-dev\n - name: autogen.sh\n run: ./autogen.sh\n - name: report the version of cc\n run: $CC --version\n - name: report the version of make\n run: make --version\n - name: configure\n run: ./configure\n - name: make\n run: make\n - name: report features\n run: ./ctags --list-features\n - name: install Emacs\n run: sudo apt-get -y -o APT::Immediate-Configure=false install emacs\n - name: checkout Citre repo\n uses: actions/checkout@v6\n with:\n repository: 'universal-ctags/citre'\n path: 'citre'\n - name: run Citre unit tests for tags backend\n working-directory: 'citre'\n run: make test-tags\n" }, { "path": ".github/workflows/tagging.yml", "content": "name: Create a weekly tag\n\non:\n schedule:\n - cron: '0 0 * * 0'\n\njobs:\n tag:\n runs-on: ubuntu-latest\n\n steps:\n - uses: actions/checkout@v6\n with:\n fetch-depth: 0\n - run: misc/git-tag-maybe.sh\n" }, { "path": ".github/workflows/testing-bsds.yml.bak", "content": "name: run units target on FreeBSD OpenBSD NetBSD\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n freebsd:\n runs-on: macos-12\n\n strategy:\n fail-fast: false\n matrix:\n freebsd-version: [12,13]\n\n steps:\n - uses: actions/checkout@v3\n\n - uses: actions/cache@v2\n with:\n path: ~/.vagrant.d/boxes\n key: vagrant-generic-freebsd-${{ matrix.freebsd-version }}\n restore-keys: |\n vagrant-generic-freebsd-${{ matrix.freebsd-version }}\n\n # https://app.vagrantup.com/boxes/search?utf8=%E2%9C%93&sort=downloads&provider=&q=freebsd\n # https://github.com/leleliu008/github-actions-vagrant\n - uses: leleliu008/github-actions-vagrant@v2\n with:\n mem: 2048\n box: generic/freebsd${{ matrix.freebsd-version }}\n log: warn\n run: |\n run pkg install -y automake pkgconf gmake python3\n run freebsd-version\n run cc --version\n run ./autogen.sh\n run ./configure --prefix=/usr\n run gmake\n run gmake install\n run file ctags\n run ctags --version\n run gmake check CI=gha+vagrant+freebsd\n run gmake roundtrip CI=gha+vagrant+freebsd\n\n openbsd:\n needs: freebsd\n runs-on: macos-12\n\n steps:\n - uses: actions/checkout@v3\n\n - uses: actions/cache@v2\n with:\n path: ~/.vagrant.d/boxes\n key: vagrant-generic-openbsd-7\n restore-keys: |\n vagrant-generic-openbsd-7\n\n - uses: leleliu008/github-actions-vagrant@v2\n with:\n mem: 2048\n box: generic/openbsd7\n log: warn\n run: |\n export AUTOCONF_VERSION=2.69\n export AUTOMAKE_VERSION=1.16\n \n export CFLAGS='-I/usr/local/include -L/usr/local/lib'\n \n if [ ! -f /usr/local/lib/libiconv.so ] ; then\n sudo ln -s /usr/local/lib/libiconv.so.* /usr/local/lib/libiconv.so\n fi\n \n run sudo pkg_add automake-1.16.3 gmake\n\n run cc --version\n \n run ./autogen.sh\n run ./configure --prefix=/usr\n run gmake\n run sudo gmake install\n run file /usr/bin/ctags\n run ctags --version\n # bugs to fix\n #run make check CI=gha+vagrant+openbsd\n run gmake roundtrip CI=gha+vagrant+openbsd\n\n netbsd:\n needs: openbsd\n runs-on: macos-12\n\n steps:\n - uses: actions/checkout@v3\n\n - uses: actions/cache@v2\n with:\n path: ~/.vagrant.d/boxes\n key: vagrant-generic-netbsd-9\n restore-keys: |\n vagrant-generic-netbsd-9\n\n - uses: leleliu008/github-actions-vagrant@v2\n with:\n mem: 2048\n box: generic/netbsd9\n log: warn\n run: |\n run sudo pkgin -y install mozilla-rootcerts automake autoconf pkg-config gmake\n\n run cc --version\n\n run ./autogen.sh\n run ./configure --prefix=/usr\n run gmake\n run sudo gmake install\n run file /usr/bin/ctags\n run ctags --version\n # bugs to fix\n #run make check CI=gha+vagrant+netbsd\n run gmake roundtrip CI=gha+vagrant+netbsd\n" }, { "path": ".github/workflows/testing-on-alpine.yml", "content": "name: run units target on AlpineLinux\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n strategy:\n fail-fast: false\n matrix:\n tag: ['3.23', '3.22', '3.21', '3.20', '3.19', '3.18', '3.17', '3.16']\n\n runs-on: ubuntu-latest\n\n container: alpine:${{ matrix.tag }}\n\n steps:\n - run: apk add libc-dev gcc make automake autoconf pkgconf python3 file diffutils git pcre2-dev jansson-dev yaml-dev libxml2-dev\n\n # this is to fix https://github.com/actions/checkout/issues/760\n - run: git config --global --add safe.directory /__w/ctags/ctags\n\n - uses: actions/checkout@v6\n\n - run: cc --version\n\n - run: ./autogen.sh\n - run: ./configure --prefix=/usr\n - run: make\n - run: make install\n - run: file /usr/bin/ctags\n - run: ctags --version\n - run: make check V=1\n - run: make roundtrip\n\n\n chroot_qemu:\n\n runs-on: ubuntu-latest\n\n strategy:\n fail-fast: false\n matrix:\n target-arch: [loongarch64, aarch64, ppc64le, riscv64, s390x]\n\n timeout-minutes: 45\n\n steps:\n - uses: actions/checkout@v6\n\n - run: |\n cat > run.sh <\\033[0m \\033[0;32m%b\\n\\033[0m\" \"\\$*\"\n eval \"\\$@\"\n }\n\n run apk add libc-dev gcc make automake autoconf pkgconf python3 diffutils pcre2-dev jansson-dev yaml-dev libxml2-dev\n\n run ./autogen.sh\n run ./configure --enable-debugging\n run make\n\n run readelf -h ctags\n run readelf -d ctags\n\n run ./ctags --version\n\n run make check V=1\n run make roundtrip\n run make tmain CI=1 CTAGS_DEP= READTAGS_DEP= OPTSCRIPT_DEP=\n run make units CI=1 CTAGS_DEP=\n EOF\n\n - run: curl -LO https://raw.githubusercontent.com/alpinelinux/alpine-chroot-install/master/alpine-chroot-install\n - run: chmod +x alpine-chroot-install\n - run: sudo ./alpine-chroot-install -d /alpine -a ${{ matrix.target-arch }}\n - run: /alpine/enter-chroot sh run.sh\n" }, { "path": ".github/workflows/testing-on-cygwin.yml", "content": "name: run units target on Cygwin\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing: \n runs-on: windows-latest\n\n defaults:\n run:\n shell: C:\\tools\\cygwin\\bin\\bash.exe -l -i {0}\n\n steps:\n # https://www.cygwin.com/faq/faq.html#faq.setup.cli\n - run: Invoke-WebRequest -OutFile setup-x86_64.exe \"http://cygwin.com/setup-x86_64.exe\"\n shell: pwsh\n\n - run: .\\setup-x86_64.exe --quiet-mode --no-desktop --no-shortcuts --no-startmenu --only-site --site http://mirrors.kernel.org/sourceware/cygwin/ --root C:\\tools\\cygwin --local-package-dir C:\\tools\\cygwin\\packages --packages gcc-g++,make,automake,autoconf,pkg-config,dos2unix,libiconv-devel,libjansson-devel,libxml2-devel,libyaml-devel | Out-Default\n shell: pwsh\n\n - run: git config --global core.autocrlf input\n shell: bash\n\n - uses: actions/checkout@v6\n \n - run: printf 'cd %s' \"$(cygpath '${{ github.workspace }}')\" >> ~/.bashrc\n\n - run: ./autogen.sh\n - run: ./configure --prefix=/usr\n - run: make V=1\n - run: make install\n - run: file /usr/bin/ctags\n - run: /usr/bin/ctags --version\n - run: make check V=1\n - run: make roundtrip\n" }, { "path": ".github/workflows/testing-on-freebsd.yml", "content": "name: run units target on FreeBSD\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n runs-on: ubuntu-latest\n\n strategy:\n fail-fast: false\n matrix:\n freebsd-version: ['15.0', '14.3', '14.2', '14.1', '14.0', '13.5', '13.4', '13.3', '13.2']\n\n steps:\n - uses: actions/checkout@v6\n\n - uses: cross-platform-actions/action@master\n with:\n operating_system: freebsd\n version: ${{ matrix.freebsd-version }}\n shell: bash\n run: |\n run() {\n printf \"\\033[0;35m==>\\033[0m \\033[0;32m%b\\n\\033[0m\" \"$*\"\n eval \"$@\"\n }\n\n run sudo pkg install -y automake gmake pkgconf jansson libyaml libxml2 libiconv python3\n\n run freebsd-version\n run cc --version\n\n run ./autogen.sh\n run ./configure --prefix=/usr\n run gmake\n run sudo gmake install\n\n run readelf -h ctags\n run readelf -d ctags\n\n run ctags --version\n\n run gmake check CI=gha+vagrant+freebsd\n run gmake roundtrip CI=gha+vagrant+freebsd\n" }, { "path": ".github/workflows/testing-on-macos.yml", "content": "name: run units target on macOS\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n\n strategy:\n matrix:\n os: [macos-15, macos-14, macos-26]\n\n runs-on: ${{ matrix.os }}\n\n steps:\n - uses: actions/checkout@v6\n\n # temporarily disabled, because it always fails these days.\n #- run: brew update\n\n # NOTE: DO NOT try to install libiconv and libxml2 package via brew, because macOS already provides them.\n # NOTE: DO NOT try to install python3 package via brew, it has already been included in macos-xx runner images\n # https://github.com/actions/runner-images/blob/main/images/macos/macos-26-arm64-Readme.md\n\n - if: matrix.os == 'macos-26'\n run: brew install --overwrite python@3.12\n\n - run: brew install automake jansson libyaml pcre2\n\n - run: pip3 install docutils --break-system-packages\n\n - run: cc --version\n - run: make --version\n\n - run: ./autogen.sh\n - run: ./configure --enable-debugging --enable-iconv\n - run: make -j2\n\n - run: ./ctags --version\n - run: ./ctags --list-features\n\n - run: make check\n - run: make roundtrip\n - run: make tmain\n - run: make units\n" }, { "path": ".github/workflows/testing-on-msys2.yml", "content": "name: run units target on MSYS2\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n runs-on: windows-latest\n\n strategy:\n fail-fast: false\n matrix:\n msystem: [MINGW32, MINGW64, CLANG64]\n\n defaults:\n run:\n shell: msys2 {0}\n\n steps:\n - uses: msys2/setup-msys2@v2\n with:\n msystem: ${{ matrix.msystem }}\n update: true\n install: automake autoconf make dos2unix pkg-config\n pacboy: toolchain:p python-sphinx:p jansson:p libxml2:p libyaml:p pcre2:p\n\n - run: git config --global core.autocrlf input\n shell: bash\n\n - uses: actions/checkout@v6\n\n - run: ./autogen.sh\n - run: ./configure --prefix=/usr\n - run: make V=1\n - run: make install\n - run: file /usr/bin/ctags\n - run: ctags --version\n\n - run: make check V=1\n\n # FAILED: \"./readtags.exe\" -t \"/d/a/ctags2/ctags2/Units/parser-asciidoc.r/utf8-asciidoc.d/expected.tags\" - \"@Ѐ–𐀀\"\n # The raw tag name was \"@Ѐ–𐀀\"\n #- run: make roundtrip\n\n - run: make tmain\n - run: make units\n" }, { "path": ".github/workflows/testing-on-netbsd.yml", "content": "name: run units target on NetBSD\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n runs-on: ubuntu-latest\n\n strategy:\n fail-fast: false\n matrix:\n netbsd-version: ['10.1', '10.0', '9.4', '9.3', '9.2']\n\n steps:\n - uses: actions/checkout@v6\n\n - uses: cross-platform-actions/action@v0.32.0\n with:\n operating_system: netbsd\n version: ${{ matrix.netbsd-version }}\n shell: bash\n run: |\n run() {\n printf \"\\033[0;35m==>\\033[0m \\033[0;32m%b\\n\\033[0m\" \"$*\"\n eval \"$@\"\n }\n\n # DO NOT try to install libxml2, because it has already been pre-installed\n run sudo pkgin -y install automake autoconf gmake pkg-config jansson libyaml libiconv\n\n run cc --version\n\n run ./autogen.sh\n run ./configure --prefix=/usr\n run gmake\n run sudo gmake install\n\n run readelf -h /usr/bin/ctags\n run readelf -d /usr/bin/ctags\n\n run ctags --version\n\n # bugs to fix\n #run make check CI=gha+vagrant+netbsd\n run gmake roundtrip CI=gha+vagrant+netbsd\n" }, { "path": ".github/workflows/testing-on-openbsd.yml", "content": "name: run units target on OpenBSD\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n runs-on: ubuntu-latest\n\n strategy:\n fail-fast: false\n matrix:\n openbsd-version: ['7.8', '7.7', '7.6', '7.5', '7.4', '7.3', '7.2']\n\n steps:\n - uses: actions/checkout@v6\n\n - uses: cross-platform-actions/action@master\n with:\n operating_system: openbsd\n version: ${{ matrix.openbsd-version }}\n shell: bash\n run: |\n run() {\n printf \"\\033[0;35m==>\\033[0m \\033[0;32m%b\\n\\033[0m\" \"$*\"\n eval \"$@\"\n }\n\n export AUTOCONF_VERSION=2.69\n export AUTOMAKE_VERSION=1.16\n\n export CFLAGS='-I/usr/local/include'\n export LDFLAGS='-L/usr/local/lib'\n\n run sudo pkg_add autoconf%2.69 automake%1.16 gmake pkgconf jansson libyaml libxml libiconv\n\n run cc --version\n\n run ./autogen.sh\n run ./configure --prefix=/usr\n run gmake\n run sudo gmake install\n\n run readelf -h /usr/bin/ctags\n run readelf -d /usr/bin/ctags\n\n run ctags --version\n\n # bugs to fix\n #run make check CI=gha+vagrant+openbsd\n run gmake roundtrip CI=gha+vagrant+openbsd\n" }, { "path": ".github/workflows/testing-on-ubi.yml", "content": "name: run units target on UBI\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n strategy:\n fail-fast: false\n matrix:\n tag: ['8' ]\n\n runs-on: ubuntu-latest\n\n container: registry.access.redhat.com/ubi${{ matrix.tag }}:latest\n\n steps:\n - run: dnf install -y --enablerepo=ubi-${{ matrix.tag }}-appstream-rpms --enablerepo=ubi-${{ matrix.tag }}-baseos-rpms --enablerepo=ubi-${{ matrix.tag }}-codeready-builder-rpms git python3 gcc automake autoconf pkgconfig make libxml2-devel libyaml-devel pcre2-devel findutils diffutils sudo file\n\n # this is to fix https://github.com/actions/checkout/issues/760\n - run: git config --global --add safe.directory /__w/ctags/ctags\n\n - uses: actions/checkout@v6\n\n - run: cc --version\n\n - run: ./autogen.sh\n - run: ./configure --prefix=/usr\n - run: make\n - run: make install\n - run: file /usr/bin/ctags\n - run: ctags --version\n - run: make check V=1\n - run: make roundtrip\n" }, { "path": ".github/workflows/testing-on-ubuntu.yml", "content": "name: run units target on Ubuntu\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n\n strategy:\n matrix:\n os: [ubuntu-24.04, ubuntu-22.04]\n compiler: [gcc, clang]\n\n runs-on: ${{ matrix.os }}\n\n env:\n DEBIAN_FRONTEND: noninteractive\n\n CC: ${{ matrix.compiler }}\n\n steps:\n - uses: actions/checkout@v6\n with:\n fetch-depth: 0\n\n - run: sudo apt-get -y -o APT::Immediate-Configure=false update\n - run: sudo apt-get -y -o APT::Immediate-Configure=false install pkg-config automake ${{ matrix.compiler }} gdb bash python3-docutils libseccomp-dev libjansson-dev libyaml-dev libxml2-dev libpcre2-dev\n\n # valgrind doesn't work well with an executable built with clang 14.\n # https://forum.manjaro.org/t/valgrind-fails-possibly-corrupted-debuginfo-file/118156\n - if: matrix.compiler == 'clang' && matrix.os == 'ubuntu-22.04'\n run: |\n type clang > /dev/null && clang --version | head -1 | grep -q 14 \\\n || sudo apt-get -y -o APT::Immediate-Configure=false install valgrind\n\n - run: ${{ matrix.compiler }} --version\n - run: make --version\n\n - run: ./autogen.sh\n\n - run: mkdir -p build.d\n\n - run: cd build.d && ../configure --enable-debugging --enable-iconv\n\n - run: make -C build.d -j2\n\n - run: cd build.d && ./ctags --list-features\n - run: cd build.d && ./ctags --help\n - run: cd build.d && ./ctags --version\n\n - run: make -C build.d check\n - run: make -C build.d roundtrip\n - run: make -C build.d dist\n\n #############################################################################\n\n - run: mkdir -p dist-src\n\n - run: tar xf build.d/universal-ctags*tar.gz -C dist-src --strip-components=1\n\n - run: mkdir -p build2.d\n\n - run: cd build2.d && ../dist-src/configure --enable-debugging\n\n - run: cd build2.d && make -j2\n\n - run: cd build2.d && ./ctags --list-features\n - run: cd build2.d && ./ctags --help\n - run: cd build2.d && ./ctags --version\n\n # Our sandbox doesn't work with gcov.\n # Following cases target ctags without gcov.\n - run: cd build2.d && make tmain UNITS=sandbox,sandbox-crash,sandbox-default-req,sandbox-unknown-submode\n - run: cd build2.d && make clean\n" }, { "path": ".github/workflows/testing-with-valgrind.yml", "content": "name: run units target under VALGRIND\n\non:\n push:\n branches: [ master ]\n pull_request:\n branches: [ master ]\n\njobs:\n testing:\n\n runs-on: ubuntu-latest\n\n steps:\n - uses: actions/checkout@v6\n\n - run: sudo apt-get update\n - run: sudo apt-get install valgrind pkg-config automake bash libjansson-dev libyaml-dev libseccomp-dev libxml2-dev libpcre2-dev gdb\n\n - run: cc --version\n\n - run: ./autogen.sh\n - run: ./configure --enable-debugging\n - run: make CFLAGS='-g -O0'\n - run: make units VG=1\n" }, { "path": ".gitignore", "content": "*-actual.txt\n*-diff.txt\n*.func-sort-c.html\n*.func.html\n*.gcda\n*.gcno\n*.gcov\n*.gcov.html\n*.o\n*.obj\n*.od\n*.pdf\n*.pyc\n*.swp\n*.c3workspace\n*.c3workspace.user\n*.tar.gz\n*.TMP\n*.tmp\n*~\n/Makefile\n/packcc\n/packcc.exe\n/packcc.dSYM\n.cache\n.deps\n.dirstamp\n.DS_Store\na.out\naclocal.m4\nautom4te.cache\nbadinput\ncommit-stamp\ncompile\ncompile_commands.json\nconfig.cache\nconfig.guess\nconfig.h\nconfig.h.in\nconfig.log\nconfig.status\nconfig.sub\nconfigure\ncore.*\nctags\nctags-universal*\nctags.exe\nctags.ref\nctags.ref.exe\ndctags\ndctags.exe\ndepcomp\ngdb-backtrace.txt\nGNUmakefile.in\ninstall-sh\nlast-aclocal.m4\nlibctags.a\nlibutil.a\nMakefile.in\nmini-geany\nmini-geany.exe\nmissing\nmkinstalldirs\noptscript\nperf.data*\nreadtags\nreadtags.exe\nrepoinfo.h\nrespmvc\nstamp-h1\nSTDERR.*\nsyntax.vim\ntags\ntags.ref\ntags.test\ntest.*.diff\ntg\ntinst-root\nutiltest\nwin32/*.aps\nwin32/*.opensdf\nwin32/*.sdf\nwin32/*.suo\nwin32/*.user\nwin32/[Dd]ebug/\nwin32/[Rr]elease/\n_build\nman/ctags.1\nman/ctags.1.html\nman/ctags.1.rst\nman/ctags-*.5\nman/ctags-*.5.rst\nman/ctags-*.5.html\nman/ctags-*.7\nman/ctags-*.7.rst\nman/ctags-*.7.html\nman/GNUmakefile\nman/readtags.1\nman/readtags.1.rst\nman/readtags.1.html\nman/tags.5\nman/tags.5.rst\nman/tags.5.html\nman/*.[157].in\nManTest\nmisc/mini-geany.actual\nTmain/**/Makefile\nTmain/**/Makefile.am\nTmain/**/Makefile.in\nUnits/**/Makefile\nUnits/**/Makefile.am\nUnits/**/Makefile.in\nTmain/dist.m4\nUnits/dist.m4\nVALGRIND.tmp.core.*\ngnulib/Makefile\ngnulib/alloca.h\ngnulib/ctype.h\ngnulib/inttypes.h\ngnulib/langinfo.h\ngnulib/libgnu.a\ngnulib/limits.h\ngnulib/locale.h\ngnulib/malloc/dynarray-skeleton.gl.h\ngnulib/malloc/dynarray.gl.h\ngnulib/stdlib.h\ngnulib/string.h\ngnulib/unistd.h\ngnulib/wchar.h\ngnulib/wctype.h\ngnulib/sys/types.h\n" }, { "path": ".indent.pro", "content": "--blank-before-sizeof\n--blank-lines-after-procedures\n--brace-indent0\n--braces-after-if-line\n--braces-on-struct-decl-line\n--break-after-boolean-operator\n--case-brace-indentation0\n--case-indentation0\n--comment-indentation0\n--continuation-indentation4\n--cuddle-do-while\n--declaration-comment-column0\n--declaration-indentation0\n--dont-break-function-decl-args\n--dont-break-procedure-type\n--dont-line-up-parentheses\n--honour-newlines\n--indent-level4\n--line-length80\n--paren-indentation4\n--preprocessor-indentation1\n--no-blank-lines-after-commas\n--space-after-cast\n--space-after-for\n--space-after-if\n--space-after-procedure-calls\n--space-after-while\n--space-special-semicolon\n--start-left-side-of-comments\n--struct-brace-indentation4\n--tab-size4\n" }, { "path": ".readthedocs.yaml", "content": "# .readthedocs.yaml\n# Read the Docs configuration file\n# See https://docs.readthedocs.io/en/stable/config-file/v2.html for details\n\n# Required\nversion: 2\n\n# Set the version of Python and other tools you might need\nbuild:\n os: ubuntu-22.04\n tools:\n python: \"3.11\"\n\n# Build documentation in the docs/ directory with Sphinx\nsphinx:\n configuration: docs/conf.py\n\n# We recommend specifying your dependencies to enable reproducible builds:\n# https://docs.readthedocs.io/en/stable/guides/reproducible-builds.html\n# python:\n# install:\n# - requirements: docs/requirements.txt\n" }, { "path": ".uncrustify.cfg", "content": "tok_split_gte=false\nutf8_byte=false\nutf8_force=false\nindent_cmt_with_tabs=false\nindent_align_string=false\nindent_braces=false\nindent_braces_no_func=false\nindent_braces_no_class=false\nindent_braces_no_struct=false\nindent_brace_parent=false\nindent_namespace=false\nindent_extern=false\nindent_class=false\nindent_class_colon=false\nindent_else_if=false\nindent_var_def_cont=false\nindent_func_call_param=false\nindent_func_def_param=false\nindent_func_proto_param=false\nindent_func_class_param=false\nindent_func_ctor_var_param=false\nindent_template_param=false\nindent_func_param_double=false\nindent_relative_single_line_comments=false\nindent_col1_comment=false\nindent_access_spec_body=false\nindent_paren_nl=false\nindent_comma_paren=false\nindent_bool_paren=false\nindent_first_bool_expr=false\nindent_square_nl=false\nindent_preserve_sql=false\nindent_align_assign=true\nsp_balance_nested_parens=false\nalign_keep_tabs=false\nalign_with_tabs=false\nalign_on_tabstop=false\nalign_number_left=false\nalign_func_params=false\nalign_same_func_call_params=false\nalign_var_def_colon=false\nalign_var_def_attribute=false\nalign_var_def_inline=false\nalign_right_cmt_mix=false\nalign_on_operator=false\nalign_mix_var_proto=false\nalign_single_line_func=false\nalign_single_line_brace=false\nalign_nl_cont=false\nalign_left_shift=true\nalign_oc_decl_colon=false\nnl_collapse_empty_body=false\nnl_assign_leave_one_liners=false\nnl_class_leave_one_liners=false\nnl_enum_leave_one_liners=false\nnl_getset_leave_one_liners=false\nnl_func_leave_one_liners=false\nnl_if_leave_one_liners=false\nnl_multi_line_cond=false\nnl_multi_line_define=false\nnl_before_case=false\nnl_after_case=false\nnl_after_return=false\nnl_after_semicolon=false\nnl_after_brace_open=false\nnl_after_brace_open_cmt=false\nnl_after_vbrace_open=false\nnl_after_vbrace_open_empty=false\nnl_after_brace_close=false\nnl_after_vbrace_close=false\nnl_define_macro=false\nnl_squeeze_ifdef=false\nnl_ds_struct_enum_cmt=false\nnl_ds_struct_enum_close_brace=false\nnl_create_if_one_liner=false\nnl_create_for_one_liner=false\nnl_create_while_one_liner=false\nls_for_split_full=false\nls_func_split_full=false\nnl_after_multiline_comment=false\neat_blanks_after_open_brace=false\neat_blanks_before_close_brace=false\nmod_full_brace_if_chain=false\nmod_pawn_semicolon=false\nmod_full_paren_if_bool=false\nmod_remove_extra_semicolon=false\nmod_sort_import=false\nmod_sort_using=false\nmod_sort_include=false\nmod_move_case_break=false\nmod_remove_empty_return=false\ncmt_indent_multi=true\ncmt_c_group=false\ncmt_c_nl_start=false\ncmt_c_nl_end=false\ncmt_cpp_group=false\ncmt_cpp_nl_start=false\ncmt_cpp_nl_end=false\ncmt_cpp_to_c=false\ncmt_star_cont=false\ncmt_multi_check_last=true\ncmt_insert_before_preproc=false\npp_indent_at_level=false\npp_region_indent_code=false\npp_if_indent_code=false\npp_define_at_level=false\ninput_tab_size=4\noutput_tab_size=4\nindent_columns=4\nindent_brace=0\nindent_switch_case=4\nnl_after_func_body=2\nnl_after_func_body_one_liner=2\nindent_with_tabs=1\nsp_arith=add\nsp_assign=add\nsp_assign_default=add\nsp_enum_assign=add\nsp_bool=add\nsp_compare=add\nsp_inside_paren=remove\nsp_paren_paren=remove\nsp_before_ptr_star=force\nsp_between_ptr_star=remove\nsp_after_ptr_star=remove\nsp_after_ptr_star_func=remove\nsp_before_sparen=force\nsp_before_semi_for_empty=force\nsp_before_square=add\nsp_before_squares=add\nsp_after_cast=force\nsp_sizeof_paren=force\nsp_func_call_paren=force\nsp_return_paren=force\nsp_not=force\nnl_start_of_file=remove\nnl_end_of_file=remove\nnl_enum_brace=remove\nnl_struct_brace=remove\nnl_union_brace=remove\nnl_if_brace=add\nnl_brace_else=add\nnl_elseif_brace=add\nnl_else_brace=add\nnl_else_if=remove\nnl_for_brace=add\nnl_while_brace=add\nnl_do_brace=add\nnl_brace_while=remove\nnl_switch_brace=add\nnl_fdef_brace=force\n" }, { "path": "COPYING", "content": "\t\t GNU GENERAL PUBLIC LICENSE\n\t\t Version 2, June 1991\n\n Copyright (C) 1989, 1991 Free Software Foundation, Inc.\n 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA\n Everyone is permitted to copy and distribute verbatim copies\n of this license document, but changing it is not allowed.\n\n\t\t\t Preamble\n\n The licenses for most software are designed to take away your\nfreedom to share and change it. By contrast, the GNU General Public\nLicense is intended to guarantee your freedom to share and change free\nsoftware--to make sure the software is free for all its users. This\nGeneral Public License applies to most of the Free Software\nFoundation's software and to any other program whose authors commit to\nusing it. (Some other Free Software Foundation software is covered by\nthe GNU Library General Public License instead.) You can apply it to\nyour programs, too.\n\n When we speak of free software, we are referring to freedom, not\nprice. Our General Public Licenses are designed to make sure that you\nhave the freedom to distribute copies of free software (and charge for\nthis service if you wish), that you receive source code or can get it\nif you want it, that you can change the software or use pieces of it\nin new free programs; and that you know you can do these things.\n\n To protect your rights, we need to make restrictions that forbid\nanyone to deny you these rights or to ask you to surrender the rights.\nThese restrictions translate to certain responsibilities for you if you\ndistribute copies of the software, or if you modify it.\n\n For example, if you distribute copies of such a program, whether\ngratis or for a fee, you must give the recipients all the rights that\nyou have. You must make sure that they, too, receive or can get the\nsource code. And you must show them these terms so they know their\nrights.\n\n We protect your rights with two steps: (1) copyright the software, and\n(2) offer you this license which gives you legal permission to copy,\ndistribute and/or modify the software.\n\n Also, for each author's protection and ours, we want to make certain\nthat everyone understands that there is no warranty for this free\nsoftware. If the software is modified by someone else and passed on, we\nwant its recipients to know that what they have is not the original, so\nthat any problems introduced by others will not reflect on the original\nauthors' reputations.\n\n Finally, any free program is threatened constantly by software\npatents. We wish to avoid the danger that redistributors of a free\nprogram will individually obtain patent licenses, in effect making the\nprogram proprietary. To prevent this, we have made it clear that any\npatent must be licensed for everyone's free use or not licensed at all.\n\n The precise terms and conditions for copying, distribution and\nmodification follow.\n\f\n\t\t GNU GENERAL PUBLIC LICENSE\n TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION\n\n 0. This License applies to any program or other work which contains\na notice placed by the copyright holder saying it may be distributed\nunder the terms of this General Public License. The \"Program\", below,\nrefers to any such program or work, and a \"work based on the Program\"\nmeans either the Program or any derivative work under copyright law:\nthat is to say, a work containing the Program or a portion of it,\neither verbatim or with modifications and/or translated into another\nlanguage. (Hereinafter, translation is included without limitation in\nthe term \"modification\".) Each licensee is addressed as \"you\".\n\nActivities other than copying, distribution and modification are not\ncovered by this License; they are outside its scope. The act of\nrunning the Program is not restricted, and the output from the Program\nis covered only if its contents constitute a work based on the\nProgram (independent of having been made by running the Program).\nWhether that is true depends on what the Program does.\n\n 1. You may copy and distribute verbatim copies of the Program's\nsource code as you receive it, in any medium, provided that you\nconspicuously and appropriately publish on each copy an appropriate\ncopyright notice and disclaimer of warranty; keep intact all the\nnotices that refer to this License and to the absence of any warranty;\nand give any other recipients of the Program a copy of this License\nalong with the Program.\n\nYou may charge a fee for the physical act of transferring a copy, and\nyou may at your option offer warranty protection in exchange for a fee.\n\n 2. You may modify your copy or copies of the Program or any portion\nof it, thus forming a work based on the Program, and copy and\ndistribute such modifications or work under the terms of Section 1\nabove, provided that you also meet all of these conditions:\n\n a) You must cause the modified files to carry prominent notices\n stating that you changed the files and the date of any change.\n\n b) You must cause any work that you distribute or publish, that in\n whole or in part contains or is derived from the Program or any\n part thereof, to be licensed as a whole at no charge to all third\n parties under the terms of this License.\n\n c) If the modified program normally reads commands interactively\n when run, you must cause it, when started running for such\n interactive use in the most ordinary way, to print or display an\n announcement including an appropriate copyright notice and a\n notice that there is no warranty (or else, saying that you provide\n a warranty) and that users may redistribute the program under\n these conditions, and telling the user how to view a copy of this\n License. (Exception: if the Program itself is interactive but\n does not normally print such an announcement, your work based on\n the Program is not required to print an announcement.)\n\f\nThese requirements apply to the modified work as a whole. If\nidentifiable sections of that work are not derived from the Program,\nand can be reasonably considered independent and separate works in\nthemselves, then this License, and its terms, do not apply to those\nsections when you distribute them as separate works. But when you\ndistribute the same sections as part of a whole which is a work based\non the Program, the distribution of the whole must be on the terms of\nthis License, whose permissions for other licensees extend to the\nentire whole, and thus to each and every part regardless of who wrote it.\n\nThus, it is not the intent of this section to claim rights or contest\nyour rights to work written entirely by you; rather, the intent is to\nexercise the right to control the distribution of derivative or\ncollective works based on the Program.\n\nIn addition, mere aggregation of another work not based on the Program\nwith the Program (or with a work based on the Program) on a volume of\na storage or distribution medium does not bring the other work under\nthe scope of this License.\n\n 3. You may copy and distribute the Program (or a work based on it,\nunder Section 2) in object code or executable form under the terms of\nSections 1 and 2 above provided that you also do one of the following:\n\n a) Accompany it with the complete corresponding machine-readable\n source code, which must be distributed under the terms of Sections\n 1 and 2 above on a medium customarily used for software interchange; or,\n\n b) Accompany it with a written offer, valid for at least three\n years, to give any third party, for a charge no more than your\n cost of physically performing source distribution, a complete\n machine-readable copy of the corresponding source code, to be\n distributed under the terms of Sections 1 and 2 above on a medium\n customarily used for software interchange; or,\n\n c) Accompany it with the information you received as to the offer\n to distribute corresponding source code. (This alternative is\n allowed only for noncommercial distribution and only if you\n received the program in object code or executable form with such\n an offer, in accord with Subsection b above.)\n\nThe source code for a work means the preferred form of the work for\nmaking modifications to it. For an executable work, complete source\ncode means all the source code for all modules it contains, plus any\nassociated interface definition files, plus the scripts used to\ncontrol compilation and installation of the executable. However, as a\nspecial exception, the source code distributed need not include\nanything that is normally distributed (in either source or binary\nform) with the major components (compiler, kernel, and so on) of the\noperating system on which the executable runs, unless that component\nitself accompanies the executable.\n\nIf distribution of executable or object code is made by offering\naccess to copy from a designated place, then offering equivalent\naccess to copy the source code from the same place counts as\ndistribution of the source code, even though third parties are not\ncompelled to copy the source along with the object code.\n\f\n 4. You may not copy, modify, sublicense, or distribute the Program\nexcept as expressly provided under this License. Any attempt\notherwise to copy, modify, sublicense or distribute the Program is\nvoid, and will automatically terminate your rights under this License.\nHowever, parties who have received copies, or rights, from you under\nthis License will not have their licenses terminated so long as such\nparties remain in full compliance.\n\n 5. You are not required to accept this License, since you have not\nsigned it. However, nothing else grants you permission to modify or\ndistribute the Program or its derivative works. These actions are\nprohibited by law if you do not accept this License. Therefore, by\nmodifying or distributing the Program (or any work based on the\nProgram), you indicate your acceptance of this License to do so, and\nall its terms and conditions for copying, distributing or modifying\nthe Program or works based on it.\n\n 6. Each time you redistribute the Program (or any work based on the\nProgram), the recipient automatically receives a license from the\noriginal licensor to copy, distribute or modify the Program subject to\nthese terms and conditions. You may not impose any further\nrestrictions on the recipients' exercise of the rights granted herein.\nYou are not responsible for enforcing compliance by third parties to\nthis License.\n\n 7. If, as a consequence of a court judgment or allegation of patent\ninfringement or for any other reason (not limited to patent issues),\nconditions are imposed on you (whether by court order, agreement or\notherwise) that contradict the conditions of this License, they do not\nexcuse you from the conditions of this License. If you cannot\ndistribute so as to satisfy simultaneously your obligations under this\nLicense and any other pertinent obligations, then as a consequence you\nmay not distribute the Program at all. For example, if a patent\nlicense would not permit royalty-free redistribution of the Program by\nall those who receive copies directly or indirectly through you, then\nthe only way you could satisfy both it and this License would be to\nrefrain entirely from distribution of the Program.\n\nIf any portion of this section is held invalid or unenforceable under\nany particular circumstance, the balance of the section is intended to\napply and the section as a whole is intended to apply in other\ncircumstances.\n\nIt is not the purpose of this section to induce you to infringe any\npatents or other property right claims or to contest validity of any\nsuch claims; this section has the sole purpose of protecting the\nintegrity of the free software distribution system, which is\nimplemented by public license practices. Many people have made\ngenerous contributions to the wide range of software distributed\nthrough that system in reliance on consistent application of that\nsystem; it is up to the author/donor to decide if he or she is willing\nto distribute software through any other system and a licensee cannot\nimpose that choice.\n\nThis section is intended to make thoroughly clear what is believed to\nbe a consequence of the rest of this License.\n\f\n 8. If the distribution and/or use of the Program is restricted in\ncertain countries either by patents or by copyrighted interfaces, the\noriginal copyright holder who places the Program under this License\nmay add an explicit geographical distribution limitation excluding\nthose countries, so that distribution is permitted only in or among\ncountries not thus excluded. In such case, this License incorporates\nthe limitation as if written in the body of this License.\n\n 9. The Free Software Foundation may publish revised and/or new versions\nof the General Public License from time to time. Such new versions will\nbe similar in spirit to the present version, but may differ in detail to\naddress new problems or concerns.\n\nEach version is given a distinguishing version number. If the Program\nspecifies a version number of this License which applies to it and \"any\nlater version\", you have the option of following the terms and conditions\neither of that version or of any later version published by the Free\nSoftware Foundation. If the Program does not specify a version number of\nthis License, you may choose any version ever published by the Free Software\nFoundation.\n\n 10. If you wish to incorporate parts of the Program into other free\nprograms whose distribution conditions are different, write to the author\nto ask for permission. For software which is copyrighted by the Free\nSoftware Foundation, write to the Free Software Foundation; we sometimes\nmake exceptions for this. Our decision will be guided by the two goals\nof preserving the free status of all derivatives of our free software and\nof promoting the sharing and reuse of software generally.\n\n\t\t\t NO WARRANTY\n\n 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY\nFOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN\nOTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES\nPROVIDE THE PROGRAM \"AS IS\" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED\nOR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF\nMERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS\nTO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE\nPROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,\nREPAIR OR CORRECTION.\n\n 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING\nWILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR\nREDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,\nINCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING\nOUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED\nTO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY\nYOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER\nPROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE\nPOSSIBILITY OF SUCH DAMAGES.\n\n\t\t END OF TERMS AND CONDITIONS\n\f\n\t How to Apply These Terms to Your New Programs\n\n If you develop a new program, and you want it to be of the greatest\npossible use to the public, the best way to achieve this is to make it\nfree software which everyone can redistribute and change under these terms.\n\n To do so, attach the following notices to the program. It is safest\nto attach them to the start of each source file to most effectively\nconvey the exclusion of warranty; and each file should have at least\nthe \"copyright\" line and a pointer to where the full notice is found.\n\n \n Copyright (C) 19yy \n\n This program is free software; you can redistribute it and/or modify\n it under the terms of the GNU General Public License as published by\n the Free Software Foundation; either version 2 of the License, or\n (at your option) any later version.\n\n This program is distributed in the hope that it will be useful,\n but WITHOUT ANY WARRANTY; without even the implied warranty of\n MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n GNU General Public License for more details.\n\n You should have received a copy of the GNU General Public License\n along with this program; if not, write to the Free Software\n Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA\n\n\nAlso add information on how to contact you by electronic and paper mail.\n\nIf the program is interactive, make it output a short notice like this\nwhen it starts in an interactive mode:\n\n Gnomovision version 69, Copyright (C) 19yy name of author\n Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.\n This is free software, and you are welcome to redistribute it\n under certain conditions; type `show c' for details.\n\nThe hypothetical commands `show w' and `show c' should show the appropriate\nparts of the General Public License. Of course, the commands you use may\nbe called something other than `show w' and `show c'; they could even be\nmouse-clicks or menu items--whatever suits your program.\n\nYou should also get your employer (if you work as a programmer) or your\nschool, if any, to sign a \"copyright disclaimer\" for the program, if\nnecessary. Here is a sample; alter the names:\n\n Yoyodyne, Inc., hereby disclaims all copyright interest in the program\n `Gnomovision' (which makes passes at compilers) written by James Hacker.\n\n , 1 April 1989\n Ty Coon, President of Vice\n\nThis General Public License does not permit incorporating your program into\nproprietary programs. If your program is a subroutine library, you may\nconsider it more useful to permit linking proprietary applications with the\nlibrary. If this is what you want to do, use the GNU Library General\nPublic License instead of this License.\n" }, { "path": "Makefile.am", "content": "ACLOCAL_AMFLAGS = -I m4\n#AM_CPPFLAGS = -I$(top_builddir)/gnulib -I$(top_srcdir)/gnulib\nGNULIB_DIR = gnulib\nGNULIB_CPPFLAGS = -I$(top_builddir)/$(GNULIB_DIR) -I$(top_srcdir)/$(GNULIB_DIR)\nGNULIB_LIBS = $(GNULIB_DIR)/libgnu.a $(LIBPTHREAD)\n$(GNULIB_LIBS):\n\t$(MAKE) -C $(GNULIB_DIR) all\nSUBDIRS = $(GNULIB_DIR) . man\n\ninclude $(top_srcdir)/source.mak\n\nPACKCC_FILES = misc/packcc/.gitignore \\\n\t misc/packcc/README.md \\\n\t misc/packcc/LICENSE \\\n\t misc/packcc/src/packcc.c \\\n\t \\\n\t $(NULL)\n\nVALIDATOR_SH = \\\n\t misc/validators/g++-common.sh\t\t\t\\\n\t misc/validators/gfortran-common.sh\t\t\t\\\n\t misc/validators/tsc-common.sh\t\t\t\\\n\t misc/validators/validator-c\t\t\t\\\n\t misc/validators/validator-cxx03\t\t\t\\\n\t misc/validators/validator-cxx11\t\t\t\\\n\t misc/validators/validator-cxx17\t\t\t\\\n\t misc/validators/validator-cxx20+module\t\t\\\n\t misc/validators/validator-fortran+dollar-ok\t\\\n\t misc/validators/validator-gnat\t\t\t\\\n\t misc/validators/validator-jq\t\t\t\\\n\t misc/validators/validator-KNOWN-INVALIDATION\t\\\n\t misc/validators/validator-node\t\t\t\\\n\t misc/validators/validator-NONE\t\t\t\\\n\t misc/validators/validator-puppet\t\t\t\\\n\t misc/validators/validator-python\t\t\t\\\n\t misc/validators/validator-ruby\t\t\t\\\n\t misc/validators/validator-svlint\t\t\t\\\n\t misc/validators/validator-swipl\t\t\t\\\n\t misc/validators/validator-tsc\t\t\t\\\n\t misc/validators/validator-tsc-es2015\t\t\\\n\t \\\n\t $(NULL)\n\nDEBUGGENS = \\\n\t \\\n\t misc/debuggen/README misc/debuggen/libdebuggen.sh \\\n\t \\\n\t misc/debuggen/rust.sh \\\n\t misc/debuggen/typescript.sh \\\n\t \\\n\t $(NULL)\n\nEXTRA_DIST = README.md NEWS.rst autogen.sh \\\n\t misc/optlib2c \\\n\t misc/enumstr.sh \\\n\t misc/gencxxtypedumper.sh \\\n\t $(DEBUGGENS) \\\n\t .ctags.d/exclusion.ctags .dir-locals.el .editorconfig .gdbinit .gitignore \\\n\t .indent.pro .uncrustify.cfg \\\n\t misc/ctags-optlib-mode.el \\\n\t misc/mk-interactive-request.sh misc/roundtrip misc/tinst \\\n\t $(PACKCC_FILES) \\\n\t $(VALIDATOR_SH) \\\n\t $(WIN32_HEADS) $(WIN32_SRCS) mk_mingw.mak mk_mvc.mak \\\n\t win32/mkstemp/COPYING.MinGW-w64-runtime.txt \\\n\t win32/ctags.rc win32/ctags.exe.manifest win32/resource.h \\\n\t win32/ctags_vs2013.sln \\\n\t win32/ctags_vs2013.vcxproj win32/ctags_vs2013.vcxproj.filters \\\n\t win32/ctags_vs2013.vcxproj.in win32/ctags_vs2013.vcxproj.filters.in \\\n\t win32/GNUmakefile \\\n\t win32/gen-repoinfo.bat \\\n\t misc/txt2cstr \\\n\t $(PEG_INPUT) $(OPTLIB2C_INPUT) $(OPTLIB2C_PCRE2_INPUT) $(TXT2CSTR_INPUT) \\\n\t misc/universal-ctags.svg \\\n\t misc/review \\\n\t docs Tmain Units m4/gnulib-cache.m4\n\nif HAVE_PEGOF\n# Keeping intermediate files for debugging pegof and u-ctags buildsys.\nEXTRA_DIST += $(PEGO_INTERMEDIATE)\nendif\n\nCLEANFILES =\nMOSTLYCLEANFILES =\nMAINTAINERCLEANFILES = autom4te.cache\n\n# for distcheck\nclean-local:\n\t@if test \"$(top_srcdir)\" != \"$(top_builddir)\"; then \\\n\t\trm -rf $(OPTLIB2C_SRCS) $(OPTLIB2C_PCRE2_SRCS); \\\n\t\trm -rf $(TXT2CSTR_SRCS); \\\n\telse \\\n\t\t$(MAKE) -C docs clean; \\\n\tfi\n\nmaintainer-clean-local:\n\trm -rf .deps misc/packcc/.dirstamp\n\nbin_PROGRAMS = ctags\nnoinst_LIBRARIES =\nnoinst_LIBRARIES += libctags.a\nnoinst_LIBRARIES += libutil.a\n\nnoinst_PROGRAMS = utiltest\n\nAM_LDFLAGS = $(EXTRA_LDFLAGS)\n\n# packcc always uses native compiler even when cross-compiling.\n# packcc cannot use the standard Automake rule.\nPACKCC_CPPFLAGS_FOR_BUILD = -fsigned-char\nif HAVE_STRNLEN_FOR_BUILD\nPACKCC_CPPFLAGS_FOR_BUILD += -DPCC_USE_SYSTEM_STRNLEN\nendif\n\nPACKCC = $(top_builddir)/packcc$(BUILD_EXEEXT)\nCLEANFILES += $(PACKCC)\n\ncc4b_verbose = $(cc4b_verbose_@AM_V@)\ncc4b_verbose_ = $(cc4b_verbose_@AM_DEFAULT_V@)\ncc4b_verbose_0 = @echo CC4BUILD \" $@\";\n$(PACKCC): $(srcdir)/$(PACKCC_SRC)\n\t$(cc4b_verbose)$(CC_FOR_BUILD) $(CFLAGS_FOR_BUILD) $(CPPFLAGS_FOR_BUILD) $(PACKCC_CPPFLAGS_FOR_BUILD) $(LDFLAGS_FOR_BUILD) -o $@ $(srcdir)/$(PACKCC_SRC)\n\nif USE_READCMD\nbin_PROGRAMS+= readtags\nreadtags_CPPFLAGS = -I. -I$(srcdir) -I$(srcdir)/main -I$(srcdir)/libreadtags\nif ENABLE_DEBUGGING\nreadtags_CPPFLAGS+= $(DEBUG_CPPFLAGS)\nendif\nreadtags_CFLAGS = $(EXTRA_CFLAGS) $(WARNING_CFLAGS) $(COVERAGE_CFLAGS)\ndist_readtags_SOURCES = $(READTAGS_SRCS) $(READTAGS_HEADS)\nreadtags_CPPFLAGS += $(GNULIB_CPPFLAGS)\nreadtags_CPPFLAGS += -I$(srcdir)/dsl\nreadtags_CPPFLAGS += -DHAVE_CTAGS_INLINE_H\nreadtags_LDADD =\nreadtags_LDADD += $(GNULIB_LIBS)\nreadtags_LDADD += libutil.a\ndist_readtags_SOURCES += $(READTAGS_DSL_SRCS) $(READTAGS_DSL_HEADS)\nendif\n\nif HAVE_PCRE2\nPARSER_SRCS += $(PCRE2_SRCS) $(OPTLIB2C_PCRE2_SRCS)\nPARSER_HEADS += $(PCRE2_HEADS)\nendif\n\nif HAVE_LIBXML\nPARSER_SRCS += $(XML_SRCS)\nPARSER_HEADS += $(XML_HEADS)\nendif\n\nif HAVE_JANSSON\nLIB_SRCS += $(JANSSON_SRCS)\nLIB_HEADS += $(JANSSON_HEADS)\nendif\n\nif HAVE_LIBYAML\nPARSER_SRCS += $(YAML_SRCS)\nPARSER_HEADS += $(YAML_HEADS)\nendif\n\nPARSER_HEADS += $(PEG_EXTRA_HEADS)\n\nlibutil_a_CPPFLAGS = -I$(srcdir) -I$(srcdir)/main\nlibutil_a_CFLAGS =\nlibutil_a_CFLAGS += $(EXTRA_CFLAGS)\nlibutil_a_CFLAGS += $(WARNING_CFLAGS)\nlibutil_a_CFLAGS += $(COVERAGE_CFLAGS)\nif ENABLE_DEBUGGING\nlibutil_a_CPPFLAGS+= $(DEBUG_CPPFLAGS)\nendif\ndist_libutil_a_SOURCES = $(UTIL_HEADS) $(UTIL_SRCS)\n\nutiltest_CPPFLAGS = -I$(srcdir) -I$(srcdir)/main\nutiltest_CFLAGS =\nutiltest_CFLAGS += $(EXTRA_CFLAGS)\nutiltest_CFLAGS += $(WARNING_CFLAGS)\nutiltest_CFLAGS += $(COVERAGE_CFLAGS)\nif ENABLE_DEBUGGING\nutiltest_CPPFLAGS += $(DEBUG_CPPFLAGS)\nendif\nutiltest_LDADD =\nutiltest_LDADD += libutil.a\ndist_utiltest_SOURCES = $(UTILTEST_HEADS) $(UTILTEST_SRCS)\n\nlibctags_a_CPPFLAGS = -I. -I$(srcdir) -I$(srcdir)/main -I$(srcdir)/dsl -I$(srcdir)/peg -DHAVE_PACKCC\nif ENABLE_DEBUGGING\nlibctags_a_CPPFLAGS+= $(DEBUG_CPPFLAGS)\nendif\nif HAVE_STRNLEN\nlibctags_a_CPPFLAGS += -DUSE_SYSTEM_STRNLEN\nendif\nif HAVE_PEGOF\nlibctags_a_CPPFLAGS += -DHAVE_PEGOF\nendif\nlibctags_a_CPPFLAGS+= $(GNULIB_CPPFLAGS)\nlibctags_a_CPPFLAGS+= -DHAVE_REPOINFO_H\n\nlibctags_a_CFLAGS =\nlibctags_a_CFLAGS += $(EXTRA_CFLAGS)\nlibctags_a_CFLAGS += $(WARNING_CFLAGS)\nlibctags_a_CFLAGS += $(COVERAGE_CFLAGS)\nlibctags_a_CFLAGS += $(CGCC_CFLAGS)\nlibctags_a_CFLAGS += $(LIBXML_CFLAGS)\nlibctags_a_CFLAGS += $(JANSSON_CFLAGS)\nlibctags_a_CFLAGS += $(LIBYAML_CFLAGS)\nlibctags_a_CFLAGS += $(SECCOMP_CFLAGS)\nlibctags_a_CFLAGS += $(PCRE2_CFLAGS)\n\nnodist_libctags_a_SOURCES = $(REPOINFO_HEADS) $(PEG_SRCS) $(PEG_HEADS)\nBUILT_SOURCES = $(REPOINFO_HEADS)\nCLEANFILES += $(REPOINFO_HEADS) $(PEG_SRCS) $(PEG_HEADS)\nEXTRA_libctags_a_DEPENDENCIES = $(GNULIB_LIBS)\n$(REPOINFO_SRCS): $(REPOINFO_HEADS)\nrepoinfo_verbose = $(repoinfo_verbose_@AM_V@)\nrepoinfo_verbose_ = $(repoinfo_verbose_@AM_DEFAULT_V@)\nrepoinfo_verbose_0 = @echo REPOINFO \" $@\";\nif BUILD_IN_GIT_REPO\nGEN_REPOINFO = $(srcdir)/misc/gen-repoinfo\n$(REPOINFO_HEADS): FORCE\n\t$(repoinfo_verbose)$(GEN_REPOINFO) $@\nFORCE:\nelse\n$(REPOINFO_HEADS):\n\t$(repoinfo_verbose)echo > $@\nendif\n\nSUFFIXES=\n\nif RUN_OPTLIB2C\noptlib2c_verbose = $(optlib2c_verbose_@AM_V@)\noptlib2c_verbose_ = $(optlib2c_verbose_@AM_DEFAULT_V@)\noptlib2c_verbose_0 = @echo OPTLIB2C \" $@\";\nOPTLIB2C = $(srcdir)/misc/optlib2c\nOPTLIB2C_DIR = optlib\nSUFFIXES += .ctags\n.ctags.c:\n\t$(optlib2c_verbose)$(OPTLIB2C) $< > $@\n$(OPTLIB2C_SRCS): $(OPTLIB2C) Makefile\nif HAVE_PCRE2\n$(OPTLIB2C_PCRE2_SRCS): $(OPTLIB2C) Makefile\nendif\nendif\n\nif RUN_TXT2CSTR\ntxt2cstr_verbose = $(txt2cstr_verbose_@AM_V@)\ntxt2cstr_verbose_ = $(txt2cstr_verbose_@AM_DEFAULT_V@)\ntxt2cstr_verbose_0 = @echo TXT2CSTR \" $@\";\nTXT2CSTR = $(srcdir)/misc/txt2cstr\nTXT2CSTR_DIR = main\nSUFFIXES += .ps\n.ps.c:\n\t$(txt2cstr_verbose)$(TXT2CSTR) $< > $@\n$(TXT2CSTR_SRCS): $(TXT2CSTR) Makefile\nendif\n\npackcc_verbose = $(packcc_verbose_@AM_V@)\npackcc_verbose_ = $(packcc_verbose_@AM_DEFAULT_V@)\npackcc_verbose_0 = @echo PACKCC \" $@\";\nSUFFIXES += .peg\n\nif HAVE_PEGOF\npegof_verbose = $(pegof_verbose_@AM_V@)\npegof_verbose_ = $(pegof_verbose_@AM_DEFAULT_V@)\npegof_verbose_0 = @echo PEGOF \" $@\";\nSUFFIXES += .pego\n\nPEGOF_FLAGS = -O all\n.peg.pego:\n\t$(pegof_verbose)$(PEGOF) $(PEGOF_FLAGS) -o $(top_builddir)/peg/$(@F) -i \"$<\"\n.pego.c:\n\t$(packcc_verbose)$(PACKCC) -o $(top_builddir)/peg/$(*F) $(top_builddir)/peg/$( initially created a personal fork of\nExuberant Ctags on GitHub.\nAs interest and participation grew, it was decided to move development to a\ndedicated project as Universal Ctags.\nThe goal of this project is to maintain a common/unified working space where\npeople interested in making ctags better can work together.\n\nSome of the major features of Universal Ctags are:\n\n* more numbers of improved language support\n * new extended C/C++ language parser, etc.\n* fully extended optlib (a feature to define a new language parser from a\n command line)\n* interactive mode (experimental)\n\n## The latest build and package ##\n\nIf you want to try the latest Universal Ctags without building it yourself...\n\n### Windows\nDaily builds are available at the [ctags-win32](https://github.com/universal-ctags/ctags-win32) project.\nGo to the [releases](https://github.com/universal-ctags/ctags-win32/releases) page to download zip packages.\n\n### Unix-like\nNightly builds are available at the [ctags-nightly-build](https://github.com/universal-ctags/ctags-nightly-build) project.\nGo to the [releases](https://github.com/universal-ctags/ctags-nightly-build/releases) page to download tarball archives.\n\n### Mac\nRecent builds are available via the [`universal-ctags` Homebrew formula](https://formulae.brew.sh/formula/universal-ctags).\n\n### Snap\nGo to [ctags-snap](https://github.com/universal-ctags/ctags-snap) and\nclone the `ctags-snap` repo. Then, follow instructions to build the\nsnap package of Universal Ctags. Snapcraft will automatically fetch the source\ncode from GitHub.\n\n## How to build and install ##\n\nTo build with Autotools (Autoconf and Automake) on GNU/Linux, OSX, or Windows 10 WSL,\n```\n $ git clone https://github.com/universal-ctags/ctags.git\n $ cd ctags\n $ ./autogen.sh\n $ ./configure # use --prefix=/where/you/want to override installation directory, defaults to /usr/local\n $ make\n $ make install # may require extra privileges depending on where to install\n```\n\nGNU make is assumed as the `make` command.\n\nSee\n[`docs/autotools.rst`](https://github.com/universal-ctags/ctags/blob/master/docs/autotools.rst)\nfor more information.\n\nTo build on Windows, see\n[`docs/windows.rst`](https://github.com/universal-ctags/ctags/blob/master/docs/windows.rst)\nfor more information.\n\nTo build on OSX, see\n[`docs/osx.rst`](https://github.com/universal-ctags/ctags/blob/master/docs/osx.rst)\nfor more information.\n\n## Manual ##\nThe primary documents of Universal Ctags are man pages.\nUsers should first consult the\n[ctags(1)](https://docs.ctags.io/en/latest/man/ctags.1.html), and [other man\npages](https://docs.ctags.io/en/latest/man-pages.html) if necessary.\n\n[Universal Ctags Hacking Guide](https://docs.ctags.io), which also includes the\nman pages, is primarily for developers and provides additional information to\nthe man pages, including experimental features.\n\nSee also `*/README.md` on this repository.\n\n## Differences from exuberant-ctags ##\n\nYou may be interested in how Universal Ctags is different from Exuberant Ctags.\nSee\n[ctags-incompatibilities(7)](https://docs.ctags.io/en/latest/man/ctags-incompatibilities.7.html)\nand [Introduced changes](https://docs.ctags.io/en/latest/news.html) for details.\n\nThe most significant incompatible changes:\n\n* Universal Ctags doesn't load `~/.ctags` and `./.ctags` at starting up time.\n Instead, it loads `~/.ctags.d/*.ctags` and `./.ctags.d/*.ctags`.\n\n* Universal Ctags is more strict about characters that can be\n used in kind letters and kind names than Exuberant-ctags.\n\n - The letter must be an alphabetical character (`[a-zA-EG-Z]`).\n `F` is reserved for `file` kind.\n\n - The first character of the name must be alphabetic, and\n the rest characters must be alphanumeric (`[a-zA-Z][a-zA-Z0-9]*`).\n\n The detailed background is explained in\n [#1737](https://github.com/universal-ctags/ctags/pull/1737).\n\n If you want to reuse your `.ctags` written for Exuberant-ctags,\n you must review kind letters and names defined with `--regex-=...`\n options. When updating the definitions, using `--kinddef-=...` option\n is appreciated.\n\n## [CVE-2022-4515](https://access.redhat.com/security/cve/CVE-2022-4515) ##\nIt is not affected to Universal Ctags.\nIt was fixed in [e00c55d7a0204dc1d0ae316141323959e1e16162](https://github.com/universal-ctags/ctags/commit/e00c55d7a0204dc1d0ae316141323959e1e16162) in 2016. Thanks to the reporter.\n\nPull-requests are welcome!\n" }, { "path": "Tmain/abnormal-output-file-names.d/input.c", "content": "int x;\n" }, { "path": "Tmain/abnormal-output-file-names.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nexit_if_win32 \"$CTAGS\"\n\nrm -f $BUILDDIR/\"'\"\nrm -f $BUILDDIR/'\"'\nrm -f $BUILDDIR/'$(ls)'\nrm -f $BUILDDIR/'a b'\n\n${CTAGS} --quiet --options=NONE -o $BUILDDIR/\"'\" --extras=-pF input.c\n${CTAGS} --quiet --options=NONE -o $BUILDDIR/'\"' --extras=-pF input.c\n${CTAGS} --quiet --options=NONE -o $BUILDDIR/'$(ls)' --extras=-pF input.c\n${CTAGS} --quiet --options=NONE -o $BUILDDIR/'a b' --extras=-pF input.c\n\necho '#' SINGLE QUOTE\nif [ -e $BUILDDIR/\"'\" ]; then\n\tcat $BUILDDIR/\"'\"\nfi\n\necho '#' DOUBLE QUOTES\nif [ -e $BUILDDIR/'\"' ]; then\n\tcat $BUILDDIR/'\"'\nfi\n\necho '#' PROCESS SUBSTITUTION\nif [ -e $BUILDDIR/'$(ls)' ]; then\n\tcat $BUILDDIR/'$(ls)'\nfi\n\necho '#' SPACE\nif [ -e $BUILDDIR/'a b' ]; then\n\tcat $BUILDDIR/'a b'\nfi\n\nrm -f $BUILDDIR/\"'\"\nrm -f $BUILDDIR/'\"'\nrm -f $BUILDDIR/'$(ls)'\nrm -f $BUILDDIR/'a b'\n" }, { "path": "Tmain/abnormal-output-file-names.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/abnormal-output-file-names.d/stdout-expected.txt", "content": "# SINGLE QUOTE\nx\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\n# DOUBLE QUOTES\nx\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\n# PROCESS SUBSTITUTION\nx\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\n# SPACE\nx\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Tmain/alias-for-unknown-language.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/alias-for-unknown-language.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --alias-nosuchlang=Z\nexit $?\n" }, { "path": "Tmain/alias-for-unknown-language.d/stderr-expected.txt", "content": "ctags: Unknown language \"nosuchlang\" in \"alias-nosuchlang\" option\n" }, { "path": "Tmain/alias-for-unknown-language.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/allow-null-tag.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/allow-null-tag.d/input.json", "content": "[{\"\":1}]\n" }, { "path": "Tmain/allow-null-tag.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --_fatal-warnings -o - input.json\nexit $?\n" }, { "path": "Tmain/allow-null-tag.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/allow-null-tag.d/stdout-expected.txt", "content": "0\tinput.json\t/^[{\"\":1}]$/;\"\to\n" }, { "path": "Tmain/avoid-null-tag-warning.d/input-0.sql", "content": "ALTER DATABASE :\"datname\" REFRESH COLLATION VERSION;\n" }, { "path": "Tmain/avoid-null-tag-warning.d/input.asm", "content": "\t.proc\n" }, { "path": "Tmain/avoid-null-tag-warning.d/input.sql", "content": "-- Taken from #2504 opened by @koenmeersman\nselect substr(sess_evnt.event, 1, 18) event\nfrom v$session_event sess_evnt;\n" }, { "path": "Tmain/avoid-null-tag-warning.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\necho '# no warning should be printed' 1>&2\n$CTAGS --quiet --options=NONE -o - input.sql\n$CTAGS --quiet --options=NONE -o - input-0.sql\n$CTAGS --quiet --options=NONE -o - input.asm\n" }, { "path": "Tmain/avoid-null-tag-warning.d/stderr-expected.txt", "content": "# no warning should be printed\n" }, { "path": "Tmain/avoid-null-tag-warning.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/broken-extradef.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\ntitle()\n{\n\techo\n\techo \"$@\"\n\n\t{\n\t\techo\n\t\techo \"$@\"\n\t} 1>&2\n}\n\n{\ntitle '# echo unknown lang'\n${CTAGS} --_extradef-NOSUCHLANG\n${CTAGS} --_extradef-NOSUCHLANG=extra,desc\n\ntitle '# no option value'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=\n\ntitle '# wrong char in a field name'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=:\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=:abc\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=:abc,\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=:abc,description\n\ntitle '# empty extra name'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=,\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=,abc\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=,abc,\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=,abc,description\n\ntitle '# empty description'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=abc\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=abc,\n\ntitle '# no input file'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY=abc,desc\n\ntitle '# inject a flag separator'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,desc{foo}' --list-extras=IMAGINARY\n\ntitle '# inject a broken flag separator(1)'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,desc{foo' --list-extras=IMAGINARY\n\ntitle '# inject a broken flag separator(2)'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,desc{' --list-extras=IMAGINARY\n\ntitle '# use a { in description (1)'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,desc\\{' --list-extras=IMAGINARY\n\ntitle '# use a { in description (2)'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,desc\\{}' --list-extras=IMAGINARY\n\ntitle '# use a \\ in description'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,desc\\\\backslash' --list-extras=IMAGINARY\n\ntitle '# description started from {'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,{' --list-extras=IMAGINARY\n\ntitle '# description started from \\{'\n${CTAGS} --langdef=IMAGINARY --_extradef-IMAGINARY='extra,\\{' --list-extras=IMAGINARY\n\n} > /tmp/ctags-tmain-$$.stdout 2>/tmp/ctags-tmain-$$.stderr\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stdout\nrm /tmp/ctags-tmain-$$.stdout\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stderr 1>&2\nrm /tmp/ctags-tmain-$$.stderr\n" }, { "path": "Tmain/broken-extradef.d/stderr-expected.txt", "content": "\n# echo unknown lang\nctags: Unknown language \"NOSUCHLANG\" in \"_extradef-NOSUCHLANG\" option\nctags: Unknown language \"NOSUCHLANG\" in \"_extradef-NOSUCHLANG\" option\n\n# no option value\nctags: no extra definition specified in \"--_extradef-IMAGINARY\" option\nctags: no extra definition specified in \"--_extradef-IMAGINARY\" option\n\n# wrong char in a field name\nctags: no extra description specified in \"--_extradef-IMAGINARY\" option\nctags: no extra description specified in \"--_extradef-IMAGINARY\" option\nctags: unacceptable char as part of extra name in \"--_extradef-IMAGINARY\" option: ':'\nctags: unacceptable char as part of extra name in \"--_extradef-IMAGINARY\" option: ':'\n\n# empty extra name\nctags: the extra name in \"--_extradef-IMAGINARY\" option is empty\nctags: the extra name in \"--_extradef-IMAGINARY\" option is empty\nctags: the extra name in \"--_extradef-IMAGINARY\" option is empty\nctags: the extra name in \"--_extradef-IMAGINARY\" option is empty\n\n# empty description\nctags: no extra description specified in \"--_extradef-IMAGINARY\" option\nctags: extra description in \"--_extradef-IMAGINARY\" option is empty\n\n# no input file\nctags: No files specified. Try \"ctags --help\".\n\n# inject a flag separator\n\n# inject a broken flag separator(1)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{foo\"\n\n# inject a broken flag separator(2)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{\"\n\n# use a { in description (1)\n\n# use a { in description (2)\n\n# use a \\ in description\n\n# description started from {\nctags: extra description in \"--_extradef-IMAGINARY\" option is empty\n\n# description started from \\{\n" }, { "path": "Tmain/broken-extradef.d/stdout-expected.txt", "content": "\n# echo unknown lang\n\n# no option value\n\n# wrong char in a field name\n\n# empty extra name\n\n# empty description\n\n# no input file\n\n# inject a flag separator\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 desc\n\n# inject a broken flag separator(1)\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 desc\n\n# inject a broken flag separator(2)\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 desc\n\n# use a { in description (1)\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 desc{\n\n# use a { in description (2)\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 desc{}\n\n# use a \\ in description\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 desc\\backslash\n\n# description started from {\n\n# description started from \\{\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- extra no IMAGINARY no 0 {\n" }, { "path": "Tmain/broken-fielddef.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\ntitle()\n{\n\techo\n\techo \"$@\"\n\n\t{\n\t\techo\n\t\techo \"$@\"\n\t} 1>&2\n}\n\n{\ntitle '# echo unknown lang'\n${CTAGS} --_fielddef-NOSUCHLANG\n${CTAGS} --_fielddef-NOSUCHLANG=field,desc\n\ntitle '# no option value'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=\n\ntitle '# wrong char in a field name'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=:\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=:abc\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=:abc,\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=:abc,description\n\ntitle '# empty field name'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=,\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=,abc\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=,abc,\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=,abc,description\n\ntitle '# empty description'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=abc\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=abc,\n\ntitle '# no input file'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY=abc,desc\n\ntitle '# inject a flag separator'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,desc{foo}' --list-fields=IMAGINARY\n\ntitle '# inject a broken flag separator(1)'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,desc{foo' --list-fields=IMAGINARY\n\ntitle '# inject a broken flag separator(2)'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,desc{' --list-fields=IMAGINARY\n\ntitle '# use a { in description (1)'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,desc\\{' --list-fields=IMAGINARY\n\ntitle '# use a { in description (2)'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,desc\\{}' --list-fields=IMAGINARY\n\ntitle '# use a \\ in description'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,desc\\\\backslash' --list-fields=IMAGINARY\n\ntitle '# description started from {'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,{' --list-fields=IMAGINARY\n\ntitle '# description started from \\{'\n${CTAGS} --langdef=IMAGINARY --_fielddef-IMAGINARY='field,\\{' --list-fields=IMAGINARY\n} > /tmp/ctags-tmain-$$.stdout 2>/tmp/ctags-tmain-$$.stderr\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stdout\nrm /tmp/ctags-tmain-$$.stdout\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stderr 1>&2\nrm /tmp/ctags-tmain-$$.stderr\n" }, { "path": "Tmain/broken-fielddef.d/stderr-expected.txt", "content": "\n# echo unknown lang\nctags: Unknown language \"NOSUCHLANG\" in \"_fielddef-NOSUCHLANG\" option\nctags: Unknown language \"NOSUCHLANG\" in \"_fielddef-NOSUCHLANG\" option\n\n# no option value\nctags: no field definition specified in \"--_fielddef-IMAGINARY\" option\nctags: no field definition specified in \"--_fielddef-IMAGINARY\" option\n\n# wrong char in a field name\nctags: no field description specified in \"--_fielddef-IMAGINARY\" option\nctags: no field description specified in \"--_fielddef-IMAGINARY\" option\nctags: unacceptable char as part of field name in \"--_fielddef-IMAGINARY\" option: ':'\nctags: unacceptable char as part of field name in \"--_fielddef-IMAGINARY\" option: ':'\n\n# empty field name\nctags: the field name in \"--_fielddef-IMAGINARY\" option is empty\nctags: the field name in \"--_fielddef-IMAGINARY\" option is empty\nctags: the field name in \"--_fielddef-IMAGINARY\" option is empty\nctags: the field name in \"--_fielddef-IMAGINARY\" option is empty\n\n# empty description\nctags: no field description specified in \"--_fielddef-IMAGINARY\" option\nctags: field description in \"--_fielddef-IMAGINARY\" option is empty\n\n# no input file\nctags: No files specified. Try \"ctags --help\".\n\n# inject a flag separator\n\n# inject a broken flag separator(1)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{foo\"\n\n# inject a broken flag separator(2)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{\"\n\n# use a { in description (1)\n\n# use a { in description (2)\n\n# use a \\ in description\n\n# description started from {\nctags: field description in \"--_fielddef-IMAGINARY\" option is empty\n\n# description started from \\{\n" }, { "path": "Tmain/broken-fielddef.d/stdout-expected.txt", "content": "\n# echo unknown lang\n\n# no option value\n\n# wrong char in a field name\n\n# empty field name\n\n# empty description\n\n# no input file\n\n# inject a flag separator\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 desc\n\n# inject a broken flag separator(1)\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 desc\n\n# inject a broken flag separator(2)\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 desc\n\n# use a { in description (1)\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 desc{\n\n# use a { in description (2)\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 desc{}\n\n# use a \\ in description\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 desc\\backslash\n\n# description started from {\n\n# description started from \\{\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- field no IMAGINARY s-- no -- 0 {\n" }, { "path": "Tmain/broken-json-output.d/exit-expected.tx", "content": "0\n" }, { "path": "Tmain/broken-json-output.d/input.f", "content": "* \n integer function F(x)\n end function F\n program main\n)\n" }, { "path": "Tmain/broken-json-output.d/run.sh", "content": "# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nis_feature_available ${CTAGS} json\n\n${CTAGS} --quiet --options=NONE --sort=no --output-format=json input.f\n" }, { "path": "Tmain/broken-json-output.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/broken-json-output.d/stdout-expected.txt", "content": "{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.f\", \"pattern\": \"/^ program main$/\", \"kind\": \"program\"}\n" }, { "path": "Tmain/broken-langdef.d/input.c", "content": "int f(void) { return 0; }\n" }, { "path": "Tmain/broken-langdef.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nrun_ctags()\n{\n\techo '#' \"$1\" 1>&2\n\t${CTAGS} --quiet --options=NONE --langdef=\"$1\" --kinddef-\"$1\"=f,func,functions --_force-quit=0 -o - input.c\n}\n\nrun_ctags \"\"\nrun_ctags all\nrun_ctags NONE\nfor c in '!' '\"' '$' '%' '&' \"'\" '(' ')' '*' ',' '-' '.' '/' ':' ';' '<' '=' '>' '?' '@' '[' '\\' ']' '^' '`' '|' '~'; do\n\trun_ctags \"C$c\"\ndone\n" }, { "path": "Tmain/broken-langdef.d/stderr-expected.txt", "content": "# \nctags: No language specified for \"langdef\" option\n# all\nctags: \"all\" is reserved; don't use it as the name for defining a new language\n# NONE\nctags: \"NONE\" is reserved; don't use it as the name for defining a new language\n# C!\nctags: don't use `!' in a language name (C!)\n# C\"\nctags: don't use `\"' in a language name (C\")\n# C$\nctags: don't use `$' in a language name (C$)\n# C%\nctags: don't use `%' in a language name (C%)\n# C&\nctags: don't use `&' in a language name (C&)\n# C'\nctags: don't use \"'\" in a language name (C')\n# C(\nctags: don't use `(' in a language name (C()\n# C)\nctags: don't use `)' in a language name (C))\n# C*\nctags: don't use `*' in a language name (C*)\n# C,\nctags: don't use `,' in a language name (C,)\n# C-\nctags: don't use `-' in a language name (C-)\n# C.\nctags: don't use `.' in a language name (C.)\n# C/\nctags: don't use `/' in a language name (C/)\n# C:\nctags: don't use `:' in a language name (C:)\n# C;\nctags: don't use `;' in a language name (C;)\n# C<\nctags: don't use `<' in a language name (C<)\n# C=\nctags: don't use `=' in a language name (C=)\n# C>\nctags: don't use `>' in a language name (C>)\n# C?\nctags: don't use `?' in a language name (C?)\n# C@\nctags: don't use `@' in a language name (C@)\n# C[\nctags: don't use `[' in a language name (C[)\n# C\\\nctags: don't use `\\' in a language name (C\\)\n# C]\nctags: don't use `]' in a language name (C])\n# C^\nctags: don't use `^' in a language name (C^)\n# C`\nctags: don't use \"`\" in a language name (C`)\n# C|\nctags: don't use `|' in a language name (C|)\n# C~\nctags: don't use `~' in a language name (C~)\n" }, { "path": "Tmain/broken-langdef.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/broken-paramdef.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\ntitle()\n{\n\techo\n\techo \"$@\"\n\n\t{\n\t\techo\n\t\techo \"$@\"\n\t} 1>&2\n}\n\n{\ntitle '# echo unknown lang'\n${CTAGS} --_paramdef-NOSUCHLANG\n${CTAGS} --_paramdef-NOSUCHLANG=param,desc\n\ntitle '# no option value'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=\n\ntitle '# wrong char in a field name'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=:\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=:abc\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=:abc,\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=:abc,description\n\ntitle '# empty parameter name'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=,\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=,abc\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=,abc,\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=,abc,description\n\ntitle '# empty description'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=abc\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=abc,\n\ntitle '# no input file'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY=abc,desc\n\ntitle '# inject a flag separator'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,desc{foo}' --list-params=IMAGINARY\n\ntitle '# inject a broken flag separator(1)'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,desc{foo' --list-params=IMAGINARY\n\ntitle '# inject a broken flag separator(2)'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,desc{' --list-params=IMAGINARY\n\ntitle '# use a { in description (1)'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,desc\\{' --list-params=IMAGINARY\n\ntitle '# use a { in description (2)'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,desc\\{}' --list-params=IMAGINARY\n\ntitle '# use a \\ in description'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,desc\\\\backslash' --list-params=IMAGINARY\n\ntitle '# description started from {'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,{' --list-params=IMAGINARY\n\ntitle '# description started from \\{'\n${CTAGS} --langdef=IMAGINARY --_paramdef-IMAGINARY='param,\\{' --list-params=IMAGINARY\n\n} > /tmp/ctags-tmain-$$.stdout 2>/tmp/ctags-tmain-$$.stderr\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stdout\nrm /tmp/ctags-tmain-$$.stdout\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stderr 1>&2\nrm /tmp/ctags-tmain-$$.stderr\n" }, { "path": "Tmain/broken-paramdef.d/stderr-expected.txt", "content": "\n# echo unknown lang\nctags: Unknown language \"NOSUCHLANG\" in \"_paramdef-NOSUCHLANG\" option\nctags: Unknown language \"NOSUCHLANG\" in \"_paramdef-NOSUCHLANG\" option\n\n# no option value\nctags: no parameter definition specified in \"--_paramdef-IMAGINARY\" option\nctags: no parameter definition specified in \"--_paramdef-IMAGINARY\" option\n\n# wrong char in a field name\nctags: no parameter description specified in \"--_paramdef-IMAGINARY\" option\nctags: no parameter description specified in \"--_paramdef-IMAGINARY\" option\nctags: unacceptable char as part of parameter name in \"--_paramdef-IMAGINARY\" option: ':'\nctags: unacceptable char as part of parameter name in \"--_paramdef-IMAGINARY\" option: ':'\n\n# empty parameter name\nctags: the parameter name in \"--_paramdef-IMAGINARY\" option is empty\nctags: the parameter name in \"--_paramdef-IMAGINARY\" option is empty\nctags: the parameter name in \"--_paramdef-IMAGINARY\" option is empty\nctags: the parameter name in \"--_paramdef-IMAGINARY\" option is empty\n\n# empty description\nctags: no parameter description specified in \"--_paramdef-IMAGINARY\" option\nctags: parameter description in \"--_paramdef-IMAGINARY\" option is empty\n\n# no input file\nctags: No files specified. Try \"ctags --help\".\n\n# inject a flag separator\n\n# inject a broken flag separator(1)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{foo\"\n\n# inject a broken flag separator(2)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{\"\n\n# use a { in description (1)\n\n# use a { in description (2)\n\n# use a \\ in description\n\n# description started from {\nctags: parameter description in \"--_paramdef-IMAGINARY\" option is empty\n\n# description started from \\{\n" }, { "path": "Tmain/broken-paramdef.d/stdout-expected.txt", "content": "\n# echo unknown lang\n\n# no option value\n\n# wrong char in a field name\n\n# empty parameter name\n\n# empty description\n\n# no input file\n\n# inject a flag separator\n#NAME DESCRIPTION\nparam desc\n\n# inject a broken flag separator(1)\n#NAME DESCRIPTION\nparam desc\n\n# inject a broken flag separator(2)\n#NAME DESCRIPTION\nparam desc\n\n# use a { in description (1)\n#NAME DESCRIPTION\nparam desc{\n\n# use a { in description (2)\n#NAME DESCRIPTION\nparam desc{}\n\n# use a \\ in description\n#NAME DESCRIPTION\nparam desc\\backslash\n\n# description started from {\n\n# description started from \\{\n#NAME DESCRIPTION\nparam {\n" }, { "path": "Tmain/broken-regex-pattern.d/broken-pattern.ctags", "content": "# Though this pattern uses pcre2 extension, {pcre2} flag is not given.\n# This caused a crash.\n--mline-regex-Python=/[\\n]if\\s+__name__\\s*==\\s*(\"__main__\"|'__main__')\\s*:(?:\\s*#[^\\n]*)?\\n//f/{mgroup=1}{_anonymous=main}\n" }, { "path": "Tmain/broken-regex-pattern.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/broken-regex-pattern.d/input.py", "content": "if import pydoc\nif __name__ == \"__main__\":\n pydoc.cli()\n" }, { "path": "Tmain/broken-regex-pattern.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\n$CTAGS --options=./broken-pattern.ctags -o - input.py > /dev/null\n" }, { "path": "Tmain/broken-regex-pattern.d/stderr-expected.txt", "content": "ctags: Warning: regcomp: Invalid preceding regular expression\nctags: Warning: pattern: [\n]if\\s+__name__\\s*==\\s*(\"__main__\"|'__main__')\\s*:(?:\\s*#[^\n]*)?\n\nctags: Warning: language: Python[0]\nctags: Warning: Failed in compiling the regex pattern with \"default\" regex engine\n" }, { "path": "Tmain/broken-tagname-in-ectags-format.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/broken-tagname-in-ectags-format.d/input.cst", "content": "b\n\n" }, { "path": "Tmain/broken-tagname-in-ectags-format.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILD_SUBDIR=$2\nstderr_tmp=${BUILD_SUBDIR}/stderr-actual.txt.tmp\n\n${CTAGS} --options=NONE -o - --language-force=CTagsSelfTest --verbose --output-format=e-ctags input.cst \\\n\t 2> ${stderr_tmp}\n\n# externalSortTags invokes sort command, and it is logged to stderr.\n# Delete the line for the comparison.\nsed -e '/^system (\"sort -u\")$/d' < ${stderr_tmp} 1>&2\nrm ${stderr_tmp}\n\nexit $?\n" }, { "path": "Tmain/broken-tagname-in-ectags-format.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n Option: --output-format=e-ctags\nReading command line arguments\nCTagsSelfTest requires a memory stream for input\nOPENING input.cst as CTagsSelfTest language file [new,required]\nInitialize parser: CTagsSelfTest\n" }, { "path": "Tmain/broken-tagname-in-ectags-format.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/broken-tagname-quiet.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/broken-tagname-quiet.d/input.cst", "content": "b\n" }, { "path": "Tmain/broken-tagname-quiet.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - --language-force=CTagsSelfTest input.cst\n\nexit $?\n" }, { "path": "Tmain/broken-tagname-quiet.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/broken-tagname-quiet.d/stdout-expected.txt", "content": "newline-in-scope\tinput.cst\t/^b$/;\"\tb\tbroken tag:parent\\nscope\none\\nof\\rbroken\\tname\tinput.cst\t/^b$/;\"\tb\tbroken tag:\\\\Broken\\tContext\nonly\\nnewline\tinput.cst\t/^b$/;\"\tb\nonly\\ttab\tinput.cst\t/^b$/;\"\tb\ntab-in-scope\tinput.cst\t/^b$/;\"\tb\tbroken tag:parent\\tscope\n" }, { "path": "Tmain/broken-tagname.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/broken-tagname.d/input.cst", "content": "b\n\n" }, { "path": "Tmain/broken-tagname.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILD_SUBDIR=$2\nstderr_tmp=${BUILD_SUBDIR}/stderr-actual.txt.tmp\n\n${CTAGS} --options=NONE -o - --language-force=CTagsSelfTest --verbose input.cst \\\n\t 2> ${stderr_tmp}\n\n# externalSortTags invokes sort command, and it is logged to stderr.\n# Delete the line for the comparison.\nsed -e '/^system (\"sort -u\")$/d' < ${stderr_tmp} 1>&2\nrm ${stderr_tmp}\n\nexit $?\n" }, { "path": "Tmain/broken-tagname.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nReading command line arguments\nCTagsSelfTest requires a memory stream for input\nOPENING input.cst as CTagsSelfTest language file [new,required]\nInitialize parser: CTagsSelfTest\nUnexpected character 0x0a included in a tagEntryInfo: one\nof\rbroken\tname\nFile: input.cst, Line: 1, Lang: CTagsSelfTest, Kind: b\nEscape the character\nUnexpected character 0x09 included in a tagEntryInfo: \\Broken\tContext\nFile: input.cst, Line: 1, Lang: CTagsSelfTest, Kind: b\nEscape the character\nUnexpected character 0x0a included in a tagEntryInfo: only\nnewline\nFile: input.cst, Line: 1, Lang: CTagsSelfTest, Kind: b\nEscape the character\nUnexpected character 0x09 included in a tagEntryInfo: only\ttab\nFile: input.cst, Line: 1, Lang: CTagsSelfTest, Kind: b\nEscape the character\nUnexpected character 0x0a included in a tagEntryInfo: parent\nscope\nFile: input.cst, Line: 1, Lang: CTagsSelfTest, Kind: b\nEscape the character\nUnexpected character 0x09 included in a tagEntryInfo: parent\tscope\nFile: input.cst, Line: 1, Lang: CTagsSelfTest, Kind: b\nEscape the character\nsorting tag file\n" }, { "path": "Tmain/broken-tagname.d/stdout-expected.txt", "content": "newline-in-scope\tinput.cst\t/^b$/;\"\tb\tbroken tag:parent\\nscope\none\\nof\\rbroken\\tname\tinput.cst\t/^b$/;\"\tb\tbroken tag:\\\\Broken\\tContext\nonly\\nnewline\tinput.cst\t/^b$/;\"\tb\nonly\\ttab\tinput.cst\t/^b$/;\"\tb\ntab-in-scope\tinput.cst\t/^b$/;\"\tb\tbroken tag:parent\\tscope\n" }, { "path": "Tmain/broken-version.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/broken-version.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available \"$CTAGS\" debug\n${CTAGS} --quiet --options=NONE --langdef=BROKEN'{version=0.1}' --_force-quit=1\nexit $?\n" }, { "path": "Tmain/broken-version.d/stderr-expected.txt", "content": "ctags: Warning: versionCurrent (0) must be either equal to or greater than versionAge (1): BROKEN\n" }, { "path": "Tmain/c-anon-counter.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/c-anon-counter.d/input1.c", "content": "enum {\n A, B,\n} x;\n\nstruct {\n int C, D;\n} y;\n\nunion {\n int E, F;\n} z;\n" }, { "path": "Tmain/c-anon-counter.d/input2.c", "content": "enum {\n G, H,\n} a;\n\nstruct {\n int I, J;\n} b;\n\nunion {\n int K, L;\n} c;\n" }, { "path": "Tmain/c-anon-counter.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n${CTAGS} --quiet --options=NONE -o - input1.c input2.c > $BUILDDIR/12.tmp\n${CTAGS} --quiet --options=NONE -o - input2.c input1.c > $BUILDDIR/21.tmp\n\ndiff $BUILDDIR/12.tmp $BUILDDIR/21.tmp\ns=$?\n\nif [ \"$s\" = 0 ]; then\n rm -f $BUILDDIR/12.tmp\n rm -f $BUILDDIR/21.tmp\nfi\n\nexit $s\n" }, { "path": "Tmain/c-anon-counter.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/c-anon-counter.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/c-large-enum.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/c-large-enum.d/run.sh", "content": "# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\ninput=/tmp/c-large-enum.d-input.c\nCTAGS=\"$1 --quiet --options=NONE\"\n\ni=0\n{\n\techo \"enum E {\"\n\twhile [ $i -lt 32770 ]; do\n\t\tprintf \"X%x,\" $i\n\t\ti=$(($i + 1))\n\tdone\n\techo \"};\"\n} > $input\n\n${CTAGS} --sort=no -n --fields= --fields=+\"{nth}\" -x --_xformat='%{name} %{nth}' \"$input\" | tail -10\nr=$?\n\nrm -f \"$input\"\n\nexit $r\n" }, { "path": "Tmain/c-large-enum.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/c-large-enum.d/stdout-expected.txt", "content": "X7ff8 32760\nX7ff9 32761\nX7ffa 32762\nX7ffb 32763\nX7ffc 32764\nX7ffd 32765\nX7ffe 32766\nX7fff 32767\nX8000 32767\nX8001 32767\n" }, { "path": "Tmain/case-insensitive-pattern.d/INPUT.MK", "content": "" }, { "path": "Tmain/case-insensitive-pattern.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nexit_if_no_case_insensitive_filenames \"${CTAGS}\"\n\n${CTAGS} --quiet --options=NONE --print-language INPUT.MK\n" }, { "path": "Tmain/case-insensitive-pattern.d/stdout-expected.txt", "content": "INPUT.MK: Make\n" }, { "path": "Tmain/clear-aliases.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/clear-aliases.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '# clear' &&\n${CTAGS} --quiet --options=NONE --alias-C= --with-list-header=no --list-aliases=C &&\n\necho '# add' &&\n${CTAGS} --quiet --options=NONE --alias-Tcl=+abc --with-list-header=no --list-aliases=Tcl &&\n\necho '# reset' &&\n${CTAGS} --quiet --options=NONE --alias-Tcl=+abc --alias-Tcl=default --with-list-header=no --list-aliases=Tcl\n\necho '# all clear' &&\n${CTAGS} --quiet --options=NONE --alias-all= --with-list-header=no --list-aliases &&\n\necho '# all reset' &&\n${CTAGS} --quiet --options=NONE --alias-Tcl=+abc --alias-all=default --with-list-header=no --list-aliases=Tcl\n\nexit $?\n" }, { "path": "Tmain/clear-aliases.d/stdout-expected.txt", "content": "# clear\n# add\nexpect\ntclsh\nabc\n# reset\nexpect\ntclsh\n# all clear\n# all reset\nexpect\ntclsh\n" }, { "path": "Tmain/client-vista-vim-fields-expectation.d/README.md", "content": "If your change breaks this test case, notify the change\nto https://github.com/liuchengxu/vista.vim.\n" }, { "path": "Tmain/client-vista-vim-fields-expectation.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/client-vista-vim-fields-expectation.d/run.sh", "content": "# Copyright: 2021 \n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available \"${CTAGS}\" json\n\n$CTAGS --quiet --options=NONE --format=2 --excmd=pattern --fields=+nksSaf --extras=+F --sort=no --append=no --extras= --language-force=vim --vim-kinds=acfvmn --output-format=json --fields=-PF -f- test.vim\n\nexit $?\n" }, { "path": "Tmain/client-vista-vim-fields-expectation.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/client-vista-vim-fields-expectation.d/stdout-expected.txt", "content": "{\"_type\": \"tag\", \"name\": \"s:cur_dir\", \"line\": 1, \"kind\": \"variable\"}\n{\"_type\": \"tag\", \"name\": \"vista#FindItemsUnderDirectory\", \"line\": 3, \"kind\": \"function\", \"signature\": \"(dir)\"}\n" }, { "path": "Tmain/client-vista-vim-fields-expectation.d/test.vim", "content": "let s:cur_dir = fnamemodify(resolve(expand(':p')), ':h')\n\nfunction! vista#FindItemsUnderDirectory(dir) abort\n return map(split(globpath(a:dir, '*'), '\\n'), 'fnamemodify(v:val, '':t:r'')')\nendfunction\n" }, { "path": "Tmain/combination-of-fields-Zs.d/input.c", "content": "struct s {\n\tint i;\n};\n" }, { "path": "Tmain/combination-of-fields-Zs.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '# Z only'\n$CTAGS --quiet --options=NONE --fields=Z -o - input.c 2>&1 \\\n\t| sed -e 's/\\.exe//g' \\\n\t| sort\n\n# The last sort is needed because the order of lines from stdout and\n# that from stderr is not stable.\n" }, { "path": "Tmain/combination-of-fields-Zs.d/stdout-expected.txt", "content": "# Z only\nctags: Warning: enable the s field to make the Z/scope field printable\nctags: Warning: though Z/scope field is enabled, s field is not enabled\ni\tinput.c\t/^\tint i;$/;\"\tscope:struct:s\ns\tinput.c\t/^struct s {$/\n" }, { "path": "Tmain/combination-of-fields-zkK.d/input.c", "content": "struct s {\n\tint i;\n};\n" }, { "path": "Tmain/combination-of-fields-zkK.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '# z only'\n$CTAGS --quiet --options=NONE --fields=z -o - input.c 2>&1 \\\n\t| sed -e 's/\\.exe//g' \\\n\t| sort\n\n# The last sort is needed because the order of lines from stdout and\n# that from stderr is not stable.\n" }, { "path": "Tmain/combination-of-fields-zkK.d/stdout-expected.txt", "content": "# z only\nctags: Warning: enable the K field to make the z/kind field printable\nctags: Warning: though z/kind field is enabled, neither k nor K field is not enabled\ni\tinput.c\t/^\tint i;$/;\"\tkind:member\ns\tinput.c\t/^struct s {$/;\"\tkind:struct\n" }, { "path": "Tmain/common-prelude.d/aindex.expected", "content": "(0)\nfalse\n(1)\ntrue\n0\n(2)\ntrue\n1\n(3)\ntrue\n2\n(4)\nfalse\n(-)\nfalse\n(0a)\ntrue\n0\n(1a)\ntrue\n1\n" }, { "path": "Tmain/common-prelude.d/aindex.ps", "content": "(0) ==\n[1 2 3] 0 _aindex pstack clear\n\n(1) ==\n[1 2 3] 1 _aindex pstack clear\n\n(2) ==\n[1 2 3] 2 _aindex pstack clear\n\n(3) ==\n[1 2 3] 3 _aindex pstack clear\n\n(4) ==\n[1 2 3] 4 _aindex pstack clear\n\n(-) ==\n[] /a _aindex pstack clear\n\n(0a) ==\n[/a] /a _aindex pstack clear\n\n(1a) ==\n[/b /a /b] /a _aindex pstack clear\n" }, { "path": "Tmain/common-prelude.d/amember.expected", "content": "[/a /b /c]\ntrue\ntrue\ntrue\nfalse\n[1 true (abc)]\ntrue\nfalse\ntrue\nfalse\ntrue\nfalse\n" }, { "path": "Tmain/common-prelude.d/amember.ps", "content": "[/a /b /c] ==\n[/a /b /c] /a _amember ==\n[/a /b /c] /b _amember ==\n[/a /b /c] /c _amember ==\n[/a /b /c] /d _amember ==\n[1 true (abc)] ==\n[1 true (abc)] 1 _amember ==\n[1 true (abc)] 2 _amember ==\n[1 true (abc)] true _amember ==\n[1 true (abc)] false _amember ==\n[1 true (abc)] (abc) _amember ==\n[1 true (abc)] (efg) _amember ==\n" }, { "path": "Tmain/common-prelude.d/buildstring.expected", "content": "(abcdefghijklm)\n" }, { "path": "Tmain/common-prelude.d/buildstring.ps", "content": "[\n ?a\n ?b\n ?c (d) 0 get\n (efg)\n ?h\n ?i\n ?j\n (klm)\n _buildstring pstack clear\n" }, { "path": "Tmain/common-prelude.d/chop.expected", "content": "(abcx)\n(abc)\n(abc )\n(abc)\n(abcx)\n(abcx)\n" }, { "path": "Tmain/common-prelude.d/chop.ps", "content": "(abcx) ==\n(abcx) _chop pstack clear\n\n(abc ) ==\n(abc ) _chop_space pstack clear\n\n(abcx) ==\n(abcx) _chop_space pstack clear\n" }, { "path": "Tmain/common-prelude.d/dedup.expected", "content": "(===)\n32\n(===)\n41\n32\n(===)\n32\n41\n(===)\n32\n(===)\n41\n(===)\n/a\n32\n(===)\n[]\n32\n" }, { "path": "Tmain/common-prelude.d/dedup.ps", "content": "/result { (===) pstack clear } def\n\n32 32 _dedup_spaces result\n32 41 _dedup_spaces result\n41 32 _dedup_spaces result\n 32 _dedup_spaces result\n 41 _dedup_spaces result\n\n32 /a _dedup_spaces result\n32 [] _dedup_spaces result\n" }, { "path": "Tmain/common-prelude.d/dedup_spaces.expected", "content": "32\n97\n32\n98\n32\n97\n" }, { "path": "Tmain/common-prelude.d/dedup_spaces.ps", "content": "?a ?\\_ ( ) 0 get _dedup_spaces pstack clear\n?a ?\\_ ?b ( ) 0 get _dedup_spaces pstack clear\n" }, { "path": "Tmain/common-prelude.d/ndup.expected", "content": "(abc)\n(efg)\n(efg)\n(xyz)\n(xyz)\n(xyz)\n(xyz)\n" }, { "path": "Tmain/common-prelude.d/ndup.ps", "content": "(abc) 0 _ndup pstack clear\n(efg) 1 _ndup pstack clear\n(xyz) 3 _ndup pstack clear\n" }, { "path": "Tmain/common-prelude.d/normalize_spaces.expected", "content": "(0abc, d, efg, hij)\n(1abc, d, efg, hij)\n" }, { "path": "Tmain/common-prelude.d/normalize_spaces.ps", "content": "/x (0abc,\\t\\t\\n \\nd,\\f\\f\\v\\f\\v\\r\\r\\r\\n efg, hij) def\nx _normalize_spaces! x pstack clear\n\n(1abc,\\t\\t\\n \\nd,\\f\\f\\v\\f\\v\\r\\r\\r\\n efg, hij) dup\n_normalize_spaces! pstack clear\n" }, { "path": "Tmain/common-prelude.d/putlast.expected", "content": "(abcdefgh)\n" }, { "path": "Tmain/common-prelude.d/putlast.ps", "content": "/a (abc) def\n\na ?d _putlast!\na (efg) _putlast!\na ?h _putlast!\na ==\n" }, { "path": "Tmain/common-prelude.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\nOPTSCRIPT=$4\n\n. ../utils.sh\n\nif ! [ -x \"${OPTSCRIPT}\" ]; then\n\tskip \"no optscript\"\nfi\n\nrm -f ${BUILDDIR}/*.{in,out}.tmp\n\nfor t in $(ls *.ps); do\n\ti=${BUILDDIR}/${t}.in.tmp\n\to=${BUILDDIR}/${t}.out.tmp\n\te=$(basename $t .ps).expected\n\n printf \"%s\" \"${t}...\"\n\n\t{\n\t\t${CTAGS} --quiet --options=NONE --_dump-prelude\n\t\techo\n\t\tcat $t\n\t} > $i\n\n\t${OPTSCRIPT} $i > $o 2>&1\n\ts=$?\n\techo \"$s\"\n\n\tif [ $s != 0 ]; then\n\t\tcontinue\n\tfi\n\tif diff -ruN --strip-trailing-cr $e $o; then\n\t\trm $i\n\t\trm $o\n\tfi\ndone\n" }, { "path": "Tmain/common-prelude.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/common-prelude.d/stdout-expected.txt", "content": "aindex.ps...0\namember.ps...0\nbuildstring.ps...0\nchop.ps...0\ndedup.ps...0\ndedup_spaces.ps...0\nndup.ps...0\nnormalize_spaces.ps...0\nputlast.ps...0\ntr.ps...0\n" }, { "path": "Tmain/common-prelude.d/tr.expected", "content": "(a-b-c)\n(x-y-z)\n" }, { "path": "Tmain/common-prelude.d/tr.ps", "content": "/x (a\\nb\\n\\c) def\nx (\\n-) _tr! x ==\n\n(x\\ny\\nz) dup (\\n-) _tr! ==\n" }, { "path": "Tmain/cxx-how-kinds-defs-are-shared-or-copyed.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nprintf \"[C] enabling in C: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C=+f --list-kinds=C | grep ^f\n\nprintf \"[C] disabling in C: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C=-f --list-kinds=C | grep ^f\n\nprintf \"[C++] enabling in C: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C=+f --list-kinds=C++ | grep ^f\n\nprintf \"[C++] disabling in C: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C=-f --list-kinds=C++ | grep ^f\n\nprintf \"[C] enabling in C++: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C++=+f --list-kinds=C | grep ^f\n\nprintf \"[C] disabling in C++: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C++=-f --list-kinds=C | grep ^f\n\nprintf \"[C++] enabling in C++: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C++=+f --list-kinds=C++ | grep ^f\n\nprintf \"[C++] disabling in C++: \"\n${CTAGS} --quiet --options=NONE \\\n\t --kinds-C++=-f --list-kinds=C++ | grep ^f\n" }, { "path": "Tmain/cxx-how-kinds-defs-are-shared-or-copyed.d/stdout-expected.txt", "content": "[C] enabling in C: f function definitions\n[C] disabling in C: f function definitions [off]\n[C++] enabling in C: f function definitions\n[C++] disabling in C: f function definitions [off]\n[C] enabling in C++: f function definitions\n[C] disabling in C++: f function definitions [off]\n[C++] enabling in C++: f function definitions\n[C++] disabling in C++: f function definitions [off]\n" }, { "path": "Tmain/disable-fixed-field.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/disable-fixed-field.d/input.c", "content": "" }, { "path": "Tmain/disable-fixed-field.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --fields=-N -o - input.c\n${CTAGS} --quiet --options=NONE --fields=-F -o - input.c\n${CTAGS} --quiet --options=NONE --fields=-P -o - input.c\n${CTAGS} --quiet --options=NONE --fields=-'{name}' -o - input.c\n${CTAGS} --quiet --options=NONE --fields=-'{input}' -o - input.c\n${CTAGS} --quiet --options=NONE --fields=-'{pattern}' -o - input.c\n" }, { "path": "Tmain/disable-fixed-field.d/stderr-expected.txt", "content": "ctags: Warning: Cannot disable fixed field: 'N'{name} in ctags output mode\nctags: Warning: Cannot disable fixed field: 'F'{input} in ctags output mode\nctags: Warning: Cannot disable fixed field: 'P'{pattern} in ctags output mode\nctags: Warning: Cannot disable fixed field: 'N'{name} in ctags output mode\nctags: Warning: Cannot disable fixed field: 'F'{input} in ctags output mode\nctags: Warning: Cannot disable fixed field: 'P'{pattern} in ctags output mode\n" }, { "path": "Tmain/disable-fixed-field.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/disable-languages.d/input-matlab.m", "content": "# -*- matlab -*-\n" }, { "path": "Tmain/disable-languages.d/input-objc.m", "content": "#error -*- objc -*-\n" }, { "path": "Tmain/disable-languages.d/input.m", "content": "" }, { "path": "Tmain/disable-languages.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\necho '# FILE NAME ONLY'\n# extension `m' matches both matlab and objc.\n# matlab wins by the alphabetical order of parser names\n${CTAGS} --quiet --options=NONE -G --print-language input.m\n\n# extension `m' matches only objc because matlab is disabled.\n${CTAGS} --quiet --options=NONE -G --languages=-MatLab --print-language input.m\n\n# extension `m' matches only matlab because objc is disabled.\n${CTAGS} --quiet --options=NONE -G --languages=-ObjectiveC --print-language input.m\n\n# extension `m' matches no parser because the both objc and matlab\n# are disabled.\n${CTAGS} --quiet --options=NONE -G --languages=-ObjectiveC,-MatLab --print-language input.m\n${CTAGS} --quiet --options=NONE -G --languages=-MatLab,-ObjectiveC --print-language input.m\n\necho '# EMACS MODE: MATLAB'\n# extension `m' matches both matlab and objc.\n# matlab wins by emacs modeline written in the input file.\n${CTAGS} --quiet --options=NONE -G --print-language input-matlab.m\n\n# extension `m' matches only objc. That's all.\n${CTAGS} --quiet --options=NONE -G --languages=-MatLab --print-language input-matlab.m\n\n# extension `m' matches only matlab. That's all.\n${CTAGS} --quiet --options=NONE -G --languages=-ObjectiveC --print-language input-matlab.m\n\n# extension `m' matches no parser because the both objc and matlab\n# are disabled. That's all. ctags has no chance to read the file contents.\n${CTAGS} --quiet --options=NONE -G --languages=-ObjectiveC,-MatLab --print-language input-matlab.m\n${CTAGS} --quiet --options=NONE -G --languages=-MatLab,-ObjectiveC --print-language input-matlab.m\n\necho '# EMACS MODE: OBJC'\n# extension `m' matches both matlab and objc.\n# objc wins by emacs modeline written in the input file.\n${CTAGS} --quiet --options=NONE -G --print-language input-objc.m\n\n# extension `m' matches only objc. That's all.\n${CTAGS} --quiet --options=NONE -G --languages=-MatLab --print-language input-objc.m\n\n# extension `m' matches only matlab. That's all.\n${CTAGS} --quiet --options=NONE -G --languages=-ObjectiveC --print-language input-objc.m\n\n# extension `m' matches no parser because the both objc and matlab\n# are disabled. That's all. ctags has no chance to read the file contents.\n${CTAGS} --quiet --options=NONE -G --languages=-ObjectiveC,-MatLab --print-language input-objc.m\n${CTAGS} --quiet --options=NONE -G --languages=-MatLab,-ObjectiveC --print-language input-objc.m\n" }, { "path": "Tmain/disable-languages.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/disable-languages.d/stdout-expected.txt", "content": "# FILE NAME ONLY\ninput.m: MatLab\ninput.m: ObjectiveC\ninput.m: MatLab\ninput.m: NONE\ninput.m: NONE\n# EMACS MODE: MATLAB\ninput-matlab.m: MatLab\ninput-matlab.m: ObjectiveC\ninput-matlab.m: MatLab\ninput-matlab.m: NONE\ninput-matlab.m: NONE\n# EMACS MODE: OBJC\ninput-objc.m: ObjectiveC\ninput-objc.m: ObjectiveC\ninput-objc.m: MatLab\ninput-objc.m: NONE\ninput-objc.m: NONE\n" }, { "path": "Tmain/dot-ctags-with-indentation.d/args.ctags", "content": "--_echo=A-begin\n\t--_echo=A-with-tab\n --_echo=A-with-spaces\n--_echo=B-begin\n\n" }, { "path": "Tmain/dot-ctags-with-indentation.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/dot-ctags-with-indentation.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --options=NONE --options=./args.ctags --_force-quit=0\nexit $?\n" }, { "path": "Tmain/dot-ctags-with-indentation.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Notice: A-begin\nctags: Notice: A-with-tab\nctags: Notice: A-with-spaces\nctags: Notice: B-begin\n" }, { "path": "Tmain/dot-ctags-with-indentation.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/dynamic-kinds.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/dynamic-kinds.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE\t\t\t\t\t\t\\\n\t\t --langdef=X --kinddef-X='a,anchor,anchors'\t\\\n\t\t --kinddef-X='b,batch,batches'\t\t\t\t\\\n\t\t --list-kinds-full=X\nexit $?\n" }, { "path": "Tmain/dynamic-kinds.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/dynamic-kinds.d/stdout-expected.txt", "content": "#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\na anchor yes no 0 NONE 0 anchors\nb batch yes no 0 NONE 0 batches\n" }, { "path": "Tmain/e-ctags-output.d/input_file.cc", "content": "/* Could NOT be parsed well.\n The signature should be recorded well. */\nint32 test(int32 a)\n{\n return 0;\n}\n/* Can be parsed */\nint32 test2(void)\n{\n return 0;\n}\n\n/* A tab is included in signature.\n However, it should be recorded well after converting\n the tab to a whitespace. */\nint32 test3(int32\ta)\n{\n return 0;\n}\n\n/* A newline is included in signature.\n However, it should be recorded well after converting\n the newline to a whitespace. */\nint32 test4(int32\na)\n{\n return 0;\n}\n" }, { "path": "Tmain/e-ctags-output.d/input_scope.rst", "content": "===========\ntitle\n===========\n\n\nX\ttab\tY\n===========\nThis one will not be recorded.\n\ntopic in tab\n----------------------\nThis one will not be recorded if --fileds=+s is given\nbecause a tab char is in the scope field.\n\nX space Y\n===========\nThis one will be recorded.\n\ntopic in space\n----------------------\nThis one will be recorded.\n" }, { "path": "Tmain/e-ctags-output.d/input_space.rst", "content": "===================================\nA spaces B\n===================================\nThs should be recorded in e-ctags output.\n" }, { "path": "Tmain/e-ctags-output.d/input_tab.rst", "content": "===================================\nA\ttabs\tB\n===================================\nThs should not be recorded in e-ctags output.\n" }, { "path": "Tmain/e-ctags-output.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n# The original bug is reported by @elecalion in #2014.\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\ntmp=\"input file.cc\"\n\nrun()\n{\n\techo '#'\n\techo '#' with $1\n\techo '#'\n\n\tcp input_file.cc $BUILDDIR/\"${tmp}\"\n\tif ! direq_maybe $BUILDDIR .; then\n\t\tfor f in input_*.rst; do\n\t\t\tif ! [ -e $BUILDDIR/$f ]; then\n\t\t\t\tcp $f $BUILDDIR\n\t\t\t\tcopied=yes\n\t\t\tfi\n\t\tdone\n\tfi\n\t(\n\t\tcd $BUILDDIR\n\t\t\"${CTAGS}\" --quiet --options=NONE ${1} --output-format=e-ctags \\\n\t\t\t\t --kinds-c++=+p --fields=+iaSs \\\n\t\t\t\t -o - \\\n\t\t\t\t \"${tmp}\" \\\n\t\t\t\t input_tab.rst input_space.rst\n\t\trm -f \"${tmp}\"\n\n\t\techo \"# WITH SCOPE\"\n\t\t\"${CTAGS}\" --quiet --options=NONE ${1} --output-format=e-ctags \\\n\t\t\t\t --fields=+s \\\n\t\t\t\t -o - \\\n\t\t\t\t input_scope.rst\n\n\t\techo \"# WITHOUT SCOPE\"\n\t\t\"${CTAGS}\" --quiet --options=NONE ${1} --output-format=e-ctags \\\n\t\t\t\t --fields=-s \\\n\t\t\t\t -o - \\\n\t\t\t\t input_scope.rst\n\n\t\tif [ \"$copied\" = \"yes\" ]; then\n\t\t\trm -f input_*.rst\n\t\tfi\n\t)\n}\n\nrun \"--sort=yes\"\nrun \"--sort=no\"\n" }, { "path": "Tmain/e-ctags-output.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/e-ctags-output.d/stdout-expected.txt", "content": "#\n# with --sort=yes\n#\nA spaces B\tinput_space.rst\t/^A spaces B$/;\"\tH\ntest\tinput file.cc\t/^int32 test(int32 a)$/;\"\tf\ttyperef:typename:int32\tsignature:(int32 a)\ntest2\tinput file.cc\t/^int32 test2(void)$/;\"\tf\ttyperef:typename:int32\tsignature:(void)\ntest3\tinput file.cc\t/^int32 test3(int32\ta)$/;\"\tf\ttyperef:typename:int32\tsignature:(int32 a)\ntest4\tinput file.cc\t/^int32 test4(int32$/;\"\tf\ttyperef:typename:int32\tsignature:(int32 a)\n# WITH SCOPE\nX space Y\tinput_scope.rst\t/^X space Y$/;\"\tc\ttitle:title\ntitle\tinput_scope.rst\t/^title$/;\"\tH\ntopic in space\tinput_scope.rst\t/^topic in space$/;\"\ts\tchapter:X space Y\n# WITHOUT SCOPE\nX space Y\tinput_scope.rst\t/^X space Y$/;\"\tc\ntitle\tinput_scope.rst\t/^title$/;\"\tH\ntopic in space\tinput_scope.rst\t/^topic in space$/;\"\ts\ntopic in tab\tinput_scope.rst\t/^topic in tab$/;\"\ts\n#\n# with --sort=no\n#\ntest\tinput file.cc\t/^int32 test(int32 a)$/;\"\tf\ttyperef:typename:int32\tsignature:(int32 a)\ntest2\tinput file.cc\t/^int32 test2(void)$/;\"\tf\ttyperef:typename:int32\tsignature:(void)\ntest3\tinput file.cc\t/^int32 test3(int32\ta)$/;\"\tf\ttyperef:typename:int32\tsignature:(int32 a)\ntest4\tinput file.cc\t/^int32 test4(int32$/;\"\tf\ttyperef:typename:int32\tsignature:(int32 a)\nA spaces B\tinput_space.rst\t/^A spaces B$/;\"\tH\n# WITH SCOPE\ntitle\tinput_scope.rst\t/^title$/;\"\tH\nX space Y\tinput_scope.rst\t/^X space Y$/;\"\tc\ttitle:title\ntopic in space\tinput_scope.rst\t/^topic in space$/;\"\ts\tchapter:X space Y\n# WITHOUT SCOPE\ntitle\tinput_scope.rst\t/^title$/;\"\tH\ntopic in tab\tinput_scope.rst\t/^topic in tab$/;\"\ts\nX space Y\tinput_scope.rst\t/^X space Y$/;\"\tc\ntopic in space\tinput_scope.rst\t/^topic in space$/;\"\ts\n" }, { "path": "Tmain/early--version-opt-processing.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/early--version-opt-processing.d/run.sh", "content": "# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\nremove_ctags_d=y\nif [ -d $BUILDDIR/.ctags.d ]; then\n remove_ctags_d=n\nfi\n\ndefc_ctags=tmain_defc.ctags\nmkdir -p $BUILDDIR/.ctags.d\necho \"--langdef=C\" > $BUILDDIR/.ctags.d/\"$defc_ctags\"\n\n(cd $BUILDDIR; \"${CTAGS}\" --version;) > /dev/null\nstatus=$?\n\nrm $BUILDDIR/.ctags.d/\"$defc_ctags\"\nif [ \"$remove_ctags_d\" = y ]; then\n\trmdir $BUILDDIR/.ctags.d\nfi\n\nexit \"$status\"\n" }, { "path": "Tmain/early--version-opt-processing.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/early--version-opt-processing.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/emacs-modeline-downcased-mode.d/exti-expected.txt", "content": "0\n" }, { "path": "Tmain/emacs-modeline-downcased-mode.d/functions", "content": "# -*-Shell-script-*-\n\n#\n# This is found in /etc/init.d/functions of Fedora23.\n#\n# This test case is special as as case for modeline\n# testing:\n#\n# 1. No whitespace between modename and -*-, and\n# 2. Capitalized\n#\n" }, { "path": "Tmain/emacs-modeline-downcased-mode.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n$CTAGS --options=NONE --quiet -G --print-language ./functions\n\n" }, { "path": "Tmain/emacs-modeline-downcased-mode.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n" }, { "path": "Tmain/emacs-modeline-downcased-mode.d/stdout-expected.txt", "content": "./functions: Sh\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-head.d/input", "content": "/* -*- mode: C++; eval: (auto-fill-mode 1); -*- */\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-head.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n$CTAGS --quiet --options=NONE -G --print-language input\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-head.d/stdout-expected.txt", "content": "input: C++\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-head2.d/input", "content": "/* -*- C++ -*- */\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-head2.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n$CTAGS --quiet --options=NONE -G --print-language input\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-head2.d/stdout-expected.txt", "content": "input: C++\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-tail.d/input", "content": "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n/* Local Variables: */\n/* mode: c++ */\n/* comment-column: 0 */\n/* End: */\n\n\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-tail.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n$CTAGS --quiet --options=NONE -G --print-language input\n" }, { "path": "Tmain/emacs-modeline-non-alnum-in-tail.d/stdout-expected.txt", "content": "input: C++\n" }, { "path": "Tmain/emacs-modeline-uppercased-marker.d/exti-expected.txt", "content": "0\n" }, { "path": "Tmain/emacs-modeline-uppercased-marker.d/macros", "content": "# -*- Mode: rpm-spec; indent-tabs-mode: nil -*- */\n# SPDX-License-Identifier: LGPL-2.1+\n#\n# This file is part of systemd.\n\n# RPM macros for packages installing systemd unit files\n" }, { "path": "Tmain/emacs-modeline-uppercased-marker.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n$CTAGS --options=NONE --quiet -G --print-language ./macros\n" }, { "path": "Tmain/emacs-modeline-uppercased-marker.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n" }, { "path": "Tmain/emacs-modeline-uppercased-marker.d/stdout-expected.txt", "content": "./macros: RpmSpec\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-firstline0.unknown", "content": "# -*- mode: sh; eval: (sh-set-shell \"zsh\") -*-\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-firstline1.unknown", "content": "# -*- mode: shell-script; sh-set-shell: zsh -*-\n# Emacs doesn't understand this notation but I found one in\n# https://github.com/neumachen/dotfiles/blob/3e2b04249f852dbdf7dee1e33e518de61031eb04/private_dot_config/exact_zsh/dot_zprofile\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-firstline2.unknown", "content": "# -*- mode: sh; eval: (sh-set-shell \"bash\") -*-\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-firstline3.unknown", "content": "# -*- mode: shell-script; sh-set-shell: bash -*-\n# Emacs doesn't understand this notation but I found one in\n# https://github.com/neumachen/dotfiles/blob/3e2b04249f852dbdf7dee1e33e518de61031eb04/private_dot_config/exact_zsh/dot_zprofile\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-firstline4.unknown", "content": "# -*- mode: sh -*-\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-firstline5.unknown", "content": "# -*- mode: shell-script -*-\n# Emacs doesn't understand this notation but I found one in\n# https://github.com/neumachen/dotfiles/blob/3e2b04249f852dbdf7dee1e33e518de61031eb04/private_dot_config/exact_zsh/dot_zprofile\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-lastlist0.unknown", "content": "# Local Variables:\n# mode: sh\n# eval: (sh-set-shell \"zsh\")\n# End:\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-lastlist1.unknown", "content": "# Local Variables:\n# mode: sh\n# eval: (sh-set-shell \"bash\")\n# End:\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/input-lastlist2.unknown", "content": "# Local Variables:\n# mode: sh\n# End:\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/run.sh", "content": "# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nfor f in input-firstline0.unknown \\\n\t\t\t input-firstline1.unknown \\\n\t\t\t input-firstline2.unknown \\\n\t\t\t input-firstline3.unknown \\\n\t\t\t input-firstline4.unknown \\\n\t\t\t input-firstline5.unknown \\\n\t\t\t input-lastlist0.unknown \\\n\t\t\t input-lastlist1.unknown \\\n\t\t\t input-lastlist2.unknown \\\n\t\t ; do\n\t$CTAGS --quiet --options=NONE -G --print-language $f\ndone\n" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/emacs-modline-shell-script-zsh.d/stdout-expected.txt", "content": "input-firstline0.unknown: Zsh\ninput-firstline1.unknown: Zsh\ninput-firstline2.unknown: Sh\ninput-firstline3.unknown: Sh\ninput-firstline4.unknown: Sh\ninput-firstline5.unknown: Sh\ninput-lastlist0.unknown: Zsh\ninput-lastlist1.unknown: Sh\ninput-lastlist2.unknown: Sh\n" }, { "path": "Tmain/enable-kind-postfix-with-wildcard.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE '--kinds-all=*' --list-kinds | grep '\\[off\\]'\n\n" }, { "path": "Tmain/enable-kind-postfix-with-wildcard.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/enable-kind-postfix-with-wildcard.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/enable-kind-postfix.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE --kinds-c=+l-f --list-kinds=C | grep '^[fl]'\n\n\n\n" }, { "path": "Tmain/enable-kind-postfix.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/enable-kind-postfix.d/stdout-expected.txt", "content": "f function definitions [off]\nl local variables\n" }, { "path": "Tmain/enable-kind-prefix-with-wildcard.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE --kinds-all='*' --list-kinds | grep '\\[off\\]'\n\n" }, { "path": "Tmain/enable-kind-prefix-with-wildcard.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/enable-kind-prefix-with-wildcard.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/enable-kind-prefix.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE --kinds-c=+l-f --list-kinds=C | grep '^[fl]'\n" }, { "path": "Tmain/enable-kind-prefix.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/enable-kind-prefix.d/stdout-expected.txt", "content": "f function definitions [off]\nl local variables\n" }, { "path": "Tmain/enable-non-existing-kind.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE --kinds-C=+Z --_force-quit\n\n" }, { "path": "Tmain/enable-non-existing-kind.d/stderr-expected.txt", "content": "ctags: Warning: Unsupported kind: 'Z' for --kinds-C option\n" }, { "path": "Tmain/epoch-field.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nO0=/tmp/ctags-tstamp-$$.c\nO1=/tmp/ctags-tstamp-$$.h\nO2=/tmp/ctags-tstamp-$$.m\n\ncat > $O0 < $O1 < $O2 <\nEOF\n\nis_json_avaiable()\n{\n\t$1 --quiet --options=NONE --with-list-header=no --list-features | grep -q \"json\"\n}\n\nrun()\n{\n\tlocal o=$1\n\tlocal t=$2\n\tshift 2\n\tlocal s\n\n\techo $t\n\tTZ=UTC+00:00 touch -t '200402291621.42' $o &&\n\t\t$CTAGS \"$@\" --kinds-C= --extras=f --fields=T -o - $o \\\n\t\t\t| sed -e 's/.*\\(epoch:.*\\)/tags:\\1/' &&\n\t\t$CTAGS \"$@\" --kinds-C= --extras=f --fields=T -o - -x --_xformat=\"xref:epoch:%T\" $o &&\n\t\t{\n\t\t\tif is_json_avaiable $CTAGS; then\n\t\t\t\t$CTAGS \"$@\" --kinds-C= --extras=f --fields=T -o - --output-format=json $o \\\n\t\t\t\t\t| sed -e 's/.*\"epoch\": \\([0-9]*\\).*/json:epoch:\\1/'\n\t\t\telse\n\t\t\t\techo \"json:epoch:1078071702\"\n\t\t\tfi\n\t\t}\n\ts=$?\n\trm $o\n\treturn $s\n}\n\nrun $O0 \".c file\" --quiet --options=NONE && run $O1 \".h file\" --quiet --options=NONE && run $O2 \".m file\" --quiet --options=NONE -G\nexit $?\n" }, { "path": "Tmain/epoch-field.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/epoch-field.d/stdout-expected.txt", "content": ".c file\ntags:epoch:1078071702\nxref:epoch:1078071702\njson:epoch:1078071702\n.h file\ntags:epoch:1078071702\nxref:epoch:1078071702\njson:epoch:1078071702\n.m file\ntags:epoch:1078071702\nxref:epoch:1078071702\njson:epoch:1078071702\n" }, { "path": "Tmain/errors-about-parser-specific-extras.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\nO=\"--quiet --options=NONE --with-list-header=no\"\n\necho '#lang' 1>&2\n${CTAGS} ${O} --extras-NOSUCHLANG=-'{whitespaceSwapped}' --list-extras\n${CTAGS} ${O} --extras-NOSUCHLANG=-'{whitespaceSwapped}' --list-extras=\n${CTAGS} ${O} --extras-Robot=-'{whitespaceSwapped}' --list-extras=NOSUCHLANG\n\necho '#extras' 1>&2\n${CTAGS} ${O} --extras-Robot=-'{NOSUCHEXTRA}' --list-extras\n${CTAGS} ${O} --extras-Robot=-'{NOSUCHEXTRA}' --list-extras=\n${CTAGS} ${O} --extras-Robot=-'{NOSUCHEXTRA}' --list-extras=NOSUCHLANG\n\necho '#null' 1>&2\n${CTAGS} ${O} --extras-= --list-extras\n\n# not an error, just set all extras to false.\n${CTAGS} ${O} --extras-Robot= --list-extras\n\n${CTAGS} ${O} --extras-Robot=-'{whitespaceSwapped}' --list-extras=\n\necho '#null null' 1>&2\n\n# About --extras-Robot=, not an error, just set all extras to false.\n${CTAGS} ${O} --extras-Robot= --list-extras=\n${CTAGS} ${O} --extras-= --list-extras=\n" }, { "path": "Tmain/errors-about-parser-specific-extras.d/stderr-expected.txt", "content": "#lang\nctags: Warning: Unknown language: NOSUCHLANG (ignoring \"--extras-NOSUCHLANG\")\nctags: Warning: Unknown language: NOSUCHLANG (ignoring \"--extras-NOSUCHLANG\")\nctags: Unknown language \"NOSUCHLANG\" in \"list-extras\" option\n#extras\nctags: no such extra: 'NOSUCHEXTRA'\nctags: no such extra: 'NOSUCHEXTRA'\nctags: no such extra: 'NOSUCHEXTRA'\n#null\nctags: No language given in \"extras-\" option\n#null null\nctags: No language given in \"extras-\" option\n" }, { "path": "Tmain/errors-if-tags-exits-as-directory.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/errors-if-tags-exits-as-directory.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE $0\n" }, { "path": "Tmain/errors-if-tags-exits-as-directory.d/stderr-expected.txt", "content": "ctags: \"tags\" already exists as a directory; I cannot write tag entries there.\nRemove the directory or specify a file name with -o option.\n" }, { "path": "Tmain/errors-if-tags-exits-as-directory.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/errors-in-options-roles.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\nstatus ()\n{\n\techo \"status: $1\"\n} 1>&2\n\ntitle()\n{\n echo\n echo '#'\n\tfor x in \"$@\"; do\n\t\techo '#' $x\n\tdone\n echo '#'\n} 1>&2\n\nrun()\n{\n\ttitle \"$@\"\n\t${CTAGS} --quiet --options=NONE \"$@\" --_force-quit=42\n\tstatus $?\n}\nrun '--roles-all=something'\n\nrun '--roles-all.*=something'\n\nrun '--roles-all.?='\n\nrun '--roles-NoSuchLang='\n\nrun '--roles-NoSuchLang.*='\nrun '--roles-NoSuchLang=+{role}'\nrun '--roles-NoSuchLang=-{role}'\n\nrun '--roles-C={role}'\nrun '--roles-C=+{role}'\nrun '--roles-C=-{role}'\n\nrun '--roles-C.*={role}'\nrun '--roles-C.*=+{role}'\nrun '--roles-C.*=-{role}'\n\nrun '--roles-C.{header='\nrun '--roles-C.{file}='\nrun '--roles-C.{noSuchKind}='\nrun '--roles-C.{header}x='\n\nrun '--roles-C.F='\n\n# run '--roles-C.X='\ntitle \"unknown kind letter x\"\n${CTAGS} --quiet --options=NONE --langdef=MyLang --roles-MyLang.X= --_force-quit=42\nstatus $?\n\nrun '--roles-C.fx='\nrun '--roles-C.?='\n\nrun '--roles-C.h={system'\nrun '--roles-C.h=+{system'\nrun '--roles-C.h=-{system'\nrun '--roles-C.h={system}{local'\nrun '--roles-C.h=+{system}{local'\nrun '--roles-C.h=-{system}{local'\nrun '--roles-C.h={system{local}'\nrun '--roles-C.h=+{system{local}'\nrun '--roles-C.h=-{system{local}'\n\nrun '--roles-C.{header}={system'\nrun '--roles-C.{header}=+{system'\nrun '--roles-C.{header}=-{system'\nrun '--roles-C.{header}={system}{local'\nrun '--roles-C.{header}=+{system}{local'\nrun '--roles-C.{header}=-{system}{local'\nrun '--roles-C.{header}={system{local}'\nrun '--roles-C.{header}=+{system{local}'\nrun '--roles-C.{header}=-{system{local}'\n\nrun '--roles-C.h={noSuchRole}'\nrun '--roles-C.h=+{noSuchRole}'\nrun '--roles-C.h=-{noSuchRole}'\nrun '--roles-C.h={system}{noSuchRole}'\nrun '--roles-C.h={noSuchRole}'\nrun '--roles-C.h=+{system}{noSuchRole}'\nrun '--roles-C.h=-{system}{noSuchRole}'\nrun '--roles-C.h=+{system}-{noSuchRole}'\nrun '--roles-C.h=-{system}+{noSuchRole}'\n\nrun '--roles-C.{header}={noSuchRole}'\nrun '--roles-C.{header}=+{noSuchRole}'\nrun '--roles-C.{header}=-{noSuchRole}'\nrun '--roles-C.{header}={system}{noSuchRole}'\nrun '--roles-C.{header}={noSuchRole}'\nrun '--roles-C.{header}=+{system}{noSuchRole}'\nrun '--roles-C.{header}=-{system}{noSuchRole}'\nrun '--roles-C.{header}=+{system}-{noSuchRole}'\nrun '--roles-C.{header}=-{system}+{noSuchRole}'\n\nrun '--roles-C.h=x{system}'\nrun '--roles-C.h=+x{system}'\nrun '--roles-C.h=-x{system}'\nrun '--roles-C.h=x+{system}'\nrun '--roles-C.h=+x+{system}'\nrun '--roles-C.h=-x+{system}'\nrun '--roles-C.h=x-{system}'\nrun '--roles-C.h=+x-{system}'\nrun '--roles-C.h=-x+-system}'\n\nrun '--roles-C.{header}=x{system}'\nrun '--roles-C.{header}=+x{system}'\nrun '--roles-C.{header}=-x{system}'\nrun '--roles-C.{header}=x+{system}'\nrun '--roles-C.{header}=+x+{system}'\nrun '--roles-C.{header}=-x+{system}'\nrun '--roles-C.{header}=x-{system}'\nrun '--roles-C.{header}=+x-{system}'\nrun '--roles-C.{header}=-x+-system}'\n" }, { "path": "Tmain/errors-in-options-roles.d/stderr-expected.txt", "content": "\n#\n# --roles-all=something\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-all: something\nstatus: 1\n\n#\n# --roles-all.*=something\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-all.*: something\nstatus: 1\n\n#\n# --roles-all.?=\n#\nctags: only '*' or '' (empty string) is acceptable as a kind spec for --roles-all: --roles-all.?\nstatus: 1\n\n#\n# --roles-NoSuchLang=\n#\nctags: Warning: unknown language \"NoSuchLang\" in --roles-NoSuchLang option\nstatus: 42\n\n#\n# --roles-NoSuchLang.*=\n#\nctags: Warning: unknown language \"NoSuchLang\" in --roles-NoSuchLang.* option\nstatus: 42\n\n#\n# --roles-NoSuchLang=+{role}\n#\nctags: Warning: unknown language \"NoSuchLang\" in --roles-NoSuchLang option\nstatus: 42\n\n#\n# --roles-NoSuchLang=-{role}\n#\nctags: Warning: unknown language \"NoSuchLang\" in --roles-NoSuchLang option\nstatus: 42\n\n#\n# --roles-C={role}\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-C: {role}\nstatus: 1\n\n#\n# --roles-C=+{role}\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-C: +{role}\nstatus: 1\n\n#\n# --roles-C=-{role}\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-C: -{role}\nstatus: 1\n\n#\n# --roles-C.*={role}\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-C.*: {role}\nstatus: 1\n\n#\n# --roles-C.*=+{role}\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-C.*: +{role}\nstatus: 1\n\n#\n# --roles-C.*=-{role}\n#\nctags: only '*' or '' (empty string) is acceptable as an argument for --roles-C.*: -{role}\nstatus: 1\n\n#\n# --roles-C.{header=\n#\nctags: no '}' representing the end of kind name in --roles-C.{header option: {header\nstatus: 1\n\n#\n# --roles-C.{file}=\n#\nctags: Warning: don't enable/disable a role in F/file kind; it has no role: --roles-C.{file}\nstatus: 42\n\n#\n# --roles-C.{noSuchKind}=\n#\nctags: Warning: no such kind name as specified in --roles-C.{noSuchKind} option\nstatus: 42\n\n#\n# --roles-C.{header}x=\n#\nctags: garbage after the kind specification {header} in --roles-C.{header}x option\nstatus: 1\n\n#\n# --roles-C.F=\n#\nctags: Warning: don't enable/disable a role in F/file kind; it has no role: --roles-C.F\nstatus: 42\n\n#\n# unknown kind letter x\n#\nctags: Warning: no such kind letter as specified in --roles-MyLang.X option\nstatus: 42\n\n#\n# --roles-C.fx=\n#\nctags: garbage after the kind specification 'f' in --roles-C.fx option\nstatus: 1\n\n#\n# --roles-C.?=\n#\nctags: '?', unexpected character in --roles-C.?\nstatus: 1\n\n#\n# --roles-C.h={system\n#\nctags: no '}' representing the end of role name in --roles-C.h option: system\nstatus: 1\n\n#\n# --roles-C.h=+{system\n#\nctags: no '}' representing the end of role name in --roles-C.h option: system\nstatus: 1\n\n#\n# --roles-C.h=-{system\n#\nctags: no '}' representing the end of role name in --roles-C.h option: system\nstatus: 1\n\n#\n# --roles-C.h={system}{local\n#\nctags: no '}' representing the end of role name in --roles-C.h option: local\nstatus: 1\n\n#\n# --roles-C.h=+{system}{local\n#\nctags: no '}' representing the end of role name in --roles-C.h option: local\nstatus: 1\n\n#\n# --roles-C.h=-{system}{local\n#\nctags: no '}' representing the end of role name in --roles-C.h option: local\nstatus: 1\n\n#\n# --roles-C.h={system{local}\n#\nctags: Warning: no such role: \"system{local\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=+{system{local}\n#\nctags: Warning: no such role: \"system{local\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=-{system{local}\n#\nctags: Warning: no such role: \"system{local\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}={system\n#\nctags: no '}' representing the end of role name in --roles-C.{header} option: system\nstatus: 1\n\n#\n# --roles-C.{header}=+{system\n#\nctags: no '}' representing the end of role name in --roles-C.{header} option: system\nstatus: 1\n\n#\n# --roles-C.{header}=-{system\n#\nctags: no '}' representing the end of role name in --roles-C.{header} option: system\nstatus: 1\n\n#\n# --roles-C.{header}={system}{local\n#\nctags: no '}' representing the end of role name in --roles-C.{header} option: local\nstatus: 1\n\n#\n# --roles-C.{header}=+{system}{local\n#\nctags: no '}' representing the end of role name in --roles-C.{header} option: local\nstatus: 1\n\n#\n# --roles-C.{header}=-{system}{local\n#\nctags: no '}' representing the end of role name in --roles-C.{header} option: local\nstatus: 1\n\n#\n# --roles-C.{header}={system{local}\n#\nctags: Warning: no such role: \"system{local\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=+{system{local}\n#\nctags: Warning: no such role: \"system{local\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=-{system{local}\n#\nctags: Warning: no such role: \"system{local\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h={noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=+{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=-{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h={system}{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h={noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=+{system}{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=-{system}{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=+{system}-{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=-{system}+{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}={noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=+{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=-{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}={system}{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}={noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=+{system}{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=-{system}{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=+{system}-{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.{header}=-{system}+{noSuchRole}\n#\nctags: Warning: no such role: \"noSuchRole\" in kind 'h' in language \"C\"\nstatus: 42\n\n#\n# --roles-C.h=x{system}\n#\nctags: unexpected character x in --roles-C.h=x{system} option\nstatus: 1\n\n#\n# --roles-C.h=+x{system}\n#\nctags: unexpected character x in --roles-C.h=+x{system} option\nstatus: 1\n\n#\n# --roles-C.h=-x{system}\n#\nctags: unexpected character x in --roles-C.h=-x{system} option\nstatus: 1\n\n#\n# --roles-C.h=x+{system}\n#\nctags: unexpected character x in --roles-C.h=x+{system} option\nstatus: 1\n\n#\n# --roles-C.h=+x+{system}\n#\nctags: unexpected character x in --roles-C.h=+x+{system} option\nstatus: 1\n\n#\n# --roles-C.h=-x+{system}\n#\nctags: unexpected character x in --roles-C.h=-x+{system} option\nstatus: 1\n\n#\n# --roles-C.h=x-{system}\n#\nctags: unexpected character x in --roles-C.h=x-{system} option\nstatus: 1\n\n#\n# --roles-C.h=+x-{system}\n#\nctags: unexpected character x in --roles-C.h=+x-{system} option\nstatus: 1\n\n#\n# --roles-C.h=-x+-system}\n#\nctags: unexpected character x in --roles-C.h=-x+-system} option\nstatus: 1\n\n#\n# --roles-C.{header}=x{system}\n#\nctags: unexpected character x in --roles-C.{header}=x{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=+x{system}\n#\nctags: unexpected character x in --roles-C.{header}=+x{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=-x{system}\n#\nctags: unexpected character x in --roles-C.{header}=-x{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=x+{system}\n#\nctags: unexpected character x in --roles-C.{header}=x+{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=+x+{system}\n#\nctags: unexpected character x in --roles-C.{header}=+x+{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=-x+{system}\n#\nctags: unexpected character x in --roles-C.{header}=-x+{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=x-{system}\n#\nctags: unexpected character x in --roles-C.{header}=x-{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=+x-{system}\n#\nctags: unexpected character x in --roles-C.{header}=+x-{system} option\nstatus: 1\n\n#\n# --roles-C.{header}=-x+-system}\n#\nctags: unexpected character x in --roles-C.{header}=-x+-system} option\nstatus: 1\n" }, { "path": "Tmain/errors-in-options-roles.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/excmd-combine-backward.d/input.cpp", "content": "static int\nbar(void)\n{\n const int foo = 0;\n\n return foo;\n}\n\nint\nmain(void)\n{\n int foo;\n foo = bar();\n return foo;\n}\n" }, { "path": "Tmain/excmd-combine-backward.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE -o - -B --excmd=combine input.cpp\n" }, { "path": "Tmain/excmd-combine-backward.d/stdout-expected.txt", "content": "bar\tinput.cpp\t2;?^bar(void)$?;\"\tf\ttyperef:typename:int\tfile:\nmain\tinput.cpp\t10;?^main(void)$?;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/excmd-combine.d/input.cpp", "content": "static int\nbar(void)\n{\n const int foo = 0;\n\n return foo;\n}\n\nint\nmain(void)\n{\n int foo;\n foo = bar();\n return foo;\n}\n" }, { "path": "Tmain/excmd-combine.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE -o - --excmd=combine input.cpp\n" }, { "path": "Tmain/excmd-combine.d/stdout-expected.txt", "content": "bar\tinput.cpp\t2;/^bar(void)$/;\"\tf\ttyperef:typename:int\tfile:\nmain\tinput.cpp\t10;/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/extension-vs-pattern.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/extension-vs-pattern.d/input.xxx", "content": "" }, { "path": "Tmain/extension-vs-pattern.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE\t\t\t\\\n\t --print-language\t\t\t\\\n\t --langdef=AAA --map-AAA='(input.xxx)'\t\\\n\t --langdef=BBB --map-BBB=.xxx \t\\\n\t input.xxx &&\n${CTAGS} --quiet --options=NONE\t\t\t\\\n\t --print-language\t\t\t\\\n\t --langdef=AAA --map-AAA=.xxx \t\\\n\t --langdef=BBB --map-BBB='(input.xxx)'\t\\\n\t input.xxx\n\nexit $?\n\n" }, { "path": "Tmain/extension-vs-pattern.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/extension-vs-pattern.d/stdout-expected.txt", "content": "input.xxx: AAA\ninput.xxx: BBB\n" }, { "path": "Tmain/extras-field-for-pseudo-tags.d/input.c", "content": "int main (void) { return 0; }\n" }, { "path": "Tmain/extras-field-for-pseudo-tags.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nrun_ctags()\n{\n\techo '# option: ' \"$@\"\n\t${CTAGS} --quiet --options=NONE \\\n\t\t\t --fields=E --extras=p \\\n\t\t\t --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t\t\t --pseudo-tags=-TAG_PROC_CWD \\\n\t\t\t --pseudo-tags=-TAG_PARSER_VERSION \\\n\t\t\t --pseudo-tags=-TAG_OUTPUT_VERSION \\\n\t\t\t $@ \\\n\t\t\t -o - input.c\n}\n\nrun_ctags --format=1\nrun_ctags --format=2\n" }, { "path": "Tmain/extras-field-for-pseudo-tags.d/stdout-expected.txt", "content": "# option: --format=1\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_FIELD_DESCRIPTION\textras\t/Extra tag type information/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FILE_FORMAT\t1\t/original ctags format/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigncall\t/called in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigndecl\t/declared in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C!struct\tforeigndecl\t/declared in foreign languages/\nmain\tinput.c\t/^int main (void) { return 0; }$/\n# option: --format=2\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/;\"\textras:pseudo\n!_TAG_FIELD_DESCRIPTION\textras\t/Extra tag type information/;\"\textras:pseudo\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/;\"\textras:pseudo\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/;\"\textras:pseudo\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/;\"\textras:pseudo\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/;\"\textras:pseudo\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/;\"\textras:pseudo\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/;\"\textras:pseudo\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/;\"\textras:pseudo\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/;\"\textras:pseudo\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/;\"\textras:pseudo\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/;\"\textras:pseudo\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//;\"\textras:pseudo\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/;\"\textras:pseudo\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/;\"\textras:pseudo\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigncall\t/called in foreign languages/;\"\textras:pseudo\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigndecl\t/declared in foreign languages/;\"\textras:pseudo\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/;\"\textras:pseudo\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/;\"\textras:pseudo\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/;\"\textras:pseudo\n!_TAG_ROLE_DESCRIPTION!C!struct\tforeigndecl\t/declared in foreign languages/;\"\textras:pseudo\nmain\tinput.c\t/^int main (void) { return 0; }$/\n" }, { "path": "Tmain/extras-field.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/extras-field.d/input.cpp", "content": "#define Z\nnamespace X {\n extern class Y {\n int m;\n } v;\n}\n#undef Z\n" }, { "path": "Tmain/extras-field.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --kinds-C++=+x --fields=+Ere-T --extras=+qrf -o - input.cpp \\\n | sed -e 's|[^\t]*\\(input.cpp\\)|\\1|'\n" }, { "path": "Tmain/extras-field.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/extras-field.d/stdout-expected.txt", "content": "X\tinput.cpp\t/^namespace X {$/;\"\tn\tfile:\troles:def\textras:fileScope\tend:6\nX::Y\tinput.cpp\t/^ extern class Y {$/;\"\tc\tnamespace:X\tfile:\troles:def\textras:fileScope,qualified\tend:5\nX::Y::m\tinput.cpp\t/^ int m;$/;\"\tm\tclass:X::Y\ttyperef:typename:int\tfile:\troles:def\textras:fileScope,qualified\tend:4\nX::v\tinput.cpp\t/^ } v;$/;\"\tx\tnamespace:X\ttyperef:class:X::Y\troles:def\textras:qualified\tend:5\nY\tinput.cpp\t/^ extern class Y {$/;\"\tc\tnamespace:X\tfile:\troles:def\textras:fileScope\tend:5\nZ\tinput.cpp\t/^#define Z$/;\"\td\tfile:\troles:def\textras:fileScope\tend:1\nZ\tinput.cpp\t/^#undef Z$/;\"\td\tfile:\troles:undef\textras:fileScope,reference\ninput.cpp\tinput.cpp\t1;\"\tF\troles:def\textras:inputFile\tend:7\nm\tinput.cpp\t/^ int m;$/;\"\tm\tclass:X::Y\ttyperef:typename:int\tfile:\troles:def\textras:fileScope\tend:4\nv\tinput.cpp\t/^ } v;$/;\"\tx\tnamespace:X\ttyperef:class:X::Y\troles:def\tend:5\n" }, { "path": "Tmain/extras-long.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nno_yaml()\n{\n\tgrep -v I18nRubyGem\n}\n\necho '# resetting'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --extras='{subparser}' --list-extras | no_yaml\n\necho '# enabling 1'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --extras=+'{pseudo}' --list-extras | no_yaml\n\necho '# disabling 1'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --extras=-'{fileScope}' --list-extras | no_yaml\n\necho '# combination'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --extras=-'{fileScope}+{inputFile}{reference}' --list-extras | no_yaml\n\necho '# combination with letters'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --extras=-'{fileScope}+p{inputFile}q{reference}-f' --list-extras | no_yaml\n" }, { "path": "Tmain/extras-long.d/stdout-expected.txt", "content": "# resetting\n- anonymous no NONE no 0 Include tags for non-named objects like lambda\nF fileScope no NONE no 0 Include tags of file scope\nf inputFile no NONE no 0 Include an entry for the base file name of every input file\ng guest no NONE no 0 Include tags generated by guest parsers\np pseudo no NONE no 0 Include pseudo tags\nq qualified no NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference no NONE no 0 Include reference tags\ns subparser yes NONE no 0 Include tags generated by subparsers\nz nulltag no NONE no 1 Include tags with empty strings as their names\n- canonicalizedName yes Automake no 1 Include canonicalized object name like libctags_a\n- linkName no Fortran no 1 Linking name used in foreign languages\n- implicitClass no GDScript no 0 Include tag for the implicitly defined unnamed class\n- doubleSharps no IPythonCell no 0 Include cells starting from ##\n- configPrefixed yes Kconfig no 0 prepend CONFIG_ to config names\n- CppDef no Make no 1 Include FOO in -DFOO as as a name of CPreProcessor macro\n- implicitImportName yes Odin no 0 implicitly defined import name like \"filepath\" in \"core:path/filepath\"\n- guessedFromFileName yes PkgConfig no 0 the guessed package name of the .pc file\n- arityAppended yes Prolog no 0 Include predicates with their arities\n- funcmap yes QemuHX no 0 Include mapping SQMP to C function name\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n# enabling 1\n- anonymous yes NONE no 0 Include tags for non-named objects like lambda\nF fileScope yes NONE no 0 Include tags of file scope\nf inputFile no NONE no 0 Include an entry for the base file name of every input file\ng guest no NONE no 0 Include tags generated by guest parsers\np pseudo yes NONE no 0 Include pseudo tags\nq qualified no NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference no NONE no 0 Include reference tags\ns subparser yes NONE no 0 Include tags generated by subparsers\nz nulltag no NONE no 1 Include tags with empty strings as their names\n- canonicalizedName yes Automake no 1 Include canonicalized object name like libctags_a\n- linkName no Fortran no 1 Linking name used in foreign languages\n- implicitClass no GDScript no 0 Include tag for the implicitly defined unnamed class\n- doubleSharps no IPythonCell no 0 Include cells starting from ##\n- configPrefixed yes Kconfig no 0 prepend CONFIG_ to config names\n- CppDef no Make no 1 Include FOO in -DFOO as as a name of CPreProcessor macro\n- implicitImportName yes Odin no 0 implicitly defined import name like \"filepath\" in \"core:path/filepath\"\n- guessedFromFileName yes PkgConfig no 0 the guessed package name of the .pc file\n- arityAppended yes Prolog no 0 Include predicates with their arities\n- funcmap yes QemuHX no 0 Include mapping SQMP to C function name\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n# disabling 1\n- anonymous yes NONE no 0 Include tags for non-named objects like lambda\nF fileScope no NONE no 0 Include tags of file scope\nf inputFile no NONE no 0 Include an entry for the base file name of every input file\ng guest no NONE no 0 Include tags generated by guest parsers\np pseudo yes NONE no 0 Include pseudo tags\nq qualified no NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference no NONE no 0 Include reference tags\ns subparser yes NONE no 0 Include tags generated by subparsers\nz nulltag no NONE no 1 Include tags with empty strings as their names\n- canonicalizedName yes Automake no 1 Include canonicalized object name like libctags_a\n- linkName no Fortran no 1 Linking name used in foreign languages\n- implicitClass no GDScript no 0 Include tag for the implicitly defined unnamed class\n- doubleSharps no IPythonCell no 0 Include cells starting from ##\n- configPrefixed yes Kconfig no 0 prepend CONFIG_ to config names\n- CppDef no Make no 1 Include FOO in -DFOO as as a name of CPreProcessor macro\n- implicitImportName yes Odin no 0 implicitly defined import name like \"filepath\" in \"core:path/filepath\"\n- guessedFromFileName yes PkgConfig no 0 the guessed package name of the .pc file\n- arityAppended yes Prolog no 0 Include predicates with their arities\n- funcmap yes QemuHX no 0 Include mapping SQMP to C function name\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n# combination\n- anonymous yes NONE no 0 Include tags for non-named objects like lambda\nF fileScope no NONE no 0 Include tags of file scope\nf inputFile yes NONE no 0 Include an entry for the base file name of every input file\ng guest no NONE no 0 Include tags generated by guest parsers\np pseudo yes NONE no 0 Include pseudo tags\nq qualified no NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference yes NONE no 0 Include reference tags\ns subparser yes NONE no 0 Include tags generated by subparsers\nz nulltag no NONE no 1 Include tags with empty strings as their names\n- canonicalizedName yes Automake no 1 Include canonicalized object name like libctags_a\n- linkName no Fortran no 1 Linking name used in foreign languages\n- implicitClass no GDScript no 0 Include tag for the implicitly defined unnamed class\n- doubleSharps no IPythonCell no 0 Include cells starting from ##\n- configPrefixed yes Kconfig no 0 prepend CONFIG_ to config names\n- CppDef no Make no 1 Include FOO in -DFOO as as a name of CPreProcessor macro\n- implicitImportName yes Odin no 0 implicitly defined import name like \"filepath\" in \"core:path/filepath\"\n- guessedFromFileName yes PkgConfig no 0 the guessed package name of the .pc file\n- arityAppended yes Prolog no 0 Include predicates with their arities\n- funcmap yes QemuHX no 0 Include mapping SQMP to C function name\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n# combination with letters\n- anonymous yes NONE no 0 Include tags for non-named objects like lambda\nF fileScope no NONE no 0 Include tags of file scope\nf inputFile no NONE no 0 Include an entry for the base file name of every input file\ng guest no NONE no 0 Include tags generated by guest parsers\np pseudo yes NONE no 0 Include pseudo tags\nq qualified yes NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference yes NONE no 0 Include reference tags\ns subparser yes NONE no 0 Include tags generated by subparsers\nz nulltag no NONE no 1 Include tags with empty strings as their names\n- canonicalizedName yes Automake no 1 Include canonicalized object name like libctags_a\n- linkName no Fortran no 1 Linking name used in foreign languages\n- implicitClass no GDScript no 0 Include tag for the implicitly defined unnamed class\n- doubleSharps no IPythonCell no 0 Include cells starting from ##\n- configPrefixed yes Kconfig no 0 prepend CONFIG_ to config names\n- CppDef no Make no 1 Include FOO in -DFOO as as a name of CPreProcessor macro\n- implicitImportName yes Odin no 0 implicitly defined import name like \"filepath\" in \"core:path/filepath\"\n- guessedFromFileName yes PkgConfig no 0 the guessed package name of the .pc file\n- arityAppended yes Prolog no 0 Include predicates with their arities\n- funcmap yes QemuHX no 0 Include mapping SQMP to C function name\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n" }, { "path": "Tmain/filter-option-write-to-file.d/input.c", "content": "int main(void) { return 0; }\n" }, { "path": "Tmain/filter-option-write-to-file.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=/tmp/ctags-tmain-$$.txt\n\necho ./input.c | $CTAGS --quiet --options=NONE --filter -o $O\n\nrm -f ${O}\n" }, { "path": "Tmain/filter-option-write-to-file.d/stderr-expected.txt", "content": "ctags: Warning: filter mode ignores output tag file name\n" }, { "path": "Tmain/filter-option-write-to-file.d/stdout-expected.txt", "content": "main\t./input.c\t/^int main(void) { return 0; }$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/filter-option.d/input.c", "content": "int main(void) { return 0; }\n" }, { "path": "Tmain/filter-option.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho ./input.c | $CTAGS --quiet --options=NONE --filter\necho ./input.c | $CTAGS --quiet --options=NONE --filter --output-format=xref\n" }, { "path": "Tmain/filter-option.d/stdout-expected.txt", "content": "main\t./input.c\t/^int main(void) { return 0; }$/;\"\tf\ttyperef:typename:int\nmain function 1 ./input.c int main(void) { return 0; }\n" }, { "path": "Tmain/fixed-field-handling-in-json-format.d/input.c", "content": "void main(void) {}\n" }, { "path": "Tmain/fixed-field-handling-in-json-format.d/run.sh", "content": "# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=\"$1\"\n\nis_feature_available \"${CTAGS}\" json\n\nCTAGS=\"${CTAGS} --quiet --options=NONE\"\n\necho '# --output-format=json --fields=+n-P'\n${CTAGS} --output-format=json --fields=+n-P -o - input.c\n\necho '# --fields=+n-P --output-format=json'\n${CTAGS} --fields=+n-P --output-format=json -o - input.c\n" }, { "path": "Tmain/fixed-field-handling-in-json-format.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/fixed-field-handling-in-json-format.d/stdout-expected.txt", "content": "# --output-format=json --fields=+n-P\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"line\": 1, \"typeref\": \"typename:void\", \"kind\": \"function\"}\n# --fields=+n-P --output-format=json\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"line\": 1, \"typeref\": \"typename:void\", \"kind\": \"function\"}\n" }, { "path": "Tmain/fixed-field-handling.d/input.c", "content": "void main(void) {}\n" }, { "path": "Tmain/fixed-field-handling.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=\"$1\"\n\nis_feature_available \"${CTAGS}\" json\n\nCTAGS=\"${CTAGS} --quiet --options=NONE\"\n\necho '# writer=default'\n${CTAGS} --machinable --list-fields | grep '^[NFP]'\n\nlist_fields()\n{\n\tlocal f=$1\n\tshift\n\n\techo \"# writer=$f $o\"\n\t${CTAGS} --output-format=$f --machinable $@ --list-fields | grep '^[NFP]'\n}\n\nfor f in u-ctags e-ctags etags xref json; do\n\tlist_fields $f\ndone\n\nfor f in xref json; do\n\tfor o in N F P; do\n\t\tlist_fields $f --fields=-$o\n\tdone\ndone\n\nfor o in N F P; do\n\tO=\"--fields=-$o\"\n\techo \"# writer=json $O\"\n\t${CTAGS} --output-format=json $O input.c\n\tO=\"--fields=$o\"\n\techo \"# writer=json $O\"\n\t${CTAGS} --output-format=json $O input.c\ndone\n\nO=\"--fields=\"\necho \"# writer=json $O\"\n${CTAGS} --output-format=json $O input.c\n" }, { "path": "Tmain/fixed-field-handling.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/fixed-field-handling.d/stdout-expected.txt", "content": "# writer=default\nN\tname\tyes\tNONE\ts--\tyes\trw\t0\ttag name\nF\tinput\tyes\tNONE\ts--\tyes\tr-\t0\tinput file\nP\tpattern\tyes\tNONE\ts-b\tyes\t--\t0\tpattern\n# writer=u-ctags \nN\tname\tyes\tNONE\ts--\tyes\trw\t0\ttag name\nF\tinput\tyes\tNONE\ts--\tyes\tr-\t0\tinput file\nP\tpattern\tyes\tNONE\ts-b\tyes\t--\t0\tpattern\n# writer=e-ctags \nN\tname\tyes\tNONE\ts--\tyes\trw\t0\ttag name\nF\tinput\tyes\tNONE\ts--\tyes\tr-\t0\tinput file\nP\tpattern\tyes\tNONE\ts-b\tyes\t--\t0\tpattern\n# writer=etags \nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=xref \nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=json \nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=xref N\nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tno\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=xref F\nF\tinput\tno\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=xref P\nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tno\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=json N\nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tno\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=json F\nF\tinput\tno\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tyes\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=json P\nF\tinput\tyes\tNONE\ts--\tno\tr-\t0\tinput file\nN\tname\tyes\tNONE\ts--\tno\trw\t0\ttag name\nP\tpattern\tno\tNONE\ts-b\tno\t--\t0\tpattern\n# writer=json --fields=-N\n{\"_type\": \"tag\", \"path\": \"input.c\", \"pattern\": \"/^void main(void) {}$/\", \"typeref\": \"typename:void\", \"kind\": \"function\"}\n# writer=json --fields=N\n{\"_type\": \"tag\", \"name\": \"main\"}\n# writer=json --fields=-F\n{\"_type\": \"tag\", \"name\": \"main\", \"pattern\": \"/^void main(void) {}$/\", \"typeref\": \"typename:void\", \"kind\": \"function\"}\n# writer=json --fields=F\n{\"_type\": \"tag\", \"path\": \"input.c\"}\n# writer=json --fields=-P\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"typeref\": \"typename:void\", \"kind\": \"function\"}\n# writer=json --fields=P\n{\"_type\": \"tag\", \"pattern\": \"/^void main(void) {}$/\"}\n# writer=json --fields=\n" }, { "path": "Tmain/flags-fielddef-datatype.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/flags-fielddef-datatype.d/run.sh", "content": "# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --langdef=FIELDTEST \\\n\t\t --_fielddef-FIELDTEST=strfield,\"a field having string value\"'{datatype=str}' \\\n\t\t --_fielddef-FIELDTEST=boolfield,\"a field having boolean value\"'{datatype=bool}' \\\n\t\t --_fielddef-FIELDTEST=intfield,\"a field having integer value\"'{datatype=int}' \\\n\t\t --_fielddef-FIELDTEST=strboolfield,\"a field having string value or false\"'{datatype=str+bool}' \\\n\t\t --_fielddef-FIELDTEST=deffield,\"a field that type is not specified\" \\\n\t\t --list-fields=FIELDTEST && \\\n! ${CTAGS} --quiet --options=NONE --langdef=FIELDTEST \\\n --_fielddef-FIELDTEST=fooA,\"unexpected data type\"'{datatype=bar}' &&\n! ${CTAGS} --quiet --options=NONE --langdef=FIELDTEST \\\n --_fielddef-FIELDTEST=fooB,\"unexpected data type\"'{datatype=int+baz}' &&\n! ${CTAGS} --quiet --options=NONE --langdef=FIELDTEST \\\n --_fielddef-FIELDTEST=fooC,\"unexpected data type\"'{datatype=}' &&\n! ${CTAGS} --quiet --options=NONE --langdef=FIELDTEST \\\n --_fielddef-FIELDTEST=fooD,\"unexpected data type\"'{datatype=+baz}' &&\n! ${CTAGS} --quiet --options=NONE --langdef=FIELDTEST \\\n --_fielddef-FIELDTEST=fooE,\"unexpected data type\"'{datatype=bool+str}'\n" }, { "path": "Tmain/flags-fielddef-datatype.d/stderr-expected.txt", "content": "ctags: unknown datatype for field \"fooA\": \"bar\"\nctags: unknown datatype for field \"fooB\": \"int+baz\"\nctags: no datatype given for field: \"fooC\"\nctags: unknown datatype for field \"fooD\": \"+baz\"\nctags: unknown datatype for field \"fooE\": \"bool+str\"\n" }, { "path": "Tmain/flags-fielddef-datatype.d/stdout-expected.txt", "content": "#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- boolfield no FIELDTEST --b no rw 0 a field having boolean value\n- deffield no FIELDTEST s-- no -- 0 a field that type is not specified\n- intfield no FIELDTEST -i- no rw 0 a field having integer value\n- strboolfield no FIELDTEST s-b no rw 0 a field having string value or false\n- strfield no FIELDTEST s-- no rw 0 a field having string value\n" }, { "path": "Tmain/force-initializing-option.d/README", "content": "This test case expects the exit status will be 0 if an erorr doesn't\noccur during initializing a parser.\n" }, { "path": "Tmain/force-initializing-option.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --_fatal-warnings --_force-initializing --_force-quit=0\n\nexit $?\n" }, { "path": "Tmain/force-initializing-option.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/force-initializing-option.d/xit-expected.txt", "content": "0\n" }, { "path": "Tmain/gcov-sandbox.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/gcov-sandbox.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.c\", \"size\": 28}'\n echo 'int main(void) { return 0; }'\n} | $CTAGS --quiet --options=NONE --_interactive=sandbox\n\nexit $?\n" }, { "path": "Tmain/gcov-sandbox.d/stderr-expected.txt", "content": "ctags: sandbox submode does not work if gcov is instrumented\n" }, { "path": "Tmain/gcov-sandbox.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/generate-anon-ids.d/input0.c", "content": "struct {\n\tint x;\n} X;\n\nstruct {\n\tint y;\n} Y;\n" }, { "path": "Tmain/generate-anon-ids.d/input1.c", "content": "struct {\n\tint a;\n} A;\n\nstruct {\n\tint b;\n} B;\n" }, { "path": "Tmain/generate-anon-ids.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - input0.c input1.c\n" }, { "path": "Tmain/generate-anon-ids.d/stdout-expected.txt", "content": "A\tinput1.c\t/^} A;$/;\"\tv\ttyperef:struct:__anon840121570108\nB\tinput1.c\t/^} B;$/;\"\tv\ttyperef:struct:__anon840121570208\nX\tinput0.c\t/^} X;$/;\"\tv\ttyperef:struct:__anon84011d160108\nY\tinput0.c\t/^} Y;$/;\"\tv\ttyperef:struct:__anon84011d160208\n__anon84011d160108\tinput0.c\t/^struct {$/;\"\ts\tfile:\n__anon84011d160208\tinput0.c\t/^struct {$/;\"\ts\tfile:\n__anon840121570108\tinput1.c\t/^struct {$/;\"\ts\tfile:\n__anon840121570208\tinput1.c\t/^struct {$/;\"\ts\tfile:\na\tinput1.c\t/^\tint a;$/;\"\tm\tstruct:__anon840121570108\ttyperef:typename:int\tfile:\nb\tinput1.c\t/^\tint b;$/;\"\tm\tstruct:__anon840121570208\ttyperef:typename:int\tfile:\nx\tinput0.c\t/^\tint x;$/;\"\tm\tstruct:__anon84011d160108\ttyperef:typename:int\tfile:\ny\tinput0.c\t/^\tint y;$/;\"\tm\tstruct:__anon84011d160208\ttyperef:typename:int\tfile:\n" }, { "path": "Tmain/getter-extras-field.d/input.unknown", "content": "e\n" }, { "path": "Tmain/getter-extras-field.d/run.sh", "content": "# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - --options=x.ctags input.unknown\n" }, { "path": "Tmain/getter-extras-field.d/stderr-expected.txt", "content": "true\n[/reference]\ntrue\n[/qualified /reference]\ntrue\n[/X.foo]\ntrue\n[/reference /X.foo]\n" }, { "path": "Tmain/getter-extras-field.d/stdout-expected.txt", "content": "eCommon\tinput.unknown\t/^e$/;\"\td\textras:reference\na.b.eCommon2\tinput.unknown\t/^e$/;\"\td\textras:qualified,reference\neLangspec\tinput.unknown\t/^e$/;\"\td\textras:foo\neLangspec+Common\tinput.unknown\t/^e$/;\"\td\textras:reference,foo\n" }, { "path": "Tmain/getter-extras-field.d/x.ctags", "content": "--sort=no\n--fields=+{extras}\n\n--langdef=X\n--map-X=.unknown\n--_tabledef-X=main\n\n--kinddef-X=d,def,definitions\n\n--_extradef-X=foo,...\n--extras-X=+{foo}\n--_extradef-X=bar,...\n--extras-X=-{bar}\n\n--_prelude-X={{\n\t/maketag0 {\n\t\t/def 1 /start _matchloc _tag _commit\n\t} def\n\t/maketag {\n\t\tmaketag0 pop\n\t} def\n\t/pc {pstack clear} def\n}}\n\n--_mtable-regex-X=main/(e)//{{\n\t(eCommon) maketag0 dup /reference _markextra :extras pc\n\t(a.b.eCommon2) maketag0 dup dup /reference _markextra /qualified _markextra :extras pc\n\t(eLangspec) maketag0 dup /X.foo _markextra :extras pc\n\t(eLangspec+Common) maketag0 dup dup /X.foo _markextra /reference _markextra :extras pc\n}}\n" }, { "path": "Tmain/input-encoding-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/input-encoding-option.d/input.java", "content": "class Foo { // FooNX\n\tpublic Foo() { // RXgN^\n\t}\n}\n" }, { "path": "Tmain/input-encoding-option.d/input.js", "content": "var a = 1; // ѿ\n" }, { "path": "Tmain/input-encoding-option.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2015 Yasuhiro MATSUMOTO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nif ${CTAGS} --quiet --options=NONE --list-features | grep -q iconv; then\n check_encoding shift_jis\n check_encoding euc-jp\n check_encoding utf-8\n if ${CTAGS} --quiet --options=NONE \\\n\t\t\t --pseudo-tags=-TAG_PROC_CWD \\\n\t\t\t --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t --pseudo-tags=-TAG_KIND_DESCRIPTION \\\n\t --pseudo-tags=-TAG_EXTRA_DESCRIPTION \\\n\t --pseudo-tags=-TAG_FIELD_DESCRIPTION \\\n\t --pseudo-tags=-TAG_ROLE_DESCRIPTION \\\n\t --pseudo-tags=-TAG_PARSER_VERSION \\\n\t --pseudo-tags=-TAG_OUTPUT_VERSION \\\n\t --input-encoding=utf-8 --input-encoding-java=shift_jis --input-encoding-javascript=euc-jp \\\n\t -o ${BUILDDIR}/tags \\\n\t input.js input.java ; then\n remove_commit_id ${BUILDDIR}/tags\n fi\n exit $?\nelse\n skip \"iconv feature is not available\"\nfi\n" }, { "path": "Tmain/input-encoding-option.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/input-encoding-option.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/input-encoding-option.d/tags-expected.txt", "content": "!_TAG_FILE_ENCODING\tUTF-8\t//\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\nFoo\tinput.java\t/^\tpublic Foo() { \\/\\/ コンストラクタ$/;\"\tm\tclass:Foo\nFoo\tinput.java\t/^class Foo { \\/\\/ Fooクラス$/;\"\tc\na\tinput.js\t/^var a = 1; \\/\\/ 変数初期化$/;\"\tv\n" }, { "path": "Tmain/interactive-mode.d/run.sh", "content": "# Copyright: 2016 Aman Gupta\n# License: GPL-2\n\nCTAGS=$1\n. ../utils.sh\n\nis_feature_available ${CTAGS} interactive\n\n# It seems that the output format is slightly different between libjansson versions\ns()\n{\n\tsed -e s/':\"'/': \"'/g | jdropver\n}\n\ntrim_errno()\n{\n\t# The value errno depends on the platform.\n\tsed -e s/' \"errno\": [0-9]*,'//\n}\n\nCTAGS=\"$CTAGS --options=NONE\"\n\necho identification message on startup\necho =======================================\n${CTAGS} --_interactive < /dev/null |s\n\necho\necho error on invalid command\necho =======================================\necho '{\"command\":\"foobar\"}' | ${CTAGS} --_interactive |s\n\necho\necho error on missing arguments\necho =======================================\necho '{\"command\":\"generate-tags\"}' | ${CTAGS} --_interactive |s\n\necho\necho error on invalid file\necho =======================================\necho '{\"command\":\"generate-tags\", \"filename\":\"test.foo\"}' | ${CTAGS} --_interactive |s |trim_errno\n\necho\necho generate tags from file\necho =======================================\necho '{\"command\":\"generate-tags\", \"filename\":\"test.rb\"}' | ${CTAGS} --_interactive |s\n\necho\necho process multiple commands\necho =======================================\n(\n echo '{\"command\":\"generate-tags\", \"filename\":\"test.rb\"}'\n echo '{\"command\":\"generate-tags\", \"filename\":\"test.c\"}'\n) | ${CTAGS} --_interactive |s\n\necho\necho generate tags from data\necho =======================================\nsize=$(filesize test.rb)\n(\n echo '{\"command\":\"generate-tags\", \"filename\":\"foobar.rb\", \"size\":'$size'}'\n cat test.rb\n) | ${CTAGS} --_interactive |s\n" }, { "path": "Tmain/interactive-mode.d/stdout-expected.txt", "content": "identification message on startup\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n\nerror on invalid command\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"error\", \"message\": \"unknown command name\", \"fatal\": true}\n\nerror on missing arguments\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"error\", \"message\": \"invalid generate-tags request\", \"fatal\": true}\n\nerror on invalid file\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"error\", \"message\": \"cannot open input file \\\"test.foo\\\"\", \"warning\": true, \"perror\": \"No such file or directory\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n\ngenerate tags from file\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"tag\", \"name\": \"Test\", \"path\": \"test.rb\", \"pattern\": \"/^class Test$/\", \"kind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"foobar\", \"path\": \"test.rb\", \"pattern\": \"/^ def foobar$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"baz\", \"path\": \"test.rb\", \"pattern\": \"/^ def baz(a=1)$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n\nprocess multiple commands\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"tag\", \"name\": \"Test\", \"path\": \"test.rb\", \"pattern\": \"/^class Test$/\", \"kind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"foobar\", \"path\": \"test.rb\", \"pattern\": \"/^ def foobar$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"baz\", \"path\": \"test.rb\", \"pattern\": \"/^ def baz(a=1)$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n{\"_type\": \"tag\", \"name\": \"say_hello\", \"path\": \"test.c\", \"pattern\": \"/^void say_hello() {$/\", \"typeref\": \"typename:void\", \"kind\": \"function\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"test.c\", \"pattern\": \"/^int main(int argc, char **argv) {$/\", \"typeref\": \"typename:int\", \"kind\": \"function\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n\ngenerate tags from data\n=======================================\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"tag\", \"name\": \"Test\", \"path\": \"foobar.rb\", \"pattern\": \"/^class Test$/\", \"kind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"foobar\", \"path\": \"foobar.rb\", \"pattern\": \"/^ def foobar$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"baz\", \"path\": \"foobar.rb\", \"pattern\": \"/^ def baz(a=1)$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/interactive-mode.d/test.c", "content": "#include \n\nvoid say_hello() {\n printf(\"hello world\\n\");\n}\n\nint main(int argc, char **argv) {\n say_hello();\n}\n" }, { "path": "Tmain/interactive-mode.d/test.rb", "content": "class Test\n def foobar\n end\n\n def baz(a=1)\n end\nend\n" }, { "path": "Tmain/interactive-notice-output.d/input.cst", "content": "n\n" }, { "path": "Tmain/interactive-notice-output.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n# It seems that the output format is slightly different between libjansson versions\ns()\n{\n\tsed -e s/':\"'/': \"'/g | jdropver\n}\n\nif is_feature_available ${CTAGS} json; then\n\techo '{\"command\":\"generate-tags\", \"filename\":\"input.cst\"}' | $CTAGS --options=NONE --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t--map-CTagsSelfTest=.cst --_interactive |s\n\techo '{\"command\":\"generate-tags\", \"filename\":\"input.cst\"}' | $CTAGS --quiet --options=NONE --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t--map-CTagsSelfTest=.cst --_interactive |s\nfi\n" }, { "path": "Tmain/interactive-notice-output.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n" }, { "path": "Tmain/interactive-notice-output.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"error\", \"message\": \"notice output for testing: triggerNotice\", \"notice\": true}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/interactive-option-write-to-file.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2017 Masatake YAMATO\n# Copyright: 2016 Aman Gupta\n# License: GPL-2\n\nCTAGS=$1\n. ../utils.sh\n\nis_feature_available ${CTAGS} interactive\n\n# It seems that the output format is slightly different between libjansson versions\ns()\n{\n\tsed -e s/':\"'/': \"'/g | jdropver\n}\n\nO=/tmp/ctags-tmain-$$.txt\n\necho '{\"command\":\"generate-tags\", \"filename\":\"test.rb\"}' | ${CTAGS} --quiet --options=NONE --_interactive -o ${O} |s\n\nrm -f ${O}\n" }, { "path": "Tmain/interactive-option-write-to-file.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/interactive-option-write-to-file.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"tag\", \"name\": \"Test\", \"path\": \"test.rb\", \"pattern\": \"/^class Test$/\", \"kind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"foobar\", \"path\": \"test.rb\", \"pattern\": \"/^ def foobar$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"baz\", \"path\": \"test.rb\", \"pattern\": \"/^ def baz(a=1)$/\", \"kind\": \"method\", \"scope\": \"Test\", \"scopeKind\": \"class\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/interactive-option-write-to-file.d/test.rb", "content": "class Test\n def foobar\n end\n\n def baz(a=1)\n end\nend\n" }, { "path": "Tmain/interactive-resource-management.d/input.c", "content": "int\nmain(void)\n{\n}\n" }, { "path": "Tmain/interactive-resource-management.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nif is_feature_available ${CTAGS} json; then\n\texit_status_for_input_c $CTAGS NONE --output-format=json -o - --sort=no\n\texit_status_for_input_c $CTAGS $BUILDDIR/tags.json --output-format=json -o $BUILDDIR/tags.json --sort=no\n\texit_status_for_input_c $CTAGS $BUILDDIR/tags.json --output-format=json -o $BUILDDIR/tags.json\n\texit_status_for_input_c $CTAGS NONE --output-format=json -o -\nfi\n" }, { "path": "Tmain/interactive-resource-management.d/stdout-expected.txt", "content": "--output-format=json -o - --sort=no => ok\n--output-format=json -o tags.json --sort=no => ok\n--output-format=json -o tags.json => ok\n--output-format=json -o - => ok\n" }, { "path": "Tmain/invalid-encoding-option.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/invalid-encoding-option.d/input.java", "content": "class Foo { // FooNX\n\tpublic Foo() { // RXgN^\n\t}\n}\n" }, { "path": "Tmain/invalid-encoding-option.d/input.js", "content": "var a = 1; // ѿ\n" }, { "path": "Tmain/invalid-encoding-option.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nif ${CTAGS} --quiet --options=NONE --list-features | grep -q iconv; then\n check_encoding euc-jp\n ${CTAGS} --quiet --options=NONE --input-encoding-java=invalid\t--input-encoding-javascript=euc-jp -o - input.js input.java\n exit $?\nelse\n skip \"iconv feature is not available\"\nfi\n" }, { "path": "Tmain/invalid-encoding-option.d/stderr-expected.txt", "content": "ctags: failed opening encoding from 'invalid' to 'UTF-8'\n" }, { "path": "Tmain/invalid-encoding-option.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/json-output-backslash-in-input-field.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/json-output-backslash-in-input-field.d/input.php", "content": "/* EMPTY */\n" }, { "path": "Tmain/json-output-backslash-in-input-field.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} json\n\nO=\"--quiet --options=NONE \"\n\n${CTAGS} $O \\\n --extras=+p --pseudo-tags=TAG_KIND_SEPARATOR \\\n -o - \\\n\t\t --output-format=json input.php \\\n\t| grep '\"nn\"' | grep -v JSON_OUTPUT_VERSION\n" }, { "path": "Tmain/json-output-backslash-in-input-field.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/json-output-backslash-in-input-field.d/stdout-expected.txt", "content": "{\"_type\": \"ptag\", \"name\": \"TAG_KIND_SEPARATOR\", \"parserName\": \"PHP\", \"path\": \"\\\\\", \"pattern\": \"nn\"}\n" }, { "path": "Tmain/json-output-for-broken-input.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/json-output-for-broken-input.d/input.cs", "content": "aá:{0}\n" }, { "path": "Tmain/json-output-for-broken-input.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nif is_feature_available \"${CTAGS}\" json; then\n\t${CTAGS} --quiet --options=NONE --output-format=json -o - ./input.cs\nfi\n" }, { "path": "Tmain/json-output-for-broken-input.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/json-output-for-broken-input.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/json-output-format.d/input.1", "content": ".SH \"\tN\tA\tM\tE\t\"\n" }, { "path": "Tmain/json-output-format.d/input.c", "content": "#include \n\nstatic int foo (void)\n{\n return 1;\n}\n\nint\nmain(void)\n{\n return foo();\n}\n" }, { "path": "Tmain/json-output-format.d/input.go", "content": "package main\n\nfunc main() {\n}\n" }, { "path": "Tmain/json-output-format.d/input.py", "content": "class Foo:\n def doIt():\n pass\n" }, { "path": "Tmain/json-output-format.d/run.sh", "content": "# Copyright: 2016 Aman Gupta\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nif is_feature_available \"${CTAGS}\" json; then\n {\n\trun_with_format json --languages=+man --fields=-T\n\trun_with_format json --languages=+man --fields=\"*\"-T\n\trun_with_format json --languages=+man --fields=\"*\"-T --extras='*'\n } | cat \\\n\t\t| grep -v TAG_PROGRAM_VERSION \\\n\t\t| grep -v TAG_OUTPUT_VERSION \\\n\t\t| grep -v TAG_OUTPUT_FILESEP \\\n\t\t| grep -v TAG_PROC_CWD\nfi\n" }, { "path": "Tmain/json-output-format.d/stdout-expected.txt", "content": "# json --languages=+man --fields=-T\n{\"_type\": \"tag\", \"name\": \"Foo\", \"path\": \"input.py\", \"pattern\": \"/^class Foo:$/\", \"kind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"N\\tA\\tM\\tE\", \"path\": \"input.1\", \"pattern\": \"/^.SH \\\"\\tN\\tA\\tM\\tE\\t\\\"$/\", \"kind\": \"section\"}\n{\"_type\": \"tag\", \"name\": \"doIt\", \"path\": \"input.py\", \"pattern\": \"/^ def doIt():$/\", \"kind\": \"member\", \"scope\": \"Foo\", \"scopeKind\": \"class\"}\n{\"_type\": \"tag\", \"name\": \"foo\", \"path\": \"input.c\", \"pattern\": \"/^static int foo (void)$/\", \"file\": true, \"typeref\": \"typename:int\", \"kind\": \"function\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"pattern\": \"/^main(void)$/\", \"typeref\": \"typename:int\", \"kind\": \"function\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.go\", \"pattern\": \"/^func main() {$/\", \"kind\": \"func\", \"scope\": \"main\", \"scopeKind\": \"package\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.go\", \"pattern\": \"/^package main$/\", \"kind\": \"package\"}\n# json --languages=+man --fields=*-T\n{\"_type\": \"tag\", \"name\": \"Foo\", \"path\": \"input.py\", \"pattern\": \"/^class Foo:$/\", \"language\": \"Python\", \"line\": 1, \"kind\": \"class\", \"inherits\": false, \"access\": \"public\", \"roles\": \"def\", \"end\": 3}\n{\"_type\": \"tag\", \"name\": \"N\\tA\\tM\\tE\", \"path\": \"input.1\", \"pattern\": \"/^.SH \\\"\\tN\\tA\\tM\\tE\\t\\\"$/\", \"language\": \"Man\", \"line\": 1, \"kind\": \"section\", \"roles\": \"def\", \"end\": 1}\n{\"_type\": \"tag\", \"name\": \"doIt\", \"path\": \"input.py\", \"pattern\": \"/^ def doIt():$/\", \"language\": \"Python\", \"line\": 2, \"kind\": \"member\", \"access\": \"public\", \"signature\": \"()\", \"scope\": \"Foo\", \"scopeKind\": \"class\", \"roles\": \"def\", \"end\": 3}\n{\"_type\": \"tag\", \"name\": \"foo\", \"path\": \"input.c\", \"pattern\": \"/^static int foo (void)$/\", \"file\": true, \"language\": \"C\", \"line\": 3, \"typeref\": \"typename:int\", \"kind\": \"function\", \"signature\": \"(void)\", \"roles\": \"def\", \"extras\": \"fileScope\", \"end\": 6}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"pattern\": \"/^main(void)$/\", \"language\": \"C\", \"line\": 9, \"typeref\": \"typename:int\", \"kind\": \"function\", \"signature\": \"(void)\", \"roles\": \"def\", \"end\": 12}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.go\", \"pattern\": \"/^func main() {$/\", \"language\": \"Go\", \"line\": 3, \"kind\": \"func\", \"signature\": \"()\", \"scope\": \"main\", \"scopeKind\": \"package\", \"roles\": \"def\", \"end\": 4}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.go\", \"pattern\": \"/^package main$/\", \"language\": \"Go\", \"line\": 1, \"kind\": \"package\", \"roles\": \"def\"}\n# json --languages=+man --fields=*-T --extras=*\n{\"_type\": \"ptag\", \"name\": \"JSON_OUTPUT_VERSION\", \"path\": \"1.0\", \"pattern\": \"in development\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"anonymous\", \"pattern\": \"Include tags for non-named objects like lambda\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"fileScope\", \"pattern\": \"Include tags of file scope\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"guest\", \"pattern\": \"Include tags generated by guest parsers\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"inputFile\", \"pattern\": \"Include an entry for the base file name of every input file\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"nulltag\", \"pattern\": \"Include tags with empty strings as their names\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"pseudo\", \"pattern\": \"Include pseudo tags\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"qualified\", \"pattern\": \"Include an extra class-qualified tag entry for each tag\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"reference\", \"pattern\": \"Include reference tags\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_EXTRA_DESCRIPTION\", \"path\": \"subparser\", \"pattern\": \"Include tags generated by subparsers\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"package\", \"pattern\": \"the real package specified by the package name\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"packageName\", \"pattern\": \"the name for referring the package\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"nameref\", \"pattern\": \"the original name for the tag\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"access\", \"pattern\": \"Access (or export) of class members\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"compact\", \"pattern\": \"compact input line (used only in xref output)\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"end\", \"pattern\": \"end lines of various items\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"extras\", \"pattern\": \"Extra tag type information\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"file\", \"pattern\": \"File-restricted scoping\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"implementation\", \"pattern\": \"Implementation information\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"inherits\", \"pattern\": \"Inheritance information\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"input\", \"pattern\": \"input file\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"kind\", \"pattern\": \"[tags output] prepend \\\"kind:\\\" to k/ (or K/) field output, [xref and json output] kind in long-name form\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"language\", \"pattern\": \"Language of input file containing tag\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"line\", \"pattern\": \"Line number of tag definition\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"name\", \"pattern\": \"tag name\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"nth\", \"pattern\": \"the order in the parent scope\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"pattern\", \"pattern\": \"pattern\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"roles\", \"pattern\": \"Roles\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"scope\", \"pattern\": \"[tags output] prepend \\\"scope:\\\" key to s/scope field output, [xref and json output] the same as s/ field\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"scopeKind\", \"pattern\": \"[tags output] no effect, [xref and json output] kind of scope in long-name form\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"signature\", \"pattern\": \"Signature of routine (e.g. prototype or parameter list)\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"typeref\", \"pattern\": \"Type and name of a variable or typedef\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FIELD_DESCRIPTION\", \"path\": \"xpath\", \"pattern\": \"xpath for the tag\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_FILE_SORTED\", \"path\": \"1\", \"pattern\": \"0=unsorted, 1=sorted, 2=foldcase\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"d,macro\", \"pattern\": \"macro definitions\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"e,enumerator\", \"pattern\": \"enumerators (values inside an enumeration)\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"f,function\", \"pattern\": \"function definitions\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"g,enum\", \"pattern\": \"enumeration names\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"h,header\", \"pattern\": \"included header files\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"m,member\", \"pattern\": \"struct, and union members\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"s,struct\", \"pattern\": \"structure names\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"t,typedef\", \"pattern\": \"typedefs\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"u,union\", \"pattern\": \"union names\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"C\", \"path\": \"v,variable\", \"pattern\": \"variable definitions\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"M,anonMember\", \"pattern\": \"struct anonymous members\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"P,packageName\", \"pattern\": \"name for specifying imported package\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"Y,unknown\", \"pattern\": \"unknown\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"a,talias\", \"pattern\": \"type aliases\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"c,const\", \"pattern\": \"constants\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"f,func\", \"pattern\": \"functions\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"i,interface\", \"pattern\": \"interfaces\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"m,member\", \"pattern\": \"struct members\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"n,methodSpec\", \"pattern\": \"interface method specification\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"p,package\", \"pattern\": \"packages\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"s,struct\", \"pattern\": \"structs\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"t,type\", \"pattern\": \"types\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Go\", \"path\": \"v,var\", \"pattern\": \"variables\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Man\", \"path\": \"S,subsection\", \"pattern\": \"sub sections\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Man\", \"path\": \"s,section\", \"pattern\": \"sections\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Man\", \"path\": \"t,title\", \"pattern\": \"titles\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"I,namespace\", \"pattern\": \"name referring a module defined in other file\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"Y,unknown\", \"pattern\": \"name referring a class/variable/function/module defined in other module\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"c,class\", \"pattern\": \"classes\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"f,function\", \"pattern\": \"functions\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"i,module\", \"pattern\": \"modules\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"m,member\", \"pattern\": \"class members\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_KIND_DESCRIPTION\", \"parserName\": \"Python\", \"path\": \"v,variable\", \"pattern\": \"variables\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_OUTPUT_EXCMD\", \"path\": \"mixed\", \"pattern\": \"number, pattern, mixed, or combineV2\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PARSER_VERSION\", \"parserName\": \"C\", \"path\": \"2.2\", \"pattern\": \"current.age\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PARSER_VERSION\", \"parserName\": \"Go\", \"path\": \"1.1\", \"pattern\": \"current.age\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PARSER_VERSION\", \"parserName\": \"Man\", \"path\": \"0.0\", \"pattern\": \"current.age\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PARSER_VERSION\", \"parserName\": \"Python\", \"path\": \"1.1\", \"pattern\": \"current.age\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PATTERN_LENGTH_LIMIT\", \"path\": \"96\", \"pattern\": \"0 for no limit\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PROGRAM_AUTHOR\", \"path\": \"Universal Ctags Team\", \"pattern\": \"\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PROGRAM_NAME\", \"path\": \"Universal Ctags\", \"pattern\": \"Derived from Exuberant Ctags\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_PROGRAM_URL\", \"path\": \"https://ctags.io/\", \"pattern\": \"official site\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"C\", \"kindName\": \"function\", \"path\": \"foreigncall\", \"pattern\": \"called in foreign languages\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"C\", \"kindName\": \"function\", \"path\": \"foreigndecl\", \"pattern\": \"declared in foreign languages\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"C\", \"kindName\": \"header\", \"path\": \"local\", \"pattern\": \"local header\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"C\", \"kindName\": \"header\", \"path\": \"system\", \"pattern\": \"system header\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"C\", \"kindName\": \"macro\", \"path\": \"undef\", \"pattern\": \"undefined\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"C\", \"kindName\": \"struct\", \"path\": \"foreigndecl\", \"pattern\": \"declared in foreign languages\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Go\", \"kindName\": \"package\", \"path\": \"imported\", \"pattern\": \"imported package\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Go\", \"kindName\": \"unknown\", \"path\": \"receiverType\", \"pattern\": \"receiver type\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"function\", \"path\": \"entryPoint\", \"pattern\": \"specified as an entry point\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"module\", \"path\": \"entryPoint\", \"pattern\": \"specified as a module of an entry point\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"module\", \"path\": \"imported\", \"pattern\": \"imported modules\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"module\", \"path\": \"indirectlyImported\", \"pattern\": \"module imported in alternative name\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"module\", \"path\": \"namespace\", \"pattern\": \"namespace from where classes/variables/functions are imported\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"unknown\", \"path\": \"imported\", \"pattern\": \"imported from the other module\"}\n{\"_type\": \"ptag\", \"name\": \"TAG_ROLE_DESCRIPTION\", \"parserName\": \"Python\", \"kindName\": \"unknown\", \"path\": \"indirectlyImported\", \"pattern\": \"classes/variables/functions/modules imported in alternative name\"}\n{\"_type\": \"tag\", \"name\": \"Foo\", \"path\": \"input.py\", \"pattern\": \"/^class Foo:$/\", \"language\": \"Python\", \"line\": 1, \"kind\": \"class\", \"inherits\": false, \"access\": \"public\", \"roles\": \"def\", \"end\": 3}\n{\"_type\": \"tag\", \"name\": \"Foo.doIt\", \"path\": \"input.py\", \"pattern\": \"/^ def doIt():$/\", \"language\": \"Python\", \"line\": 2, \"kind\": \"member\", \"access\": \"public\", \"signature\": \"()\", \"scope\": \"Foo\", \"scopeKind\": \"class\", \"roles\": \"def\", \"extras\": \"qualified\", \"end\": 3}\n{\"_type\": \"tag\", \"name\": \"N\\tA\\tM\\tE\", \"path\": \"input.1\", \"pattern\": \"/^.SH \\\"\\tN\\tA\\tM\\tE\\t\\\"$/\", \"language\": \"Man\", \"line\": 1, \"kind\": \"section\", \"roles\": \"def\", \"end\": 1}\n{\"_type\": \"tag\", \"name\": \"doIt\", \"path\": \"input.py\", \"pattern\": \"/^ def doIt():$/\", \"language\": \"Python\", \"line\": 2, \"kind\": \"member\", \"access\": \"public\", \"signature\": \"()\", \"scope\": \"Foo\", \"scopeKind\": \"class\", \"roles\": \"def\", \"end\": 3}\n{\"_type\": \"tag\", \"name\": \"foo\", \"path\": \"input.c\", \"pattern\": \"/^static int foo (void)$/\", \"file\": true, \"language\": \"C\", \"line\": 3, \"typeref\": \"typename:int\", \"kind\": \"function\", \"signature\": \"(void)\", \"roles\": \"def\", \"extras\": \"fileScope\", \"end\": 6}\n{\"_type\": \"tag\", \"name\": \"input.1\", \"path\": \"input.1\", \"pattern\": false, \"language\": \"Man\", \"line\": 1, \"kind\": \"file\", \"roles\": \"def\", \"extras\": \"inputFile\", \"end\": 1}\n{\"_type\": \"tag\", \"name\": \"input.c\", \"path\": \"input.c\", \"pattern\": false, \"language\": \"C\", \"line\": 1, \"kind\": \"file\", \"roles\": \"def\", \"extras\": \"inputFile\", \"end\": 12}\n{\"_type\": \"tag\", \"name\": \"input.go\", \"path\": \"input.go\", \"pattern\": false, \"language\": \"Go\", \"line\": 1, \"kind\": \"file\", \"roles\": \"def\", \"extras\": \"inputFile\", \"end\": 4}\n{\"_type\": \"tag\", \"name\": \"input.py\", \"path\": \"input.py\", \"pattern\": false, \"language\": \"Python\", \"line\": 1, \"kind\": \"file\", \"roles\": \"def\", \"extras\": \"inputFile\", \"end\": 3}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"pattern\": \"/^main(void)$/\", \"language\": \"C\", \"line\": 9, \"typeref\": \"typename:int\", \"kind\": \"function\", \"signature\": \"(void)\", \"roles\": \"def\", \"end\": 12}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.go\", \"pattern\": \"/^func main() {$/\", \"language\": \"Go\", \"line\": 3, \"kind\": \"func\", \"signature\": \"()\", \"scope\": \"main\", \"scopeKind\": \"package\", \"roles\": \"def\", \"end\": 4}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.go\", \"pattern\": \"/^package main$/\", \"language\": \"Go\", \"line\": 1, \"kind\": \"package\", \"roles\": \"def\"}\n{\"_type\": \"tag\", \"name\": \"main.main\", \"path\": \"input.go\", \"pattern\": \"/^func main() {$/\", \"language\": \"Go\", \"line\": 3, \"kind\": \"func\", \"signature\": \"()\", \"scope\": \"main\", \"scopeKind\": \"package\", \"roles\": \"def\", \"extras\": \"qualified\", \"end\": 4}\n{\"_type\": \"tag\", \"name\": \"stdio.h\", \"path\": \"input.c\", \"pattern\": \"/^#include /\", \"language\": \"C\", \"line\": 1, \"kind\": \"header\", \"roles\": \"system\", \"extras\": \"reference\"}\n" }, { "path": "Tmain/json-output-much-parser-fields.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/json-output-much-parser-fields.d/input.h", "content": "@protocol V\n(V(V(V(V(V(V\n/* Takne from #2053 submitted by @chrismwendt */\n" }, { "path": "Tmain/json-output-much-parser-fields.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\n#\n# This is crash test.\n# The input is broken so the we have no expectation for output.\n#\n\nCTAGS=$1\n. ../utils.sh\n\nis_feature_available ${CTAGS} json\n\n$CTAGS --options=NONE --output-format=json input.h\n" }, { "path": "Tmain/json-output-ptag-in-list-extras.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} json\n\nO=/tmp/ctags-tmain-$$\n\necho '#' json regular file\n\"${CTAGS}\" --quiet --options=NONE --output-format=json -o $O --list-extras | grep pseudo\n\necho '#' json -\n\"${CTAGS}\" --quiet --options=NONE --output-format=json -o - --list-extras | grep pseudo\n\necho '#' json NOTHING\n\"${CTAGS}\" --quiet --options=NONE --output-format=json --list-extras | grep pseudo\n\nrm -f $O\n" }, { "path": "Tmain/json-output-ptag-in-list-extras.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/json-output-ptag-in-list-extras.d/stdout-expected.txt", "content": "# json regular file\np pseudo yes NONE no 0 Include pseudo tags\n# json -\np pseudo no NONE no 0 Include pseudo tags\n# json NOTHING\np pseudo no NONE no 0 Include pseudo tags\n" }, { "path": "Tmain/json-output-to-file.d/input.c", "content": "#include \n\nstatic int foo (void)\n{\n return 1;\n}\n\nint\nmain(void)\n{\n return foo();\n}\n" }, { "path": "Tmain/json-output-to-file.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nO=/tmp/ctags-tmain-$$.json\n\nis_feature_available \"${CTAGS}\" json\n\n$CTAGS --quiet --options=NONE --extras=-p --output-format=json -f ${O} input.c > /dev/null && cat ${O}\ns=$?\n\nrm -f ${O}\n\nexit $s\n" }, { "path": "Tmain/json-output-to-file.d/stdout-expected.txt", "content": "{\"_type\": \"tag\", \"name\": \"foo\", \"path\": \"input.c\", \"pattern\": \"/^static int foo (void)$/\", \"file\": true, \"typeref\": \"typename:int\", \"kind\": \"function\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"pattern\": \"/^main(void)$/\", \"typeref\": \"typename:int\", \"kind\": \"function\"}\n" }, { "path": "Tmain/json-output-typed-fields.d/input.c", "content": "static int local;\nint global;\n" }, { "path": "Tmain/json-output-typed-fields.d/input.ctst", "content": "f\n" }, { "path": "Tmain/json-output-typed-fields.d/input.rst", "content": "==============================================\nTITLE\n==============================================\n\nsection\n-------\n" }, { "path": "Tmain/json-output-typed-fields.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n\nif is_feature_available \"${CTAGS}\" json; then\n\t${CTAGS} --quiet --options=NONE -o - \\\n\t\t\t --output-format=json \\\n\t\t\t --language-force=CTagsSelfTest input.ctst\n\t${CTAGS} --quiet --options=NONE -o - \\\n\t\t\t --output-format=json \\\n\t\t\t --fields-RestructuredText=+'{overline}' input.rst\n\t${CTAGS} --quiet --options=NONE -o - \\\n\t\t\t --output-format=json \\\n\t\t\t input.c\nfi\n" }, { "path": "Tmain/json-output-typed-fields.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/json-output-typed-fields.d/stdout-expected.txt", "content": "{\"_type\": \"tag\", \"name\": \"atag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\"}\n{\"_type\": \"tag\", \"name\": \"btag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"bField\": true}\n{\"_type\": \"tag\", \"name\": \"ctag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"bField\": true}\n{\"_type\": \"tag\", \"name\": \"dtag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"sbField\": \"val\"}\n{\"_type\": \"tag\", \"name\": \"etag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"sbField\": false}\n{\"_type\": \"tag\", \"name\": \"ftag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"sField\": \"val\"}\n{\"_type\": \"tag\", \"name\": \"gtag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"sField\": \"\"}\n{\"_type\": \"tag\", \"name\": \"htag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"iField\": 23}\n{\"_type\": \"tag\", \"name\": \"itag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"iField\": -3}\n{\"_type\": \"tag\", \"name\": \"jtag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"iField\": 1}\n{\"_type\": \"tag\", \"name\": \"ktag\", \"path\": \"input.ctst\", \"pattern\": \"/^f$/\", \"kind\": \"fieldMaker\", \"iField\": 0}\n{\"_type\": \"tag\", \"name\": \"TITLE\", \"path\": \"input.rst\", \"pattern\": \"/^TITLE$/\", \"kind\": \"title\", \"overline\": true}\n{\"_type\": \"tag\", \"name\": \"section\", \"path\": \"input.rst\", \"pattern\": \"/^section$/\", \"kind\": \"subtitle\", \"scope\": \"TITLE\", \"scopeKind\": \"title\"}\n{\"_type\": \"tag\", \"name\": \"global\", \"path\": \"input.c\", \"pattern\": \"/^int global;$/\", \"typeref\": \"typename:int\", \"kind\": \"variable\"}\n{\"_type\": \"tag\", \"name\": \"local\", \"path\": \"input.c\", \"pattern\": \"/^static int local;$/\", \"file\": true, \"typeref\": \"typename:int\", \"kind\": \"variable\"}\n" }, { "path": "Tmain/json-parser-limit-recursion.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/json-parser-limit-recursion.d/input512-one.json", "content": "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[\n{\"depth_pre\": 511},\n[\n{\"depth\": 512}\n],\n{\"depth_post\": 511}\n]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]\n" }, { "path": "Tmain/json-parser-limit-recursion.d/input512-two.json", "content": "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[\n{\"depth_pre\": 511},\n{\"two_pre\": 511},\n[\n{\"depth\": 512},\n{\"two\": 512}\n],\n{\"depth_post\": 511},\n{\"two_post\": 511},\n]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]\n" }, { "path": "Tmain/json-parser-limit-recursion.d/input513-one.json", "content": "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[\n[\n{\"depth_pre\": 512},\n[\n{\"depth\": 513}\n],\n{\"depth_post\": 512}\n]\n]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]\n" }, { "path": "Tmain/json-parser-limit-recursion.d/input513-two.json", "content": "[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[\n[\n{\"depth_pre\": 512},\n{\"two_pre\": 512},\n[\n{\"depth\": 513},\n{\"two\": 513}\n],\n{\"depth_post\": 512},\n{\"two_post\": 512},\n]\n]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]\n" }, { "path": "Tmain/json-parser-limit-recursion.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--options=NONE --sort=no -o - --kinds-JSON=-ao\"\n\necho '# depth: 512, items: 1' &&\necho '# depth: 512, items: 1' 1>&2 &&\n${CTAGS} --quiet $O input512-one.json &&\n\necho '# depth: 512, items: 2' &&\necho '# depth: 512, items: 2' 1>&2 &&\n${CTAGS} --quiet $O input512-two.json &&\n\necho '# depth: 513, items: 1' &&\necho '# depth: 513, items: 1' 1>&2 &&\n${CTAGS} --quiet $O input513-one.json &&\n\necho '# depth: 513, items: 2' &&\necho '# depth: 513, items: 2' 1>&2 &&\n${CTAGS} --quiet $O input513-two.json &&\n\necho '# depth: 513, items: 1, NO QUIET' &&\necho '# depth: 513, items: 1, NO QUIET' 1>&2 &&\n${CTAGS} $O input513-one.json &&\n\necho '# depth: 513, items: 2, NO QUIET' &&\necho '# depth: 513, items: 2, NO QUIET' 1>&2 &&\n${CTAGS} $O input513-two.json\n" }, { "path": "Tmain/json-parser-limit-recursion.d/stderr-expected.txt", "content": "# depth: 512, items: 1\n# depth: 512, items: 2\n# depth: 513, items: 1\n# depth: 513, items: 2\n# depth: 513, items: 1, NO QUIET\nctags: Notice: No options will be read from files or environment\nctags: Notice: Terminate parsing: too deep brackets recursion in input513-one.json at 5\n# depth: 513, items: 2, NO QUIET\nctags: Notice: No options will be read from files or environment\nctags: Notice: Terminate parsing: too deep brackets recursion in input513-two.json at 6\n" }, { "path": "Tmain/json-parser-limit-recursion.d/stdout-expected.txt", "content": "# depth: 512, items: 1\ndepth_pre\tinput512-one.json\t/^{\"depth_pre\": 511},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0\ndepth\tinput512-one.json\t/^{\"depth\": 512}$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.1.0\ndepth_post\tinput512-one.json\t/^{\"depth_post\": 511}$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.2\n# depth: 512, items: 2\ndepth_pre\tinput512-two.json\t/^{\"depth_pre\": 511},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0\ntwo_pre\tinput512-two.json\t/^{\"two_pre\": 511},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.1\ndepth\tinput512-two.json\t/^{\"depth\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.2.0\ntwo\tinput512-two.json\t/^{\"two\": 512}$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.2.1\ndepth_post\tinput512-two.json\t/^{\"depth_post\": 511},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.3\ntwo_post\tinput512-two.json\t/^{\"two_post\": 511},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.4\n# depth: 513, items: 1\ndepth_pre\tinput513-one.json\t/^{\"depth_pre\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0\n# depth: 513, items: 2\ndepth_pre\tinput513-two.json\t/^{\"depth_pre\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0\ntwo_pre\tinput513-two.json\t/^{\"two_pre\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.1\n# depth: 513, items: 1, NO QUIET\ndepth_pre\tinput513-one.json\t/^{\"depth_pre\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0\n# depth: 513, items: 2, NO QUIET\ndepth_pre\tinput513-two.json\t/^{\"depth_pre\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0\ntwo_pre\tinput513-two.json\t/^{\"two_pre\": 512},$/;\"\tn\tobject:0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.0.1\n" }, { "path": "Tmain/kind-abnormal-spec.d/input.x", "content": "@\nL\n" }, { "path": "Tmain/kind-abnormal-spec.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE\"\n\necho '# list kinds'\n${CTAGS} ${O} --languages=+CTagsSelfTest --list-kinds=CTagsSelfTest | tr '\\0' '_' | grep -v seccomp\necho\n\necho '# list kinds-full'\n${CTAGS} ${O} --languages=+CTagsSelfTest --list-kinds-full=CTagsSelfTest | tr '\\0' '_' | grep -v seccomp\necho\n\necho '# +K'\n${CTAGS} ${O} --languages=+CTagsSelfTest --language-force=CTagsSelfTest --fields=+K -o - input.x\necho\n\necho '# +k'\n${CTAGS} ${O} --languages=+CTagsSelfTest --language-force=CTagsSelfTest --fields=+k -o - input.x\necho\n\necho '# +zk'\n${CTAGS} ${O} --languages=+CTagsSelfTest --language-force=CTagsSelfTest --fields=+zk -o - input.x\necho\n\necho '# +Zk'\n${CTAGS} ${O} --languages=+CTagsSelfTest --language-force=CTagsSelfTest --fields=+Zk -o - input.x\necho\n" }, { "path": "Tmain/kind-abnormal-spec.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/kind-abnormal-spec.d/stdout-expected.txt", "content": "# list kinds\nb name with unwanted characters\n_ kind with no letter\nL kind with no long name\nN emit a normal tag\nB beginning of an area for a guest\nE end of an area for a guest\nQ stop the parsing\nd a kind disabled by default [off]\ne a kind enabled by default\nr emit a tag with multi roles\nR emit a tag with multi roles(disabled by default) [off]\nf tag for testing field:\nn trigger notice output\nz emit a tag having an empty string\nZ don't emit a tag having an empty string\n\n# list kinds-full\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\n no letter yes no 0 NONE 0 kind with no letter\nB ThisShouldNotBePrintedKindNameMustBeGiven yes no 0 NONE 0 beginning of an area for a guest\nE ThisShouldNotBePrintedKindNameMustBeGiven yes no 0 NONE 0 end of an area for a guest\nL ThisShouldNotBePrintedKindNameMustBeGiven yes no 0 NONE 0 kind with no long name\nN nothingSpecial yes no 0 NONE 0 emit a normal tag\nQ quit yes no 0 NONE 0 stop the parsing\nR rolesDisabled no yes 2 NONE 0 emit a tag with multi roles(disabled by default)\nZ dontEmitNullTag yes no 0 NONE 0 don't emit a tag having an empty string\nb broken tag yes no 1 NONE 0 name with unwanted characters\nd disabled no no 2 NONE 0 a kind disabled by default\ne enabled yes no 2 NONE 0 a kind enabled by default\nf fieldMaker yes no 0 NONE 0 tag for testing field:\nn triggerNotice yes no 0 NONE 0 trigger notice output\nr roles yes yes 4 NONE 0 emit a tag with multi roles\nz emitNullTag yes no 0 NONE 0 emit a tag having an empty string\n\n# +K\nabnormal kindDefinition testing (no letter)\tinput.x\t/^@$/;\"\tno letter\nabnormal kindDefinition testing (no long name)\tinput.x\t/^L$/;\"\tL\n\n# +k\nabnormal kindDefinition testing (no letter)\tinput.x\t/^@$/;\"\tno letter\nabnormal kindDefinition testing (no long name)\tinput.x\t/^L$/;\"\tL\n\n# +zk\nabnormal kindDefinition testing (no letter)\tinput.x\t/^@$/;\"\tkind:no letter\nabnormal kindDefinition testing (no long name)\tinput.x\t/^L$/;\"\tkind:L\n\n# +Zk\nabnormal kindDefinition testing (no letter)\tinput.x\t/^@$/;\"\tno letter\nabnormal kindDefinition testing (no long name)\tinput.x\t/^L$/;\"\tL\n\n" }, { "path": "Tmain/kind-and-role-defaults.d/input.cst", "content": "d\nd\nd\ne\ne\ne\n" }, { "path": "Tmain/kind-and-role-defaults.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nB0=\"--quiet --options=NONE\"\nB1=\"-o - --fields=+E --language-force=CTagsSelfTest input.cst\"\nOPT=\n\nOPT=\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nOPT=\"--kinds-CTagsSelfTest=-e\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nOPT=\"--kinds-CTagsSelfTest=-e+d\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nOPT=\"--kinds-CTagsSelfTest=+d\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\n\n\nOPT=\"--extras=+r --fields=+r\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nOPT=\"--extras=+r --fields=+r --kinds-CTagsSelfTest=-e\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nOPT=\"--extras=+r --fields=+r --kinds-CTagsSelfTest=-e+d\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nOPT=\"--extras=+r --fields=+r --kinds-CTagsSelfTest=+d\"\necho \"# $OPT\"\n${CTAGS} $B0 $OPT $B1\necho\n\nexit $?\n" }, { "path": "Tmain/kind-and-role-defaults.d/stdout-expected.txt", "content": "# \nenabled-kind-no-role\tinput.cst\t/^e$/;\"\te\n\n# --kinds-CTagsSelfTest=-e\n\n# --kinds-CTagsSelfTest=-e+d\ndisable-kind-no-role\tinput.cst\t/^d$/;\"\td\n\n# --kinds-CTagsSelfTest=+d\ndisable-kind-no-role\tinput.cst\t/^d$/;\"\td\nenabled-kind-no-role\tinput.cst\t/^e$/;\"\te\n\n# --extras=+r --fields=+r\nenabled-kind-enabled-role\tinput.cst\t/^e$/;\"\te\troles:enabled\textras:reference\nenabled-kind-no-role\tinput.cst\t/^e$/;\"\te\troles:def\n\n# --extras=+r --fields=+r --kinds-CTagsSelfTest=-e\n\n# --extras=+r --fields=+r --kinds-CTagsSelfTest=-e+d\ndisable-kind-enabled-role\tinput.cst\t/^d$/;\"\td\troles:enabled\textras:reference\ndisable-kind-no-role\tinput.cst\t/^d$/;\"\td\troles:def\n\n# --extras=+r --fields=+r --kinds-CTagsSelfTest=+d\ndisable-kind-enabled-role\tinput.cst\t/^d$/;\"\td\troles:enabled\textras:reference\ndisable-kind-no-role\tinput.cst\t/^d$/;\"\td\troles:def\nenabled-kind-enabled-role\tinput.cst\t/^e$/;\"\te\troles:enabled\textras:reference\nenabled-kind-no-role\tinput.cst\t/^e$/;\"\te\troles:def\n\n" }, { "path": "Tmain/kind-long-lregex.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '# definition'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --langdef=IdealLang --regex-IdealLang='/def (.*)/\\1/d,definition,definitions/' \\\n\t --list-kinds-full=IdealLang\n\necho '# disabling'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --langdef=IdealLang --regex-IdealLang='/def (.*)/\\1/d,definition,definitions/' \\\n\t --kinds-IdealLang='-{definition}' \\\n\t --list-kinds-full=IdealLang\n\necho '# enabling again'\n${CTAGS} --quiet --options=NONE --with-list-header=no \\\n\t --langdef=IdealLang --regex-IdealLang='/def (.*)/\\1/d,definition,definitions/' \\\n\t --kinds-IdealLang='-{definition}' \\\n\t --kinds-IdealLang='+{definition}' \\\n\t --list-kinds-full=IdealLang\n" }, { "path": "Tmain/kind-long-lregex.d/stdout-expected.txt", "content": "# definition\nd definition yes no 0 NONE 0 definitions\n# disabling\nd definition no no 0 NONE 0 definitions\n# enabling again\nd definition yes no 0 NONE 0 definitions\n" }, { "path": "Tmain/kind-long.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --kinds-C=+'{label}' --list-kinds-full=C | grep label\n${CTAGS} --quiet --options=NONE --kinds-C=-'{macro}' --list-kinds-full=C | grep macro\n" }, { "path": "Tmain/kind-long.d/stdout-expected.txt", "content": "L label yes no 0 C 0 goto labels\nD macroparam no no 0 C 0 parameters inside macro definitions\nd macro no no 2 C 0 macro definitions\n" }, { "path": "Tmain/kinddef.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\ntitle()\n{\n\techo\n\techo \"$@\"\n\n\t{\n\t\techo\n\t\techo \"$@\"\n\t} 1>&2\n}\n\n{\ntitle '# NOSUCHLANG'\n${CTAGS} --kinddef-NOSUCHLANG=l,name,description --list-kinds-full=NOSUCHLANG\n\nCTAGS=\"${CTAGS} --langdef=MYTEST\"\n\ntitle '# define \"a\"'\n${CTAGS} --kinddef-MYTEST=a,aa,aaa --list-kinds-full=MYTEST\n\ntitle '# no description 1'\n${CTAGS} --kinddef-MYTEST=a,aa, --list-kinds-full=MYTEST\n\ntitle '# no description 2'\n${CTAGS} --kinddef-MYTEST=a,aa --list-kinds-full=MYTEST\n\ntitle '# no name 1'\n${CTAGS} --kinddef-MYTEST=a, --list-kinds-full=MYTEST\n\ntitle '# no name 2'\n${CTAGS} --kinddef-MYTEST=a --list-kinds-full=MYTEST\n\ntitle '# an empty name 1'\n${CTAGS} --kinddef-MYTEST=a,,x --list-kinds-full=MYTEST\n\ntitle '# an empty name 2'\n${CTAGS} --kinddef-MYTEST=a,, --list-kinds-full=MYTEST\n\ntitle '# wrong letter in name 1'\n${CTAGS} --kinddef-MYTEST=\"a,a\tx,d\" --list-kinds-full=MYTEST\n\ntitle '# wrong letter in name 2'\n${CTAGS} --kinddef-MYTEST=\"a,a\tx,\" --list-kinds-full=MYTEST\n\ntitle '# wrong letter in name 3'\n${CTAGS} --kinddef-MYTEST=\"a,a\tx\" --list-kinds-full=MYTEST\n\ntitle '# no letter 1'\n${CTAGS} --kinddef-MYTEST=,n,d --list-kinds-full=MYTEST\n\ntitle '# no letter 2'\n${CTAGS} --kinddef-MYTEST=,n, --list-kinds-full=MYTEST\n\ntitle '# no letter 3'\n${CTAGS} --kinddef-MYTEST=,n --list-kinds-full=MYTEST\n\ntitle '# no letter 4'\n${CTAGS} --kinddef-MYTEST=, --list-kinds-full=MYTEST\n\ntitle '# no letter 5'\n${CTAGS} --kinddef-MYTEST= --list-kinds-full=MYTEST\n\ntitle '# wrong letter'\n${CTAGS} --kinddef-MYTEST=^ --list-kinds-full=MYTEST\n\ntitle '# wrong letter (using number)'\n${CTAGS} --kinddef-MYTEST=7 --list-kinds-full=MYTEST\n\ntitle '# reusing the letter for file kind'\n${CTAGS} --kinddef-MYTEST=F --list-kinds-full=MYTEST\n\ntitle '# reusing the name for file kind'\n${CTAGS} --kinddef-MYTEST=x,file,desc --list-kinds-full=MYTEST\n\ntitle '# inject a flag separator'\n${CTAGS} --kinddef-MYTEST='x,kind,desc{foo}' --list-kinds-full=MYTEST\n\ntitle '# inject a broken flag separator(1)'\n${CTAGS} --kinddef-MYTEST='x,kind,desc{foo' --list-kinds-full=MYTEST\n\ntitle '# inject a broken flag separator(2)'\n${CTAGS} --kinddef-MYTEST='x,kind,desc{' --list-kinds-full=MYTEST\n\ntitle '# use a { in description (1)'\n${CTAGS} --kinddef-MYTEST='x,kind,desc\\{' --list-kinds-full=MYTEST\n\ntitle '# use a { in description (2)'\n${CTAGS} --kinddef-MYTEST='x,kind,desc\\{}' --list-kinds-full=MYTEST\n\ntitle '# use a number char as the initial letter'\n${CTAGS} --kinddef-MYTEST='x,0kind,desc' --list-kinds-full=MYTEST\n\ntitle '# use a number char within the body'\n${CTAGS} --kinddef-MYTEST='x,k0ind,desc' --list-kinds-full=MYTEST\n\n# title '# use a { and \\t in description'\n# ${CTAGS} --kinddef-MYTEST='x,kind,desc\\{}\\t' --list-kinds-full=MYTEST\n\ntitle '# use a \\ in description'\n${CTAGS} --kinddef-MYTEST='x,kind,desc\\\\backslash' --list-kinds-full=MYTEST\n\ntitle '# description started from {'\n${CTAGS} --kinddef-MYTEST='x,kind,{' --list-kinds-full=MYTEST\n\ntitle '# description started from \\{'\n${CTAGS} --kinddef-MYTEST='x,kind,\\{' --list-kinds-full=MYTEST\n\ntitle '# _refonly flag'\n${CTAGS} --kinddef-MYTEST='x,kind,desc' --list-kinds-full=MYTEST\n${CTAGS} --kinddef-MYTEST='x,kind,desc' --_roledef-MYTEST.x=role,roleDesc --list-kinds-full=MYTEST\n${CTAGS} --kinddef-MYTEST='x,kind,desc{_refonly}' --_roledef-MYTEST.'{kind}'=role,roleDesc --list-kinds-full=MYTEST\n\n} > /tmp/ctags-tmain-$$.stdout 2>/tmp/ctags-tmain-$$.stderr\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stdout\nrm /tmp/ctags-tmain-$$.stdout\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stderr 1>&2\nrm /tmp/ctags-tmain-$$.stderr\n" }, { "path": "Tmain/kinddef.d/stderr-expected.txt", "content": "\n# NOSUCHLANG\nctags: Unknown language \"NOSUCHLANG\" in \"kinddef-NOSUCHLANG\" option\n\n# define \"a\"\n\n# no description 1\nctags: found an empty kind description in \"--kinddef-MYTEST\" option\n\n# no description 2\nctags: no kind description specified in \"--kinddef-MYTEST\" option\n\n# no name 1\nctags: no kind name specified in \"--kinddef-MYTEST\" option\n\n# no name 2\nctags: wrong kind definition in \"--kinddef-MYTEST\" option: no comma after letter\n\n# an empty name 1\nctags: the kind name in \"--kinddef-MYTEST\" option is empty\n\n# an empty name 2\nctags: the kind name in \"--kinddef-MYTEST\" option is empty\n\n# wrong letter in name 1\nctags: non-alphanumeric char is used as part of kind name: 'a\tx' in \"--kinddef-MYTEST\" option\n\n# wrong letter in name 2\nctags: non-alphanumeric char is used as part of kind name: 'a\tx' in \"--kinddef-MYTEST\" option\n\n# wrong letter in name 3\nctags: no kind description specified in \"--kinddef-MYTEST\" option\n\n# no letter 1\nctags: no kind letter specified in \"--kinddef-MYTEST\" option\n\n# no letter 2\nctags: no kind letter specified in \"--kinddef-MYTEST\" option\n\n# no letter 3\nctags: no kind letter specified in \"--kinddef-MYTEST\" option\n\n# no letter 4\nctags: no kind letter specified in \"--kinddef-MYTEST\" option\n\n# no letter 5\nctags: no kind definition specified in \"--kinddef-MYTEST\" option\n\n# wrong letter\nctags: the kind letter given in \"--kinddef-MYTEST\" option is not an alphabet\n\n# wrong letter (using number)\nctags: the kind letter given in \"--kinddef-MYTEST\" option is not an alphabet\n\n# reusing the letter for file kind\nctags: the kind letter `F' in \"--kinddef-MYTEST\" option is reserved for \"file\" kind\n\n# reusing the name for file kind\nctags: the kind name file in \"--kinddef-MYTEST\" option is reserved\n\n# inject a flag separator\n\n# inject a broken flag separator(1)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{foo\"\n\n# inject a broken flag separator(2)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{\"\n\n# use a { in description (1)\n\n# use a { in description (2)\n\n# use a number char as the initial letter\nctags: a kind name doesn't start with an alphabetical character: '0kind' in \"--kinddef-MYTEST\" option\n\n# use a number char within the body\n\n# use a \\ in description\n\n# description started from {\nctags: found an empty kind description in \"--kinddef-MYTEST\" option\n\n# description started from \\{\n\n# _refonly flag\n" }, { "path": "Tmain/kinddef.d/stdout-expected.txt", "content": "\n# NOSUCHLANG\n\n# define \"a\"\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\na aa yes no 0 NONE 0 aaa\n\n# no description 1\n\n# no description 2\n\n# no name 1\n\n# no name 2\n\n# an empty name 1\n\n# an empty name 2\n\n# wrong letter in name 1\n\n# wrong letter in name 2\n\n# wrong letter in name 3\n\n# no letter 1\n\n# no letter 2\n\n# no letter 3\n\n# no letter 4\n\n# no letter 5\n\n# wrong letter\n\n# wrong letter (using number)\n\n# reusing the letter for file kind\n\n# reusing the name for file kind\n\n# inject a flag separator\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc\n\n# inject a broken flag separator(1)\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc\n\n# inject a broken flag separator(2)\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc\n\n# use a { in description (1)\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc{\n\n# use a { in description (2)\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc{}\n\n# use a number char as the initial letter\n\n# use a number char within the body\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx k0ind yes no 0 NONE 0 desc\n\n# use a \\ in description\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc\\backslash\n\n# description started from {\n\n# description started from \\{\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 {\n\n# _refonly flag\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 0 NONE 0 desc\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes no 1 NONE 0 desc\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx kind yes yes 1 NONE 0 desc\n" }, { "path": "Tmain/kinds-all-with-spec.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/kinds-all-with-spec.d/input.c", "content": "int main(void) {return 0;}\n" }, { "path": "Tmain/kinds-all-with-spec.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nt ()\n{\n\techo '#' \"--all-kinds=$1\" 1>&2\n\t$CTAGS --quiet --options=NONE -o - --all-kinds=\"$1\" --fields=-T input.c\n\techo '#' \"--kinds-all=$1\" 1>&2\n\t$CTAGS --quiet --options=NONE -o - --kinds-all=\"$1\" --fields=-T input.c\n}\n\necho '#' 1>&2\necho '# unexpected flags after operators ([+-])' 1>&2\necho '#' 1>&2\nt '*-a'\nt '*-{abc}'\nt '*+a'\nt '*+{abc}'\n\nt 'F-a'\nt 'F-{abc}'\nt 'F+a'\nt 'F+{abc}'\n\nt '{file}-a'\nt '{file}-{abc}'\nt '{file}+a'\nt '{file}+{abc}'\n\nt '+F-a'\nt '+F-{abc}'\nt '+F+a'\nt '+F+{abc}'\n\nt '+{file}-a'\nt '+{file}-{abc}'\nt '+{file}+a'\nt '+{file}+{abc}'\n\necho '#' 1>&2\necho '# repeaed operators ([+-])' 1>&2\necho '#' 1>&2\nt '*--{file}'\nt '*--F'\nt '*++{file}'\nt '*++F'\nt '*+-{file}'\nt '*+-F'\nt '*-+{file}'\nt '*-+F'\n\nt '{file}--F'\nt '{file}++F'\nt '{file}-+F'\nt '{file}+-F'\n\nt '{file}--{file}'\nt '{file}++{file}'\nt '{file}-+{file}'\nt '{file}+-{file}'\n\nt 'F--{file}'\nt 'F++{file}'\nt 'F-+{file}'\nt 'F+-{file}'\n\nt 'F--F'\nt 'F++F'\nt 'F-+F'\nt 'F+-F'\n\necho '#' 1>&2\necho '# redundant * usage' 1>&2\necho '#' 1>&2\nt '-*'\nt '+*'\nt 'F-*'\nt 'F+*'\nt '{file}-*'\nt '{file}+*'\nt '+F-*'\nt '-F+*'\nt '+{file}-*'\nt '-{file}+*'\n\necho '#' 1>&2\necho '# Just print the parsed file name' 1>&2\necho '#' 1>&2\n\n$CTAGS --quiet --options=NONE -o- --all-kinds=F --extras=+f --fields=-T input.c\n$CTAGS --quiet --options=NONE -o- --all-kinds=FF --extras=+f --fields=-T input.c\n$CTAGS --quiet --options=NONE -o- --all-kinds=-F+F --extras=+f --fields=-T input.c\n$CTAGS --quiet --options=NONE -o- --all-kinds='*' --all-kinds=F --extras=+f --fields=-T input.c\n\n$CTAGS --quiet --options=NONE -o- --kinds-all=F --extras=+f --fields=-T input.c\n$CTAGS --quiet --options=NONE -o- --kinds-all=FF --extras=+f --fields=-T input.c\n$CTAGS --quiet --options=NONE -o- --kinds-all=-F+F --extras=+f --fields=-T input.c\n$CTAGS --quiet --options=NONE -o- --kinds-all='*' --kinds-all=F --extras=+f --fields=-T input.c\n\necho '#' 1>&2\necho '# The original test cases' 1>&2\necho '#' 1>&2\nif ! $CTAGS --quiet --options=NONE --kinds-all=xyz --_force-quit=0; then\n\t$CTAGS --quiet --options=NONE --all-kinds=abc --_force-quit=0\nelse\n\texit 0\nfi\n" }, { "path": "Tmain/kinds-all-with-spec.d/stderr-expected.txt", "content": "#\n# unexpected flags after operators ([+-])\n#\n# --all-kinds=*-a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=*-a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=*-{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=*-{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=*+a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=*+a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=*+{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=*+{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=F-a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=F-a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=F-{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=F-{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=F+a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=F+a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=F+{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=F+{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds={file}-a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all={file}-a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds={file}-{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all={file}-{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds={file}+a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all={file}+a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds={file}+{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all={file}+{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+F-a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+F-a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+F-{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+F-{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+F+a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+F+a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+F+{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+F+{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+{file}-a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+{file}-a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+{file}-{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+{file}-{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+{file}+a\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+{file}+a\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n# --all-kinds=+{file}+{abc}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n# --kinds-all=+{file}+{abc}\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\n#\n# repeaed operators ([+-])\n#\n# --all-kinds=*--{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*--{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*--F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*--F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*++{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*++{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*++F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*++F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*+-{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*+-{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*+-F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*+-F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*-+{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*-+{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=*-+F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=*-+F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}--F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}--F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}++F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}++F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}-+F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}-+F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}+-F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}+-F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}--{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}--{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}++{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}++{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}-+{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}-+{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds={file}+-{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all={file}+-{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F--{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F--{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F++{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F++{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F-+{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F-+{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F+-{file}\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F+-{file}\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F--F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F--F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F++F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F++F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F-+F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F-+F\nctags: don't repeat + (nor -) in --kinds-all option\n# --all-kinds=F+-F\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't repeat + (nor -) in --all-kinds option\n# --kinds-all=F+-F\nctags: don't repeat + (nor -) in --kinds-all option\n#\n# redundant * usage\n#\n# --all-kinds=-*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=-*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=+*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=+*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=F-*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=F-*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=F+*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=F+*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds={file}-*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all={file}-*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds={file}+*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all={file}+*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=+F-*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=+F-*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=-F+*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=-F+*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=+{file}-*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=+{file}-*\nctags: don't use '*' after + (nor -) in --kinds-all option\n# --all-kinds=-{file}+*\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: don't use '*' after + (nor -) in --all-kinds option\n# --kinds-all=-{file}+*\nctags: don't use '*' after + (nor -) in --kinds-all option\n#\n# Just print the parsed file name\n#\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\n#\n# The original test cases\n#\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --kinds-all\nctags: Warning: \"--all-kinds\" option is obsolete; use \"--kinds-all\" instead\nctags: only '*', 'F', \"{file}\" or their combination is acceptable as kind letter for --all-kinds\n" }, { "path": "Tmain/kinds-all-with-spec.d/stdout-expected.txt", "content": "input.c\tinput.c\t1;\"\tF\ninput.c\tinput.c\t1;\"\tF\ninput.c\tinput.c\t1;\"\tF\nmain\tinput.c\t/^int main(void) {return 0;}$/;\"\tf\ttyperef:typename:int\ninput.c\tinput.c\t1;\"\tF\ninput.c\tinput.c\t1;\"\tF\ninput.c\tinput.c\t1;\"\tF\ninput.c\tinput.c\t1;\"\tF\nmain\tinput.c\t/^int main(void) {return 0;}$/;\"\tf\ttyperef:typename:int\ninput.c\tinput.c\t1;\"\tF\n" }, { "path": "Tmain/lang-sequel.d/args.ctags", "content": "--langdef=UnknownX\n--map-UnknownX=.unknown\n--_sequel-UnknownX={{\n (bye) ==\n}}\n" }, { "path": "Tmain/lang-sequel.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/lang-sequel.d/input.unknown", "content": "EMPTY\n" }, { "path": "Tmain/lang-sequel.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n${CTAGS} --quiet --options=NONE --options=./args.ctags -o - input.unknown\n" }, { "path": "Tmain/lang-sequel.d/stderr-expected.txt", "content": "(bye)\n" }, { "path": "Tmain/lang-sequel.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/lang-with-no-pattern.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/lang-with-no-pattern.d/input.foo", "content": "" }, { "path": "Tmain/lang-with-no-pattern.d/run.sh", "content": "# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} debug\n\n${CTAGS} --quiet --options=NONE --langdef=foo --map-foo=+.foo -o - input.foo\n" }, { "path": "Tmain/lang-with-no-pattern.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/lang-with-no-pattern.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/langmap-option-including-patterns.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/langmap-option-including-patterns.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n: &&\n echo 1. &&\n ${CTAGS} --quiet --options=NONE --langdef=foo --langmap=foo:'(akefile)' --langmap=foo:'([Mm]akefile)(GNUmakefile)' --list-maps | grep 'akefile' &&\n echo 2. &&\n ${CTAGS} --quiet --options=NONE --langmap=Ruby:+'([Mm]akefile)(GNUmakefile).html' --list-maps | grep '\\.rb' &&\n echo 3. &&\n ${CTAGS} --quiet --options=NONE --langmap=Ruby:+'([Mm]akefile)(GNUmakefile).html' --list-maps | grep 'akefile' &&\n echo 4. &&\n ${CTAGS} --quiet --options=NONE --langmap=Ruby:+'([Mm]akefile)(GNUmakefile).html' --list-maps | grep '\\.html' &&\n echo 5. &&\n ${CTAGS} --quiet --options=NONE --langmap=Ruby:+'([Mm]akefile)(GNUmakefile).html' --langmap=default --list-maps | grep '\\.html'\n\nexit $?\n" }, { "path": "Tmain/langmap-option-including-patterns.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/langmap-option-including-patterns.d/stdout-expected.txt", "content": "1.\nAutomake Makefile.am GNUmakefile.am *.am\nRake Rakefile *.rake\nfoo [Mm]akefile GNUmakefile\n2.\nRuby [Mm]akefile GNUmakefile *.rb *.ruby *.html\n3.\nAutomake Makefile.am GNUmakefile.am *.am\nRake Rakefile *.rake\nRuby [Mm]akefile GNUmakefile *.rb *.ruby *.html\n4.\nRuby [Mm]akefile GNUmakefile *.rb *.ruby *.html\n5.\nHTML *.htm *.html\n" }, { "path": "Tmain/langmap-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/langmap-option.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n: &&\n # Clear all mappings related to a language\n echo 1. &&\n ${CTAGS} --quiet --options=NONE --langmap=Ruby: --list-maps | grep '^Ruby' &&\n # Take over a mapping from the other language (resetting)\n echo 2. &&\n ${CTAGS} --quiet --options=NONE --langdef=foo --langmap=foo:.rb --list-maps | grep '\\.rb' &&\n # Overwrite a mapping\n echo 3. &&\n ${CTAGS} --quiet --options=NONE --langdef=foo --langmap=foo:.zzz --langmap=foo:.html --list-maps | grep '\\.html' &&\nexit $?\n" }, { "path": "Tmain/langmap-option.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/langmap-option.d/stdout-expected.txt", "content": "1.\nRuby \n2.\nfoo *.rb\n3.\nfoo *.html\n" }, { "path": "Tmain/language-filed-optscript.d/foo.ctags", "content": "--langdef=foo\n--map-foo=+.foo\n\n--kinddef-foo=v,var,variables\n\n--regex-foo=/def ([a-z])/\\1/v/{{\n . :language =\n}}\n" }, { "path": "Tmain/language-filed-optscript.d/input.foo", "content": "def a\n" }, { "path": "Tmain/language-filed-optscript.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --options=foo.ctags -o - input.foo\n" }, { "path": "Tmain/language-filed-optscript.d/stderr-expected.txt", "content": "foo\n" }, { "path": "Tmain/language-filed-optscript.d/stdout-expected.txt", "content": "a\tinput.foo\t/^def a$/;\"\tv\n" }, { "path": "Tmain/language-names.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/language-names.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\ntest 0 = $( ${CTAGS} --options=NONE --list-languages | grep -v \"^[A-Z].*\" | wc -l )\n" }, { "path": "Tmain/languages-and-language-force-options.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/languages-and-language-force-options.d/input.c", "content": "" }, { "path": "Tmain/languages-and-language-force-options.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --language-force=C --languages=-C -o - input.c\n" }, { "path": "Tmain/languages-and-language-force-options.d/stderr-expected.txt", "content": "ctags: C parser specified with --language-force is disabled\n" }, { "path": "Tmain/line-regex-optscript.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/line-regex-optscript.d/hello.ctags", "content": "--langdef=hello\n--kinddef-hello=d,def,definitions\n--map-hello=+.hello\n\n--regex-hello=/^def +([-a-z]+):$/\\1/d/{{\n\t(world)\n\t/putlast { 1 index length exch put } def\n\t/tr {\n\t % str [int int] str'\n\t ()\n\t 2 index {\n\t\t% str [int int] str' int\n\t\tdup 3 index 0 get\n\t\t% str [int int] str' int int int\n\t\teq {% str [int int] str' int\n\t\t pop\n\t\t dup 2 index 1 get putlast\n\t\t} {% str [int int] str' int\n\t\t 1 index exch putlast\n\t\t} ifelse\n\t } forall\n\t % str [int int] str'\n\t exch pop\n\t 0 exch putinterval\n\t} def\n\t. :name dup (-_) tr . exch name:\n}}\n\n--regex-hello=/^end//{{\n\t(hello) pstack\n\tclear\n}}\n" }, { "path": "Tmain/line-regex-optscript.d/input.hello", "content": "def x-y-z:\nend\n" }, { "path": "Tmain/line-regex-optscript.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --quiet --options=NONE --options=hello.ctags -o - input.hello | sort\n" }, { "path": "Tmain/line-regex-optscript.d/stderr-expected.txt", "content": "(hello)\n(world)\n" }, { "path": "Tmain/line-regex-optscript.d/stdout-expected.txt", "content": "x_y_z\tinput.hello\t/^def x-y-z:$/;\"\td\n" }, { "path": "Tmain/list-aliases.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n${CTAGS} --quiet --options=NONE \\\n\t\t --list-aliases=sh\n" }, { "path": "Tmain/list-aliases.d/stdout-expected.txt", "content": "#ALIAS\nsh\nbash\nksh\nash\ndash\nshell-script\n" }, { "path": "Tmain/list-excludes.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --exclude='foo' --list-excludes\n" }, { "path": "Tmain/list-excludes.d/stdout-expected.txt", "content": "#NAME\n*.a\n*.class\n*.dll\n*.exe\n*.gcda\n*.gcno\n*.lib\n*.o\n*.obj\n*.pyc\n*.pyo\n*.so\n*~\n.*.swp\n.DS_Store\n.arch-ids\n.arch-inventory\n.bzr\n.bzrignore\n.cvsignore\n.deps\n.dvi\n.git\n.gitattributes\n.gitignore\n.hg\n.hgignore\n.svn\nBitKeeper\nCVS\nEIFGEN\nPENDING\nRCS\nRESYNC\nSCCS\n_darcs\nautom4te.cache\nfoo\n{arch}\n" }, { "path": "Tmain/list-extras.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-extras.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nno_yaml()\n{\n\tgrep -v I18nRubyGem\n}\n\n${CTAGS} --quiet --options=NONE --extras='*' --with-list-header --list-extras | no_yaml\n${CTAGS} --quiet --options=NONE --extras='*' --with-list-header --machinable --list-extras | no_yaml\n${CTAGS} --quiet --options=NONE --extras= --with-list-header --list-extras=NONE | no_yaml\n" }, { "path": "Tmain/list-extras.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-extras.d/stdout-expected.txt", "content": "#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- anonymous yes NONE no 0 Include tags for non-named objects like lambda\nF fileScope yes NONE no 0 Include tags of file scope\nf inputFile yes NONE no 0 Include an entry for the base file name of every input file\ng guest yes NONE no 0 Include tags generated by guest parsers\np pseudo yes NONE no 0 Include pseudo tags\nq qualified yes NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference yes NONE no 0 Include reference tags\ns subparser yes NONE no 0 Include tags generated by subparsers\nz nulltag yes NONE no 1 Include tags with empty strings as their names\n- canonicalizedName yes Automake no 1 Include canonicalized object name like libctags_a\n- linkName no Fortran no 1 Linking name used in foreign languages\n- implicitClass no GDScript no 0 Include tag for the implicitly defined unnamed class\n- doubleSharps no IPythonCell no 0 Include cells starting from ##\n- configPrefixed yes Kconfig no 0 prepend CONFIG_ to config names\n- CppDef no Make no 1 Include FOO in -DFOO as as a name of CPreProcessor macro\n- implicitImportName yes Odin no 0 implicitly defined import name like \"filepath\" in \"core:path/filepath\"\n- guessedFromFileName yes PkgConfig no 0 the guessed package name of the .pc file\n- arityAppended yes Prolog no 0 Include predicates with their arities\n- funcmap yes QemuHX no 0 Include mapping SQMP to C function name\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n#LETTER\tNAME\tENABLED\tLANGUAGE\tFIXED\tVER\tDESCRIPTION\n-\tanonymous\tyes\tNONE\tno\t0\tInclude tags for non-named objects like lambda\nF\tfileScope\tyes\tNONE\tno\t0\tInclude tags of file scope\nf\tinputFile\tyes\tNONE\tno\t0\tInclude an entry for the base file name of every input file\ng\tguest\tyes\tNONE\tno\t0\tInclude tags generated by guest parsers\np\tpseudo\tyes\tNONE\tno\t0\tInclude pseudo tags\nq\tqualified\tyes\tNONE\tno\t0\tInclude an extra class-qualified tag entry for each tag\nr\treference\tyes\tNONE\tno\t0\tInclude reference tags\ns\tsubparser\tyes\tNONE\tno\t0\tInclude tags generated by subparsers\nz\tnulltag\tyes\tNONE\tno\t1\tInclude tags with empty strings as their names\n-\tcanonicalizedName\tyes\tAutomake\tno\t1\tInclude canonicalized object name like libctags_a\n-\tlinkName\tno\tFortran\tno\t1\tLinking name used in foreign languages\n-\timplicitClass\tno\tGDScript\tno\t0\tInclude tag for the implicitly defined unnamed class\n-\tdoubleSharps\tno\tIPythonCell\tno\t0\tInclude cells starting from ##\n-\tconfigPrefixed\tyes\tKconfig\tno\t0\tprepend CONFIG_ to config names\n-\tCppDef\tno\tMake\tno\t1\tInclude FOO in -DFOO as as a name of CPreProcessor macro\n-\timplicitImportName\tyes\tOdin\tno\t0\timplicitly defined import name like \"filepath\" in \"core:path/filepath\"\n-\tguessedFromFileName\tyes\tPkgConfig\tno\t0\tthe guessed package name of the .pc file\n-\tarityAppended\tyes\tProlog\tno\t0\tInclude predicates with their arities\n-\tfuncmap\tyes\tQemuHX\tno\t0\tInclude mapping SQMP to C function name\n-\twhitespaceSwapped\tyes\tRobot\tno\t0\tInclude tags swapping whitespace and underscore chars\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- anonymous no NONE no 0 Include tags for non-named objects like lambda\nF fileScope no NONE no 0 Include tags of file scope\nf inputFile no NONE no 0 Include an entry for the base file name of every input file\ng guest no NONE no 0 Include tags generated by guest parsers\np pseudo no NONE no 0 Include pseudo tags\nq qualified no NONE no 0 Include an extra class-qualified tag entry for each tag\nr reference no NONE no 0 Include reference tags\ns subparser no NONE no 0 Include tags generated by subparsers\nz nulltag no NONE no 1 Include tags with empty strings as their names\n" }, { "path": "Tmain/list-fields-fixed-field-handling.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=\"$1\"\n\nis_feature_available \"${CTAGS}\" json\n\nrun()\n{\n\techo '#' \"$@\"\n\t$CTAGS --quiet --options=NONE \"$@\" | grep -v -e ^-\n}\n\nrun --output-format=u-ctags --fields=n --list-fields\nrun --fields=n --output-format=u-ctags --list-fields\nrun --output-format=json --fields=n --list-fields\nrun --fields=n --output-format=json --list-fields\n" }, { "path": "Tmain/list-fields-fixed-field-handling.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-fields-fixed-field-handling.d/stdout-expected.txt", "content": "# --output-format=u-ctags --fields=n --list-fields\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\nN name yes NONE s-- yes rw 0 tag name\nF input yes NONE s-- yes r- 0 input file\nP pattern yes NONE s-b yes -- 0 pattern\nC compact no NONE s-- no -- 0 compact input line (used only in xref output)\nE extras no NONE s-- no r- 0 Extra tag type information\nK NONE no NONE s-- no -- 0 Kind of tag in long-name form\nR NONE no NONE s-- no -- 0 Marker (R or D) representing whether tag is definition or reference\nS signature no NONE s-- no rw 0 Signature of routine (e.g. prototype or parameter list)\nT epoch no NONE -i- no -- 0 the last modified time of the input file (only for F/file kind tag)\nZ scope no NONE s-- no rw 0 [tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\na access no NONE s-- no rw 0 Access (or export) of class members\ne end no NONE -i- no rw 0 end lines of various items\nf file no NONE --b no -- 0 File-restricted scoping\ni inherits no NONE s-b no -w 0 Inheritance information\nk NONE no NONE s-- no -- 0 Kind of tag in one-letter form\nl language no NONE s-- no r- 0 Language of input file containing tag\nm implementation no NONE s-- no -- 0 Implementation information\nn line yes NONE -i- no rw 0 Line number of tag definition\no nth no NONE -i- no -- 0 the order in the parent scope\np scopeKind no NONE s-- no -- 0 [tags output] no effect, [xref and json output] kind of scope in long-name form\nr roles no NONE s-- no r- 0 Roles\ns NONE no NONE s-- no -- 0 [tags output] scope (kind:name) of tag definition, [xref and json output] name of scope\nt typeref no NONE s-- no rw 0 Type and name of a variable or typedef\nx xpath no NONE s-- no -- 0 xpath for the tag\nz kind no NONE s-- no r- 0 [tags output] prepend \"kind:\" to k/ (or K/) field output, [xref and json output] kind in long-name form\n# --fields=n --output-format=u-ctags --list-fields\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\nN name yes NONE s-- yes rw 0 tag name\nF input yes NONE s-- yes r- 0 input file\nP pattern yes NONE s-b yes -- 0 pattern\nC compact no NONE s-- no -- 0 compact input line (used only in xref output)\nE extras no NONE s-- no r- 0 Extra tag type information\nK NONE no NONE s-- no -- 0 Kind of tag in long-name form\nR NONE no NONE s-- no -- 0 Marker (R or D) representing whether tag is definition or reference\nS signature no NONE s-- no rw 0 Signature of routine (e.g. prototype or parameter list)\nT epoch no NONE -i- no -- 0 the last modified time of the input file (only for F/file kind tag)\nZ scope no NONE s-- no rw 0 [tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\na access no NONE s-- no rw 0 Access (or export) of class members\ne end no NONE -i- no rw 0 end lines of various items\nf file no NONE --b no -- 0 File-restricted scoping\ni inherits no NONE s-b no -w 0 Inheritance information\nk NONE no NONE s-- no -- 0 Kind of tag in one-letter form\nl language no NONE s-- no r- 0 Language of input file containing tag\nm implementation no NONE s-- no -- 0 Implementation information\nn line yes NONE -i- no rw 0 Line number of tag definition\no nth no NONE -i- no -- 0 the order in the parent scope\np scopeKind no NONE s-- no -- 0 [tags output] no effect, [xref and json output] kind of scope in long-name form\nr roles no NONE s-- no r- 0 Roles\ns NONE no NONE s-- no -- 0 [tags output] scope (kind:name) of tag definition, [xref and json output] name of scope\nt typeref no NONE s-- no rw 0 Type and name of a variable or typedef\nx xpath no NONE s-- no -- 0 xpath for the tag\nz kind no NONE s-- no r- 0 [tags output] prepend \"kind:\" to k/ (or K/) field output, [xref and json output] kind in long-name form\n# --output-format=json --fields=n --list-fields\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\nC compact no NONE s-- no -- 0 compact input line (used only in xref output)\nE extras no NONE s-- no r- 0 Extra tag type information\nF input no NONE s-- no r- 0 input file\nK NONE no NONE s-- no -- 0 Kind of tag in long-name form\nN name no NONE s-- no rw 0 tag name\nP pattern no NONE s-b no -- 0 pattern\nR NONE no NONE s-- no -- 0 Marker (R or D) representing whether tag is definition or reference\nS signature no NONE s-- no rw 0 Signature of routine (e.g. prototype or parameter list)\nT epoch no NONE -i- no -- 0 the last modified time of the input file (only for F/file kind tag)\nZ scope no NONE s-- no rw 0 [tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\na access no NONE s-- no rw 0 Access (or export) of class members\ne end no NONE -i- no rw 0 end lines of various items\nf file no NONE --b no -- 0 File-restricted scoping\ni inherits no NONE s-b no -w 0 Inheritance information\nk NONE no NONE s-- no -- 0 Kind of tag in one-letter form\nl language no NONE s-- no r- 0 Language of input file containing tag\nm implementation no NONE s-- no -- 0 Implementation information\nn line yes NONE -i- no rw 0 Line number of tag definition\no nth no NONE -i- no -- 0 the order in the parent scope\np scopeKind no NONE s-- no -- 0 [tags output] no effect, [xref and json output] kind of scope in long-name form\nr roles no NONE s-- no r- 0 Roles\ns NONE no NONE s-- no -- 0 [tags output] scope (kind:name) of tag definition, [xref and json output] name of scope\nt typeref no NONE s-- no rw 0 Type and name of a variable or typedef\nx xpath no NONE s-- no -- 0 xpath for the tag\nz kind no NONE s-- no r- 0 [tags output] prepend \"kind:\" to k/ (or K/) field output, [xref and json output] kind in long-name form\n# --fields=n --output-format=json --list-fields\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\nC compact no NONE s-- no -- 0 compact input line (used only in xref output)\nE extras no NONE s-- no r- 0 Extra tag type information\nF input no NONE s-- no r- 0 input file\nK NONE no NONE s-- no -- 0 Kind of tag in long-name form\nN name no NONE s-- no rw 0 tag name\nP pattern no NONE s-b no -- 0 pattern\nR NONE no NONE s-- no -- 0 Marker (R or D) representing whether tag is definition or reference\nS signature no NONE s-- no rw 0 Signature of routine (e.g. prototype or parameter list)\nT epoch no NONE -i- no -- 0 the last modified time of the input file (only for F/file kind tag)\nZ scope no NONE s-- no rw 0 [tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\na access no NONE s-- no rw 0 Access (or export) of class members\ne end no NONE -i- no rw 0 end lines of various items\nf file no NONE --b no -- 0 File-restricted scoping\ni inherits no NONE s-b no -w 0 Inheritance information\nk NONE no NONE s-- no -- 0 Kind of tag in one-letter form\nl language no NONE s-- no r- 0 Language of input file containing tag\nm implementation no NONE s-- no -- 0 Implementation information\nn line yes NONE -i- no rw 0 Line number of tag definition\no nth no NONE -i- no -- 0 the order in the parent scope\np scopeKind no NONE s-- no -- 0 [tags output] no effect, [xref and json output] kind of scope in long-name form\nr roles no NONE s-- no r- 0 Roles\ns NONE no NONE s-- no -- 0 [tags output] scope (kind:name) of tag definition, [xref and json output] name of scope\nt typeref no NONE s-- no rw 0 Type and name of a variable or typedef\nx xpath no NONE s-- no -- 0 xpath for the tag\nz kind no NONE s-- no r- 0 [tags output] prepend \"kind:\" to k/ (or K/) field output, [xref and json output] kind in long-name form\n" }, { "path": "Tmain/list-fields-none.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-fields-none.d/run.sh", "content": "# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE --list-fields=NONE | grep -v xpath\n" }, { "path": "Tmain/list-fields-none.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-fields-none.d/stdout-expected.txt", "content": "#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\nN name yes NONE s-- yes rw 0 tag name\nF input yes NONE s-- yes r- 0 input file\nP pattern yes NONE s-b yes -- 0 pattern\nC compact no NONE s-- no -- 0 compact input line (used only in xref output)\nE extras no NONE s-- no r- 0 Extra tag type information\nK NONE no NONE s-- no -- 0 Kind of tag in long-name form\nR NONE no NONE s-- no -- 0 Marker (R or D) representing whether tag is definition or reference\nS signature no NONE s-- no rw 0 Signature of routine (e.g. prototype or parameter list)\nT epoch yes NONE -i- no -- 0 the last modified time of the input file (only for F/file kind tag)\nZ scope no NONE s-- no rw 0 [tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\na access no NONE s-- no rw 0 Access (or export) of class members\ne end no NONE -i- no rw 0 end lines of various items\nf file yes NONE --b no -- 0 File-restricted scoping\ni inherits no NONE s-b no -w 0 Inheritance information\nk NONE yes NONE s-- no -- 0 Kind of tag in one-letter form\nl language no NONE s-- no r- 0 Language of input file containing tag\nm implementation no NONE s-- no -- 0 Implementation information\nn line no NONE -i- no rw 0 Line number of tag definition\no nth no NONE -i- no -- 0 the order in the parent scope\np scopeKind no NONE s-- no -- 0 [tags output] no effect, [xref and json output] kind of scope in long-name form\nr roles no NONE s-- no r- 0 Roles\ns NONE yes NONE s-- no -- 0 [tags output] scope (kind:name) of tag definition, [xref and json output] name of scope\nt typeref yes NONE s-- no rw 0 Type and name of a variable or typedef\nz kind no NONE s-- no r- 0 [tags output] prepend \"kind:\" to k/ (or K/) field output, [xref and json output] kind in long-name form\n" }, { "path": "Tmain/list-fields-with-prefix.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\nignore_xpath ()\n{\n grep -v Maven2 | grep -v XML\n}\n\n$CTAGS --quiet --options=NONE --put-field-prefix --list-fields \\\n | grep UCTAGS \\\n | ignore_xpath\n" }, { "path": "Tmain/list-fields-with-prefix.d/stdout-expected.txt", "content": "E UCTAGSextras no NONE s-- no r- 0 Extra tag type information\nT UCTAGSepoch yes NONE -i- no -- 0 the last modified time of the input file (only for F/file kind tag)\nZ UCTAGSscope no NONE s-- no rw 0 [tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\ne UCTAGSend no NONE -i- no rw 0 end lines of various items\no UCTAGSnth no NONE -i- no -- 0 the order in the parent scope\np UCTAGSscopeKind no NONE s-- no -- 0 [tags output] no effect, [xref and json output] kind of scope in long-name form\nr UCTAGSroles no NONE s-- no r- 0 Roles\nx UCTAGSxpath no NONE s-- no -- 0 xpath for the tag\n- UCTAGSproperties yes Asm s-- no -- 0 properties (req, vararg for parameters)\n- UCTAGSproperties no AutoIt s-- no -- 0 properties (static, volatile, ...)\n- UCTAGSalias no C s-- no -- 1 the name of the alias target specified in __attribute__((alias(...)))\n- UCTAGSmacrodef no C s-- no -- 0 macro definition\n- UCTAGSproperties no C s-- no -- 0 properties (static, inline, mutable, export,...)\n- UCTAGSsection no C s-- no -- 1 the place where the object is placed\n- UCTAGSalias no C++ s-- no -- 1 the name of the alias target specified in __attribute__((alias(...)))\n- UCTAGScaptures no C++ s-- no -- 0 lambda capture list\n- UCTAGSmacrodef no C++ s-- no -- 0 macro definition\n- UCTAGSname yes C++ s-- no -- 0 aliased names\n- UCTAGSproperties no C++ s-- no -- 0 properties (static, inline, mutable, export,...)\n- UCTAGSsection no C++ s-- no -- 1 the place where the object is placed\n- UCTAGSspecialization no C++ s-- no -- 0 template specialization parameters\n- UCTAGStemplate no C++ s-- no -- 0 template parameters\n- UCTAGSmacrodef no CPreProcessor s-- no -- 0 macro definition\n- UCTAGSalias no CUDA s-- no -- 1 the name of the alias target specified in __attribute__((alias(...)))\n- UCTAGSmacrodef no CUDA s-- no -- 0 macro definition\n- UCTAGSproperties no CUDA s-- no -- 0 properties (static, inline, mutable, export,...)\n- UCTAGSsection no CUDA s-- no -- 1 the place where the object is placed\n- UCTAGSmoduleName yes Elm s-- no -- 0 actual name of renamed module\n- UCTAGSdefiner yes EmacsLisp s-- no -- 1 the name of the function or macro that defines the unknown/Y-kind object\n- UCTAGSannotations yes GDScript s-- no -- 0 annotations on functions and variables\n- UCTAGShowImported no Go s-- no -- 0 how the package is imported (\"inline\" for `.' or \"init\" for `_')\n- UCTAGSpackage yes Go s-- no -- 0 the real package specified by the package name\n- UCTAGSpackageName yes Go s-- no -- 0 the name for referring the package\n- UCTAGSreceiver no Go s-- no -- 1 the name of the receiver\n- UCTAGSimplements yes Inko s-- no rw 0 Trait being implemented\n- UCTAGSproperties no JavaScript s-- no -- 2 properties (static)\n- UCTAGSassignment yes LdScript s-- no -- 0 how a value is assigned to the symbol\n- UCTAGSdefiner yes Lisp s-- no -- 1 the name of the function or macro that defines the unknown/Y-kind object\n- UCTAGSsectionMarker no Markdown s-- no -- 0 character used for declaring section(#, ##, =, or -)\n- UCTAGSwrapping yes Moose s-- no -- 0 how a wrapper wrapping the method (around, after, or before)\n- UCTAGSlangid yes NSIS s-- no -- 0 language identifier specified in (License)LangString commands\n- UCTAGScategory yes ObjectiveC s-- no -- 0 category attached to the class\n- UCTAGSprotocols yes ObjectiveC s-- no -- 0 protocols that the class (or category) confirms to\n- UCTAGSimportName yes Odin s-- no -- 0 import name for the imported entity\n- UCTAGShome yes Passwd s-- no rw 0 home directory\n- UCTAGSshell yes Passwd s-- no rw 0 login shell\n- UCTAGSarity yes Prolog -i- no -- 0 the number of parameters\n- UCTAGSdecorators no Python s-- no -- 0 decorators on functions and classes\n- UCTAGSnameref yes Python s-- no -- 0 the original name for the tag\n- UCTAGSassignmentop no R s-- no -- 0 operator for assignment\n- UCTAGSconstructor yes R s-- no -- 0 function used for making value assigned to the nameattr tag\n- UCTAGSoverline no ReStructuredText --b no -- 0 whether using overline & underline for declaring section\n- UCTAGSsectionMarker no ReStructuredText s-- no -- 0 character used for declaring section\n- UCTAGSmixin yes Ruby s-- no -- 0 how the class or module is mixed in (mixin:HOW:MODULE)\n- UCTAGSmacro yes Rust s-- no -- 1 macro invocation containing the definition\n- UCTAGSmodule yes SCSS s-- no rw 1 the name of module behind the namespace\n- UCTAGSdefiner yes Scheme s-- no -- 1 the name of the function or macro that defines the unknown/Y-kind object\n- UCTAGSparameter no SystemVerilog --b no -- 0 parameter whose value can be overridden.\n- UCTAGStarget yes Thrift s-- no -- 0 the target language specified at \"namespace\"\n- UCTAGSthrows yes Thrift s-- no -- 0 throws list of function\n- UCTAGSproperties no TypeScript s-- no -- 1 properties (static)\n- UCTAGSarchitecture yes VHDL s-- no -- 0 architecture designing the entity\n- UCTAGSparameter no Verilog --b no -- 0 parameter whose value can be overridden.\n" }, { "path": "Tmain/list-fields.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-fields.d/input.c", "content": "#include \nstruct X {\n int i;\n};\n\nstruct Y {\n int j;\n struct X x;\n};\n\nint main(void)\n{\n return 0;\n}\n\n" }, { "path": "Tmain/list-fields.d/input.java", "content": "abstract public class Foo extends Bar\n{\n public int x;\n};\n" }, { "path": "Tmain/list-fields.d/input.sh", "content": "source x\nfunction y()\n{\n}\n\n" }, { "path": "Tmain/list-fields.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nwith_field()\n{\n local field=$1\n local lang=$2\n : &&\n\techo \"#$field\" &&\n\t$CTAGS --quiet --options=NONE $3 --machinable --fields=$field -o - input.$lang\n}\n\nignore_xpath ()\n{\n grep -v Maven2 | grep -v XML\n}\n\n: &&\n $CTAGS --quiet --options=NONE --machinable --with-list-header --list-fields \\\n\t| ignore_xpath &&\n with_field \"\" java &&\n with_field a java &&\n with_field i java &&\n with_field kz java &&\n with_field Kz java &&\n with_field k java &&\n with_field K java &&\n with_field l java &&\n with_field m java &&\n with_field n java &&\n with_field s java &&\n with_field sZ java &&\n with_field f c &&\n with_field S c &&\n with_field t c &&\n with_field r sh --extras=+r &&\n with_field r sh \"--extras=+r -x --_xformat=%R/%r\"\n" }, { "path": "Tmain/list-fields.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-fields.d/stdout-expected.txt", "content": "#LETTER\tNAME\tENABLED\tLANGUAGE\tJSTYPE\tFIXED\tOP\tVER\tDESCRIPTION\nN\tname\tyes\tNONE\ts--\tyes\trw\t0\ttag name\nF\tinput\tyes\tNONE\ts--\tyes\tr-\t0\tinput file\nP\tpattern\tyes\tNONE\ts-b\tyes\t--\t0\tpattern\nC\tcompact\tno\tNONE\ts--\tno\t--\t0\tcompact input line (used only in xref output)\nE\textras\tno\tNONE\ts--\tno\tr-\t0\tExtra tag type information\nK\tNONE\tno\tNONE\ts--\tno\t--\t0\tKind of tag in long-name form\nR\tNONE\tno\tNONE\ts--\tno\t--\t0\tMarker (R or D) representing whether tag is definition or reference\nS\tsignature\tno\tNONE\ts--\tno\trw\t0\tSignature of routine (e.g. prototype or parameter list)\nT\tepoch\tyes\tNONE\t-i-\tno\t--\t0\tthe last modified time of the input file (only for F/file kind tag)\nZ\tscope\tno\tNONE\ts--\tno\trw\t0\t[tags output] prepend \"scope:\" key to s/scope field output, [xref and json output] the same as s/ field\na\taccess\tno\tNONE\ts--\tno\trw\t0\tAccess (or export) of class members\ne\tend\tno\tNONE\t-i-\tno\trw\t0\tend lines of various items\nf\tfile\tyes\tNONE\t--b\tno\t--\t0\tFile-restricted scoping\ni\tinherits\tno\tNONE\ts-b\tno\t-w\t0\tInheritance information\nk\tNONE\tyes\tNONE\ts--\tno\t--\t0\tKind of tag in one-letter form\nl\tlanguage\tno\tNONE\ts--\tno\tr-\t0\tLanguage of input file containing tag\nm\timplementation\tno\tNONE\ts--\tno\t--\t0\tImplementation information\nn\tline\tno\tNONE\t-i-\tno\trw\t0\tLine number of tag definition\no\tnth\tno\tNONE\t-i-\tno\t--\t0\tthe order in the parent scope\np\tscopeKind\tno\tNONE\ts--\tno\t--\t0\t[tags output] no effect, [xref and json output] kind of scope in long-name form\nr\troles\tno\tNONE\ts--\tno\tr-\t0\tRoles\ns\tNONE\tyes\tNONE\ts--\tno\t--\t0\t[tags output] scope (kind:name) of tag definition, [xref and json output] name of scope\nt\ttyperef\tyes\tNONE\ts--\tno\trw\t0\tType and name of a variable or typedef\nx\txpath\tno\tNONE\ts--\tno\t--\t0\txpath for the tag\nz\tkind\tno\tNONE\ts--\tno\tr-\t0\t[tags output] prepend \"kind:\" to k/ (or K/) field output, [xref and json output] kind in long-name form\n-\tproperties\tyes\tAsm\ts--\tno\t--\t0\tproperties (req, vararg for parameters)\n-\tproperties\tno\tAutoIt\ts--\tno\t--\t0\tproperties (static, volatile, ...)\n-\talias\tno\tC\ts--\tno\t--\t1\tthe name of the alias target specified in __attribute__((alias(...)))\n-\tmacrodef\tno\tC\ts--\tno\t--\t0\tmacro definition\n-\tproperties\tno\tC\ts--\tno\t--\t0\tproperties (static, inline, mutable, export,...)\n-\tsection\tno\tC\ts--\tno\t--\t1\tthe place where the object is placed\n-\talias\tno\tC++\ts--\tno\t--\t1\tthe name of the alias target specified in __attribute__((alias(...)))\n-\tcaptures\tno\tC++\ts--\tno\t--\t0\tlambda capture list\n-\tmacrodef\tno\tC++\ts--\tno\t--\t0\tmacro definition\n-\tname\tyes\tC++\ts--\tno\t--\t0\taliased names\n-\tproperties\tno\tC++\ts--\tno\t--\t0\tproperties (static, inline, mutable, export,...)\n-\tsection\tno\tC++\ts--\tno\t--\t1\tthe place where the object is placed\n-\tspecialization\tno\tC++\ts--\tno\t--\t0\ttemplate specialization parameters\n-\ttemplate\tno\tC++\ts--\tno\t--\t0\ttemplate parameters\n-\tmacrodef\tno\tCPreProcessor\ts--\tno\t--\t0\tmacro definition\n-\talias\tno\tCUDA\ts--\tno\t--\t1\tthe name of the alias target specified in __attribute__((alias(...)))\n-\tmacrodef\tno\tCUDA\ts--\tno\t--\t0\tmacro definition\n-\tproperties\tno\tCUDA\ts--\tno\t--\t0\tproperties (static, inline, mutable, export,...)\n-\tsection\tno\tCUDA\ts--\tno\t--\t1\tthe place where the object is placed\n-\tmoduleName\tyes\tElm\ts--\tno\t--\t0\tactual name of renamed module\n-\tdefiner\tyes\tEmacsLisp\ts--\tno\t--\t1\tthe name of the function or macro that defines the unknown/Y-kind object\n-\tannotations\tyes\tGDScript\ts--\tno\t--\t0\tannotations on functions and variables\n-\thowImported\tno\tGo\ts--\tno\t--\t0\thow the package is imported (\"inline\" for `.' or \"init\" for `_')\n-\tpackage\tyes\tGo\ts--\tno\t--\t0\tthe real package specified by the package name\n-\tpackageName\tyes\tGo\ts--\tno\t--\t0\tthe name for referring the package\n-\treceiver\tno\tGo\ts--\tno\t--\t1\tthe name of the receiver\n-\timplements\tyes\tInko\ts--\tno\trw\t0\tTrait being implemented\n-\tproperties\tno\tJavaScript\ts--\tno\t--\t2\tproperties (static)\n-\tassignment\tyes\tLdScript\ts--\tno\t--\t0\thow a value is assigned to the symbol\n-\tdefiner\tyes\tLisp\ts--\tno\t--\t1\tthe name of the function or macro that defines the unknown/Y-kind object\n-\tsectionMarker\tno\tMarkdown\ts--\tno\t--\t0\tcharacter used for declaring section(#, ##, =, or -)\n-\twrapping\tyes\tMoose\ts--\tno\t--\t0\thow a wrapper wrapping the method (around, after, or before)\n-\tlangid\tyes\tNSIS\ts--\tno\t--\t0\tlanguage identifier specified in (License)LangString commands\n-\tcategory\tyes\tObjectiveC\ts--\tno\t--\t0\tcategory attached to the class\n-\tprotocols\tyes\tObjectiveC\ts--\tno\t--\t0\tprotocols that the class (or category) confirms to\n-\timportName\tyes\tOdin\ts--\tno\t--\t0\timport name for the imported entity\n-\thome\tyes\tPasswd\ts--\tno\trw\t0\thome directory\n-\tshell\tyes\tPasswd\ts--\tno\trw\t0\tlogin shell\n-\tarity\tyes\tProlog\t-i-\tno\t--\t0\tthe number of parameters\n-\tdecorators\tno\tPython\ts--\tno\t--\t0\tdecorators on functions and classes\n-\tnameref\tyes\tPython\ts--\tno\t--\t0\tthe original name for the tag\n-\tassignmentop\tno\tR\ts--\tno\t--\t0\toperator for assignment\n-\tconstructor\tyes\tR\ts--\tno\t--\t0\tfunction used for making value assigned to the nameattr tag\n-\toverline\tno\tReStructuredText\t--b\tno\t--\t0\twhether using overline & underline for declaring section\n-\tsectionMarker\tno\tReStructuredText\ts--\tno\t--\t0\tcharacter used for declaring section\n-\tmixin\tyes\tRuby\ts--\tno\t--\t0\thow the class or module is mixed in (mixin:HOW:MODULE)\n-\tmacro\tyes\tRust\ts--\tno\t--\t1\tmacro invocation containing the definition\n-\tmodule\tyes\tSCSS\ts--\tno\trw\t1\tthe name of module behind the namespace\n-\tdefiner\tyes\tScheme\ts--\tno\t--\t1\tthe name of the function or macro that defines the unknown/Y-kind object\n-\tparameter\tno\tSystemVerilog\t--b\tno\t--\t0\tparameter whose value can be overridden.\n-\ttarget\tyes\tThrift\ts--\tno\t--\t0\tthe target language specified at \"namespace\"\n-\tthrows\tyes\tThrift\ts--\tno\t--\t0\tthrows list of function\n-\tproperties\tno\tTypeScript\ts--\tno\t--\t1\tproperties (static)\n-\tarchitecture\tyes\tVHDL\ts--\tno\t--\t0\tarchitecture designing the entity\n-\tparameter\tno\tVerilog\t--b\tno\t--\t0\tparameter whose value can be overridden.\n#\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/\nx\tinput.java\t/^ public int x;$/\n#a\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/\nx\tinput.java\t/^ public int x;$/;\"\taccess:public\n#i\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tinherits:Bar\nx\tinput.java\t/^ public int x;$/\n#kz\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tkind:c\nx\tinput.java\t/^ public int x;$/;\"\tkind:f\n#Kz\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tkind:class\nx\tinput.java\t/^ public int x;$/;\"\tkind:field\n#k\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tc\nx\tinput.java\t/^ public int x;$/;\"\tf\n#K\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tclass\nx\tinput.java\t/^ public int x;$/;\"\tfield\n#l\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tlanguage:Java\nx\tinput.java\t/^ public int x;$/;\"\tlanguage:Java\n#m\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\timplementation:abstract\nx\tinput.java\t/^ public int x;$/\n#n\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/;\"\tline:1\nx\tinput.java\t/^ public int x;$/;\"\tline:3\n#s\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/\nx\tinput.java\t/^ public int x;$/;\"\tclass:Foo\n#sZ\nFoo\tinput.java\t/^abstract public class Foo extends Bar$/\nx\tinput.java\t/^ public int x;$/;\"\tscope:class:Foo\n#f\nX\tinput.c\t/^struct X {$/;\"\tfile:\nY\tinput.c\t/^struct Y {$/;\"\tfile:\ni\tinput.c\t/^ int i;$/;\"\tfile:\nj\tinput.c\t/^ int j;$/;\"\tfile:\nmain\tinput.c\t/^int main(void)$/\nx\tinput.c\t/^ struct X x;$/;\"\tfile:\n#S\nX\tinput.c\t/^struct X {$/\nY\tinput.c\t/^struct Y {$/\ni\tinput.c\t/^ int i;$/\nj\tinput.c\t/^ int j;$/\nmain\tinput.c\t/^int main(void)$/;\"\tsignature:(void)\nx\tinput.c\t/^ struct X x;$/\n#t\nX\tinput.c\t/^struct X {$/\nY\tinput.c\t/^struct Y {$/\ni\tinput.c\t/^ int i;$/;\"\ttyperef:typename:int\nj\tinput.c\t/^ int j;$/;\"\ttyperef:typename:int\nmain\tinput.c\t/^int main(void)$/;\"\ttyperef:typename:int\nx\tinput.c\t/^ struct X x;$/;\"\ttyperef:struct:X\n#r\nx\tinput.sh\t/^source x$/;\"\troles:loaded\ny\tinput.sh\t/^function y()$/;\"\troles:def\n#r\nD/def\nR/loaded\n" }, { "path": "Tmain/list-kinds-full.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-kinds-full.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --machinable --with-list-header --list-kinds-full=C\n${CTAGS} --quiet --options=NONE --machinable --with-list-header --list-kinds-full=C++\n\n" }, { "path": "Tmain/list-kinds-full.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-kinds-full.d/stdout-expected.txt", "content": "#LETTER\tNAME\tENABLED\tREFONLY\tNROLES\tMASTER\tVER\tDESCRIPTION\nD\tmacroparam\tno\tno\t0\tC\t0\tparameters inside macro definitions\nL\tlabel\tno\tno\t0\tC\t0\tgoto labels\nd\tmacro\tyes\tno\t2\tC\t0\tmacro definitions\ne\tenumerator\tyes\tno\t0\tC\t0\tenumerators (values inside an enumeration)\nf\tfunction\tyes\tno\t2\tC\t0\tfunction definitions\ng\tenum\tyes\tno\t0\tC\t0\tenumeration names\nh\theader\tyes\tyes\t2\tC\t0\tincluded header files\nl\tlocal\tno\tno\t0\tC\t0\tlocal variables\nm\tmember\tyes\tno\t0\tC\t0\tstruct, and union members\np\tprototype\tno\tno\t0\tC\t0\tfunction prototypes\ns\tstruct\tyes\tno\t1\tC\t0\tstructure names\nt\ttypedef\tyes\tno\t0\tC\t0\ttypedefs\nu\tunion\tyes\tno\t0\tC\t0\tunion names\nv\tvariable\tyes\tno\t0\tC\t0\tvariable definitions\nx\texternvar\tno\tno\t0\tC\t0\texternal and forward variable declarations\nz\tparameter\tno\tno\t0\tC\t0\tfunction parameters inside function or prototype definitions\n#LETTER\tNAME\tENABLED\tREFONLY\tNROLES\tMASTER\tVER\tDESCRIPTION\nA\talias\tno\tno\t0\tNONE\t0\tnamespace aliases\nD\tmacroparam\tno\tno\t0\tC\t0\tparameters inside macro definitions\nL\tlabel\tno\tno\t0\tC\t0\tgoto labels\nM\tmodule\tyes\tno\t2\tNONE\t2\tmodules\nN\tname\tno\tno\t0\tNONE\t0\tnames imported via using scope::symbol\nP\tpartition\tyes\tno\t1\tNONE\t2\tpartitions\nU\tusing\tno\tno\t0\tNONE\t0\tusing namespace statements\nZ\ttparam\tno\tno\t0\tNONE\t0\ttemplate parameters\nc\tclass\tyes\tno\t0\tNONE\t0\tclasses\nd\tmacro\tyes\tno\t2\tC\t0\tmacro definitions\ne\tenumerator\tyes\tno\t0\tC\t0\tenumerators (values inside an enumeration)\nf\tfunction\tyes\tno\t0\tC\t0\tfunction definitions\ng\tenum\tyes\tno\t0\tC\t0\tenumeration names\nh\theader\tyes\tyes\t4\tC\t0\tincluded header files\nl\tlocal\tno\tno\t0\tC\t0\tlocal variables\nm\tmember\tyes\tno\t0\tC\t0\tclass, struct, and union members\nn\tnamespace\tyes\tno\t0\tNONE\t0\tnamespaces\np\tprototype\tno\tno\t0\tC\t0\tfunction prototypes\ns\tstruct\tyes\tno\t0\tC\t0\tstructure names\nt\ttypedef\tyes\tno\t0\tC\t0\ttypedefs\nu\tunion\tyes\tno\t0\tC\t0\tunion names\nv\tvariable\tyes\tno\t0\tC\t0\tvariable definitions\nx\texternvar\tno\tno\t0\tC\t0\texternal and forward variable declarations\nz\tparameter\tno\tno\t0\tC\t0\tfunction parameters inside function or prototype definitions\n" }, { "path": "Tmain/list-language-fields.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE --machinable --with-list-header \\\n --list-fields=reStructuredText\n\n" }, { "path": "Tmain/list-language-fields.d/stdout-expected.txt", "content": "#LETTER\tNAME\tENABLED\tLANGUAGE\tJSTYPE\tFIXED\tOP\tVER\tDESCRIPTION\n-\toverline\tno\tReStructuredText\t--b\tno\t--\t0\twhether using overline & underline for declaring section\n-\tsectionMarker\tno\tReStructuredText\ts--\tno\t--\t0\tcharacter used for declaring section\n" }, { "path": "Tmain/list-language-flags.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-language-flags.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n: &&\n\techo langdef-flags: &&\n\t${CTAGS} --quiet --options=NONE --_list-langdef-flags &&\n\techo fielddef-flags: &&\n\t${CTAGS} --quiet --options=NONE --_list-fielddef-flags &&\n\techo kinddef-flags: &&\n\t${CTAGS} --quiet --options=NONE --_list-kinddef-flags &&\n\techo roledef-flags: &&\n\t${CTAGS} --quiet --options=NONE --_list-roledef-flags &&\n\techo extradef-flags: &&\n\t${CTAGS} --quiet --options=NONE --_list-extradef-flags &&\n\t:\n" }, { "path": "Tmain/list-language-flags.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-language-flags.d/stdout-expected.txt", "content": "langdef-flags:\n#LETTER NAME DESCRIPTION\n- base=BASEPARSER utilize as a base parser\n- bidirectional utilize the base parser both 'dedicated' and 'shared' way\n- dedicated make the base parser dedicated to this subparser\n- shared share the base parser with the other subparsers\n- version=CURRENT.AGE set the version of the parser\n- _autoFQTag make full qualified tags automatically based on scope information\n- _foreignLanguage=LANG initialize another parser\nfielddef-flags:\n#LETTER NAME DESCRIPTION\n- datatype=TYPE acceptable datatype of the field (str|bool|int|str+bool)\n- version=VERSION in which version of the parser this field is added\nkinddef-flags:\n#LETTER NAME DESCRIPTION\n- version=VERSION in which version of the parser this kind is added\n- _refonly use this kind reference tags only\nroledef-flags:\n#LETTER NAME DESCRIPTION\n- version=VERSION in which version of the parser this role is added\nextradef-flags:\n#LETTER NAME DESCRIPTION\n- version=VERSION in which version of the parser this extra is added\n" }, { "path": "Tmain/list-map-extensions.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '## all|grep LdScript'\n$CTAGS --quiet --options=NONE --list-map-extensions=all | grep '^#\\|LdScript'\n\necho '## LdScript'\n$CTAGS --quiet --options=NONE --list-map-extensions=LdScript\n" }, { "path": "Tmain/list-map-extensions.d/stdout-expected.txt", "content": "## all|grep LdScript\n#LANGUAGE EXTENSION\nLdScript lds\nLdScript scr\nLdScript ld\nLdScript ldi\n## LdScript\n#EXTENSION\nlds\nscr\nld\nldi\n" }, { "path": "Tmain/list-map-patterns.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '## all|grep LdScript'\n$CTAGS --quiet --options=NONE --list-map-patterns=all | grep '^#\\|LdScript'\n\necho '## LdScript'\n$CTAGS --quiet --options=NONE --list-map-patterns=LdScript\n" }, { "path": "Tmain/list-map-patterns.d/stdout-expected.txt", "content": "## all|grep LdScript\n#LANGUAGE PATTERN\nLdScript *.lds.S\nLdScript *.ld.S\nLdScript ld.script\n## LdScript\n#PATTERN\n*.lds.S\n*.ld.S\nld.script\n" }, { "path": "Tmain/list-map-rexprs.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-map-rexprs.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE \\\n\t --langdef=Something \\\n\t --map-Something='%\\%ESCAPING\\%%' \\\n\t --map-Something=+'%ICASE%i' \\\n\t --map-Something=+'%TEMP%' \\\n\t --map-Something=-'%TEMP%' \\\n\t --map-Something=+'%TEMPi%i' \\\n\t --map-Something=-'%TEMPi%i' \\\n\t --list-map-rexprs=Something\n\n$CTAGS --quiet --options=NONE \\\n\t --langdef=Something \\\n\t --map-Something='%aExpr%' \\\n\t --map-Something=+'%\\%ESCAPING\\%%' \\\n\t --map-Something=+'%ICASE%i' \\\n\t --map-Something=+'%TEMP%' \\\n\t --map-Something=-'%TEMP%' \\\n\t --map-Something=+'%TEMPi%i' \\\n\t --map-Something=-'%TEMPi%i' \\\n\t --list-maps=Something\n\n$CTAGS --quiet --options=NONE \\\n\t --langdef=Something \\\n\t --kinddef-Something=t,type,types \\\n\t --fields=+'{language}' \\\n\t --regex-Something='/^([a-z]+)[ \\t]+tdef;$/\\1/t/' \\\n\t \\\n\t --map-Something='%something/.*\\.c%' \\\n\t --map-Something=+'%something/.*\\.cpp%i' \\\n\t --map-Something=+'%something/.*\\.h%{icase}' \\\n\t \\\n\t -x --_xformat='%10N %{language}' \\\n\t -R something\n" }, { "path": "Tmain/list-map-rexprs.d/something/input.CPP", "content": "float tdef;\n" }, { "path": "Tmain/list-map-rexprs.d/something/input.c", "content": "int tdef;\n" }, { "path": "Tmain/list-map-rexprs.d/something/input.h", "content": "double tdef;\n" }, { "path": "Tmain/list-map-rexprs.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-map-rexprs.d/stdout-expected.txt", "content": "#EXPRESSION CASE\n%ESCAPING% sensitive\nICASE insensitive\nSomething %aExpr% %\\%ESCAPING\\%% %ICASE%i\n int Something\n float Something\n double Something\n" }, { "path": "Tmain/list-mline-regex-flags.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} pcre2\n\n${CTAGS} --quiet --options=NONE --list-mline-regex-flags\n" }, { "path": "Tmain/list-mline-regex-flags.d/stdout-expected.txt", "content": "#LETTER NAME DESCRIPTION\nb basic interpreted as a Posix basic regular expression.\ne extend interpreted as a Posix extended regular expression (default)\ni icase applied in a case-insensitive manner\np pcre2 use pcre2 regex engine\n- fatal=\"MESSAGE\" print the given MESSAGE and exit\n- mgroup=N a group in pattern determining the line number of tag\n- scope=intervaltab set scope for the tag with the interval table\n- warning=\"MESSAGE\" print the given MESSAGE at WARNING level\n- _advanceTo=N[start|end] a group in pattern from where the next scan starts [0end]\n- _anonymous=PREFIX make an anonymous tag with PREFIX\n- _extra=EXTRA record the tag only when the (foreign) extra is enabled\n- _field=FIELD:VALUE record the matched string(VALUE) to the (foreign) language specific FIELD of the tag\n- _guest=PARSERSPEC,N0[start|end],N1[start|end] run guest parser on the area\n- _language=LANG make a foreign tag for LANG\n- _role=ROLE set the given ROLE to the roles field\n" }, { "path": "Tmain/list-mtable-regex-flags.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} pcre2\n\n${CTAGS} --quiet --options=NONE --_list-mtable-regex-flags\n" }, { "path": "Tmain/list-mtable-regex-flags.d/stdout-expected.txt", "content": "#LETTER NAME DESCRIPTION\nb basic interpreted as a Posix basic regular expression.\ne extend interpreted as a Posix extended regular expression (default)\ni icase applied in a case-insensitive manner\np pcre2 use pcre2 regex engine\n- fatal=\"MESSAGE\" print the given MESSAGE and exit\n- mgroup=N a group in pattern determining the line number of tag\n- placeholder don't put this tag to tags file.\n- scope=ACTION use scope stack: ACTION = ref|push|pop|clear|set|replace|intervaltab\n- tenter=TABLE[,CONT] enter to given regext table (with specifying continuation)\n- tjump=TABLE jump to another regext table(don't push the current table to state stack)\n- tleave leave from the current regext table\n- tquit stop the parsing with this parser\n- treset=TABLE clear the state stack and jump to given regex table\n- warning=\"MESSAGE\" print the given MESSAGE at WARNING level\n- _advanceTo=N[start|end] a group in pattern from where the next scan starts [0end]\n- _anonymous=PREFIX make an anonymous tag with PREFIX\n- _extra=EXTRA record the tag only when the (foreign) extra is enabled\n- _field=FIELD:VALUE record the matched string(VALUE) to the (foreign) language specific FIELD of the tag\n- _guest=PARSERSPEC,N0[start|end],N1[start|end] run guest parser on the area\n- _language=LANG make a foreign tag for LANG\n- _role=ROLE set the given ROLE to the roles field\n" }, { "path": "Tmain/list-output-formats.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-output-formats.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE --machinable --with-list-header \\\n --list-output-formats | grep -v '^json'\n" }, { "path": "Tmain/list-output-formats.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-output-formats.d/stdout-expected.txt", "content": "#OFORMAT\tDEFAULT\tAVAILABLE\tNULLTAG\ne-ctags\tno\tyes\tno\netags\tno\tyes\tno\nu-ctags\tyes\tyes\tno\nxref\tno\tyes\tyes\n" }, { "path": "Tmain/list-params.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nC=\"${CTAGS} --quiet --options=NONE\"\n\necho '# ALL'\n${C} --with-list-header=yes --list-params\necho\n\necho '# ALL MACHINABLE'\n${C} --with-list-header=yes --machinable --list-params\necho\n\necho '# ALL MACHINABLE NOHEADER'\n${C} --with-list-header=no --machinable --list-params\necho\n\necho '# CPP'\n${C} --list-params=CPreProcessor\necho\n\necho '# CPP MACHINABLE'\n${C} --with-list-header=yes --machinable --list-params=CPreProcessor\necho\n\necho '# CPP MACHINABLE NOHEADER'\n${C} --with-list-header=no --machinable --list-params=CPreProcessor\necho\n\necho '# CPP MACHINABLE NOHEADER + PARAM DEFINE WITH CMDLINE'\n${C} --_paramdef-CPreProcessor='pragma,handle program' --with-list-header=no --machinable --list-params=CPreProcessor\necho\n" }, { "path": "Tmain/list-params.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-params.d/stdout-expected.txt", "content": "# ALL\n#LANGUAGE NAME DESCRIPTION\nAsm commentCharsAtBOL line comment chraracters at the beginning of line ([;*@])\nAsm commentCharsInMOL line comment chraracters in the beginning of line ([])\nAsm extraLinesepChars extra characters used as a line separator ([])\nAsm useCPreProcessor run CPreProcessor parser for extracting macro definitions ([true] or false)\nCPreProcessor _expand expand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\nCPreProcessor define define replacement for an identifier (name(params,...)=definition)\nCPreProcessor if0 examine code within \"#if 0\" branch (true or [false])\nCPreProcessor ignore a token to be specially handled\nFypp guest parser run after Fypp parser parses the original input (\"NONE\" or a parser name [Fortran])\nITcl forceUse enable the parser even when `itcl' namespace is not specified in the input (true or [false])\nProlog allowNestedComments allow nested comments like \"/* /* */ */\" ([true] or false)\nTclOO forceUse enable the parser even when `oo' namespace is not specified in the input (true or [false])\n\n# ALL MACHINABLE\n#LANGUAGE\tNAME\tDESCRIPTION\nAsm\tcommentCharsAtBOL\tline comment chraracters at the beginning of line ([;*@])\nAsm\tcommentCharsInMOL\tline comment chraracters in the beginning of line ([])\nAsm\textraLinesepChars\textra characters used as a line separator ([])\nAsm\tuseCPreProcessor\trun CPreProcessor parser for extracting macro definitions ([true] or false)\nCPreProcessor\t_expand\texpand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\nCPreProcessor\tdefine\tdefine replacement for an identifier (name(params,...)=definition)\nCPreProcessor\tif0\texamine code within \"#if 0\" branch (true or [false])\nCPreProcessor\tignore\ta token to be specially handled\nFypp\tguest\tparser run after Fypp parser parses the original input (\"NONE\" or a parser name [Fortran])\nITcl\tforceUse\tenable the parser even when `itcl' namespace is not specified in the input (true or [false])\nProlog\tallowNestedComments\tallow nested comments like \"/* /* */ */\" ([true] or false)\nTclOO\tforceUse\tenable the parser even when `oo' namespace is not specified in the input (true or [false])\n\n# ALL MACHINABLE NOHEADER\nAsm\tcommentCharsAtBOL\tline comment chraracters at the beginning of line ([;*@])\nAsm\tcommentCharsInMOL\tline comment chraracters in the beginning of line ([])\nAsm\textraLinesepChars\textra characters used as a line separator ([])\nAsm\tuseCPreProcessor\trun CPreProcessor parser for extracting macro definitions ([true] or false)\nCPreProcessor\t_expand\texpand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\nCPreProcessor\tdefine\tdefine replacement for an identifier (name(params,...)=definition)\nCPreProcessor\tif0\texamine code within \"#if 0\" branch (true or [false])\nCPreProcessor\tignore\ta token to be specially handled\nFypp\tguest\tparser run after Fypp parser parses the original input (\"NONE\" or a parser name [Fortran])\nITcl\tforceUse\tenable the parser even when `itcl' namespace is not specified in the input (true or [false])\nProlog\tallowNestedComments\tallow nested comments like \"/* /* */ */\" ([true] or false)\nTclOO\tforceUse\tenable the parser even when `oo' namespace is not specified in the input (true or [false])\n\n# CPP\n#NAME DESCRIPTION\n_expand expand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\ndefine define replacement for an identifier (name(params,...)=definition)\nif0 examine code within \"#if 0\" branch (true or [false])\nignore a token to be specially handled\n\n# CPP MACHINABLE\n#NAME\tDESCRIPTION\n_expand\texpand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\ndefine\tdefine replacement for an identifier (name(params,...)=definition)\nif0\texamine code within \"#if 0\" branch (true or [false])\nignore\ta token to be specially handled\n\n# CPP MACHINABLE NOHEADER\n_expand\texpand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\ndefine\tdefine replacement for an identifier (name(params,...)=definition)\nif0\texamine code within \"#if 0\" branch (true or [false])\nignore\ta token to be specially handled\n\n# CPP MACHINABLE NOHEADER + PARAM DEFINE WITH CMDLINE\n_expand\texpand macros if their definitions are in the current C/C++/CUDA input file (true or [false])\ndefine\tdefine replacement for an identifier (name(params,...)=definition)\nif0\texamine code within \"#if 0\" branch (true or [false])\nignore\ta token to be specially handled\npragma\thandle program\n\n" }, { "path": "Tmain/list-pseudo-tags.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-pseudo-tags.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --list-pseudo-tags | grep -v ENCODING\n\n\n" }, { "path": "Tmain/list-pseudo-tags.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-pseudo-tags.d/stdout-expected.txt", "content": "#NAME ENABLED VER DESCRIPTION\nJSON_OUTPUT_VERSION off 0 the version of json output stream format\nTAG_EXTRA_DESCRIPTION on 0 the names and descriptions of enabled extras\nTAG_FIELD_DESCRIPTION on 0 the names and descriptions of enabled fields\nTAG_FILE_FORMAT on 0 the version of tags file format\nTAG_FILE_SORTED on 0 how tags are sorted\nTAG_KIND_DESCRIPTION on 0 the letters, names and descriptions of enabled kinds in the language\nTAG_KIND_SEPARATOR off 0 the separators used in kinds\nTAG_OUTPUT_EXCMD on 0 the excmd: number, pattern, mixed, or combine\nTAG_OUTPUT_FILESEP on 0 the separator used in file name (slash or backslash)\nTAG_OUTPUT_MODE on 0 the output mode: u-ctags or e-ctags\nTAG_OUTPUT_VERSION on 0 the version of the output interface (current.age)\nTAG_PARSER_VERSION on 0 the version of the parser (current.age)\nTAG_PATTERN_LENGTH_LIMIT on 0 the limit of pattern length\nTAG_PROC_CWD on 0 the current working directory of the tags generator\nTAG_PROGRAM_AUTHOR on 0 the author of this ctags implementation\nTAG_PROGRAM_NAME on 0 the name of this ctags implementation\nTAG_PROGRAM_URL on 0 the official site URL of this ctags implementation\nTAG_PROGRAM_VERSION on 0 the version of this ctags implementation\nTAG_ROLE_DESCRIPTION on 0 the names and descriptions of enabled roles\n" }, { "path": "Tmain/list-regex-flags.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} pcre2\n\n${CTAGS} --quiet --options=NONE --list-regex-flags\n" }, { "path": "Tmain/list-regex-flags.d/stdout-expected.txt", "content": "#LETTER NAME DESCRIPTION\nb basic interpreted as a Posix basic regular expression.\ne extend interpreted as a Posix extended regular expression (default)\ni icase applied in a case-insensitive manner\np pcre2 use pcre2 regex engine\nx exclusive skip testing the other patterns if a line is matched to this pattern\n- fatal=\"MESSAGE\" print the given MESSAGE and exit\n- placeholder don't put this tag to tags file.\n- postrun run after parsing with built-in code, multline regex patterns, and multitable regex patterns\n- scope=ACTION use scope stack: ACTION = ref|push|pop|clear|set|replace|intervaltab\n- warning=\"MESSAGE\" print the given MESSAGE at WARNING level\n- _anonymous=PREFIX make an anonymous tag with PREFIX\n- _extra=EXTRA record the tag only when the (foreign) extra is enabled\n- _field=FIELD:VALUE record the matched string(VALUE) to the (foreign) language specific FIELD of the tag\n- _guest=PARSERSPEC,N0[start|end],N1[start|end] run guest parser on the area\n- _language=LANG make a foreign tag for LANG\n- _role=ROLE set the given ROLE to the roles field\n" }, { "path": "Tmain/list-roles-with-kind-names.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\necho '{header}'\n${CTAGS} --list-roles=all.'{header}'\n\necho '{header}I'\n${CTAGS} --list-roles=all.'{header}I'\n\necho 'd{header}'\n${CTAGS} --list-roles=all.'d{header}'\n" }, { "path": "Tmain/list-roles-with-kind-names.d/stdout-expected.txt", "content": "{header}\n#LANGUAGE KIND(L/N) NAME ENABLED VER DESCRIPTION\nC h/header local on 0 local header\nC h/header system on 0 system header\nC++ h/header exported on 2 exported with \"exported imported ...\"\nC++ h/header imported on 2 imported with \"imported ...\"\nC++ h/header local on 0 local header\nC++ h/header system on 0 system header\nCPreProcessor h/header local on 0 local header\nCPreProcessor h/header system on 0 system header\nCUDA h/header local on 0 local header\nCUDA h/header system on 0 system header\nVera h/header local on 0 local header\nVera h/header system on 0 system header\n{header}I\n#LANGUAGE KIND(L/N) NAME ENABLED VER DESCRIPTION\nC h/header local on 0 local header\nC h/header system on 0 system header\nC++ h/header exported on 2 exported with \"exported imported ...\"\nC++ h/header imported on 2 imported with \"imported ...\"\nC++ h/header local on 0 local header\nC++ h/header system on 0 system header\nCPreProcessor h/header local on 0 local header\nCPreProcessor h/header system on 0 system header\nCUDA h/header local on 0 local header\nCUDA h/header system on 0 system header\nFlex I/import import on 0 imports\nM4 I/macrofile included on 0 included macro\nM4 I/macrofile sincluded on 0 silently included macro\nMake I/makefile included on 0 included\nMake I/makefile optional on 0 optionally included\nVera h/header local on 0 local header\nVera h/header system on 0 system header\nd{header}\n#LANGUAGE KIND(L/N) NAME ENABLED VER DESCRIPTION\nAutomake d/directory data on 0 directory for DATA primary\nAutomake d/directory library on 0 directory for LIBRARIES primary\nAutomake d/directory ltlibrary on 0 directory for LTLIBRARIES primary\nAutomake d/directory man on 0 directory for MANS primary\nAutomake d/directory program on 0 directory for PROGRAMS primary\nAutomake d/directory script on 0 directory for SCRIPTS primary\nC d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC d/macro undef on 0 undefined\nC h/header local on 0 local header\nC h/header system on 0 system header\nC++ d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC++ d/macro undef on 0 undefined\nC++ h/header exported on 2 exported with \"exported imported ...\"\nC++ h/header imported on 2 imported with \"imported ...\"\nC++ h/header local on 0 local header\nC++ h/header system on 0 system header\nCPreProcessor d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCPreProcessor d/macro undef on 0 undefined\nCPreProcessor h/header local on 0 local header\nCPreProcessor h/header system on 0 system header\nCUDA d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCUDA d/macro undef on 0 undefined\nCUDA h/header local on 0 local header\nCUDA h/header system on 0 system header\nM4 d/macro undef on 0 undefined\nVera d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nVera d/macro undef on 0 undefined\nVera h/header local on 0 local header\nVera h/header system on 0 system header\n" }, { "path": "Tmain/list-roles.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/list-roles.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\ntitle()\n{\n echo\n echo '#'\n for x in \"$@\"; do\n echo '#' $x\n done\n echo '#'\n}\n\nignore_xml()\n{\n grep -v 'Glade\\|Ant\\|Maven2\\|XSLT'\n}\n\nignore_yaml()\n{\n grep -v 'Yaml'\n}\n\n# When introducing newly rewritten parser, we would like to provide\n# the both new parser and old parser for debugging and providing\n# migration period to users. In such case the prefix \"Old\" will be\n# used to the name of old parser. The old parser should be ignored\n# in this test case.\nignore_old()\n{\n grep -v '^Old'\n}\n\ntitle ''\n${CTAGS} --quiet --options=NONE --list-roles= | ignore_xml | ignore_old | ignore_yaml\n\ntitle 'all.*'\n${CTAGS} --quiet --options=NONE --list-roles='all.*' | ignore_xml | ignore_old | ignore_yaml\n\ntitle 'C.*'\n${CTAGS} --quiet --options=NONE --list-roles='C.*'\n\ntitle 'all.d'\n${CTAGS} --quiet --options=NONE --list-roles='all.d' | ignore_xml | ignore_old | ignore_yaml\n\ntitle 'Sh.s'\n${CTAGS} --quiet --options=NONE --list-roles='Sh.s'\n\n# --roles-all=\ntitle 'C.* with disabling all roles of all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --list-roles='C.*'\n\n# --roles-all.*=\ntitle 'C.* with disabling all roles of all kinds of all languages'\n${CTAGS} --quiet --options=NONE --roles-all.'*'= --list-roles='C.*'\n\n# --roles-all.*='*'\ntitle 'C.* with enabling all roles of all kinds in all languages' \\\n\t 'after disabling system role of header kind of C language'\n${CTAGS} --quiet --options=NONE --roles-C.h=-'{system}' \\\n\t\t --roles-all.'*'='*' --list-roles='C.*'\n\n#--roles-all='*'\ntitle 'C.* with enabling all roles in all languages' \\\n\t 'after disabling system role of header kind of C language'\n${CTAGS} --quiet --options=NONE --roles-C.h=-'{system}' \\\n\t\t --roles-all='*' --list-roles='C.*'\n\n# --roles-=\ntitle 'C.* with disabling all roles in C language'\n${CTAGS} --quiet --options=NONE --roles-C= --list-roles='C.*'\ntitle 'Sh.* with disabling all roles in C language'\n${CTAGS} --quiet --options=NONE --roles-C= --list-roles='Sh.*'\n\n# --roles-.*=\ntitle 'C.* with disabling all roles of all kinds in C language'\n${CTAGS} --quiet --options=NONE --roles-C.'*'= --list-roles='C.*'\ntitle 'Sh.* with disabling all roles of all kinds in C language'\n${CTAGS} --quiet --options=NONE --roles-C.'*'= --list-roles='Sh.*'\n\n# --roles-='*'\ntitle 'C.* with enabling all roles in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C='*' --list-roles='C.*'\ntitle 'Sh.* with enabling all roles in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C='*' --list-roles='Sh.*'\n\n# --roles-.*='*'\ntitle 'C.* with enabling all roles of all kinds in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'*'='*' --list-roles='C.*'\ntitle 'Sh.* with enabling all roles of all kinds in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'*'='*' --list-roles='Sh.*'\n\n# --roles-.{kind}=\ntitle 'C.* with disabling all roles of {header} kind in C language'\n${CTAGS} --quiet --options=NONE --roles-C.'{header}'= --list-roles='C.*'\ntitle 'Sh.* with disabling all roles of {header} kind in C language'\n${CTAGS} --quiet --options=NONE --roles-C.'{header}'= --list-roles='Sh.*'\n\n# --roles-.k=\ntitle 'C.* with disabling all roles of h kind in C language'\n${CTAGS} --quiet --options=NONE --roles-C.h= --list-roles='C.*'\ntitle 'Sh.* with disabling all roles of h kind in C language'\n${CTAGS} --quiet --options=NONE --roles-C.h= --list-roles='Sh.*'\n\n# --roles-.{kind}=*\ntitle 'C.* with enabling all roles of {header} kind in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'{header}'='*' --list-roles='C.*'\ntitle 'Sh.* with enabling all roles of {header} kind in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'{header}'='*' --list-roles='Sh.*'\n\n# --roles-.k=*\ntitle 'C.* with enabling all roles of h kind in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'h'='*' --list-roles='C.*'\ntitle 'Sh.* with enabling all roles of h kind in C language' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'h'='*' --list-roles='Sh.*'\n\n# --roles-.{kind}=[+|-]{role}\n# --roles-.k=[+|-]{role}\ntitle 'C.* with disabling system role of h kind'\n${CTAGS} --quiet --options=NONE --roles-C.h='-{system}' --list-roles='C.*'\ntitle 'C.* with disabling system role of {header} kind'\n${CTAGS} --quiet --options=NONE --roles-C.'{header}'='-{system}' --list-roles='C.*'\n\ntitle 'C.* with enabling system role of h kind after disabling the role'\n${CTAGS} --quiet --options=NONE --roles-C.h='-{system}+{system}' --list-roles='C.*'\ntitle 'C.* with enabling system role of {header} kind after disabling the role'\n${CTAGS} --quiet --options=NONE --roles-C.'{header}'='-{system}+{system}' --list-roles='C.*'\n\ntitle 'C.* with disabling system and local roles of h kind'\n${CTAGS} --quiet --options=NONE --roles-C.h='-{system}{local}' --list-roles='C.*'\ntitle 'C.* with disabling system and local roles of {header} kind'\n${CTAGS} --quiet --options=NONE --roles-C.'{header}'='-{system}{local}' --list-roles='C.*'\n\ntitle 'C.* with enabling system and local roles of h kind' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.h='+{system}{local}' --list-roles='C.*'\ntitle 'C.* with enabling system and local roles of {header} kind' \\\n\t 'after disabling all roles in all languages'\n${CTAGS} --quiet --options=NONE --roles-all= --roles-C.'{header}'='+{system}{local}' --list-roles='C.*'\n\ntitle 'C.* with disabling local role of h kind and undef role of d kind'\n${CTAGS} --quiet --options=NONE --roles-C.h='-{local}' --roles-C.d='-{undef}' --list-roles='C.*'\n\n# miscellaneous combinations\ntitle 'C.* with enabling all roles of header kinds after disabling all roles of the kind'\n${CTAGS} --quiet --options=NONE --roles-C.'{header}'= --roles-C.'{header}'='*' --list-roles='C.*'\n\ntitle 'C.* with enabling all roles of header kinds after disabling all roles of the kinds of C language'\n${CTAGS} --quiet --options=NONE --roles-C.'*'= --roles-C.'{header}'='*' --list-roles='C.*'\n\ntitle 'C.* with enabling all roles of header kinds after disabling all roles of the kinds of C language (short notation)'\n${CTAGS} --quiet --options=NONE --roles-C= --roles-C.'{header}'='*' --list-roles='C.*'\n" }, { "path": "Tmain/list-roles.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/list-roles.d/stdout-expected.txt", "content": "\n#\n#\n#\n#LANGUAGE KIND(L/N) NAME ENABLED VER DESCRIPTION\nAda p/package subunit on 0 package name referenced in separate()\nAutoIt S/script local on 0 local include\nAutoIt S/script system on 0 system include\nAutoconf e/optenable cmdline on 0 specified in a configure command line\nAutoconf w/optwith cmdline on 0 specified in a configure command line\nAutomake c/condition branched on 0 used for branching\nAutomake d/directory data on 0 directory for DATA primary\nAutomake d/directory library on 0 directory for LIBRARIES primary\nAutomake d/directory ltlibrary on 0 directory for LTLIBRARIES primary\nAutomake d/directory man on 0 directory for MANS primary\nAutomake d/directory program on 0 directory for PROGRAMS primary\nAutomake d/directory script on 0 directory for SCRIPTS primary\nAutomake p/pseudodir data on 0 directory for DATA primary\nAutomake p/pseudodir library on 0 directory for LIBRARIES primary\nAutomake p/pseudodir ltlibrary on 0 directory for LTLIBRARIES primary\nAutomake p/pseudodir man on 0 directory for MANS primary\nAutomake p/pseudodir program on 0 directory for PROGRAMS primary\nAutomake p/pseudodir script on 0 directory for SCRIPTS primary\nBasic f/function decl on 0 declared\nBats S/script loaded on 0 script loaed with \"load\" command\nC d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC d/macro undef on 0 undefined\nC f/function foreigncall on 2 called in foreign languages\nC f/function foreigndecl on 1 declared in foreign languages\nC h/header local on 0 local header\nC h/header system on 0 system header\nC s/struct foreigndecl on 1 declared in foreign languages\nC++ M/module imported on 2 imported with \"imported ...\"\nC++ M/module partOwner on 2 used for specifying a partition\nC++ P/partition imported on 2 imported with \"imported ...\"\nC++ d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC++ d/macro undef on 0 undefined\nC++ h/header exported on 2 exported with \"exported imported ...\"\nC++ h/header imported on 2 imported with \"imported ...\"\nC++ h/header local on 0 local header\nC++ h/header system on 0 system header\nCPreProcessor d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCPreProcessor d/macro undef on 0 undefined\nCPreProcessor h/header local on 0 local header\nCPreProcessor h/header system on 0 system header\nCUDA d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCUDA d/macro undef on 0 undefined\nCUDA h/header local on 0 local header\nCUDA h/header system on 0 system header\nCobol S/sourcefile copied on 0 copied in source file\nCobolFree S/sourcefile copied on 0 copied in source file\nCobolVariable S/sourcefile copied on 0 copied in source file\nDTD e/element attOwner on 0 attributes owner\nDTD p/parameterEntity condition on 0 conditions\nDTD p/parameterEntity elementName on 0 element names\nDTD p/parameterEntity partOfAttDef on 0 part of attribute definition\nElm c/constructor exposed on 0 item exposed from a module\nElm f/function exposed on 0 item exposed from a module\nElm m/module imported on 0 module imported\nElm t/type exposed on 0 item exposed from a module\nFlex I/import import on 0 imports\nGDScript c/class extended on 0 used as a base class for extending\nGemSpec g/gem develDep on 0 specifying development dependency\nGemSpec g/gem runtimeDep on 0 specifying runtime dependency\nGo Y/unknown receiverType on 0 receiver type\nGo p/package imported on 0 imported package\nHTML C/stylesheet extFile on 0 referenced as external files\nHTML J/script extFile on 0 referenced as external files\nHTML c/class attribute on 0 assigned as attributes\nJava p/package imported on 0 imported package\nJavaScript c/class chainElt off 0 (EXPERIMENTAL)used as an element in a name chain like a.b.c\nJavaScript f/function foreigndecl on 1 declared in foreign languages\nJavaScript v/variable chainElt off 0 (EXPERIMENTAL)used as an element in a name chain like a.b.c\nJulia Y/unknown imported on 0 loaded by \"import\"\nJulia Y/unknown used on 0 loaded by \"using\"\nJulia n/module imported on 0 loaded by \"import\"\nJulia n/module namespace on 0 only some symbols in it are imported\nJulia n/module used on 0 loaded by \"using\"\nKconfig k/kconfig source on 0 kconfig file loaded with source directive\nLEX c/cond grouping on 1 conditions used for grouping of start or exclusive condition rules\nLdScript i/inputSection destination on 1 specified as the destination of code and data\nLdScript i/inputSection discarded on 0 discarded when linking\nLdScript i/inputSection mapped on 0 mapped to output section\nLdScript s/symbol aliased on 1 aliased with __attribute__((alias(...))) in C/C++ code\nLdScript s/symbol entrypoint on 0 entry points\nLua Y/unknown referenced off 0 referenced somehow\nM4 I/macrofile included on 0 included macro\nM4 I/macrofile sincluded on 0 silently included macro\nM4 d/macro undef on 0 undefined\nMake I/makefile included on 0 included\nMake I/makefile optional on 0 optionally included\nMeson m/module imported on 0 imported\nNSIS i/script included on 0 included with !include\nNftables R/ruleset included on 0 included ruleset\nNftables f/family referenced off 0 referenced somehow\nOdin A/asmfile imported on 0 imported assembly file via foreign\nOdin C/collection referenced on 0 referenced in import statement\nOdin L/ccode imported on 0 imported ccode via foreign\nOdin p/package imported on 0 imported package\nPerl M/module unused on 0 specified in `no' built-in function\nPerl M/module used on 0 specified in `use' built-in function\nPerl h/heredoc endmarker on 0 end marker\nPkgConfig p/pkg conflicted on 0 conflicted\nPkgConfig p/pkg provided on 0 provided\nPkgConfig p/pkg required on 0 required\nProlog m/module chainElt off 0 (EXPERIMENTAL)used as an element in a module-qualified atom like module:predicate\nProtobuf D/protodef imported on 0 imported\nProtobuf m/message extension on 0 extending the message\nPython Y/unknown imported on 0 imported from the other module\nPython Y/unknown indirectlyImported on 0 classes/variables/functions/modules imported in alternative name\nPython f/function entryPoint on 1 specified as an entry point\nPython i/module entryPoint on 1 specified as a module of an entry point\nPython i/module imported on 0 imported modules\nPython i/module indirectlyImported on 0 module imported in alternative name\nPython i/module namespace on 0 namespace from where classes/variables/functions are imported\nR l/library library on 0 library attached by library function\nR l/library require on 0 library attached by require function\nR s/source source on 0 source loaded by source fucntion\nRpmSpec m/macro undef on 0 undefined\nRpmSpec p/patch decl on 0 declared for applying later\nRuby L/library loaded on 0 loaded by \"load\" method\nRuby L/library required on 0 loaded by \"require\" method\nRuby L/library requiredRel on 0 loaded by \"require_relative\" method\nSCSS M/module used on 1 used\nSELinuxTypeEnforcement t/type aliased on 0 aliased\nSQL k/type decl off 1 declaration (shell in PostgreSQL)\nSh h/heredoc endmarker on 0 end marker\nSh s/script loaded on 0 loaded\nSystemTap p/probe attached on 1 attached by code for probing\nSystemVerilog m/module decl on 0 declaring instances\nSystemdUnit u/unit After on 0 referred in After key\nSystemdUnit u/unit Before on 0 referred in Before key\nSystemdUnit u/unit RequiredBy on 0 referred in RequiredBy key\nSystemdUnit u/unit Requires on 0 referred in Requires key\nSystemdUnit u/unit WantedBy on 0 referred in WantedBy key\nSystemdUnit u/unit Wants on 0 referred in Wants key\nSystemdUnit u/unit foreignlang on 1 referenced in foreign languages\nTOML k/key chainElt off 0 (EXPERIMENTAL)used as an element in a key name chain like a.b.c\nTerraform v/variable assigned on 0 assigned in Variable Definitions (.tfvars) files\nTex e/environment used off 0 environment usage introduced by \\begin{MyEnv}\nTex i/xinput bibliography on 0 bibliography (.bib) file\nTex i/xinput included on 0 external input file specified with \\include\nTex i/xinput input on 0 external input file specified with \\input\nThrift T/thriftFile included on 0 included file\nV Y/unknown imported on 0 imported symbol\nV p/module foreignlang on 0 representing a foreign language (i.e., C, JS...)\nV p/module imported on 0 imported module\nVHDL e/entity desigend on 0 designed by an architecture\nVera d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nVera d/macro undef on 0 undefined\nVera h/header local on 0 local header\nVera h/header system on 0 system header\nVerilog m/module decl on 0 declaring instances\nVim h/heredoc endmarker on 0 end marker\nZsh f/function autoloaded on 0 function name passed to autoload built-in command\nZsh h/heredoc endmarker on 0 end marker\nZsh s/script autoloaded on 0 autoloaded\nZsh s/script loaded on 0 loaded\n\n#\n# all.*\n#\n#LANGUAGE KIND(L/N) NAME ENABLED VER DESCRIPTION\nAda p/package subunit on 0 package name referenced in separate()\nAutoIt S/script local on 0 local include\nAutoIt S/script system on 0 system include\nAutoconf e/optenable cmdline on 0 specified in a configure command line\nAutoconf w/optwith cmdline on 0 specified in a configure command line\nAutomake c/condition branched on 0 used for branching\nAutomake d/directory data on 0 directory for DATA primary\nAutomake d/directory library on 0 directory for LIBRARIES primary\nAutomake d/directory ltlibrary on 0 directory for LTLIBRARIES primary\nAutomake d/directory man on 0 directory for MANS primary\nAutomake d/directory program on 0 directory for PROGRAMS primary\nAutomake d/directory script on 0 directory for SCRIPTS primary\nAutomake p/pseudodir data on 0 directory for DATA primary\nAutomake p/pseudodir library on 0 directory for LIBRARIES primary\nAutomake p/pseudodir ltlibrary on 0 directory for LTLIBRARIES primary\nAutomake p/pseudodir man on 0 directory for MANS primary\nAutomake p/pseudodir program on 0 directory for PROGRAMS primary\nAutomake p/pseudodir script on 0 directory for SCRIPTS primary\nBasic f/function decl on 0 declared\nBats S/script loaded on 0 script loaed with \"load\" command\nC d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC d/macro undef on 0 undefined\nC f/function foreigncall on 2 called in foreign languages\nC f/function foreigndecl on 1 declared in foreign languages\nC h/header local on 0 local header\nC h/header system on 0 system header\nC s/struct foreigndecl on 1 declared in foreign languages\nC++ M/module imported on 2 imported with \"imported ...\"\nC++ M/module partOwner on 2 used for specifying a partition\nC++ P/partition imported on 2 imported with \"imported ...\"\nC++ d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC++ d/macro undef on 0 undefined\nC++ h/header exported on 2 exported with \"exported imported ...\"\nC++ h/header imported on 2 imported with \"imported ...\"\nC++ h/header local on 0 local header\nC++ h/header system on 0 system header\nCPreProcessor d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCPreProcessor d/macro undef on 0 undefined\nCPreProcessor h/header local on 0 local header\nCPreProcessor h/header system on 0 system header\nCUDA d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCUDA d/macro undef on 0 undefined\nCUDA h/header local on 0 local header\nCUDA h/header system on 0 system header\nCobol S/sourcefile copied on 0 copied in source file\nCobolFree S/sourcefile copied on 0 copied in source file\nCobolVariable S/sourcefile copied on 0 copied in source file\nDTD e/element attOwner on 0 attributes owner\nDTD p/parameterEntity condition on 0 conditions\nDTD p/parameterEntity elementName on 0 element names\nDTD p/parameterEntity partOfAttDef on 0 part of attribute definition\nElm c/constructor exposed on 0 item exposed from a module\nElm f/function exposed on 0 item exposed from a module\nElm m/module imported on 0 module imported\nElm t/type exposed on 0 item exposed from a module\nFlex I/import import on 0 imports\nGDScript c/class extended on 0 used as a base class for extending\nGemSpec g/gem develDep on 0 specifying development dependency\nGemSpec g/gem runtimeDep on 0 specifying runtime dependency\nGo Y/unknown receiverType on 0 receiver type\nGo p/package imported on 0 imported package\nHTML C/stylesheet extFile on 0 referenced as external files\nHTML J/script extFile on 0 referenced as external files\nHTML c/class attribute on 0 assigned as attributes\nJava p/package imported on 0 imported package\nJavaScript c/class chainElt off 0 (EXPERIMENTAL)used as an element in a name chain like a.b.c\nJavaScript f/function foreigndecl on 1 declared in foreign languages\nJavaScript v/variable chainElt off 0 (EXPERIMENTAL)used as an element in a name chain like a.b.c\nJulia Y/unknown imported on 0 loaded by \"import\"\nJulia Y/unknown used on 0 loaded by \"using\"\nJulia n/module imported on 0 loaded by \"import\"\nJulia n/module namespace on 0 only some symbols in it are imported\nJulia n/module used on 0 loaded by \"using\"\nKconfig k/kconfig source on 0 kconfig file loaded with source directive\nLEX c/cond grouping on 1 conditions used for grouping of start or exclusive condition rules\nLdScript i/inputSection destination on 1 specified as the destination of code and data\nLdScript i/inputSection discarded on 0 discarded when linking\nLdScript i/inputSection mapped on 0 mapped to output section\nLdScript s/symbol aliased on 1 aliased with __attribute__((alias(...))) in C/C++ code\nLdScript s/symbol entrypoint on 0 entry points\nLua Y/unknown referenced off 0 referenced somehow\nM4 I/macrofile included on 0 included macro\nM4 I/macrofile sincluded on 0 silently included macro\nM4 d/macro undef on 0 undefined\nMake I/makefile included on 0 included\nMake I/makefile optional on 0 optionally included\nMeson m/module imported on 0 imported\nNSIS i/script included on 0 included with !include\nNftables R/ruleset included on 0 included ruleset\nNftables f/family referenced off 0 referenced somehow\nOdin A/asmfile imported on 0 imported assembly file via foreign\nOdin C/collection referenced on 0 referenced in import statement\nOdin L/ccode imported on 0 imported ccode via foreign\nOdin p/package imported on 0 imported package\nPerl M/module unused on 0 specified in `no' built-in function\nPerl M/module used on 0 specified in `use' built-in function\nPerl h/heredoc endmarker on 0 end marker\nPkgConfig p/pkg conflicted on 0 conflicted\nPkgConfig p/pkg provided on 0 provided\nPkgConfig p/pkg required on 0 required\nProlog m/module chainElt off 0 (EXPERIMENTAL)used as an element in a module-qualified atom like module:predicate\nProtobuf D/protodef imported on 0 imported\nProtobuf m/message extension on 0 extending the message\nPython Y/unknown imported on 0 imported from the other module\nPython Y/unknown indirectlyImported on 0 classes/variables/functions/modules imported in alternative name\nPython f/function entryPoint on 1 specified as an entry point\nPython i/module entryPoint on 1 specified as a module of an entry point\nPython i/module imported on 0 imported modules\nPython i/module indirectlyImported on 0 module imported in alternative name\nPython i/module namespace on 0 namespace from where classes/variables/functions are imported\nR l/library library on 0 library attached by library function\nR l/library require on 0 library attached by require function\nR s/source source on 0 source loaded by source fucntion\nRpmSpec m/macro undef on 0 undefined\nRpmSpec p/patch decl on 0 declared for applying later\nRuby L/library loaded on 0 loaded by \"load\" method\nRuby L/library required on 0 loaded by \"require\" method\nRuby L/library requiredRel on 0 loaded by \"require_relative\" method\nSCSS M/module used on 1 used\nSELinuxTypeEnforcement t/type aliased on 0 aliased\nSQL k/type decl off 1 declaration (shell in PostgreSQL)\nSh h/heredoc endmarker on 0 end marker\nSh s/script loaded on 0 loaded\nSystemTap p/probe attached on 1 attached by code for probing\nSystemVerilog m/module decl on 0 declaring instances\nSystemdUnit u/unit After on 0 referred in After key\nSystemdUnit u/unit Before on 0 referred in Before key\nSystemdUnit u/unit RequiredBy on 0 referred in RequiredBy key\nSystemdUnit u/unit Requires on 0 referred in Requires key\nSystemdUnit u/unit WantedBy on 0 referred in WantedBy key\nSystemdUnit u/unit Wants on 0 referred in Wants key\nSystemdUnit u/unit foreignlang on 1 referenced in foreign languages\nTOML k/key chainElt off 0 (EXPERIMENTAL)used as an element in a key name chain like a.b.c\nTerraform v/variable assigned on 0 assigned in Variable Definitions (.tfvars) files\nTex e/environment used off 0 environment usage introduced by \\begin{MyEnv}\nTex i/xinput bibliography on 0 bibliography (.bib) file\nTex i/xinput included on 0 external input file specified with \\include\nTex i/xinput input on 0 external input file specified with \\input\nThrift T/thriftFile included on 0 included file\nV Y/unknown imported on 0 imported symbol\nV p/module foreignlang on 0 representing a foreign language (i.e., C, JS...)\nV p/module imported on 0 imported module\nVHDL e/entity desigend on 0 designed by an architecture\nVera d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nVera d/macro undef on 0 undefined\nVera h/header local on 0 local header\nVera h/header system on 0 system header\nVerilog m/module decl on 0 declaring instances\nVim h/heredoc endmarker on 0 end marker\nZsh f/function autoloaded on 0 function name passed to autoload built-in command\nZsh h/heredoc endmarker on 0 end marker\nZsh s/script autoloaded on 0 autoloaded\nZsh s/script loaded on 0 loaded\n\n#\n# C.*\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# all.d\n#\n#LANGUAGE KIND(L/N) NAME ENABLED VER DESCRIPTION\nAutomake d/directory data on 0 directory for DATA primary\nAutomake d/directory library on 0 directory for LIBRARIES primary\nAutomake d/directory ltlibrary on 0 directory for LTLIBRARIES primary\nAutomake d/directory man on 0 directory for MANS primary\nAutomake d/directory program on 0 directory for PROGRAMS primary\nAutomake d/directory script on 0 directory for SCRIPTS primary\nC d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC d/macro undef on 0 undefined\nC++ d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nC++ d/macro undef on 0 undefined\nCPreProcessor d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCPreProcessor d/macro undef on 0 undefined\nCUDA d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nCUDA d/macro undef on 0 undefined\nM4 d/macro undef on 0 undefined\nVera d/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nVera d/macro undef on 0 undefined\n\n#\n# Sh.s\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\ns/script loaded on 0 loaded\n\n#\n# C.* with disabling all roles of all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# C.* with disabling all roles of all kinds of all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# C.* with enabling all roles of all kinds in all languages\n# after disabling system role of header kind of C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition on 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with enabling all roles in all languages\n# after disabling system role of header kind of C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition on 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with disabling all roles in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# Sh.* with disabling all roles in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker on 0 end marker\ns/script loaded on 0 loaded\n\n#\n# C.* with disabling all roles of all kinds in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# Sh.* with disabling all roles of all kinds in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker on 0 end marker\ns/script loaded on 0 loaded\n\n#\n# C.* with enabling all roles in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition on 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# Sh.* with enabling all roles in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker off 0 end marker\ns/script loaded off 0 loaded\n\n#\n# C.* with enabling all roles of all kinds in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition on 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# Sh.* with enabling all roles of all kinds in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker off 0 end marker\ns/script loaded off 0 loaded\n\n#\n# C.* with disabling all roles of {header} kind in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# Sh.* with disabling all roles of {header} kind in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker on 0 end marker\ns/script loaded on 0 loaded\n\n#\n# C.* with disabling all roles of h kind in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# Sh.* with disabling all roles of h kind in C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker on 0 end marker\ns/script loaded on 0 loaded\n\n#\n# C.* with enabling all roles of {header} kind in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# Sh.* with enabling all roles of {header} kind in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker off 0 end marker\ns/script loaded off 0 loaded\n\n#\n# C.* with enabling all roles of h kind in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# Sh.* with enabling all roles of h kind in C language\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nh/heredoc endmarker off 0 end marker\ns/script loaded off 0 loaded\n\n#\n# C.* with disabling system role of h kind\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system off 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with disabling system role of {header} kind\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system off 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with enabling system role of h kind after disabling the role\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with enabling system role of {header} kind after disabling the role\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with disabling system and local roles of h kind\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with disabling system and local roles of {header} kind\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local off 0 local header\nh/header system off 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with enabling system and local roles of h kind\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# C.* with enabling system and local roles of {header} kind\n# after disabling all roles in all languages\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# C.* with disabling local role of h kind and undef role of d kind\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local off 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with enabling all roles of header kinds after disabling all roles of the kind\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef on 0 undefined\nf/function foreigncall on 2 called in foreign languages\nf/function foreigndecl on 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl on 1 declared in foreign languages\n\n#\n# C.* with enabling all roles of header kinds after disabling all roles of the kinds of C language\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n\n#\n# C.* with enabling all roles of header kinds after disabling all roles of the kinds of C language (short notation)\n#\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nd/macro condition off 0 used in part of #if/#ifdef/#elif conditions\nd/macro undef off 0 undefined\nf/function foreigncall off 2 called in foreign languages\nf/function foreigndecl off 1 declared in foreign languages\nh/header local on 0 local header\nh/header system on 0 system header\ns/struct foreigndecl off 1 declared in foreign languages\n" }, { "path": "Tmain/list-subparsers-all.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n. ../utils.sh\nis_feature_available $CTAGS xpath\nis_feature_available $CTAGS yaml\n\n${CTAGS} --quiet --options=NONE \\\n\t\t --list-subparsers=all\n" }, { "path": "Tmain/list-subparsers-all.d/stdout-expected.txt", "content": "#NAME BASEPARSER DIRECTIONS\nAnsiblePlaybook Yaml base <> sub {bidirectional}\nAnt XML base <> sub {bidirectional}\nAutoconf M4 base <> sub {bidirectional}\nAutomake Make base <= sub {dedicated}\nBats Sh base <= sub {dedicated}\nBibLaTeX BibTeX base <> sub {bidirectional}\nCargo TOML base <= sub {dedicated}\nDBusIntrospect XML base <> sub {bidirectional}\nDBusService Iniconf base <= sub {dedicated}\nFunctionParameters Perl base <> sub {bidirectional}\nGemSpec Ruby base <= sub {dedicated}\nGlade XML base <> sub {bidirectional}\nI18nRubyGem Yaml base <> sub {bidirectional}\nIPythonCell Python base => sub {shared}\nITcl Tcl base <> sub {bidirectional}\nJNI C base <> sub {bidirectional}\nJNI C++ base <> sub {bidirectional}\nMaven2 XML base <> sub {bidirectional}\nMoose Perl base <> sub {bidirectional}\nOpenAPI Yaml base <> sub {bidirectional}\nPlistXML XML base <> sub {bidirectional}\nPythonEntryPoints Iniconf base <= sub {dedicated}\nPythonLoggingConfig Iniconf base <> sub {bidirectional}\nQtMoc C++ base <> sub {bidirectional}\nQuarto Markdown base <= sub {dedicated}\nR6Class R base <> sub {bidirectional}\nRMarkdown Markdown base <= sub {dedicated}\nRSpec Ruby base => sub {shared}\nRake Ruby base <= sub {dedicated}\nRelaxNG XML base <> sub {bidirectional}\nS4Class R base <> sub {bidirectional}\nSELinuxInterface M4 base <= sub {dedicated}\nSVG XML base <> sub {bidirectional}\nSystemdUnit Iniconf base <= sub {dedicated}\nTclOO Tcl base <> sub {bidirectional}\nTeXBeamer Tex base <> sub {bidirectional}\nXRC XML base <= sub {dedicated}\nXSLT XML base <> sub {bidirectional}\nYumRepo Iniconf base <= sub {dedicated}\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/ctags.d/a.ctags", "content": "--_echo=hello\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/ctags.d/b.ctags", "content": "--_echo=world\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/ctags.d/c.ctags", "content": "--_force-quit=7\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/exit-expected.txt", "content": "7\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nskip_if_user_has_dot_ctags_d\n\n${CTAGS}\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/stderr-expected.txt", "content": "ctags: Notice: hello\nctags: Notice: world\n" }, { "path": "Tmain/load-conf-files-under-cwd-no-dot.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/load-conf-files-under-cwd.d/.ctags.d/a.ctags", "content": "--_echo=hello\n" }, { "path": "Tmain/load-conf-files-under-cwd.d/.ctags.d/b.ctags", "content": "--_echo=world\n" }, { "path": "Tmain/load-conf-files-under-cwd.d/.ctags.d/c.ctags", "content": "--_force-quit=7\n" }, { "path": "Tmain/load-conf-files-under-cwd.d/exit-expected.txt", "content": "7\n" }, { "path": "Tmain/load-conf-files-under-cwd.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nexit_if_win32 \"$CTAGS\"\nskip_if_user_has_dot_ctags_d\n\n${CTAGS}\n" }, { "path": "Tmain/load-conf-files-under-cwd.d/stderr-expected.txt", "content": "ctags: Notice: hello\nctags: Notice: world\n" }, { "path": "Tmain/load-conf-files-under-cwd.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/load-conf-files-under-default-xdg-config-home.d/exit-expected.txt", "content": "7\n" }, { "path": "Tmain/load-conf-files-under-default-xdg-config-home.d/run.sh", "content": "# Copyright: 2019 itchyny\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n# $HOME/.config/ctags/*.ctags are loaded\nexport HOME=./myhome\nexport XDG_CONFIG_HOME=\n${CTAGS}\n" }, { "path": "Tmain/load-conf-files-under-default-xdg-config-home.d/stderr-expected.txt", "content": "ctags: Notice: hello\nctags: Notice: world\n" }, { "path": "Tmain/load-conf-files-under-default-xdg-config-home.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/load-conf-files-under-home.d/exit-expected.txt", "content": "7\n" }, { "path": "Tmain/load-conf-files-under-home.d/myhome/.ctags.d/a.ctags", "content": "--_echo=hello\n" }, { "path": "Tmain/load-conf-files-under-home.d/myhome/.ctags.d/b.ctags", "content": "--_echo=world\n" }, { "path": "Tmain/load-conf-files-under-home.d/myhome/.ctags.d/c.ctags", "content": "--_force-quit=7\n" }, { "path": "Tmain/load-conf-files-under-home.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nexit_if_win32 \"$CTAGS\"\n\nexport HOME=./myhome\n${CTAGS}\n" }, { "path": "Tmain/load-conf-files-under-home.d/stderr-expected.txt", "content": "ctags: Notice: hello\nctags: Notice: world\n" }, { "path": "Tmain/load-conf-files-under-home.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/load-conf-files-under-xdg-config-home.d/exit-expected.txt", "content": "7\n" }, { "path": "Tmain/load-conf-files-under-xdg-config-home.d/run.sh", "content": "# Copyright: 2019 itchyny\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n# $XDG_CONFIG_HOME/ctags/*.ctags are loaded\nexport XDG_CONFIG_HOME=./.config\n${CTAGS}\n" }, { "path": "Tmain/load-conf-files-under-xdg-config-home.d/stderr-expected.txt", "content": "ctags: Notice: hello\nctags: Notice: world\n" }, { "path": "Tmain/load-conf-files-under-xdg-config-home.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/load-dot-ctags-twice.d/dot.ctags", "content": "--_echo=hello\n" }, { "path": "Tmain/load-dot-ctags-twice.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/load-dot-ctags-twice.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n# TODO: --quiet\n${CTAGS} --options=NONE --options=./dot.ctags --options=./dot.ctags --_force-quit\n\n" }, { "path": "Tmain/load-dot-ctags-twice.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Notice: hello\n" }, { "path": "Tmain/load-dot-ctags-twice.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/lregex-clear-patterns.d/input.c", "content": "DEFINE(x, 1);\nregister(eax);\n" }, { "path": "Tmain/lregex-clear-patterns.d/mylang.ctags", "content": "--langdef=MYLANG{base=C}\n--kinddef-MYLANG=d,def,definitions\n--kinddef-MYLANG=r,reg,registers\n--regex-MYLANG=/define\\(([a-zA-Z]+)[ \\t]*,/\\1/d/{icase}\n--regex-MYLANG=/REGISTER\\(([a-zA-Z]+)\\)/\\1/r/i\n" }, { "path": "Tmain/lregex-clear-patterns.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '#' Add a pattern\n${CTAGS} --quiet --options=NONE \\\n\t\t --options=./mylang.ctags \\\n\t\t -o - \\\n\t\t input.c\n\necho '#' Clear the pattern\n${CTAGS} --quiet --options=NONE \\\n\t\t --options=./mylang.ctags \\\n\t\t --regex-MYLANG= \\\n\t\t -o - \\\n\t\t input.c\n" }, { "path": "Tmain/lregex-clear-patterns.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/lregex-clear-patterns.d/stdout-expected.txt", "content": "# Add a pattern\neax\tinput.c\t/^register(eax);$/;\"\tr\nx\tinput.c\t/^DEFINE(x, 1);$/;\"\td\n# Clear the pattern\n" }, { "path": "Tmain/lregex-kind-letter.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\n. ../utils.sh\n\necho2 param: '|(.)|\\1|^ => ignoring'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|^' --list-kinds-full=x\n# In this case, ctags ignores the substring after the last '|'.\n# It is evaluated as flags.\n\necho2 param: '|(.)|\\1|^| => warning'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|^|' --list-kinds-full=x\n# In this case, ctags warns specifying a wrong kind letter '^'.\n\necho2 param: '|(.)|\\1|, => ignoring'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|,' --list-kinds-full=x\n# In this case, ctags ignores the substring after the last '|'.\n# It is evaluated as flags.\n\necho2 param: '|(.)|\\1|,| => using the default letter and name'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|,|' --list-kinds-full=x\n# In this case, ctags recognizes a kind letter and name\n# are not given; 'r' and \"regex\" are used as default values.\n" }, { "path": "Tmain/lregex-kind-letter.d/stderr-expected.txt", "content": "param: |(.)|\\1|^ => ignoring\nparam: |(.)|\\1|^| => warning\nctags: Kind letter must be an alphabetical character: \"^\"\nparam: |(.)|\\1|, => ignoring\nparam: |(.)|\\1|,| => using the default letter and name\n" }, { "path": "Tmain/lregex-kind-letter.d/stdout-expected.txt", "content": "param: |(.)|\\1|^ => ignoring\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nr regex yes no 0 NONE 0 regex\nparam: |(.)|\\1|^| => warning\nparam: |(.)|\\1|, => ignoring\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nr regex yes no 0 NONE 0 regex\nparam: |(.)|\\1|,| => using the default letter and name\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nr regex yes no 0 NONE 0 regex\n" }, { "path": "Tmain/lregex-kind-name.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\n\n. ../utils.sh\n\necho2 param: '|(.)|\\1|x,name| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name,documents| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name,documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name,0documents| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name,0documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name,doc uments| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name,doc uments|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name0| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name0|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name0,documents| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name0,documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name0,0documents| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name0,0documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,name0,doc uments| => acceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,name0,doc uments|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,0name| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,0name|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,0name,documents| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,0name,documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,0name,0documents| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,0name,0documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,0name,doc uments| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,0name,doc uments|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,na me| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,na me|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,na me,documents| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,na me,documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,na me,0documents| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,na me,0documents|' --list-kinds-full=x\n\necho2 param: '|(.)|\\1|x,na me,doc uments| => unacceptable'\n${CTAGS} --langdef=x --regex-x='|(.)|\\1|x,na me,doc uments|' --list-kinds-full=x\n" }, { "path": "Tmain/lregex-kind-name.d/stderr-expected.txt", "content": "param: |(.)|\\1|x,name| => acceptable\nparam: |(.)|\\1|x,name,documents| => acceptable\nparam: |(.)|\\1|x,name,0documents| => acceptable\nparam: |(.)|\\1|x,name,doc uments| => acceptable\nparam: |(.)|\\1|x,name0| => acceptable\nparam: |(.)|\\1|x,name0,documents| => acceptable\nparam: |(.)|\\1|x,name0,0documents| => acceptable\nparam: |(.)|\\1|x,name0,doc uments| => acceptable\nparam: |(.)|\\1|x,0name| => unacceptable\nctags: A kind name doesn't start with an alphabetical character: '0name' in \"--regex-x\" option\nparam: |(.)|\\1|x,0name,documents| => unacceptable\nctags: A kind name doesn't start with an alphabetical character: '0name' in \"--regex-x\" option\nparam: |(.)|\\1|x,0name,0documents| => unacceptable\nctags: A kind name doesn't start with an alphabetical character: '0name' in \"--regex-x\" option\nparam: |(.)|\\1|x,0name,doc uments| => unacceptable\nctags: A kind name doesn't start with an alphabetical character: '0name' in \"--regex-x\" option\nparam: |(.)|\\1|x,na me| => unacceptable\nctags: Non-alphanumeric char is used in kind name: 'na me' in \"--regex-x\" option\nparam: |(.)|\\1|x,na me,documents| => unacceptable\nctags: Non-alphanumeric char is used in kind name: 'na me' in \"--regex-x\" option\nparam: |(.)|\\1|x,na me,0documents| => unacceptable\nctags: Non-alphanumeric char is used in kind name: 'na me' in \"--regex-x\" option\nparam: |(.)|\\1|x,na me,doc uments| => unacceptable\nctags: Non-alphanumeric char is used in kind name: 'na me' in \"--regex-x\" option\n" }, { "path": "Tmain/lregex-kind-name.d/stdout-expected.txt", "content": "param: |(.)|\\1|x,name| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name yes no 0 NONE 0 name\nparam: |(.)|\\1|x,name,documents| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name yes no 0 NONE 0 documents\nparam: |(.)|\\1|x,name,0documents| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name yes no 0 NONE 0 0documents\nparam: |(.)|\\1|x,name,doc uments| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name yes no 0 NONE 0 doc uments\nparam: |(.)|\\1|x,name0| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name0 yes no 0 NONE 0 name0\nparam: |(.)|\\1|x,name0,documents| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name0 yes no 0 NONE 0 documents\nparam: |(.)|\\1|x,name0,0documents| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name0 yes no 0 NONE 0 0documents\nparam: |(.)|\\1|x,name0,doc uments| => acceptable\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nx name0 yes no 0 NONE 0 doc uments\nparam: |(.)|\\1|x,0name| => unacceptable\nparam: |(.)|\\1|x,0name,documents| => unacceptable\nparam: |(.)|\\1|x,0name,0documents| => unacceptable\nparam: |(.)|\\1|x,0name,doc uments| => unacceptable\nparam: |(.)|\\1|x,na me| => unacceptable\nparam: |(.)|\\1|x,na me,documents| => unacceptable\nparam: |(.)|\\1|x,na me,0documents| => unacceptable\nparam: |(.)|\\1|x,na me,doc uments| => unacceptable\n" }, { "path": "Tmain/lregex-list-kinds-full.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/lregex-list-kinds-full.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --langdef=foo \\\n\t --regex-foo='/a/\\0/a,xy,x y z/' --kinds-foo=-a --kinds-foo=+a \\\n\t --regex-foo=/b/\\0/b/ --kinds-foo=-b \\\n\t --regex-foo=/c/\\0/c/ \\\n\t --kinds-foo=-c \\\n\t --regex-foo=/d/\\0/d/ \\\n\t --machinable \\\n\t --with-list-header \\\n\t --list-kinds-full=foo | sort\n" }, { "path": "Tmain/lregex-list-kinds-full.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/lregex-list-kinds-full.d/stdout-expected.txt", "content": "#LETTER\tNAME\tENABLED\tREFONLY\tNROLES\tMASTER\tVER\tDESCRIPTION\na\txy\tyes\tno\t0\tNONE\t0\tx y z\nb\tregex\tno\tno\t0\tNONE\t0\tregex\nc\tregex\tno\tno\t0\tNONE\t0\tregex\nd\tregex\tyes\tno\t0\tNONE\t0\tregex\n" }, { "path": "Tmain/lregex-list-kinds-uniquely.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE \\\n\t\t --langdef=X \\\n\t\t --regex-X='/./\\0/l,label,labels/' \\\n\t\t --regex-X='/./\\0/l,label,labels/' \\\n\t\t --list-kinds=X\n" }, { "path": "Tmain/lregex-list-kinds-uniquely.d/stdout-expected.txt", "content": "l labels\n" }, { "path": "Tmain/lregex-list-kinds.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/lregex-list-kinds.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --langdef=foo \\\n\t --regex-foo=/a/\\0/a/ --kinds-foo=-a --kinds-foo=+a \\\n\t --regex-foo=/b/\\0/b/ --kinds-foo=-b \\\n\t --regex-foo=/c/\\0/c/ \\\n\t --kinds-foo=-c \\\n\t --regex-foo=/d/\\0/d/ \\\n\t --list-kinds=foo | sort\n" }, { "path": "Tmain/lregex-list-kinds.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/lregex-list-kinds.d/stdout-expected.txt", "content": "a regex\nb regex [off]\nc regex [off]\nd regex\n" }, { "path": "Tmain/lregex-reject-reserved-kind.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/lregex-reject-reserved-kind.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - --langdef=foo --regex-foo=/a/\\0/F/ run.sh ||\n${CTAGS} --quiet --options=NONE -o - --langdef=foo --regex-foo=/a/\\0/x,file/ run.sh\n" }, { "path": "Tmain/lregex-reject-reserved-kind.d/stderr-expected.txt", "content": "ctags: Kind letter 'F' used in regex definition \"a\" of foo language is reserved in ctags main\nctags: Kind name \"file\" used in regex definition \"a\" of foo language is reserved in ctags main\n" }, { "path": "Tmain/lregex-reject-reserved-kind.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/lregex-scan-the-rest-of-input.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/lregex-scan-the-rest-of-input.d/input.cst", "content": "Q\na\nb\nc\nd\ne\nf\ng\nrestdef:x\nrestdef:y\nrestdef:z\n\n\n" }, { "path": "Tmain/lregex-scan-the-rest-of-input.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --kinddef-CTagsSelfTest=a,name,names \\\n\t\t --regex-CTagsSelfTest='/restdef:([a-z])/\\1/a/' \\\n\t\t --language-force=CTagsSelfTest input.cst\n\nexit $?\n" }, { "path": "Tmain/lregex-scan-the-rest-of-input.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/lregex-scan-the-rest-of-input.d/stdout-expected.txt", "content": "x\tinput.cst\t/^restdef:x$/;\"\ta\ny\tinput.cst\t/^restdef:y$/;\"\ta\nz\tinput.cst\t/^restdef:z$/;\"\ta\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/X.ctags", "content": "--langdef=X\n--kinddef-X=f,foo,foobars\n--_tabledef-X=main\n--_tabledef-X=sharp\n--_mtable-regex-X=main/^#///{tjump=sharp}{_advanceTo=0start}\n--_mtable-regex-X=sharp/^[^\\n]+[\\n]//{tjump=main}\n--mline-regex-X=/^#.*//{_guest=C,0start,0end}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Y-r-regex-with-kinddef.ctags", "content": "--langdef=Y3\n--map-Y3=.yyy\n--kinddef-Y3=r,regex,captured by regex patterns\n--regex-Y3=/^block//r/{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Y-r-regex.ctags", "content": "--langdef=Y2\n--map-Y2=.yyy\n--regex-Y2=/^block//r,regex/{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Y-r.ctags", "content": "--langdef=Y1\n--map-Y1=.yyy\n--regex-Y1=/^block//r/{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Y-regex.ctags", "content": "--langdef=Y2\n--map-Y2=.yyy\n--regex-Y2=/^block//,regex/{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Yempty1.ctags", "content": "--langdef=Ye0\n--map-Ye0=.yyy\n--regex-Ye0=/^block//,/{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Yempty2.ctags", "content": "--langdef=Ye1\n--map-Ye1=.yyy\n--regex-Ye1=/^block//,,/{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/Ynokind.ctags", "content": "--langdef=Y0\n--map-Y0=.yyy\n--regex-Y0=/^block///{_anonymous=yyy}\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/input.yyy", "content": "block\nend\n\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE\"\nBUILDDIR=$2\n\n$CTAGS --options=X.ctags --list-kinds=X\n\necho \"# no kind is specified\" 1>&2\n$CTAGS --options=Ynokind.ctags -o $BUILDDIR/tags input.yyy\n\necho \"# no kind (empty,) is specified\" 1>&2\n$CTAGS --options=Yempty1.ctags -o $BUILDDIR/tags input.yyy\n\necho \"# no kind (empty,,) is specified\" 1>&2\n$CTAGS --options=Yempty2.ctags -o $BUILDDIR/tags input.yyy\n\necho \"# (r/) kind is specified inline\" 1>&2\n$CTAGS --options=Y-r.ctags -o $BUILDDIR/tags input.yyy\n\necho \"# (/regex) kind is specified inline\" 1>&2\n$CTAGS --options=Y-regex.ctags -o $BUILDDIR/tags input.yyy\n\necho \"# (r/regex) kind is specified inline\" 1>&2\n$CTAGS --options=Y-r-regex.ctags -o $BUILDDIR/tags input.yyy\n\necho \"# (r/regex) kind defined with --kinddef- option\" 1>&2\n$CTAGS --options=Y-r-regex-with-kinddef.ctags -o $BUILDDIR/tags input.yyy\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/stderr-expected.txt", "content": "# no kind is specified\nctags: Warning: use \"_anonymous\" regex flag only with an explicitly defined kind\nctags: Warning: ^block: regexp missing name pattern\nctags: Warning: input.yyy:1: null expansion of name pattern \"\"\n# no kind (empty,) is specified\nctags: Warning: use \"_anonymous\" regex flag only with an explicitly defined kind\nctags: Warning: ^block: regexp missing name pattern\nctags: Warning: input.yyy:1: null expansion of name pattern \"\"\n# no kind (empty,,) is specified\nctags: Warning: use \"_anonymous\" regex flag only with an explicitly defined kind\nctags: Warning: ^block: regexp missing name pattern\nctags: Warning: input.yyy:1: null expansion of name pattern \"\"\n# (r/) kind is specified inline\n# (/regex) kind is specified inline\n# (r/regex) kind is specified inline\n# (r/regex) kind defined with --kinddef- option\n" }, { "path": "Tmain/lregex-unexpected-regex-kind.d/stdout-expected.txt", "content": "f foobars\n" }, { "path": "Tmain/map-for-unknown-language.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/map-for-unknown-language.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --map-nosuchlang=.Z\nexit $?\n" }, { "path": "Tmain/map-for-unknown-language.d/stderr-expected.txt", "content": "ctags: Unknown language \"nosuchlang\" in \"map-nosuchlang\" option\n" }, { "path": "Tmain/map-for-unknown-language.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/map-lang-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/map-lang-option.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n: &&\n ${CTAGS} --quiet --options=NONE \\\n\t --langdef=foo \\\n\t --map-foo=.qqq \\\n\t --map-foo='.rb' \\\n\t --map-foo=+'([Mm]akefile)' \\\n\t --map-foo=+'(GNUmakefile)' \\\n\t --map-foo=+.html \\\n\t --map-foo=+.ppp \\\n\t --map-foo=+'(RUN.TTT)' \\\n\t --list-maps | grep '\\.qqq\\|\\.ppp\\|\\.rb\\|\\.html\\|akefile\\|RUN.TTT'\nexit $?\n" }, { "path": "Tmain/map-lang-option.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/map-lang-option.d/stdout-expected.txt", "content": "Automake Makefile.am GNUmakefile.am *.am\nHTML *.htm *.html\nMake [Mm]akefile GNUmakefile *.mak *.mk\nRake Rakefile *.rake\nRuby *.rb *.ruby\nfoo [Mm]akefile GNUmakefile RUN.TTT *.rb *.html *.ppp\n" }, { "path": "Tmain/map-removing.d/ada.m", "content": "-*- Ada -*-\n\n" }, { "path": "Tmain/map-removing.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/map-removing.d/matlab.m", "content": "-*- matlab -*-\n" }, { "path": "Tmain/map-removing.d/objc.m", "content": "-*- objc -*-\n" }, { "path": "Tmain/map-removing.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nif ! ( echo 'MatLab *.m' | grep -E '\\*\\.m\\>.*$' > /dev/null); then\n\tskip \"'grep -E' needed in this case doesn't work expectedly\"\nfi\n\n\necho default map including '*.m'\necho =======================================\n${CTAGS} --quiet --options=NONE \\\n\t --list-maps | grep -E '\\*\\.m\\>.*$'\necho\n\necho '[--map-]' removing from '*.m' from 'ObjectiveC'\necho =======================================\n${CTAGS} --quiet --options=NONE \\\n\t --map-ObjectiveC=-.m --list-maps | grep -E '\\*\\.m\\>.*$'\necho\n\necho '[--map-]' adding '*.m' to 'Ada'\necho =======================================\n${CTAGS} --quiet --options=NONE \\\n\t --map-Ada=+.m --list-maps | grep -E '\\*\\.m\\>.*$'\necho\n\necho '[--map-]' removing from '*.m' from 'ObjectiveC', and adding '*.m' to 'Ada'\necho =======================================\n${CTAGS} --quiet --options=NONE \\\n\t --map-ObjectiveC=-.m --map-Ada=+.m --list-maps | grep -E '\\*\\.m\\>.*$'\necho\n\necho '[--map-]' guessing parser with adding '*.m' to 'Ada'\necho =======================================\n${CTAGS} --quiet --options=NONE \\\n\t --print-language \\\n\t --map-Ada=+.m \\\n\t ada.m matlab.m objc.m\necho\n\necho '[--map- --guess-language-eagerly]' guessing parser with adding '*.m' to 'Ada'\necho =======================================\n${CTAGS} --quiet --options=NONE \\\n\t --print-language \\\n\t --map-Ada=+.m \\\n\t --guess-language-eagerly \\\n\t ada.m matlab.m objc.m\necho\n\nX=xxxyyyzzz\necho 'Removing multi extension entries'\n${CTAGS} --quiet --options=NONE \\\n\t --map-Pascal=.$X \\\n\t --map-Fortran=.$X \\\n\t --langmap=C:.$X \\\n\t --list-maps | grep $X\n\necho 'Removing multi pattern entries'\n${CTAGS} --quiet --options=NONE \\\n\t --map-Pascal='('$X')' \\\n\t --map-Fortran='('$X')' \\\n\t --langmap=C:'('$X')' \\\n\t --list-maps | grep $X\n" }, { "path": "Tmain/map-removing.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/map-removing.d/stdout-expected.txt", "content": "default map including *.m\n=======================================\nMatLab *.m\nObjectiveC *.mm *.m *.h\n\n[--map-] removing from *.m from ObjectiveC\n=======================================\nMatLab *.m\n\n[--map-] adding *.m to Ada\n=======================================\nAda *.adb *.ads *.Ada *.ada *.m\nMatLab *.m\nObjectiveC *.mm *.m *.h\n\n[--map-] removing from *.m from ObjectiveC, and adding *.m to Ada\n=======================================\nAda *.adb *.ads *.Ada *.ada *.m\nMatLab *.m\n\n[--map-] guessing parser with adding *.m to Ada\n=======================================\nada.m: Ada\nmatlab.m: Ada\nobjc.m: Ada\n\n[--map- --guess-language-eagerly] guessing parser with adding *.m to Ada\n=======================================\nada.m: Ada\nmatlab.m: MatLab\nobjc.m: ObjectiveC\n\nRemoving multi extension entries\nC *.xxxyyyzzz\nRemoving multi pattern entries\nC xxxyyyzzz\n" }, { "path": "Tmain/map-rexpr.d/macros.d/macros.vim", "content": "%vimfiles_root %{_datadir}/vim/vimfiles\n" }, { "path": "Tmain/map-rexpr.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\necho \"# < macros.d/macros.vm\"\n${CTAGS} --quiet --options=NONE --print-language macros.d/macros.vim\n${CTAGS} --quiet --options=NONE -o - macros.d/macros.vim\n\necho \"# cd macros.d; < macros.vim\"\n(\n\tcd macros.d;\n\t${CTAGS} --quiet --options=NONE --print-language macros.vim;\n\t${CTAGS} --quiet --options=NONE -o - macros.vim\n)\n" }, { "path": "Tmain/map-rexpr.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/map-rexpr.d/stdout-expected.txt", "content": "# < macros.d/macros.vm\nmacros.d/macros.vim: RpmMacros\nvimfiles_root\tmacros.d/macros.vim\t/^%vimfiles_root %{_datadir}\\/vim\\/vimfiles$/;\"\tm\n# cd macros.d; < macros.vim\nmacros.vim: Vim\n" }, { "path": "Tmain/maxdepth.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '# DEPTH=1'\n${CTAGS} --quiet --options=NONE --maxdepth=1 -R -o - ./src\necho '# DEPTH=2'\n${CTAGS} --quiet --options=NONE --maxdepth=2 -R -o - ./src\nexit $?\n" }, { "path": "Tmain/maxdepth.d/src/a.c", "content": "int a (void)\n{\n return 0;\n}\n" }, { "path": "Tmain/maxdepth.d/src/subdir/b.c", "content": "int b(void)\n{\n return 0;\n}\n\n" }, { "path": "Tmain/maxdepth.d/stdout-expected.txt", "content": "# DEPTH=1\na\t./src/a.c\t/^int a (void)$/;\"\tf\ttyperef:typename:int\n# DEPTH=2\na\t./src/a.c\t/^int a (void)$/;\"\tf\ttyperef:typename:int\nb\t./src/subdir/b.c\t/^int b(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/mline-no-advance.d/args.ctags", "content": "--mline-regex-FOO=/(.)/\\1/{_advanceTo=1start}\n" }, { "path": "Tmain/mline-no-advance.d/input.foo", "content": "a\n" }, { "path": "Tmain/mline-no-advance.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --options=NONE \\\n\t\t --langdef=FOO \\\n\t\t --map-FOO=+.foo \\\n\t\t --options=./args.ctags \\\n\t\t -o - \\\n\t\t ./input.foo\n" }, { "path": "Tmain/mline-no-advance.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Warning: FOO: no {mgroup=N} flag given in --mline-regex-=/(.)/\\1/{_advanceTo=1start}... (addTagRegexOption)\nctags: Warning: a multi line regex pattern doesn't advance the input cursor: (.)\nctags: Warning: Language: FOO, input file: ./input.foo, pos: 0\n" }, { "path": "Tmain/mtable-avoid-infinite-loop-at-the-eof.d/args.ctags", "content": "--langdef=FOO\n--map-FOO=+.foo\n--_tabledef-FOO=main\n--kinddef-FOO=e,eof,the end of file\n--_mtable-regex-FOO=main//eof/e/\n" }, { "path": "Tmain/mtable-avoid-infinite-loop-at-the-eof.d/input.foo", "content": "" }, { "path": "Tmain/mtable-avoid-infinite-loop-at-the-eof.d/input2.foo", "content": "a" }, { "path": "Tmain/mtable-avoid-infinite-loop-at-the-eof.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --options=NONE --options=./args.ctags --sort=no -o - ./input.foo ./input2.foo\n" }, { "path": "Tmain/mtable-avoid-infinite-loop-at-the-eof.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Warning: Forcefully advance the input pos because\nctags: Warning: following conditions for entering infinite loop are satisfied:\nctags: Warning: + matching the pattern succeeds,\nctags: Warning: + the next table is not given, and\nctags: Warning: + the input file pos doesn't advance.\nctags: Warning: Language: FOO, input file: ./input.foo, pos: 0\nctags: Warning: Forcefully advance the input pos because\nctags: Warning: following conditions for entering infinite loop are satisfied:\nctags: Warning: + matching the pattern succeeds,\nctags: Warning: + the next table is not given, and\nctags: Warning: + the input file pos doesn't advance.\nctags: Warning: Language: FOO, input file: ./input2.foo, pos: 0\nctags: Warning: Forcefully advance the input pos because\nctags: Warning: following conditions for entering infinite loop are satisfied:\nctags: Warning: + matching the pattern succeeds,\nctags: Warning: + the next table is not given, and\nctags: Warning: + the input file pos doesn't advance.\nctags: Warning: Language: FOO, input file: ./input2.foo, pos: 1\n" }, { "path": "Tmain/mtable-avoid-infinite-loop-at-the-eof.d/stdout-expected.txt", "content": "eof\t./input.foo\t/^/;\"\te\neof\t./input2.foo\t/^a/;\"\te\neof\t./input2.foo\t/^a/;\"\te\n" }, { "path": "Tmain/mtable-mutual-entering.d/args.ctags", "content": "--langdef=FOO\n--map-FOO=+.foo\n--_tabledef-FOO=A\n--_tabledef-FOO=B\n\n--_mtable-regex-FOO=A/define (.)/\\1/\n\n--_mtable-regex-FOO=A/([a-z]*)///{tenter=B}\n--_mtable-regex-FOO=B/([a-z]*)///{tenter=A}\n\n\n--langdef=BAR\n--map-BAR=+.bar\n--_tabledef-BAR=C\n--_tabledef-BAR=D\n--_mtable-regex-BAR=C/([a-z]*)///{tenter=D}\n--_mtable-regex-BAR=D/([a-z]*)///{tenter=C}\n\n--langdef=BAZ\n--map-BAZ=+.baz\n--_tabledef-BAZ=E\n--_tabledef-BAZ=F\n--_mtable-regex-BAZ=E/([0-9])///{tenter=F}\n--_mtable-regex-BAZ=F/([0-9])///{tenter=E}\n" }, { "path": "Tmain/mtable-mutual-entering.d/input0.foo", "content": "" }, { "path": "Tmain/mtable-mutual-entering.d/input1.foo", "content": "define x\n" }, { "path": "Tmain/mtable-mutual-entering.d/input2.bar", "content": "" }, { "path": "Tmain/mtable-mutual-entering.d/input3.baz", "content": "0123456789012345678901234567890123456789012345678901234567890123456789\n" }, { "path": "Tmain/mtable-mutual-entering.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --options=NONE --options=./args.ctags -o - \\\n\t\t ./input0.foo ./input1.foo \\\n\t\t ./input2.bar \\\n\t\t ./input3.baz\n" }, { "path": "Tmain/mtable-mutual-entering.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Warning: mtable: the tenter/tleave stack overflows at 0 in ./input0.foo\nctags: Warning: DUMP FROM THE TOP:\nctags: Warning: 64 A\nctags: Warning: 63 B\nctags: Warning: 62 A\nctags: Warning: 61 B\nctags: Warning: 60 A\nctags: Warning: 59 B\nctags: Warning: 58 A\nctags: Warning: 57 B\nctags: Warning: 56 A\nctags: Warning: 55 B\nctags: Warning: 54 A\nctags: Warning: 53 B\nctags: Warning: 52 A\nctags: Warning: 51 B\nctags: Warning: 50 A\nctags: Warning: 49 B\nctags: Warning: 48 A\nctags: Warning: 47 B\nctags: Warning: 46 A\nctags: Warning: 45 B\nctags: Warning: 44 A\nctags: Warning: 43 B\nctags: Warning: 42 A\nctags: Warning: 41 B\nctags: Warning: 40 A\nctags: Warning: 39 B\nctags: Warning: 38 A\nctags: Warning: 37 B\nctags: Warning: 36 A\nctags: Warning: 35 B\nctags: Warning: 34 A\nctags: Warning: 33 B\nctags: Warning: 32 A\nctags: Warning: 31 B\nctags: Warning: 30 A\nctags: Warning: 29 B\nctags: Warning: 28 A\nctags: Warning: 27 B\nctags: Warning: 26 A\nctags: Warning: 25 B\nctags: Warning: 24 A\nctags: Warning: 23 B\nctags: Warning: 22 A\nctags: Warning: 21 B\nctags: Warning: 20 A\nctags: Warning: 19 B\nctags: Warning: 18 A\nctags: Warning: 17 B\nctags: Warning: 16 A\nctags: Warning: 15 B\nctags: Warning: 14 A\nctags: Warning: 13 B\nctags: Warning: 12 A\nctags: Warning: 11 B\nctags: Warning: 10 A\nctags: Warning: 9 B\nctags: Warning: 8 A\nctags: Warning: 7 B\nctags: Warning: 6 A\nctags: Warning: 5 B\nctags: Warning: 4 A\nctags: Warning: 3 B\nctags: Warning: 2 A\nctags: Warning: 1 B\nctags: Warning: 0 A\nctags: Warning: mtable: the tenter/tleave stack overflows at 8 in ./input1.foo\nctags: Warning: DUMP FROM THE TOP:\nctags: Warning: 64 A\nctags: Warning: 63 B\nctags: Warning: 62 A\nctags: Warning: 61 B\nctags: Warning: 60 A\nctags: Warning: 59 B\nctags: Warning: 58 A\nctags: Warning: 57 B\nctags: Warning: 56 A\nctags: Warning: 55 B\nctags: Warning: 54 A\nctags: Warning: 53 B\nctags: Warning: 52 A\nctags: Warning: 51 B\nctags: Warning: 50 A\nctags: Warning: 49 B\nctags: Warning: 48 A\nctags: Warning: 47 B\nctags: Warning: 46 A\nctags: Warning: 45 B\nctags: Warning: 44 A\nctags: Warning: 43 B\nctags: Warning: 42 A\nctags: Warning: 41 B\nctags: Warning: 40 A\nctags: Warning: 39 B\nctags: Warning: 38 A\nctags: Warning: 37 B\nctags: Warning: 36 A\nctags: Warning: 35 B\nctags: Warning: 34 A\nctags: Warning: 33 B\nctags: Warning: 32 A\nctags: Warning: 31 B\nctags: Warning: 30 A\nctags: Warning: 29 B\nctags: Warning: 28 A\nctags: Warning: 27 B\nctags: Warning: 26 A\nctags: Warning: 25 B\nctags: Warning: 24 A\nctags: Warning: 23 B\nctags: Warning: 22 A\nctags: Warning: 21 B\nctags: Warning: 20 A\nctags: Warning: 19 B\nctags: Warning: 18 A\nctags: Warning: 17 B\nctags: Warning: 16 A\nctags: Warning: 15 B\nctags: Warning: 14 A\nctags: Warning: 13 B\nctags: Warning: 12 A\nctags: Warning: 11 B\nctags: Warning: 10 A\nctags: Warning: 9 B\nctags: Warning: 8 A\nctags: Warning: 7 B\nctags: Warning: 6 A\nctags: Warning: 5 B\nctags: Warning: 4 A\nctags: Warning: 3 B\nctags: Warning: 2 A\nctags: Warning: 1 B\nctags: Warning: 0 A\nctags: Warning: mtable: the tenter/tleave stack overflows at 0 in ./input2.bar\nctags: Warning: DUMP FROM THE TOP:\nctags: Warning: 64 C\nctags: Warning: 63 D\nctags: Warning: 62 C\nctags: Warning: 61 D\nctags: Warning: 60 C\nctags: Warning: 59 D\nctags: Warning: 58 C\nctags: Warning: 57 D\nctags: Warning: 56 C\nctags: Warning: 55 D\nctags: Warning: 54 C\nctags: Warning: 53 D\nctags: Warning: 52 C\nctags: Warning: 51 D\nctags: Warning: 50 C\nctags: Warning: 49 D\nctags: Warning: 48 C\nctags: Warning: 47 D\nctags: Warning: 46 C\nctags: Warning: 45 D\nctags: Warning: 44 C\nctags: Warning: 43 D\nctags: Warning: 42 C\nctags: Warning: 41 D\nctags: Warning: 40 C\nctags: Warning: 39 D\nctags: Warning: 38 C\nctags: Warning: 37 D\nctags: Warning: 36 C\nctags: Warning: 35 D\nctags: Warning: 34 C\nctags: Warning: 33 D\nctags: Warning: 32 C\nctags: Warning: 31 D\nctags: Warning: 30 C\nctags: Warning: 29 D\nctags: Warning: 28 C\nctags: Warning: 27 D\nctags: Warning: 26 C\nctags: Warning: 25 D\nctags: Warning: 24 C\nctags: Warning: 23 D\nctags: Warning: 22 C\nctags: Warning: 21 D\nctags: Warning: 20 C\nctags: Warning: 19 D\nctags: Warning: 18 C\nctags: Warning: 17 D\nctags: Warning: 16 C\nctags: Warning: 15 D\nctags: Warning: 14 C\nctags: Warning: 13 D\nctags: Warning: 12 C\nctags: Warning: 11 D\nctags: Warning: 10 C\nctags: Warning: 9 D\nctags: Warning: 8 C\nctags: Warning: 7 D\nctags: Warning: 6 C\nctags: Warning: 5 D\nctags: Warning: 4 C\nctags: Warning: 3 D\nctags: Warning: 2 C\nctags: Warning: 1 D\nctags: Warning: 0 C\nctags: Warning: mtable: the tenter/tleave stack overflows at 65 in ./input3.baz\nctags: Warning: DUMP FROM THE TOP:\nctags: Warning: 64 E\nctags: Warning: 63 F\nctags: Warning: 62 E\nctags: Warning: 61 F\nctags: Warning: 60 E\nctags: Warning: 59 F\nctags: Warning: 58 E\nctags: Warning: 57 F\nctags: Warning: 56 E\nctags: Warning: 55 F\nctags: Warning: 54 E\nctags: Warning: 53 F\nctags: Warning: 52 E\nctags: Warning: 51 F\nctags: Warning: 50 E\nctags: Warning: 49 F\nctags: Warning: 48 E\nctags: Warning: 47 F\nctags: Warning: 46 E\nctags: Warning: 45 F\nctags: Warning: 44 E\nctags: Warning: 43 F\nctags: Warning: 42 E\nctags: Warning: 41 F\nctags: Warning: 40 E\nctags: Warning: 39 F\nctags: Warning: 38 E\nctags: Warning: 37 F\nctags: Warning: 36 E\nctags: Warning: 35 F\nctags: Warning: 34 E\nctags: Warning: 33 F\nctags: Warning: 32 E\nctags: Warning: 31 F\nctags: Warning: 30 E\nctags: Warning: 29 F\nctags: Warning: 28 E\nctags: Warning: 27 F\nctags: Warning: 26 E\nctags: Warning: 25 F\nctags: Warning: 24 E\nctags: Warning: 23 F\nctags: Warning: 22 E\nctags: Warning: 21 F\nctags: Warning: 20 E\nctags: Warning: 19 F\nctags: Warning: 18 E\nctags: Warning: 17 F\nctags: Warning: 16 E\nctags: Warning: 15 F\nctags: Warning: 14 E\nctags: Warning: 13 F\nctags: Warning: 12 E\nctags: Warning: 11 F\nctags: Warning: 10 E\nctags: Warning: 9 F\nctags: Warning: 8 E\nctags: Warning: 7 F\nctags: Warning: 6 E\nctags: Warning: 5 F\nctags: Warning: 4 E\nctags: Warning: 3 F\nctags: Warning: 2 E\nctags: Warning: 1 F\nctags: Warning: 0 E\n" }, { "path": "Tmain/mtable-mutual-entering.d/stdout-expected.txt", "content": "x\t./input1.foo\t/^define x$/;\"\tr\n" }, { "path": "Tmain/mtable-pinning.d/args.ctags", "content": "--langdef=FOO\n--map-FOO=+.foo\n--_tabledef-FOO=A\n--_tabledef-FOO=B\n\n--_mtable-regex-FOO=A/x//{tjump=B}{_advanceTo=0start}\n--_mtable-regex-FOO=B/x//{tjump=A}{_advanceTo=0start}\n\n--_mtable-regex-FOO=A/y//{tjump=A}{_advanceTo=0start}\n" }, { "path": "Tmain/mtable-pinning.d/input0.foo", "content": "x\n" }, { "path": "Tmain/mtable-pinning.d/input1.foo", "content": "y\n" }, { "path": "Tmain/mtable-pinning.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --options=NONE --options=./args.ctags -o - \\\n\t\t ./input0.foo \\\n\t\t ./input1.foo\n" }, { "path": "Tmain/mtable-pinning.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Warning: mtable: the input cursor stays at 0 in ./input0.foo so long though the tables are switched\nctags: Warning: mtable: the input cursor stays at 0 in ./input1.foo so long though the tables are switched\n" }, { "path": "Tmain/mtable-stats.d/args.ctags", "content": "--langdef=FOO\n--map-FOO=+.foo\n\n--kinddef-FOO=n,namespace,namespaces\n--kinddef-FOO=c,class,classes\n--kinddef-FOO=v,variable,variables\n\n--_tabledef-FOO=main\n--_tabledef-FOO=block\n--_tabledef-FOO=blockEnd\n--_tabledef-FOO=skipWhitespace\n\n--_mtable-regex-FOO=skipWhitespace/[ \\t\\n]+//\n\n--_mtable-regex-FOO=main/namespace ([a-zA-Z]+) \\{/\\1/n/{tenter=block,blockEnd}{scope=push}\n--_mtable-extend-FOO=main+skipWhitespace\n--_mtable-regex-FOO=main///\n\n--_mtable-regex-FOO=blockEnd/\\};?//{scope=pop}\n--_mtable-extend-FOO=blockEnd+skipWhitespace\n\n--_mtable-regex-FOO=block/class ([a-zA-Z]+) \\{/\\1/c/{tenter=block,blockEnd}{scope=ref}{scope=push}\n--_mtable-regex-FOO=block/var ([a-zA-Z]+) ([a-zA-Z]+);/\\2/v/{scope=ref}\n--_mtable-extend-FOO=block+skipWhitespace\n" }, { "path": "Tmain/mtable-stats.d/input.foo", "content": "namespace A {\n\tclass B {\n\t\tvar bool C;\n\t};\n}\n" }, { "path": "Tmain/mtable-stats.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nstats=/tmp/ctags-Tmain-$$\n${CTAGS} --quiet --options=NONE --options=./args.ctags --totals=extra -o - ./input.foo 2> ${stats}\nsed -n -e '/^MTABLE REGEX.*/,$p' ${stats} 1>&2\nrm ${stats}\n" }, { "path": "Tmain/mtable-stats.d/stderr-expected.txt", "content": "MTABLE REGEX STATISTICS of FOO\n==============================================\nmain\n-----------------------\n 1/1 ^namespace ([a-zA-Z]+) \\\\{ ref: 1\n 0/0 ^[ \\t\\n]+ ref: 4\n 0/0 ^ ref: 1\n\nblock\n-----------------------\n 1/6 ^class ([a-zA-Z]+) \\\\{ ref: 1\n 1/5 ^var ([a-zA-Z]+) ([a-zA-Z]+); ref: 1\n 3/4 ^[ \\t\\n]+ ref: 4\n\nblockEnd\n-----------------------\n 2/6 ^\\\\};? ref: 1\n 2/4 ^[ \\t\\n]+ ref: 4\n\nskipWhitespace\n-----------------------\n 0/0 ^[ \\t\\n]+ ref: 4\n\n" }, { "path": "Tmain/mtable-stats.d/stdout-expected.txt", "content": "A\t./input.foo\t/^namespace A {$/;\"\tn\nB\t./input.foo\t/^\tclass B {$/;\"\tc\tnamespace:A\nC\t./input.foo\t/^\t\tvar bool C;$/;\"\tv\tclass:A.B\n" }, { "path": "Tmain/multi-roles.d/input.x", "content": "r\nR\n" }, { "path": "Tmain/multi-roles.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\necho '# rolesDisabled is kept disabled'\n$CTAGS --quiet --options=NONE --sort=no --language-force=CTagsSelfTest --extras=r --fields=Kr -o - input.x\necho '# rolesDisabled is enabled'\n$CTAGS --quiet --options=NONE --sort=no --language-force=CTagsSelfTest --extras=r --fields=Kr --kinds-CTagsSelfTest=+R -o - input.x\n\nexit $?\n" }, { "path": "Tmain/multi-roles.d/stdout-expected.txt", "content": "# rolesDisabled is kept disabled\nmultiRolesTarget\tinput.x\t/^r$/;\"\troles\troles:a,b,d\n# rolesDisabled is enabled\nmultiRolesTarget\tinput.x\t/^r$/;\"\troles\troles:a,b,d\nmultiRolesDisabledTarget\tinput.x\t/^R$/;\"\trolesDisabled\troles:A\nmultiRolesDisabledTarget\tinput.x\t/^R$/;\"\trolesDisabled\troles:B\n" }, { "path": "Tmain/nameless-long-option.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/nameless-long-option.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --options=NONE --\nexit $?\n" }, { "path": "Tmain/nameless-long-option.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Unknown option: --\n" }, { "path": "Tmain/nameless-long-option.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/nested-mio.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/nested-mio.d/input.cst", "content": "B\nN\nE\n" }, { "path": "Tmain/nested-mio.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --options=NONE -o - --extras=+g --language-force=CTagsSelfTest input.cst\nexit $?\n" }, { "path": "Tmain/nested-mio.d/stdout-expected.txt", "content": "NOTHING_SPECIAL\tinput.cst\t/^N$/;\"\tN\n" }, { "path": "Tmain/nested-subparsers-multilines.d/event.ctags", "content": "--langdef=Event{base=C}\n--kinddef-Event=e,event,events\n--mline-regex-Event=/DEFINE_EVENT\\(([^;]|[[:space:]])*[[:space:],]([a-zA-Z_][a-zA-Z0-9_]*)\\);/\\2/e/{mgroup=1}\n" }, { "path": "Tmain/nested-subparsers-multilines.d/hook.ctags", "content": "--langdef=Hook{base=Event}\n--kinddef-Hook=h,hook,hooks\n--mline-regex-Hook=/DEFINE_HOOK\\(([^;]|[[:space:]])*[[:space:],]([a-zA-Z_][a-zA-Z0-9_]*)\\);/\\2/h/{mgroup=1}\n\n\n" }, { "path": "Tmain/nested-subparsers-multilines.d/input.c", "content": "DEFINE_EVENT(a,\n\t\t\t b);\n\nDEFINE_HOOK(h,\n\t\t\ti);\n\nint\nmain(void)\n{\n}\n" }, { "path": "Tmain/nested-subparsers-multilines.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n${CTAGS} --quiet --options=NONE \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --fields=+lK \\\n\t\t -o - input.c\n" }, { "path": "Tmain/nested-subparsers-multilines.d/stdout-expected.txt", "content": "b\tinput.c\t/^\t\t\t b);$/;\"\tevent\tlanguage:Event\ni\tinput.c\t/^\t\t\ti);$/;\"\thook\tlanguage:Hook\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\n" }, { "path": "Tmain/nested-subparsers.d/event.ctags", "content": "--langdef=Event{base=C}\n--kinddef-Event=e,event,events\n--regex-Event=/DEFINE_EVENT\\((.*)\\);/\\1/e/\n" }, { "path": "Tmain/nested-subparsers.d/hook.ctags", "content": "--langdef=Hook{base=Event}\n--kinddef-Hook=h,hook,hooks\n--regex-Hook=/DEFINE_HOOK\\((.*)\\);/\\1/h/'\n\n" }, { "path": "Tmain/nested-subparsers.d/input.c", "content": "DEFINE_EVENT(a);\nDEFINE_EVENT(b);\nDEFINE_HOOK(h);\nDEFINE_HOOK(i);\nint\nmain(void)\n{\n\tLOAD_PLUGIN(mylib.so, isearch);\n\tint u __attribute__((unused));\n}\n" }, { "path": "Tmain/nested-subparsers.d/plugin.ctags", "content": "--langdef=Plugin{base=C}\n--kinddef-Plugin=f,File,files\n--kinddef-Plugin=n,name,name\n--regex-Plugin=/LOAD_PLUGIN\\((.*),[ \\t]*(.*)\\);/\\1/f/\n--regex-Plugin=/LOAD_PLUGIN\\((.*),[ \\t]*(.*)\\);/\\2/n/\n" }, { "path": "Tmain/nested-subparsers.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE --fields=+lK\"\n\nlist_kinds()\n{\n\techo '#'\n\techo '#' list kinds$2 $1\n\techo '#'\n\t${CTAGS} -o - \\\n\t\t\t --options=./event.ctags \\\n\t\t\t --options=./hook.ctags \\\n\t\t\t --options=./plugin.ctags \\\n\t\t\t --list-kinds$2=$1\n}\n\nlist_kinds C\nlist_kinds Event\nlist_kinds Hook\nlist_kinds Plugin\n\nlist_kinds C -full\nlist_kinds Event -full\nlist_kinds Hook -full\nlist_kinds Plugin -full\n\necho C only\n${CTAGS} -o - input.c\n\necho\necho C + EVENT\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t input.c\n\n\necho\necho C + EVENT + HOOK\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t input.c\n\necho\necho C + EVENT + HOOK + PLUGIN\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t input.c\n\necho\necho C + EVENT + HOOK + PLUGIN + UA\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t input.c\n\necho\necho 'C(disabled)' + EVENT + HOOK + PLUGIN + UA\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --languages=-C \\\n\t\t input.c\n\necho\necho C + 'EVENT(disabled)' + HOOK + PLUGIN + UA\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --languages=-Event \\\n\t\t input.c\n\necho\necho C + 'EVENT' + 'HOOK(disabled)' + PLUGIN + UA\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --languages=-Hook \\\n\t\t input.c\n\necho\necho C + 'EVENT' + 'HOOK' + PLUGIN + 'UA(-v)'\n${CTAGS} -o - \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --kinds-UnusedAttr=-v \\\n\t\t input.c\n\necho List subparsers of C '(' 'EVENT' + 'HOOK' + PLUGIN + 'UA' ')'\n${CTAGS} \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --list-subparsers=C\n\necho List subparsers of C '(' 'EVENT' + 'HOOK' + PLUGIN + 'UA' ')' without the header\n${CTAGS} --with-list-header=no \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --list-subparsers=C\n\necho List subparsers of C '(' 'EVENT' + 'HOOK' + PLUGIN + 'UA' ')' in machinable\n${CTAGS} \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --machinable \\\n\t\t --list-subparsers=C\n\necho List subparsers of C '(' 'EVENT' + 'HOOK' + PLUGIN + 'UA' ')' in machinable without the header\n${CTAGS} --with-list-header=no \\\n\t\t --options=./event.ctags \\\n\t\t --options=./hook.ctags \\\n\t\t --options=./plugin.ctags \\\n\t\t --options=./unused-attr.ctags \\\n\t\t --machinable \\\n\t\t --list-subparsers=C\n" }, { "path": "Tmain/nested-subparsers.d/stdout-expected.txt", "content": "#\n# list kinds C\n#\nd macro definitions\ne enumerators (values inside an enumeration)\nf function definitions\ng enumeration names\nh included header files\nl local variables [off]\nm struct, and union members\np function prototypes [off]\ns structure names\nt typedefs\nu union names\nv variable definitions\nx external and forward variable declarations [off]\nz function parameters inside function or prototype definitions [off]\nL goto labels [off]\nD parameters inside macro definitions [off]\n#\n# list kinds Event\n#\ne events\n#\n# list kinds Hook\n#\nh hooks\n#\n# list kinds Plugin\n#\nf files\nn name\n#\n# list kinds-full C\n#\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nD macroparam no no 0 C 0 parameters inside macro definitions\nL label no no 0 C 0 goto labels\nd macro yes no 2 C 0 macro definitions\ne enumerator yes no 0 C 0 enumerators (values inside an enumeration)\nf function yes no 2 C 0 function definitions\ng enum yes no 0 C 0 enumeration names\nh header yes yes 2 C 0 included header files\nl local no no 0 C 0 local variables\nm member yes no 0 C 0 struct, and union members\np prototype no no 0 C 0 function prototypes\ns struct yes no 1 C 0 structure names\nt typedef yes no 0 C 0 typedefs\nu union yes no 0 C 0 union names\nv variable yes no 0 C 0 variable definitions\nx externvar no no 0 C 0 external and forward variable declarations\nz parameter no no 0 C 0 function parameters inside function or prototype definitions\n#\n# list kinds-full Event\n#\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\ne event yes no 0 NONE 0 events\n#\n# list kinds-full Hook\n#\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nh hook yes no 0 NONE 0 hooks\n#\n# list kinds-full Plugin\n#\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nf File yes no 0 NONE 0 files\nn name yes no 0 NONE 0 name\nC only\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\n\nC + EVENT\na\tinput.c\t/^DEFINE_EVENT(a);$/;\"\tevent\tlanguage:Event\nb\tinput.c\t/^DEFINE_EVENT(b);$/;\"\tevent\tlanguage:Event\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\n\nC + EVENT + HOOK\na\tinput.c\t/^DEFINE_EVENT(a);$/;\"\tevent\tlanguage:Event\nb\tinput.c\t/^DEFINE_EVENT(b);$/;\"\tevent\tlanguage:Event\nh\tinput.c\t/^DEFINE_HOOK(h);$/;\"\thook\tlanguage:Hook\ni\tinput.c\t/^DEFINE_HOOK(i);$/;\"\thook\tlanguage:Hook\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\n\nC + EVENT + HOOK + PLUGIN\na\tinput.c\t/^DEFINE_EVENT(a);$/;\"\tevent\tlanguage:Event\nb\tinput.c\t/^DEFINE_EVENT(b);$/;\"\tevent\tlanguage:Event\nh\tinput.c\t/^DEFINE_HOOK(h);$/;\"\thook\tlanguage:Hook\ni\tinput.c\t/^DEFINE_HOOK(i);$/;\"\thook\tlanguage:Hook\nisearch\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tname\tlanguage:Plugin\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\nmylib.so\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tFile\tlanguage:Plugin\n\nC + EVENT + HOOK + PLUGIN + UA\na\tinput.c\t/^DEFINE_EVENT(a);$/;\"\tevent\tlanguage:Event\nb\tinput.c\t/^DEFINE_EVENT(b);$/;\"\tevent\tlanguage:Event\nh\tinput.c\t/^DEFINE_HOOK(h);$/;\"\thook\tlanguage:Hook\ni\tinput.c\t/^DEFINE_HOOK(i);$/;\"\thook\tlanguage:Hook\nisearch\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tname\tlanguage:Plugin\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\nmylib.so\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tFile\tlanguage:Plugin\nu\tinput.c\t/^\tint u __attribute__((unused));$/;\"\tvaraible\tlanguage:UnusedAttr\n\nC(disabled) + EVENT + HOOK + PLUGIN + UA\n\nC + EVENT(disabled) + HOOK + PLUGIN + UA\nisearch\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tname\tlanguage:Plugin\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\nmylib.so\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tFile\tlanguage:Plugin\n\nC + EVENT + HOOK(disabled) + PLUGIN + UA\na\tinput.c\t/^DEFINE_EVENT(a);$/;\"\tevent\tlanguage:Event\nb\tinput.c\t/^DEFINE_EVENT(b);$/;\"\tevent\tlanguage:Event\nisearch\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tname\tlanguage:Plugin\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\nmylib.so\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tFile\tlanguage:Plugin\nu\tinput.c\t/^\tint u __attribute__((unused));$/;\"\tvaraible\tlanguage:UnusedAttr\n\nC + EVENT + HOOK + PLUGIN + UA(-v)\na\tinput.c\t/^DEFINE_EVENT(a);$/;\"\tevent\tlanguage:Event\nb\tinput.c\t/^DEFINE_EVENT(b);$/;\"\tevent\tlanguage:Event\nh\tinput.c\t/^DEFINE_HOOK(h);$/;\"\thook\tlanguage:Hook\ni\tinput.c\t/^DEFINE_HOOK(i);$/;\"\thook\tlanguage:Hook\nisearch\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tname\tlanguage:Plugin\nmain\tinput.c\t/^main(void)$/;\"\tfunction\tlanguage:C\ttyperef:typename:int\nmylib.so\tinput.c\t/^\tLOAD_PLUGIN(mylib.so, isearch);$/;\"\tFile\tlanguage:Plugin\nList subparsers of C ( EVENT + HOOK + PLUGIN + UA )\n#NAME BASEPARSER DIRECTIONS\nEvent C base => sub {shared}\nJNI C base <> sub {bidirectional}\nPlugin C base => sub {shared}\nList subparsers of C ( EVENT + HOOK + PLUGIN + UA ) without the header\nEvent C base => sub {shared}\nJNI C base <> sub {bidirectional}\nPlugin C base => sub {shared}\nList subparsers of C ( EVENT + HOOK + PLUGIN + UA ) in machinable\n#NAME\tBASEPARSER\tDIRECTIONS\nEvent\tC\tbase => sub {shared}\nJNI\tC\tbase <> sub {bidirectional}\nPlugin\tC\tbase => sub {shared}\nList subparsers of C ( EVENT + HOOK + PLUGIN + UA ) in machinable without the header\nEvent\tC\tbase => sub {shared}\nJNI\tC\tbase <> sub {bidirectional}\nPlugin\tC\tbase => sub {shared}\n" }, { "path": "Tmain/nested-subparsers.d/unused-attr.ctags", "content": "--langdef=UnusedAttr{base=Event}\n--kinddef-UnusedAttr=v,varaible,unsed variable\n--regex-UnusedAttr=/([a-zA-Z][0-9a-zA-Z]*)[ \\t]+__attribute__\\(\\(unused\\)\\);/\\1/v/\n" }, { "path": "Tmain/no-empty-tag.d/input-0.mak", "content": "-include *.d\n" }, { "path": "Tmain/no-empty-tag.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --options=NONE -o - input-0.mak > /dev/null\n" }, { "path": "Tmain/no-empty-tag.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n" }, { "path": "Tmain/no-input-encoding-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/no-input-encoding-option.d/input.java", "content": "class Foo { // FooNX\n\tpublic Foo() { // RXgN^\n\t}\n}\n" }, { "path": "Tmain/no-input-encoding-option.d/input.js", "content": "var a = 1; // ѿ\n" }, { "path": "Tmain/no-input-encoding-option.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nif ${CTAGS} --quiet --options=NONE --list-features | grep -q iconv; then\n check_encoding utf-8\n ${CTAGS} --quiet --options=NONE --output-encoding=utf-8 -o $BUILDDIR/tags input.js input.java\n exit $?\nelse\n skip \"iconv feature is not available\"\nfi\n" }, { "path": "Tmain/no-input-encoding-option.d/stderr-expected.txt", "content": "ctags: Warning: --input-encoding is not specified\n" }, { "path": "Tmain/no-input-encoding-option.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/notice-about-broken-symlink.d/.gitignore", "content": "broken-symlink.c\n" }, { "path": "Tmain/notice-about-broken-symlink.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\nSF=broken-symlink.c\n\n# See https://www.msys2.org/docs/symlinks/\nskip_if_running_on_msys\n\ncleanup()\n{\n\trm -f \"$SF\"\n}\n\ntrap cleanup EXIT\n\ncleanup\nif ! ln -s no-such-file.c \"$SF\"; then\n\tskip \"failed to create a symbolic link\"\nfi\n\necho '# broken-symlink.c + no option' 1>&2\n$CTAGS --options=NONE -o - broken-symlink.c\n\necho '# broken-symlink.c + --quiet option' 1>&2\n$CTAGS --quiet --options=NONE -o - broken-symlink.c\n\necho '# no-such-file.c + no option' 1>&2\n$CTAGS --options=NONE -o - no-such-file.c\n\necho '# no-such-file.c + --quiet option' 1>&2\n$CTAGS --quiet --options=NONE -o - no-such-file.c\n" }, { "path": "Tmain/notice-about-broken-symlink.d/stderr-expected.txt", "content": "# broken-symlink.c + no option\nctags: Notice: No options will be read from files or environment\nctags: Notice: cannot open input file \"broken-symlink.c\" : No such file or directory\n# broken-symlink.c + --quiet option\n# no-such-file.c + no option\nctags: Notice: No options will be read from files or environment\nctags: Warning: cannot open input file \"no-such-file.c\" : No such file or directory\n# no-such-file.c + --quiet option\nctags: Warning: cannot open input file \"no-such-file.c\" : No such file or directory\n" }, { "path": "Tmain/null-description-in-pseudo-tag.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/null-description-in-pseudo-tag.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE -o - \\\n\t --langdef=XYZ --regex-XYZ='/aaaaaaaaaaaaaaaaaaaaa/\\0/x/' \\\n\t --language-force=XYZ --pseudo-tags='TAG_KIND_DESCRIPTION' --extras=p \\\n\t run.sh\n" }, { "path": "Tmain/null-description-in-pseudo-tag.d/stdout-expected.txt", "content": "!_TAG_KIND_DESCRIPTION!XYZ\tx,regex\t/regex/\n" }, { "path": "Tmain/nulltag-extra.d/input.cst", "content": "Z\nz\n\n" }, { "path": "Tmain/nulltag-extra.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n# The order of stdout and stderr lines is not stable.\nexit_if_win32 \"$CTAGS\"\n\n# is_feature_available $CTAGS json\n\nO=\"--options=NONE --language-force=CTagsSelfTest\"\n\nfor fmt in xref; do\n\techo \"# no extra ($fmt)\"\n\t${CTAGS} $O -o - --output-format=\"$fmt\" input.cst 2>&1\n\n\techo \"# drop '0' extra ($fmt)\"\n\t${CTAGS} $O -o - --output-format=\"$fmt\" --extras=-z input.cst 2>&1\n\n\techo \"# drop '{nulltag}' extra ($fmt)\"\n\t${CTAGS} $O -o - --output-format=\"$fmt\" --extras=-'{nulltag}' input.cst 2>&1\n\n\techo '# with --extras=+0 ($fmt)'\n\t${CTAGS} $O -o - --output-format=\"$fmt\" --extras=+z input.cst 2>&1\n\n\techo \"# with --extras=+{nulltag}' ($fmt)\"\n\t${CTAGS} $O -o - --output-format=\"$fmt\" --extras=+'{nulltag}' input.cst 2>&1\ndone | sed -e 's/\\.exe//'\n" }, { "path": "Tmain/nulltag-extra.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/nulltag-extra.d/stdout-expected.txt", "content": "# no extra (xref)\nctags: Notice: No options will be read from files or environment\nctags: Notice: ignoring null tag in input.cst(line: 1, language: CTagsSelfTest)\n# drop '0' extra (xref)\nctags: Notice: No options will be read from files or environment\nctags: Notice: ignoring null tag in input.cst(line: 1, language: CTagsSelfTest)\n# drop '{nulltag}' extra (xref)\nctags: Notice: No options will be read from files or environment\nctags: Notice: ignoring null tag in input.cst(line: 1, language: CTagsSelfTest)\n# with --extras=+0 ($fmt)\nctags: Notice: No options will be read from files or environment\nctags: Notice: ignoring null tag in input.cst(line: 1, language: CTagsSelfTest)\n emitNullTag 2 input.cst z\n# with --extras=+{nulltag}' (xref)\nctags: Notice: No options will be read from files or environment\nctags: Notice: ignoring null tag in input.cst(line: 1, language: CTagsSelfTest)\n emitNullTag 2 input.cst z\n" }, { "path": "Tmain/omit-long-patterns-etags.d/input.sh", "content": " func96()\n{\n\n}\n func95()\n{\n\n}\n func97()\n{\n\n}\n\nfunc96\nfunc95\nfunc97\n" }, { "path": "Tmain/omit-long-patterns-etags.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n# strlen (\"func95()\") => 8\n${CTAGS} --quiet --options=NONE --pattern-length-limit=`expr 96 + 8` -e -o - ./input.sh\n" }, { "path": "Tmain/omit-long-patterns-etags.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/omit-long-patterns-etags.d/stdout-expected.txt", "content": "\f\ninput.sh,351\n func96()func96\u00011,0\n func95()func95\u00015,110\n func97(func97\u00019,219\n" }, { "path": "Tmain/omit-long-patterns.d/gen.sh", "content": "#!/bin/sh\nlimit=96\ncalls=\n\nl=$limit\nfor i in $(seq $l); do\n echo -n ' '\ndone\necho \"func$l()\"\necho \"{\"\necho\necho \"}\"\ncalls=\"$calls func$l\"\n\nl=$(expr $limit - 1)\nfor i in $(seq $l); do\n echo -n ' '\ndone\necho \"func$l()\"\necho \"{\"\necho\necho \"}\"\ncalls=\"$calls func$l\"\n\nl=$(expr $limit + 1)\nfor i in $(seq $l); do\n echo -n ' '\ndone\necho \"func$l()\"\necho \"{\"\necho\necho \"}\"\ncalls=\"$calls func$l\"\n\necho\n\nfor c in $calls; do\n echo $c\ndone\n" }, { "path": "Tmain/omit-long-patterns.d/input.sh", "content": " func96()\n{\n\n}\n func95()\n{\n\n}\n func97()\n{\n\n}\n\nfunc96\nfunc95\nfunc97\n" }, { "path": "Tmain/omit-long-patterns.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n${CTAGS} --options=NONE -o - ./input.sh\n" }, { "path": "Tmain/omit-long-patterns.d/stdout-expected.txt", "content": "func95\t./input.sh\t/^ f/;\"\tf\nfunc96\t./input.sh\t/^ /;\"\tf\nfunc97\t./input.sh\t/^ /;\"\tf\n" }, { "path": "Tmain/option-dump-keywords.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\n${CTAGS} \\\n\t--quiet --options=NONE \\\n\t--_force-initializing --_dump-keywords --_force-quit \\\n\t| grep -i ObjectiveC | sort\n" }, { "path": "Tmain/option-dump-keywords.d/stdout-expected.txt", "content": "@class\tObjectiveC\n@defs\tObjectiveC\n@dynamic\tObjectiveC\n@encode\tObjectiveC\n@end\tObjectiveC\n@implementation\tObjectiveC\n@interface\tObjectiveC\n@optional\tObjectiveC\n@package\tObjectiveC\n@private\tObjectiveC\n@property\tObjectiveC\n@protected\tObjectiveC\n@protocol\tObjectiveC\n@public\tObjectiveC\n@required\tObjectiveC\n@selector\tObjectiveC\n@synchronized\tObjectiveC\n@synthesize\tObjectiveC\nenum\tObjectiveC\nextern\tObjectiveC\nstruct\tObjectiveC\ntypedef\tObjectiveC\n" }, { "path": "Tmain/option-dump-options.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\n${CTAGS} \\\n\t--quiet --options=NONE \\\n\t--_dump-options --_force-quit | grep -e '_dump-options'\n" }, { "path": "Tmain/option-dump-options.d/stdout-expected.txt", "content": "_dump-options\n" }, { "path": "Tmain/option-echo-and-force-quit.d/exit-expected.txt", "content": "21\n" }, { "path": "Tmain/option-echo-and-force-quit.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n# --quiet cannot be used in this test case.\n${CTAGS} --options=NONE --_echo=a --_echo=b --_force-quit=21 --_echo=b\n\n" }, { "path": "Tmain/option-echo-and-force-quit.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Notice: a\nctags: Notice: b\n" }, { "path": "Tmain/option-echo-and-force-quit.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/option-exclude-exception.d/input.d/bazel-x/x.c", "content": "int x = 1;\n" }, { "path": "Tmain/option-exclude-exception.d/input.d/bazel-y/y.c", "content": "int y = 1;\n" }, { "path": "Tmain/option-exclude-exception.d/input.d/bazel-z/z.c", "content": "int z = 1;\n" }, { "path": "Tmain/option-exclude-exception.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n${CTAGS} --quiet --options=NONE -o - -R --exclude='*/bazel-*' \\\n\t\t --exclude-exception='*/bazel-x/*' \\\n\t\t --exclude-exception='*/bazel-z/*' \\\n\t\t input.d\n" }, { "path": "Tmain/option-exclude-exception.d/stdout-expected.txt", "content": "x\tinput.d/bazel-x/x.c\t/^int x = 1;$/;\"\tv\ttyperef:typename:int\nz\tinput.d/bazel-z/z.c\t/^int z = 1;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Tmain/option-exclude-including-fsep.d/input.d/bazel-x/x.c", "content": "int x = 1;\n" }, { "path": "Tmain/option-exclude-including-fsep.d/input.d/bazel-y/y.c", "content": "int y = 1;\n" }, { "path": "Tmain/option-exclude-including-fsep.d/input.d/bazel-z/z.c", "content": "int z = 1;\n" }, { "path": "Tmain/option-exclude-including-fsep.d/input.d/labze-a/a.c", "content": "int a = 3;\n\n" }, { "path": "Tmain/option-exclude-including-fsep.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n${CTAGS} --quiet --options=NONE -o - -R --exclude='*/bazel-*' \\\n\t\t input.d\n" }, { "path": "Tmain/option-exclude-including-fsep.d/stdout-expected.txt", "content": "a\tinput.d/labze-a/a.c\t/^int a = 3;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Tmain/option-exclude-simple.d/input.d/a.h", "content": "#ifndef A\n#define A\nstruct A {\n\tint a0, a1;\n};\n#endif\n" }, { "path": "Tmain/option-exclude-simple.d/input.d/bazel-x/x.c", "content": "int x = 1;\n" }, { "path": "Tmain/option-exclude-simple.d/input.d/bazel-y/y.c", "content": "int y = 1;\n" }, { "path": "Tmain/option-exclude-simple.d/input.d/bazel-z/z.c", "content": "int z = 1;\n" }, { "path": "Tmain/option-exclude-simple.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n${CTAGS} --quiet --options=NONE -o - -R --exclude='*.c' \\\n\t\t input.d\n" }, { "path": "Tmain/option-exclude-simple.d/stdout-expected.txt", "content": "A\tinput.d/a.h\t/^#define A$/;\"\td\nA\tinput.d/a.h\t/^struct A {$/;\"\ts\na0\tinput.d/a.h\t/^\tint a0, a1;$/;\"\tm\tstruct:A\ttyperef:typename:int\na1\tinput.d/a.h\t/^\tint a0, a1;$/;\"\tm\tstruct:A\ttyperef:typename:int\n" }, { "path": "Tmain/option-extradef-in-mtable.d/input.mtextra", "content": "(def a)\n{def b}\n[def c]\n" }, { "path": "Tmain/option-extradef-in-mtable.d/mtextra.ctags", "content": "--langdef=MTExtra\n--map-MTExtra=+.mtextra\n\n--kinddef-MTExtra=d,def,definitions\n\n# []\n--_extradef-MTExtra=acceptSquareBracket,accept square bracket\n# {}\n--_extradef-MTExtra=acceptCurlyBracket,accept curly bracket\n\n\n--_tabledef-MTExtra=main\n--_tabledef-MTExtra=body\n\n--_mtable-regex-MTExtra=main/\\(def +//{tenter=body}\n--_mtable-regex-MTExtra=main/\\[def +//{tenter=body}{_extra=acceptSquareBracket}\n--_mtable-regex-MTExtra=main/\\{def +//{tenter=body}{_extra=acceptCurlyBracket}\n--_mtable-regex-MTExtra=main/.//\n\n--_mtable-regex-MTExtra=body/([_a-z]+)\\)/\\1/d/{tleave}\n--_mtable-regex-MTExtra=body/([_a-z]+)\\]/\\1/d/{tleave}{_extra=acceptSquareBracket}\n--_mtable-regex-MTExtra=body/([_a-z]+)\\}/\\1/d/{tleave}{_extra=acceptCurlyBracket}\n--_mtable-regex-MTExtra=body/.//\n" }, { "path": "Tmain/option-extradef-in-mtable.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\nmsgstr ()\n{\n\tif [ $1 = '+' ]; then\n\t\techo \"enabled\"\n\telse\n\t\techo \"disabled\"\n\tfi\n}\n\nrun_ctags ()\n{\n\tprintf '# []: %s, {}: %s\\n' $(msgstr $1) $(msgstr $2)\n\t${CTAGS} --quiet --options=NONE --options=mtextra.ctags \\\n\t\t\t --fields=+'{extras}' \\\n\t\t\t --extras-MTExtra=${1}'{acceptSquareBracket}' \\\n\t\t\t --extras-MTExtra=${2}'{acceptCurlyBracket}' \\\n\t\t\t -o - \\\n\t\t\t input.mtextra\n}\n\nrun_ctags + +\nrun_ctags - -\nrun_ctags + -\nrun_ctags - +\n" }, { "path": "Tmain/option-extradef-in-mtable.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/option-extradef-in-mtable.d/stdout-expected.txt", "content": "# []: enabled, {}: enabled\na\tinput.mtextra\t/^(def a)$/;\"\td\nb\tinput.mtextra\t/^{def b}$/;\"\td\textras:acceptCurlyBracket\nc\tinput.mtextra\t/^[def c]$/;\"\td\textras:acceptSquareBracket\n# []: disabled, {}: disabled\na\tinput.mtextra\t/^(def a)$/;\"\td\n# []: enabled, {}: disabled\na\tinput.mtextra\t/^(def a)$/;\"\td\nc\tinput.mtextra\t/^[def c]$/;\"\td\textras:acceptSquareBracket\n# []: disabled, {}: enabled\na\tinput.mtextra\t/^(def a)$/;\"\td\nb\tinput.mtextra\t/^{def b}$/;\"\td\textras:acceptCurlyBracket\n" }, { "path": "Tmain/option-extras-enabling-all.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/option-extras-enabling-all.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\ncolumn_for_enabled=\n\nif ! column_for_enabled=$(get_column_index $CTAGS --list-extras \"ENABLED\"); then\n\texit $?\nfi\n\n$CTAGS --quiet --options=NONE --extras-all= \\\n\t --with-list-header=no --list-extras \\\n\t| filter_by_column_index $column_for_enabled | sort | uniq\n$CTAGS --quiet --options=NONE --extras-all='*' \\\n\t --with-list-header=no --list-extras \\\n\t| filter_by_column_index $column_for_enabled | sort | uniq\n" }, { "path": "Tmain/option-extras-enabling-all.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/option-extras-enabling-all.d/stdout-expected.txt", "content": "no\nyes\n" }, { "path": "Tmain/option-no-such-foreign-extra.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\n${V} ${CTAGS} --quiet --options=NONE \\\n\t \\\n\t --langdef=NOSUCHLANG'{_foreignLanguage=Kconfig}' \\\n\t --_extradef-NOSUCHLANG='NOSUCHEXTRA,but this is not the part of Kconfig' \\\n --regex-NOSUCHLANG='/^\\# (CONFIG_[^ ]+) is not set/\\1/c/{_language=Kconfig}{_extra=NOSUCHEXTRA}{exclusive}' \\\n\t \\\n\t --_force-quit=0\n" }, { "path": "Tmain/option-no-such-foreign-extra.d/stderr-expected.txt", "content": "ctags: Warning: no such extra \"NOSUCHEXTRA\" in Kconfig\n" }, { "path": "Tmain/option-no-such-foreign-field.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\n${V} ${CTAGS} --quiet --options=NONE \\\n\t \\\n\t --langdef=NOSUCHLANG'{_foreignLanguage=Kconfig}' \\\n\t --_fielddef-NOSUCHLANG='NOSUCHFIELD,but this is not the part of Kconfig' \\\n --regex-NOSUCHLANG='/^\\# (CONFIG_[^ ]+) is (not set)/\\1/c/{_language=Kconfig}{_field=NOSUCHFIELD:\\1}{exclusive}' \\\n\t \\\n\t --_force-quit=0\n" }, { "path": "Tmain/option-no-such-foreign-field.d/stderr-expected.txt", "content": "ctags: Warning: no such field \"NOSUCHFIELD\" in Kconfig\n" }, { "path": "Tmain/option-options-directory.d/exit-expected.txt", "content": "7\n" }, { "path": "Tmain/option-options-directory.d/optlib/a.ctags", "content": "--_echo=hello\n" }, { "path": "Tmain/option-options-directory.d/optlib/b.ctags", "content": "--_echo=world\n" }, { "path": "Tmain/option-options-directory.d/optlib/c.ctags", "content": "--_force-quit=7\n" }, { "path": "Tmain/option-options-directory.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n${CTAGS} --options=NONE --options=./optlib\n" }, { "path": "Tmain/option-options-directory.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Notice: hello\nctags: Notice: world\n" }, { "path": "Tmain/option-options-maybe.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/option-options-maybe.d/input-maybe.c", "content": "int foo (void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/option-options-maybe.d/input.c", "content": "int foo (void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/option-options-maybe.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nd=$(pwd)\n\n${CTAGS} --quiet --options=NONE --options=./NOSUCHFILE -o - input.c\n\n${CTAGS} --quiet --options=NONE --options-maybe=./NOSUCHFILE -o - input-maybe.c\n" }, { "path": "Tmain/option-options-maybe.d/stderr-expected.txt", "content": "ctags: cannot stat \"./NOSUCHFILE\" : No such file or directory\n" }, { "path": "Tmain/option-options-maybe.d/stdout-expected.txt", "content": "foo\tinput-maybe.c\t/^int foo (void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/option-pseudo-tags.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/option-pseudo-tags.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE \"\n\necho '# single with no curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags=TAG_PROGRAM_URL \\\n\t\t -o - \\\n\t\t input.c\n\necho '# single with curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags='{TAG_PROGRAM_URL}' \\\n\t\t -o - \\\n\t\t input.c\n\necho '# single with + no curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags= \\\n\t\t --pseudo-tags=+TAG_PROGRAM_URL \\\n\t\t -o - \\\n\t\t input.c\n\necho '# single with + curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags= \\\n\t\t --pseudo-tags=+'{TAG_PROGRAM_URL}' \\\n\t\t -o - \\\n\t\t input.c\n\necho '# single with +- no curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags= \\\n\t\t --pseudo-tags=+TAG_PROGRAM_VERSION \\\n\t\t --pseudo-tags=+TAG_PROGRAM_URL \\\n\t\t --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t\t -o - \\\n\t\t input.c\n\necho '# single with +- curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags= \\\n\t\t --pseudo-tags=+'{TAG_PROGRAM_VERSION}' \\\n\t\t --pseudo-tags=+'{TAG_PROGRAM_URL}' \\\n\t\t --pseudo-tags=-'{TAG_PROGRAM_VERSION}' \\\n\t\t -o - \\\n\t\t input.c\n\necho '# multiple specifications with +- curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags= \\\n\t\t --pseudo-tags='+{TAG_PROGRAM_VERSION}{TAG_FILE_SORTED}{TAG_PROGRAM_URL}-{TAG_PROGRAM_VERSION}' \\\n\t\t -o - \\\n\t\t input.c\n\necho '# multiple specifications with -+- curly bracket'\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags= \\\n\t\t --pseudo-tags='-{TAG_PROGRAM_VERSION}+{TAG_PROGRAM_VERSION}{TAG_FILE_FORMAT}{TAG_PROGRAM_URL}-{TAG_PROGRAM_VERSION}' \\\n\t\t -o - \\\n\t\t input.c\n" }, { "path": "Tmain/option-pseudo-tags.d/stdout-expected.txt", "content": "# single with no curly bracket\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# single with curly bracket\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# single with + no curly bracket\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# single with + curly bracket\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# single with +- no curly bracket\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# single with +- curly bracket\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# multiple specifications with +- curly bracket\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n# multiple specifications with -+- curly bracket\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n" }, { "path": "Tmain/option-totals-extra.d/input.unknown", "content": "N\nN\nN\nN\nN\nN\nN\nN\nN\nN\n" }, { "path": "Tmain/option-totals-extra.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --totals=extra --language-force=CTagsSelfTest -o - input.unknown 2>&1 \\\n\t| grep -v ^N \\\n\t| sed -ne '/^STATISTICS.*/,$p'\n" }, { "path": "Tmain/option-totals-extra.d/stdout-expected.txt", "content": "STATISTICS of CTagsSelfTest\n==============================================\nThe number of handled chars: 10\n" }, { "path": "Tmain/option-use-slash-as-filename-separator.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nOPT=--use-slash-as-filename-separator\n\n. ../utils.sh\n\nexit_unless_win32 $CTAGS\n\necho '#u-ctags output'\n$CTAGS --quiet --options=NONE -o - 'src\\input.c'\n$CTAGS --quiet --options=NONE -o - $OPT 'src\\input.c'\n$CTAGS --quiet --options=NONE -o - ${OPT}=no 'src\\input.c'\n\necho '#u-ctags ptag output'\n{\n$CTAGS --quiet --options=NONE --extras=p -o - 'src\\input.c'\n$CTAGS --quiet --options=NONE --extras=p -o - $OPT 'src\\input.c'\n$CTAGS --quiet --options=NONE --extras=p -o - ${OPT}=no 'src\\input.c'\n} | grep TAG_OUTPUT_FILESEP\n\necho '#e-ctags output'\n$CTAGS --quiet --options=NONE --output-format=e-ctags -o - 'src\\input.c'\n$CTAGS --quiet --options=NONE --output-format=e-ctags -o - $OPT 'src\\input.c'\n$CTAGS --quiet --options=NONE --output-format=e-ctags -o - ${OPT}=no 'src\\input.c'\n\necho '#e-ctags ptag output'\n{\n$CTAGS --quiet --options=NONE --extras=p --output-format=e-ctags -o - 'src\\input.c'\n$CTAGS --quiet --options=NONE --extras=p --output-format=e-ctags -o - $OPT 'src\\input.c'\n$CTAGS --quiet --options=NONE --extras=p --output-format=e-ctags -o - ${OPT}=no 'src\\input.c'\n} | grep TAG_OUTPUT_FILESEP\n\necho '#xref output'\n$CTAGS --quiet --options=NONE --output-format=xref -o - 'src\\input.c'\n$CTAGS --quiet --options=NONE --output-format=xref -o - $OPT 'src\\input.c'\n$CTAGS --quiet --options=NONE --output-format=xref -o - ${OPT}=no 'src\\input.c'\n\n# TODO: json output\n" }, { "path": "Tmain/option-use-slash-as-filename-separator.d/src/input.c", "content": "int n;\n" }, { "path": "Tmain/option-use-slash-as-filename-separator.d/stdout-expected.txt", "content": "#u-ctags output\nn\tsrc/input.c\t/^int n;$/;\"\tv\ttyperef:typename:int\nn\tsrc/input.c\t/^int n;$/;\"\tv\ttyperef:typename:int\nn\tsrc\\\\input.c\t/^int n;$/;\"\tv\ttyperef:typename:int\n#u-ctags ptag output\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n#e-ctags output\nn\tsrc\\input.c\t/^int n;$/;\"\tv\ttyperef:typename:int\nn\tsrc/input.c\t/^int n;$/;\"\tv\ttyperef:typename:int\nn\tsrc\\input.c\t/^int n;$/;\"\tv\ttyperef:typename:int\n#e-ctags ptag output\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n#xref output\nn variable 1 src\\\\input.c int n;\nn variable 1 src/input.c int n;\nn variable 1 src\\\\input.c int n;\n" }, { "path": "Tmain/optlib-dir-option.d/optlib/a.ctags", "content": "--_echo=hello\n" }, { "path": "Tmain/optlib-dir-option.d/optlib/b.ctags", "content": "--_echo=world\n" }, { "path": "Tmain/optlib-dir-option.d/optlib/c.ctags", "content": "--_force-quit=7\n" }, { "path": "Tmain/optlib-dir-option.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nd=$(pwd)\n\necho '#' specifying files 1>&2\n(\n\tcd /\n\t${CTAGS} --options=NONE --optlib-dir=$d/optlib --options=a.ctags --options=b.ctags --options=c.ctags\n)\n\necho '#' specifying a dir 1>&2\n(\n\tcd /\n\t${CTAGS} --options=NONE --optlib-dir=$d --options=optlib\n)\n\necho '#' reset 1>&2\n(\n\tcd /\n\t${CTAGS} --options=NONE --optlib-dir= --options=optlib\n)\n" }, { "path": "Tmain/optlib-dir-option.d/stderr-expected.txt", "content": "# specifying files\nctags: Notice: No options will be read from files or environment\nctags: Notice: hello\nctags: Notice: world\n# specifying a dir\nctags: Notice: No options will be read from files or environment\nctags: Notice: hello\nctags: Notice: world\n# reset\nctags: Notice: No options will be read from files or environment\nctags: cannot stat \"optlib\" : No such file or directory\n" }, { "path": "Tmain/optlib-message-flag.d/args.ctags", "content": "--langdef=FOO\n--map-FOO=+.foo\n\n--kinddef-FOO=n,namespace,namespaces\n--kinddef-FOO=c,class,classes\n--kinddef-FOO=v,variable,variables\n\n--regex-FOO=/namespace ([a-zA-Z]+) /\\1/N,anotherNamespace/{warning=\"found namespace '\\1'\"}{exclusive}\n--regex-FOO=/namespace ([a-zA-Z]+) /\\1/x,bad/{fatal=\"should not get this\"}\n--regex-FOO=/bad regex ([a-zA-Z-]+)/\\1/x,bad/{fatal=\"bad='\\1'\"}\n\n\n--mline-regex-FOO=/namespace ([a-zA-Z]+) /\\1/m,mlineNamespace/{mgroup=1}{warning=\"got namespace\"}\n--mline-regex-FOO=/var ([a-zA-Z]+) ([a-zA-Z]+);/\\2/V,mlineVariable/{warning=\"got variable '\\2' of type \\1\"}{mgroup=2}\n--mline-regex-FOO=/bad multi-line ([a-zA-Z-]+)/\\1/x,bad/{fatal=\"bad='\\1'\"}{mgroup=1}\n\n\n--_tabledef-FOO=main\n--_tabledef-FOO=block\n--_tabledef-FOO=blockEnd\n--_tabledef-FOO=skipWhitespace\n\n--_mtable-regex-FOO=skipWhitespace/[ \\t\\n]+//\n\n--_mtable-regex-FOO=main/namespace ([a-zA-Z]+) \\{/\\1/n/{tenter=block,blockEnd}{warning=\"found namespace\"}{scope=push}\n--_mtable-extend-FOO=main+skipWhitespace\n--_mtable-regex-FOO=main///\n\n--_mtable-regex-FOO=blockEnd/\\};?//{scope=pop}{warning=\"end of block\"}\n--_mtable-extend-FOO=blockEnd+skipWhitespace\n--_mtable-regex-FOO=blockEnd/bad multi-table ([a-zA-Z-]+)//{fatal=\"bad='\\1'\"}\n--_mtable-regex-FOO=blockEnd/bad [^\\n]+\\n//\n\n--_mtable-regex-FOO=block/class ([a-zA-Z]+) \\{/\\1/c/{tenter=block,blockEnd}{warning=\"got class\"}{scope=ref}{scope=push}\n--_mtable-regex-FOO=block/var ([a-zA-Z]+) ([a-zA-Z]+);/\\2/v/{scope=ref}{warning=\"got variable '\\2' of type \\1\"}\n--_mtable-extend-FOO=block+skipWhitespace\n" }, { "path": "Tmain/optlib-message-flag.d/input0.foo", "content": "namespace A {\n\tclass B {\n\t\tvar bool C;\n\t};\n}\n" }, { "path": "Tmain/optlib-message-flag.d/input1.foo", "content": "namespace X {\n\tclass Y {\n\t\tvar bool Z;\n\t};\n}\n\nbad regex found-it\nbad multi-line found-mline\nbad multi-table found-mtable\n" }, { "path": "Tmain/optlib-message-flag.d/input2.foo", "content": "namespace XX {\n\tclass YY {\n\t\tvar bool ZZ;\n\t};\n}\n\nbad multi-line found-mline\nbad multi-table found-mtable\n" }, { "path": "Tmain/optlib-message-flag.d/input3.foo", "content": "namespace XXX {\n\tclass YYY {\n\t\tvar bool ZZZ;\n\t};\n}\n\nbad multi-table found-mtable\n" }, { "path": "Tmain/optlib-message-flag.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\necho '#' warning messages 1>&2\n(\n\t${CTAGS} --options=NONE --options=./args.ctags -o - ./input0.foo\n)\n\necho '#' fatal regex message 1>&2\n(\n\t${CTAGS} --options=NONE --options=./args.ctags -o - ./input1.foo\n)\n\necho '#' fatal mline-regex message 1>&2\n(\n\t${CTAGS} --options=NONE --options=./args.ctags -o - ./input2.foo\n)\n\necho '#' fatal mtable-regex message 1>&2\n(\n\t${CTAGS} --options=NONE --options=./args.ctags -o - ./input3.foo\n)\n" }, { "path": "Tmain/optlib-message-flag.d/stderr-expected.txt", "content": "# warning messages\nctags: Notice: No options will be read from files or environment\nctags: Warning: Message from regex: found namespace 'A' (./input0.foo:1)\nctags: Warning: Message from regex: got namespace (./input0.foo:1)\nctags: Warning: Message from regex: got variable 'C' of type bool (./input0.foo:3)\nctags: Warning: Message from mtable: found namespace (./input0.foo:1)\nctags: Warning: Message from mtable: got class (./input0.foo:2)\nctags: Warning: Message from mtable: got variable 'C' of type bool (./input0.foo:3)\nctags: Warning: Message from mtable: end of block (./input0.foo:4)\nctags: Warning: Message from mtable: end of block (./input0.foo:5)\n# fatal regex message\nctags: Notice: No options will be read from files or environment\nctags: Warning: Message from regex: found namespace 'X' (./input1.foo:1)\nctags: Fatal: Message from regex: bad='found-it' (./input1.foo:7)\n# fatal mline-regex message\nctags: Notice: No options will be read from files or environment\nctags: Warning: Message from regex: found namespace 'XX' (./input2.foo:1)\nctags: Warning: Message from regex: got namespace (./input2.foo:1)\nctags: Warning: Message from regex: got variable 'ZZ' of type bool (./input2.foo:3)\nctags: Fatal: Message from regex: bad='found-mline' (./input2.foo:7)\n# fatal mtable-regex message\nctags: Notice: No options will be read from files or environment\nctags: Warning: Message from regex: found namespace 'XXX' (./input3.foo:1)\nctags: Warning: Message from regex: got namespace (./input3.foo:1)\nctags: Warning: Message from regex: got variable 'ZZZ' of type bool (./input3.foo:3)\nctags: Warning: Message from mtable: found namespace (./input3.foo:1)\nctags: Warning: Message from mtable: got class (./input3.foo:2)\nctags: Warning: Message from mtable: got variable 'ZZZ' of type bool (./input3.foo:3)\nctags: Warning: Message from mtable: end of block (./input3.foo:4)\nctags: Warning: Message from mtable: end of block (./input3.foo:5)\nctags: Fatal: Message from mtable: bad='found-mtable' (./input3.foo:7)\n" }, { "path": "Tmain/optlib-message-flag.d/stdout-expected.txt", "content": "A\t./input0.foo\t/^namespace A {$/;\"\tN\nA\t./input0.foo\t/^namespace A {$/;\"\tm\nA\t./input0.foo\t/^namespace A {$/;\"\tn\nB\t./input0.foo\t/^\tclass B {$/;\"\tc\tnamespace:A\nC\t./input0.foo\t/^\t\tvar bool C;$/;\"\tV\nC\t./input0.foo\t/^\t\tvar bool C;$/;\"\tv\tclass:A.B\n" }, { "path": "Tmain/optscript-preludes-stack.d/args-c.ctags", "content": "--langdef=C10{base=C}\n--_prelude-C10={{\n (prelude C10) ==\n}}\n--_sequel-C10={{\n (sequel C10) ==\n}}\n\n\n--langdef=C11{base=C}\n--_prelude-C11={{\n (prelude C11) ==\n}}\n--_sequel-C11={{\n (sequel C11) ==\n}}\n\n--langdef=C20{base=C10}\n--_prelude-C20={{\n (prelude C20) ==\n}}\n--_sequel-C20={{\n (sequel C20) ==\n}}\n\n\n--langdef=C30{base=C20}\n--_prelude-C30={{\n (prelude C30) ==\n}}\n--_sequel-C30={{\n (sequel C30) ==\n}}\n" }, { "path": "Tmain/optscript-preludes-stack.d/args-cpreprocessor.ctags", "content": "--langdef=CPreProcessor10{base=CPreProcessor}\n--_prelude-CPreProcessor10={{\n (prelude CPreProcessor10) ==\n}}\n--_sequel-CPreProcessor10={{\n (sequel CPreProcessor10) ==\n}}\n\n\n--langdef=CPreProcessor11{base=CPreProcessor}\n--_prelude-CPreProcessor11={{\n (prelude CPreProcessor11) ==\n}}\n--_sequel-CPreProcessor11={{\n (sequel CPreProcessor11) ==\n}}\n\n--langdef=CPreProcessor20{base=CPreProcessor10}\n--_prelude-CPreProcessor20={{\n (prelude CPreProcessor20) ==\n}}\n--_sequel-CPreProcessor20={{\n (sequel CPreProcessor20) ==\n}}\n\n\n--langdef=CPreProcessor30{base=CPreProcessor20}\n--_prelude-CPreProcessor30={{\n (prelude CPreProcessor30) ==\n}}\n--_sequel-CPreProcessor30={{\n (sequel CPreProcessor30) ==\n}}\n" }, { "path": "Tmain/optscript-preludes-stack.d/args-dts.ctags", "content": "--langdef=DTS10{base=DTS}\n--_prelude-DTS10={{\n (prelude DTS10) ==\n}}\n--_sequel-DTS10={{\n (sequel DTS10) ==\n}}\n\n\n--langdef=DTS11{base=DTS}\n--_prelude-DTS11={{\n (prelude DTS11) ==\n}}\n--_sequel-DTS11={{\n (sequel DTS11) ==\n}}\n\n--langdef=DTS20{base=DTS10}\n--_prelude-DTS20={{\n (prelude DTS20) ==\n}}\n--_sequel-DTS20={{\n (sequel DTS20) ==\n}}\n\n\n--langdef=DTS30{base=DTS20}\n--_prelude-DTS30={{\n (prelude DTS30) ==\n}}\n--_sequel-DTS30={{\n (sequel DTS30) ==\n}}\n" }, { "path": "Tmain/optscript-preludes-stack.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/optscript-preludes-stack.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/optscript-preludes-stack.d/input.dts", "content": "" }, { "path": "Tmain/optscript-preludes-stack.d/input.i", "content": "" }, { "path": "Tmain/optscript-preludes-stack.d/run.sh", "content": "# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n: &&\n\t${CTAGS} --quiet --options=NONE\\\n\t\t\t --_prelude-C='{{ (enter C) == }}' \\\n\t\t\t --_sequel-C='{{ (leave C) == }}' \\\n\t\t\t --options=./args-c.ctags -o - input.c &&\n\t${CTAGS} --quiet --options=NONE \\\n\t\t\t --_prelude-DTS='{{ (enter DTS) == }}' \\\n\t\t\t --_sequel-DTS='{{ (leave DTS) == }}' \\\n\t\t\t --options=./args-dts.ctags -o - input.dts &&\n\t${CTAGS} --quiet --options=NONE --map-CPreProcessor=+.i \\\n\t\t\t --_prelude-CPreProcessor='{{ (enter CPreProcessor) == }}' \\\n\t\t\t --_sequel-CPreProcessor='{{ (leave CPreProcessor) == }}' \\\n\t\t\t --options=./args-cpreprocessor.ctags -o - input.i\n\n#\n# BUGS: The following two don't work because in-use marker is not set to\n# the subparsers of the CPreprocessor parser. The CPreprocessor parser must\n# mark in-use on its sub parsers to call the inputStart and inputEnd methods\n# in the foreachSubparser loop.\n#\n#\t${CTAGS} --quiet --options=NONE --options=./args-cpreprocessor.ctags -o - input.c\n#\t${CTAGS} --quiet --options=NONE --options=./args-cpreprocessor.ctags -o - input.dts\n#\n" }, { "path": "Tmain/optscript-preludes-stack.d/stderr-expected.txt", "content": "(enter C)\n(prelude C10)\n(prelude C20)\n(prelude C30)\n(prelude C11)\n(sequel C30)\n(sequel C20)\n(sequel C10)\n(sequel C11)\n(leave C)\n(enter DTS)\n(prelude DTS10)\n(prelude DTS20)\n(prelude DTS30)\n(prelude DTS11)\n(sequel DTS30)\n(sequel DTS20)\n(sequel DTS10)\n(sequel DTS11)\n(leave DTS)\nctags: Warning: Because of an internal limitation, Making a sub parser based on the CPreProcessor parser is not allowed: CPreProcessor\nctags: Warning: Because of an internal limitation, Making a sub parser based on the CPreProcessor parser is not allowed: CPreProcessor\n(enter CPreProcessor)\n(leave CPreProcessor)\n" }, { "path": "Tmain/optscript-preludes-stack.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/optscript-scope.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/optscript-scope.d/input.unknown", "content": "* TITLE 0\n+ Subtitle 0.0\n+ Subtitle 0.1\n- subsubtitle 0.1.0\n- subsubtitle 0.1.1\n+ Subtitle 0.2\n- subsubtitle 0.2.0\n* TITLE 1\n+ Subtitle 1.0\n- subsubtitle 1.0.0\n- subsubtitle 1.0.1\n" }, { "path": "Tmain/optscript-scope.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n${CTAGS} --quiet --options=NONE \\\n\t\t --sort=no --fields=+n \\\n\t\t --options=./unknown.ctags \\\n\t\t --language-force=UnknownX \\\n\t\t -o - input.unknown\n" }, { "path": "Tmain/optscript-scope.d/stderr-expected.txt", "content": "section-enter\n0\nscopetop: OK\nscopeNth0: OK\nsection-leave\n1\nsubsection-enter\n1\nscopeNth1: OK\nsubsection-leave\n2\nsubsection-enter\n2\nscopetop: OK\nscopeNth0: OK\nscopeNth1: OK\nsubsection-leave\n2\nsubsubsection-enter\n2\nsubsubsection-leave\n3\nsubsubsection-enter\n3\nsubsubsection-leave\n3\nsubsection-enter\n3\nscopetop: OK\nscopeNth0: OK\nscopeNth1: OK\nsubsection-leave\n2\nsubsubsection-enter\n2\nsubsubsection-leave\n3\nsection-enter\n3\nscopetop: OK\nscopeNth0: OK\nsection-leave\n1\nsubsection-enter\n1\nscopeNth1: OK\nsubsection-leave\n2\nsubsubsection-enter\n2\nsubsubsection-leave\n3\nsubsubsection-enter\n3\nsubsubsection-leave\n3\n" }, { "path": "Tmain/optscript-scope.d/stdout-expected.txt", "content": "TITLE 0\tinput.unknown\t/^* TITLE 0$/;\"\ts\tline:1\nSubtitle 0.0\tinput.unknown\t/^+ Subtitle 0.0$/;\"\tt\tline:2\tsection:TITLE 0\nSubtitle 0.1\tinput.unknown\t/^+ Subtitle 0.1$/;\"\tt\tline:3\tsection:TITLE 0\nsubsubtitle 0.1.0\tinput.unknown\t/^- subsubtitle 0.1.0$/;\"\tu\tline:4\tsubsection:TITLE 0.Subtitle 0.1\nsubsubtitle 0.1.1\tinput.unknown\t/^- subsubtitle 0.1.1$/;\"\tu\tline:5\tsubsection:TITLE 0.Subtitle 0.1\nSubtitle 0.2\tinput.unknown\t/^+ Subtitle 0.2$/;\"\tt\tline:6\tsection:TITLE 0\nsubsubtitle 0.2.0\tinput.unknown\t/^- subsubtitle 0.2.0$/;\"\tu\tline:7\tsubsection:TITLE 0.Subtitle 0.2\nTITLE 1\tinput.unknown\t/^* TITLE 1$/;\"\ts\tline:8\nSubtitle 1.0\tinput.unknown\t/^+ Subtitle 1.0$/;\"\tt\tline:9\tsection:TITLE 1\nsubsubtitle 1.0.0\tinput.unknown\t/^- subsubtitle 1.0.0$/;\"\tu\tline:10\tsubsection:TITLE 1.Subtitle 1.0\nsubsubtitle 1.0.1\tinput.unknown\t/^- subsubtitle 1.0.1$/;\"\tu\tline:11\tsubsection:TITLE 1.Subtitle 1.0\n" }, { "path": "Tmain/optscript-scope.d/unknown.ctags", "content": "--langdef=UnknownX\n--kinddef-UnknownX=s,section,sections\n--kinddef-UnknownX=t,subsection,subsections\n--kinddef-UnknownX=u,subsubsection,subsubsections\n\n--regex-UnknownX=/^\\* (.*)$/\\1/s/{{\n /section-enter = _scopedepth =\n . _scopeset\n _scopetop {\n (scopetop: OK) =\n . eq {\n (scopeNth0: OK) =\n } {\n (scopeNth0: FAILED) =\n } ifelse\n } {\n (scopetop: FAILED) =\n } ifelse\n /section-leave = _scopedepth =\n}}\n\n--regex-UnknownX=/^\\+ (.*)$/\\1/t/{{\n /subsection-enter = _scopedepth =\n _scopedepth 3 eq {\n _scopepop\n } if\n _scopedepth 2 eq {\n 0 _scopeNth _scopetop {\n (scopetop: OK) =\n eq {\n (scopeNth0: OK) =\n } {\n (scopeNth0: FAILED) =\n } ifelse\n } {\n (scopetop: FAILED) =\n } ifelse\n _scopepop\n } if\n . _scopepush\n 1 _scopeNth . :scope eq {\n (scopeNth1: OK) =\n } {\n (scopeNth1: FAILED) =\n } ifelse\n /subsection-leave = _scopedepth =\n}}\n\n--regex-UnknownX=/^\\- (.*)$/\\1/u/{{\n /subsubsection-enter = _scopedepth =\n _scopedepth 3 eq {\n _scopepop\n } if\n . _scopepush\n /subsubsection-leave = _scopedepth =\n}}\n" }, { "path": "Tmain/optscript.d/arithmetic.expected", "content": "8\n(3 5 add)\n33\n(99 3 idiv)\n4\n(99 5 mod)\n30\n(3 10 mul)\n-12\n(8 20 sub)\n3\n(-3 neg)\n-3\n(3 neg)\n3\n(-3 abs)\n3\n(3 abs)\n" }, { "path": "Tmain/optscript.d/arithmetic.ps", "content": "(3 5 add) 3 5 add pstack clear\n(99 3 idiv) 99 3 idiv pstack clear\n(99 5 mod) 99 5 mod pstack clear\n(3 10 mul) 3 10 mul pstack clear\n(8 20 sub) 8 20 sub pstack clear\n(-3 neg) -3 neg pstack clear\n(3 neg) 3 neg pstack clear\n(-3 abs) -3 abs pstack clear\n(3 abs) 3 abs pstack clear\n" }, { "path": "Tmain/optscript.d/array.expected", "content": "[null null null null null]\n[1 2 3]\n3\n2\n1\n/a\n[1 2 3]\n/a\n" }, { "path": "Tmain/optscript.d/array.ps", "content": "5 array pstack clear\n/a [ 1 2 3 ] aload pstack\nastore pstack clear\n" }, { "path": "Tmain/optscript.d/arrayx.expected", "content": "unmatchedmark\nnull\n" }, { "path": "Tmain/optscript.d/arrayx.ps", "content": "clear\n{\n { ] } stopped {\n _errorname =\n stop\n } if\n} stopped pop\n_errorname =\n" }, { "path": "Tmain/optscript.d/compound.expected", "content": "3\n(abc)\n2\n-dict:2-\n3\n[true false null]\n(abc)\ntrue\ntrue\nfalse\n[true false null]\n(---------------- get array ----------------)\n(a)\n(a ->)\n(b)\n(b ->)\n(c)\n(c ->)\ntrue\n3\n[(a) (b) (c)]\n(true ->)\n(---------------- get dict ----------------)\n(a)\n(a ->)\n(b)\n(b ->)\n(c)\n(c ->)\ntrue\nfalse\n-dict:3-\n(true ->)\n(---------------- get str ----------------)\n97\n(97 ->)\n98\n(98 ->)\n99\n(99 ->)\ntrue\n3\n(abc)\n(true ->)\n(---------------- forall array ----------------)\n6\n(6 -> )\n(---------------- forall dict values ----------------)\n6\n(6 -> )\n(---------------- forall dict keys ----------------)\nfalse\n(false ->)\n(---------------- forall string ----------------)\n294\n(294 ->)\n(---------------- put string ----------------)\n(abc)\n(\\(abc\\) ->)\n(abcd)\n(\\(abcd\\) ->)\n(abc e)\n(\\(abc e\\) ->)\n(---------------- put array ----------------)\n[/a /b /c]\n([/a /b /c] ->)\n[/a /b /c /d]\n([/a /b /c /d] ->)\n[/a /b /c null /e]\n([/a /b /c null /e] ->)\n(---------------- put dict ----------------)\n1\n(1 ->)\n(---------------- putinterval string ----------------)\n(xyzdef)\n(\\(xyzdef\\) ->)\n(xyz123)\n(\\(xyz123\\) ->)\n(xyz1234)\n(\\(xyz1234\\) ->)\n(abcdex)\n(\\(abcdex\\) ->)\n(abcdefx)\n(\\(abcdefx\\) ->)\n(abcdxf)\n(\\(abcdxf\\) ->)\n(abcdxyz)\n(\\(abcdxyz\\) ->)\n(---------------- putinterval array ----------------)\n[/x /b /c]\n([/x /b /c] ->)\n[/a /x /c]\n([/a /x /c] ->)\n[/a /b /x]\n([/a /b /x] ->)\n[/a /b /c /x]\n([/a /b /c /x] ->)\n[/a /b /c /x /y]\n([/a /b /c /x /y] ->)\n[/a /b /x /y]\n([/a /b /x /y] ->)\n[/a /x /y]\n([/a /x /y] ->)\n[/x /y /c]\n([/x /y /c] ->)\n[/x /y /z]\n([/x /y /z] ->)\n[/a /x /y /z]\n([/a /x /y /z] ->)\n[/a /b /x /y /z]\n([/a /b /x /y /z] ->)\n[/a /b /c /x /y /z]\n([/a /b /c /x /y /z] ->)\n[/a /b /c /x /y /z /1]\n([/a /b /c /x /y /z /1] ->)\n[/a /b /x /y /z /1]\n([/a /b /x /y /z /1] ->)\n[/a /x /y /z /1]\n([/a /x /y /z /1] ->)\n[/x /y /z /1]\n([/x /y /z /1] ->)\n(---------------- _copyinterval string ----------------)\n()\n(\\(\\) ->)\n(1)\n(\\(1\\) ->)\n(a)\n(\\(a\\) ->)\n(1a)\n(\\(1a\\) ->)\n(ab)\n(\\(ab\\) ->)\n(bc)\n(\\(bc\\) ->)\n(cde)\n(\\(cde\\) ->)\n(e)\n(\\(e\\) ->)\n()\n(\\(\\) ->)\n(---------------- _copyinterval array ----------------)\n[]\n([] ->)\n[1]\n([1] ->)\n[/a]\n([/a] ->)\n[1 /a]\n([1 /a] ->)\n[/a /b]\n([ /a /b ] ->)\n[/b /c]\n([/b /c] ->)\n[/c /d /e]\n([/c /d /e] ->)\n[/e]\n([/e] ->)\n[]\n([] ->)\n" }, { "path": "Tmain/optscript.d/compound.ps", "content": "/pc { pstack clear } def\n(abc) dup length pc\n<< /a 1 /b 2 >> dup length pc\n[ true false null ] dup length pc\n\n(abc) () copy pc\n\n<< /a 1 /b 2 >> <<>> copy /a known pc\n<< /a 1 /b 2 >> <<>> copy /b known pc\n<< /a 1 /b 2 >> <<>> copy /c known pc\n\n[ true false null ] [] copy pc\n\n(---------------- get array ----------------) ==\n(a ->) [ (a) (b) (c) ] 0 get pc\n(b ->) [ (a) (b) (c) ] 1 get pc\n(c ->) [ (a) (b) (c) ] 2 get pc\n(true ->) { [ (a) (b) (c) ] 3 get } stopped pc\n\n(---------------- get dict ----------------) ==\n(a ->) << /a (a) true (b) 1 (c) >> /a get pc\n(b ->) << /a (a) true (b) 1 (c) >> true get pc\n(c ->) << /a (a) true (b) 1 (c) >> 1 get pc\n(true ->) { << /a (a) true (b) 1 (c) >> false get } stopped pc\n\n(---------------- get str ----------------) ==\n(97 ->) (abc) 0 get pc\n(98 ->) (abc) 1 get pc\n(99 ->) (abc) 2 get pc\n(true ->) { (abc) 3 get } stopped pc\n\n(---------------- forall array ----------------) ==\n(6 -> ) 0 [ 1 2 3 ] { add } forall pc\n\n(---------------- forall dict values ----------------) ==\n(6 -> ) 0 << /a 1 /b 2 /c 3 >> { exch pop add } forall pc\n\n(---------------- forall dict keys ----------------) ==\n(false ->)\n<< /a 1 /b 2 >> { pop } forall\n{\n count 3 ne {\n\tstop\n } if\n dup /a eq {\n\tpop\n\t/b ne {\n\t stop\n\t} if\n } {\n\t/b eq {\n\t /a ne {\n\t\tstop\n\t } if\n\t} {\n\t stop\n\t} ifelse\n } ifelse\n} stopped pc\n\n(---------------- forall string ----------------) ==\n(294 ->)\n0 (abc) { add } forall pc\n\n(---------------- put string ----------------) ==\n((abc) ->)\n(xbc) dup 0 97 put pc\n\n((abcd) ->)\n(abc) dup 3 100 put pc\n\n((abc e) ->)\n(abc) dup 4 101 put pc\n\n(---------------- put array ----------------) ==\n([/a /b /c] ->)\n[ /a null /c ] dup 1 /b put pc\n\n([/a /b /c /d] ->)\n[ /a /b /c ] dup 3 /d put pc\n\n([/a /b /c null /e] ->)\n[ /a /b /c ] dup 4 /e put pc\n\n(---------------- put dict ----------------) ==\n(1 ->)\n<< /a 0 /b null /c 2 >> dup /b 1 put /b get pc\n\n(---------------- putinterval string ----------------) ==\n((xyzdef) ->)\n(abcdef) dup 0 (xyz) putinterval pc\n\n((xyz123) ->)\n(abcdef) dup 0 (xyz123) putinterval pc\n\n((xyz1234) ->)\n(abcdef) dup 0 (xyz1234) putinterval pc\n\n((abcdex) ->)\n(abcdef) dup 5 (x) putinterval pc\n\n((abcdefx) ->)\n(abcdef) dup 6 (x) putinterval pc\n\n((abcdxf) ->)\n(abcdef) dup 4 (x) putinterval pc\n\n((abcdxyz) ->)\n(abcdef) dup 4 (xyz) putinterval pc\n\n(---------------- putinterval array ----------------) ==\n([/x /b /c] ->)\n[ /a /b /c ] dup 0 [ /x ] putinterval pc\n\n([/a /x /c] ->)\n[ /a /b /c ] dup 1 [ /x ] putinterval pc\n\n([/a /b /x] ->)\n[ /a /b /c ] dup 2 [ /x ] putinterval pc\n\n([/a /b /c /x] ->)\n[ /a /b /c ] dup 3 [ /x ] putinterval pc\n\n([/a /b /c /x /y] ->)\n[ /a /b /c ] dup 3 [ /x /y ] putinterval pc\n\n([/a /b /x /y] ->)\n[ /a /b /c ] dup 2 [ /x /y ] putinterval pc\n\n([/a /x /y] ->)\n[ /a /b /c ] dup 1 [ /x /y ] putinterval pc\n\n([/x /y /c] ->)\n[ /a /b /c ] dup 0 [ /x /y ] putinterval pc\n\n([/x /y /z] ->)\n[ /a /b /c ] dup 0 [ /x /y /z ] putinterval pc\n\n([/a /x /y /z] ->)\n[ /a /b /c ] dup 1 [ /x /y /z ] putinterval pc\n\n([/a /b /x /y /z] ->)\n[ /a /b /c ] dup 2 [ /x /y /z ] putinterval pc\n\n([/a /b /c /x /y /z] ->)\n[ /a /b /c ] dup 3 [ /x /y /z ] putinterval pc\n\n([/a /b /c /x /y /z /1] ->)\n[ /a /b /c ] dup 3 [ /x /y /z /1 ] putinterval pc\n\n([/a /b /x /y /z /1] ->)\n[ /a /b /c ] dup 2 [ /x /y /z /1 ] putinterval pc\n\n([/a /x /y /z /1] ->)\n[ /a /b /c ] dup 1 [ /x /y /z /1 ] putinterval pc\n\n([/x /y /z /1] ->)\n[ /a /b /c ] dup 0 [ /x /y /z /1 ] putinterval pc\n\n(---------------- _copyinterval string ----------------) ==\n(() ->)\n(abcde) 0 0 () _copyinterval pc\n\n((1) ->)\n(abcde) 0 0 (1) _copyinterval pc\n\n((a) ->)\n(abcde) 0 1 () _copyinterval pc\n\n((1a) ->)\n(abcde) 0 1 (1) _copyinterval pc\n\n((ab) ->)\n(abcde) 0 2 () _copyinterval pc\n\n((bc) ->)\n(abcde) 1 2 () _copyinterval pc\n\n((cde) ->)\n(abcde) 2 3 () _copyinterval pc\n\n((e) ->)\n(abcde) 4 1 () _copyinterval pc\n\n(() ->)\n(abcde) 5 0 () _copyinterval pc\n\n(---------------- _copyinterval array ----------------) ==\n([] ->)\n[ /a /b /c /d /e ] 0 0 [] _copyinterval pc\n\n([1] ->)\n[ /a /b /c /d /e ] 0 0 [ 1 ] _copyinterval pc\n\n([/a] ->)\n[ /a /b /c /d /e ] 0 1 [] _copyinterval pc\n\n([1 /a] ->)\n[ /a /b /c /d /e ] 0 1 [ 1 ] _copyinterval pc\n\n([ /a /b ] ->)\n[ /a /b /c /d /e ] 0 2 [] _copyinterval pc\n\n([/b /c] ->)\n[ /a /b /c /d /e ] 1 2 [] _copyinterval pc\n\n([/c /d /e] ->)\n[ /a /b /c /d /e ] 2 3 [] _copyinterval pc\n\n([/e] ->)\n[ /a /b /c /d /e ] 4 1 [] _copyinterval pc\n\n([] ->)\n[ /a /b /c /d /e ] 5 0 [] _copyinterval pc\n\n\n\n" }, { "path": "Tmain/optscript.d/control.expected", "content": "5\n12\n12\n(string)\n(executed if block)\n(executed if block)\n(executed else block)\n2\n1\n0\n4\n3\n2\n1\n0\n[(jump here as expected) true /undefined]\n[(jump here as expected) false null]\n5\n-1\n-2\n-3\n-4\n-5\n1\n3\n5\n7\n9\nexit in for:\n=> passed\nexit in forall string:\n=> passed\nexit in forall array:\n=> passed\nexit in forall dict:\n=> passed\n(---------------- countexecstack ----------------)\n3\n(---------------- execstack ----------------)\n[]\n(---------------- exception handling ----------------)\n(OK: this code just after loop should be executed)\n(OK: 'exit' should not be caught here.)\n(OK: 'stop' should be caught here.)\n" }, { "path": "Tmain/optscript.d/control.ps", "content": "/pc { pstack clear } def\n\n{ 3 2 add } exec pc\n/exectest { 10 2 add } def\n/exectest load exec pc\n3 9 /add load exec pc\n(string) exec pc\n\ntrue { (executed if block) } if pc\nfalse { (executed if block) } if pc\n\n/trueaction { (executed if block) } def\n/falseaction { (executed else block) } def\n\ntrue { trueaction } { falseaction } ifelse pc\nfalse { trueaction } { falseaction } ifelse pc\n\n/counter 0 def\n3 { counter counter 1 add /counter exch def } repeat pc\n\n/counter 0 def\n{ counter counter 1 add /counter exch def\n counter 5 eq { exit } if } loop pc\n\n/underflow { 100 index } def\n{ undefflow } stopped { [(jump here as expected) _newerror _errorname] } { (jump here unexpectedly) } ifelse pc\n\n/break { stop } def\n{ break } stopped { [(jump here as expected) _newerror _errorname] } { (jump here unexpectedly) } ifelse pc\n\n{ 3 2 { //add } exec } exec pc\n\n-1 -1 -5 { == } for\n1 2 10 { == } for\n\n(exit in for:) =\n/counter 0 def\n0 2 10 { counter 1 add /counter exch def\n 6 eq { exit } if\n } for\ncounter 4 eq {\n (=> passed) =\n} {\n (=> failed) =\n} ifelse\n\n(exit in forall string:) =\n(abc) { dup ?b eq { exit } { pop } ifelse } forall\n?b eq {\n (=> passed) =\n} if\n\n(exit in forall array:) =\n[?a ?b ?c] { dup ?b eq { exit } { pop } ifelse } forall\n?b eq {\n (=> passed) =\n} if\n\n(exit in forall dict:) =\n<< ?a /a ?b /b ?c /c >> { pop dup ?b eq { exit } { pop } ifelse } forall\n?b eq {\n (=> passed) =\n} if\n\n(---------------- countexecstack ----------------) ==\ntrue { countexecstack == } if\n\n(---------------- execstack ----------------) ==\ncountexecstack array execstack ==\n\n(---------------- exception handling ----------------) ==\n{\n { exit } loop\n (OK: this code just after loop should be executed) ==\n} stopped {\n (FAIL: 'exit' should not be caught here.) ==\n} {\n (OK: 'exit' should not be caught here.) ==\n} ifelse\n\n{\n { stop } loop\n (SOMETHING WRONG: this code just after loop should not be executed) ==\n} stopped {\n (OK: 'stop' should be caught here.) ==\n} {\n (FAIL: 'stop' should not be caught by loop.) ==\n} ifelse\n" }, { "path": "Tmain/optscript.d/dict.expected", "content": "3\ntrue\nfalse\ntrue\n-dict:1-\nfalse\n3\n2\n1\n(a)\nfalse\n2\n3\n2\n(---- dictstack & cleardictstack ----)\n3\n4\n2\n(---- store ----)\n1\n-dict:1-\nnull\n(---- store integers ----)\n45\n(---- using types other than name as key objects ----)\n(3)\n(true)\n(false)\n(abc)\n(xyz)\n(3)\n(true)\n(false)\n(abc)\n(xyz)\n" }, { "path": "Tmain/optscript.d/dict.ps", "content": "10 dict begin\n/three 3 def\n/three load ==\ncurrentdict /three known ==\ncurrentdict /four known ==\n/three where pstack\nend\n/three where ==\n\nclear\n<< /a 1 /b 2 /c 3 >>\nbegin a b c end pstack\n<< /a (a) >> begin\n/a load ==\nend\n\n<< /a 1 >> dup /a undef /a known == clear\n\n(---- countdictstack ----)\ncountdictstack ==\n5 dict begin\ncountdictstack ==\nend\ncountdictstack ==\n\n(---- dictstack & cleardictstack ----) ==\nclear\n5 dict begin [] dictstack length == clear\n5 dict begin [] dictstack length == clear\ncleardictstack [] dictstack length == clear\n\n(---- store ----) ==\n<< /a 1 /b 2 /c 3 >> << /e 1 /f 2 /g 3 >> /a 0 store pop /a get ==\n\n<< /k null >> dup == /k get ==\n\n(---- store integers ----) ==\n0 << 1 true 2 true 3 true 4 true 5 true 6 true 7 true 8 true 9 true >> {pop add} forall =\n\n(---- using types other than name as key objects ----) ==\n\n/d 10 dict def\n\nd dup 3 (3) put 3 get == clear\nd dup true (true) put true get == clear\nd dup false (false) put false get == clear\nd dup (abc) (abc) put (abc) get == clear\nd dup /xyz (xyz) put (xyz) get == clear\n\n/d0 << 3 (3) true (true) false (false) (abc) (abc) /xyz (xyz) >> def\n\nd0 3 get == clear\nd0 true get == clear\nd0 false get == clear\nd0 (abc) get == clear\nd0 (xyz) get == clear\n" }, { "path": "Tmain/optscript.d/dictx.expected", "content": "-dict:0-\n-dict:1-\n-dict:0-\n-dict:1-\n-dict:0-\n-dict:1-\nrangecheck\nnull\n-dict:0-\n-dict:1-\n-dict:1-\n-dict:2-\n-dict:2-\n-dict:3-\nunmatchedmark\nrangecheck\nnull\n" }, { "path": "Tmain/optscript.d/dictx.ps", "content": "0 dict == clear\n0 dict dup /x 1 put == clear\n1 dict ==\n1 dict dup /y 2 put == clear\n2 dict ==\n2 dict dup /z 2 put == clear\n\n{\n { -1 dict } stopped {\n _errorname =\n stop\n } if\n} stopped pop\n_errorname =\n\n<< >> == clear\n<<>> dup /x 0 put == clear\n\n<< /x 0 >> ==\n<> dup /y 1 put == clear\n\n<< /x 0 /y 1 >> ==\n<< /x 0 /y 1 >> dup /z 2 put == clear\n\n{\n { >> } stopped {\n _errorname =\n stop\n } if\n} stopped pop\n\n{\n { << /a >> } stopped {\n _errorname =\n stop\n } if\n} stopped pop\n_errorname =\n" }, { "path": "Tmain/optscript.d/error-undefined-if-if.expected", "content": "Error: /undefined in a\nOperand stack:\ntop| |bottom\nExecution stack:\ntop| a {a} --if-- {true {a} if} --if-- |bottom\nDictionary stack:\ntop| -dict:1- -dict:91- |bottom\n" }, { "path": "Tmain/optscript.d/error-undefined-if-if.ps", "content": "true { true { a } if } if\n" }, { "path": "Tmain/optscript.d/error-undefined-if.expected", "content": "Error: /undefined in a\nOperand stack:\ntop| |bottom\nExecution stack:\ntop| a {a} --if-- |bottom\nDictionary stack:\ntop| -dict:1- -dict:91- |bottom\n" }, { "path": "Tmain/optscript.d/error-undefined-if.ps", "content": "true { a } if\n" }, { "path": "Tmain/optscript.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/optscript.d/misc.expected", "content": "(--------------- bind ---------------)\n{--add-- {--add--}}\n({--add-- {--add--}} ->)\n1\n{--[-- 1 1 --add-- --]--}\n" }, { "path": "Tmain/optscript.d/misc.ps", "content": "(--------------- bind ---------------) ==\n({--add-- {--add--}} ->)\n{ add { add } } bind pstack clear\n{ 1 } bind exec pstack clear\n{ [ 1 1 add ] } bind pstack\n" }, { "path": "Tmain/optscript.d/pstack.expected", "content": "false\ntrue\nnull\n-dict:1-\n[{/add} {add}]\n{/add}\n{add}\n{/a /b /c}\n[/a /b /c]\n[1 2 3]\n-mark-\n(abc)\n/a\n1\n" }, { "path": "Tmain/optscript.d/pstack.ps", "content": "1\n/a\n(abc)\nmark\n[ 1 2 3 ]\n[ /a /b /c ]\n{ /a /b /c }\n{ add }\n{ /add }\n[ { /add } { add } ]\n<< /a { /add } >>\nnull\ntrue\nfalse\n% This isn't printed well.\n% { [ abc ] [ /abc ] }\n\npstack\n" }, { "path": "Tmain/optscript.d/read-and-print.expected", "content": "(array)\n[/a /b]\n[/abc /efg]\n[/1 /b]\n[/a /2]\n[/123 /123]\n(dict)\n/b\n/b\n/efg\n/efg\n/2\n/2\n/123\n/123\n(cvn)\n//a\n//a /x\n(immediate)\n1\n(a\\nb\\tc\\rd\\fe)\n(abcd\\n\\f\\r\\v\\t z)\n0\n[0]\n[-10]\n[0 -10]\nabc\nefg\n-dict:5-\n-dict:5-\n<<\n 98 /ab\n 99 (efg)\n 100 -dict:4-\n 10 /===\n 97 1\n>> \n<<\n 98 /ab\n 99 (efg)\n 100 <<\n 101 2\n 102 /ef\n 103 (xyz)\n 104 <<\n 105 3\n 106 /ij\n >> \n >> \n 10 /====\n 97 1\n>> \n[-dict:6-]\n[-dict:6-]\n[<<\n 98 /ab\n 99 (efg)\n 100 -dict:4-\n 10 /===\n 122 [-dict:2-]\n 97 1\n>> ]\n[<<\n 98 /ab\n 99 (efg)\n 100 <<\n 101 2\n 102 /ef\n 103 (xyz)\n 104 <<\n 105 3\n 106 /ij\n 107 [<<\n 88 1\n 89 [0 1 2]\n >> ]\n >> \n >> \n 10 /====\n 122 [<<\n 66 [0 1 2]\n 65 1\n >> ]\n 97 1\n>> ]\nchar after metachar\n[97]\n[10]\n" }, { "path": "Tmain/optscript.d/read-and-print.ps", "content": "/pc { pstack clear } def\n/dpc { get pstack clear } def\n(array) pc\n[/a /b] pc\n[/abc /efg] pc\n[/1 /b] pc\n[/a /2] pc\n[/123 /123] pc\n(dict) pc\n<< /a /b >> /a dpc\n<> /a dpc\n<< /abc /efg >> /abc dpc\n<> /abc dpc\n<< /1 /2 >> /1 dpc\n<> /1 dpc\n<< /123 /123 >> /123 dpc\n<> /123 dpc\n(cvn) pc\n(/a) cvn pc\n% gsnd prints \"//a /x\" for the next code.\n(/a /x) cvn pc\n(immediate) pc\n/a 1 def\n//a pc\n(a\\nb\\tc\\rd\\fe) pc\n\n/str () def\nstr 0 ?a put\nstr 1 ?b put\nstr 2 ?c put\nstr 3 ?d put\nstr 4 ?\\n put\nstr 5 ?\\f put\nstr 6 ?\\r put\nstr 7 ?\\v put\nstr 8 ?\\t put\nstr 9 ?\\ put\nstr 10 ?z put\nstr ==\n/-a { add } def\n-500 500 -a ==\n[0] ==\n[-10] ==\n[0 -10] ==\n\n/abc =\n(efg) =\n\n/inject {\n % target key val\n 2 index type /dicttype eq {\n 2 index 3 1 roll put\n } {\n 2 index 0 get\n % array key val dict\n 3 1 roll put\n } ifelse\n} def\n\n/debug= {\n 10 /= inject dup =\n 10 /== inject dup ==\n 10 /=== inject dup ===\n 10 /==== inject dup ====\n pop\n} def\n\n% names cannot be used for keys because\n% the test output becomes unstable.\n%\n<< 10 null\n 97 1\n 98 /ab\n 99 (efg)\n 100 <<\n 101 2\n 102 /ef\n 103 (xyz)\n 104 <<\n 105 3\n 106 /ij\n >>\n >>\n>>\ndebug=\n\n[\n<< 10 null\n 97 1\n 98 /ab\n 99 (efg)\n 100 <<\n 101 2\n 102 /ef\n 103 (xyz)\n 104 <<\n 105 3\n 106 /ij\n 107 [ << 88 1 89 [ 0 1 2 ] >> ]\n >>\n >>\n 122 [ << 65 1 66 [ 0 1 2 ] >> ]\n>>\n]\ndebug=\n\n(char after metachar) =\n[?a] ==\n[?\\n] ==\n" }, { "path": "Tmain/optscript.d/relalogbits.expected", "content": "true\n(2 2 eq)\nfalse\n(2 0 eq)\nfalse\n(2 /a eq)\nfalse\n(2 true eq)\nfalse\n(2 false eq)\nfalse\n(2 << >> eq)\nfalse\n(2 [ ] eq)\nfalse\n(2 { } eq)\nfalse\n(2 \\( \\) eq)\nfalse\n(2 null eq)\ntrue\n(/a /a eq)\nfalse\n(/a /b eq)\nfalse\n(/a \\(a\\) eq)\n(----------------------- logical operators -----------------------)\ntrue\n(true true and => true )\nfalse\n(false true and => false)\nfalse\n(true false and => false)\nfalse\n(false false and => false)\ntrue\n(true true or => true )\ntrue\n(false true or => true )\ntrue\n(true false or => true )\nfalse\n(false false or => false)\nfalse\n(true true xor => false)\ntrue\n(false true xor => true )\ntrue\n(true false xor => true )\nfalse\n(false false xor => false)\nfalse\n(true not => false)\ntrue\n(false not => true )\n(----------------------- comparison -----------------------)\nfalse\n(1 2 gt => false)\nfalse\n(1 1 gt => false)\ntrue\n(2 1 gt => true )\nfalse\n(1 2 ge => false)\ntrue\n(1 1 ge => true )\ntrue\n(2 1 ge => true )\ntrue\n(1 2 lt => true )\nfalse\n(1 1 lt => false)\nfalse\n(2 1 lt => false)\ntrue\n(1 2 le => true )\ntrue\n(1 1 le => true )\nfalse\n(2 1 le => false)\nfalse\n(\\(a\\) \\(b\\) gt => false)\nfalse\n(\\(a\\) \\(a\\) gt => false)\ntrue\n(\\(b\\) \\(a\\) gt => true )\nfalse\n(\\(a\\) \\(b\\) ge => false)\ntrue\n(\\(a\\) \\(a\\) ge => true )\ntrue\n(\\(b\\) \\(a\\) ge => true )\ntrue\n(\\(a\\) \\(b\\) lt => true )\nfalse\n(\\(a\\) \\(a\\) lt => false)\nfalse\n(\\(b\\) \\(a\\) lt => false)\ntrue\n(\\(a\\) \\(b\\) le => true )\ntrue\n(\\(a\\) \\(a\\) le => true )\nfalse\n(\\(b\\) \\(a\\) le => false)\n(----------------------- bit operators -----------------------)\n0\n(0 0 and => 0)\n0\n(0 1 and => 0)\n1\n(1 1 and => 1)\n1\n(3 1 and => 1)\n0\n(2 1 and => 0)\n0\n(0 0 or => 0)\n1\n(0 1 or => 1)\n1\n(1 1 or => 1)\n3\n(3 1 or => 3)\n3\n(2 1 or => 3)\n0\n(0 0 xor => 0)\n1\n(0 1 xor => 1)\n0\n(1 1 xor => 0)\n2\n(3 1 xor => 2)\n3\n(2 1 xor => 3)\n-1\n(0 not => 0)\n-2\n(1 not => -2)\n1\n(1 not not => 1)\n56\n(7 3 bitshift => 56)\n17\n(142 -3 bitshift => 17)\n" }, { "path": "Tmain/optscript.d/relalogbits.ps", "content": "/pc { pstack clear } def\n(2 2 eq) 2 2 eq pc\n(2 0 eq) 2 0 eq pc\n(2 /a eq) 2 /a eq pc\n(2 true eq) 2 true eq pc\n(2 false eq) 2 false eq pc\n(2 << >> eq) 2 << >> eq pc\n(2 [ ] eq) 2 [ ] eq pc\n(2 { } eq) 2 { } eq pc\n(2 \\( \\) eq) 2 ( ) eq pc\n(2 null eq) 2 null eq pc\n\n(/a /a eq) /a /a eq pc\n(/a /b eq) /a /b eq pc\n(/a \\(a\\) eq) /a (a) eq pc\n\n(----------------------- logical operators -----------------------) ==\n(true true and => true ) true true and pc\n(false true and => false) false true and pc\n(true false and => false) true false and pc\n(false false and => false) false false and pc\n\n(true true or => true ) true true or pc\n(false true or => true ) false true or pc\n(true false or => true ) true false or pc\n(false false or => false) false false or pc\n\n(true true xor => false) true true xor pc\n(false true xor => true ) false true xor pc\n(true false xor => true ) true false xor pc\n(false false xor => false) false false xor pc\n\n(true not => false) true not pc\n(false not => true ) false not pc\n\n(----------------------- comparison -----------------------) ==\n(1 2 gt => false) 1 2 gt pc\n(1 1 gt => false) 1 1 gt pc\n(2 1 gt => true ) 2 1 gt pc\n\n(1 2 ge => false) 1 2 ge pc\n(1 1 ge => true ) 1 1 ge pc\n(2 1 ge => true ) 2 1 ge pc\n\n(1 2 lt => true ) 1 2 lt pc\n(1 1 lt => false) 1 1 lt pc\n(2 1 lt => false) 2 1 lt pc\n\n(1 2 le => true ) 1 2 le pc\n(1 1 le => true ) 1 1 le pc\n(2 1 le => false) 2 1 le pc\n\n((a) (b) gt => false) (a) (b) gt pc\n((a) (a) gt => false) (a) (a) gt pc\n((b) (a) gt => true ) (b) (a) gt pc\n\n((a) (b) ge => false) (a) (b) ge pc\n((a) (a) ge => true ) (a) (a) ge pc\n((b) (a) ge => true ) (b) (a) ge pc\n\n((a) (b) lt => true ) (a) (b) lt pc\n((a) (a) lt => false) (a) (a) lt pc\n((b) (a) lt => false) (b) (a) lt pc\n\n((a) (b) le => true ) (a) (b) le pc\n((a) (a) le => true ) (a) (a) le pc\n((b) (a) le => false) (b) (a) le pc\n\n(----------------------- bit operators -----------------------) ==\n(0 0 and => 0) 0 0 and pc\n(0 1 and => 0) 0 1 and pc\n(1 1 and => 1) 1 1 and pc\n(3 1 and => 1) 3 1 and pc\n(2 1 and => 0) 2 1 and pc\n\n(0 0 or => 0) 0 0 or pc\n(0 1 or => 1) 0 1 or pc\n(1 1 or => 1) 1 1 or pc\n(3 1 or => 3) 3 1 or pc\n(2 1 or => 3) 2 1 or pc\n\n(0 0 xor => 0) 0 0 xor pc\n(0 1 xor => 1) 0 1 xor pc\n(1 1 xor => 0) 1 1 xor pc\n(3 1 xor => 2) 3 1 xor pc\n(2 1 xor => 3) 2 1 xor pc\n\n(0 not => 0) 0 not pc\n(1 not => -2) 1 not pc\n(1 not not => 1) 1 not not pc\n\n(7 3 bitshift => 56) 7 3 bitshift pc\n(142 -3 bitshift => 17) 142 -3 bitshift pc\n" }, { "path": "Tmain/optscript.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nBUILDDIR=$2\nOPTSCRIPT=$4\n\n. ../utils.sh\n\nif ! [ -x \"${OPTSCRIPT}\" ]; then\n\tskip \"no optscript\"\nfi\n\n\n_VALGRIND_EXIT=58\n\nif type valgrind > /dev/null 2>&1; then\n\tV()\n\t{\n\t\tvlog=$1\n\t\tshift\n\t\tvalgrind --leak-check=full --error-exitcode=${_VALGRIND_EXIT} --log-file=\"${vlog}\" \"$@\"\n\t}\nelse\n\tV()\n\t{\n\t\tvlog=$1\n\t\tshift\n\t\ttouch $vlog\n\t\t\"$@\"\n\t}\nfi\n\nrm -f ${BUILDDIR}/*.tmp\n\nfor i in $(ls *.ps); do\n printf \"%s\" \"${i}...\"\n o=${BUILDDIR}/$(basename $i .ps).out.tmp\n e=$(basename $i .ps).expected\n\tv=${BUILDDIR}/$(basename $i .ps).valgrind.tmp\n\n\tcase $i in\n\t\terror-*.ps)\n\t\t\tV $v ${OPTSCRIPT} $i > $o 2>&1\n\t\t\t;;\n\t\t*)\n\t\t\tV $v ${OPTSCRIPT} $i > $o\n\t\t\t;;\n\tesac\n\ts=$?\n printf \"%s\" \"$s\"\n\n\tif [ \"$s\" = \"$_VALGRIND_EXIT\" ]; then\n\t\techo\n\t\tcat $v;\n\t\texit $_VALGRIND_EXIT\n\tfi\n\n\tcase $s-$i in\n\t\t*-error-*.ps|0-*)\n\t\t\techo\n\t\t\tif diff -ruN --strip-trailing-cr $e $o; then\n\t\t\t rm $o\n\t\t\t rm $v\n\t\t\tfi\n\t\t\t;;\n\t\t*)\n\t\t\techo ERROR\n\t\t\t;;\n esac\ndone\n" }, { "path": "Tmain/optscript.d/stack.expected", "content": "/b\n/a\n/a\n/a\n-mark-\n/a\n/a\n-mark-\n/z\n/y\n/z\n/y\n/x\n/z\n/z\n/y\n/x\n/z\n/y\n/x\n/x\n/z\n/y\n/x\n/z\n/y\n/x\n/p\n/r\n/q\n/r\n/q\n/p\n3\n3\n/A\n/rangecheck\n" }, { "path": "Tmain/optscript.d/stack.ps", "content": "/a /b pstack\npop pstack\nmark exch pstack\ndup pstack\nclear\n/x /y /z 2 copy pstack\npop pop 1 copy pstack\npop 0 copy pstack\n2 index pstack\nclear\n/x /y /z 0 index ==\n/x /y /z 1 index ==\n/x /y /z 2 index ==\nclear\n/p /q /r 3 -1 roll pstack\n3 1 roll pstack\ncount ==\nmark 4 1 roll\ncounttomark ==\n/A 5 1 roll\ncleartomark\npstack\n{ (a) (b) (c) -1 3 roll } stopped {\n _errorname ==\n} {\n (RANGECHECK error is expected but got NONE) ==\n} ifelse\nclear\n" }, { "path": "Tmain/optscript.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/optscript.d/stdout-expected.txt", "content": "arithmetic.ps...0\narray.ps...0\narrayx.ps...0\ncompound.ps...0\ncontrol.ps...0\ndict.ps...0\ndictx.ps...0\nerror-undefined-if-if.ps...1\nerror-undefined-if.ps...1\nmisc.ps...0\npstack.ps...0\nread-and-print.ps...0\nrelalogbits.ps...0\nstack.ps...0\nstring.ps...0\ntypeattrconv.ps...0\n" }, { "path": "Tmain/optscript.d/string.expected", "content": "(--------------- string ---------------)\n32\n32\n32\n(32 32 32 ->)\n(--------------- _strstr ---------------)\ntrue\n0\n(abcdefgab)\n(\\(abcdefgab\\) 0 true->)\ntrue\n5\n(abcdefgab)\n(\\(abcdefgab\\) 5 true ->)\ntrue\n6\n(abcdefg)\n(\\(abcdefg\\) 6 true ->)\ntrue\n0\n(abcdefg)\n(\\(abcdefg\\) 0 true ->)\nfalse\n(abcdefg)\n(\\(abcdefg\\) false ->)\n(--------------- _strrstr ---------------)\ntrue\n7\n(abcdefgab)\n(\\(abcdefgab\\) 7 true->)\ntrue\n5\n(abcdefgab)\n(\\(abcdefgab\\) 5 true ->)\ntrue\n6\n(abcdefg)\n(\\(abcdefg\\) 6 true ->)\ntrue\n7\n(abcdefg)\n(\\(abcdefg\\) 7 true ->)\nfalse\n(abcdefg)\n(\\(abcdefg\\) false ->)\n(--------------- _strchr/_strrchr ---------------)\ntrue\n0\n(aba)\n(\\(aba\\) 0 true ->)\ntrue\n2\n(aba)\n(\\(aba\\) 2 true ->)\ntrue\n1\n(aba)\n(\\(aba\\) 1 true ->)\ntrue\n1\n(aba)\n(\\(aba\\) 1 true ->)\nfalse\n(aba)\n(\\(aba\\) false ->)\nfalse\n(aba)\n(\\(aba\\) false ->)\n(--------------- _strpbrk ---------------)\ntrue\n1\n(a.b;c)\n(\\(a.b;c\\) 1 true ->)\nfalse\n(a.b;c)\n(\\(a.b;c\\) false ->)\n" }, { "path": "Tmain/optscript.d/string.ps", "content": "(--------------- string ---------------) ==\n(32 32 32 ->)\n3 string { } forall pstack clear\n(--------------- _strstr ---------------) ==\n((abcdefgab) 0 true->)\n(abcdefgab) (ab) _strstr pstack clear\n\n((abcdefgab) 5 true ->)\n(abcdefgab) (fg) _strstr pstack clear\n\n((abcdefg) 6 true ->)\n(abcdefg) (g) _strstr pstack clear\n\n((abcdefg) 0 true ->)\n(abcdefg) () _strstr pstack clear\n\n((abcdefg) false ->)\n(abcdefg) (z) _strstr pstack clear\n\n(--------------- _strrstr ---------------) ==\n((abcdefgab) 7 true->)\n(abcdefgab) (ab) _strrstr pstack clear\n\n((abcdefgab) 5 true ->)\n(abcdefgab) (fg) _strrstr pstack clear\n\n((abcdefg) 6 true ->)\n(abcdefg) (g) _strrstr pstack clear\n\n((abcdefg) 7 true ->)\n(abcdefg) () _strrstr pstack clear\n\n((abcdefg) false ->)\n(abcdefg) (z) _strrstr pstack clear\n\n(--------------- _strchr/_strrchr ---------------) ==\n\n/char { 0 get } def\n\n((aba) 0 true ->)\n(aba) (a) char _strchr pstack clear\n\n((aba) 2 true ->)\n(aba) (a) char _strrchr pstack clear\n\n((aba) 1 true ->)\n(aba) (b) char _strchr pstack clear\n\n((aba) 1 true ->)\n(aba) (b) char _strrchr pstack clear\n\n((aba) false ->)\n(aba) (c) char _strchr pstack clear\n\n((aba) false ->)\n(aba) (c) char _strrchr pstack clear\n\n(--------------- _strpbrk ---------------) ==\n\n((a.b;c) 1 true ->)\n(a.b;c) (;.) _strpbrk pstack clear\n\n((a.b;c) false ->)\n(a.b;c) (,-) _strpbrk pstack clear\n" }, { "path": "Tmain/optscript.d/typeattrconv.expected", "content": "true\nbooleantype\nfalse\nbooleantype\nnull\nnulltype\n2\nintegertype\n(abc)\nstringtype\n/name\nnametype\n--add--\noperatortype\n-mark-\nmarktype\n[1 2 3]\narraytype\n-dict:1-\ndicttype\n{add}\narraytype\n/xyz\n(abc)\n(efg)\n(true)\n(false)\n(99)\n(-309)\n(--nulltype--)\n(--arraytype--)\n(--dicttype--)\n(--arraytype--)\n3\nabc\n/abc\ntrue\n{}\n[]\ntrue\n" }, { "path": "Tmain/optscript.d/typeattrconv.ps", "content": "/type1 { dup == type == clear } def\n\ntrue type1\nfalse type1\nnull type1\n2 type1\n(abc) type1\n/name type1\n/add load type1\nmark type1\n[ 1 2 3 ] type1\n<< /a 1 >> type1\n{ add } type1\n\n(xyz) cvn ==\n\n(abc) 0 string cvs ==\n/efg 0 string cvs ==\ntrue 0 string cvs ==\nfalse 0 string cvs ==\n99 0 string cvs ==\n-309 0 string cvs ==\nnull 0 string cvs ==\n[ ] 0 string cvs ==\n<< >> 0 string cvs ==\n{ } 0 string cvs ==\n\n1 cvx 2 cvx [ /add cvx ] cvx exec ==\n\n{ /abc dup cvx pstack eq == } exec\n{ [ ] dup cvx pstack eq == } exec\n" }, { "path": "Tmain/output-encoding-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/output-encoding-option.d/input.java", "content": "class Foo { // Fooクラス\n\tpublic Foo() { // コンストラクタ\n\t}\n}\n" }, { "path": "Tmain/output-encoding-option.d/input.js", "content": "var a = 1; // ѿ\n" }, { "path": "Tmain/output-encoding-option.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2015 Yasuhiro MATSUMOTO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nif ${CTAGS} --quiet --options=NONE --list-features | grep -q iconv; then\n check_encoding shift_jis\n check_encoding utf-8\n check_encoding euc-jp\n if ${CTAGS} --quiet --options=NONE \\\n\t --pseudo-tags=-TAG_PROC_CWD \\\n\t --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t --pseudo-tags=-TAG_KIND_DESCRIPTION \\\n\t --pseudo-tags=-TAG_FIELD_DESCRIPTION \\\n\t --pseudo-tags=-TAG_EXTRA_DESCRIPTION \\\n\t --pseudo-tags=-TAG_ROLE_DESCRIPTION \\\n\t --pseudo-tags=-TAG_PARSER_VERSION \\\n\t --pseudo-tags=-TAG_OUTPUT_VERSION \\\n\t --output-encoding=shift_jis --input-encoding=utf-8 --input-encoding-javascript=euc-jp \\\n\t -o ${BUILDDIR}/tags \\\n\t input.js input.java ; then\n remove_commit_id ${BUILDDIR}/tags\n fi\n exit $?\nelse\n\tskip \"iconv feature is not available\"\nfi\n" }, { "path": "Tmain/output-encoding-option.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/output-encoding-option.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/output-encoding-option.d/tags-expected.txt", "content": "!_TAG_FILE_ENCODING\tshift_jis\t//\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\nFoo\tinput.java\t/^\tpublic Foo() { \\/\\/ RXgN^$/;\"\tm\tclass:Foo\nFoo\tinput.java\t/^class Foo { \\/\\/ FooNX$/;\"\tc\na\tinput.js\t/^var a = 1; \\/\\/ ϐ$/;\"\tv\n" }, { "path": "Tmain/output-file-resource-management.d/input.c", "content": "int\nmain(void)\n{\n}\n" }, { "path": "Tmain/output-file-resource-management.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nexit_status_for_input_c $CTAGS NONE -o - --sort=no\nexit_status_for_input_c $CTAGS $BUILDDIR/tags -o $BUILDDIR/tags --sort=no\nexit_status_for_input_c $CTAGS $BUILDDIR/tags -o $BUILDDIR/tags\nexit_status_for_input_c $CTAGS NONE -o -\n\nexit_status_for_input_c $CTAGS NONE -e -o - --sort=no\nexit_status_for_input_c $CTAGS $BUILDDIR/TAGS -e -o $BUILDDIR/TAGS --sort=no\nexit_status_for_input_c $CTAGS $BUILDDIR/TAGS -e -o $BUILDDIR/TAGS\nexit_status_for_input_c $CTAGS NONE -e -o -\n\nexit_status_for_input_c $CTAGS NONE -x -o - --sort=no\nexit_status_for_input_c $CTAGS $BUILDDIR/tags-x -x -o $BUILDDIR/tags-x --sort=no\nexit_status_for_input_c $CTAGS $BUILDDIR/tags-x -x -o $BUILDDIR/tags-x\nexit_status_for_input_c $CTAGS NONE -x -o -\n" }, { "path": "Tmain/output-file-resource-management.d/stdout-expected.txt", "content": "-o - --sort=no => ok\n-o tags --sort=no => ok\n-o tags => ok\n-o - => ok\n-e -o - --sort=no => ok\n-e -o TAGS --sort=no => ok\n-e -o TAGS => ok\n-e -o - => ok\n-x -o - --sort=no => ok\n-x -o tags-x --sort=no => ok\n-x -o tags-x => ok\n-x -o - => ok\n" }, { "path": "Tmain/output-format-option.d/input.c", "content": "int\nmain(void)\n{\n return 0;\n}\n" }, { "path": "Tmain/output-format-option.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nrun_with_format u-ctags\nrun_with_format etags\nrun_with_format xref\n" }, { "path": "Tmain/output-format-option.d/stdout-expected.txt", "content": "# u-ctags\nmain\tinput.c\t/^main(void)$/;\"\tf\ttyperef:typename:int\n# etags\n\f\ninput.c,20\nmain(void)main\u00012,4\n# xref\nmain function 2 input.c main(void)\n" }, { "path": "Tmain/output-input-field-with-no-escape.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\n\n\nif ! ( echo '#define foo' > 'a\\b.c' ) 2> /dev/null; then\n\t skip \"unsuitable platform to run this test\"\nfi\n\necho '# u-ctags'\n${CTAGS} --options=NONE --pseudo-tags=TAG_OUTPUT_MODE --extras=+p --output-format=u-ctags -o - 'a\\b.c'\n\necho '# e-ctags'\n${CTAGS} --options=NONE --pseudo-tags=TAG_OUTPUT_MODE --extras=+p --output-format=e-ctags -o - 'a\\b.c'\n\nrm 'a\\b.c'\n" }, { "path": "Tmain/output-input-field-with-no-escape.d/stdout-expected.txt", "content": "# u-ctags\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\nfoo\ta\\\\b.c\t/^#define foo$/;\"\td\tfile:\n# e-ctags\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\nfoo\ta\\b.c\t/^#define foo$/;\"\td\tfile:\n" }, { "path": "Tmain/parser-init-useCork.d/input.x", "content": "func A\n var B\nend\n" }, { "path": "Tmain/parser-init-useCork.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --options=x.ctags -x --_xformat=\"%N %s %{end}\" input.x\nexit $?\n" }, { "path": "Tmain/parser-init-useCork.d/stdout-expected.txt", "content": "A 3\nB A \n" }, { "path": "Tmain/parser-init-useCork.d/x.ctags", "content": "--langdef=X\n--map-X=+.x\n--kinddef-X=f,func,functions\n--kinddef-X=v,var,variables\n\n# This triggers the parser initialization.\n--kinds-X=+{var}\n\n--regex-X=/^func +([A-Z])$/\\1/f/{scope=push}\n--regex-X=/^end$///{scope=pop}{placeholder}\n--regex-X=/^[ \\t]*var ([A-Z])$/\\1/v/{scope=ref}\n" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/input-0.x1", "content": "D:def00\nd:def01\nv:var0\n" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/input-1.x1", "content": "D:def10\nd:def11\nv:var1\n" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\nprintf \"# %s\\n\" --extras-X0=+'{iname}'\n${V} ${CTAGS} --quiet --options=NONE --options=./x0.ctags --options=./x1.ctags \\\n\t --extras-X0=+'{iname}' --fields=+'{extras}{language}' -o - input-0.x1\n\nprintf \"# %s\\n\" --extras-X0=-'{iname}'\n${V} ${CTAGS} --quiet --options=NONE --options=./x0.ctags --options=./x1.ctags \\\n\t --extras-X0=-'{iname}' --fields=+'{extras}{language}' -o - input-1.x1\n" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/stdout-expected.txt", "content": "# --extras-X0=+{iname}\n__def01__\tinput-0.x1\t/^d:def01$/;\"\td\tlanguage:X0\textras:iname\ndef00\tinput-0.x1\t/^D:def00$/;\"\td\tlanguage:X0\nvar0\tinput-0.x1\t/^v:var0$/;\"\tv\tlanguage:X1\n# --extras-X0=-{iname}\ndef10\tinput-1.x1\t/^D:def10$/;\"\td\tlanguage:X0\nvar1\tinput-1.x1\t/^v:var1$/;\"\tv\tlanguage:X1\n" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/x0.ctags", "content": "--langdef=X0\n--kinddef-X0=d,def,definitions\n--_extradef-X0=iname,internal name like __x__\n" }, { "path": "Tmain/parser-specific-extras-for-foreign-lang.d/x1.ctags", "content": "--langdef=X1{_foreignLanguage=X0}\n--map-X1=+.x1\n--kinddef-X1=v,var,variables\n--regex-X1=/D:([a-z0-9]+)$/\\1/d/{_language=X0}\n--regex-X1=/d:([a-z0-9]+)$/__\\1__/d/{_language=X0}{_extra=iname}\n--regex-X1=/v:([a-z0-9]+)$/\\1/v/\n" }, { "path": "Tmain/parser-specific-extras.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE --with-list-header=no\"\n\n${CTAGS} --quiet --options=NONE --extras='*' --list-extras=Robot\n${CTAGS} ${O} --extras-Robot=-'{whitespaceSwapped}' --list-extras=Robot\n${CTAGS} ${O} --extras-Robot=-'{whitespaceSwapped}' --extras-Robot=+'{whitespaceSwapped}' --list-extras=Robot\n${CTAGS} ${O} --extras-all=-'{whitespaceSwapped}' --list-extras=Robot\n${CTAGS} ${O} --extras-all=-'{whitespaceSwapped}' --extras-all=+'{whitespaceSwapped}' --list-extras=Robot\n${CTAGS} ${O} --extras-all=-'{whitespaceSwapped}' --extras-Robot=+'{whitespaceSwapped}' --list-extras=Robot\n${CTAGS} ${O} --extras-Robot=-'{whitespaceSwapped}' --extras-all=+'{whitespaceSwapped}' --list-extras=Robot\n" }, { "path": "Tmain/parser-specific-extras.d/stdout-expected.txt", "content": "#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n- whitespaceSwapped no Robot no 0 Include tags swapping whitespace and underscore chars\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n- whitespaceSwapped no Robot no 0 Include tags swapping whitespace and underscore chars\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n- whitespaceSwapped yes Robot no 0 Include tags swapping whitespace and underscore chars\n" }, { "path": "Tmain/parser-specific-fields-clearing-all.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\necho \"# default\"\n${CTAGS} --quiet --options=NONE --with-list-header=no\\\n\t\t --list-fields=LdScript\n\necho \"# clear all\"\n${CTAGS} --quiet --options=NONE --with-list-header=no\\\n\t\t --fields-LdScript= --list-fields=LdScript\n" }, { "path": "Tmain/parser-specific-fields-clearing-all.d/stdout-expected.txt", "content": "# default\n- assignment yes LdScript s-- no -- 0 how a value is assigned to the symbol\n# clear all\n- assignment no LdScript s-- no -- 0 how a value is assigned to the symbol\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang-in-json.d/input.unknownx", "content": "public func foo(n, m);\nprotected func bar(n);\nprivate func baz(n,...);\nSTR:strset@iamowner\nSTR:setsetempty@\nSTR:notset\nY:iamowner2=tagme2\nZ:tagme-z@iamowner-z\neset:a\nenoset:b\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang-in-json.d/knownz.ctags", "content": "--langdef=knownz\n--kinddef-knownz=m,mark,makers\n\n--_fielddef-knownz=owner,the owner of the markers{datatype=str}\n\n--_fielddef-knownz=len,the length of owner string{datatype=int}\n--fields-knownz=+{len}\n--_fielddef-knownz=lenplus,the length of owner string + 1{datatype=int}\n--fields-knownz=+{lenplus}\n\n--_fielddef-knownz=exported,whether the marker is exported or not{datatype=bool}\n--fields-knownz=+{exported}\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang-in-json.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\nis_feature_available \"${CTAGS}\" json\n\necho \"# output: json\"\n${V} ${CTAGS} --options=NONE --options=./knownz.ctags --sort=no --options=./unknownx.ctags \\\n\t --fields=+l \\\n\t --fields-unknownx=+'{protection}{signature}' \\\n\t --fields-knownz=+'{owner}' \\\n\t --output-format=json \\\n\t -o - input.unknownx\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang-in-json.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang-in-json.d/stdout-expected.txt", "content": "# output: json\n{\"_type\": \"tag\", \"name\": \"foo\", \"path\": \"input.unknownx\", \"pattern\": \"/^public func foo(n, m);$/\", \"language\": \"unknownx\", \"kind\": \"func\", \"protection\": \"public \", \"signature\": \"(n, m)\"}\n{\"_type\": \"tag\", \"name\": \"bar\", \"path\": \"input.unknownx\", \"pattern\": \"/^protected func bar(n);$/\", \"language\": \"unknownx\", \"kind\": \"func\", \"protection\": \"protected \", \"signature\": \"(n)\"}\n{\"_type\": \"tag\", \"name\": \"baz\", \"path\": \"input.unknownx\", \"pattern\": \"/^private func baz(n,...);$/\", \"language\": \"unknownx\", \"kind\": \"func\", \"protection\": \"private \", \"signature\": \"(n,...)\"}\n{\"_type\": \"tag\", \"name\": \"strset\", \"path\": \"input.unknownx\", \"pattern\": \"/^STR:strset@iamowner$/\", \"language\": \"knownz\", \"kind\": \"mark\", \"owner\": \"iamowner\"}\n{\"_type\": \"tag\", \"name\": \"setsetempty\", \"path\": \"input.unknownx\", \"pattern\": \"/^STR:setsetempty@$/\", \"language\": \"knownz\", \"kind\": \"mark\", \"owner\": \"\"}\n{\"_type\": \"tag\", \"name\": \"notset\", \"path\": \"input.unknownx\", \"pattern\": \"/^STR:notset$/\", \"language\": \"knownz\", \"kind\": \"mark\"}\n{\"_type\": \"tag\", \"name\": \"tagme2\", \"path\": \"input.unknownx\", \"pattern\": \"/^Y:iamowner2=tagme2$/\", \"language\": \"knownz\", \"kind\": \"mark\", \"owner\": \"iamowner2\"}\n{\"_type\": \"tag\", \"name\": \"tagme-z\", \"path\": \"input.unknownx\", \"pattern\": \"/^Z:tagme-z@iamowner-z$/\", \"language\": \"knownz\", \"kind\": \"mark\", \"owner\": \"iamowner-z\", \"len\": 10, \"lenplus\": 11}\n{\"_type\": \"tag\", \"name\": \"a\", \"path\": \"input.unknownx\", \"pattern\": \"/^eset:a$/\", \"language\": \"knownz\", \"kind\": \"mark\", \"exported\": true}\n{\"_type\": \"tag\", \"name\": \"b\", \"path\": \"input.unknownx\", \"pattern\": \"/^enoset:b$/\", \"language\": \"knownz\", \"kind\": \"mark\"}\n{\"_type\": \"tag\", \"name\": \"9_exported\", \"path\": \"input.unknownx\", \"pattern\": \"/^enoset:b$/\", \"language\": \"knownz\", \"kind\": \"mark\"}\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang-in-json.d/unknownx.ctags", "content": "--langdef=unknownx{_foreignLanguage=knownz}\n--kinddef-unknownx=f,func,functions\n--map-unknownx=+.unknownx\n\n--_fielddef-unknownx=protection,protections\n--_fielddef-unknownx=signature,signatures\n\n--_prelude-unknownx={{\n /exported false def\n}}\n\n--regex-unknownx=/^((public|protected|private) +)?func ([^\\(]+)\\((.*)\\)/\\3/f/{_field=protection:\\1}{_field=signature:(\\4)}\n--regex-unknownx=/^STR:([a-z]+)@([a-z]+)/\\1/m/{_language=knownz}{_field=owner:\\2}\n--regex-unknownx=/^STR:([a-z]+)@$/\\1/m/{_language=knownz}{_field=owner:}\n--regex-unknownx=/^STR:([a-z]+)$/\\1/m/{_language=knownz}\n--regex-unknownx=/^Y:([a-z0-9]+)=([a-z0-9]+)/\\2/m/{_field=owner:\\1}{_language=knownz}\n--regex-unknownx=/^Z:([-a-z]+)@([-a-z]+)/\\1/m/{_language=knownz}{{\n . \\2 knownz.owner:\n . :knownz.owner {\n . exch length knownz.len:\n } if\n . :knownz.len {\n 1 add\n . exch knownz.lenplus:\n } if\n}}\n\n--regex-unknownx=/^eset:([-a-z]+)/\\1/m/{_language=knownz}{{\n /exported . def\n . true knownz.exported:\n}}\n\n--regex-unknownx=/^enoset:([-a-z]+)/\\1/m/{_language=knownz}{{\n . false knownz.exported:\n exported :knownz.exported and {\n mark exported 0 string cvs (_exported) _buildstring\n /knownz\n /mark\n 1@ _foreigntag _commit pop\n } if\n}}\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang.d/input.unknownx", "content": "public func foo(n, m);\nprotected func bar(n);\nprivate func baz(n,...);\nSTR:strset@iamowner\nSTR:setsetempty@\nSTR:notset\nY:iamowner2=tagme2\nZ:tagme-z@iamowner-z\neset:a\nenoset:b\n\nstb:o\nstb:p-\nstb:q.something string\nx0:O\nx1:P\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang.d/knownz.ctags", "content": "--langdef=knownz\n--kinddef-knownz=m,mark,makers\n\n--_fielddef-knownz=owner,the owner of the markers{datatype=str}\n\n--_fielddef-knownz=len,the length of owner string{datatype=int}\n--fields-knownz=+{len}\n--_fielddef-knownz=lenplus,the length of owner string + 1{datatype=int}\n--fields-knownz=+{lenplus}\n\n--_fielddef-knownz=exported,whether the marker is exported or not{datatype=bool}\n--fields-knownz=+{exported}\n\n--_fielddef-knownz=stb,string or false{datatype=str+bool}\n--fields-knownz=+{stb}\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\necho \"# output: tags\"\n${V} ${CTAGS} --options=NONE --options=./knownz.ctags --sort=no --options=./unknownx.ctags \\\n\t --fields=+l \\\n\t --fields-unknownx=+'{protection}{signature}' \\\n\t --fields-knownz=+'{owner}' \\\n\t -o - input.unknownx\n\necho \"# output: xref\"\n${V} ${CTAGS} --options=NONE --options=./knownz.ctags --sort=no --options=./unknownx.ctags \\\n\t --fields=+l \\\n\t --fields-unknownx=+'{protection}{signature}' \\\n\t --fields-knownz=+'{owner}' \\\n\t -x --_xformat=\"%N %l / owner:%{knownz.owner},len:%{knownz.len},lenplus:%{knownz.lenplus},exported:%{knownz.exported},stb:%{knownz.stb} / %{unknownx.protection}%{unknownx.signature}\" \\\n\t -o - input.unknownx\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\n/not-set\nfalse\n(something string)\n# Setting a string to a bool field\ntrue\ntrue\n# Setting a string to a int field\ntrue\n1\nctags: Notice: No options will be read from files or environment\n/not-set\nfalse\n(something string)\n# Setting a string to a bool field\ntrue\ntrue\n# Setting a string to a int field\ntrue\n1\n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang.d/stdout-expected.txt", "content": "# output: tags\nfoo\tinput.unknownx\t/^public func foo(n, m);$/;\"\tf\tlanguage:unknownx\tprotection:public \tsignature:(n, m)\nbar\tinput.unknownx\t/^protected func bar(n);$/;\"\tf\tlanguage:unknownx\tprotection:protected \tsignature:(n)\nbaz\tinput.unknownx\t/^private func baz(n,...);$/;\"\tf\tlanguage:unknownx\tprotection:private \tsignature:(n,...)\nstrset\tinput.unknownx\t/^STR:strset@iamowner$/;\"\tm\tlanguage:knownz\towner:iamowner\nsetsetempty\tinput.unknownx\t/^STR:setsetempty@$/;\"\tm\tlanguage:knownz\towner:\nnotset\tinput.unknownx\t/^STR:notset$/;\"\tm\tlanguage:knownz\ntagme2\tinput.unknownx\t/^Y:iamowner2=tagme2$/;\"\tm\tlanguage:knownz\towner:iamowner2\ntagme-z\tinput.unknownx\t/^Z:tagme-z@iamowner-z$/;\"\tm\tlanguage:knownz\towner:iamowner-z\tlen:10\tlenplus:11\na\tinput.unknownx\t/^eset:a$/;\"\tm\tlanguage:knownz\texported:\nb\tinput.unknownx\t/^enoset:b$/;\"\tm\tlanguage:knownz\n9_exported\tinput.unknownx\t/^enoset:b$/;\"\tm\tlanguage:knownz\no\tinput.unknownx\t/^stb:o$/;\"\tm\tlanguage:knownz\np\tinput.unknownx\t/^stb:p-$/;\"\tm\tlanguage:knownz\tstb:\nq\tinput.unknownx\t/^stb:q.something string$/;\"\tm\tlanguage:knownz\tstb:something string\nO\tinput.unknownx\t/^x0:O$/;\"\tm\tlanguage:knownz\texported:\nP\tinput.unknownx\t/^x1:P$/;\"\tm\tlanguage:knownz\tlen:1\n# output: xref\nfoo unknownx / owner:,len:,lenplus:,exported:-,stb: / public (n, m)\nbar unknownx / owner:,len:,lenplus:,exported:-,stb: / protected (n)\nbaz unknownx / owner:,len:,lenplus:,exported:-,stb: / private (n,...)\nstrset knownz / owner:iamowner,len:,lenplus:,exported:-,stb: / \nsetsetempty knownz / owner:,len:,lenplus:,exported:-,stb: / \nnotset knownz / owner:,len:,lenplus:,exported:-,stb: / \ntagme2 knownz / owner:iamowner2,len:,lenplus:,exported:-,stb: / \ntagme-z knownz / owner:iamowner-z,len:10,lenplus:11,exported:-,stb: / \na knownz / owner:,len:,lenplus:,exported:exported,stb: / \nb knownz / owner:,len:,lenplus:,exported:-,stb: / \n9_exported knownz / owner:,len:,lenplus:,exported:-,stb: / \no knownz / owner:,len:,lenplus:,exported:-,stb: / \np knownz / owner:,len:,lenplus:,exported:-,stb:- / \nq knownz / owner:,len:,lenplus:,exported:-,stb:something string / \nO knownz / owner:,len:,lenplus:,exported:exported,stb: / \nP knownz / owner:,len:1,lenplus:,exported:-,stb: / \n" }, { "path": "Tmain/parser-specific-fields-for-foreign-lang.d/unknownx.ctags", "content": "--langdef=unknownx{_foreignLanguage=knownz}\n--kinddef-unknownx=f,func,functions\n--map-unknownx=+.unknownx\n\n--_fielddef-unknownx=protection,protections\n--_fielddef-unknownx=signature,signatures\n\n--_prelude-unknownx={{\n /exported false def\n}}\n\n--regex-unknownx=/^((public|protected|private) +)?func ([^\\(]+)\\((.*)\\)/\\3/f/{_field=protection:\\1}{_field=signature:(\\4)}\n--regex-unknownx=/^STR:([a-z]+)@([a-z]+)/\\1/m/{_language=knownz}{_field=owner:\\2}\n--regex-unknownx=/^STR:([a-z]+)@$/\\1/m/{_language=knownz}{_field=owner:}\n--regex-unknownx=/^STR:([a-z]+)$/\\1/m/{_language=knownz}\n--regex-unknownx=/^Y:([a-z0-9]+)=([a-z0-9]+)/\\2/m/{_field=owner:\\1}{_language=knownz}\n--regex-unknownx=/^Z:([-a-z]+)@([-a-z]+)/\\1/m/{_language=knownz}{{\n . \\2 knownz.owner:\n . :knownz.owner {\n . exch length knownz.len:\n } if\n . :knownz.len {\n 1 add\n . exch knownz.lenplus:\n } if\n}}\n\n--regex-unknownx=/^eset:([-a-z]+)/\\1/m/{_language=knownz}{{\n /exported . def\n . true knownz.exported:\n}}\n\n--regex-unknownx=/^enoset:([-a-z]+)/\\1/m/{_language=knownz}{{\n . false knownz.exported:\n exported :knownz.exported and {\n mark exported 0 string cvs (_exported) _buildstring\n /knownz\n /mark\n 1@ _foreigntag _commit pop\n } if\n}}\n\n--regex-unknownx=/^stb:([a-z])$/\\1/m/{_language=knownz}{{\n . :knownz.stb {\n ==\n } {\n /not-set ==\n } ifelse\n}}\n--regex-unknownx=/^stb:([a-z])-$/\\1/m/{_language=knownz}{_field=stb:}{{\n . :knownz.stb {\n ==\n } {\n /not-set ==\n } ifelse\n}}\n--regex-unknownx=/^stb:([a-z])\\.(.*)$/\\1/m/{_language=knownz}{_field=stb:\\2}{{\n . :knownz.stb {\n ==\n } {\n /not-set ==\n } ifelse\n}}\n\n--regex-unknownx=/^x0:([a-zA-Z])$/\\1/m/{_language=knownz}{_field=exported:alpha}{{\n (# Setting a string to a bool field) =\n . :knownz.exported pstack clear\n}}\n\n# Setting string to a int field\n--regex-unknownx=/^x1:([a-zA-Z])$/\\1/m/{_language=knownz}{_field=len:alpha}{{\n (# Setting a string to a int field) =\n . :knownz.len pstack clear\n}}\n" }, { "path": "Tmain/parser-specific-fields-with-datatype.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/parser-specific-fields-with-datatype.d/input.testlang", "content": "str:s0\nstr:s1\nstr:s2\n\nint:i0\nint:i1\nint:i2\nint:i3\nint:i4\n\nbool:b0\nbool:b1\nbool:b2\n\nstrbool:sb0\nstrbool:sb1\nstrbool:sb2\n" }, { "path": "Tmain/parser-specific-fields-with-datatype.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --options=testlang.ctags -o - \\\n\t\t --output-format=u-ctags \\\n\t\t input.testlang\n" }, { "path": "Tmain/parser-specific-fields-with-datatype.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/parser-specific-fields-with-datatype.d/stdout-expected.txt", "content": "s0\tinput.testlang\t/^str:s0$/;\"\to\tstr:string\ns1\tinput.testlang\t/^str:s1$/;\"\to\tstr:\ns2\tinput.testlang\t/^str:s2$/;\"\to\ni0\tinput.testlang\t/^int:i0$/;\"\to\tint:10\ni1\tinput.testlang\t/^int:i1$/;\"\to\tint:-1\ni2\tinput.testlang\t/^int:i2$/;\"\to\tint:1\ni3\tinput.testlang\t/^int:i3$/;\"\to\tint:0\ni4\tinput.testlang\t/^int:i4$/;\"\to\nb0\tinput.testlang\t/^bool:b0$/;\"\to\tbool:\nb1\tinput.testlang\t/^bool:b1$/;\"\to\tbool:\nb2\tinput.testlang\t/^bool:b2$/;\"\to\nsb0\tinput.testlang\t/^strbool:sb0$/;\"\to\tstrbool:abc\nsb1\tinput.testlang\t/^strbool:sb1$/;\"\to\tstrbool:\nsb2\tinput.testlang\t/^strbool:sb2$/;\"\to\n" }, { "path": "Tmain/parser-specific-fields-with-datatype.d/testlang.ctags", "content": "--sort=no\n\n--langdef=Testlang\n--map-Testlang=+.testlang\n\n--kinddef-Testlang=o,object,objects\n\n--_fielddef-Testlang=str,String{datatype=str}\n--fields-Testlang=+{str}\n--_fielddef-Testlang=int,Integer{datatype=int}\n--fields-Testlang=+{int}\n--_fielddef-Testlang=bool,Boolean{datatype=bool}\n--fields-Testlang=+{bool}\n--_fielddef-Testlang=strbool,String or Boolean{datatype=str+bool}\n--fields-Testlang=+{strbool}\n\n--regex-Testlang=/^str:(s0)/\\1/o/{_field=str:string}\n--regex-Testlang=/^str:(s1)/\\1/o/{_field=str:}\n--regex-Testlang=/^str:(s2)/\\1/o/\n\n--regex-Testlang=/^int:(i0)/\\1/o/{_field=int:10}\n--regex-Testlang=/^int:(i1)/\\1/o/{_field=int:-1}\n--regex-Testlang=/^int:(i2)/\\1/o/{_field=int:abc}\n--regex-Testlang=/^int:(i3)/\\1/o/{_field=int:}\n--regex-Testlang=/^int:(i4)/\\1/o/\n\n--regex-Testlang=/^bool:(b0)/\\1/o/{_field=bool:abc}\n--regex-Testlang=/^bool:(b1)/\\1/o/{_field=bool:}\n--regex-Testlang=/^bool:(b2)/\\1/o/\n\n--regex-Testlang=/^strbool:(sb0)/\\1/o/{_field=strbool:abc}\n--regex-Testlang=/^strbool:(sb1)/\\1/o/{_field=strbool:}\n--regex-Testlang=/^strbool:(sb2)/\\1/o/\n" }, { "path": "Tmain/parser-specific-fields-with-scripts.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/parser-specific-fields-with-scripts.d/input.testlang", "content": "string => string\nstring => integer\nstring => bool\nstring => strbool\nint => string\nint => integer\nint => bool\nint => strbool\ntrue => string\ntrue => integer\ntrue => bool\ntrue => strbool\nfalse => string\nfalse => integer\nfalse => bool\nfalse => strbool\narray => string\narray => integer\narray => bool\narray => strbool\n\nempty string => string\nempty string => integer\nempty string => bool\nempty string => strbool\n\nint =>\nbool =>\nstrbool =>\n\ntrue => bool, false => true\n" }, { "path": "Tmain/parser-specific-fields-with-scripts.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\nCMDLINE=\"$CTAGS --quiet --options=NONE --options=./testlang.ctags\"\n\n. ../utils.sh\n\nis_feature_available \"$1\" json\n\necho '### ctags' &&\n${CMDLINE} \\\n\t\t --param-Testlang.dp=true \\\n\t\t -o - input.testlang &&\n\necho '### xref' &&\n${CMDLINE} \\\n\t\t --_xformat=\"%-16N :: str:%{Testlang.str} int:%{Testlang.int} bool:%{Testlang.bool} strbool:%{Testlang.strbool}\" \\\n\t\t -x input.testlang &&\n\necho '### json' &&\n${CMDLINE} \\\n\t\t --output-format=json -o - input.testlang &&\n\necho '### etags' &&\n${CMDLINE} \\\n\t\t --output-format=etags -o - input.testlang &&\n:\n" }, { "path": "Tmain/parser-specific-fields-with-scripts.d/stderr-expected.txt", "content": "string => string...OK stringtype/(str)\nstring => integer...XERR typecheck\nstring => bool...XERR typecheck\nstring => strbool...OK stringtype/(str)\nint => string...XERR typecheck\nint => integer...OK integertype/17\nint => bool...XERR typecheck\nint => strbool...XERR typecheck\ntrue => string...XERR typecheck\ntrue => integer...XERR typecheck\ntrue => bool...OK booleantype/true\ntrue => strbool...XERR typecheck\nfalse => string...XERR typecheck\nfalse => integer...XERR typecheck\nfalse => bool...OK /noval\nfalse => strbool...OK booleantype/false\narray => string...XERR typecheck\narray => integer...XERR typecheck\narray => bool...XERR typecheck\narray => strbool...XERR typecheck\nempty string => string...OK stringtype/()\nempty string => integer...XERR typecheck\nempty string => bool...XERR typecheck\nempty string => strbool...OK booleantype/false\nint =>...OK /noval\nbool =>...OK /noval\nstrbool =>...OK /noval\ntrue => bool, false => true...XERR fieldreset\n" }, { "path": "Tmain/parser-specific-fields-with-scripts.d/stdout-expected.txt", "content": "### ctags\nstring => string\tinput.testlang\t/^string => string$/;\"\to\tstr:str\nstring => integer\tinput.testlang\t/^string => integer$/;\"\to\nstring => bool\tinput.testlang\t/^string => bool$/;\"\to\nstring => strbool\tinput.testlang\t/^string => strbool$/;\"\to\tstrbool:str\nint => string\tinput.testlang\t/^int => string$/;\"\to\nint => integer\tinput.testlang\t/^int => integer$/;\"\to\tint:17\nint => bool\tinput.testlang\t/^int => bool$/;\"\to\nint => strbool\tinput.testlang\t/^int => strbool$/;\"\to\ntrue => string\tinput.testlang\t/^true => string$/;\"\to\ntrue => integer\tinput.testlang\t/^true => integer$/;\"\to\ntrue => bool\tinput.testlang\t/^true => bool$/;\"\to\tbool:\ntrue => strbool\tinput.testlang\t/^true => strbool$/;\"\to\nfalse => string\tinput.testlang\t/^false => string$/;\"\to\nfalse => integer\tinput.testlang\t/^false => integer$/;\"\to\nfalse => bool\tinput.testlang\t/^false => bool$/;\"\to\nfalse => strbool\tinput.testlang\t/^false => strbool$/;\"\to\tstrbool:\narray => string\tinput.testlang\t/^array => string$/;\"\to\narray => integer\tinput.testlang\t/^array => integer$/;\"\to\narray => bool\tinput.testlang\t/^array => bool$/;\"\to\narray => strbool\tinput.testlang\t/^array => strbool$/;\"\to\nempty string => string\tinput.testlang\t/^empty string => string$/;\"\to\tstr:\nempty string => integer\tinput.testlang\t/^empty string => integer$/;\"\to\nempty string => bool\tinput.testlang\t/^empty string => bool$/;\"\to\nempty string => strbool\tinput.testlang\t/^empty string => strbool$/;\"\to\tstrbool:\nint =>\tinput.testlang\t/^int =>$/;\"\to\nbool =>\tinput.testlang\t/^bool =>$/;\"\to\nstrbool =>\tinput.testlang\t/^strbool =>$/;\"\to\ntrue => bool, false => true\tinput.testlang\t/^true => bool, false => true$/;\"\to\tbool:\n### xref\nstring => string :: str:str int: bool:- strbool:\nstring => integer :: str: int: bool:- strbool:\nstring => bool :: str: int: bool:- strbool:\nstring => strbool :: str: int: bool:- strbool:str\nint => string :: str: int: bool:- strbool:\nint => integer :: str: int:17 bool:- strbool:\nint => bool :: str: int: bool:- strbool:\nint => strbool :: str: int: bool:- strbool:\ntrue => string :: str: int: bool:- strbool:\ntrue => integer :: str: int: bool:- strbool:\ntrue => bool :: str: int: bool:bool strbool:\ntrue => strbool :: str: int: bool:- strbool:\nfalse => string :: str: int: bool:- strbool:\nfalse => integer :: str: int: bool:- strbool:\nfalse => bool :: str: int: bool:- strbool:\nfalse => strbool :: str: int: bool:- strbool:-\narray => string :: str: int: bool:- strbool:\narray => integer :: str: int: bool:- strbool:\narray => bool :: str: int: bool:- strbool:\narray => strbool :: str: int: bool:- strbool:\nempty string => string :: str: int: bool:- strbool:\nempty string => integer :: str: int: bool:- strbool:\nempty string => bool :: str: int: bool:- strbool:\nempty string => strbool :: str: int: bool:- strbool:-\nint => :: str: int: bool:- strbool:\nbool => :: str: int: bool:- strbool:\nstrbool => :: str: int: bool:- strbool:\ntrue => bool, false => true :: str: int: bool:bool strbool:\n### json\n{\"_type\": \"tag\", \"name\": \"string => string\", \"path\": \"input.testlang\", \"pattern\": \"/^string => string$/\", \"kind\": \"object\", \"str\": \"str\"}\n{\"_type\": \"tag\", \"name\": \"string => integer\", \"path\": \"input.testlang\", \"pattern\": \"/^string => integer$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"string => bool\", \"path\": \"input.testlang\", \"pattern\": \"/^string => bool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"string => strbool\", \"path\": \"input.testlang\", \"pattern\": \"/^string => strbool$/\", \"kind\": \"object\", \"strbool\": \"str\"}\n{\"_type\": \"tag\", \"name\": \"int => string\", \"path\": \"input.testlang\", \"pattern\": \"/^int => string$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"int => integer\", \"path\": \"input.testlang\", \"pattern\": \"/^int => integer$/\", \"kind\": \"object\", \"int\": 17}\n{\"_type\": \"tag\", \"name\": \"int => bool\", \"path\": \"input.testlang\", \"pattern\": \"/^int => bool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"int => strbool\", \"path\": \"input.testlang\", \"pattern\": \"/^int => strbool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"true => string\", \"path\": \"input.testlang\", \"pattern\": \"/^true => string$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"true => integer\", \"path\": \"input.testlang\", \"pattern\": \"/^true => integer$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"true => bool\", \"path\": \"input.testlang\", \"pattern\": \"/^true => bool$/\", \"kind\": \"object\", \"bool\": true}\n{\"_type\": \"tag\", \"name\": \"true => strbool\", \"path\": \"input.testlang\", \"pattern\": \"/^true => strbool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"false => string\", \"path\": \"input.testlang\", \"pattern\": \"/^false => string$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"false => integer\", \"path\": \"input.testlang\", \"pattern\": \"/^false => integer$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"false => bool\", \"path\": \"input.testlang\", \"pattern\": \"/^false => bool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"false => strbool\", \"path\": \"input.testlang\", \"pattern\": \"/^false => strbool$/\", \"kind\": \"object\", \"strbool\": false}\n{\"_type\": \"tag\", \"name\": \"array => string\", \"path\": \"input.testlang\", \"pattern\": \"/^array => string$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"array => integer\", \"path\": \"input.testlang\", \"pattern\": \"/^array => integer$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"array => bool\", \"path\": \"input.testlang\", \"pattern\": \"/^array => bool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"array => strbool\", \"path\": \"input.testlang\", \"pattern\": \"/^array => strbool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"empty string => string\", \"path\": \"input.testlang\", \"pattern\": \"/^empty string => string$/\", \"kind\": \"object\", \"str\": \"\"}\n{\"_type\": \"tag\", \"name\": \"empty string => integer\", \"path\": \"input.testlang\", \"pattern\": \"/^empty string => integer$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"empty string => bool\", \"path\": \"input.testlang\", \"pattern\": \"/^empty string => bool$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"empty string => strbool\", \"path\": \"input.testlang\", \"pattern\": \"/^empty string => strbool$/\", \"kind\": \"object\", \"strbool\": false}\n{\"_type\": \"tag\", \"name\": \"int =>\", \"path\": \"input.testlang\", \"pattern\": \"/^int =>$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"bool =>\", \"path\": \"input.testlang\", \"pattern\": \"/^bool =>$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"strbool =>\", \"path\": \"input.testlang\", \"pattern\": \"/^strbool =>$/\", \"kind\": \"object\"}\n{\"_type\": \"tag\", \"name\": \"true => bool, false => true\", \"path\": \"input.testlang\", \"pattern\": \"/^true => bool, false => true$/\", \"kind\": \"object\", \"bool\": true}\n### etags\n\f\ninput.testlang,1095\nstring => stringstring => string\u00011,0\nstring => integerstring => integer\u00012,17\nstring => boolstring => bool\u00013,35\nstring => strboolstring => strbool\u00014,50\nint => stringint => string\u00015,68\nint => integerint => integer\u00016,82\nint => boolint => bool\u00017,97\nint => strboolint => strbool\u00018,109\ntrue => stringtrue => string\u00019,124\ntrue => integertrue => integer\u000110,139\ntrue => booltrue => bool\u000111,155\ntrue => strbooltrue => strbool\u000112,168\nfalse => stringfalse => string\u000113,184\nfalse => integerfalse => integer\u000114,200\nfalse => boolfalse => bool\u000115,217\nfalse => strboolfalse => strbool\u000116,231\narray => stringarray => string\u000117,248\narray => integerarray => integer\u000118,264\narray => boolarray => bool\u000119,281\narray => strboolarray => strbool\u000120,295\nempty string => stringempty string => string\u000122,313\nempty string => integerempty string => integer\u000123,336\nempty string => boolempty string => bool\u000124,360\nempty string => strboolempty string => strbool\u000125,381\nint =>int =>\u000127,406\nbool =>bool =>\u000128,413\nstrbool =>strbool =>\u000129,421\ntrue => bool, false => truetrue => bool, false => true\u000131,433\n" }, { "path": "Tmain/parser-specific-fields-with-scripts.d/testlang.ctags", "content": "--sort=no\n\n--langdef=Testlang\n--map-Testlang=+.testlang\n\n--_paramdef-Testlang=dp,enable debug printing\n\n--kinddef-Testlang=o,object,objects\n\n--_fielddef-Testlang=str,String{datatype=str}\n--fields-Testlang=+{str}\n--_fielddef-Testlang=int,Integer{datatype=int}\n--fields-Testlang=+{int}\n--_fielddef-Testlang=bool,Boolean{datatype=bool}\n--fields-Testlang=+{bool}\n--_fielddef-Testlang=strbool,String or Boolean{datatype=str+bool}\n--fields-Testlang=+{strbool}\n\n--_prelude-Testlang={{\n /dp _param {\n pop\n /q {=} def\n /qq {==} def\n /qa {=+} def\n /qqa {==+} def\n } {\n /q {pop} def\n /qq {pop} def\n /qa {pop} def\n /qqa {pop} def\n } ifelse\n\n /T { mark \\1 (...) _buildstring qa } def\n /pval {\n dup type qqa (/) qa qq\n } def\n /Tstr { T . exch { Testlang.str: }\n stopped { clear (XERR ) qa _errorname q }\n { (OK ) qa . :Testlang.str {pval} {/noval qq} ifelse} ifelse\n } def\n /Tint { T . exch { Testlang.int: }\n stopped { clear (XERR ) qa _errorname q }\n { (OK ) qa . :Testlang.int {pval} {/noval qq} ifelse } ifelse\n } def\n /Tbool { T . exch { Testlang.bool: }\n stopped { clear (XERR ) qa _errorname q }\n { (OK ) qa . :Testlang.bool {pval} {/noval qq} ifelse } ifelse\n } def\n /Tstrbool { T . exch { Testlang.strbool: }\n stopped { clear (XERR ) qa _errorname q }\n { (OK ) qa . :Testlang.strbool {pval} {/noval qq} ifelse } ifelse\n } def\n /verifygetter {\n stopped { clear (XERR ) qa _errorname q }\n { (OK ) qa {pval} {/noval qq} ifelse } ifelse\n } def\n}}\n\n--regex-Testlang=/^(string => string)$/\\1/o/{{\n (str) Tstr\n}}\n\n--regex-Testlang=/^(string => integer)$/\\1/o/{{\n (str) Tint\n}}\n\n--regex-Testlang=/^(string => bool)$/\\1/o/{{\n (str) Tbool\n}}\n\n--regex-Testlang=/^(string => strbool)$/\\1/o/{{\n (str) Tstrbool\n}}\n\n--regex-Testlang=/^(int => string)$/\\1/o/{{\n 17 Tstr\n}}\n\n--regex-Testlang=/^(int => integer)$/\\1/o/{{\n 17 Tint\n}}\n\n--regex-Testlang=/^(int => bool)$/\\1/o/{{\n 17 Tbool\n}}\n\n--regex-Testlang=/^(int => strbool)$/\\1/o/{{\n 17 Tstrbool\n}}\n\n--regex-Testlang=/^(true => string)$/\\1/o/{{\n true Tstr\n}}\n\n--regex-Testlang=/^(true => integer)$/\\1/o/{{\n true Tint\n}}\n\n--regex-Testlang=/^(true => bool)$/\\1/o/{{\n true Tbool\n}}\n\n--regex-Testlang=/^(true => strbool)$/\\1/o/{{\n true Tstrbool\n}}\n\n--regex-Testlang=/^(false => string)$/\\1/o/{{\n false Tstr\n}}\n\n--regex-Testlang=/^(false => integer)$/\\1/o/{{\n false Tint\n}}\n\n--regex-Testlang=/^(false => bool)$/\\1/o/{{\n false Tbool\n}}\n\n--regex-Testlang=/^(false => strbool)$/\\1/o/{{\n false Tstrbool\n}}\n\n--regex-Testlang=/^(array => string)$/\\1/o/{{\n [ 1 2 3 ] Tstr\n}}\n\n--regex-Testlang=/^(array => integer)$/\\1/o/{{\n [ 1 2 3 ] Tint\n}}\n\n--regex-Testlang=/^(array => bool)$/\\1/o/{{\n [ 1 2 3 ] Tbool\n}}\n\n--regex-Testlang=/^(array => strbool)$/\\1/o/{{\n [ 1 2 3 ] Tstrbool\n}}\n\n--regex-Testlang=/^(empty string => string)$/\\1/o/{{\n () Tstr\n}}\n\n--regex-Testlang=/^(empty string => integer)$/\\1/o/{{\n () Tint\n}}\n\n--regex-Testlang=/^(empty string => bool)$/\\1/o/{{\n () Tbool\n}}\n\n--regex-Testlang=/^(empty string => strbool)$/\\1/o/{{\n () Tstrbool\n}}\n\n--regex-Testlang=/^(string =>)$/\\1/o/{{\n { T . :Testlang.str } verifygetter\n}}\n\n--regex-Testlang=/^(int =>)$/\\1/o/{{\n { T . :Testlang.int } verifygetter\n}}\n\n--regex-Testlang=/^(bool =>)$/\\1/o/{{\n { T . :Testlang.bool } verifygetter\n}}\n\n--regex-Testlang=/^(strbool =>)$/\\1/o/{{\n { T . :Testlang.strbool } verifygetter\n}}\n\n--regex-Testlang=/^(true => bool, false => true)$/\\1/o/{{\n T\n . true Testlang.bool:\n { . false Testlang.bool: } stopped { clear (XERR ) qa _errorname q } if\n}}" }, { "path": "Tmain/parser-specific-fields.d/input.unknownx", "content": "public func foo(n, m);\nprotected func bar(n);\nprivate func baz(n,...);\n" }, { "path": "Tmain/parser-specific-fields.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nCTAGS=$1\n\nV=\n# V=valgrind\n\necho '#' disabling fields\n${V} ${CTAGS} --options=NONE --options=./unknownx.ctags -o - input.unknownx\n\necho '#' enabling signature only\n${V} ${CTAGS} --options=NONE --options=./unknownx.ctags --fields-unknownx=+'{signature}' -o - input.unknownx\n\necho '#' enabling protection only\n${V} ${CTAGS} --options=NONE --options=./unknownx.ctags --fields-unknownx=+'{protection}' -o - input.unknownx\n\necho '#' enabling both signature and protection\n${V} ${CTAGS} --options=NONE --options=./unknownx.ctags --fields-unknownx=+'{protection}{signature}' -o - input.unknownx\n" }, { "path": "Tmain/parser-specific-fields.d/stderr-expected.txt", "content": "ctags: Notice: No options will be read from files or environment\nctags: Notice: No options will be read from files or environment\nctags: Notice: No options will be read from files or environment\nctags: Notice: No options will be read from files or environment\n" }, { "path": "Tmain/parser-specific-fields.d/stdout-expected.txt", "content": "# disabling fields\nbar\tinput.unknownx\t/^protected func bar(n);$/;\"\tf\nbaz\tinput.unknownx\t/^private func baz(n,...);$/;\"\tf\nfoo\tinput.unknownx\t/^public func foo(n, m);$/;\"\tf\n# enabling signature only\nbar\tinput.unknownx\t/^protected func bar(n);$/;\"\tf\tsignature:(n)\nbaz\tinput.unknownx\t/^private func baz(n,...);$/;\"\tf\tsignature:(n,...)\nfoo\tinput.unknownx\t/^public func foo(n, m);$/;\"\tf\tsignature:(n, m)\n# enabling protection only\nbar\tinput.unknownx\t/^protected func bar(n);$/;\"\tf\tprotection:protected \nbaz\tinput.unknownx\t/^private func baz(n,...);$/;\"\tf\tprotection:private \nfoo\tinput.unknownx\t/^public func foo(n, m);$/;\"\tf\tprotection:public \n# enabling both signature and protection\nbar\tinput.unknownx\t/^protected func bar(n);$/;\"\tf\tprotection:protected \tsignature:(n)\nbaz\tinput.unknownx\t/^private func baz(n,...);$/;\"\tf\tprotection:private \tsignature:(n,...)\nfoo\tinput.unknownx\t/^public func foo(n, m);$/;\"\tf\tprotection:public \tsignature:(n, m)\n" }, { "path": "Tmain/parser-specific-fields.d/unknownx.ctags", "content": "--langdef=unknownx\n--kinddef-unknownx=f,func,functions\n--map-unknownx=+.unknownx\n\n--_fielddef-unknownx=protection,protections\n--_fielddef-unknownx=signature,signatures\n\n--regex-unknownx=/^((public|protected|private) +)?func ([^\\(]+)\\((.*)\\)/\\3/f/{_field=protection:\\1}{_field=signature:(\\4)}\n\n" }, { "path": "Tmain/pattern-length-limit.d/input-iso-8859-1.py", "content": "# this is made to pass the `(c & 0xC0) == 0x80` UTF-8 sub-byte check to make\n# sure we have a working hard limit in case of malicious input.\na=''\n" }, { "path": "Tmain/pattern-length-limit.d/input-utf8.py", "content": "a='éàçè'\n" }, { "path": "Tmain/pattern-length-limit.d/input.java", "content": "import com.example.Bar;\nimport java.util.logging.Logger;\npublic class Foo extends Bar {static Logger a = Logger.getLogger(Foo.class.getName()); static Logger b = Logger.getLogger(Foo.class.getName());}\n" }, { "path": "Tmain/pattern-length-limit.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --kinds-java=f ./input.java\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --pattern-length-limit=10 \\\n\t --kinds-java=f ./input.java\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --pattern-length-limit=0 \\\n\t --kinds-java=f ./input.java\n\nfor etags in '' '-e'; do\n\techo \"--- multi-byte handling\" $(test -n \"$etags\" && echo \"(etags)\")\n\n\t# as the 7th byte is an inner byte, cutting at 6 and 7 should yield the same result\n\t${CTAGS} --quiet --options=NONE $etags -o - \\\n\t\t --pattern-length-limit=6 \\\n\t\t --kinds-python=v ./input-utf8.py\n\t${CTAGS} --quiet --options=NONE $etags -o - \\\n\t\t --pattern-length-limit=7 \\\n\t\t --kinds-python=v ./input-utf8.py\n\n\t${CTAGS} --quiet --options=NONE $etags -o - \\\n\t\t --pattern-length-limit=4 \\\n\t\t --kinds-python=v ./input-iso-8859-1.py\ndone\n\nexit $?\n" }, { "path": "Tmain/pattern-length-limit.d/stdout-expected.txt", "content": "a\t./input.java\t/^public class Foo extends Bar {static Logger a = Logger.getLogger(Foo.class.getName()); static Lo/;\"\tf\nb\t./input.java\t/^public class Foo extends Bar {static Logger a = Logger.getLogger(Foo.class.getName()); static Lo/;\"\tf\na\t./input.java\t/^public cla/;\"\tf\nb\t./input.java\t/^public cla/;\"\tf\na\t./input.java\t/^public class Foo extends Bar {static Logger a = Logger.getLogger(Foo.class.getName()); static Logger b = Logger.getLogger(Foo.class.getName());}$/;\"\tf\nb\t./input.java\t/^public class Foo extends Bar {static Logger a = Logger.getLogger(Foo.class.getName()); static Logger b = Logger.getLogger(Foo.class.getName());}$/;\"\tf\n--- multi-byte handling\na\t./input-utf8.py\t/^a='éà/;\"\tv\na\t./input-utf8.py\t/^a='éà/;\"\tv\na\t./input-iso-8859-1.py\t/^a='/;\"\tv\n--- multi-byte handling (etags)\n\f\ninput-utf8.py,14\na='éàa\u00011,0\n\f\ninput-utf8.py,14\na='éàa\u00011,0\n\f\ninput-iso-8859-1.py,16\na='a\u00013,141\n" }, { "path": "Tmain/pretend-option.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n\"${CTAGS}\" --quiet --options=NONE --with-list-header=no --_pretend-Lisp=C --list-kinds=C\n" }, { "path": "Tmain/pretend-option.d/stdout-expected.txt", "content": "Y unknown type of definitions\nf functions\nv variables\nm macros\nc constants\nt types\nC classes\ns structs\nM methods\nG generics\np parameters\n" }, { "path": "Tmain/ptag-dont-emit-to-stdout-by-default.d/input.c", "content": "int x;\n" }, { "path": "Tmain/ptag-dont-emit-to-stdout-by-default.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --pseudo-tags='*' -o - input.c\n" }, { "path": "Tmain/ptag-dont-emit-to-stdout-by-default.d/stdout-expected.txt", "content": "x\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Tmain/ptag-emits-even-when-rewinding.d/README", "content": "The original bug (#3932) was reproduced only when\n--disable-external-sort is set when building ctags.\n" }, { "path": "Tmain/ptag-emits-even-when-rewinding.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/ptag-emits-even-when-rewinding.d/input.cpp", "content": "private\n" }, { "path": "Tmain/ptag-emits-even-when-rewinding.d/run.sh", "content": "# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n# exit_if_win32 $CTAGS\n\nO=\"--quiet --options=NONE --extras=+p\"\n\ncount_ptags=$(${CTAGS} $O -o - input.cpp | grep -F '!_TAG_KIND_DESCRIPTION!C++' | wc -l)\ncount_list=$(${CTAGS} $O --with-list-header=no --list-kinds-full=C++ | grep '.[ \\t]*[^ \\t]*yes' | wc -l)\n\nif ! test \"$count_ptags\" -eq \"$count_list\"; then\n\techo count_ptags: $count_ptags\n\techo count_list: $count_list\n\t${CTAGS} $O -o - input.cpp\n\texit 1\nfi\nexit 0\n" }, { "path": "Tmain/ptag-emits-even-when-rewinding.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/ptag-emits-even-when-rewinding.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/ptag-extra-desc.d/input.robot", "content": "# EMPTY\n" }, { "path": "Tmain/ptag-extra-desc.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE \"\n\n${CTAGS} $O \\\n\t\t --extras=p --pseudo-tags=TAG_EXTRA_DESCRIPTION \\\n\t\t --extras=+g \\\n\t\t --extras-Robot='{whitespaceSwapped}' \\\n\t\t -o - \\\n\t\t input.robot\n\n${CTAGS} $O \\\n\t\t --extras=p --pseudo-tags=TAG_EXTRA_DESCRIPTION \\\n\t\t --extras-Robot=-'{whitespaceSwapped}' \\\n\t\t -o - \\\n\t\t input.robot\n" }, { "path": "Tmain/ptag-extra-desc.d/stdout-expected.txt", "content": "!_TAG_EXTRA_DESCRIPTION\tguest\t/Include tags generated by guest parsers/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION!Robot\twhitespaceSwapped\t/Include tags swapping whitespace and underscore chars/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n" }, { "path": "Tmain/ptag-field-sec.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/ptag-field-sec.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE \"\n\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags=TAG_FIELD_DESCRIPTION \\\n\t\t --fields=le \\\n\t\t --fields-C='{macrodef}' \\\n\t\t -o - \\\n\t\t input.c\n" }, { "path": "Tmain/ptag-field-sec.d/stdout-expected.txt", "content": "!_TAG_FIELD_DESCRIPTION\tend\t/end lines of various items/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tlanguage\t/Language of input file containing tag/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION!C\tmacrodef\t/macro definition/\n" }, { "path": "Tmain/ptag-in-optlib-parser.d/input.foo", "content": "# EMPTY\n" }, { "path": "Tmain/ptag-in-optlib-parser.d/input.sh", "content": "" }, { "path": "Tmain/ptag-in-optlib-parser.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n{\n echo '# BUILTIN'\n ${CTAGS} --quiet --options=NONE -o - --extras=p --pseudo-tags='*' \\\n\t\t --pseudo-tags=-TAG_PROC_CWD \\\n\t\t --fields='-{typeref}{file}' \\\n\t input.sh\n\n echo '# REGEX'\n ${CTAGS} --quiet --options=NONE -o - --extras=p --pseudo-tags='*' \\\n\t\t --pseudo-tags=-TAG_PROC_CWD \\\n\t --langdef=foo --langmap=foo:+.foo \\\n\t\t --_fielddef-foo='field,field example' \\\n\t\t --fields='-{typeref}{file}' \\\n\t\t --fields-foo='{field}' \\\n\t\t --_extradef-foo='extra,extra example' \\\n\t\t --extras-foo='{extra}' \\\n\t --regex-foo='/abc/\\1/k,kind,kinds/' input.foo\n} | grep -v VERSION\n" }, { "path": "Tmain/ptag-in-optlib-parser.d/stdout-expected.txt", "content": "# BUILTIN\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!Sh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Sh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Sh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!Sh\ts,script\t/script files/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_ROLE_DESCRIPTION!Sh!heredoc\tendmarker\t/end marker/\n!_TAG_ROLE_DESCRIPTION!Sh!script\tloaded\t/loaded/\n# REGEX\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION!foo\textra\t/extra example/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION!foo\tfield\t/field example/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!foo\tk,kind\t/kinds/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n" }, { "path": "Tmain/ptag-kind-desc.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/ptag-kind-desc.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE \"\n\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags=TAG_KIND_DESCRIPTION \\\n\t\t --kinds-C=df \\\n\t\t -o - \\\n\t\t input.c\n" }, { "path": "Tmain/ptag-kind-desc.d/stdout-expected.txt", "content": "!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n" }, { "path": "Tmain/ptag-kind-sep.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/ptag-kind-sep.d/input.php", "content": "NOTHING HERE\n" }, { "path": "Tmain/ptag-kind-sep.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --extras=p --kinds-all= \\\n\t --pseudo-tags=TAG_PROGRAM_NAME \\\n\t input.php\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t --extras=+p --kinds-all= \\\n\t --pseudo-tags=+TAG_KIND_SEPARATOR \\\n\t --pseudo-tags=-TAG_PROGRAM_VERSION \\\n\t --pseudo-tags=-TAG_PROC_CWD \\\n\t --pseudo-tags=-TAG_KIND_DESCRIPTION \\\n\t --pseudo-tags=-TAG_FIELD_DESCRIPTION \\\n\t --pseudo-tags=-TAG_EXTRA_DESCRIPTION \\\n\t --pseudo-tags=-TAG_ROLE_DESCRIPTION \\\n\t --pseudo-tags=-TAG_PARSER_VERSION \\\n\t --pseudo-tags=-TAG_OUTPUT_VERSION \\\n\t input.php\n" }, { "path": "Tmain/ptag-kind-sep.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/ptag-kind-sep.d/stdout-expected.txt", "content": "!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*a/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*c/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*d/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*f/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*i/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*l/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*n/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*t/\n!_TAG_KIND_SEPARATOR!PHP\t::\t/*v/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/na/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nc/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nd/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nf/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/ni/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nl/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nn/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nt/\n!_TAG_KIND_SEPARATOR!PHP\t\\\\\t/nv/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n" }, { "path": "Tmain/ptag-output-excmd.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/ptag-output-excmd.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nO=\"--quiet --options=NONE \"\n\nfor c in number pattern mixed combine; do\n\t${CTAGS} $O \\\n\t\t\t --excmd=$c \\\n\t\t\t --extras=+p --pseudo-tags=TAG_OUTPUT_EXCMD \\\n\t\t\t -o - \\\n\t\t\t input.c\ndone\n" }, { "path": "Tmain/ptag-output-excmd.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/ptag-output-excmd.d/stdout-expected.txt", "content": "!_TAG_OUTPUT_EXCMD\tnumber\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_EXCMD\tpattern\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_EXCMD\tcombineV2\t/number, pattern, mixed, or combineV2/\n" }, { "path": "Tmain/ptag-proc-cwd-including-tab.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\n#\n# This test case doesn't work well on Windows on CI/CD envornments we use.\n# We can make a directory having \\t in their name.\n# cd built-in command with the name works well.\n# pwd prints the directory including \\t as expected.\n# However, the input fields of TAG_PROC_CWD doesn't includ \\t\n# character; it is replaced with a strange byte sequence \"f0 09\".\n# How to test:\n#\n# $ cd ctags\n# $ make\n# $ mkdir \"$(printf 'a\\tb')\"\n# $ cd \"$(printf 'a\\tb')\"\n# $ echo 'int x;' > input.c\n# $ ../ctags --extras=+p -o - input.c | grep _TAG_PROC_CWD\n#\n# Temporary we disable this test case.\n#\nexit_if_win32 $CTAGS\n\nO=\"--quiet --options=NONE \"\n\n(\n\tpid=$$\n\tdir=\"$(printf 'ctags-%s\\t%s-tmain' $pid $pid)\"\n\tcd /\n\tif pwd=$(readlink /tmp); then\n\t\tcd \"${pwd}\"\n\telse\n\t\tcd /tmp\n\tfi\n\tpwd=$(pwd)\n\tmkdir \"$dir\"\n\tcd \"$dir\"\n\ttouch input2.c\n\tls\n\t${CTAGS} $O \\\n\t\t\t --extras=+p --pseudo-tags=TAG_PROC_CWD \\\n\t\t\t -o - \\\n\t\t\t input2.c | sed -e \"s/$pid//g\" | sed -e \"s|$pwd|/tmp|\" | sed -e \"s|[A-Z]:/.*/tmp|/tmp|\"\n\trm input2.c\n\tcd ..\n\trmdir \"$dir\"\n)\n" }, { "path": "Tmain/ptag-proc-cwd-including-tab.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/ptag-proc-cwd-including-tab.d/stdout-expected.txt", "content": "input2.c\n!_TAG_PROC_CWD\t/tmp/ctags-\\t-tmain/\t//\n" }, { "path": "Tmain/ptag-proc-cwd.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/ptag-proc-cwd.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n# exit_if_win32 $CTAGS\n\nO=\"--quiet --options=NONE \"\n\n(\n\tcd /usr\n\t${CTAGS} $O \\\n\t\t\t --extras=+p --pseudo-tags=TAG_PROC_CWD \\\n\t\t\t -o - \\\n\t\t\t /input.c 2>/dev/null | sed -e \"s|[A-Z]:/.*/usr|/usr|\"\n)\n" }, { "path": "Tmain/ptag-proc-cwd.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/ptag-proc-cwd.d/stdout-expected.txt", "content": "!_TAG_PROC_CWD\t/usr/\t//\n" }, { "path": "Tmain/ptag-role-desc.d/input.c", "content": "/* EMPTY */\n" }, { "path": "Tmain/ptag-role-desc.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE \"\n\n${CTAGS} $O \\\n\t\t --extras=+p --pseudo-tags=TAG_ROLE_DESCRIPTION \\\n\t\t --kinds-C=h \\\n\t\t -o - \\\n\t\t input.c\n" }, { "path": "Tmain/ptag-role-desc.d/stdout-expected.txt", "content": "!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n" }, { "path": "Tmain/readtags-alias.d/input.c", "content": "/* ctags -o output.tags input.c */\nstruct point3d {\n\tint x, y ,z;\n};\n" }, { "path": "Tmain/readtags-alias.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/6d353f7f/\npoint3d\tinput.c\t/^struct point3d {$/;\"\ts\tfile:\nx\tinput.c\t/^\tint x, y ,z;$/;\"\tm\tstruct:point3d\ttyperef:typename:int\tfile:\ny\tinput.c\t/^\tint x, y ,z;$/;\"\tm\tstruct:point3d\ttyperef:typename:int\tfile:\nz\tinput.c\t/^\tint x, y ,z;$/;\"\tm\tstruct:point3d\ttyperef:typename:int\tfile:\n" }, { "path": "Tmain/readtags-alias.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '!_ -Q #t point3d'\n${V} ${READTAGS} -t output.tags -Q '#t' point3d\n\necho '!_ -Q true point3d'\n${V} ${READTAGS} -t output.tags -Q 'true' point3d\n\necho '!_ -Q #f point3d'\n${V} ${READTAGS} -t output.tags -Q '#f' point3d\n\necho '!_ -Q false point3d'\n${V} ${READTAGS} -t output.tags -Q 'false' point3d\n\necho '!_ -Q #t -l'\n${V} ${READTAGS} -t output.tags -Q '#t' -l\n\necho '!_ -Q true -l'\n${V} ${READTAGS} -t output.tags -Q 'true' -l\n\necho '!_ -Q #f -l'\n${V} ${READTAGS} -t output.tags -Q '#f' -l\n\necho '!_ -Q false -l'\n${V} ${READTAGS} -t output.tags -Q 'false' -l\n\necho '!_ -Q (null? nil) -l'\n${V} ${READTAGS} -t output.tags -Q '(null? nil)' -l\n\necho '!_ -Q (null? ()) -l'\n${V} ${READTAGS} -t output.tags -Q '(null? ())' -l\n\necho '!_ -Q (null? false) -l'\n${V} ${READTAGS} -t output.tags -Q '(null? false)' -l\n" }, { "path": "Tmain/readtags-alias.d/stdout-expected.txt", "content": "!_ -Q #t point3d\npoint3d\tinput.c\t/^struct point3d {$/\n!_ -Q true point3d\npoint3d\tinput.c\t/^struct point3d {$/\n!_ -Q #f point3d\n!_ -Q false point3d\n!_ -Q #t -l\npoint3d\tinput.c\t/^struct point3d {$/\nx\tinput.c\t/^\tint x, y ,z;$/\ny\tinput.c\t/^\tint x, y ,z;$/\nz\tinput.c\t/^\tint x, y ,z;$/\n!_ -Q true -l\npoint3d\tinput.c\t/^struct point3d {$/\nx\tinput.c\t/^\tint x, y ,z;$/\ny\tinput.c\t/^\tint x, y ,z;$/\nz\tinput.c\t/^\tint x, y ,z;$/\n!_ -Q #f -l\n!_ -Q false -l\n!_ -Q (null? nil) -l\npoint3d\tinput.c\t/^struct point3d {$/\nx\tinput.c\t/^\tint x, y ,z;$/\ny\tinput.c\t/^\tint x, y ,z;$/\nz\tinput.c\t/^\tint x, y ,z;$/\n!_ -Q (null? ()) -l\npoint3d\tinput.c\t/^struct point3d {$/\nx\tinput.c\t/^\tint x, y ,z;$/\ny\tinput.c\t/^\tint x, y ,z;$/\nz\tinput.c\t/^\tint x, y ,z;$/\n!_ -Q (null? false) -l\n" }, { "path": "Tmain/readtags-broken-input.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-broken-input.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\nfor i in 1 2 3 4 5 6; do\n\t${V} ${READTAGS} -t ./target.tags - greet${i} > /dev/null || exit 1\ndone\n\n${READTAGS} -t ./target.tags - greetA\n${READTAGS} -t ./target.tags - greetB\n" }, { "path": "Tmain/readtags-broken-input.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-broken-input.d/stdout-expected.txt", "content": "greetA\tinput.java\t/^\t\tpublic void greet (String word) {$/\ngreetB\tinput.java\t?^\t\tpublic void greet (String word) {$?\n" }, { "path": "Tmain/readtags-broken-input.d/target.tags", "content": "greet1\tinput.java\t/^\t\tpublic void greet (String word) {$;\"\tm\tline:9\tmethod:input.hello.anonXXX\ngreetA\tinput.java\t/^\t\tpublic void greet (String word) {$/;\"\tm\tline:9\tmethod:input.hello.anonXXX\ngreet2\tinput.java\tk:v\ngreet3\tinput.java\t\ngreet4\tinput.java\ngreet5\ngreetB\tinput.java\t?^\t\tpublic void greet (String word) {$?;\"\tm\tline:9\tmethod:input.hello.anonXXX\ngreet6\tinput.java\t?^\t\tpublic void greet (String word) {$;\"\tm\tline:9\tmethod:input.hello.anonXXX\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/drive-letter0.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\tC:\\tmp\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t5.9.0\t/e08db39a3/\na_fn\txyz/a.c\t/^static void a_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/drive-letter1.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\tD:/tmp\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t5.9.0\t/e08db39a3/\na_fn\txyz/a.c\t/^static void a_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/good-ptags.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/../../tmp\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t5.9.0\t/e08db39a3/\n!_TAG_PROC_DUMMY\t/../../tmp\t//\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/good0.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/tmp/abc/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t5.9.0\t/e08db39a3/\na_fn\txyz/a.c\t/^static void a_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nb_fn\tb.c\t/^static void b_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nc_fn\t./c.c\t/^static void c_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nd_fn\t./../d.c\t/^static void d_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ne_fn\t../e.c\t/^static void e_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nf_fn\t../../f.c\t/^static void f_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ng_fn\t../../../g.c\t/^static void g_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nh_fn\t../../../../h.c\t/^static void h_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ni_fn\t.././../../../i.c\t/^static void i_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nj_fn\t.././../j.c\t/^static void j_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nk_fn\t.././.././././k.c\t/^static void k_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nl_fn\t././././././l.c\t/^static void l_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nm_fn\t./././../abc/./m.c\t/^static void m_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nn_fn\t./././../abc/X/.././n.c\t/^static void n_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\no_fn\t.////.///////./////..//abc//X//..///.///o.c\t/^static void o_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\np_fn\t./../xyz/p.c\t/^static void p_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nq_fn\t./../xyz/../././xyz/q.c\t/^static void q_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nr_fn\t/r.c\t/^static void r_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ns_fn\t/../s.c\t/^static void s_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nt_fn\t/../././t.c\t/^static void t_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nu_fn\t/../././tmp/./u.c\t/^static void u_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nv_fn\t/../././tmp/./../tmp/abc/./v.c\t/^static void v_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nw_fn\t/../././tmp/./../tmp/../abc/./w.c\t/^static void w_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/good1.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/tmp/abc/../././abc/../abc\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t5.9.0\t/e08db39a3/\na_fn\txyz/a.c\t/^static void a_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nb_fn\tb.c\t/^static void b_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nc_fn\t./c.c\t/^static void c_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nd_fn\t./../d.c\t/^static void d_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ne_fn\t../e.c\t/^static void e_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nf_fn\t../../f.c\t/^static void f_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ng_fn\t../../../g.c\t/^static void g_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nh_fn\t../../../../h.c\t/^static void h_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ni_fn\t.././../../../i.c\t/^static void i_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nj_fn\t.././../j.c\t/^static void j_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nk_fn\t.././.././././k.c\t/^static void k_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nl_fn\t././././././l.c\t/^static void l_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nm_fn\t./././../abc/./m.c\t/^static void m_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nn_fn\t./././../abc/X/.././n.c\t/^static void n_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\no_fn\t.////.///////./////..//abc//X//..///.///o.c\t/^static void o_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\np_fn\t./../xyz/p.c\t/^static void p_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nq_fn\t./../xyz/../././xyz/q.c\t/^static void q_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nr_fn\t/r.c\t/^static void r_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ns_fn\t/../s.c\t/^static void s_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nt_fn\t/../././t.c\t/^static void t_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nu_fn\t/../././tmp/./u.c\t/^static void u_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nv_fn\t/../././tmp/./../tmp/abc/./v.c\t/^static void v_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nw_fn\t/../././tmp/./../tmp/../abc/./w.c\t/^static void w_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/good2.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/tmp/abc/../././abc/../abc/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t5.9.0\t/e08db39a3/\na_fn\txyz/a.c\t/^static void a_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nb_fn\tb.c\t/^static void b_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nc_fn\t./c.c\t/^static void c_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nd_fn\t./../d.c\t/^static void d_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ne_fn\t../e.c\t/^static void e_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nf_fn\t../../f.c\t/^static void f_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ng_fn\t../../../g.c\t/^static void g_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nh_fn\t../../../../h.c\t/^static void h_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ni_fn\t.././../../../i.c\t/^static void i_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nj_fn\t.././../j.c\t/^static void j_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nk_fn\t.././.././././k.c\t/^static void k_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nl_fn\t././././././l.c\t/^static void l_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nm_fn\t./././../abc/./m.c\t/^static void m_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nn_fn\t./././../abc/X/.././n.c\t/^static void n_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\no_fn\t.////.///////./////..//abc//X//..///.///o.c\t/^static void o_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\np_fn\t./../xyz/p.c\t/^static void p_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nq_fn\t./../xyz/../././xyz/q.c\t/^static void q_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nr_fn\t/r.c\t/^static void r_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\ns_fn\t/../s.c\t/^static void s_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nt_fn\t/../././t.c\t/^static void t_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nu_fn\t/../././tmp/./u.c\t/^static void u_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nv_fn\t/../././tmp/./../tmp/abc/./v.c\t/^static void v_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\nw_fn\t/../././tmp/./../tmp/../abc/./w.c\t/^static void w_fn(void) {}$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho2()\n{\n\techo \"$@\"\n\techo \"$@\" 1>&2\n}\n\nrun_test()\n{\n\techo2 \"# $@\"\n\t\"${READTAGS}\" -F '(list $name \"\\t\" $input \"\\n\")' $2 -t $1 $3\n}\n\nrun_test good0.tags -C -l &&\nrun_test good1.tags --canonicalize-input -l &&\nrun_test good2.tags -C -l &&\n! run_test drive-letter0.tags --canonicalize-input -l &&\n! run_test drive-letter1.tags -C -l &&\nrun_test good-ptags.tags -C -D &&\nrun_test good-ptags.tags -C --list-pseudo-tags &&\nrun_test good0.tags -A -l &&\nrun_test good1.tags --absolute-input -l &&\nrun_test good2.tags -A -l &&\n! run_test drive-letter0.tags --absolute-input -l &&\n! run_test drive-letter1.tags -A -l &&\nrun_test good-ptags.tags -A -D &&\nrun_test good-ptags.tags -A --list-pseudo-tags\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/stderr-expected.txt", "content": "# good0.tags -C -l\n# good1.tags --canonicalize-input -l\n# good2.tags -C -l\n# drive-letter0.tags --canonicalize-input -l\n!_TAG_PROC_CWD must start with '/': C:\\tmp\n# drive-letter1.tags -C -l\n!_TAG_PROC_CWD must start with '/': D:/tmp\n# good-ptags.tags -C -D\n# good-ptags.tags -C --list-pseudo-tags\n# good0.tags -A -l\n# good1.tags --absolute-input -l\n# good2.tags -A -l\n# drive-letter0.tags --absolute-input -l\n!_TAG_PROC_CWD must start with '/': C:\\tmp\n# drive-letter1.tags -A -l\n!_TAG_PROC_CWD must start with '/': D:/tmp\n# good-ptags.tags -A -D\n# good-ptags.tags -A --list-pseudo-tags\n" }, { "path": "Tmain/readtags-canonicalize-input-names.d/stdout-expected.txt", "content": "# good0.tags -C -l\na_fn\txyz/a.c\nb_fn\tb.c\nc_fn\tc.c\nd_fn\t/tmp/d.c\ne_fn\t/tmp/e.c\nf_fn\t/f.c\ng_fn\t/g.c\nh_fn\t/h.c\ni_fn\t/i.c\nj_fn\t/j.c\nk_fn\t/k.c\nl_fn\tl.c\nm_fn\tm.c\nn_fn\tn.c\no_fn\to.c\np_fn\t/tmp/xyz/p.c\nq_fn\t/tmp/xyz/q.c\nr_fn\t/r.c\ns_fn\t/s.c\nt_fn\t/t.c\nu_fn\t/tmp/u.c\nv_fn\t/tmp/abc/v.c\nw_fn\t/abc/w.c\n# good1.tags --canonicalize-input -l\na_fn\txyz/a.c\nb_fn\tb.c\nc_fn\tc.c\nd_fn\t/tmp/d.c\ne_fn\t/tmp/e.c\nf_fn\t/f.c\ng_fn\t/g.c\nh_fn\t/h.c\ni_fn\t/i.c\nj_fn\t/j.c\nk_fn\t/k.c\nl_fn\tl.c\nm_fn\tm.c\nn_fn\tn.c\no_fn\to.c\np_fn\t/tmp/xyz/p.c\nq_fn\t/tmp/xyz/q.c\nr_fn\t/r.c\ns_fn\t/s.c\nt_fn\t/t.c\nu_fn\t/tmp/u.c\nv_fn\t/tmp/abc/v.c\nw_fn\t/abc/w.c\n# good2.tags -C -l\na_fn\txyz/a.c\nb_fn\tb.c\nc_fn\tc.c\nd_fn\t/tmp/d.c\ne_fn\t/tmp/e.c\nf_fn\t/f.c\ng_fn\t/g.c\nh_fn\t/h.c\ni_fn\t/i.c\nj_fn\t/j.c\nk_fn\t/k.c\nl_fn\tl.c\nm_fn\tm.c\nn_fn\tn.c\no_fn\to.c\np_fn\t/tmp/xyz/p.c\nq_fn\t/tmp/xyz/q.c\nr_fn\t/r.c\ns_fn\t/s.c\nt_fn\t/t.c\nu_fn\t/tmp/u.c\nv_fn\t/tmp/abc/v.c\nw_fn\t/abc/w.c\n# drive-letter0.tags --canonicalize-input -l\n# drive-letter1.tags -C -l\n# good-ptags.tags -C -D\n!_TAG_FILE_FORMAT\t2\n!_TAG_FILE_SORTED\t1\n!_TAG_OUTPUT_EXCMD\tmixed\n!_TAG_OUTPUT_FILESEP\tslash\n!_TAG_OUTPUT_MODE\tu-ctags\n!_TAG_PATTERN_LENGTH_LIMIT\t96\n!_TAG_PROC_CWD\t/tmp\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\n!_TAG_PROGRAM_NAME\tUniversal Ctags\n!_TAG_PROGRAM_URL\thttps://ctags.io/\n!_TAG_PROGRAM_VERSION\t5.9.0\n!_TAG_PROC_DUMMY\t/../../tmp\n# good-ptags.tags -C --list-pseudo-tags\n!_TAG_FILE_FORMAT\t2\n!_TAG_FILE_SORTED\t1\n!_TAG_OUTPUT_EXCMD\tmixed\n!_TAG_OUTPUT_FILESEP\tslash\n!_TAG_OUTPUT_MODE\tu-ctags\n!_TAG_PATTERN_LENGTH_LIMIT\t96\n!_TAG_PROC_CWD\t/tmp\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\n!_TAG_PROGRAM_NAME\tUniversal Ctags\n!_TAG_PROGRAM_URL\thttps://ctags.io/\n!_TAG_PROGRAM_VERSION\t5.9.0\n!_TAG_PROC_DUMMY\t/../../tmp\n# good0.tags -A -l\na_fn\t/tmp/abc/xyz/a.c\nb_fn\t/tmp/abc/b.c\nc_fn\t/tmp/abc/c.c\nd_fn\t/tmp/d.c\ne_fn\t/tmp/e.c\nf_fn\t/f.c\ng_fn\t/g.c\nh_fn\t/h.c\ni_fn\t/i.c\nj_fn\t/j.c\nk_fn\t/k.c\nl_fn\t/tmp/abc/l.c\nm_fn\t/tmp/abc/m.c\nn_fn\t/tmp/abc/n.c\no_fn\t/tmp/abc/o.c\np_fn\t/tmp/xyz/p.c\nq_fn\t/tmp/xyz/q.c\nr_fn\t/r.c\ns_fn\t/s.c\nt_fn\t/t.c\nu_fn\t/tmp/u.c\nv_fn\t/tmp/abc/v.c\nw_fn\t/abc/w.c\n# good1.tags --absolute-input -l\na_fn\t/tmp/abc/xyz/a.c\nb_fn\t/tmp/abc/b.c\nc_fn\t/tmp/abc/c.c\nd_fn\t/tmp/d.c\ne_fn\t/tmp/e.c\nf_fn\t/f.c\ng_fn\t/g.c\nh_fn\t/h.c\ni_fn\t/i.c\nj_fn\t/j.c\nk_fn\t/k.c\nl_fn\t/tmp/abc/l.c\nm_fn\t/tmp/abc/m.c\nn_fn\t/tmp/abc/n.c\no_fn\t/tmp/abc/o.c\np_fn\t/tmp/xyz/p.c\nq_fn\t/tmp/xyz/q.c\nr_fn\t/r.c\ns_fn\t/s.c\nt_fn\t/t.c\nu_fn\t/tmp/u.c\nv_fn\t/tmp/abc/v.c\nw_fn\t/abc/w.c\n# good2.tags -A -l\na_fn\t/tmp/abc/xyz/a.c\nb_fn\t/tmp/abc/b.c\nc_fn\t/tmp/abc/c.c\nd_fn\t/tmp/d.c\ne_fn\t/tmp/e.c\nf_fn\t/f.c\ng_fn\t/g.c\nh_fn\t/h.c\ni_fn\t/i.c\nj_fn\t/j.c\nk_fn\t/k.c\nl_fn\t/tmp/abc/l.c\nm_fn\t/tmp/abc/m.c\nn_fn\t/tmp/abc/n.c\no_fn\t/tmp/abc/o.c\np_fn\t/tmp/xyz/p.c\nq_fn\t/tmp/xyz/q.c\nr_fn\t/r.c\ns_fn\t/s.c\nt_fn\t/t.c\nu_fn\t/tmp/u.c\nv_fn\t/tmp/abc/v.c\nw_fn\t/abc/w.c\n# drive-letter0.tags --absolute-input -l\n# drive-letter1.tags -A -l\n# good-ptags.tags -A -D\n!_TAG_FILE_FORMAT\t2\n!_TAG_FILE_SORTED\t1\n!_TAG_OUTPUT_EXCMD\tmixed\n!_TAG_OUTPUT_FILESEP\tslash\n!_TAG_OUTPUT_MODE\tu-ctags\n!_TAG_PATTERN_LENGTH_LIMIT\t96\n!_TAG_PROC_CWD\t/tmp\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\n!_TAG_PROGRAM_NAME\tUniversal Ctags\n!_TAG_PROGRAM_URL\thttps://ctags.io/\n!_TAG_PROGRAM_VERSION\t5.9.0\n!_TAG_PROC_DUMMY\t/../../tmp\n# good-ptags.tags -A --list-pseudo-tags\n!_TAG_FILE_FORMAT\t2\n!_TAG_FILE_SORTED\t1\n!_TAG_OUTPUT_EXCMD\tmixed\n!_TAG_OUTPUT_FILESEP\tslash\n!_TAG_OUTPUT_MODE\tu-ctags\n!_TAG_PATTERN_LENGTH_LIMIT\t96\n!_TAG_PROC_CWD\t/tmp\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\n!_TAG_PROGRAM_NAME\tUniversal Ctags\n!_TAG_PROGRAM_URL\thttps://ctags.io/\n!_TAG_PROGRAM_VERSION\t5.9.0\n!_TAG_PROC_DUMMY\t/../../tmp\n" }, { "path": "Tmain/readtags-combine.d/backward.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/6e3f1aa1/\nfoo\tinput.c\t2;?^int foo (void)$?;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-combine.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-combine.d/forward.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/6e3f1aa1/\nfoo\tinput.c\t0;/^int foo (void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-combine.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2019 CCI Europe. Author: Claus Moltke-Leth\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${V} ${READTAGS} -e -t forward.tags -l &&\n${V} ${READTAGS} -e -t backward.tags -l\n" }, { "path": "Tmain/readtags-combine.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-combine.d/stdout-expected.txt", "content": "foo\tinput.c\t0;/^int foo (void)$/;\"\tkind:f\ttyperef:typename:int\nfoo\tinput.c\t2;?^int foo (void)$?;\"\tkind:f\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-default-field-val.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-default-field-val.d/input.c", "content": "/* ctags -o output.tags --fields-C=+'{properties}' input.c */\nstatic int a(void)\n{\n\treturn 0;\n}\n\ninline int b(void)\n{\n\treturn 0;\n}\n\nint c(void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/readtags-default-field-val.d/output.tags", "content": "!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_FIELD_DESCRIPTION!C\tproperties\t/properties (static, inline, mutable,...)/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_VERSION\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!C\t0.0\t/current.age/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/Tmain/readtags-default-field-val.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t6.0.0\t//\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\na\tinput.c\t/^static int a(void)$/;\"\tf\ttyperef:typename:int\tfile:\tproperties:static\nb\tinput.c\t/^inline int b(void)$/;\"\tf\ttyperef:typename:int\tproperties:inline\nc\tinput.c\t/^int c(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-default-field-val.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n# ?a\n# 97\n# (format \"%c\" 96)\n# => `\n\"${READTAGS}\" -t output.tags -S '(<> ($ \"properties\" \"`\") (& \"properties\" \"`\"))' -F '(list $name \" \" ($ \"properties\" \"noprop\") #t)' -l\n" }, { "path": "Tmain/readtags-default-field-val.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-default-field-val.d/stdout-expected.txt", "content": "c noprop\nb inline\na static\n" }, { "path": "Tmain/readtags-error-conflicting-actions.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-error-conflicting-actions.d/input.tags", "content": "" }, { "path": "Tmain/readtags-error-conflicting-actions.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nBUILDDIR=$2\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\nf=${BUILDDIR}/tmp-readtags-error-conflicting-actions-$$\nrm -f \"$f\"\n\n{\n\t${READTAGS} --tag-file input.tags -l - main\n} 2> \"$f\"\n\ns=$?\n\nsed 's|.*\\(readtags[^:]*\\):|readtags:|' < \"$f\" 1>&2\nrm \"$f\"\n\nexit $s\n" }, { "path": "Tmain/readtags-error-conflicting-actions.d/stderr-expected.txt", "content": "readtags: choose either an action: finding a tag or listing all\n" }, { "path": "Tmain/readtags-error-conflicting-actions.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/readtags-error-in-sorter.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-error-in-sorter.d/input.c", "content": "/* ctags -o output.tags input.c */\nvoid foo (void)\n{\n}\n\nvoid bar (void)\n{\n}\n\nvoid baz (void)\n{\n}\n" }, { "path": "Tmain/readtags-error-in-sorter.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/02cf1a61/\nbar\tinput.c\t/^void bar (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\nbaz\tinput.c\t/^void baz (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\nfoo\tinput.c\t/^void foo (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\n" }, { "path": "Tmain/readtags-error-in-sorter.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${READTAGS} -t output.tags -S '(<> \"a\" 1)' -l\n" }, { "path": "Tmain/readtags-error-no-action.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-error-no-action.d/input.tags", "content": "" }, { "path": "Tmain/readtags-error-no-action.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nBUILDDIR=$2\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\nf=${BUILDDIR}/tmp-readtags-error-no-action-$$\nrm -f \"$f\"\n\n{\n\t${READTAGS} -t input.tags\n} 2> \"$f\"\n\ns=$?\n\nsed 's|.*\\(readtags[^:]*\\):|readtags:|' < \"$f\" 1>&2\nrm \"$f\"\n\nexit $s\n" }, { "path": "Tmain/readtags-error-no-action.d/stderr-expected.txt", "content": "readtags: no action specified: specify one of NAME, -l or -D\n" }, { "path": "Tmain/readtags-error-no-action.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/readtags-error-no-input.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-error-no-input.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nBUILDDIR=$2\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\nf=${BUILDDIR}/tmp-readtags-error-no-input-$$\nrm -f \"$f\"\n{\n\t: &&\n\t\t${READTAGS} -t ./no-such-input.tags -l ||\n\t\t${READTAGS} -t ./no-such-input.tags -D ||\n\t\t${READTAGS} -t ./no-such-input.tags - main ||\n\t\t${READTAGS} -t ./no-such-input.tags main\n} 2> \"$f\"\n\ns=$?\n\nsed 's|.*\\(readtags[^:]*\\):|readtags:|' < \"$f\" 1>&2\nrm \"$f\"\n\nexit $s\n" }, { "path": "Tmain/readtags-error-no-input.d/stderr-expected.txt", "content": "readtags: cannot open tag file: No such file or directory: ./no-such-input.tags\nreadtags: cannot open tag file: No such file or directory: ./no-such-input.tags\nreadtags: cannot open tag file: No such file or directory: ./no-such-input.tags\nreadtags: cannot open tag file: No such file or directory: ./no-such-input.tags\n" }, { "path": "Tmain/readtags-error-no-input.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/readtags-escaping.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-escaping.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/8d952eba/\naa\tmain/Makefile\t/^%:$/;\"\tt\n\\taa\tparsers/Makefile\t/^%:$/;\"\tt\n!b!b\tmain/Makefile\t/^%:$/;\"\tt\n\\x20c!c\tmain/Makefile\t/^%:$/;\"\tt\n\\x21d!d\tmain/Makefile\t/^%:$/;\"\tt\n\\\\\\aa\tparsers/cxx/Makefile\t/^%:$/;\"\tt\n" }, { "path": "Tmain/readtags-escaping.d/output2.tags", "content": "\\x01level1\tinput.rst\t/^\u0001level1$/;\"\tc\nlevel2\tinput.rst\t/^level2$/;\"\ts\tscope:chapter:\\x01level1\n\\x21level3\\x03\tinput.rst\t/^!level3\u0003$/;\"\tS\tscope:section:level2\n\\x21level1+\tinput.rst\t/^!level1+$/;\"\tc\nlevel2+\tinput.rst\t/^level2+$/;\"\ts\tscope:chapter:!level1+\n\\x02level3+\\x04\tinput.rst\t/^\u0002level3+\u0004$/;\"\tS\tscope:section:level2+\n" }, { "path": "Tmain/readtags-escaping.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\n: &&\necho '# -en -l' &&\n${V} ${READTAGS} -en -t ./output.tags -l &&\n\necho '# -enE -l' &&\n${V} ${READTAGS} -enE -t ./output.tags -l &&\n\necho '# -en --escape-output -l' &&\n${V} ${READTAGS} -en --escape-output -t ./output.tags -l &&\n\necho '# -en -D' &&\n${V} ${READTAGS} -en -t ./output.tags -D &&\n\necho '# -en -E -D' &&\n${V} ${READTAGS} -en -E -t ./output.tags -D &&\n\necho '# -en --escape-output -D' &&\n${V} ${READTAGS} -en --escape-output -t ./output.tags -D &&\n\necho '# -en -l (output2)' &&\n${V} ${READTAGS} -en -t ./output2.tags -l &&\n\necho '# -en --escape-output -l (output2)' &&\n${V} ${READTAGS} -en --escape-output -t ./output2.tags -l &&\n:\n" }, { "path": "Tmain/readtags-escaping.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-escaping.d/stdout-expected.txt", "content": "# -en -l\naa\tmain/Makefile\t/^%:$/;\"\tkind:t\n\taa\tparsers/Makefile\t/^%:$/;\"\tkind:t\n!b!b\tmain/Makefile\t/^%:$/;\"\tkind:t\n c!c\tmain/Makefile\t/^%:$/;\"\tkind:t\n!d!d\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\\u0007a\tparsers/cxx/Makefile\t/^%:$/;\"\tkind:t\n# -enE -l\naa\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\taa\tparsers/Makefile\t/^%:$/;\"\tkind:t\n\\x21b!b\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\x20c!c\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\x21d!d\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\\\\\aa\tparsers/cxx/Makefile\t/^%:$/;\"\tkind:t\n# -en --escape-output -l\naa\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\taa\tparsers/Makefile\t/^%:$/;\"\tkind:t\n\\x21b!b\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\x20c!c\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\x21d!d\tmain/Makefile\t/^%:$/;\"\tkind:t\n\\\\\\aa\tparsers/cxx/Makefile\t/^%:$/;\"\tkind:t\n# -en -D\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/8d952eba/\n# -en -E -D\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/8d952eba/\n# -en --escape-output -D\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/8d952eba/\n# -en -l (output2)\n\u0001level1\tinput.rst\t/^\u0001level1$/;\"\tkind:c\nlevel2\tinput.rst\t/^level2$/;\"\tkind:s\tscope:chapter:\u0001level1\n!level3\u0003\tinput.rst\t/^!level3\u0003$/;\"\tkind:S\tscope:section:level2\n!level1+\tinput.rst\t/^!level1+$/;\"\tkind:c\nlevel2+\tinput.rst\t/^level2+$/;\"\tkind:s\tscope:chapter:!level1+\n\u0002level3+\u0004\tinput.rst\t/^\u0002level3+\u0004$/;\"\tkind:S\tscope:section:level2+\n# -en --escape-output -l (output2)\n\\x01level1\tinput.rst\t/^\u0001level1$/;\"\tkind:c\nlevel2\tinput.rst\t/^level2$/;\"\tkind:s\tscope:chapter:\\x01level1\n\\x21level3\\x03\tinput.rst\t/^!level3\u0003$/;\"\tkind:S\tscope:section:level2\n\\x21level1+\tinput.rst\t/^!level1+$/;\"\tkind:c\nlevel2+\tinput.rst\t/^level2+$/;\"\tkind:s\tscope:chapter:!level1+\n\\x02level3+\\x04\tinput.rst\t/^\u0002level3+\u0004$/;\"\tkind:S\tscope:section:level2+\n" }, { "path": "Tmain/readtags-formatter-op-regex-extraction.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-formatter-op-regex-extraction.d/input.c", "content": "/* ../../ctags -o output.tags --fields=+Z'{nth}' --pseudo-tags= --pseudo-tags=+TAG_FILE_FORMAT --pseudo-tags=+TAG_FILE_SORTED input.c */\n\n/* Taken from linux/include/uapi/linux/bpf.h */\nenum bpf_prog_type {\n\tBPF_PROG_TYPE_UNSPEC,\n\tBPF_PROG_TYPE_SOCKET_FILTER,\n\tBPF_PROG_TYPE_KPROBE,\n\tBPF_PROG_TYPE_SCHED_CLS,\n\tBPF_PROG_TYPE_SCHED_ACT,\n\tBPF_PROG_TYPE_TRACEPOINT,\n\tBPF_PROG_TYPE_XDP,\n\tBPF_PROG_TYPE_PERF_EVENT,\n\tBPF_PROG_TYPE_CGROUP_SKB,\n\tBPF_PROG_TYPE_CGROUP_SOCK,\n\tBPF_PROG_TYPE_LWT_IN,\n\tBPF_PROG_TYPE_LWT_OUT,\n\tBPF_PROG_TYPE_LWT_XMIT,\n\tBPF_PROG_TYPE_SOCK_OPS,\n\tBPF_PROG_TYPE_SK_SKB,\n\tBPF_PROG_TYPE_CGROUP_DEVICE,\n\tBPF_PROG_TYPE_SK_MSG,\n\tBPF_PROG_TYPE_RAW_TRACEPOINT,\n\tBPF_PROG_TYPE_CGROUP_SOCK_ADDR,\n\tBPF_PROG_TYPE_LWT_SEG6LOCAL,\n\tBPF_PROG_TYPE_LIRC_MODE2,\n\tBPF_PROG_TYPE_SK_REUSEPORT,\n\tBPF_PROG_TYPE_FLOW_DISSECTOR,\n\tBPF_PROG_TYPE_CGROUP_SYSCTL,\n\tBPF_PROG_TYPE_RAW_TRACEPOINT_WRITABLE,\n\tBPF_PROG_TYPE_CGROUP_SOCKOPT,\n\tBPF_PROG_TYPE_TRACING,\n\tBPF_PROG_TYPE_STRUCT_OPS,\n\tBPF_PROG_TYPE_EXT,\n\tBPF_PROG_TYPE_LSM,\n\tBPF_PROG_TYPE_SK_LOOKUP,\n\tBPF_PROG_TYPE_SYSCALL, /* a program that can execute syscalls */\n};\n" }, { "path": "Tmain/readtags-formatter-op-regex-extraction.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\nBPF_PROG_TYPE_CGROUP_DEVICE\tinput.c\t/^\tBPF_PROG_TYPE_CGROUP_DEVICE,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:15\nBPF_PROG_TYPE_CGROUP_SKB\tinput.c\t/^\tBPF_PROG_TYPE_CGROUP_SKB,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:8\nBPF_PROG_TYPE_CGROUP_SOCK\tinput.c\t/^\tBPF_PROG_TYPE_CGROUP_SOCK,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:9\nBPF_PROG_TYPE_CGROUP_SOCKOPT\tinput.c\t/^\tBPF_PROG_TYPE_CGROUP_SOCKOPT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:25\nBPF_PROG_TYPE_CGROUP_SOCK_ADDR\tinput.c\t/^\tBPF_PROG_TYPE_CGROUP_SOCK_ADDR,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:18\nBPF_PROG_TYPE_CGROUP_SYSCTL\tinput.c\t/^\tBPF_PROG_TYPE_CGROUP_SYSCTL,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:23\nBPF_PROG_TYPE_EXT\tinput.c\t/^\tBPF_PROG_TYPE_EXT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:28\nBPF_PROG_TYPE_FLOW_DISSECTOR\tinput.c\t/^\tBPF_PROG_TYPE_FLOW_DISSECTOR,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:22\nBPF_PROG_TYPE_KPROBE\tinput.c\t/^\tBPF_PROG_TYPE_KPROBE,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:2\nBPF_PROG_TYPE_LIRC_MODE2\tinput.c\t/^\tBPF_PROG_TYPE_LIRC_MODE2,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:20\nBPF_PROG_TYPE_LSM\tinput.c\t/^\tBPF_PROG_TYPE_LSM,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:29\nBPF_PROG_TYPE_LWT_IN\tinput.c\t/^\tBPF_PROG_TYPE_LWT_IN,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:10\nBPF_PROG_TYPE_LWT_OUT\tinput.c\t/^\tBPF_PROG_TYPE_LWT_OUT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:11\nBPF_PROG_TYPE_LWT_SEG6LOCAL\tinput.c\t/^\tBPF_PROG_TYPE_LWT_SEG6LOCAL,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:19\nBPF_PROG_TYPE_LWT_XMIT\tinput.c\t/^\tBPF_PROG_TYPE_LWT_XMIT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:12\nBPF_PROG_TYPE_PERF_EVENT\tinput.c\t/^\tBPF_PROG_TYPE_PERF_EVENT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:7\nBPF_PROG_TYPE_RAW_TRACEPOINT\tinput.c\t/^\tBPF_PROG_TYPE_RAW_TRACEPOINT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:17\nBPF_PROG_TYPE_RAW_TRACEPOINT_WRITABLE\tinput.c\t/^\tBPF_PROG_TYPE_RAW_TRACEPOINT_WRITABLE,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:24\nBPF_PROG_TYPE_SCHED_ACT\tinput.c\t/^\tBPF_PROG_TYPE_SCHED_ACT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:4\nBPF_PROG_TYPE_SCHED_CLS\tinput.c\t/^\tBPF_PROG_TYPE_SCHED_CLS,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:3\nBPF_PROG_TYPE_SK_LOOKUP\tinput.c\t/^\tBPF_PROG_TYPE_SK_LOOKUP,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:30\nBPF_PROG_TYPE_SK_MSG\tinput.c\t/^\tBPF_PROG_TYPE_SK_MSG,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:16\nBPF_PROG_TYPE_SK_REUSEPORT\tinput.c\t/^\tBPF_PROG_TYPE_SK_REUSEPORT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:21\nBPF_PROG_TYPE_SK_SKB\tinput.c\t/^\tBPF_PROG_TYPE_SK_SKB,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:14\nBPF_PROG_TYPE_SOCKET_FILTER\tinput.c\t/^\tBPF_PROG_TYPE_SOCKET_FILTER,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:1\nBPF_PROG_TYPE_SOCK_OPS\tinput.c\t/^\tBPF_PROG_TYPE_SOCK_OPS,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:13\nBPF_PROG_TYPE_STRUCT_OPS\tinput.c\t/^\tBPF_PROG_TYPE_STRUCT_OPS,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:27\nBPF_PROG_TYPE_SYSCALL\tinput.c\t/^\tBPF_PROG_TYPE_SYSCALL, \\/* a program that can execute syscalls *\\/$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:31\nBPF_PROG_TYPE_TRACEPOINT\tinput.c\t/^\tBPF_PROG_TYPE_TRACEPOINT,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:5\nBPF_PROG_TYPE_TRACING\tinput.c\t/^\tBPF_PROG_TYPE_TRACING,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:26\nBPF_PROG_TYPE_UNSPEC\tinput.c\t/^\tBPF_PROG_TYPE_UNSPEC,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:0\nBPF_PROG_TYPE_XDP\tinput.c\t/^\tBPF_PROG_TYPE_XDP,$/;\"\te\tscope:enum:bpf_prog_type\tfile:\tnth:6\nbpf_prog_type\tinput.c\t/^enum bpf_prog_type {$/;\"\tg\tfile:\n" }, { "path": "Tmain/readtags-formatter-op-regex-extraction.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '#' /GROUP/\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"\" (downcase (#/BPF_PROG_TYPE_(.*)/ $name 1)) \"\\\",\\n\")' \\\n\t -l\n\necho '#' /group/i\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"\" (#/bpf_prog_type_(.*)/i $name 1) \"\\\",\\n\")' \\\n\t -l\n\necho '#' /GROUP/ with a fallback value\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"S\" (#/BPF_PROG_TYPE_S(.*)/ $name 1 \"???\") \"\\\",\\n\")' \\\n\t -l\n\necho '#' /GROUP/i with a fallback value\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"s\" (downcase (#/bpf_prog_type_s(.*)/i $name 1 \"???\")) \"\\\",\\n\")' \\\n\t -l\n\necho '#' /GROUP = 0/\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"\" (downcase (#/BPF_PROG_TYPE_(.*)/ $name 0)) \"\\\",\\n\")' \\\n\t -l\n\necho '#' /GROUP = empty/\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"\" (downcase (#/BPF_PROG_TYPE_UNSPE(.*)()/ $name 2)) \"\\\",\\n\")' \\\n\t -l\n\necho '#' /GROUP = 100/\n${V} ${READTAGS} -t output.tags \\\n\t -Q '(eq? $scope \"enum:bpf_prog_type\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list \"[\" $nth \"] = \\\"\" (downcase (#/BPF_PROG_TYPE_UNSPE(.*)/ $name 100)) \"\\\",\\n\")' \\\n\t -l\n" }, { "path": "Tmain/readtags-formatter-op-regex-extraction.d/stderr-expected.txt", "content": "GOT ERROR in FORMATTING: wrong-regex-group: (#/BPF_PROG_TYPE_(.*)/ $name 0)\nGOT ERROR in FORMATTING: wrong-regex-group: (#/BPF_PROG_TYPE_UNSPE(.*)/ $name 100)\n" }, { "path": "Tmain/readtags-formatter-op-regex-extraction.d/stdout-expected.txt", "content": "# /GROUP/\n[0] = \"unspec\",\n[1] = \"socket_filter\",\n[2] = \"kprobe\",\n[3] = \"sched_cls\",\n[4] = \"sched_act\",\n[5] = \"tracepoint\",\n[6] = \"xdp\",\n[7] = \"perf_event\",\n[8] = \"cgroup_skb\",\n[9] = \"cgroup_sock\",\n[10] = \"lwt_in\",\n[11] = \"lwt_out\",\n[12] = \"lwt_xmit\",\n[13] = \"sock_ops\",\n[14] = \"sk_skb\",\n[15] = \"cgroup_device\",\n[16] = \"sk_msg\",\n[17] = \"raw_tracepoint\",\n[18] = \"cgroup_sock_addr\",\n[19] = \"lwt_seg6local\",\n[20] = \"lirc_mode2\",\n[21] = \"sk_reuseport\",\n[22] = \"flow_dissector\",\n[23] = \"cgroup_sysctl\",\n[24] = \"raw_tracepoint_writable\",\n[25] = \"cgroup_sockopt\",\n[26] = \"tracing\",\n[27] = \"struct_ops\",\n[28] = \"ext\",\n[29] = \"lsm\",\n[30] = \"sk_lookup\",\n[31] = \"syscall\",\n# /group/i\n[0] = \"UNSPEC\",\n[1] = \"SOCKET_FILTER\",\n[2] = \"KPROBE\",\n[3] = \"SCHED_CLS\",\n[4] = \"SCHED_ACT\",\n[5] = \"TRACEPOINT\",\n[6] = \"XDP\",\n[7] = \"PERF_EVENT\",\n[8] = \"CGROUP_SKB\",\n[9] = \"CGROUP_SOCK\",\n[10] = \"LWT_IN\",\n[11] = \"LWT_OUT\",\n[12] = \"LWT_XMIT\",\n[13] = \"SOCK_OPS\",\n[14] = \"SK_SKB\",\n[15] = \"CGROUP_DEVICE\",\n[16] = \"SK_MSG\",\n[17] = \"RAW_TRACEPOINT\",\n[18] = \"CGROUP_SOCK_ADDR\",\n[19] = \"LWT_SEG6LOCAL\",\n[20] = \"LIRC_MODE2\",\n[21] = \"SK_REUSEPORT\",\n[22] = \"FLOW_DISSECTOR\",\n[23] = \"CGROUP_SYSCTL\",\n[24] = \"RAW_TRACEPOINT_WRITABLE\",\n[25] = \"CGROUP_SOCKOPT\",\n[26] = \"TRACING\",\n[27] = \"STRUCT_OPS\",\n[28] = \"EXT\",\n[29] = \"LSM\",\n[30] = \"SK_LOOKUP\",\n[31] = \"SYSCALL\",\n# /GROUP/ with a fallback value\n[0] = \"S???\",\n[1] = \"SOCKET_FILTER\",\n[2] = \"S???\",\n[3] = \"SCHED_CLS\",\n[4] = \"SCHED_ACT\",\n[5] = \"S???\",\n[6] = \"S???\",\n[7] = \"S???\",\n[8] = \"S???\",\n[9] = \"S???\",\n[10] = \"S???\",\n[11] = \"S???\",\n[12] = \"S???\",\n[13] = \"SOCK_OPS\",\n[14] = \"SK_SKB\",\n[15] = \"S???\",\n[16] = \"SK_MSG\",\n[17] = \"S???\",\n[18] = \"S???\",\n[19] = \"S???\",\n[20] = \"S???\",\n[21] = \"SK_REUSEPORT\",\n[22] = \"S???\",\n[23] = \"S???\",\n[24] = \"S???\",\n[25] = \"S???\",\n[26] = \"S???\",\n[27] = \"STRUCT_OPS\",\n[28] = \"S???\",\n[29] = \"S???\",\n[30] = \"SK_LOOKUP\",\n[31] = \"SYSCALL\",\n# /GROUP/i with a fallback value\n[0] = \"s???\",\n[1] = \"socket_filter\",\n[2] = \"s???\",\n[3] = \"sched_cls\",\n[4] = \"sched_act\",\n[5] = \"s???\",\n[6] = \"s???\",\n[7] = \"s???\",\n[8] = \"s???\",\n[9] = \"s???\",\n[10] = \"s???\",\n[11] = \"s???\",\n[12] = \"s???\",\n[13] = \"sock_ops\",\n[14] = \"sk_skb\",\n[15] = \"s???\",\n[16] = \"sk_msg\",\n[17] = \"s???\",\n[18] = \"s???\",\n[19] = \"s???\",\n[20] = \"s???\",\n[21] = \"sk_reuseport\",\n[22] = \"s???\",\n[23] = \"s???\",\n[24] = \"s???\",\n[25] = \"s???\",\n[26] = \"s???\",\n[27] = \"struct_ops\",\n[28] = \"s???\",\n[29] = \"s???\",\n[30] = \"sk_lookup\",\n[31] = \"syscall\",\n# /GROUP = 0/\n# /GROUP = empty/\n[0] = \"\",\n[1] = \"\",\n[2] = \"\",\n[3] = \"\",\n[4] = \"\",\n[5] = \"\",\n[6] = \"\",\n[7] = \"\",\n[8] = \"\",\n[9] = \"\",\n[10] = \"\",\n[11] = \"\",\n[12] = \"\",\n[13] = \"\",\n[14] = \"\",\n[15] = \"\",\n[16] = \"\",\n[17] = \"\",\n[18] = \"\",\n[19] = \"\",\n[20] = \"\",\n[21] = \"\",\n[22] = \"\",\n[23] = \"\",\n[24] = \"\",\n[25] = \"\",\n[26] = \"\",\n[27] = \"\",\n[28] = \"\",\n[29] = \"\",\n[30] = \"\",\n[31] = \"\",\n# /GROUP = 100/\n" }, { "path": "Tmain/readtags-formatter-op-tr.d/input.cpp", "content": "// ctags -o output.tags input.cpp\nint __foo(void) { return 0; }\n" }, { "path": "Tmain/readtags-formatter-op-tr.d/output.tags", "content": "!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_FIELD_DESCRIPTION!C++\tname\t/aliased names/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C++\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!C++\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C++\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C++\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C++\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C++\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C++\tm,member\t/class, struct, and union members/\n!_TAG_KIND_DESCRIPTION!C++\tn,namespace\t/namespaces/\n!_TAG_KIND_DESCRIPTION!C++\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C++\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C++\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C++\tv,variable\t/variable definitions/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_VERSION\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!C++\t0.0\t/current.age/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/Tmain/readtags-qualifier-op-tr.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t6.0.0\t//\n!_TAG_ROLE_DESCRIPTION!C++!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C++!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C++!macro\tundef\t/undefined/\n__foo\tinput.cpp\t/^int __foo(void) { return 0; }$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-formatter-op-tr.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${V} ${READTAGS} -t output.tags -F '(list (tr $name \"_$\") #t)' -l\n\n${V} ${READTAGS} -t output.tags -F '(list (tr $name \"_$x\") #t)' -l\n${V} ${READTAGS} -t output.tags -F '(list (tr $name \"_\") #t)' -l\n${V} ${READTAGS} -t output.tags -F '(list (tr $name \"\") #t)' -l\n${V} ${READTAGS} -t output.tags -F '(list (tr $name 2) #t)' -l\n" }, { "path": "Tmain/readtags-formatter-op-tr.d/stderr-expected.txt", "content": "GOT ERROR in FORMATTING: unexpected-string-length: tr\nGOT ERROR in FORMATTING: unexpected-string-length: tr\nGOT ERROR in FORMATTING: unexpected-string-length: tr\nGOT ERROR in FORMATTING: string-required: tr\n" }, { "path": "Tmain/readtags-formatter-op-tr.d/stdout-expected.txt", "content": "$$foo\n" }, { "path": "Tmain/readtags-formatter.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-formatter.d/input.c", "content": "/* ctags -o output.tags --fields=+St -n --pseudo-tags=-TAG_PROGRAM_VERSION input.c */\n\n#define N 1\n#define M 3\n\nstatic int foo (int v)\n{\n\treturn v + N;\n}\n\nstatic void bar(char **argv, int *r)\n{\n\t*r = M;\n}\n\nint main(int argc, char **argv)\n{\n\tint i;\n\n\tbar(argv, &i);\n\treturn foo (argc) + i;\n}\n" }, { "path": "Tmain/readtags-formatter.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tnumber\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/jet/var/ctags-github/Tmain/readtags-formatter.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\nM\tinput.c\t4;\"\tmacro\tfile:\nN\tinput.c\t3;\"\tmacro\tfile:\nbar\tinput.c\t11;\"\tfunction\ttyperef:typename:void\tfile:\tsignature:(char ** argv,int * r)\nfoo\tinput.c\t6;\"\tfunction\ttyperef:typename:int\tfile:\tsignature:(int v)\nmain\tinput.c\t16;\"\tfunction\ttyperef:typename:int\tsignature:(int argc,char ** argv)\n" }, { "path": "Tmain/readtags-formatter.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# FQ' &&\n\t${V} ${READTAGS} -t output.tags -Q '(eq? $kind \"function\")' --formatter '(list $name #t)' -l &&\necho '# F' &&\n${V} ${READTAGS} -t output.tags -F '(if (eq? $kind \"function\") (list $name #t) #f)' -l &&\necho '# F declarations' &&\n${V} ${READTAGS} -t output.tags -F \\\n '(if (eq? $kind \"function\")\n (list (if $file \"static \" #f) $typeref-name \" \" $name $signature \";\" #t)\n #f)' -l\n" }, { "path": "Tmain/readtags-formatter.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-formatter.d/stdout-expected.txt", "content": "# FQ\nbar\nfoo\nmain\n# F\nbar\nfoo\nmain\n# F declarations\nstatic void bar(char ** argv,int * r);\nstatic int foo(int v);\nint main(int argc,char ** argv);\n" }, { "path": "Tmain/readtags-list-pseudo-tags.d/ptag-sort-no.tags", "content": "!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\nmain\tinput.c\t/^int main (void) { return 0; }$/;\"\tf\ttyperef:typename:int\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\nafunc\tinput.el\t/^(defun afunc () nil)$/;\"\tf\n" }, { "path": "Tmain/readtags-list-pseudo-tags.d/ptag-sort-yes.tags", "content": "!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\nafunc\tinput.el\t/^(defun afunc () nil)$/;\"\tf\nmain\tinput.c\t/^int main (void) { return 0; }$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-list-pseudo-tags.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# SORT=NO (-D)'\n${V} ${READTAGS} -t ./ptag-sort-no.tags -D\n\necho '# SORT=NO (-P)'\n${V} ${READTAGS} -t ./ptag-sort-no.tags -P no-such-tags\n\necho '# SORT=YES (-D)'\n${V} ${READTAGS} -t ./ptag-sort-yes.tags -D\n\necho '# SORT=YES (-P)'\n${V} ${READTAGS} -t ./ptag-sort-yes.tags -P no-such-tags\n\n# Without the following environment variable,\n# Msys2 convert #/MA/i to #C:/msys64/MA/i.\n# See https://www.msys2.org/docs/filesystem-paths/\nexport MSYS2_ARG_CONV_EXCL='*'\n\necho '# -D + FILTER (-D)'\n${V} ${READTAGS} -t ./ptag-sort-yes.tags -Q '(#/MA/i $name)' -D\n\necho '# -P -l + FILTER (-D)'\n${V} ${READTAGS} -t ./ptag-sort-yes.tags -Q '(#/MA/i $name)' -P -l\n" }, { "path": "Tmain/readtags-list-pseudo-tags.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-list-pseudo-tags.d/stdout-expected.txt", "content": "# SORT=NO (-D)\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n# SORT=NO (-P)\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n# SORT=YES (-D)\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n# SORT=YES (-P)\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n# -D + FILTER (-D)\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n# -P -l + FILTER (-D)\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\nmain\tinput.c\t/^int main (void) { return 0; }$/\n" }, { "path": "Tmain/readtags-ptags-dls.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-ptags-dls.d/input.tags", "content": "!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_FIELD_DESCRIPTION!Asm\tproperties\t/properties (req, vararg for parameters)/\n!_TAG_FIELD_DESCRIPTION!C++\tname\t/aliased names/\n!_TAG_FIELD_DESCRIPTION!Go\tpackage\t/the real package specified by the package name/\n!_TAG_FIELD_DESCRIPTION!Go\tpackageName\t/the name for referring the package/\n!_TAG_FIELD_DESCRIPTION!Python\tnameref\t/the original name for the tag/\n!_TAG_FIELD_DESCRIPTION!R\tconstructor\t/function used for making value assigned to the nameattr tag/\n!_TAG_FIELD_DESCRIPTION!Ruby\tmixin\t/how the class or module is mixed in (mixin:HOW:MODULE)/\n!_TAG_FIELD_DESCRIPTION!XML\turi\t/uri associated with name prefix/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tS,subsection\t/level 2 sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tT,l4subsection\t/level 4 sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\ta,anchor\t/anchors/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Asciidoc\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tt,subsubsection\t/level 3 sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tu,l5subsection\t/level 5 sections/\n!_TAG_KIND_DESCRIPTION!Asm\td,define\t/defines/\n!_TAG_KIND_DESCRIPTION!Asm\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!Asm\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!Asm\tt,type\t/types (structs and records)/\n!_TAG_KIND_DESCRIPTION!Awk\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Bats\tS,script\t/scripts/\n!_TAG_KIND_DESCRIPTION!Bats\tt,test\t/test cases/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C++\tM,module\t/modules/\n!_TAG_KIND_DESCRIPTION!C++\tP,partition\t/partitions/\n!_TAG_KIND_DESCRIPTION!C++\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!C++\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C++\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C++\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C++\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C++\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C++\tm,member\t/class, struct, and union members/\n!_TAG_KIND_DESCRIPTION!C++\tn,namespace\t/namespaces/\n!_TAG_KIND_DESCRIPTION!C++\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C++\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C++\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C++\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!CSS\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!CSS\ti,id\t/identities/\n!_TAG_KIND_DESCRIPTION!CSS\ts,selector\t/selectors/\n!_TAG_KIND_DESCRIPTION!DTD\tE,entity\t/entities/\n!_TAG_KIND_DESCRIPTION!DTD\ta,attribute\t/attributes/\n!_TAG_KIND_DESCRIPTION!DTD\te,element\t/elements/\n!_TAG_KIND_DESCRIPTION!DTD\tn,notation\t/notations/\n!_TAG_KIND_DESCRIPTION!DTD\tp,parameterEntity\t/parameter entities/\n!_TAG_KIND_DESCRIPTION!Diff\td,deletedFile\t/deleted files/\n!_TAG_KIND_DESCRIPTION!Diff\th,hunk\t/hunks/\n!_TAG_KIND_DESCRIPTION!Diff\tm,modifiedFile\t/modified files/\n!_TAG_KIND_DESCRIPTION!Diff\tn,newFile\t/newly created files/\n!_TAG_KIND_DESCRIPTION!DosBatch\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!DosBatch\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!Go\tM,anonMember\t/struct anonymous members/\n!_TAG_KIND_DESCRIPTION!Go\tP,packageName\t/name for specifying imported package/\n!_TAG_KIND_DESCRIPTION!Go\tY,unknown\t/unknown/\n!_TAG_KIND_DESCRIPTION!Go\ta,talias\t/type aliases/\n!_TAG_KIND_DESCRIPTION!Go\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!Go\tf,func\t/functions/\n!_TAG_KIND_DESCRIPTION!Go\ti,interface\t/interfaces/\n!_TAG_KIND_DESCRIPTION!Go\tm,member\t/struct members/\n!_TAG_KIND_DESCRIPTION!Go\tn,methodSpec\t/interface method specification/\n!_TAG_KIND_DESCRIPTION!Go\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Go\ts,struct\t/structs/\n!_TAG_KIND_DESCRIPTION!Go\tt,type\t/types/\n!_TAG_KIND_DESCRIPTION!Go\tv,var\t/variables/\n!_TAG_KIND_DESCRIPTION!HTML\tC,stylesheet\t/stylesheets/\n!_TAG_KIND_DESCRIPTION!HTML\tI,id\t/identifiers/\n!_TAG_KIND_DESCRIPTION!HTML\tJ,script\t/scripts/\n!_TAG_KIND_DESCRIPTION!HTML\ta,anchor\t/named anchors/\n!_TAG_KIND_DESCRIPTION!HTML\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!HTML\th,heading1\t/H1 headings/\n!_TAG_KIND_DESCRIPTION!HTML\ti,heading2\t/H2 headings/\n!_TAG_KIND_DESCRIPTION!HTML\tj,heading3\t/H3 headings/\n!_TAG_KIND_DESCRIPTION!HTML\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Iniconf\tk,key\t/keys/\n!_TAG_KIND_DESCRIPTION!Iniconf\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!JSON\ta,array\t/arrays/\n!_TAG_KIND_DESCRIPTION!JSON\tb,boolean\t/booleans/\n!_TAG_KIND_DESCRIPTION!JSON\tn,number\t/numbers/\n!_TAG_KIND_DESCRIPTION!JSON\to,object\t/objects/\n!_TAG_KIND_DESCRIPTION!JSON\ts,string\t/strings/\n!_TAG_KIND_DESCRIPTION!JSON\tz,null\t/nulls/\n!_TAG_KIND_DESCRIPTION!Lua\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Make\tI,makefile\t/makefiles/\n!_TAG_KIND_DESCRIPTION!Make\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!Make\tt,target\t/targets/\n!_TAG_KIND_DESCRIPTION!Man\tS,subsection\t/sub sections/\n!_TAG_KIND_DESCRIPTION!Man\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Man\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Markdown\tS,subsection\t/level 2 sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tT,l4subsection\t/level 4 sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Markdown\th,hashtag\t/hashtags/\n!_TAG_KIND_DESCRIPTION!Markdown\tn,footnote\t/footnotes/\n!_TAG_KIND_DESCRIPTION!Markdown\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tt,subsubsection\t/level 3 sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tu,l5subsection\t/level 5 sections/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tP,parameter\t/parameters/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tR,response\t/responses/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tT,tag\t/tags/\n!_TAG_KIND_DESCRIPTION!OpenAPI\td,schema\t/schemas/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tp,path\t/paths/\n!_TAG_KIND_DESCRIPTION!OpenAPI\ts,server\t/servers (or hosts in swagger)/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Perl\tc,constant\t/constants/\n!_TAG_KIND_DESCRIPTION!Perl\tf,format\t/formats/\n!_TAG_KIND_DESCRIPTION!Perl\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!Perl\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Perl\ts,subroutine\t/subroutines/\n!_TAG_KIND_DESCRIPTION!Pod\tS,subsection\t/subsections/\n!_TAG_KIND_DESCRIPTION!Pod\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Pod\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Pod\tt,subsubsection\t/subsubsections/\n!_TAG_KIND_DESCRIPTION!PowerShell\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!PowerShell\te,enumlabel\t/enum labels/\n!_TAG_KIND_DESCRIPTION!PowerShell\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!PowerShell\tg,enum\t/enum names/\n!_TAG_KIND_DESCRIPTION!PowerShell\ti,filter\t/filter/\n!_TAG_KIND_DESCRIPTION!PowerShell\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!Protobuf\tD,protodef\t/.proto definition/\n!_TAG_KIND_DESCRIPTION!Protobuf\tG,group\t/groups/\n!_TAG_KIND_DESCRIPTION!Protobuf\te,enumerator\t/enum constants/\n!_TAG_KIND_DESCRIPTION!Protobuf\tf,field\t/fields/\n!_TAG_KIND_DESCRIPTION!Protobuf\tg,enum\t/enum types/\n!_TAG_KIND_DESCRIPTION!Protobuf\tm,message\t/messages/\n!_TAG_KIND_DESCRIPTION!Protobuf\to,oneof\t/oneof names/\n!_TAG_KIND_DESCRIPTION!Protobuf\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Protobuf\tr,rpc\t/RPC methods/\n!_TAG_KIND_DESCRIPTION!Protobuf\ts,service\t/services/\n!_TAG_KIND_DESCRIPTION!Python\tI,namespace\t/name referring a module defined in other file/\n!_TAG_KIND_DESCRIPTION!Python\tY,unknown\t/name referring a class\\/variable\\/function\\/module defined in other module/\n!_TAG_KIND_DESCRIPTION!Python\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!Python\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Python\ti,module\t/modules/\n!_TAG_KIND_DESCRIPTION!Python\tm,member\t/class members/\n!_TAG_KIND_DESCRIPTION!Python\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!R\tL,list\t/lists explicitly created with `list()'/\n!_TAG_KIND_DESCRIPTION!R\tc,vector\t/vectors explicitly created with `c()'/\n!_TAG_KIND_DESCRIPTION!R\td,dataframe\t/data frame explicitly created with `data.frame()'/\n!_TAG_KIND_DESCRIPTION!R\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!R\tg,globalVar\t/global variables having values other than function()/\n!_TAG_KIND_DESCRIPTION!R\tl,library\t/libraries/\n!_TAG_KIND_DESCRIPTION!R\tn,nameattr\t/names attribtes in vectors, lists, or dataframes/\n!_TAG_KIND_DESCRIPTION!R\ts,source\t/sources/\n!_TAG_KIND_DESCRIPTION!R\tv,functionVar\t/function variables having values other than function()/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tC,citation\t/citations/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tH,title\t/titles/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tS,subsection\t/subsections/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tT,target\t/targets/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\td,substdef\t/substitute definitions/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\th,subtitle\t/sub titles/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tt,subsubsection\t/subsubsections/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tg,global\t/global macros/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tp,patch\t/patch files/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tt,tag\t/tags/\n!_TAG_KIND_DESCRIPTION!Ruby\tA,accessor\t/accessors/\n!_TAG_KIND_DESCRIPTION!Ruby\tC,constant\t/constants/\n!_TAG_KIND_DESCRIPTION!Ruby\tL,library\t/libraries/\n!_TAG_KIND_DESCRIPTION!Ruby\tS,singletonMethod\t/singleton methods/\n!_TAG_KIND_DESCRIPTION!Ruby\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Ruby\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!Ruby\tf,method\t/methods/\n!_TAG_KIND_DESCRIPTION!Ruby\tm,module\t/modules/\n!_TAG_KIND_DESCRIPTION!SVG\td,def\t/ids in defs tags/\n!_TAG_KIND_DESCRIPTION!Sh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Sh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Sh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!Sh\ts,script\t/script files/\n!_TAG_KIND_DESCRIPTION!SystemdUnit\tu,unit\t/units/\n!_TAG_KIND_DESCRIPTION!TOML\tK,qkey\t/qualified keys/\n!_TAG_KIND_DESCRIPTION!TOML\ta,arraytable\t/array tables/\n!_TAG_KIND_DESCRIPTION!TOML\tt,table\t/tables/\n!_TAG_KIND_DESCRIPTION!XML\ti,id\t/id attributes/\n!_TAG_KIND_DESCRIPTION!XML\tn,nsprefix\t/namespace prefixes/\n!_TAG_KIND_DESCRIPTION!XML\tr,root\t/root elements/\n!_TAG_KIND_DESCRIPTION!Yaml\ta,anchor\t/anchors/\n!_TAG_KIND_DESCRIPTION!Zsh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Zsh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Zsh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!Zsh\ts,script\t/script files/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_VERSION\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Asciidoc\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Asm\t1.0\t/current.age/\n!_TAG_PARSER_VERSION!Awk\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Bats\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!C\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!C++\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!CSS\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!DTD\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Diff\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!DosBatch\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Go\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!HTML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Iniconf\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!JSON\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Lua\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Make\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Man\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Markdown\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!OpenAPI\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Perl\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Pod\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!PowerShell\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Protobuf\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Python\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!R\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!ReStructuredText\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!RpmSpec\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Ruby\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!SVG\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Sh\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!SystemdUnit\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!TOML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!XML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Yaml\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Zsh\t0.0\t/current.age/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t6.1.0\t/d1ecc51b9/\n!_TAG_ROLE_DESCRIPTION!Bats!script\tloaded\t/script loaed with \"load\" command/\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigndecl\t/declared in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C!struct\tforeigndecl\t/declared in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C++!header\texported\t/exported with \"exported imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!header\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C++!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C++!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C++!module\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!module\tpartOwner\t/used for specifying a partition/\n!_TAG_ROLE_DESCRIPTION!C++!partition\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!DTD!element\tattOwner\t/attributes owner/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\tcondition\t/conditions/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\telementName\t/element names/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\tpartOfAttDef\t/part of attribute definition/\n!_TAG_ROLE_DESCRIPTION!Go!package\timported\t/imported package/\n!_TAG_ROLE_DESCRIPTION!Go!unknown\treceiverType\t/receiver type/\n!_TAG_ROLE_DESCRIPTION!HTML!class\tattribute\t/assigned as attributes/\n!_TAG_ROLE_DESCRIPTION!HTML!script\textFile\t/referenced as external files/\n!_TAG_ROLE_DESCRIPTION!HTML!stylesheet\textFile\t/referenced as external files/\n!_TAG_ROLE_DESCRIPTION!Make!makefile\tincluded\t/included/\n!_TAG_ROLE_DESCRIPTION!Make!makefile\toptional\t/optionally included/\n!_TAG_ROLE_DESCRIPTION!Protobuf!message\textension\t/extending the message/\n!_TAG_ROLE_DESCRIPTION!Protobuf!protodef\timported\t/imported/\n!_TAG_ROLE_DESCRIPTION!Python!module\timported\t/imported modules/\n!_TAG_ROLE_DESCRIPTION!Python!module\tindirectlyImported\t/module imported in alternative name/\n!_TAG_ROLE_DESCRIPTION!Python!module\tnamespace\t/namespace from where classes\\/variables\\/functions are imported/\n!_TAG_ROLE_DESCRIPTION!Python!unknown\timported\t/imported from the other module/\n!_TAG_ROLE_DESCRIPTION!Python!unknown\tindirectlyImported\t/classes\\/variables\\/functions\\/modules imported in alternative name/\n!_TAG_ROLE_DESCRIPTION!R!library\tlibrary\t/library attached by library function/\n!_TAG_ROLE_DESCRIPTION!R!library\trequire\t/library attached by require function/\n!_TAG_ROLE_DESCRIPTION!R!source\tsource\t/source loaded by source fucntion/\n!_TAG_ROLE_DESCRIPTION!RpmSpec!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!RpmSpec!patch\tdecl\t/declared for applying later/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\tloaded\t/loaded by \"load\" method/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\trequired\t/loaded by \"require\" method/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\trequiredRel\t/loaded by \"require_relative\" method/\n!_TAG_ROLE_DESCRIPTION!Sh!heredoc\tendmarker\t/end marker/\n!_TAG_ROLE_DESCRIPTION!Sh!script\tloaded\t/loaded/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tAfter\t/referred in After key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tBefore\t/referred in Before key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tRequiredBy\t/referred in RequiredBy key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tRequires\t/referred in Requires key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tWantedBy\t/referred in WantedBy key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tWants\t/referred in Wants key/\n!_TAG_ROLE_DESCRIPTION!Yaml!anchor\talias\t/alias/\n!_TAG_ROLE_DESCRIPTION!Zsh!function\tautoloaded\t/function name passed to autoload built-in command/\n!_TAG_ROLE_DESCRIPTION!Zsh!heredoc\tendmarker\t/end marker/\n!_TAG_ROLE_DESCRIPTION!Zsh!script\tautoloaded\t/autoloaded/\n!_TAG_ROLE_DESCRIPTION!Zsh!script\tloaded\t/loaded/\nzr\t/home/yamato/var/podman/vendor/golang.org/x/net/http2/transport.go\t/^\tzr *gzip.Reader \\/\\/ lazily-initialized gzip reader$/;\"\tm\tstruct:http2.gzipReader\ttyperef:typename:*gzip.Reader\n" }, { "path": "Tmain/readtags-ptags-dls.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# FILTER' &&\n${V} ${READTAGS} -t input.tags -Q '(#/.*CWD.*/ $name)' -D &&\n\necho '# FORMATTER' &&\n${V} ${READTAGS} -t input.tags -Q '(#/.*CWD.*/ $name)' -F '(list $input #t)' -D &&\n\necho '# SORTING INPUT' &&\n${V} ${READTAGS} -t input.tags -S '( (<> $input &input) (<> $name &name))' -D &&\n\necho '# SORTING ! INPUT' &&\n${V} ${READTAGS} -t input.tags -S '(*- ( (<> $input &input) (<> $name &name)))' -D\n" }, { "path": "Tmain/readtags-ptags-dls.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-ptags-dls.d/stdout-expected.txt", "content": "# FILTER\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/\t//\n# FORMATTER\n/home/yamato/var/ctags-github/\n# SORTING INPUT\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/\t//\n!_TAG_OUTPUT_VERSION\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Asciidoc\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Awk\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Bats\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!CSS\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!DTD\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Diff\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!DosBatch\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Go\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!HTML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Iniconf\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!JSON\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Lua\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Man\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!OpenAPI\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Perl\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Pod\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Protobuf\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Python\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!R\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!ReStructuredText\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!RpmSpec\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Ruby\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!SVG\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Sh\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!SystemdUnit\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!TOML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!XML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Yaml\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Zsh\t0.0\t/current.age/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PARSER_VERSION!Asm\t1.0\t/current.age/\n!_TAG_PARSER_VERSION!C\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!C++\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Make\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Markdown\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!PowerShell\t1.1\t/current.age/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_PROGRAM_VERSION\t6.1.0\t/d1ecc51b9/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_KIND_DESCRIPTION!Ruby\tA,accessor\t/accessors/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tAfter\t/referred in After key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tBefore\t/referred in Before key/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tC,citation\t/citations/\n!_TAG_KIND_DESCRIPTION!Ruby\tC,constant\t/constants/\n!_TAG_KIND_DESCRIPTION!HTML\tC,stylesheet\t/stylesheets/\n!_TAG_KIND_DESCRIPTION!Protobuf\tD,protodef\t/.proto definition/\n!_TAG_KIND_DESCRIPTION!DTD\tE,entity\t/entities/\n!_TAG_KIND_DESCRIPTION!Protobuf\tG,group\t/groups/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tH,title\t/titles/\n!_TAG_KIND_DESCRIPTION!HTML\tI,id\t/identifiers/\n!_TAG_KIND_DESCRIPTION!Make\tI,makefile\t/makefiles/\n!_TAG_KIND_DESCRIPTION!Python\tI,namespace\t/name referring a module defined in other file/\n!_TAG_KIND_DESCRIPTION!HTML\tJ,script\t/scripts/\n!_TAG_KIND_DESCRIPTION!TOML\tK,qkey\t/qualified keys/\n!_TAG_KIND_DESCRIPTION!Ruby\tL,library\t/libraries/\n!_TAG_KIND_DESCRIPTION!R\tL,list\t/lists explicitly created with `list()'/\n!_TAG_KIND_DESCRIPTION!Go\tM,anonMember\t/struct anonymous members/\n!_TAG_KIND_DESCRIPTION!C++\tM,module\t/modules/\n!_TAG_KIND_DESCRIPTION!Go\tP,packageName\t/name for specifying imported package/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tP,parameter\t/parameters/\n!_TAG_KIND_DESCRIPTION!C++\tP,partition\t/partitions/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tR,response\t/responses/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tRequiredBy\t/referred in RequiredBy key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tRequires\t/referred in Requires key/\n!_TAG_KIND_DESCRIPTION!Bats\tS,script\t/scripts/\n!_TAG_KIND_DESCRIPTION!Ruby\tS,singletonMethod\t/singleton methods/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tS,subsection\t/level 2 sections/\n!_TAG_KIND_DESCRIPTION!Man\tS,subsection\t/sub sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tS,subsection\t/level 2 sections/\n!_TAG_KIND_DESCRIPTION!Pod\tS,subsection\t/subsections/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tS,subsection\t/subsections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tT,l4subsection\t/level 4 sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tT,l4subsection\t/level 4 sections/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tT,tag\t/tags/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tT,target\t/targets/\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tWantedBy\t/referred in WantedBy key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tWants\t/referred in Wants key/\n!_TAG_KIND_DESCRIPTION!Go\tY,unknown\t/unknown/\n!_TAG_KIND_DESCRIPTION!Python\tY,unknown\t/name referring a class\\/variable\\/function\\/module defined in other module/\n!_TAG_KIND_DESCRIPTION!Ruby\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Sh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Zsh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Asciidoc\ta,anchor\t/anchors/\n!_TAG_KIND_DESCRIPTION!HTML\ta,anchor\t/named anchors/\n!_TAG_KIND_DESCRIPTION!Yaml\ta,anchor\t/anchors/\n!_TAG_KIND_DESCRIPTION!JSON\ta,array\t/arrays/\n!_TAG_KIND_DESCRIPTION!TOML\ta,arraytable\t/array tables/\n!_TAG_KIND_DESCRIPTION!DTD\ta,attribute\t/attributes/\n!_TAG_KIND_DESCRIPTION!Go\ta,talias\t/type aliases/\n!_TAG_ROLE_DESCRIPTION!Yaml!anchor\talias\t/alias/\n!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_ROLE_DESCRIPTION!DTD!element\tattOwner\t/attributes owner/\n!_TAG_ROLE_DESCRIPTION!HTML!class\tattribute\t/assigned as attributes/\n!_TAG_ROLE_DESCRIPTION!Zsh!function\tautoloaded\t/function name passed to autoload built-in command/\n!_TAG_ROLE_DESCRIPTION!Zsh!script\tautoloaded\t/autoloaded/\n!_TAG_KIND_DESCRIPTION!JSON\tb,boolean\t/booleans/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Markdown\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Pod\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!C++\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!CSS\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!HTML\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!PowerShell\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!Python\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!Ruby\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!Go\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!Perl\tc,constant\t/constants/\n!_TAG_KIND_DESCRIPTION!R\tc,vector\t/vectors explicitly created with `c()'/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\tcondition\t/conditions/\n!_TAG_FIELD_DESCRIPTION!R\tconstructor\t/function used for making value assigned to the nameattr tag/\n!_TAG_KIND_DESCRIPTION!R\td,dataframe\t/data frame explicitly created with `data.frame()'/\n!_TAG_KIND_DESCRIPTION!SVG\td,def\t/ids in defs tags/\n!_TAG_KIND_DESCRIPTION!Asm\td,define\t/defines/\n!_TAG_KIND_DESCRIPTION!Diff\td,deletedFile\t/deleted files/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C++\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!OpenAPI\td,schema\t/schemas/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\td,substdef\t/substitute definitions/\n!_TAG_ROLE_DESCRIPTION!RpmSpec!patch\tdecl\t/declared for applying later/\n!_TAG_KIND_DESCRIPTION!DTD\te,element\t/elements/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C++\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!Protobuf\te,enumerator\t/enum constants/\n!_TAG_KIND_DESCRIPTION!PowerShell\te,enumlabel\t/enum labels/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\telementName\t/element names/\n!_TAG_ROLE_DESCRIPTION!Sh!heredoc\tendmarker\t/end marker/\n!_TAG_ROLE_DESCRIPTION!Zsh!heredoc\tendmarker\t/end marker/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_ROLE_DESCRIPTION!C++!header\texported\t/exported with \"exported imported ...\"/\n!_TAG_ROLE_DESCRIPTION!HTML!script\textFile\t/referenced as external files/\n!_TAG_ROLE_DESCRIPTION!HTML!stylesheet\textFile\t/referenced as external files/\n!_TAG_ROLE_DESCRIPTION!Protobuf!message\textension\t/extending the message/\n!_TAG_KIND_DESCRIPTION!Protobuf\tf,field\t/fields/\n!_TAG_KIND_DESCRIPTION!Perl\tf,format\t/formats/\n!_TAG_KIND_DESCRIPTION!Go\tf,func\t/functions/\n!_TAG_KIND_DESCRIPTION!Awk\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C++\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!Lua\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!PowerShell\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Python\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!R\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Sh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Zsh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Ruby\tf,method\t/methods/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigndecl\t/declared in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C!struct\tforeigndecl\t/declared in foreign languages/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C++\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!PowerShell\tg,enum\t/enum names/\n!_TAG_KIND_DESCRIPTION!Protobuf\tg,enum\t/enum types/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tg,global\t/global macros/\n!_TAG_KIND_DESCRIPTION!R\tg,globalVar\t/global variables having values other than function()/\n!_TAG_KIND_DESCRIPTION!Markdown\th,hashtag\t/hashtags/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C++\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!HTML\th,heading1\t/H1 headings/\n!_TAG_KIND_DESCRIPTION!Sh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!Zsh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!Diff\th,hunk\t/hunks/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\th,subtitle\t/sub titles/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_KIND_DESCRIPTION!PowerShell\ti,filter\t/filter/\n!_TAG_KIND_DESCRIPTION!HTML\ti,heading2\t/H2 headings/\n!_TAG_KIND_DESCRIPTION!CSS\ti,id\t/identities/\n!_TAG_KIND_DESCRIPTION!XML\ti,id\t/id attributes/\n!_TAG_KIND_DESCRIPTION!Go\ti,interface\t/interfaces/\n!_TAG_KIND_DESCRIPTION!Python\ti,module\t/modules/\n!_TAG_ROLE_DESCRIPTION!C++!header\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!module\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!partition\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!Go!package\timported\t/imported package/\n!_TAG_ROLE_DESCRIPTION!Protobuf!protodef\timported\t/imported/\n!_TAG_ROLE_DESCRIPTION!Python!module\timported\t/imported modules/\n!_TAG_ROLE_DESCRIPTION!Python!unknown\timported\t/imported from the other module/\n!_TAG_ROLE_DESCRIPTION!Make!makefile\tincluded\t/included/\n!_TAG_ROLE_DESCRIPTION!Python!module\tindirectlyImported\t/module imported in alternative name/\n!_TAG_ROLE_DESCRIPTION!Python!unknown\tindirectlyImported\t/classes\\/variables\\/functions\\/modules imported in alternative name/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_KIND_DESCRIPTION!HTML\tj,heading3\t/H3 headings/\n!_TAG_KIND_DESCRIPTION!Iniconf\tk,key\t/keys/\n!_TAG_KIND_DESCRIPTION!Asm\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!DosBatch\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!Perl\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!R\tl,library\t/libraries/\n!_TAG_ROLE_DESCRIPTION!R!library\tlibrary\t/library attached by library function/\n!_TAG_ROLE_DESCRIPTION!Bats!script\tloaded\t/script loaed with \"load\" command/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\tloaded\t/loaded by \"load\" method/\n!_TAG_ROLE_DESCRIPTION!Sh!script\tloaded\t/loaded/\n!_TAG_ROLE_DESCRIPTION!Zsh!script\tloaded\t/loaded/\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C++!header\tlocal\t/local header/\n!_TAG_KIND_DESCRIPTION!Asm\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!Make\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C++\tm,member\t/class, struct, and union members/\n!_TAG_KIND_DESCRIPTION!Go\tm,member\t/struct members/\n!_TAG_KIND_DESCRIPTION!Python\tm,member\t/class members/\n!_TAG_KIND_DESCRIPTION!Protobuf\tm,message\t/messages/\n!_TAG_KIND_DESCRIPTION!Diff\tm,modifiedFile\t/modified files/\n!_TAG_KIND_DESCRIPTION!Ruby\tm,module\t/modules/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_FIELD_DESCRIPTION!Ruby\tmixin\t/how the class or module is mixed in (mixin:HOW:MODULE)/\n!_TAG_KIND_DESCRIPTION!Markdown\tn,footnote\t/footnotes/\n!_TAG_KIND_DESCRIPTION!Go\tn,methodSpec\t/interface method specification/\n!_TAG_KIND_DESCRIPTION!R\tn,nameattr\t/names attribtes in vectors, lists, or dataframes/\n!_TAG_KIND_DESCRIPTION!C++\tn,namespace\t/namespaces/\n!_TAG_KIND_DESCRIPTION!Diff\tn,newFile\t/newly created files/\n!_TAG_KIND_DESCRIPTION!DTD\tn,notation\t/notations/\n!_TAG_KIND_DESCRIPTION!XML\tn,nsprefix\t/namespace prefixes/\n!_TAG_KIND_DESCRIPTION!JSON\tn,number\t/numbers/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION!C++\tname\t/aliased names/\n!_TAG_FIELD_DESCRIPTION!Python\tnameref\t/the original name for the tag/\n!_TAG_ROLE_DESCRIPTION!Python!module\tnamespace\t/namespace from where classes\\/variables\\/functions are imported/\n!_TAG_KIND_DESCRIPTION!JSON\to,object\t/objects/\n!_TAG_KIND_DESCRIPTION!Protobuf\to,oneof\t/oneof names/\n!_TAG_ROLE_DESCRIPTION!Make!makefile\toptional\t/optionally included/\n!_TAG_KIND_DESCRIPTION!Go\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Perl\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Protobuf\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!DTD\tp,parameterEntity\t/parameter entities/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tp,patch\t/patch files/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tp,path\t/paths/\n!_TAG_FIELD_DESCRIPTION!Go\tpackage\t/the real package specified by the package name/\n!_TAG_FIELD_DESCRIPTION!Go\tpackageName\t/the name for referring the package/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\tpartOfAttDef\t/part of attribute definition/\n!_TAG_ROLE_DESCRIPTION!C++!module\tpartOwner\t/used for specifying a partition/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION!Asm\tproperties\t/properties (req, vararg for parameters)/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_KIND_DESCRIPTION!XML\tr,root\t/root elements/\n!_TAG_KIND_DESCRIPTION!Protobuf\tr,rpc\t/RPC methods/\n!_TAG_ROLE_DESCRIPTION!Go!unknown\treceiverType\t/receiver type/\n!_TAG_ROLE_DESCRIPTION!R!library\trequire\t/library attached by require function/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\trequired\t/loaded by \"require\" method/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\trequiredRel\t/loaded by \"require_relative\" method/\n!_TAG_KIND_DESCRIPTION!Sh\ts,script\t/script files/\n!_TAG_KIND_DESCRIPTION!Zsh\ts,script\t/script files/\n!_TAG_KIND_DESCRIPTION!Asciidoc\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Iniconf\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Man\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Markdown\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Pod\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!CSS\ts,selector\t/selectors/\n!_TAG_KIND_DESCRIPTION!OpenAPI\ts,server\t/servers (or hosts in swagger)/\n!_TAG_KIND_DESCRIPTION!Protobuf\ts,service\t/services/\n!_TAG_KIND_DESCRIPTION!R\ts,source\t/sources/\n!_TAG_KIND_DESCRIPTION!JSON\ts,string\t/strings/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C++\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!Go\ts,struct\t/structs/\n!_TAG_KIND_DESCRIPTION!Perl\ts,subroutine\t/subroutines/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_ROLE_DESCRIPTION!R!source\tsource\t/source loaded by source fucntion/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C++!header\tsystem\t/system header/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tt,subsubsection\t/level 3 sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tt,subsubsection\t/level 3 sections/\n!_TAG_KIND_DESCRIPTION!Pod\tt,subsubsection\t/subsubsections/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tt,subsubsection\t/subsubsections/\n!_TAG_KIND_DESCRIPTION!TOML\tt,table\t/tables/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tt,tag\t/tags/\n!_TAG_KIND_DESCRIPTION!Make\tt,target\t/targets/\n!_TAG_KIND_DESCRIPTION!Bats\tt,test\t/test cases/\n!_TAG_KIND_DESCRIPTION!HTML\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Man\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Asm\tt,type\t/types (structs and records)/\n!_TAG_KIND_DESCRIPTION!Go\tt,type\t/types/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C++\tt,typedef\t/typedefs/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tu,l5subsection\t/level 5 sections/\n!_TAG_KIND_DESCRIPTION!Markdown\tu,l5subsection\t/level 5 sections/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C++\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!SystemdUnit\tu,unit\t/units/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C++!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!RpmSpec!macro\tundef\t/undefined/\n!_TAG_FIELD_DESCRIPTION!XML\turi\t/uri associated with name prefix/\n!_TAG_KIND_DESCRIPTION!R\tv,functionVar\t/function variables having values other than function()/\n!_TAG_KIND_DESCRIPTION!Go\tv,var\t/variables/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C++\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!DosBatch\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!PowerShell\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!Python\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!JSON\tz,null\t/nulls/\n# SORTING ! INPUT\n!_TAG_KIND_DESCRIPTION!JSON\tz,null\t/nulls/\n!_TAG_KIND_DESCRIPTION!Python\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!PowerShell\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!DosBatch\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!C++\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!Go\tv,var\t/variables/\n!_TAG_KIND_DESCRIPTION!R\tv,functionVar\t/function variables having values other than function()/\n!_TAG_FIELD_DESCRIPTION!XML\turi\t/uri associated with name prefix/\n!_TAG_ROLE_DESCRIPTION!RpmSpec!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C++!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_KIND_DESCRIPTION!SystemdUnit\tu,unit\t/units/\n!_TAG_KIND_DESCRIPTION!C++\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!Markdown\tu,l5subsection\t/level 5 sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tu,l5subsection\t/level 5 sections/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_KIND_DESCRIPTION!C++\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!Go\tt,type\t/types/\n!_TAG_KIND_DESCRIPTION!Asm\tt,type\t/types (structs and records)/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Man\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!HTML\tt,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Bats\tt,test\t/test cases/\n!_TAG_KIND_DESCRIPTION!Make\tt,target\t/targets/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tt,tag\t/tags/\n!_TAG_KIND_DESCRIPTION!TOML\tt,table\t/tables/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tt,subsubsection\t/subsubsections/\n!_TAG_KIND_DESCRIPTION!Pod\tt,subsubsection\t/subsubsections/\n!_TAG_KIND_DESCRIPTION!Markdown\tt,subsubsection\t/level 3 sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tt,subsubsection\t/level 3 sections/\n!_TAG_ROLE_DESCRIPTION!C++!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_ROLE_DESCRIPTION!R!source\tsource\t/source loaded by source fucntion/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_KIND_DESCRIPTION!Perl\ts,subroutine\t/subroutines/\n!_TAG_KIND_DESCRIPTION!Go\ts,struct\t/structs/\n!_TAG_KIND_DESCRIPTION!C++\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!JSON\ts,string\t/strings/\n!_TAG_KIND_DESCRIPTION!R\ts,source\t/sources/\n!_TAG_KIND_DESCRIPTION!Protobuf\ts,service\t/services/\n!_TAG_KIND_DESCRIPTION!OpenAPI\ts,server\t/servers (or hosts in swagger)/\n!_TAG_KIND_DESCRIPTION!CSS\ts,selector\t/selectors/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Pod\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Markdown\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Man\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Iniconf\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\ts,section\t/sections/\n!_TAG_KIND_DESCRIPTION!Zsh\ts,script\t/script files/\n!_TAG_KIND_DESCRIPTION!Sh\ts,script\t/script files/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\trequiredRel\t/loaded by \"require_relative\" method/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\trequired\t/loaded by \"require\" method/\n!_TAG_ROLE_DESCRIPTION!R!library\trequire\t/library attached by require function/\n!_TAG_ROLE_DESCRIPTION!Go!unknown\treceiverType\t/receiver type/\n!_TAG_KIND_DESCRIPTION!Protobuf\tr,rpc\t/RPC methods/\n!_TAG_KIND_DESCRIPTION!XML\tr,root\t/root elements/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_FIELD_DESCRIPTION!Asm\tproperties\t/properties (req, vararg for parameters)/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_ROLE_DESCRIPTION!C++!module\tpartOwner\t/used for specifying a partition/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\tpartOfAttDef\t/part of attribute definition/\n!_TAG_FIELD_DESCRIPTION!Go\tpackageName\t/the name for referring the package/\n!_TAG_FIELD_DESCRIPTION!Go\tpackage\t/the real package specified by the package name/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tp,path\t/paths/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tp,patch\t/patch files/\n!_TAG_KIND_DESCRIPTION!DTD\tp,parameterEntity\t/parameter entities/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Protobuf\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Perl\tp,package\t/packages/\n!_TAG_KIND_DESCRIPTION!Go\tp,package\t/packages/\n!_TAG_ROLE_DESCRIPTION!Make!makefile\toptional\t/optionally included/\n!_TAG_KIND_DESCRIPTION!Protobuf\to,oneof\t/oneof names/\n!_TAG_KIND_DESCRIPTION!JSON\to,object\t/objects/\n!_TAG_ROLE_DESCRIPTION!Python!module\tnamespace\t/namespace from where classes\\/variables\\/functions are imported/\n!_TAG_FIELD_DESCRIPTION!Python\tnameref\t/the original name for the tag/\n!_TAG_FIELD_DESCRIPTION!C++\tname\t/aliased names/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_KIND_DESCRIPTION!JSON\tn,number\t/numbers/\n!_TAG_KIND_DESCRIPTION!XML\tn,nsprefix\t/namespace prefixes/\n!_TAG_KIND_DESCRIPTION!DTD\tn,notation\t/notations/\n!_TAG_KIND_DESCRIPTION!Diff\tn,newFile\t/newly created files/\n!_TAG_KIND_DESCRIPTION!C++\tn,namespace\t/namespaces/\n!_TAG_KIND_DESCRIPTION!R\tn,nameattr\t/names attribtes in vectors, lists, or dataframes/\n!_TAG_KIND_DESCRIPTION!Go\tn,methodSpec\t/interface method specification/\n!_TAG_KIND_DESCRIPTION!Markdown\tn,footnote\t/footnotes/\n!_TAG_FIELD_DESCRIPTION!Ruby\tmixin\t/how the class or module is mixed in (mixin:HOW:MODULE)/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_KIND_DESCRIPTION!Ruby\tm,module\t/modules/\n!_TAG_KIND_DESCRIPTION!Diff\tm,modifiedFile\t/modified files/\n!_TAG_KIND_DESCRIPTION!Protobuf\tm,message\t/messages/\n!_TAG_KIND_DESCRIPTION!Python\tm,member\t/class members/\n!_TAG_KIND_DESCRIPTION!Go\tm,member\t/struct members/\n!_TAG_KIND_DESCRIPTION!C++\tm,member\t/class, struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!Make\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!Asm\tm,macro\t/macros/\n!_TAG_ROLE_DESCRIPTION!C++!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!Zsh!script\tloaded\t/loaded/\n!_TAG_ROLE_DESCRIPTION!Sh!script\tloaded\t/loaded/\n!_TAG_ROLE_DESCRIPTION!Ruby!library\tloaded\t/loaded by \"load\" method/\n!_TAG_ROLE_DESCRIPTION!Bats!script\tloaded\t/script loaed with \"load\" command/\n!_TAG_ROLE_DESCRIPTION!R!library\tlibrary\t/library attached by library function/\n!_TAG_KIND_DESCRIPTION!R\tl,library\t/libraries/\n!_TAG_KIND_DESCRIPTION!Perl\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!DosBatch\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!Asm\tl,label\t/labels/\n!_TAG_KIND_DESCRIPTION!Iniconf\tk,key\t/keys/\n!_TAG_KIND_DESCRIPTION!HTML\tj,heading3\t/H3 headings/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_ROLE_DESCRIPTION!Python!unknown\tindirectlyImported\t/classes\\/variables\\/functions\\/modules imported in alternative name/\n!_TAG_ROLE_DESCRIPTION!Python!module\tindirectlyImported\t/module imported in alternative name/\n!_TAG_ROLE_DESCRIPTION!Make!makefile\tincluded\t/included/\n!_TAG_ROLE_DESCRIPTION!Python!unknown\timported\t/imported from the other module/\n!_TAG_ROLE_DESCRIPTION!Python!module\timported\t/imported modules/\n!_TAG_ROLE_DESCRIPTION!Protobuf!protodef\timported\t/imported/\n!_TAG_ROLE_DESCRIPTION!Go!package\timported\t/imported package/\n!_TAG_ROLE_DESCRIPTION!C++!partition\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!module\timported\t/imported with \"imported ...\"/\n!_TAG_ROLE_DESCRIPTION!C++!header\timported\t/imported with \"imported ...\"/\n!_TAG_KIND_DESCRIPTION!Python\ti,module\t/modules/\n!_TAG_KIND_DESCRIPTION!Go\ti,interface\t/interfaces/\n!_TAG_KIND_DESCRIPTION!XML\ti,id\t/id attributes/\n!_TAG_KIND_DESCRIPTION!CSS\ti,id\t/identities/\n!_TAG_KIND_DESCRIPTION!HTML\ti,heading2\t/H2 headings/\n!_TAG_KIND_DESCRIPTION!PowerShell\ti,filter\t/filter/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\th,subtitle\t/sub titles/\n!_TAG_KIND_DESCRIPTION!Diff\th,hunk\t/hunks/\n!_TAG_KIND_DESCRIPTION!Zsh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!Sh\th,heredoc\t/label for here document/\n!_TAG_KIND_DESCRIPTION!HTML\th,heading1\t/H1 headings/\n!_TAG_KIND_DESCRIPTION!C++\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!Markdown\th,hashtag\t/hashtags/\n!_TAG_KIND_DESCRIPTION!R\tg,globalVar\t/global variables having values other than function()/\n!_TAG_KIND_DESCRIPTION!RpmSpec\tg,global\t/global macros/\n!_TAG_KIND_DESCRIPTION!Protobuf\tg,enum\t/enum types/\n!_TAG_KIND_DESCRIPTION!PowerShell\tg,enum\t/enum names/\n!_TAG_KIND_DESCRIPTION!C++\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_ROLE_DESCRIPTION!C!struct\tforeigndecl\t/declared in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigndecl\t/declared in foreign languages/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_KIND_DESCRIPTION!Ruby\tf,method\t/methods/\n!_TAG_KIND_DESCRIPTION!Zsh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Sh\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!R\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Python\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!PowerShell\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Lua\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!C++\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!Awk\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!Go\tf,func\t/functions/\n!_TAG_KIND_DESCRIPTION!Perl\tf,format\t/formats/\n!_TAG_KIND_DESCRIPTION!Protobuf\tf,field\t/fields/\n!_TAG_ROLE_DESCRIPTION!Protobuf!message\textension\t/extending the message/\n!_TAG_ROLE_DESCRIPTION!HTML!stylesheet\textFile\t/referenced as external files/\n!_TAG_ROLE_DESCRIPTION!HTML!script\textFile\t/referenced as external files/\n!_TAG_ROLE_DESCRIPTION!C++!header\texported\t/exported with \"exported imported ...\"/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_ROLE_DESCRIPTION!Zsh!heredoc\tendmarker\t/end marker/\n!_TAG_ROLE_DESCRIPTION!Sh!heredoc\tendmarker\t/end marker/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\telementName\t/element names/\n!_TAG_KIND_DESCRIPTION!PowerShell\te,enumlabel\t/enum labels/\n!_TAG_KIND_DESCRIPTION!Protobuf\te,enumerator\t/enum constants/\n!_TAG_KIND_DESCRIPTION!C++\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!DTD\te,element\t/elements/\n!_TAG_ROLE_DESCRIPTION!RpmSpec!patch\tdecl\t/declared for applying later/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\td,substdef\t/substitute definitions/\n!_TAG_KIND_DESCRIPTION!OpenAPI\td,schema\t/schemas/\n!_TAG_KIND_DESCRIPTION!C++\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!Diff\td,deletedFile\t/deleted files/\n!_TAG_KIND_DESCRIPTION!Asm\td,define\t/defines/\n!_TAG_KIND_DESCRIPTION!SVG\td,def\t/ids in defs tags/\n!_TAG_KIND_DESCRIPTION!R\td,dataframe\t/data frame explicitly created with `data.frame()'/\n!_TAG_FIELD_DESCRIPTION!R\tconstructor\t/function used for making value assigned to the nameattr tag/\n!_TAG_ROLE_DESCRIPTION!DTD!parameterEntity\tcondition\t/conditions/\n!_TAG_KIND_DESCRIPTION!R\tc,vector\t/vectors explicitly created with `c()'/\n!_TAG_KIND_DESCRIPTION!Perl\tc,constant\t/constants/\n!_TAG_KIND_DESCRIPTION!Go\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!Ruby\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!Python\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!PowerShell\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!HTML\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!CSS\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!C++\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Pod\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Markdown\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tc,chapter\t/chapters/\n!_TAG_KIND_DESCRIPTION!JSON\tb,boolean\t/booleans/\n!_TAG_ROLE_DESCRIPTION!Zsh!script\tautoloaded\t/autoloaded/\n!_TAG_ROLE_DESCRIPTION!Zsh!function\tautoloaded\t/function name passed to autoload built-in command/\n!_TAG_ROLE_DESCRIPTION!HTML!class\tattribute\t/assigned as attributes/\n!_TAG_ROLE_DESCRIPTION!DTD!element\tattOwner\t/attributes owner/\n!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_ROLE_DESCRIPTION!Yaml!anchor\talias\t/alias/\n!_TAG_KIND_DESCRIPTION!Go\ta,talias\t/type aliases/\n!_TAG_KIND_DESCRIPTION!DTD\ta,attribute\t/attributes/\n!_TAG_KIND_DESCRIPTION!TOML\ta,arraytable\t/array tables/\n!_TAG_KIND_DESCRIPTION!JSON\ta,array\t/arrays/\n!_TAG_KIND_DESCRIPTION!Yaml\ta,anchor\t/anchors/\n!_TAG_KIND_DESCRIPTION!HTML\ta,anchor\t/named anchors/\n!_TAG_KIND_DESCRIPTION!Asciidoc\ta,anchor\t/anchors/\n!_TAG_KIND_DESCRIPTION!Zsh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Sh\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Ruby\ta,alias\t/aliases/\n!_TAG_KIND_DESCRIPTION!Python\tY,unknown\t/name referring a class\\/variable\\/function\\/module defined in other module/\n!_TAG_KIND_DESCRIPTION!Go\tY,unknown\t/unknown/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tWants\t/referred in Wants key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tWantedBy\t/referred in WantedBy key/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tT,target\t/targets/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tT,tag\t/tags/\n!_TAG_KIND_DESCRIPTION!Markdown\tT,l4subsection\t/level 4 sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tT,l4subsection\t/level 4 sections/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tS,subsection\t/subsections/\n!_TAG_KIND_DESCRIPTION!Pod\tS,subsection\t/subsections/\n!_TAG_KIND_DESCRIPTION!Markdown\tS,subsection\t/level 2 sections/\n!_TAG_KIND_DESCRIPTION!Man\tS,subsection\t/sub sections/\n!_TAG_KIND_DESCRIPTION!Asciidoc\tS,subsection\t/level 2 sections/\n!_TAG_KIND_DESCRIPTION!Ruby\tS,singletonMethod\t/singleton methods/\n!_TAG_KIND_DESCRIPTION!Bats\tS,script\t/scripts/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tRequires\t/referred in Requires key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tRequiredBy\t/referred in RequiredBy key/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tR,response\t/responses/\n!_TAG_KIND_DESCRIPTION!C++\tP,partition\t/partitions/\n!_TAG_KIND_DESCRIPTION!OpenAPI\tP,parameter\t/parameters/\n!_TAG_KIND_DESCRIPTION!Go\tP,packageName\t/name for specifying imported package/\n!_TAG_KIND_DESCRIPTION!C++\tM,module\t/modules/\n!_TAG_KIND_DESCRIPTION!Go\tM,anonMember\t/struct anonymous members/\n!_TAG_KIND_DESCRIPTION!R\tL,list\t/lists explicitly created with `list()'/\n!_TAG_KIND_DESCRIPTION!Ruby\tL,library\t/libraries/\n!_TAG_KIND_DESCRIPTION!TOML\tK,qkey\t/qualified keys/\n!_TAG_KIND_DESCRIPTION!HTML\tJ,script\t/scripts/\n!_TAG_KIND_DESCRIPTION!Python\tI,namespace\t/name referring a module defined in other file/\n!_TAG_KIND_DESCRIPTION!Make\tI,makefile\t/makefiles/\n!_TAG_KIND_DESCRIPTION!HTML\tI,id\t/identifiers/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tH,title\t/titles/\n!_TAG_KIND_DESCRIPTION!Protobuf\tG,group\t/groups/\n!_TAG_KIND_DESCRIPTION!DTD\tE,entity\t/entities/\n!_TAG_KIND_DESCRIPTION!Protobuf\tD,protodef\t/.proto definition/\n!_TAG_KIND_DESCRIPTION!HTML\tC,stylesheet\t/stylesheets/\n!_TAG_KIND_DESCRIPTION!Ruby\tC,constant\t/constants/\n!_TAG_KIND_DESCRIPTION!ReStructuredText\tC,citation\t/citations/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tBefore\t/referred in Before key/\n!_TAG_ROLE_DESCRIPTION!SystemdUnit!unit\tAfter\t/referred in After key/\n!_TAG_KIND_DESCRIPTION!Ruby\tA,accessor\t/accessors/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_VERSION\t6.1.0\t/d1ecc51b9/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_PARSER_VERSION!PowerShell\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Markdown\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Make\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!C++\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!C\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!Asm\t1.0\t/current.age/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PARSER_VERSION!Zsh\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Yaml\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!XML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!TOML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!SystemdUnit\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Sh\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!SVG\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Ruby\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!RpmSpec\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!ReStructuredText\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!R\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Python\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Protobuf\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Pod\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Perl\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!OpenAPI\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Man\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Lua\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!JSON\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Iniconf\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!HTML\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Go\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!DosBatch\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Diff\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!DTD\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!CSS\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Bats\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Awk\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!Asciidoc\t0.0\t/current.age/\n!_TAG_OUTPUT_VERSION\t0.0\t/current.age/\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/\t//\n" }, { "path": "Tmain/readtags-ptags-escaping.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-ptags-escaping.d/pseudo-input-b_.tags", "content": "!_PTAG\tvalue\\\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/pseudo-input-bb.tags", "content": "!_PTAG\tvalue\\\\\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/pseudo-input-bt.tags", "content": "!_PTAG\tvalue\\t\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/pseudo-name-b_.tags", "content": "!_PTAG\\\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/pseudo-name-bb.tags", "content": "!_PTAG\\\\\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/pseudo-name-bt.tags", "content": "!_PTAG\\t\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-input-b_.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\\\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-input-bb.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\\\\\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-input-bt.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\\t\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-kind-b_.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\\\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-kind-bb.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\\\\\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-name-b_.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\\\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-name-bb.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\\\\\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/regular-name-bt.tags", "content": "!_PTAG\tvalue\t/comment/;\"\nregular_tag\\t\t/path/to/file\t/^pattern$/;\"\tkind:\n" }, { "path": "Tmain/readtags-ptags-escaping.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\n# {regular|pseudo}-{field}-{char0{char1}*}.tags\nfor t in INIT\t\t\t\t\t\t\t\t\t\\\n\t\t\t regular-name-b_.tags\t\t\t\t\\\n\t\t\t regular-name-bb.tags\t\t\t\t\\\n\t\t\t regular-name-bt.tags\t\t\t\t\\\n\t\t\t regular-input-b_.tags\t\t\t\t\\\n\t\t\t regular-input-bb.tags\t\t\t\t\\\n\t\t\t regular-input-bt.tags\t\t\t\t\\\n\t\t\t regular-kind-b_.tags\t\t\t\t\\\n\t\t\t regular-kind-bb.tags\t\t\t\t\\\n\t\t\t pseudo-name-b_.tags\t\t\t\t\\\n\t\t\t pseudo-name-bb.tags\t\t\t\t\\\n\t\t\t pseudo-name-bt.tags\t\t\t\t\\\n\t\t\t pseudo-input-b_.tags\t\t\t\t\\\n\t\t\t pseudo-input-bb.tags\t\t\t\t\\\n\t\t\t pseudo-input-bt.tags\t\t\t\t\\\n\t\t ; do\n\tcase $t in\n\t\tINIT)\n\t\t\t;;\n\t\tregular-*)\n\t\t\techo \"# $t\"\n\t\t\t${V} ${READTAGS} -Ee -t $t -l || exit 1\n\t\t\techo\n\t\t\t;;\n\t\tpseudo-*)\n\t\t\techo \"# $t\"\n\t\t\t${V} ${READTAGS} -Ee -t $t -D || exit 1\n\t\t\techo\n\t\t\t;;\n\t\t*)\n\t\t\techo \"INTERNAL BUG\"\n\t\t\texit 1\n\t\t\t;;\n\tesac\ndone\n" }, { "path": "Tmain/readtags-ptags-escaping.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-ptags-escaping.d/stdout-expected.txt", "content": "# regular-name-b_.tags\nregular_tag\\\\\t/path/to/file\t/^pattern$/\n\n# regular-name-bb.tags\nregular_tag\\\\\t/path/to/file\t/^pattern$/\n\n# regular-name-bt.tags\nregular_tag\\t\t/path/to/file\t/^pattern$/\n\n# regular-input-b_.tags\nregular_tag\t/path/to/file\\\t/^pattern$/\n\n# regular-input-bb.tags\nregular_tag\t/path/to/file\\\\\t/^pattern$/\n\n# regular-input-bt.tags\nregular_tag\t/path/to/file\\t\t/^pattern$/\n\n# regular-kind-b_.tags\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\\\\\n\n# regular-kind-bb.tags\nregular_tag\t/path/to/file\t/^pattern$/;\"\tkind:\\\\\n\n# pseudo-name-b_.tags\n!_PTAG\\\\\tvalue\t/comment/\n\n# pseudo-name-bb.tags\n!_PTAG\\\\\tvalue\t/comment/\n\n# pseudo-name-bt.tags\n!_PTAG\\t\tvalue\t/comment/\n\n# pseudo-input-b_.tags\n!_PTAG\tvalue\\\t/comment/\n\n# pseudo-input-bb.tags\n!_PTAG\tvalue\\\\\t/comment/\n\n# pseudo-input-bt.tags\n!_PTAG\tvalue\\t\t/comment/\n\n" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-_-_.tags", "content": "!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-_-b.tags", "content": "!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-_-s.tags", "content": "!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-e-_.tags", "content": "!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-e-b.tags", "content": "!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-e-s.tags", "content": "!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-u-_.tags", "content": "!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-u-b.tags", "content": "!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/example-u-s.tags", "content": "!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//" }, { "path": "Tmain/readtags-ptags-escaping2.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\nfor m in e u _; do\n for s in s b _; do\n\techo readtags -e -t example-$m-$s.tags -E -D:\n\t${V} ${READTAGS} -e -t example-$m-$s.tags -E -D\n\techo readtags -e -t example-$m-$s.tags -D:\n\t${V} ${READTAGS} -e -t example-$m-$s.tags -D\n\techo\n done\ndone\n" }, { "path": "Tmain/readtags-ptags-escaping2.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-ptags-escaping2.d/stdout-expected.txt", "content": "readtags -e -t example-e-s.tags -E -D:\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-e-s.tags -D:\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-e-b.tags -E -D:\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-e-b.tags -D:\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-e-_.tags -E -D:\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-e-_.tags -D:\n!_TAG_OUTPUT_MODE\te-ctags\t/u-ctags or e-ctags/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-u-s.tags -E -D:\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-u-s.tags -D:\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\tb\t//\n\nreadtags -e -t example-u-b.tags -E -D:\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-u-b.tags -D:\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-u-_.tags -E -D:\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-u-_.tags -D:\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-_-s.tags -E -D:\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-_-s.tags -D:\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-_-b.tags -E -D:\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-_-b.tags -D:\n!_TAG_OUTPUT_FILESEP\tbackslash\t/slash or backslash/\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\nreadtags -e -t example-_-_.tags -E -D:\n!_TAG_PROC_CWD\t/home/a\\tb\t//\nreadtags -e -t example-_-_.tags -D:\n!_TAG_PROC_CWD\t/home/a\\tb\t//\n\n" }, { "path": "Tmain/readtags-qualifier-begin.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-qualifier-begin.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/;\"\textras:pseudo\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/;\"\textras:pseudo\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/;\"\textras:pseudo\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/;\"\textras:pseudo\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/;\"\textras:pseudo\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//;\"\textras:pseudo\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/;\"\textras:pseudo\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/;\"\textras:pseudo\n!_TAG_PROGRAM_VERSION\t0.0.0\t/8957c2ce/;\"\textras:pseudo\nabc\tsample.c\t/^int abc;$/;\"\tkind:variable\tline:2\tlanguage:C\ttyperef:typename:int\troles:def\tend:2\nefg\tsample.c\t/^int efg;$/;\"\tkind:variable\tline:3\tlanguage:C\ttyperef:typename:int\troles:def\tend:3\n" }, { "path": "Tmain/readtags-qualifier-begin.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\nrun_readtags()\n{\n\tlocal fexpr=$1\n\tlocal action=$2\n\techo ';;' \"$fexpr\" &&\n\t\techo ';;' \"$fexpr\" 1>&2 &&\n\t\t${V} ${READTAGS} -e -t output.tags -Q \"$fexpr\" \"$action\"\n}\n\nrun_readtags '(begin #f (print $name) (print $line) #t)' -l &&\nrun_readtags '(begin #t (print $name) (print $line) #f)' -l &&\nrun_readtags '(begin #t (print $name) (print $line) (eq? $name \"efg\"))' -l &&\nrun_readtags '(begin #t (and (eq? $name \"abc\") (print $name) (print $line)) (eq? $name \"efg\"))' -l &&\nrun_readtags '(begin0 #t (print $name) (print $line) #f)' -l &&\nrun_readtags '(begin0 #f (print $name) (print $line) #t)' -l &&\nrun_readtags '(begin0 (eq? $name \"abc\") (print $name) (print $line) #t)' -l\nrun_readtags '(begin0 (eq? $name \"abc\") (and (eq? $name \"efg\") (print $name) (print $line)) #t)' -l\n" }, { "path": "Tmain/readtags-qualifier-begin.d/sample.c", "content": "/* ./ctags --fields='*' -o output.tags sample.c */\nint abc;\nint efg;\n" }, { "path": "Tmain/readtags-qualifier-begin.d/stderr-expected.txt", "content": ";; (begin #f (print $name) (print $line) #t)\n\"abc\"\n2\n\"efg\"\n3\n;; (begin #t (print $name) (print $line) #f)\n\"abc\"\n2\n\"efg\"\n3\n;; (begin #t (print $name) (print $line) (eq? $name \"efg\"))\n\"abc\"\n2\n\"efg\"\n3\n;; (begin #t (and (eq? $name \"abc\") (print $name) (print $line)) (eq? $name \"efg\"))\n\"abc\"\n2\n;; (begin0 #t (print $name) (print $line) #f)\n\"abc\"\n2\n\"efg\"\n3\n;; (begin0 #f (print $name) (print $line) #t)\n\"abc\"\n2\n\"efg\"\n3\n;; (begin0 (eq? $name \"abc\") (print $name) (print $line) #t)\n\"abc\"\n2\n\"efg\"\n3\n;; (begin0 (eq? $name \"abc\") (and (eq? $name \"efg\") (print $name) (print $line)) #t)\n\"efg\"\n3\n" }, { "path": "Tmain/readtags-qualifier-begin.d/stdout-expected.txt", "content": ";; (begin #f (print $name) (print $line) #t)\nabc\tsample.c\t/^int abc;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:2\nefg\tsample.c\t/^int efg;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:3\n;; (begin #t (print $name) (print $line) #f)\n;; (begin #t (print $name) (print $line) (eq? $name \"efg\"))\nefg\tsample.c\t/^int efg;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:3\n;; (begin #t (and (eq? $name \"abc\") (print $name) (print $line)) (eq? $name \"efg\"))\nefg\tsample.c\t/^int efg;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:3\n;; (begin0 #t (print $name) (print $line) #f)\nabc\tsample.c\t/^int abc;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:2\nefg\tsample.c\t/^int efg;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:3\n;; (begin0 #f (print $name) (print $line) #t)\n;; (begin0 (eq? $name \"abc\") (print $name) (print $line) #t)\nabc\tsample.c\t/^int abc;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:2\n;; (begin0 (eq? $name \"abc\") (and (eq? $name \"efg\") (print $name) (print $line)) #t)\nabc\tsample.c\t/^int abc;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:2\n" }, { "path": "Tmain/readtags-qualifier-broken-exp.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-qualifier-broken-exp.d/input.c", "content": "/* u-ctags input.c */\nint\nmain(void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/readtags-qualifier-broken-exp.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tDarren Hiebert\t/dhiebert@users.sourceforge.net/\n!_TAG_PROGRAM_NAME\tExuberant Ctags\t//\n!_TAG_PROGRAM_URL\thttp://ctags.sourceforge.net\t/official site/\n!_TAG_PROGRAM_VERSION\t5.8\t//\nmain\tinput.c\t/^main(void)$/;\"\tf\n" }, { "path": "Tmain/readtags-qualifier-broken-exp.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${V} ${READTAGS} -e -t output.tags -Q '(' -l\n" }, { "path": "Tmain/readtags-qualifier-broken-exp.d/stderr-expected.txt", "content": "Failed to read the expression for filter: (\nReason: READ-ERROR\n" }, { "path": "Tmain/readtags-qualifier-end-field.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-qualifier-end-field.d/output.tags", "content": "A\tinput.py\t/^class A(object):$/;\"\tc\tline:1\tend:18\nf\tinput.py\t/^ def f(self):$/;\"\tm\tline:3\tclass:A\tend:9\nA.f\tinput.py\t/^ def f(self):$/;\"\tm\tline:3\tclass:A\tend:9\ng\tinput.py\t/^ def g(x):$/;\"\tf\tline:4\tfunction:A.f\tfile:\tend:6\ny\tinput.py\t/^ y = 1$/;\"\tv\tline:10\tclass:A\nh\tinput.py\t/^ def h(self):$/;\"\tm\tline:12\tclass:A\tend:15\nA.h\tinput.py\t/^ def h(self):$/;\"\tm\tline:12\tclass:A\tend:15\ni\tinput.py\t/^ def i(self):$/;\"\tm\tline:16\tclass:A\tend:18\nA.i\tinput.py\t/^ def i(self):$/;\"\tm\tline:16\tclass:A\tend:18\ninput.py\tinput.py\t18;\"\tF\tline:18\n" }, { "path": "Tmain/readtags-qualifier-end-field.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho ';; (and $end (> $end 14) (< $end 18))' &&\n ${V} ${READTAGS} -e -t output.tags -Q '(and $end (> $end 14) (< $end 18))' -l &&\n :\n" }, { "path": "Tmain/readtags-qualifier-end-field.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier-end-field.d/stdout-expected.txt", "content": ";; (and $end (> $end 14) (< $end 18))\nh\tinput.py\t/^ def h(self):$/;\"\tkind:m\tclass:A\tend:15\nA.h\tinput.py\t/^ def h(self):$/;\"\tkind:m\tclass:A\tend:15\n" }, { "path": "Tmain/readtags-qualifier-exp-with-garbage.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/readtags-qualifier-exp-with-garbage.d/input.c", "content": "/* ctags -o output.tags input.c */\nvoid foo (void)\n{\n}\n\nvoid bar (void)\n{\n}\n\nvoid baz (void)\n{\n}\n" }, { "path": "Tmain/readtags-qualifier-exp-with-garbage.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/02cf1a61/\nbar\tinput.c\t/^void bar (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\nbaz\tinput.c\t/^void baz (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\nfoo\tinput.c\t/^void foo (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\n" }, { "path": "Tmain/readtags-qualifier-exp-with-garbage.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2026 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\ns=0\n${READTAGS} -t output.tags -S '(<> 2 1)x' -l > /dev/null\ns=`expr $s + $?`\n\n${READTAGS} -t output.tags -S '(<> 2 1) ' -l > /dev/null\ns=`expr $s + $?`\n\n${READTAGS} -t output.tags -S '(<> 2 1) ; comment' -l > /dev/null\ns=`expr $s + $?`\n\nexit $s\n" }, { "path": "Tmain/readtags-qualifier-exp-with-garbage.d/stderr-expected.txt", "content": "Garbage at the end of the sorter expression: x\n" }, { "path": "Tmain/readtags-qualifier-nth-field.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-qualifier-nth-field.d/input.c", "content": "/* ctags --options=NONE --sort=yes--kinds-C=+z --fields=+o --pseudo-tags=-TAG_PROGRAM_VERSION output.tags */\nint z(int y, int x)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/readtags-qualifier-nth-field.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/jet/var/ctags-github/Tmain/readtags-qualifier-nth-field.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\nx\tinput.c\t/^int z(int y, int x)$/;\"\tz\tfunction:z\ttyperef:typename:int\tfile:\tnth:1\ny\tinput.c\t/^int z(int y, int x)$/;\"\tz\tfunction:z\ttyperef:typename:int\tfile:\tnth:0\nz\tinput.c\t/^int z(int y, int x)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-qualifier-nth-field.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${V} ${READTAGS} -e -t output.tags \\\n\t -Q '(eq? $kind \"z\")' \\\n\t -S '(<> $nth &nth)' \\\n\t -F '(list $name \":\" $nth #t)' \\\n\t -l\n" }, { "path": "Tmain/readtags-qualifier-nth-field.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier-nth-field.d/stdout-expected.txt", "content": "y:0\nx:1\n" }, { "path": "Tmain/readtags-qualifier-op-downcase-upcase.d/input.cpp", "content": "// ctags -o output.tags --fields=+i input.cpp\nclass A {\nprotected:\n int f (void) {\n return 1;\n }\n};\n\nclass B {\nprotected:\n int g (void) {\n return 1;\n }\n};\n\nclass C: A, B {\npublic:\n int h (void) {\n return f () + g ();\n }\n};\n" }, { "path": "Tmain/readtags-qualifier-op-downcase-upcase.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/e87283aa/\nA\tinput.cpp\t/^class A {$/;\"\tc\tfile:\nB\tinput.cpp\t/^class B {$/;\"\tc\tfile:\nC\tinput.cpp\t/^class C: A, B {$/;\"\tc\tfile:\tinherits:A,B\nf\tinput.cpp\t/^ int f (void) {$/;\"\tf\tclass:A\ttyperef:typename:int\tfile:\ng\tinput.cpp\t/^ int g (void) {$/;\"\tf\tclass:B\ttyperef:typename:int\tfile:\nh\tinput.cpp\t/^ int h (void) {$/;\"\tf\tclass:C\ttyperef:typename:int\tfile:\n" }, { "path": "Tmain/readtags-qualifier-op-downcase-upcase.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# (eq? \"c\" (downcase $name))'\n${V} ${READTAGS} -t output.tags -Q '(eq? \"c\" (downcase $name))' -l\n\necho '# (and $inherits (#/(^|,)a(,|$)/ (downcase $inherits)))'\n${V} ${READTAGS} -t output.tags -Q '(and $inherits (#/(^|,)a(,|$)/ (downcase $inherits)))' -l\n\necho '# (and $inherits (#/(^|,)b(,|$)/ (downcase $inherits)))'\n${V} ${READTAGS} -t output.tags -Q '(and $inherits (#/(^|,)b(,|$)/ (downcase $inherits)))' -l\n\necho '# (and $inherits (#/(^|,)d(,|$)/ (downcase $inherits)))'\n${V} ${READTAGS} -t output.tags -Q '(and $inherits (#/(^|,)d(,|$)/ (downcase $inherits)))' -l\n\necho '# (eq? \"F\" (upcase $name))'\n${V} ${READTAGS} -t output.tags -Q '(eq? \"F\" (upcase $name))' -l\n\necho '# (eq? \"G\" (upcase $name))'\n${V} ${READTAGS} -t output.tags -Q '(eq? \"G\" (upcase $name))' -l\n\necho '# (eq? \"J\" (upcase $name))'\n${V} ${READTAGS} -t output.tags -Q '(eq? \"J\" (upcase $name))' -l\n" }, { "path": "Tmain/readtags-qualifier-op-downcase-upcase.d/stdout-expected.txt", "content": "# (eq? \"c\" (downcase $name))\nC\tinput.cpp\t/^class C: A, B {$/\n# (and $inherits (#/(^|,)a(,|$)/ (downcase $inherits)))\nC\tinput.cpp\t/^class C: A, B {$/\n# (and $inherits (#/(^|,)b(,|$)/ (downcase $inherits)))\nC\tinput.cpp\t/^class C: A, B {$/\n# (and $inherits (#/(^|,)d(,|$)/ (downcase $inherits)))\n# (eq? \"F\" (upcase $name))\nf\tinput.cpp\t/^ int f (void) {$/\n# (eq? \"G\" (upcase $name))\ng\tinput.cpp\t/^ int g (void) {$/\n# (eq? \"J\" (upcase $name))\n" }, { "path": "Tmain/readtags-qualifier-op-length.d/input.el", "content": ";; ctags -o output.tags input.el\n(defun hi-zzz ())\n(defun hi-aaa-some-long-thing ())\n(defun hi-bbb-1 ())\n(defun hi-y ())\n(defun bye ())\n(defun bye-long-long-long-long-lone ())\n" }, { "path": "Tmain/readtags-qualifier-op-length.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/58efa7d1/\nbye\tinput.el\t/^(defun bye ())$/;\"\tf\nbye-long-long-long-long-lone\tinput.el\t/^(defun bye-long-long-long-long-lone ())$/;\"\tf\nhi-aaa-some-long-thing\tinput.el\t/^(defun hi-aaa-some-long-thing ())$/;\"\tf\nhi-bbb-1\tinput.el\t/^(defun hi-bbb-1 ())$/;\"\tf\nhi-y\tinput.el\t/^(defun hi-y ())$/;\"\tf\nhi-zzz\tinput.el\t/^(defun hi-zzz ())$/;\"\tf\n" }, { "path": "Tmain/readtags-qualifier-op-length.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# (<> $name &name)'\n${V} ${READTAGS} -t output.tags -S '(<> $name &name)' -p hi\n\necho '# ( (<> (length $name) (length &name)) (<> $name &name))'\n${V} ${READTAGS} -t output.tags -S '( (<> (length $name) (length &name)) (<> $name &name))' -p hi\n" }, { "path": "Tmain/readtags-qualifier-op-length.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier-op-length.d/stdout-expected.txt", "content": "# (<> $name &name)\nhi-aaa-some-long-thing\tinput.el\t/^(defun hi-aaa-some-long-thing ())$/\nhi-bbb-1\tinput.el\t/^(defun hi-bbb-1 ())$/\nhi-y\tinput.el\t/^(defun hi-y ())$/\nhi-zzz\tinput.el\t/^(defun hi-zzz ())$/\n# ( (<> (length $name) (length &name)) (<> $name &name))\nhi-y\tinput.el\t/^(defun hi-y ())$/\nhi-zzz\tinput.el\t/^(defun hi-zzz ())$/\nhi-bbb-1\tinput.el\t/^(defun hi-bbb-1 ())$/\nhi-aaa-some-long-thing\tinput.el\t/^(defun hi-aaa-some-long-thing ())$/\n" }, { "path": "Tmain/readtags-qualifier-op-list.d/input.c", "content": "/* ctags --options=NONE --kinds-c='*' -o output.tags input.c */\nextern int f (void);\nint g (int c)\n{\n\treturn c;\n}\n\nint x;\n\nstruct s {\n\tint i, j, k;\n};\n" }, { "path": "Tmain/readtags-qualifier-op-list.d/output.tags", "content": "!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function or prototype definitions/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_VERSION\t1.1\t/current.age/\n!_TAG_PARSER_VERSION!C\t1.1\t/current.age/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/Tmain/readtags-qualifier-op-list.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t6.2.1\t//\n!_TAG_ROLE_DESCRIPTION!C!function\tforeigndecl\t/declared in foreign languages/\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C!struct\tforeigndecl\t/declared in foreign languages/\nc\tinput.c\t/^int g (int c)$/;\"\tz\tfunction:g\ttyperef:typename:int\tfile:\nf\tinput.c\t/^extern int f (void);$/;\"\tp\ttyperef:typename:int\tfile:\ng\tinput.c\t/^int g (int c)$/;\"\tf\ttyperef:typename:int\ni\tinput.c\t/^\tint i, j, k;$/;\"\tm\tstruct:s\ttyperef:typename:int\tfile:\nj\tinput.c\t/^\tint i, j, k;$/;\"\tm\tstruct:s\ttyperef:typename:int\tfile:\nk\tinput.c\t/^\tint i, j, k;$/;\"\tm\tstruct:s\ttyperef:typename:int\tfile:\ns\tinput.c\t/^struct s {$/;\"\ts\tfile:\nx\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-qualifier-op-list.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2026 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\nqexpr='(not (member $kind (list \"m\" \"z\" \"p\" \"f\" \"s\")))'\necho \"-Q '${qexpr}'\"\n${V} ${READTAGS} -et output.tags \\\n\t -Q \"$qexpr\" \\\n\t -l\necho $?\n\nqexpr='(member $kind (list \"z\" \"p\"))'\necho \"-Q '${qexpr}'\"\n${V} ${READTAGS} -et output.tags \\\n\t -Q \"$qexpr\" \\\n\t -l\necho $?\n\nsexpr='( (if (and (member $kind (list \"s\" \"v\")) (member &kind (list \"s\" \"v\"))) (<> $name &name) 0) (<> &name $name))'\necho \"-S $sexpr\"\n${V} ${READTAGS} -et output.tags \\\n\t -S \"$sexpr\" \\\n\t -l\necho $?\n" }, { "path": "Tmain/readtags-qualifier-op-list.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier-op-list.d/stdout-expected.txt", "content": "-Q '(not (member $kind (list \"m\" \"z\" \"p\" \"f\" \"s\")))'\nx\tinput.c\t/^int x;$/;\"\tkind:v\ttyperef:typename:int\n0\n-Q '(member $kind (list \"z\" \"p\"))'\nc\tinput.c\t/^int g (int c)$/;\"\tkind:z\tfile:\tfunction:g\ttyperef:typename:int\nf\tinput.c\t/^extern int f (void);$/;\"\tkind:p\tfile:\ttyperef:typename:int\n0\n-S ( (if (and (member $kind (list \"s\" \"v\")) (member &kind (list \"s\" \"v\"))) (<> $name &name) 0) (<> &name $name))\ns\tinput.c\t/^struct s {$/;\"\tkind:s\tfile:\nx\tinput.c\t/^int x;$/;\"\tkind:v\ttyperef:typename:int\nk\tinput.c\t/^\tint i, j, k;$/;\"\tkind:m\tfile:\tstruct:s\ttyperef:typename:int\nj\tinput.c\t/^\tint i, j, k;$/;\"\tkind:m\tfile:\tstruct:s\ttyperef:typename:int\ni\tinput.c\t/^\tint i, j, k;$/;\"\tkind:m\tfile:\tstruct:s\ttyperef:typename:int\ng\tinput.c\t/^int g (int c)$/;\"\tkind:f\ttyperef:typename:int\nf\tinput.c\t/^extern int f (void);$/;\"\tkind:p\tfile:\ttyperef:typename:int\nc\tinput.c\t/^int g (int c)$/;\"\tkind:z\tfile:\tfunction:g\ttyperef:typename:int\n0\n" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/input.x", "content": "[{.*+]}^$()|?\\\nabc\n" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/jet/var/ctags-new/Tmain/readtags-qualifier-op-regexp-quote.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n[{.*+]}^$()|?\\\\\tinput.x\t/^[{.*+]}^$()|?\\\\$/;\"\ta\nabc\tinput.x\t/^abc$/;\"\ta\n" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${V} ${READTAGS} -e -t output.tags \\\n\t -Q '(if (prefix? $name \"a\") #f ((string->regexp (string-append (regexp-quote $name) \".?\")) $name))' \\\n\t -l\n\n${V} ${READTAGS} -e -t output.tags \\\n\t -Q '(if (prefix? $name \"a\") #f ((string->regexp (string-append (regexp-quote \"[{.*+]}^$()|?\\\\\") \".?\")) $name))' \\\n\t -l\n" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/stdout-expected.txt", "content": "[{.*+]}^$()|?\\\tinput.x\t/^[{.*+]}^$()|?\\\\$/;\"\tkind:a\n[{.*+]}^$()|?\\\tinput.x\t/^[{.*+]}^$()|?\\\\$/;\"\tkind:a\n" }, { "path": "Tmain/readtags-qualifier-op-regexp-quote.d/x.ctags", "content": "# u-ctags --options=x.ctags -o output.tags input.x\n--langdef=X\n--map-X=.x\n--languages=X\n--kinddef-X=a,anything,something anythings\n--regex-X=/^(.*)$/\\1/a/\n--pseudo-tags=-TAG_PROGRAM_VERSION\n" }, { "path": "Tmain/readtags-qualifier-op-string-append.d/input.c", "content": "struct abpcx {\n\tint p;\n};\n\nstruct abpcy {\n\tint p;\n};\n\nstruct abpcz {\n\tint p;\n};\n" }, { "path": "Tmain/readtags-qualifier-op-string-append.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/jet/var/ctags-new/Tmain/readtags-qualifier-op-string-append.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\naapcz\tinput.c\t/^struct aapcz {$/;\"\tstruct\tline:9\tfile:\nabpcx\tinput.c\t/^struct abpcx {$/;\"\tstruct\tline:1\tfile:\nabpcy\tinput.c\t/^struct abpcy {$/;\"\tstruct\tline:5\tfile:\np\tinput.c\t/^\tint p;$/;\"\tmember\tline:10\tscope:struct:aapcz\ttyperef:typename:int\tfile:\np\tinput.c\t/^\tint p;$/;\"\tmember\tline:2\tscope:struct:abpcx\ttyperef:typename:int\tfile:\np\tinput.c\t/^\tint p;$/;\"\tmember\tline:6\tscope:struct:abpcy\ttyperef:typename:int\tfile:\n" }, { "path": "Tmain/readtags-qualifier-op-string-append.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\nr()\n{\n\techo ';; ' \"$1\"\n\t${V} ${READTAGS} -e -t output.tags -Q \"$1\" -l\n}\n\nr '(eq? $scope-name (string-append \"ab\" $name \"cy\"))'\nr '(eq? $scope-name (concat \"ab\" \"p\" \"cy\"))'\nr '(eq? $scope-name (concat (concat \"a\" \"b\") $name (concat \"c\" \"y\")))'\nr '(eq? $scope-name (concat (concat \"a\" \"b\" $name) (concat \"c\" \"y\")))'\nr '(eq? $scope-name (concat (concat (concat \"a\" \"b\" $name) (concat \"c\" \"y\"))))'\nr '((string->regexp (concat (concat (concat \"a\" \"b\" $name) (concat \"c\" \"y\")))) (or $scope-name \"\"))'\nr '((string->regexp (concat (concat (concat \"a\" \"b\" \"p\") (concat \"c\" \"y\")))) (or $scope-name \"\"))'\nr '((printX (string->regexp (concat (concat (concat \"a\" \"b\" \"p\") (concat \"c\" \"y\"))))) (or $scope-name \"\"))'\n" }, { "path": "Tmain/readtags-qualifier-op-string-append.d/stderr-expected.txt", "content": "#/abpcy/\n" }, { "path": "Tmain/readtags-qualifier-op-string-append.d/stdout-expected.txt", "content": ";; (eq? $scope-name (string-append \"ab\" $name \"cy\"))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; (eq? $scope-name (concat \"ab\" \"p\" \"cy\"))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; (eq? $scope-name (concat (concat \"a\" \"b\") $name (concat \"c\" \"y\")))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; (eq? $scope-name (concat (concat \"a\" \"b\" $name) (concat \"c\" \"y\")))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; (eq? $scope-name (concat (concat (concat \"a\" \"b\" $name) (concat \"c\" \"y\"))))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; ((string->regexp (concat (concat (concat \"a\" \"b\" $name) (concat \"c\" \"y\")))) (or $scope-name \"\"))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; ((string->regexp (concat (concat (concat \"a\" \"b\" \"p\") (concat \"c\" \"y\")))) (or $scope-name \"\"))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n;; ((printX (string->regexp (concat (concat (concat \"a\" \"b\" \"p\") (concat \"c\" \"y\"))))) (or $scope-name \"\"))\np\tinput.c\t/^\tint p;$/;\"\tkind:member\tfile:\tscope:struct:abpcy\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-qualifier-regex.d/input.hxx", "content": "/*\n * u-ctags --fields=S --kinds-C++=+p -o output.tags input.hxx\n */\nint f ( int, int, int);\nint f (char, int, int);\nint f (char, char, int);\nint f (char, int, char);\nint f (char, char, char);\nint f ( int, char, int);\nint f ( int, char, char);\nint f ( int, int, char);\n\ntypedef char CHAR;\ntypedef int INT;\n\nint g ( INT, INT, INT);\nint g (CHAR, INT, INT);\nint g (CHAR, CHAR, INT);\nint g (CHAR, INT, CHAR);\nint g (CHAR, CHAR, CHAR);\nint g ( INT, CHAR, INT);\nint g ( INT, CHAR, CHAR);\nint g ( INT, INT, CHAR);\n" }, { "path": "Tmain/readtags-qualifier-regex.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/e9d9780d/\nCHAR\tinput.hxx\t/^typedef char CHAR;$/\nINT\tinput.hxx\t/^typedef int INT;$/\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, int, char);$/;\"\tsignature:(int,int,char)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f ( int, char, char);$/;\"\tsignature:(int,char,char)\nf\tinput.hxx\t/^int f (char, int, int);$/;\"\tsignature:(char,int,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, int);$/;\"\tsignature:(char,char,int)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\ng\tinput.hxx\t/^int g ( INT, INT, INT);$/;\"\tsignature:(INT,INT,INT)\ng\tinput.hxx\t/^int g ( INT, INT, CHAR);$/;\"\tsignature:(INT,INT,CHAR)\ng\tinput.hxx\t/^int g ( INT, CHAR, INT);$/;\"\tsignature:(INT,CHAR,INT)\ng\tinput.hxx\t/^int g ( INT, CHAR, CHAR);$/;\"\tsignature:(INT,CHAR,CHAR)\ng\tinput.hxx\t/^int g (CHAR, INT, INT);$/;\"\tsignature:(CHAR,INT,INT)\ng\tinput.hxx\t/^int g (CHAR, INT, CHAR);$/;\"\tsignature:(CHAR,INT,CHAR)\ng\tinput.hxx\t/^int g (CHAR, CHAR, INT);$/;\"\tsignature:(CHAR,CHAR,INT)\ng\tinput.hxx\t/^int g (CHAR, CHAR, CHAR);$/;\"\tsignature:(CHAR,CHAR,CHAR)\n" }, { "path": "Tmain/readtags-qualifier-regex.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# case sensitive'\n${V} ${READTAGS} -t output.tags -Q '(and $signature (#/char,.*,char|int,.*,int/ $signature))' -en -l\n\necho '# case insensitive: the pattern is lower case'\n${V} ${READTAGS} -t output.tags -Q '(and $signature (#/char,.*,char|int,.*,int/i $signature))' -en -l\n\necho '# case insensitive: the pattern is upper case'\n${V} ${READTAGS} -t output.tags -Q '(and $signature (#/CHAR,.*,CHAR|INT,.*,INT/i $signature))' -en -l\n\necho '# case sensitive (string->regexp)'\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature ((string->regexp \"char,.*,char|int,.*,int\") $signature)) #f) #f)' -en -l\n\necho '# case sensitive (string->regexp :case-fold #f)'\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature ((string->regexp \"char,.*,char|int,.*,int\" :case-fold #f) $signature)) #f) #f)' -en -l\n\necho '# case sensitive (string->regexp :case-fold false)'\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature ((string->regexp \"char,.*,char|int,.*,int\" :case-fold false) $signature)) #f) #f)' -en -l\n\necho '# case insensitive: the pattern is lower case (string->regexp :case-fold #t)'\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature ((string->regexp \"char,.*,char|int,.*,int\" :case-fold #t) $signature)) #f) #f)' -en -l\n\necho '# case insensitive: the pattern is upper case (string->regexp :case-fold true)'\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature ((string->regexp \"CHAR,.*,CHAR|INT,.*,INT\" :case-fold true) $signature)) #f) #f)' -en -l\n\necho '# RAISING AN ERROR' 1>&2\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature (#/[/ $signature)) #f) #f)' -en -l\n\necho '# RAISING AN ERROR (string->regexp)' 1>&2\n${V} ${READTAGS} -t output.tags -Q '(or #f #f (or #f (and $signature ((string->regexp \"[\") $signature)) #f) #f)' -en -l\n" }, { "path": "Tmain/readtags-qualifier-regex.d/stderr-expected.txt", "content": "# RAISING AN ERROR\nFailed to read the expression for filter: (or #f #f (or #f (and $signature (#/[/ $signature)) #f) #f)\nReason: WRONG-REGEX-SYNTAX\n# RAISING AN ERROR (string->regexp)\nCOMPILE ERROR: WRONG-REGEX-SYNTAX: ()\nMEMORY EXHAUSTED or SYNTAX ERROR\nFailed to compile the expression of filter: (or #f #f (or #f (and $signature ((string->regexp \"[\") $signature)) #f) #f)\n" }, { "path": "Tmain/readtags-qualifier-regex.d/stdout-expected.txt", "content": "# case sensitive\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\n# case insensitive: the pattern is lower case\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\ng\tinput.hxx\t/^int g ( INT, INT, INT);$/;\"\tsignature:(INT,INT,INT)\ng\tinput.hxx\t/^int g ( INT, CHAR, INT);$/;\"\tsignature:(INT,CHAR,INT)\ng\tinput.hxx\t/^int g (CHAR, INT, CHAR);$/;\"\tsignature:(CHAR,INT,CHAR)\ng\tinput.hxx\t/^int g (CHAR, CHAR, CHAR);$/;\"\tsignature:(CHAR,CHAR,CHAR)\n# case insensitive: the pattern is upper case\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\ng\tinput.hxx\t/^int g ( INT, INT, INT);$/;\"\tsignature:(INT,INT,INT)\ng\tinput.hxx\t/^int g ( INT, CHAR, INT);$/;\"\tsignature:(INT,CHAR,INT)\ng\tinput.hxx\t/^int g (CHAR, INT, CHAR);$/;\"\tsignature:(CHAR,INT,CHAR)\ng\tinput.hxx\t/^int g (CHAR, CHAR, CHAR);$/;\"\tsignature:(CHAR,CHAR,CHAR)\n# case sensitive (string->regexp)\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\n# case sensitive (string->regexp :case-fold #f)\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\n# case sensitive (string->regexp :case-fold false)\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\n# case insensitive: the pattern is lower case (string->regexp :case-fold #t)\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\ng\tinput.hxx\t/^int g ( INT, INT, INT);$/;\"\tsignature:(INT,INT,INT)\ng\tinput.hxx\t/^int g ( INT, CHAR, INT);$/;\"\tsignature:(INT,CHAR,INT)\ng\tinput.hxx\t/^int g (CHAR, INT, CHAR);$/;\"\tsignature:(CHAR,INT,CHAR)\ng\tinput.hxx\t/^int g (CHAR, CHAR, CHAR);$/;\"\tsignature:(CHAR,CHAR,CHAR)\n# case insensitive: the pattern is upper case (string->regexp :case-fold true)\nf\tinput.hxx\t/^int f ( int, int, int);$/;\"\tsignature:(int,int,int)\nf\tinput.hxx\t/^int f ( int, char, int);$/;\"\tsignature:(int,char,int)\nf\tinput.hxx\t/^int f (char, int, char);$/;\"\tsignature:(char,int,char)\nf\tinput.hxx\t/^int f (char, char, char);$/;\"\tsignature:(char,char,char)\ng\tinput.hxx\t/^int g ( INT, INT, INT);$/;\"\tsignature:(INT,INT,INT)\ng\tinput.hxx\t/^int g ( INT, CHAR, INT);$/;\"\tsignature:(INT,CHAR,INT)\ng\tinput.hxx\t/^int g (CHAR, INT, CHAR);$/;\"\tsignature:(CHAR,INT,CHAR)\ng\tinput.hxx\t/^int g (CHAR, CHAR, CHAR);$/;\"\tsignature:(CHAR,CHAR,CHAR)\n" }, { "path": "Tmain/readtags-qualifier-sf-cond.d/input.c", "content": "typedef struct abc {\n\tint def;\n\tint ghi;\n} jkl;\n\njkl mno;\n\njkl pqr(void)\n{\n\treturn (jkl){.def = 1, .ghi = 2};\n}\n" }, { "path": "Tmain/readtags-qualifier-sf-cond.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/jet/var/ctags-github/Tmain/readtags-qualifier-sf-cond.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\nabc\tinput.c\t/^typedef struct abc {$/;\"\ts\tfile:\ndef\tinput.c\t/^\tint def;$/;\"\tm\tstruct:abc\ttyperef:typename:int\tfile:\nghi\tinput.c\t/^\tint ghi;$/;\"\tm\tstruct:abc\ttyperef:typename:int\tfile:\njkl\tinput.c\t/^} jkl;$/;\"\tt\ttyperef:struct:abc\tfile:\nmno\tinput.c\t/^jkl mno;$/;\"\tv\ttyperef:typename:jkl\npqr\tinput.c\t/^jkl pqr(void)$/;\"\tf\ttyperef:typename:jkl\n" }, { "path": "Tmain/readtags-qualifier-sf-cond.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${V} ${READTAGS} -e -t output.tags \\\n\t -Q '(cond ((eq? $kind \"m\") (#/.h./ $name)) ((eq? $kind \"t\")) ((#/.n./ $name) #f) (#t))' \\\n\t -l\n" }, { "path": "Tmain/readtags-qualifier-sf-cond.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier-sf-cond.d/stdout-expected.txt", "content": "abc\tinput.c\t/^typedef struct abc {$/;\"\tkind:s\tfile:\nghi\tinput.c\t/^\tint ghi;$/;\"\tkind:m\tfile:\tstruct:abc\ttyperef:typename:int\njkl\tinput.c\t/^} jkl;$/;\"\tkind:t\tfile:\ttyperef:struct:abc\npqr\tinput.c\t/^jkl pqr(void)$/;\"\tkind:f\ttyperef:typename:jkl\n" }, { "path": "Tmain/readtags-qualifier.d/base.c", "content": "/*\n * ctags --fields='*' --kinds-C='*' -o c.tags base.c\n */\nint\nmain(int argc, char ** argv)\n{\n\tint r = argc + 1;\n\treturn r;\n}\n" }, { "path": "Tmain/readtags-qualifier.d/base.py", "content": "#\n# ./ctags --fields='*' --extras='*' -o output.tags base.py\n#\nclass Foo:\n def aq ():\n pass\n def aw ():\n pass\n def ae ():\n pass\n class A:\n pass\nclass Bar (Foo):\n def bq ():\n pass\n def bw ():\n pass\n class B:\n pass\n\nclass Baz (Foo): \n def bq ():\n pass\n def bw ():\n pass\n class C:\n pass\n \n" }, { "path": "Tmain/readtags-qualifier.d/c.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/;\"\textras:pseudo\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/;\"\textras:pseudo\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/;\"\textras:pseudo\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/;\"\textras:pseudo\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/;\"\textras:pseudo\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//;\"\textras:pseudo\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/;\"\textras:pseudo\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/;\"\textras:pseudo\n!_TAG_PROGRAM_VERSION\t0.0.0\t/158beae9/;\"\textras:pseudo\nargc\tbase.c\t/^main(int argc, char ** argv)$/;\"\tkind:parameter\tline:5\tlanguage:C\tscope:function:main\ttyperef:typename:int\tfile:\troles:def\textras:fileScope\nargv\tbase.c\t/^main(int argc, char ** argv)$/;\"\tkind:parameter\tline:5\tlanguage:C\tscope:function:main\ttyperef:typename:char **\tfile:\troles:def\textras:fileScope\nmain\tbase.c\t/^main(int argc, char ** argv)$/;\"\tkind:function\tline:5\tlanguage:C\ttyperef:typename:int\tsignature:(int argc,char ** argv)\troles:def\tend:9\nr\tbase.c\t/^\tint r = argc + 1;$/;\"\tkind:local\tline:7\tlanguage:C\tscope:function:main\ttyperef:typename:int\tfile:\troles:def\textras:fileScope\tend:7\n" }, { "path": "Tmain/readtags-qualifier.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-qualifier.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/bbd8fc2/\nA\tbase.py\t/^ class A:$/;\"\tkind:class\tline:11\tlanguage:Python\tscope:class:Foo\tinherits:\taccess:public\nB\tbase.py\t/^ class B:$/;\"\tkind:class\tline:18\tlanguage:Python\tscope:class:Bar\tinherits:\taccess:public\nBar\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tline:13\tlanguage:Python\tinherits:Foo\taccess:public\nBar.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:14\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBar.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:16\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBaz\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tline:21\tlanguage:Python\tinherits:Foo\taccess:public\nBaz.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:22\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nBaz.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:24\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nC\tbase.py\t/^ class C:$/;\"\tkind:class\tline:26\tlanguage:Python\tscope:class:Baz\tinherits:\taccess:public\nFoo\tbase.py\t/^class Foo:$/;\"\tkind:class\tline:4\tlanguage:Python\tinherits:\taccess:public\nFoo.ae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tline:9\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tline:5\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tline:7\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tline:9\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tline:5\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tline:7\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nbase.py\tbase.py\t28;\"\tkind:file\tline:28\tlanguage:Python\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:14\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:22\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:16\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:24\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\n" }, { "path": "Tmain/readtags-qualifier.d/roles.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/bbd8fc2/\nBar\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tline:13\tlanguage:Python\tinherits:Foo\taccess:public\nBaz\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tline:21\tlanguage:Python\tinherits:Foo\taccess:public\nFoo\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tline:13\tlanguage:Python\troles:superClass\nFoo\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tline:21\tlanguage:Python\troles:superClass\n\n" }, { "path": "Tmain/readtags-qualifier.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho ';; (suffix? $name \"q\")' &&\n${V} ${READTAGS} -e -t output.tags -Q '(suffix? $name \"q\")' -l &&\necho ';; (and (eq? $kind \"member\") (eq? \"Baz\" $scope-name))' &&\n${V} ${READTAGS} -e -t output.tags -Q '(and (eq? $kind \"member\") (eq? \"Baz\" $scope-name))' -l &&\necho ';; (and (eq? $kind \"member\") (substr? $name \".\"))' &&\n${V} ${READTAGS} -e -t output.tags -Q '(and (eq? $kind \"member\") (substr? $name \".\"))' -l &&\necho ';; (and $inherits (#/(^|,)Foo(,|$)/ $inherits) (eq? $kind \"class\"))' &&\n${V} ${READTAGS} -e -t output.tags -Q '(and $inherits (#/(^|,)Foo(,|$)/ $inherits) (eq? $kind \"class\"))' -l &&\necho ';; (not ($ \"signature\"))' &&\n${V} ${READTAGS} -e -t output.tags -Q '(not ($ \"signature\"))' -l &&\necho ';; (< 1 2)' &&\n${V} ${READTAGS} -e -t output.tags -Q '(< 1 2)' -l &&\necho ';; (and $roles (#/(^|,)superClass(,|$)/ $roles))' &&\n${V} ${READTAGS} -e -n -t roles.tags -Q '(and $roles (#/(^|,)superClass(,|$)/ $roles))' -l &&\necho ';; (substr? (or ($ \"roles\") \"\") \"super\")' &&\n${V} ${READTAGS} -e -t roles.tags -Q '(substr? (or ($ \"roles\") \"\") \"super\")' -l &&\necho ';; (and (eq? $scope-kind \"function\") (eq? $kind \"local\"))' &&\n${V} ${READTAGS} -e -t c.tags -Q '(and (eq? $scope-kind \"function\") (eq? $kind \"local\"))' -l &&\n:\n" }, { "path": "Tmain/readtags-qualifier.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-qualifier.d/stdout-expected.txt", "content": ";; (suffix? $name \"q\")\nBar.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBaz.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nFoo.aq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\n;; (and (eq? $kind \"member\") (eq? \"Baz\" $scope-name))\nBaz.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nBaz.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\n;; (and (eq? $kind \"member\") (substr? $name \".\"))\nBar.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBar.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBaz.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nBaz.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nFoo.ae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\n;; (and $inherits (#/(^|,)Foo(,|$)/ $inherits) (eq? $kind \"class\"))\nBar\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tlanguage:Python\tinherits:Foo\taccess:public\nBaz\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tlanguage:Python\tinherits:Foo\taccess:public\n;; (not ($ \"signature\"))\nA\tbase.py\t/^ class A:$/;\"\tkind:class\tlanguage:Python\tscope:class:Foo\tinherits:\taccess:public\nB\tbase.py\t/^ class B:$/;\"\tkind:class\tlanguage:Python\tscope:class:Bar\tinherits:\taccess:public\nBar\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tlanguage:Python\tinherits:Foo\taccess:public\nBaz\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tlanguage:Python\tinherits:Foo\taccess:public\nC\tbase.py\t/^ class C:$/;\"\tkind:class\tlanguage:Python\tscope:class:Baz\tinherits:\taccess:public\nFoo\tbase.py\t/^class Foo:$/;\"\tkind:class\tlanguage:Python\tinherits:\taccess:public\nbase.py\tbase.py\t28;\"\tkind:file\tlanguage:Python\n;; (< 1 2)\nA\tbase.py\t/^ class A:$/;\"\tkind:class\tlanguage:Python\tscope:class:Foo\tinherits:\taccess:public\nB\tbase.py\t/^ class B:$/;\"\tkind:class\tlanguage:Python\tscope:class:Bar\tinherits:\taccess:public\nBar\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tlanguage:Python\tinherits:Foo\taccess:public\nBar.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBar.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBaz\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tlanguage:Python\tinherits:Foo\taccess:public\nBaz.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nBaz.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nC\tbase.py\t/^ class C:$/;\"\tkind:class\tlanguage:Python\tscope:class:Baz\tinherits:\taccess:public\nFoo\tbase.py\t/^class Foo:$/;\"\tkind:class\tlanguage:Python\tinherits:\taccess:public\nFoo.ae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nbase.py\tbase.py\t28;\"\tkind:file\tlanguage:Python\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\n;; (and $roles (#/(^|,)superClass(,|$)/ $roles))\nFoo\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tline:13\tlanguage:Python\troles:superClass\nFoo\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tline:21\tlanguage:Python\troles:superClass\n;; (substr? (or ($ \"roles\") \"\") \"super\")\nFoo\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tlanguage:Python\troles:superClass\nFoo\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tlanguage:Python\troles:superClass\n;; (and (eq? $scope-kind \"function\") (eq? $kind \"local\"))\nr\tbase.c\t/^\tint r = argc + 1;$/;\"\tkind:local\tfile:\tlanguage:C\tscope:function:main\ttyperef:typename:int\troles:def\textras:fileScope\tend:7\n" }, { "path": "Tmain/readtags-simple-listing.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-simple-listing.d/input.c", "content": "/* u-ctags --sort=yes --fields=* -o output.tags input.c */\nint var;\nstrcut st {\n\tint m0;\n\tint m2;\n};\nchar c;\ntypedef strcut st tst;\n" }, { "path": "Tmain/readtags-simple-listing.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# no -e option' &&\n${V} ${READTAGS} -t ./sorted.tags -l &&\n\necho '# with -e option' &&\n${V} ${READTAGS} -e -t ./sorted.tags -l &&\n\necho '# with -e -n option' &&\n${V} ${READTAGS} -e -n -t ./sorted.tags -l\n" }, { "path": "Tmain/readtags-simple-listing.d/sorted.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/;\"\textras:pseudo\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/;\"\textras:pseudo\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/;\"\textras:pseudo\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/;\"\textras:pseudo\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/;\"\textras:pseudo\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//;\"\textras:pseudo\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/;\"\textras:pseudo\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/;\"\textras:pseudo\n!_TAG_PROGRAM_VERSION\t0.0.0\t/5cbc78e4/;\"\textras:pseudo\nc\tinput.c\t/^char c;$/;\"\tkind:variable\tline:7\tlanguage:C\ttyperef:typename:char\troles:def\tend:7\nm0\tinput.c\t/^\tint m0;$/;\"\tkind:variable\tline:4\tlanguage:C\ttyperef:typename:int\troles:def\tend:4\nm2\tinput.c\t/^\tint m2;$/;\"\tkind:variable\tline:5\tlanguage:C\ttyperef:typename:int\troles:def\tend:5\ntst\tinput.c\t/^typedef strcut st tst;$/;\"\tkind:typedef\tline:8\tlanguage:C\ttyperef:typename:strcut st\tfile:\troles:def\textras:fileScope\nvar\tinput.c\t/^int var;$/;\"\tkind:variable\tline:65535\tlanguage:C\ttyperef:typename:int\troles:def\tend:4294967295\n" }, { "path": "Tmain/readtags-simple-listing.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-simple-listing.d/stdout-expected.txt", "content": "# no -e option\nc\tinput.c\t/^char c;$/\nm0\tinput.c\t/^\tint m0;$/\nm2\tinput.c\t/^\tint m2;$/\ntst\tinput.c\t/^typedef strcut st tst;$/\nvar\tinput.c\t/^int var;$/\n# with -e option\nc\tinput.c\t/^char c;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:char\troles:def\tend:7\nm0\tinput.c\t/^\tint m0;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:4\nm2\tinput.c\t/^\tint m2;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:5\ntst\tinput.c\t/^typedef strcut st tst;$/;\"\tkind:typedef\tfile:\tlanguage:C\ttyperef:typename:strcut st\troles:def\textras:fileScope\nvar\tinput.c\t/^int var;$/;\"\tkind:variable\tlanguage:C\ttyperef:typename:int\troles:def\tend:4294967295\n# with -e -n option\nc\tinput.c\t/^char c;$/;\"\tkind:variable\tline:7\tlanguage:C\ttyperef:typename:char\troles:def\tend:7\nm0\tinput.c\t/^\tint m0;$/;\"\tkind:variable\tline:4\tlanguage:C\ttyperef:typename:int\troles:def\tend:4\nm2\tinput.c\t/^\tint m2;$/;\"\tkind:variable\tline:5\tlanguage:C\ttyperef:typename:int\troles:def\tend:5\ntst\tinput.c\t/^typedef strcut st tst;$/;\"\tkind:typedef\tfile:\tline:8\tlanguage:C\ttyperef:typename:strcut st\troles:def\textras:fileScope\nvar\tinput.c\t/^int var;$/;\"\tkind:variable\tline:65535\tlanguage:C\ttyperef:typename:int\troles:def\tend:4294967295\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/README.md", "content": "How to generate output.tags::\n\n ctags --kinds-C=+p -o output.tags input.d/foo.c input.d/bar.c input.d/decl.h \n\nThis is taken from https://github.com/universal-ctags/ctags/issues/4015#issuecomment-2157023359\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/input.d/bar.c", "content": "void bar(void);\nvoid bar(void) {}\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/input.d/decl.h", "content": "void foo(void);\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/input.d/foo.c", "content": "void foo(void) {}\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/output.tags", "content": "!_TAG_EXTRA_DESCRIPTION\tanonymous\t/Include tags for non-named objects like lambda/\n!_TAG_EXTRA_DESCRIPTION\tfileScope\t/Include tags of file scope/\n!_TAG_EXTRA_DESCRIPTION\tpseudo\t/Include pseudo tags/\n!_TAG_EXTRA_DESCRIPTION\tsubparser\t/Include tags generated by subparsers/\n!_TAG_FIELD_DESCRIPTION\tepoch\t/the last modified time of the input file (only for F\\/file kind tag)/\n!_TAG_FIELD_DESCRIPTION\tfile\t/File-restricted scoping/\n!_TAG_FIELD_DESCRIPTION\tinput\t/input file/\n!_TAG_FIELD_DESCRIPTION\tname\t/tag name/\n!_TAG_FIELD_DESCRIPTION\tpattern\t/pattern/\n!_TAG_FIELD_DESCRIPTION\ttyperef\t/Type and name of a variable or typedef/\n!_TAG_FIELD_DESCRIPTION!C++\tname\t/aliased names/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C++\tc,class\t/classes/\n!_TAG_KIND_DESCRIPTION!C++\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C++\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C++\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C++\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C++\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C++\tm,member\t/class, struct, and union members/\n!_TAG_KIND_DESCRIPTION!C++\tn,namespace\t/namespaces/\n!_TAG_KIND_DESCRIPTION!C++\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C++\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C++\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C++\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C++\tv,variable\t/variable definitions/\n!_TAG_OUTPUT_EXCMD\tmixed\t/number, pattern, mixed, or combineV2/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_VERSION\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!C\t0.0\t/current.age/\n!_TAG_PARSER_VERSION!C++\t0.0\t/current.age/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROC_CWD\t/home/yamato/var/ctags-github/Tmain/readtags-sorter-if3-sform.d/\t//\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t6.0.0\t//\n!_TAG_ROLE_DESCRIPTION!C!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C!macro\tundef\t/undefined/\n!_TAG_ROLE_DESCRIPTION!C++!header\tlocal\t/local header/\n!_TAG_ROLE_DESCRIPTION!C++!header\tsystem\t/system header/\n!_TAG_ROLE_DESCRIPTION!C++!macro\tundef\t/undefined/\nbar\tinput.d/bar.c\t/^void bar(void) {}$/;\"\tf\ttyperef:typename:void\nbar\tinput.d/bar.c\t/^void bar(void);$/;\"\tp\ttyperef:typename:void\tfile:\nfoo\tinput.d/decl.h\t/^void foo(void);$/;\"\tp\ttyperef:typename:void\nfoo\tinput.d/foo.c\t/^void foo(void) {}$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2024 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\nERRLOG=/tmp/ctags-Tmain-$$\n${READTAGS} -et output.tags -S '\n( (<> $name &name)\n (and (eq? $kind \"p\") (eq? &kind \"f\") 1)\n (and (eq? $kind \"f\") (eq? &kind \"p\") -1))' -l\n" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-sorter-cmp_or-sform.d/stdout-expected.txt", "content": "bar\tinput.d/bar.c\t/^void bar(void) {}$/;\"\tkind:f\ttyperef:typename:void\nbar\tinput.d/bar.c\t/^void bar(void);$/;\"\tkind:p\tfile:\ttyperef:typename:void\nfoo\tinput.d/foo.c\t/^void foo(void) {}$/;\"\tkind:f\ttyperef:typename:void\nfoo\tinput.d/decl.h\t/^void foo(void);$/;\"\tkind:p\ttyperef:typename:void\n" }, { "path": "Tmain/readtags-sorter-if-sform-order.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-sorter-if-sform-order.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/717028d4/\nmutex\tinput.c\t/^\tint mutex;$/;\"\tm\tlanguage:C\tstruct:MUTEX_S\ttyperef:typename:int\tfile:\n\n" }, { "path": "Tmain/readtags-sorter-if-sform-order.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${READTAGS} -t output.tags -ne -Q '(if $extras (print $extras) #f)' -l\n" }, { "path": "Tmain/readtags-sorter-if-sform-order.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-sorter-if-sform-order.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/readtags-sorter-if-sform.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-sorter-if-sform.d/input.c", "content": "enum MUTEX_E { mutex_a, mutex_b, mutex };\n\n#define mutex mutex\n\nint mutex;\n\nstruct MUTEX_S {\n\tint mutex;\n};\n\ntypedef mutex int;\n" }, { "path": "Tmain/readtags-sorter-if-sform.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/717028d4/\nMUTEX_E\tinput.c\t/^enum MUTEX_E { mutex_a, mutex_b, mutex };$/;\"\tg\tlanguage:C\tfile:\nMUTEX_S\tinput.c\t/^struct MUTEX_S {$/;\"\ts\tlanguage:C\tfile:\nmutex\tinput.c\t/^\tint mutex;$/;\"\tm\tlanguage:C\tstruct:MUTEX_S\ttyperef:typename:int\tfile:\nmutex\tinput.c\t/^#define mutex /;\"\td\tlanguage:C\tfile:\nmutex\tinput.c\t/^enum MUTEX_E { mutex_a, mutex_b, mutex };$/;\"\te\tlanguage:C\tenum:MUTEX_E\tfile:\nmutex\tinput.c\t/^int mutex;$/;\"\tv\tlanguage:C\ttyperef:typename:int\nmutex\tinput.c\t/^typedef mutex int;$/;\"\tt\tlanguage:C\ttyperef:typename:int\tfile:\nmutex_a\tinput.c\t/^enum MUTEX_E { mutex_a, mutex_b, mutex };$/;\"\te\tlanguage:C\tenum:MUTEX_E\tfile:\nmutex_b\tinput.c\t/^enum MUTEX_E { mutex_a, mutex_b, mutex };$/;\"\te\tlanguage:C\tenum:MUTEX_E\tfile:\n" }, { "path": "Tmain/readtags-sorter-if-sform.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n${READTAGS} -t output.tags -ne -S '(if (eq? $kind &kind)\n 0\n (+\n (if (or (eq? $kind \"t\"))\n -4\n (if (eq? $kind \"v\")\n\t -3\n (if (eq? $kind \"d\")\n\t -2\n\t (if (eq? $kind \"e\")\n\t -1\n\t 0))))\n (if (or (eq? &kind \"t\"))\n 4\n (if (eq? &kind \"v\")\n\t 3\n (if (eq? &kind \"d\")\n\t 2\n\t (if (eq? &kind \"e\")\n\t 1\n\t 0))))))' mutex\n" }, { "path": "Tmain/readtags-sorter-if-sform.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-sorter-if-sform.d/stdout-expected.txt", "content": "mutex\tinput.c\t/^typedef mutex int;$/;\"\tkind:t\tfile:\tlanguage:C\ttyperef:typename:int\nmutex\tinput.c\t/^int mutex;$/;\"\tkind:v\tlanguage:C\ttyperef:typename:int\nmutex\tinput.c\t/^#define mutex /;\"\tkind:d\tfile:\tlanguage:C\nmutex\tinput.c\t/^enum MUTEX_E { mutex_a, mutex_b, mutex };$/;\"\tkind:e\tfile:\tlanguage:C\tenum:MUTEX_E\nmutex\tinput.c\t/^\tint mutex;$/;\"\tkind:m\tfile:\tlanguage:C\tstruct:MUTEX_S\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-sorter.d/.ctags.d/0.ctags", "content": "--fields=*\n-L .ctags.d/src.list\n-o output.tags\n" }, { "path": "Tmain/readtags-sorter.d/.ctags.d/src.list", "content": "src/input-area.cpp\nsrc/input-volume.cpp\nsrc/input.h\n" }, { "path": "Tmain/readtags-sorter.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-sorter.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/;\"\textras:pseudo\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/;\"\textras:pseudo\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/;\"\textras:pseudo\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/;\"\textras:pseudo\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/;\"\textras:pseudo\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//;\"\textras:pseudo\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/;\"\textras:pseudo\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/;\"\textras:pseudo\n!_TAG_PROGRAM_VERSION\t0.0.0\t/77f9ac3f/;\"\textras:pseudo\nINPUT_DATA_H\tsrc/input.h\t/^#define INPUT_DATA_H$/;\"\tkind:macro\tline:2\tlanguage:C++\troles:def\tend:2\narea\tsrc/input-area.cpp\t/^float area (fpoint2d &p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint2d & p)\troles:def\tend:11\narea\tsrc/input-area.cpp\t/^float area (ipoint2d &p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint2d & p)\troles:def\tend:6\nfpoint2d\tsrc/input.h\t/^struct fpoint2d {$/;\"\tkind:struct\tline:12\tlanguage:C++\troles:def\tend:14\nfpoint3d\tsrc/input.h\t/^struct fpoint3d {$/;\"\tkind:struct\tline:16\tlanguage:C++\troles:def\tend:19\nipoint2d\tsrc/input.h\t/^struct ipoint2d {$/;\"\tkind:struct\tline:4\tlanguage:C++\troles:def\tend:6\nipoint3d\tsrc/input.h\t/^struct ipoint3d {$/;\"\tkind:struct\tline:8\tlanguage:C++\troles:def\tend:10\nparent\tsrc/input.h\t/^ fpoint2d parent;$/;\"\tkind:member\tline:17\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:fpoint2d\taccess:public\troles:def\tend:17\nvolume\tsrc/input-volume.cpp\t/^float volume (fpoint3d *p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint3d * p)\troles:def\tend:11\nvolume\tsrc/input-volume.cpp\t/^float volume (ipoint3d *p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint3d * p)\troles:def\tend:6\nx\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\nx\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nx\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\ny\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\ny\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\ny\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\nz\tsrc/input.h\t/^ float z;$/;\"\tkind:member\tline:18\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:float\taccess:public\troles:def\tend:18\nz\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\n" }, { "path": "Tmain/readtags-sorter.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '!_INPUT_ORDER' &&\n${READTAGS} -t output.tags -ne -S '( (<> $input &input) (<> $line &line) (<> $name &name))' -l &&\n\necho '!_INPUT_ORDER with flipping' &&\n${READTAGS} -t output.tags -ne -S '(*- ( (<> $input &input) (<> $line &line) (<> $name &name)))' -l &&\n\necho '!_COMPARING_CODE_SIZE' &&\n${READTAGS} -t output.tags -ne -S '( (*- (<> (- (or $end $line) $line) (- (or &end &line) &line))) (<> $input &input) (<> $line &line) (<> $name &name))' -l\n\necho '!_INPUT_ORDER of structure members (linear search)' &&\n${READTAGS} -t output.tags -ne -Q '(eq? $kind \"member\")' -S '( (<> $input &input) (<> $line &line) (<> $name &name))' -l\n" }, { "path": "Tmain/readtags-sorter.d/src/input-area.cpp", "content": "#include \"input.h\"\n\nfloat area (ipoint2d &p)\n{\n return (float)(p.x * p.y);\n}\n\nfloat area (fpoint2d &p)\n{\n return p.x * p.y;\n}\n" }, { "path": "Tmain/readtags-sorter.d/src/input-volume.cpp", "content": "#include \"input.h\"\n\nfloat volume (ipoint3d *p)\n{\n return (float)(p->x * p->y * p->z);\n}\n\nfloat volume (fpoint3d *p)\n{\n return area (p->parent) * p->z;\n}\n" }, { "path": "Tmain/readtags-sorter.d/src/input.h", "content": "#ifndef INPUT_DATA_H\n#define INPUT_DATA_H\n\nstruct ipoint2d {\n int x, y;\n};\n\nstruct ipoint3d {\n int x, y, z;\n};\n\nstruct fpoint2d {\n float x, y;\n};\n\nstruct fpoint3d {\n fpoint2d parent;\n float z;\n};\n\nfloat area (ipoint2d &p);\nfloat area (fpoint2d &p);\nfloat volume (ipoint3d *p);\nfloat volume (fpoint3d *p);\n\n#endif\n" }, { "path": "Tmain/readtags-sorter.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-sorter.d/stdout-expected.txt", "content": "!_INPUT_ORDER\narea\tsrc/input-area.cpp\t/^float area (ipoint2d &p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint2d & p)\troles:def\tend:6\narea\tsrc/input-area.cpp\t/^float area (fpoint2d &p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint2d & p)\troles:def\tend:11\nvolume\tsrc/input-volume.cpp\t/^float volume (ipoint3d *p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint3d * p)\troles:def\tend:6\nvolume\tsrc/input-volume.cpp\t/^float volume (fpoint3d *p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint3d * p)\troles:def\tend:11\nINPUT_DATA_H\tsrc/input.h\t/^#define INPUT_DATA_H$/;\"\tkind:macro\tline:2\tlanguage:C++\troles:def\tend:2\nipoint2d\tsrc/input.h\t/^struct ipoint2d {$/;\"\tkind:struct\tline:4\tlanguage:C++\troles:def\tend:6\nx\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\ny\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\nipoint3d\tsrc/input.h\t/^struct ipoint3d {$/;\"\tkind:struct\tline:8\tlanguage:C++\troles:def\tend:10\nx\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\ny\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nz\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nfpoint2d\tsrc/input.h\t/^struct fpoint2d {$/;\"\tkind:struct\tline:12\tlanguage:C++\troles:def\tend:14\nx\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\ny\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\nfpoint3d\tsrc/input.h\t/^struct fpoint3d {$/;\"\tkind:struct\tline:16\tlanguage:C++\troles:def\tend:19\nparent\tsrc/input.h\t/^ fpoint2d parent;$/;\"\tkind:member\tline:17\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:fpoint2d\taccess:public\troles:def\tend:17\nz\tsrc/input.h\t/^ float z;$/;\"\tkind:member\tline:18\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:float\taccess:public\troles:def\tend:18\n!_INPUT_ORDER with flipping\nz\tsrc/input.h\t/^ float z;$/;\"\tkind:member\tline:18\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:float\taccess:public\troles:def\tend:18\nparent\tsrc/input.h\t/^ fpoint2d parent;$/;\"\tkind:member\tline:17\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:fpoint2d\taccess:public\troles:def\tend:17\nfpoint3d\tsrc/input.h\t/^struct fpoint3d {$/;\"\tkind:struct\tline:16\tlanguage:C++\troles:def\tend:19\ny\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\nx\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\nfpoint2d\tsrc/input.h\t/^struct fpoint2d {$/;\"\tkind:struct\tline:12\tlanguage:C++\troles:def\tend:14\nz\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\ny\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nx\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nipoint3d\tsrc/input.h\t/^struct ipoint3d {$/;\"\tkind:struct\tline:8\tlanguage:C++\troles:def\tend:10\ny\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\nx\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\nipoint2d\tsrc/input.h\t/^struct ipoint2d {$/;\"\tkind:struct\tline:4\tlanguage:C++\troles:def\tend:6\nINPUT_DATA_H\tsrc/input.h\t/^#define INPUT_DATA_H$/;\"\tkind:macro\tline:2\tlanguage:C++\troles:def\tend:2\nvolume\tsrc/input-volume.cpp\t/^float volume (fpoint3d *p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint3d * p)\troles:def\tend:11\nvolume\tsrc/input-volume.cpp\t/^float volume (ipoint3d *p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint3d * p)\troles:def\tend:6\narea\tsrc/input-area.cpp\t/^float area (fpoint2d &p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint2d & p)\troles:def\tend:11\narea\tsrc/input-area.cpp\t/^float area (ipoint2d &p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint2d & p)\troles:def\tend:6\n!_COMPARING_CODE_SIZE\narea\tsrc/input-area.cpp\t/^float area (ipoint2d &p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint2d & p)\troles:def\tend:6\narea\tsrc/input-area.cpp\t/^float area (fpoint2d &p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint2d & p)\troles:def\tend:11\nvolume\tsrc/input-volume.cpp\t/^float volume (ipoint3d *p)$/;\"\tkind:function\tline:3\tlanguage:C++\ttyperef:typename:float\tsignature:(ipoint3d * p)\troles:def\tend:6\nvolume\tsrc/input-volume.cpp\t/^float volume (fpoint3d *p)$/;\"\tkind:function\tline:8\tlanguage:C++\ttyperef:typename:float\tsignature:(fpoint3d * p)\troles:def\tend:11\nfpoint3d\tsrc/input.h\t/^struct fpoint3d {$/;\"\tkind:struct\tline:16\tlanguage:C++\troles:def\tend:19\nipoint2d\tsrc/input.h\t/^struct ipoint2d {$/;\"\tkind:struct\tline:4\tlanguage:C++\troles:def\tend:6\nipoint3d\tsrc/input.h\t/^struct ipoint3d {$/;\"\tkind:struct\tline:8\tlanguage:C++\troles:def\tend:10\nfpoint2d\tsrc/input.h\t/^struct fpoint2d {$/;\"\tkind:struct\tline:12\tlanguage:C++\troles:def\tend:14\nINPUT_DATA_H\tsrc/input.h\t/^#define INPUT_DATA_H$/;\"\tkind:macro\tline:2\tlanguage:C++\troles:def\tend:2\nx\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\ny\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\nx\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\ny\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nz\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nx\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\ny\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\nparent\tsrc/input.h\t/^ fpoint2d parent;$/;\"\tkind:member\tline:17\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:fpoint2d\taccess:public\troles:def\tend:17\nz\tsrc/input.h\t/^ float z;$/;\"\tkind:member\tline:18\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:float\taccess:public\troles:def\tend:18\n!_INPUT_ORDER of structure members (linear search)\nx\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\ny\tsrc/input.h\t/^ int x, y;$/;\"\tkind:member\tline:5\tlanguage:C++\tscope:struct:ipoint2d\ttyperef:typename:int\taccess:public\troles:def\tend:5\nx\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\ny\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nz\tsrc/input.h\t/^ int x, y, z;$/;\"\tkind:member\tline:9\tlanguage:C++\tscope:struct:ipoint3d\ttyperef:typename:int\taccess:public\troles:def\tend:9\nx\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\ny\tsrc/input.h\t/^ float x, y;$/;\"\tkind:member\tline:13\tlanguage:C++\tscope:struct:fpoint2d\ttyperef:typename:float\taccess:public\troles:def\tend:13\nparent\tsrc/input.h\t/^ fpoint2d parent;$/;\"\tkind:member\tline:17\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:fpoint2d\taccess:public\troles:def\tend:17\nz\tsrc/input.h\t/^ float z;$/;\"\tkind:member\tline:18\tlanguage:C++\tscope:struct:fpoint3d\ttyperef:typename:float\taccess:public\troles:def\tend:18\n" }, { "path": "Tmain/readtags-stdin.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/readtags-stdin.d/output.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/bbd8fc2/\nA\tbase.py\t/^ class A:$/;\"\tkind:class\tline:11\tlanguage:Python\tscope:class:Foo\tinherits:\taccess:public\nB\tbase.py\t/^ class B:$/;\"\tkind:class\tline:18\tlanguage:Python\tscope:class:Bar\tinherits:\taccess:public\nBar\tbase.py\t/^class Bar (Foo):$/;\"\tkind:class\tline:13\tlanguage:Python\tinherits:Foo\taccess:public\nBar.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:14\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBar.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:16\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nBaz\tbase.py\t/^class Baz (Foo): $/;\"\tkind:class\tline:21\tlanguage:Python\tinherits:Foo\taccess:public\nBaz.bq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:22\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nBaz.bw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:24\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nC\tbase.py\t/^ class C:$/;\"\tkind:class\tline:26\tlanguage:Python\tscope:class:Baz\tinherits:\taccess:public\nFoo\tbase.py\t/^class Foo:$/;\"\tkind:class\tline:4\tlanguage:Python\tinherits:\taccess:public\nFoo.ae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tline:9\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tline:5\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tline:7\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tline:9\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tline:5\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\naw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tline:7\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nbase.py\tbase.py\t28;\"\tkind:file\tline:28\tlanguage:Python\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:14\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbq\tbase.py\t/^ def bq ():$/;\"\tkind:member\tline:22\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:16\tlanguage:Python\tscope:class:Bar\taccess:public\tsignature:()\nbw\tbase.py\t/^ def bw ():$/;\"\tkind:member\tline:24\tlanguage:Python\tscope:class:Baz\taccess:public\tsignature:()\n" }, { "path": "Tmain/readtags-stdin.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n\n. ../utils.sh\n\n#V=\"valgrind --leak-check=full -v\"\nV=\n\nskip_if_no_readtags \"$READTAGS\"\n\n\"${READTAGS}\" -t output.tags -en -D -l \\\n\t| \"${READTAGS}\" -t - -en -Q '(eq? $signature \"()\")' -D -l \\\n\t| \"${READTAGS}\" -t - -en -Q '(and $line (< $line 10))' -D -l \\\n\t| \"${READTAGS}\" -t - -en -Q '(substr? $name \".a\")' -D -l \\\n\t| \"${READTAGS}\" -t - -en -S '(<> $line &line)' -D -l\n" }, { "path": "Tmain/readtags-stdin.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-stdin.d/stdout-expected.txt", "content": "Foo.aq\tbase.py\t/^ def aq ():$/;\"\tkind:member\tline:5\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.aw\tbase.py\t/^ def aw ():$/;\"\tkind:member\tline:7\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\nFoo.ae\tbase.py\t/^ def ae ():$/;\"\tkind:member\tline:9\tlanguage:Python\tscope:class:Foo\taccess:public\tsignature:()\n" }, { "path": "Tmain/readtags-with-list-pseudo-tags.d/ptag-sort-no.tags", "content": "!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\nmain\tinput.c\t/^int main (void) { return 0; }$/;\"\tf\ttyperef:typename:int\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\nafunc\tinput.el\t/^(defun afunc () nil)$/;\"\tf\n" }, { "path": "Tmain/readtags-with-list-pseudo-tags.d/ptag-sort-yes.tags", "content": "!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\nafunc\tinput.el\t/^(defun afunc () nil)$/;\"\tf\nmain\tinput.c\t/^int main (void) { return 0; }$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/readtags-with-list-pseudo-tags.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nREADTAGS=$3\n#V=\"valgrind --leak-check=full --track-origins=yes -v\"\nV=\n\n. ../utils.sh\n\nskip_if_no_readtags \"$READTAGS\"\n\necho '# ACTION=LIST'\n${V} ${READTAGS} -t ./ptag-sort-no.tags -P -l\n\necho '# ACTION=NAME'\n${V} ${READTAGS} -t ./ptag-sort-yes.tags --with-pseudo-tags - main\n" }, { "path": "Tmain/readtags-with-list-pseudo-tags.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/readtags-with-list-pseudo-tags.d/stdout-expected.txt", "content": "# ACTION=LIST\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t0\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\nmain\tinput.c\t/^int main (void) { return 0; }$/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\nafunc\tinput.el\t/^(defun afunc () nil)$/\n# ACTION=NAME\n!_JSON_OUTPUT_VERSION\t0.0\t/in development/\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_KIND_DESCRIPTION!C\tD,macroparam\t/parameters inside macro definitions/\n!_TAG_KIND_DESCRIPTION!C\tL,label\t/goto labels/\n!_TAG_KIND_DESCRIPTION!C\td,macro\t/macro definitions/\n!_TAG_KIND_DESCRIPTION!C\te,enumerator\t/enumerators (values inside an enumeration)/\n!_TAG_KIND_DESCRIPTION!C\tf,function\t/function definitions/\n!_TAG_KIND_DESCRIPTION!C\tg,enum\t/enumeration names/\n!_TAG_KIND_DESCRIPTION!C\th,header\t/included header files/\n!_TAG_KIND_DESCRIPTION!C\tl,local\t/local variables/\n!_TAG_KIND_DESCRIPTION!C\tm,member\t/struct, and union members/\n!_TAG_KIND_DESCRIPTION!C\tp,prototype\t/function prototypes/\n!_TAG_KIND_DESCRIPTION!C\ts,struct\t/structure names/\n!_TAG_KIND_DESCRIPTION!C\tt,typedef\t/typedefs/\n!_TAG_KIND_DESCRIPTION!C\tu,union\t/union names/\n!_TAG_KIND_DESCRIPTION!C\tv,variable\t/variable definitions/\n!_TAG_KIND_DESCRIPTION!C\tx,externvar\t/external and forward variable declarations/\n!_TAG_KIND_DESCRIPTION!C\tz,parameter\t/function parameters inside function definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tC,custom\t/customizable variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tD,derivedMode\t/derived major mode/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tG,group\t/customization groups/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tH,face\t/customizable faces/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tM,minorMode\t/minor modes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tT,theme\t/custom themes/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tV,varalias\t/aliases for variables/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ta,alias\t/aliases for functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tc,const\t/constants/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\te,error\t/errors/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tf,function\t/functions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ti,inline\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tm,macro\t/macros/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\ts,subst\t/inline function/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tu,unknown\t/unknown type of definitions/\n!_TAG_KIND_DESCRIPTION!EmacsLisp\tv,variable\t/variables/\n!_TAG_OUTPUT_FILESEP\tslash\t/slash or backslash/\n!_TAG_OUTPUT_MODE\tu-ctags\t/u-ctags or e-ctags/\n!_TAG_PATTERN_LENGTH_LIMIT\t96\t/0 for no limit/\n!_TAG_PROGRAM_AUTHOR\tUniversal Ctags Team\t//\n!_TAG_PROGRAM_NAME\tUniversal Ctags\t/Derived from Exuberant Ctags/\n!_TAG_PROGRAM_URL\thttps://ctags.io/\t/official site/\n!_TAG_PROGRAM_VERSION\t0.0.0\t/9b73623f/\nmain\tinput.c\t/^int main (void) { return 0; }$/\n" }, { "path": "Tmain/regex-for-unknown-language.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/regex-for-unknown-language.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --regex-nosuchlang=/a/\nexit $?\n" }, { "path": "Tmain/regex-for-unknown-language.d/stderr-expected.txt", "content": "ctags: Unknown language \"nosuchlang\" in \"regex-nosuchlang\" option\n" }, { "path": "Tmain/regex-for-unknown-language.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/regex-patterns-from-file.d/input.c", "content": "DEFINE(x,1);\nREGISTER(y);\n" }, { "path": "Tmain/regex-patterns-from-file.d/list.regex", "content": "/DEFINE\\(([a-z]),.*/\\1/t/\n/REGISTER\\(([a-z])\\)/\\1/t/\n\n" }, { "path": "Tmain/regex-patterns-from-file.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE \\\n\t\t --langdef=TEST'{base=C}' \\\n\t\t --kinddef-TEST=t,test,tests \\\n\t\t --regex-TEST=@./list.regex \\\n\t\t -o - \\\n\t\t input.c\n" }, { "path": "Tmain/regex-patterns-from-file.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/regex-patterns-from-file.d/stdout-expected.txt", "content": "x\tinput.c\t/^DEFINE(x,1);$/;\"\tt\ny\tinput.c\t/^REGISTER(y);$/;\"\tt\n" }, { "path": "Tmain/reset-fields.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/reset-fields.d/input.h", "content": "struct point { double x, y };\n" }, { "path": "Tmain/reset-fields.d/run.sh", "content": "# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nrun_ctags()\n{\n\tprintf \"# 1:%s 2:%s\\n\" \"$1\" \"$2\"\n\t${CTAGS} --quiet --options=NONE \\\n\t\t\t $1 \\\n\t\t\t -n \\\n\t\t\t --fields=zKZStse --fields=+a \\\n\t\t\t -o - \\\n\t\t\t $2 \\\n\t\t\t input.h\n}\n\nrun_ctags &&\nrun_ctags --output-format=u-ctags \"\" &&\nrun_ctags --output-format=etags \"\" &&\nrun_ctags --output-format=xref \"\" &&\nrun_ctags \"\" --output-format=u-ctags &&\nrun_ctags \"\" --output-format=etags &&\nrun_ctags \"\" --output-format=xref &&\n:\n" }, { "path": "Tmain/reset-fields.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/reset-fields.d/stdout-expected.txt", "content": "# 1: 2:\npoint\tinput.h\t1;\"\tkind:struct\tend:1\n# 1:--output-format=u-ctags 2:\npoint\tinput.h\t1;\"\tkind:struct\tend:1\n# 1:--output-format=etags 2:\n\f\ninput.h,40\nstruct point { double x, y };point\u00011,0\n# 1:--output-format=xref 2:\npoint struct 1 input.h struct point { double x, y };\n# 1: 2:--output-format=u-ctags\npoint\tinput.h\t1;\"\tkind:struct\tend:1\n# 1: 2:--output-format=etags\n\f\ninput.h,40\nstruct point { double x, y };point\u00011,0\n# 1: 2:--output-format=xref\npoint struct 1 input.h struct point { double x, y };\n" }, { "path": "Tmain/roledef.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1 --quiet --options=NONE --langdef=IMAGINARY --kinddef-IMAGINARY=v,variable,variables\"\n\nexport MSYS2_ARG_CONV_EXCL=--_roledef-IMAGINARY\n\ntitle()\n{\n\techo\n\techo \"$@\"\n\n\t{\n\t\techo\n\t\techo \"$@\"\n\t} 1>&2\n}\n\n{\ntitle '# echo unknown lang'\n${CTAGS} --_roledef-NOSUCHLANG\n${CTAGS} --_roledef-NOSUCHLANG.k=role,roles\n${CTAGS} --_roledef-NOSUCHLANG.'{kind}'=role,roles\n\ntitle '# no kind spec'\n${CTAGS} --_roledef-IMAGINARY\n${CTAGS} --_roledef-IMAGINARY=\n${CTAGS} --_roledef-IMAGINARY=role\n${CTAGS} --_roledef-IMAGINARY=role,roles\n\ntitle '# echo unknown kind letter'\n${CTAGS} --_roledef-IMAGINARY.x= --_force-quit\n${CTAGS} --_roledef-IMAGINARY.x=role --_force-quit\n${CTAGS} --_roledef-IMAGINARY.x=role, --_force-quit\n${CTAGS} --_roledef-IMAGINARY.x=role,roles --_force-quit\n\ntitle '# echo unknown kind name'\n${CTAGS} --_roledef-IMAGINARY.'{abc}'= --_force-quit\n${CTAGS} --_roledef-IMAGINARY.'{abc}'=role --_force-quit\n${CTAGS} --_roledef-IMAGINARY.'{abc}'=role, --_force-quit\n${CTAGS} --_roledef-IMAGINARY.'{abc}'=role,roles --_force-quit\n\ntitle '# wrong char in a kind letter'\n${CTAGS} --_roledef-IMAGINARY.'/'=\n${CTAGS} --_roledef-IMAGINARY.'%'=\n${CTAGS} --_roledef-IMAGINARY.'^'=role\n${CTAGS} --_roledef-IMAGINARY.'#'=role,roles\n${CTAGS} --_roledef-IMAGINARY.'F'=role,roles\n${CTAGS} --_roledef-IMAGINARY.'{'=role,roles\n${CTAGS} --_roledef-IMAGINARY.'{v'=role,roles\n\ntitle '# wrong kind name'\n${CTAGS} --_roledef-IMAGINARY.'{file}'=role,roles\n${CTAGS} --_roledef-IMAGINARY.'{}'=role,roles\n${CTAGS} --_roledef-IMAGINARY.'{#}'=role,roles\n\ntitle '# empty role name'\n${CTAGS} --_roledef-IMAGINARY.v=\n${CTAGS} --_roledef-IMAGINARY.v=,\n${CTAGS} --_roledef-IMAGINARY.v=,desc\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=,\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=,desc\n\ntitle '# wrong char in role name'\n${CTAGS} --_roledef-IMAGINARY.v=+role+,\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=+role+,\n\ntitle '# empty description'\n${CTAGS} --_roledef-IMAGINARY.v=role\n${CTAGS} --_roledef-IMAGINARY.v=role,\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=role\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=role,\n\ntitle '# role is acceptable but no input file'\n${CTAGS} --_roledef-IMAGINARY.v=role,roles\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=role,roles\n\ntitle '# listing with --list-roles'\n${CTAGS} --_roledef-IMAGINARY.v=role,roles --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=role,roles \\\n\t\t --_roledef-IMAGINARY.v=foos,foods \\\n\t\t --list-roles=IMAGINARY\n\ntitle '# listing with --list-kinds-full'\n${CTAGS} --_roledef-IMAGINARY.v=role,roles --list-kinds-full=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'=role,roles \\\n\t\t --_roledef-IMAGINARY.v=foos,foods \\\n\t\t --list-kinds-full=IMAGINARY\n\ntitle '# inject a flag separator'\n${CTAGS} --_roledef-IMAGINARY.v='role,roles{foo}' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,roles{foo}' --list-roles=IMAGINARY\n\ntitle '# inject a broken flag separator(1)'\n${CTAGS} --_roledef-IMAGINARY.v='role,roles{foo' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,roles{foo' --list-roles=IMAGINARY\n\ntitle '# inject a broken flag separator(2)'\n${CTAGS} --_roledef-IMAGINARY.v='role,roles{' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,roles{' --list-roles=IMAGINARY\n\ntitle '# use a { in description (1)'\n${CTAGS} --_roledef-IMAGINARY.v='role,roles\\{' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,roles\\{' --list-roles=IMAGINARY\n\ntitle '# use a { in description (2)'\n${CTAGS} --_roledef-IMAGINARY.v='role,roles\\{}' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,roles\\{}' --list-roles=IMAGINARY\n\ntitle '# use a \\ in description'\n${CTAGS} --_roledef-IMAGINARY.v='role,roles\\\\backslash' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,roles\\\\backslash' --list-roles=IMAGINARY\n\ntitle '# description started from {'\n${CTAGS} --_roledef-IMAGINARY.v='role,{' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,{' --list-roles=IMAGINARY\n\ntitle '# description started from \\{'\n${CTAGS} --_roledef-IMAGINARY.v='role,\\{' --list-roles=IMAGINARY\n${CTAGS} --_roledef-IMAGINARY.'{variable}'='role,\\{' --list-roles=IMAGINARY\n\ntitle '# too many roles'\nopts=\nfor i in $(seq 0 64); do\n\topts=\"$opts --_roledef-IMAGINARY.v=r$i,desc$i \"\ndone\n${CTAGS} $opts\n\n} > /tmp/ctags-tmain-$$.stdout 2>/tmp/ctags-tmain-$$.stderr\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stdout\nrm /tmp/ctags-tmain-$$.stdout\n\nsed -e 's/\\.exe//g' < /tmp/ctags-tmain-$$.stderr 1>&2\nrm /tmp/ctags-tmain-$$.stderr\n" }, { "path": "Tmain/roledef.d/stderr-expected.txt", "content": "\n# echo unknown lang\nctags: Unknown language \"NOSUCHLANG\" in \"_roledef-NOSUCHLANG\" option\nctags: Unknown language \"NOSUCHLANG\" in \"_roledef-NOSUCHLANG.k\" option\nctags: Unknown language \"NOSUCHLANG\" in \"_roledef-NOSUCHLANG.{kind}\" option\n\n# no kind spec\nctags: no kind is specifined in \"--_roledef-IMAGINARY=\"\nctags: no kind is specifined in \"--_roledef-IMAGINARY=\"\nctags: no kind is specifined in \"--_roledef-IMAGINARY=role\"\nctags: no kind is specifined in \"--_roledef-IMAGINARY=role,roles\"\n\n# echo unknown kind letter\nctags: the kind for letter `x' specified in \"--_roledef-IMAGINARY.x\" option is not defined.\nctags: the kind for letter `x' specified in \"--_roledef-IMAGINARY.x\" option is not defined.\nctags: the kind for letter `x' specified in \"--_roledef-IMAGINARY.x\" option is not defined.\nctags: the kind for letter `x' specified in \"--_roledef-IMAGINARY.x\" option is not defined.\n\n# echo unknown kind name\nctags: the kind for name `abc' specified in \"--_roledef-IMAGINARY.{abc}\" option is not defined.\nctags: the kind for name `abc' specified in \"--_roledef-IMAGINARY.{abc}\" option is not defined.\nctags: the kind for name `abc' specified in \"--_roledef-IMAGINARY.{abc}\" option is not defined.\nctags: the kind for name `abc' specified in \"--_roledef-IMAGINARY.{abc}\" option is not defined.\n\n# wrong char in a kind letter\nctags: the kind letter given in \"--_roledef-IMAGINARY./\" option is not an alphabet or a number\nctags: the kind letter given in \"--_roledef-IMAGINARY.%\" option is not an alphabet or a number\nctags: the kind letter given in \"--_roledef-IMAGINARY.^\" option is not an alphabet or a number\nctags: the kind letter given in \"--_roledef-IMAGINARY.#\" option is not an alphabet or a number\nctags: the kind letter `F' in \"--_roledef-IMAGINARY.F\" option is reserved for \"file\" kind, and no role can be attached to it\nctags: no '}' representing the end of kind name in --_roledef-IMAGINARY.{ option: {\nctags: no '}' representing the end of kind name in --_roledef-IMAGINARY.{v option: {v\n\n# wrong kind name\nctags: don't define a role for F/file kind; it has no role: --_roledef-IMAGINARY.{file}\nctags: the kind for name `' specified in \"--_roledef-IMAGINARY.{}\" option is not defined.\nctags: the kind for name `#' specified in \"--_roledef-IMAGINARY.{#}\" option is not defined.\n\n# empty role name\nctags: no role description specified in \"--_roledef-IMAGINARY.v\" option\nctags: the role name in \"--_roledef-IMAGINARY.v\" option is empty\nctags: the role name in \"--_roledef-IMAGINARY.v\" option is empty\nctags: no role description specified in \"--_roledef-IMAGINARY.{variable}\" option\nctags: the role name in \"--_roledef-IMAGINARY.{variable}\" option is empty\nctags: the role name in \"--_roledef-IMAGINARY.{variable}\" option is empty\n\n# wrong char in role name\nctags: unacceptable char as part of role name in \"--_roledef-IMAGINARY.v\" option: '+'\nctags: unacceptable char as part of role name in \"--_roledef-IMAGINARY.{variable}\" option: '+'\n\n# empty description\nctags: no role description specified in \"--_roledef-IMAGINARY.v\" option\nctags: found an empty role description in \"--_roledef-IMAGINARY.v\" option\nctags: no role description specified in \"--_roledef-IMAGINARY.{variable}\" option\nctags: found an empty role description in \"--_roledef-IMAGINARY.{variable}\" option\n\n# role is acceptable but no input file\nctags: No files specified. Try \"ctags --help\".\nctags: No files specified. Try \"ctags --help\".\n\n# listing with --list-roles\n\n# listing with --list-kinds-full\n\n# inject a flag separator\n\n# inject a broken flag separator(1)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{foo\"\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{foo\"\n\n# inject a broken flag separator(2)\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{\"\nctags: Warning: long flags specifier opened with `{' is not closed `}': \"{\"\n\n# use a { in description (1)\n\n# use a { in description (2)\n\n# use a \\ in description\n\n# description started from {\nctags: found an empty role description in \"--_roledef-IMAGINARY.v\" option\nctags: found an empty role description in \"--_roledef-IMAGINARY.{variable}\" option\n\n# description started from \\{\n\n# too many roles\nctags: Too many role definition for kind \"variable\" of language \"IMAGINARY\" (> 63)\n" }, { "path": "Tmain/roledef.d/stdout-expected.txt", "content": "\n# echo unknown lang\n\n# no kind spec\n\n# echo unknown kind letter\n\n# echo unknown kind name\n\n# wrong char in a kind letter\n\n# wrong kind name\n\n# empty role name\n\n# wrong char in role name\n\n# empty description\n\n# role is acceptable but no input file\n\n# listing with --list-roles\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable foos on 0 foods\nv/variable role on 0 roles\n\n# listing with --list-kinds-full\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nv variable yes no 1 NONE 0 variables\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nv variable yes no 2 NONE 0 variables\n\n# inject a flag separator\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n\n# inject a broken flag separator(1)\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n\n# inject a broken flag separator(2)\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\n\n# use a { in description (1)\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles{\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles{\n\n# use a { in description (2)\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles{}\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles{}\n\n# use a \\ in description\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\\backslash\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 roles\\backslash\n\n# description started from {\n\n# description started from \\{\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 {\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nv/variable role on 0 {\n\n# too many roles\n" }, { "path": "Tmain/roles-field-optscript.d/foo.ctags", "content": "--extras=+r\n--fields=+r\n\n--langdef=foo\n--map-foo=+.foo\n\n--kinddef-foo=v,var,variables\n\n--_roledef-foo.v=lval,left side value\n--_roledef-foo.v=inc,incremeted\n--_roledef-foo.v=dec,decremented\n\n--regex-foo=/([a-z]) *=/\\1/v/{_role=lval}{{\n \\1 . :roles pstack clear\n}}\n\n--regex-foo=/([a-z])\\+\\+/\\1/v/{_role=inc}{{\n \\1 . :roles pstack clear\n}}\n\n--regex-foo=/([a-z])\\-\\-/\\1/v/{_role=dec}{{\n \\1 . :roles pstack clear\n}}\n\n--regex-foo=/def +([a-z])/\\1/v/{{\n \\1 . :roles pstack clear\n}}\n" }, { "path": "Tmain/roles-field-optscript.d/input.foo", "content": "def a\n\na++\na--\na=3\n" }, { "path": "Tmain/roles-field-optscript.d/run.sh", "content": "# Copyright: 2021 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --options=foo.ctags -o - input.foo | grep -v '^a'\n" }, { "path": "Tmain/roles-field-optscript.d/stderr-expected.txt", "content": "[/def]\n(a)\n[/inc]\n(a)\n[/dec]\n(a)\n[/lval]\n(a)\n" }, { "path": "Tmain/roles-field-optscript.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/ruby-scope-loop-oom.d/README", "content": "This is initially a crash test.\nThe crash (OOM killer) was reported in #3306 by @ivanbrennan.\na.rb and b.rb were taken from the issue.\n" }, { "path": "Tmain/ruby-scope-loop-oom.d/a.rb", "content": "RSpec.describe \"A\" do\n describe \"a\" do\n it \"hangs\" do\n {\n for: nil\n }\n {\n for: nil\n }\n end\n end\nend\n" }, { "path": "Tmain/ruby-scope-loop-oom.d/b.rb", "content": "RSpec.describe \"B\" do\nend\n" }, { "path": "Tmain/ruby-scope-loop-oom.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/ruby-scope-loop-oom.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nif ! type timeout > /dev/null 2>&1; then\n\tskip \"timeout command is not available\"\nfi\n\ntimeout 5s ${CTAGS} --quiet --options=NONE --fields=+e -o - a.rb b.rb\nexit $?\n" }, { "path": "Tmain/ruby-scope-loop-oom.d/stdout-expected.txt", "content": "A\ta.rb\t/^RSpec.describe \"A\" do$/;\"\td\tend:12\nB\tb.rb\t/^RSpec.describe \"B\" do$/;\"\td\tend:2\na\ta.rb\t/^ describe \"a\" do$/;\"\td\tdescribe:A\tend:11\nhangs\ta.rb\t/^ it \"hangs\" do$/;\"\ti\tdescribe:A.a\tend:10\n" }, { "path": "Tmain/run-as-etags.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/run-as-etags.d/run.sh", "content": "# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\n# on \"Environment: compiler=msvc, ARCH=x64\", we got following error:\n#\n# C:/projects/ctags/Tmain/run-as-etags.d/etags.exe:\n# error while loading shared libraries:\n# iconv.dll: cannot open shared object file: No such file or directory\nexit_if_win32 \"$CTAGS\"\n\netags=$BUILDDIR/etags\ncp $1 $etags\n\n$etags --quiet --options=NONE --_force-quit\nr=$?\n\nrm $etags\n\nexit $r\n" }, { "path": "Tmain/run-as-etags.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/sandbox-crash.d/exit-expected.txt", "content": "159\n" }, { "path": "Tmain/sandbox-crash.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS debug\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} '!' gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.ctst\", \"size\": 1}'\n echo 'P'\n} | $CTAGS --quiet --options=NONE --language-force=CTagsSelfTest --_interactive=sandbox > /tmp/ctags-Tmain-$$\nr=$?\njdropver < /tmp/ctags-Tmain-$$\nrm /tmp/ctags-Tmain-$$\nexit $r\n" }, { "path": "Tmain/sandbox-crash.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n" }, { "path": "Tmain/sandbox-default-req.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/sandbox-default-req.d/input.c", "content": "int main(void) { return 0; }\n" }, { "path": "Tmain/sandbox-default-req.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} '!' gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.c\", \"size\": -1}'\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.el\", \"size\": 16}'\n echo '(defun foo () 0)'\n} | $CTAGS --quiet --options=NONE --_interactive=sandbox > /tmp/ctags-Tmain-$$\nr=$?\njdropver < /tmp/ctags-Tmain-$$\nrm /tmp/ctags-Tmain-$$\nexit $r\n" }, { "path": "Tmain/sandbox-default-req.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/sandbox-default-req.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"error\", \"message\": \"invalid request in sandbox submode: reading file contents from a file is limited\", \"fatal\": true}\n{\"_type\": \"tag\", \"name\": \"foo\", \"path\": \"input.el\", \"pattern\": \"/^(defun foo () 0)/\", \"kind\": \"function\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/sandbox-no-eager-guessing.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/sandbox-no-eager-guessing.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} '!' gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.unknown\", \"size\": 44}'\n echo '/* -*- c -*- */ int main(void) { return 0; }'\n} | $CTAGS --quiet --options=NONE --_interactive=sandbox > /tmp/ctags-Tmain-$$\nr=$?\njdropver < /tmp/ctags-Tmain-$$\nrm /tmp/ctags-Tmain-$$\nexit $r\n" }, { "path": "Tmain/sandbox-no-eager-guessing.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/sandbox-no-eager-guessing.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/sandbox-unknown-submode.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/sandbox-unknown-submode.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} '!' gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.c\", \"size\": 28}'\n echo 'int main(void) { return 0; }'\n} | $CTAGS --quiet --options=NONE --_interactive=unknown\n\nexit $?\n" }, { "path": "Tmain/sandbox-unknown-submode.d/stderr-expected.txt", "content": "ctags: Unknown option argument \"unknown\" for --_interactive option\n" }, { "path": "Tmain/sandbox-unknown-submode.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/sandbox-with-eager-guessing.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/sandbox-with-eager-guessing.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} '!' gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.unknown\", \"size\": 44}'\n echo '/* -*- c -*- */ int main(void) { return 0; }'\n} | $CTAGS --quiet --options=NONE -G --_interactive=sandbox > /tmp/ctags-Tmain-$$\nr=$?\njdropver < /tmp/ctags-Tmain-$$\nrm /tmp/ctags-Tmain-$$\nexit $r\n" }, { "path": "Tmain/sandbox-with-eager-guessing.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/sandbox-with-eager-guessing.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.unknown\", \"pattern\": \"/^\\\\/* -*- c -*- *\\\\/ int main(void) { return 0; }/\", \"typeref\": \"typename:int\", \"kind\": \"function\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/sandbox.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/sandbox.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS sandbox\nis_feature_available ${CTAGS} interactive\nis_feature_available ${CTAGS} '!' gcov\n\n{\n echo '{\"command\":\"generate-tags\", \"filename\":\"input.c\", \"size\": 28}'\n echo 'int main(void) { return 0; }'\n} | $CTAGS --quiet --options=NONE --_interactive=sandbox > /tmp/ctags-Tmain-$$\nr=$?\njdropver < /tmp/ctags-Tmain-$$\nrm /tmp/ctags-Tmain-$$\nexit $r\n" }, { "path": "Tmain/sandbox.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/sandbox.d/stdout-expected.txt", "content": "{\"_type\": \"program\", \"name\": \"Universal Ctags\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.c\", \"pattern\": \"/^int main(void) { return 0; }/\", \"typeref\": \"typename:int\", \"kind\": \"function\"}\n{\"_type\": \"completed\", \"command\": \"generate-tags\"}\n" }, { "path": "Tmain/scopesep.d/input.tcl", "content": "namespace eval M {\n namespace eval N {\n\tproc p0 {s} {\n\t}\n }\n}\n\nproc p1 {s} {\n}\n" }, { "path": "Tmain/scopesep.d/run.sh", "content": "# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho \"# root sep and wildcard\"\n${CTAGS} --quiet --options=NONE\t\t\t\t\t\\\n\t\t -o -\t\t\t\t\t\t\t\t\t\\\n\t\t --sort=no\t\t\t\t\t\t\t\t\\\n\t\t --extras=+q\t\t\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='/*:/'\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='*/*:+'\t\t\t\t\\\n\t\t input.tcl\n\necho \"# override wildcard\"\n${CTAGS} --quiet --options=NONE\t\t\t\t\t\\\n\t\t -o -\t\t\t\t\t\t\t\t\t\\\n\t\t --sort=no\t\t\t\t\t\t\t\t\\\n\t\t --extras=+q\t\t\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='/*:/'\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='*/*:+'\t\t\t\t\\\n\t\t --_scopesep-Tcl='n/n:->'\t\t\t\t\\\n\t\t --_scopesep-Tcl='n/p:^'\t\t\t\t\\\n\t\t input.tcl\n\necho \"# override rootsep\"\n${CTAGS} --quiet --options=NONE\t\t\t\t\t\\\n\t\t -o -\t\t\t\t\t\t\t\t\t\\\n\t\t --sort=no\t\t\t\t\t\t\t\t\\\n\t\t --extras=+q\t\t\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='/*:/'\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='*/*:+'\t\t\t\t\\\n\t\t --_scopesep-Tcl='/n:@'\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='/p:%'\t\t\t\t\t\\\n\t\t input.tcl\n\necho \"# no default\"\n${CTAGS} --quiet --options=NONE\t\t\t\t\t\\\n\t\t -o -\t\t\t\t\t\t\t\t\t\\\n\t\t --sort=no\t\t\t\t\t\t\t\t\\\n\t\t --extras=+q\t\t\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='n/n:->'\t\t\t\t\\\n\t\t --_scopesep-Tcl='n/p:^'\t\t\t\t\\\n\t\t --_scopesep-Tcl='/n:@'\t\t\t\t\t\\\n\t\t --_scopesep-Tcl='/p:%'\t\t\t\t\t\\\n\t\t input.tcl\n" }, { "path": "Tmain/scopesep.d/stdout-expected.txt", "content": "# root sep and wildcard\nM\tinput.tcl\t/^namespace eval M {$/;\"\tn\n/M\tinput.tcl\t/^namespace eval M {$/;\"\tn\nN\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:/M\n/M+N\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:/M\np0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:/M+N\n/M+N+p0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:/M+N\np1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n/p1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n# override wildcard\nM\tinput.tcl\t/^namespace eval M {$/;\"\tn\n/M\tinput.tcl\t/^namespace eval M {$/;\"\tn\nN\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:/M\n/M->N\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:/M\np0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:/M->N\n/M->N^p0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:/M->N\np1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n/p1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n# override rootsep\nM\tinput.tcl\t/^namespace eval M {$/;\"\tn\n@M\tinput.tcl\t/^namespace eval M {$/;\"\tn\nN\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:@M\n@M+N\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:@M\np0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:@M+N\n@M+N+p0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:@M+N\np1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n%p1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n# no default\nM\tinput.tcl\t/^namespace eval M {$/;\"\tn\n@M\tinput.tcl\t/^namespace eval M {$/;\"\tn\nN\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:@M\n@M->N\tinput.tcl\t/^ namespace eval N {$/;\"\tn\tnamespace:@M\np0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:@M->N\n@M->N^p0\tinput.tcl\t/^\tproc p0 {s} {$/;\"\tp\tnamespace:@M->N\np1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n%p1\tinput.tcl\t/^proc p1 {s} {$/;\"\tp\n" }, { "path": "Tmain/selector-dont-select-disabled-lang.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/selector-dont-select-disabled-lang.d/input.h", "content": "@interface Ctags\n@end\n\nstruct s {\n int i;\n};\n" }, { "path": "Tmain/selector-dont-select-disabled-lang.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --languages=-ObjectiveC --print-language input.h\n\n" }, { "path": "Tmain/selector-dont-select-disabled-lang.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/selector-dont-select-disabled-lang.d/stdout-expected.txt", "content": "input.h: C++\n" }, { "path": "Tmain/selector-select-C-for-dot-h.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/selector-select-C-for-dot-h.d/input.h", "content": "#define a(x) (1+(x)))\n" }, { "path": "Tmain/selector-select-C-for-dot-h.d/run.sh", "content": "# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\necho --map-C++=-.h --map-C=+.h && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-C++=-.h --map-C=+.h \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-C=+.h && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-C=+.h \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-C=-.h && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-C++=-.h \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-ObjectiveC=-.h && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-ObjectiveC=-.h \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-ObjectiveC=-.h --map-C=-.h && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-ObjectiveC=-.h --map-C=-.h \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h && \\\necho --map-ObjectiveC=-.h --map-C++=-.h && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-ObjectiveC=-.h --map-C++=-.h \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-C++=-.h --map-C=+.h --languages=-ObjectiveC && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-C++=-.h --map-C=+.h --languages=-ObjectiveC \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-C++=-.h --map-C=+.h --languages=-C++ && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-C++=-.h --map-C=+.h --languages=-C++ \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\necho --map-C++=-.h --map-C=+.h --languages=-C && \\\n${CTAGS} --quiet --options=NONE \\\n\t\t --map-C++=-.h --map-C=+.h --languages=-C \\\n\t\t --fields=+'{language}{signature}' \\\n\t\t --fields-C=+'{macrodef}' \\\n\t\t --kinds-C=d -o - input.h &&\n:\n" }, { "path": "Tmain/selector-select-C-for-dot-h.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/selector-select-C-for-dot-h.d/stdout-expected.txt", "content": "--map-C++=-.h --map-C=+.h\na\tinput.h\t/^#define a(/;\"\td\tlanguage:C\tsignature:(x)\tmacrodef:(1+(x)))\n--map-C=+.h\na\tinput.h\t/^#define a(/;\"\td\tlanguage:C\tsignature:(x)\tmacrodef:(1+(x)))\n--map-C=-.h\na\tinput.h\t/^#define a(x) (1+(x)))$/;\"\tM\tlanguage:ObjectiveC\n--map-ObjectiveC=-.h\na\tinput.h\t/^#define a(/;\"\td\tlanguage:C++\tsignature:(x)\n--map-ObjectiveC=-.h --map-C=-.h\na\tinput.h\t/^#define a(/;\"\td\tlanguage:C++\tsignature:(x)\n--map-ObjectiveC=-.h --map-C++=-.h\n--map-C++=-.h --map-C=+.h --languages=-ObjectiveC\na\tinput.h\t/^#define a(/;\"\td\tlanguage:C\tsignature:(x)\tmacrodef:(1+(x)))\n--map-C++=-.h --map-C=+.h --languages=-C++\na\tinput.h\t/^#define a(/;\"\td\tlanguage:C\tsignature:(x)\tmacrodef:(1+(x)))\n--map-C++=-.h --map-C=+.h --languages=-C\na\tinput.h\t/^#define a(x) (1+(x)))$/;\"\tM\tlanguage:ObjectiveC\n" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/input0.pm", "content": "# Taken from Units/parara-raku.r/raku-bunch1.d/input.pm\nmy class JSONPrettyActions {\n method TOP($/) {\n make $/.values.[0].ast;\n };\n method object($/) {\n make $.ast.hash.item;\n }\n\n method pairlist($/) {\n make $>>.ast.flat;\n }\n\n method pair($/) {\n make $.ast => $.ast;\n }\n\n method array($/) {\n make $.ast.item;\n }\n\n method arraylist($/) {\n make [$>>.ast];\n }\n\n method string($/) {\n make $0.elems == 1\n ?? ($0[0]. || $0[0].).ast\n !! join '', $0.list.map({ (. || .).ast });\n }\n method value:sym($/) { make +$/.Str }\n method value:sym($/) { make $.ast }\n method value:sym($/) { make Bool::True }\n method value:sym($/) { make Bool::False }\n method value:sym($/) { make Any }\n method value:sym($/) { make $.ast }\n method value:sym($/) { make $.ast }\n\n method str($/) { make ~$/ }\n\n my %esc = '\\\\' => \"\\\\\",\n '/' => \"/\",\n 'b' => \"\\b\",\n 'n' => \"\\n\",\n 't' => \"\\t\",\n 'f' => \"\\f\",\n 'r' => \"\\r\",\n '\"' => \"\\\"\";\n method str_escape($/) {\n make $ ?? chr(:16($.join)) !! %esc.AT-KEY(~$/);\n }\n}\n\nmy grammar JSONPrettyGrammar {\n token TOP { ^ \\s* [ | ] \\s* $ }\n rule object { '{' ~ '}' }\n rule pairlist { * % \\, }\n rule pair { ':' }\n rule array { '[' ~ ']' }\n rule arraylist { * % [ \\, ] }\n\n proto token value {*};\n token value:sym {\n '-'?\n [ 0 | <[1..9]> <[0..9]>* ]\n [ \\. <[0..9]>+ ]?\n [ <[eE]> [\\+|\\-]? <[0..9]>+ ]?\n }\n token value:sym { };\n token value:sym { };\n token value:sym { };\n token value:sym { };\n token value:sym { };\n token value:sym { }\n\n token string {\n \\\" ~ \\\" ( | \\\\ )*\n }\n\n token str {\n <-[\"\\\\\\t\\n]>+\n }\n\n token str_escape {\n <[\"\\\\/bfnrt]> | u **4\n }\n}\n\nproto sub to-json($, :$indent = 0, :$first = 0) {*}\n\nmulti sub to-json(Version:D $v, :$indent = 0, :$first = 0) { to-json(~$v, :$indent, :$first) }\nmulti sub to-json(Real:D $d, :$indent = 0, :$first = 0) { (' ' x $first) ~ ~$d }\nmulti sub to-json(Bool:D $d, :$indent = 0, :$first = 0) { (' ' x $first) ~ ($d ?? 'true' !! 'false') }\nmulti sub to-json(Str:D $d, :$indent = 0, :$first = 0) {\n (' ' x $first) ~ '\"'\n ~ $d.trans(['\"', '\\\\', \"\\b\", \"\\f\", \"\\n\", \"\\r\", \"\\t\"]\n => ['\\\"', '\\\\\\\\', '\\b', '\\f', '\\n', '\\r', '\\t'])\\\n .subst(/<-[\\c32..\\c126]>/, { ord(~$_).fmt('\\u%04x') }, :g)\n ~ '\"'\n}\nmulti sub to-json(Positional:D $d, :$indent = 0, :$first = 0) {\n (' ' x $first) ~ \"\\[\"\n ~ ($d ?? $d.map({ \"\\n\" ~ to-json($_, :indent($indent + 2), :first($indent + 2)) }).join(\",\") ~ \"\\n\" ~ (' ' x $indent) !! ' ')\n ~ ']';\n}\nmulti sub to-json(Associative:D $d, :$indent = 0, :$first = 0) {\n (' ' x $first) ~ \"\\{\"\n ~ ($d ?? $d.map({ \"\\n\" ~ to-json(.key, :first($indent + 2)) ~ ' : ' ~ to-json(.value, :indent($indent + 2)) }).join(\",\") ~ \"\\n\" ~ (' ' x $indent) !! ' ')\n ~ '}';\n}\n\nmulti sub to-json(Mu:U $, :$indent = 0, :$first = 0) { 'null' }\nmulti sub to-json(Mu:D $s, :$indent = 0, :$first = 0) {\n die \"Can't serialize an object of type \" ~ $s.WHAT.perl\n}\n\nsub from-json($text) {\n my $a = JSONPrettyActions.new();\n my $o = JSONPrettyGrammar.parse($text, :actions($a));\n $o.ast;\n}\n" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/input1.pm", "content": "# Taken from Units/parser-raku/raku-bunch2.d/input.rakumod\n\n# Anything that can be subscribed to does this role. It provides the basic\n# supply management infrastructure, as well as various coercions that\n# turn Supply-like things into something else and convenience forms of calls\n# to SupplyOperations.\n\nmy class SupplyOperations is repr('Uninstantiable') { ... }\nmy class X::Supply::Combinator is Exception {\n has $.combinator;\n method message() { \"Can only use $!combinator to combine defined Supply objects\" }\n}\n\nmy class Tap {\n has &.emit;\n has &.done;\n has &.quit;\n has &.closing;\n has $.supply;\n\n method close (Tap:D:) { $!supply.close(self) }\n}\n\nmy role Supply {\n has $!tappers_lock = Lock.new;\n has @!tappers;\n has $!been_tapped;\n has @!paused;\n\n method tap(Supply:D: &emit = -> $ { }, :&done,:&quit={die $_},:&closing) {\n my $tap = Tap.new(:&emit, :&done, :&quit, :&closing, :supply(self));\n $!tappers_lock.protect({\n @!tappers.push($tap);\n if @!paused -> \\todo {\n $tap.emit().($_) for todo;\n @!paused = ();\n }\n $!been_tapped = True;\n });\n $tap\n }\n\n proto method close(|) { * }\n multi method close(Supply:D:) { self.close($_) for self.tappers }\n multi method close(Supply:D: Tap $t) {\n my $found;\n $!tappers_lock.protect({\n @!tappers .= grep( { $_ === $t ?? !($found = True) !! True } );\n });\n if $t.closing -> &closing {\n closing();\n }\n $found // False;\n }\n\n method tappers(Supply:D:) {\n # Shallow clone to provide safe snapshot.\n my @tappers;\n $!tappers_lock.protect({ @tappers = @!tappers });\n @tappers\n }\n\n method emit(Supply:D: \\msg) {\n if self.tappers -> \\tappers {\n .emit().(msg) for tappers;\n }\n elsif !$!been_tapped {\n $!tappers_lock.protect({ @!paused.push: msg });\n }\n Nil;\n }\n\n method more(Supply:D: \\msg) {\n DEPRECATED('emit', |<2014.10 2015.09>);\n self.emit(msg);\n }\n\n method done(Supply:D:) {\n for self.tappers -> $t {\n my $l = $t.done();\n $l() if $l;\n }\n Nil;\n }\n\n method quit(Supply:D: $ex) {\n for self.tappers -> $t {\n my $f = $t.quit();\n $f($ex) if $f;\n }\n Nil;\n }\n\n method taps(Supply:D:) { +@!tappers }\n method live(Supply:D:) { True };\n\n method Supply(Supply:) { self }\n method Channel(Supply:D:) {\n my $c = Channel.new();\n self.tap( -> \\val { $c.send(val) },\n done => { $c.close },\n quit => -> $ex { $c.quit($ex) });\n $c\n }\n\n method Promise(Supply:D:) {\n my $l = Lock.new;\n my $p = Promise.new;\n my $v = $p.vow;\n my $t = self.tap(\n -> \\val {\n $l.protect( {\n if $p.status == Planned {\n $v.keep(val);\n $t.close()\n }\n } );\n },\n done => { $v.break(\"No value received\") },\n quit => -> \\ex {\n $l.protect( {\n if $p.status == Planned {\n $v.break(ex);\n $t.close()\n }\n } );\n },\n );\n $p\n }\n\n method wait(Supply:D:) {\n my $l = Lock.new;\n my $p = Promise.new;\n my $t = self.tap( -> \\val {},\n done => {\n $l.protect( {\n if $p.status == Planned {\n $p.keep(True);\n $t.close()\n }\n } );\n },\n quit => -> \\ex {\n $l.protect( {\n if $p.status == Planned {\n $p.break(ex);\n $t.close()\n }\n } );\n },\n );\n $p.result\n }\n\n method list(Supply:D:) {\n # Use a Channel to handle any asynchrony.\n self.Channel.list;\n }\n\n method on-demand(Supply:U: |c) { SupplyOperations.on-demand(|c) }\n method from-list(Supply:U: |c) { SupplyOperations.from-list(|c) }\n method interval(Supply:U: |c) { SupplyOperations.interval(|c) }\n method flat(Supply:D: ) { SupplyOperations.flat(self) }\n method grep(Supply:D: Mu $test) { SupplyOperations.grep(self, $test) }\n method map(Supply:D: &mapper) { SupplyOperations.map(self, &mapper) }\n method schedule-on(Supply:D: Scheduler $scheduler) {\n SupplyOperations.schedule-on(self, $scheduler);\n }\n method start(Supply:D: &startee) { SupplyOperations.start(self, &startee) }\n method stable(Supply:D: $time, :$scheduler = $*SCHEDULER) {\n SupplyOperations.stable(self, $time, :$scheduler);\n }\n method delay(Supply:D: $time, :$scheduler = $*SCHEDULER) {\n DEPRECATED('delayed', '2015.02', '2015.09');\n SupplyOperations.delayed(self, $time, :$scheduler);\n }\n method delayed(Supply:D: $time, :$scheduler = $*SCHEDULER) {\n SupplyOperations.delayed(self, $time, :$scheduler)\n }\n method migrate(Supply:D: ) { SupplyOperations.migrate(self) }\n\n multi method classify(Supply:D: &mapper ) {\n SupplyOperations.classify(self, &mapper);\n }\n multi method classify(Supply:D: %mapper ) {\n SupplyOperations.classify(self, { %mapper{$^a} });\n }\n multi method classify(Supply:D: @mapper ) {\n SupplyOperations.classify(self, { @mapper[$^a] });\n }\n\n proto method categorize (|) { * }\n multi method categorize(Supply:D: &mapper ) {\n SupplyOperations.classify(self, &mapper, :multi);\n }\n multi method categorize(Supply:D: %mapper ) {\n SupplyOperations.classify(self, { %mapper{$^a} }, :multi);\n }\n multi method categorize(Supply:D: @mapper ) {\n SupplyOperations.classify(self, { @mapper[$^a] }, :multi);\n }\n\n method act(Supply:D: &actor) {\n self.do(&actor).tap(|%_) # need \"do\" for serializing callbacks\n }\n\n method do(Supply:D $self: &side_effect) {\n on -> $res {\n $self => -> \\val { side_effect(val); $res.emit(val) }\n }\n }\n\n method unique(Supply:D $self: :&as, :&with, :$expires) {\n on -> $res {\n $self => do {\n if $expires {\n if &with and &with !=== &[===] {\n my @seen; # really Mu, but doesn't work in settings\n my Mu $target;\n &as\n ?? -> \\val {\n my $now := now;\n $target = &as(val);\n my $index =\n @seen.first-index({&with($target,$_[0])});\n if $index.defined {\n if $now > @seen[$index][1] { # expired\n @seen[$index][1] = $now+$expires;\n $res.emit(val);\n }\n }\n else {\n @seen.push: [$target, $now+$expires];\n $res.emit(val);\n }\n }\n !! -> \\val {\n my $now := now;\n my $index =\n @seen.first-index({&with(val,$_[0])});\n if $index.defined {\n if $now > @seen[$index][1] { # expired\n @seen[$index][1] = $now+$expires;\n $res.emit(val);\n }\n }\n else {\n @seen.push: [val, $now+$expires];\n $res.emit(val);\n }\n };\n }\n else {\n my $seen := nqp::hash();\n my str $target;\n &as\n ?? -> \\val {\n my $now := now;\n $target = nqp::unbox_s(&as(val).WHICH);\n if !nqp::existskey($seen,$target) ||\n $now > nqp::atkey($seen,$target) { #expired\n $res.emit(val);\n nqp::bindkey($seen,$target,$now+$expires);\n }\n }\n !! -> \\val {\n my $now := now;\n $target = nqp::unbox_s(val.WHICH);\n if !nqp::existskey($seen,$target) ||\n $now > nqp::atkey($seen,$target) { #expired\n $res.emit(val);\n nqp::bindkey($seen,$target,$now+$expires);\n }\n };\n }\n }\n else { # !$!expires\n if &with and &with !=== &[===] {\n my @seen; # really Mu, but doesn't work in settings\n my Mu $target;\n &as\n ?? -> \\val {\n $target = &as(val);\n if @seen.first({ &with($target,$_) } ) =:= Nil {\n @seen.push($target);\n $res.emit(val);\n }\n }\n !! -> \\val {\n if @seen.first({ &with(val,$_) } ) =:= Nil {\n @seen.push(val);\n $res.emit(val);\n }\n };\n }\n else {\n my $seen := nqp::hash();\n my str $target;\n &as\n ?? -> \\val {\n $target = nqp::unbox_s(&as(val).WHICH);\n unless nqp::existskey($seen, $target) {\n nqp::bindkey($seen, $target, 1);\n $res.emit(val);\n }\n }\n !! -> \\val {\n $target = nqp::unbox_s(val.WHICH);\n unless nqp::existskey($seen, $target) {\n nqp::bindkey($seen, $target, 1);\n $res.emit(val);\n }\n };\n }\n }\n }\n }\n }\n\n method squish(Supply:D $self: :&as, :&with is copy) {\n &with //= &[===];\n on -> $res {\n my @secret;\n $self => do {\n my Mu $last = @secret;\n my Mu $target;\n &as\n ?? -> \\val {\n $target = &as(val);\n unless &with($target,$last) {\n $last = $target;\n $res.emit(val);\n }\n }\n !! -> \\val {\n unless &with(val,$last) {\n $last = val;\n $res.emit(val);\n }\n };\n }\n }\n }\n\n proto method rotor(|) {*}\n multi method rotor(Supply:D:) {\n DEPRECATED('.rotor( $elems => -$gap )',|<2015.04 2015.09>);\n self.rotor( (2 => -1) );\n }\n multi method rotor(Supply:D $self: *@cycle, :$partial) {\n my @c := @cycle.infinite ?? @cycle !! @cycle xx *;\n\n on -> $res {\n $self => do {\n my Int $elems;\n my Int $gap;\n my int $to-skip;\n my int $skip;\n sub next-batch() {\n given @c.shift {\n when Pair {\n $elems = +.key;\n $gap = +.value;\n $to-skip = $gap > 0 ?? $gap !! 0;\n }\n default {\n $elems = +$_;\n $gap = 0;\n $to-skip = 0;\n }\n }\n }\n next-batch;\n\n my @batched;\n sub flush() {\n $res.emit( [@batched] );\n @batched.splice( 0, +@batched + $gap );\n $skip = $to-skip;\n }\n\n {\n emit => -> \\val {\n @batched.push: val unless $skip && $skip--;\n if @batched.elems == $elems {\n flush;\n next-batch;\n }\n },\n done => {\n flush if @batched and $partial;\n $res.done;\n }\n }\n }\n }\n }\n\n method batch(Supply:D $self: :$elems, :$seconds ) {\n\n return $self if (!$elems or $elems == 1) and !$seconds; # nothing to do\n\n on -> $res {\n $self => do {\n my @batched;\n my $last_time;\n sub flush {\n $res.emit([@batched]);\n @batched = ();\n }\n\n {\n emit => do {\n if $seconds {\n $last_time = time div $seconds;\n\n $elems # and $seconds\n ?? -> \\val {\n my $this_time = time div $seconds;\n if $this_time != $last_time {\n flush if @batched;\n $last_time = $this_time;\n @batched.push: val;\n }\n else {\n @batched.push: val;\n flush if @batched.elems == $elems;\n }\n }\n !! -> \\val {\n my $this_time = time div $seconds;\n if $this_time != $last_time {\n flush if @batched;\n $last_time = $this_time;\n }\n @batched.push: val;\n }\n }\n else { # just $elems\n -> \\val {\n @batched.push: val;\n flush if @batched.elems == $elems;\n }\n }\n },\n done => {\n flush if @batched;\n $res.done;\n }\n }\n }\n }\n }\n\n method lines(Supply:D $self: :$chomp = True ) {\n\n on -> $res {\n $self => do {\n my str $str;\n my int $chars;\n my int $left;\n my int $pos;\n my int $nextpos;\n my int $found;\n my int $cr;\n my int $crlf;\n\n {\n emit => -> \\val {\n $str = $str ~ nqp::unbox_s(val);\n $chars = nqp::chars($str);\n $pos = 0;\n\n while ($left = $chars - $pos) > 0 {\n $nextpos = nqp::findcclass(\n nqp::const::CCLASS_NEWLINE, $str, $pos, $left\n );\n\n # no trailing line delimiter, so go buffer\n last unless nqp::iscclass(\n nqp::const::CCLASS_NEWLINE, $str, $nextpos\n );\n\n # potentially broken CRLF, so go buffer\n $cr = nqp::ordat($str, $nextpos) == 13; # CR\n last if $cr == 1 and $nextpos + 1 == $chars;\n\n $crlf = $cr\n && nqp::ordat($str, $nextpos + 1) == 10; # LF\n\n if $chomp {\n $res.emit( ($found = $nextpos - $pos)\n ?? nqp::box_s(\n nqp::substr($str, $pos, $found), Str)\n !! ''\n );\n $pos = $nextpos + 1 + $crlf;\n }\n else {\n $found = $nextpos - $pos + 1 + $crlf;\n $res.emit( nqp::box_s(\n nqp::substr($str, $pos, $found), Str)\n );\n $pos = $pos + $found;\n }\n }\n $str = $pos < $chars\n ?? nqp::substr($str,$pos)\n !! '';\n },\n done => {\n if $str {\n $chars = nqp::chars($str);\n $res.emit( $chomp\n && nqp::ordat($str, $chars - 1) == 13 # CR\n ?? nqp::box_s(nqp::substr($str,0,$chars - 1),Str)\n !! nqp::box_s($str, Str)\n );\n }\n $res.done;\n }\n }\n }\n }\n }\n\n method words(Supply:D $self:) {\n\n on -> $res {\n $self => do {\n my str $str;\n my int $chars;\n my int $left;\n my int $pos;\n my int $nextpos;\n my int $found;\n my int $cr;\n my int $crlf;\n\n {\n emit => -> \\val {\n $str = $str ~ nqp::unbox_s(val);\n $chars = nqp::chars($str);\n $pos = nqp::findnotcclass(\n nqp::const::CCLASS_WHITESPACE, $str, 0, $chars);\n\n while ($left = $chars - $pos) > 0 {\n $nextpos = nqp::findcclass(\n nqp::const::CCLASS_WHITESPACE, $str, $pos, $left\n );\n\n last unless $left = $chars - $nextpos; # broken word\n\n $res.emit( nqp::box_s(\n nqp::substr( $str, $pos, $nextpos - $pos ), Str)\n );\n\n $pos = nqp::findnotcclass(\n nqp::const::CCLASS_WHITESPACE,$str,$nextpos,$left);\n }\n $str = $pos < $chars\n ?? nqp::substr($str,$pos)\n !! '';\n },\n done => {\n $res.emit( nqp::box_s($str, Str) ) if $str;\n $res.done;\n }\n }\n }\n }\n }\n\n method elems(Supply:D $self: $seconds? ) {\n\n on -> $res {\n $self => do {\n my $elems = 0;\n my $last_time;\n my $last_elems;\n\n {\n emit => do {\n if $seconds {\n $last_time = time div $seconds;\n $last_elems = $elems;\n -> \\val {\n $last_elems = ++$elems;\n my $this_time = time div $seconds;\n if $this_time != $last_time {\n $res.emit($elems);\n $last_time = $this_time;\n }\n }\n }\n else {\n -> \\val { $res.emit(++$elems) }\n }\n },\n done => {\n $res.emit($elems) if $seconds and $elems != $last_elems;\n $res.done;\n }\n }\n }\n }\n }\n\n method last(Supply:D $self: Int $number = 1) { # should be Natural\n on -> $res {\n $self => do {\n my @seen;\n {\n emit => $number == 1\n ?? -> \\val { @seen[0] = val }\n !! -> \\val {\n @seen.shift if +@seen == $number;\n @seen.push: val;\n },\n done => {\n $res.emit($_) for @seen;\n $res.done;\n }\n }\n }\n }\n }\n\n method min(Supply:D $self: &by = &infix:) {\n my &cmp = &by.arity == 2 ?? &by !! { by($^a) cmp by($^b) }\n on -> $res {\n $self => do {\n my $min;\n {\n emit => -> \\val {\n if val.defined and !$min.defined || cmp(val,$min) < 0 {\n $res.emit( $min = val );\n }\n },\n done => { $res.done }\n }\n }\n }\n }\n\n method max(Supply:D $self: &by = &infix:) {\n my &cmp = &by.arity == 2 ?? &by !! { by($^a) cmp by($^b) }\n on -> $res {\n $self => do {\n my $max;\n {\n emit => -> \\val {\n if val.defined and !$max.defined || cmp(val,$max) > 0 {\n $res.emit( $max = val );\n }\n },\n done => { $res.done }\n }\n }\n }\n }\n\n method minmax(Supply:D $self: &by = &infix:) {\n my &cmp = &by.arity == 2 ?? &by !! { by($^a) cmp by($^b) }\n on -> $res {\n $self => do {\n my $min;\n my $max;\n {\n emit => -> \\val {\n if val.defined {\n if !$min.defined {\n $res.emit( Range.new($min = val, $max = val) );\n }\n elsif cmp(val,$min) < 0 {\n $res.emit( Range.new( $min = val, $max ) );\n }\n elsif cmp(val,$max) > 0 {\n $res.emit( Range.new( $min, $max = val ) );\n }\n }\n },\n done => { $res.done }\n }\n }\n }\n }\n\n method reduce(Supply:D $self: &with) {\n on -> $res {\n $self => do {\n my $notfirst;\n my $reduced;\n {\n emit => -> \\val {\n $reduced = $notfirst ?? with($reduced,val) !! val;\n $res.emit($reduced);\n once $notfirst = True;\n },\n done => { $res.done }\n }\n }\n }\n }\n\n method grab(Supply:D $self: &when_done) {\n on -> $res {\n $self => do {\n my @seen;\n {\n emit => -> \\val { @seen.push: val },\n done => {\n $res.emit($_) for when_done(@seen);\n $res.done;\n }\n }\n }\n }\n }\n\n method reverse(Supply:D:) { self.grab( {.reverse} ) }\n method sort(Supply:D: &by = &infix:) { self.grab( {.sort(&by)} ) }\n\n method merge(*@s) {\n @s.unshift(self) if self.DEFINITE; # add if instance method\n return Supply unless +@s; # nothing to be done\n\n X::Supply::Combinator.new(\n combinator => 'merge'\n ).throw if NOT_ALL_DEFINED_TYPE(@s,Supply);\n\n return @s[0] if +@s == 1; # nothing to be done\n\n my $dones = 0;\n on -> $res {\n @s => {\n emit => -> \\val { $res.emit(val) },\n done => { $res.done() if ++$dones == +@s }\n },\n }\n }\n\n method zip(*@s, :&with is copy = &[,]) {\n @s.unshift(self) if self.DEFINITE; # add if instance method\n return Supply unless +@s; # nothing to be done\n\n X::Supply::Combinator.new(\n combinator => 'zip'\n ).throw if NOT_ALL_DEFINED_TYPE(@s,Supply);\n\n return @s[0] if +@s == 1; # nothing to be done\n\n my @values = ( [] xx +@s );\n on -> $res {\n @s => -> $val, $index {\n @values[$index].push($val);\n if all(@values) {\n $res.emit( [[&with]] @values>>.shift );\n }\n }\n }\n }\n\n method zip-latest(*@s, :&with is copy = &[,], :$initial ) {\n @s.unshift(self) if self.DEFINITE; # add if instance method\n return Supply unless +@s; # nothing to do.\n\n X::Supply::Combinator.new(\n combinator => 'zip-latest'\n ).throw if NOT_ALL_DEFINED_TYPE(@s,Supply);\n\n return @s[0] if +@s == 1; # nothing to do.\n\n my @values;\n\n my $uninitialised = +@s; # how many supplies have yet to emit until we\n # can start emitting, too?\n\n if $initial {\n @values = @$initial;\n $uninitialised = 0 max $uninitialised - @$initial;\n }\n\n my $dones = 0;\n\n on -> $res {\n @s => do {\n {\n emit => -> $val, $index {\n if $uninitialised > 0 && not @values.EXISTS-POS($index) {\n --$uninitialised;\n }\n @values[$index] = $val;\n unless $uninitialised {\n $res.emit( [[&with]] @values );\n }\n },\n done => { $res.done() if ++$dones == +@s }\n }\n }\n }\n }\n\n method for(Supply:U: |c) {\n DEPRECATED('from-list',|<2015.01 2015.09>);\n SupplyOperations.from-list(|c);\n }\n method on_demand(Supply:U: |c) {\n DEPRECATED('on-demand',|<2015.03 2015.09>);\n SupplyOperations.on-demand(|c);\n }\n method schedule_on(Supply:D: Scheduler $scheduler) {\n DEPRECATED('schedule-on',|<2015.03 2015.09>);\n SupplyOperations.schedule-on(self, $scheduler);\n }\n method uniq(Supply:D: |c) {\n DEPRECATED('unique', |<2014.11 2015.09>);\n self.unique(|c);\n }\n}\n\n# The on meta-combinator provides a mechanism for implementing thread-safe\n# combinators on Supplies. It subscribes to a bunch of sources, but will\n# only let one of the specified callbacks to handle their emit/done/quit run\n# at a time. A little bit actor-like.\nmy class X::Supply::On::BadSetup is Exception {\n method message() {\n \"on requires a callable that returns a list of pairs with Supply keys\"\n }\n}\nmy class X::Supply::On::NoEmit is Exception {\n method message() {\n \"on requires that emit be specified for each supply\"\n }\n}\nsub on(&setup) {\n my class OnSupply does Supply {\n has &!setup;\n has Bool $!live = False;\n\n submethod BUILD(:&!setup) { }\n\n method !add_source(\n $source, $lock, $index, :&done is copy, :&quit is copy,\n :&emit is copy, :&more # more deprecated, emit must be changeable\n ) {\n DEPRECATED('emit => {...}', |<2014.10 2015.09>) if &more;\n $!live ||= True if $source.live;\n &emit //= &more // X::Supply::On::NoEmit.new.throw;\n &done //= { self.done };\n &quit //= -> $ex { self.quit($ex) };\n\n my &tap_emit = &emit.arity == 2\n ?? -> \\val {\n $lock.protect({ emit(val,$index) });\n CATCH { default { self.quit($_) } }\n }\n !! -> \\val {\n $lock.protect({ emit(val) });\n CATCH { default { self.quit($_) } }\n };\n\n my &tap_done = &done.arity == 1\n ?? {\n $lock.protect({ done($index) });\n CATCH { default { self.quit($_) } }\n }\n !! {\n $lock.protect({ done() });\n CATCH { default { self.quit($_) } }\n };\n\n my &tap_quit = &quit.arity == 2\n ?? -> $ex {\n $lock.protect({ quit($ex,$index) });\n CATCH { default { self.quit($_) } }\n }\n !! -> $ex {\n $lock.protect({ quit($ex) });\n CATCH { default { self.quit($_) } }\n };\n\n $source.tap( &tap_emit, done => &tap_done, quit => &tap_quit );\n }\n\n method live { $!live }\n method tap(|c) {\n my @to_close;\n my $sub = self.Supply::tap( |c, closing => {.close for @to_close});\n my @tappers = &!setup(self);\n my $lock = Lock.new;\n\n sub add ($source, $what, $index?) {\n unless nqp::istype($source,Supply) {\n X::Supply::On::BadSetup.new.throw;\n }\n given $what {\n when EnumMap {\n @to_close.push(self!add_source($source, $lock, $index, |$what));\n }\n when Callable {\n @to_close.push(self!add_source($source, $lock, $index, emit => $what));\n }\n default {\n X::Supply::On::BadSetup.new.throw;\n }\n }\n }\n\n for @tappers -> $tap {\n unless nqp::istype($tap,Pair) {\n X::Supply::On::BadSetup.new.throw;\n }\n given $tap.key {\n when Positional {\n my $todo := $tap.value;\n for .list.kv -> $index, $supply {\n add( $supply, $todo, $index );\n }\n }\n when Supply {\n add( $_, $tap.value );\n }\n default {\n X::Supply::On::BadSetup.new.throw;\n }\n }\n }\n $sub\n }\n\n method emit(\\msg) {\n for self.tappers {\n .emit().(msg)\n }\n Nil;\n }\n\n method done() {\n for self.tappers {\n if .done -> $l { $l() }\n }\n Nil;\n }\n\n method quit($ex) {\n for self.tappers {\n if .quit -> $t { $t($ex) }\n }\n Nil;\n }\n }\n\n OnSupply.new(:&setup)\n}\n\n" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/input2.pm", "content": "# Taken from Units/parser-raku/raku-package.d/input.rakumod\nuse v6;\npackage Foo {\n sub hello-world is export {\n say \"hey there\";\n }\n}\n" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/input3.pm", "content": "# Taken from perl5/subs.pm\npackage subs;\n\nuse strict;\nuse warnings;\n\nour $VERSION = '1.04';\n\n=head1 NAME\n\nsubs - Perl pragma to predeclare subroutine names\n\n=head1 SYNOPSIS\n\n use subs qw(frob);\n frob 3..10;\n\n=head1 DESCRIPTION\n\nThis will predeclare all the subroutines whose names are\nin the list, allowing you to use them without parentheses (as list operators)\neven before they're declared.\n\nUnlike pragmas that affect the C<$^H> hints variable, the C and\nC declarations are not lexically scoped to the block they appear\nin: they affect\nthe entire package in which they appear. It is not possible to rescind these\ndeclarations with C or C.\n\nSee L and L.\n\n=cut\n\nsub import {\n my $callpack = caller;\n my $pack = shift;\n my @imports = @_;\n foreach my $sym (@imports) {\n no strict 'refs';\n *{\"${callpack}::$sym\"} = \\&{\"${callpack}::$sym\"};\n }\n};\n\n1;\n" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/run.sh", "content": "# Copyright: 2023 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\necho \"# --print-language\"\nfor i in input0.pm input1.pm input2.pm input3.pm; do\n\t${CTAGS} --quiet --options=NONE --print-language $i\ndone\n" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/selector-select-perl6-for-dot-pm.d/stdout-expected.txt", "content": "# --print-language\ninput0.pm: Perl6\ninput1.pm: Perl6\ninput2.pm: Perl6\ninput3.pm: Perl\n" }, { "path": "Tmain/selector-xml-root-elelement.d/input.xml", "content": "\n\n\n" }, { "path": "Tmain/selector-xml-root-elelement.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nis_feature_available ${CTAGS} xpath\n\n${CTAGS} --quiet --options=NONE --print-language input.xml\n" }, { "path": "Tmain/selector-xml-root-elelement.d/stdout-expected.txt", "content": "input.xml: DBusIntrospect\n" }, { "path": "Tmain/sorted-list-languages.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/sorted-list-languages.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\nCTAGS=$1\nBUILDDIR=$2\n\n. ../utils.sh\n\nif ! sort --help | grep --quiet GNU; then\n skip \"GNU sort is needed to run this test case\"\nfi\n\nlist_languages()\n{\n ${CTAGS} --quiet --options=NONE --list-languages\n}\n\nlist_languages > $BUILDDIR/ll.tmp\nlist_languages | sort --ignore-case > $BUILDDIR/sorted-ll.tmp\ndiff -uN $BUILDDIR/ll.tmp $BUILDDIR/sorted-ll.tmp\nr=$?\nrm $BUILDDIR/ll.tmp $BUILDDIR/sorted-ll.tmp\nexit $r\n" }, { "path": "Tmain/sorted-list-languages.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/sorted-list-languages.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/subparser-direction.d/input.cc", "content": " ABC();\nint main(void)\n{\n}\n" }, { "path": "Tmain/subparser-direction.d/input.mojom", "content": " ABC();\nint main(void)\n{\n}\n" }, { "path": "Tmain/subparser-direction.d/mojom-bidirectional.ctags", "content": "--langdef=mojom{base=C++}{bidirectional}\n--map-mojom=+.mojom\n--kinddef-mojom=f,function,functions\n--regex-mojom=/^[ ]+([a-zA-Z]+)\\(/\\1/f/\n" }, { "path": "Tmain/subparser-direction.d/mojom-dedicated.ctags", "content": "--langdef=mojom{base=C++}{dedicated}\n--kinddef-mojom=f,function,functions\n--map-mojom=+.mojom\n--regex-mojom=/^[ ]+([a-zA-Z]+)\\(/\\1/f/\n" }, { "path": "Tmain/subparser-direction.d/mojom-default.ctags", "content": "--langdef=mojom{base=C++}\n--map-mojom=+.mojom\n--kinddef-mojom=f,function,functions\n--regex-mojom=/^[ ]+([a-zA-Z]+)\\(/\\1/f/\n" }, { "path": "Tmain/subparser-direction.d/mojom-shared.ctags", "content": "--langdef=mojom{base=C++}{shared}\n--map-mojom=+.mojom\n--kinddef-mojom=f,function,functions\n--regex-mojom=/^[ ]+([a-zA-Z]+)\\(/\\1/f/\n" }, { "path": "Tmain/subparser-direction.d/run.sh", "content": "# Taken from #1409 submitted by @sgraham\n\nCTAGS=\"$1 --quiet --options=NONE --fields=+l\"\n\necho '#' \"input: input.cc, optlib: shared\"\n${CTAGS} --options=./mojom-shared.ctags -o - input.cc\necho '#' \"input: input.mojom, optlib: shared\"\n${CTAGS} --options=./mojom-shared.ctags -o - input.mojom\n\necho\necho '#' \"input: input.cc, optlib: dedicated\"\n${CTAGS} --options=./mojom-dedicated.ctags -o - input.cc\necho '#' \"input: input.mojom, optlib: dedicated\"\n${CTAGS} --options=./mojom-dedicated.ctags -o - input.mojom\n\necho\necho '#' \"input: input.cc, optlib: bidirectional\"\n${CTAGS} --options=./mojom-bidirectional.ctags -o - input.cc\necho '#' \"input: input.mojom, optlib: bidirectional\"\n${CTAGS} --options=./mojom-bidirectional.ctags -o - input.mojom\n\necho\necho '#' \"input: input.cc, optlib: \"\n${CTAGS} --options=./mojom-default.ctags -o - input.cc\necho '#' \"input: input.mojom, optlib: \"\n${CTAGS} --options=./mojom-default.ctags -o - input.mojom\n" }, { "path": "Tmain/subparser-direction.d/stdout-expected.txt", "content": "# input: input.cc, optlib: shared\nABC\tinput.cc\t/^ ABC();$/;\"\tf\tlanguage:mojom\nmain\tinput.cc\t/^int main(void)$/;\"\tf\tlanguage:C++\ttyperef:typename:int\n# input: input.mojom, optlib: shared\nABC\tinput.mojom\t/^ ABC();$/;\"\tf\tlanguage:mojom\n\n# input: input.cc, optlib: dedicated\nmain\tinput.cc\t/^int main(void)$/;\"\tf\tlanguage:C++\ttyperef:typename:int\n# input: input.mojom, optlib: dedicated\nABC\tinput.mojom\t/^ ABC();$/;\"\tf\tlanguage:mojom\nmain\tinput.mojom\t/^int main(void)$/;\"\tf\tlanguage:C++\ttyperef:typename:int\n\n# input: input.cc, optlib: bidirectional\nABC\tinput.cc\t/^ ABC();$/;\"\tf\tlanguage:mojom\nmain\tinput.cc\t/^int main(void)$/;\"\tf\tlanguage:C++\ttyperef:typename:int\n# input: input.mojom, optlib: bidirectional\nABC\tinput.mojom\t/^ ABC();$/;\"\tf\tlanguage:mojom\nmain\tinput.mojom\t/^int main(void)$/;\"\tf\tlanguage:C++\ttyperef:typename:int\n\n# input: input.cc, optlib: \nABC\tinput.cc\t/^ ABC();$/;\"\tf\tlanguage:mojom\nmain\tinput.cc\t/^int main(void)$/;\"\tf\tlanguage:C++\ttyperef:typename:int\n# input: input.mojom, optlib: \nABC\tinput.mojom\t/^ ABC();$/;\"\tf\tlanguage:mojom\n" }, { "path": "Tmain/tab-in-parser-specific-field.d/foo.ctags", "content": "--langdef=foo\n--map-foo=.foo\n--_fielddef-foo=fprop,property attached to a function\n--kinddef-foo=f,func,functions\n--fields-foo=+{fprop}\n--regex-foo=/^def +([^@]+)@prop(\\([^\\)]*\\)):/\\1/f/{_field=fprop:\\2}\n" }, { "path": "Tmain/tab-in-parser-specific-field.d/input.foo", "content": "def b@prop(arg0, arg1):\n pass\n\n# TAB char betwen arg0 and arg1\ndef a@prop(arg0,\targ1):\n pass\n" }, { "path": "Tmain/tab-in-parser-specific-field.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nrun()\n{\n\techo '#'\n\techo '#' with $1\n\techo '#'\n\n\techo \"# Universal-ctags output format\"\n\t$CTAGS --options=NONE --options=./foo.ctags \"$1\" --output-format=u-ctags -o - input.foo\n\n\techo \"# Exuberant-ctags output format\"\n\techo \"# 'a' has a tab char in fprop fields. So ctags drops it silent.\"\n\t$CTAGS --options=NONE --options=./foo.ctags \"$1\" --output-format=e-ctags -o - input.foo\n}\n\nrun \"--sort=yes\"\nrun \"--sort=no\"\n" }, { "path": "Tmain/tab-in-parser-specific-field.d/stdout-expected.txt", "content": "#\n# with --sort=yes\n#\n# Universal-ctags output format\na\tinput.foo\t/^def a@prop(arg0,\targ1):$/;\"\tf\tfprop:(arg0,\\targ1)\nb\tinput.foo\t/^def b@prop(arg0, arg1):$/;\"\tf\tfprop:(arg0, arg1)\n# Exuberant-ctags output format\n# 'a' has a tab char in fprop fields. So ctags drops it silent.\nb\tinput.foo\t/^def b@prop(arg0, arg1):$/;\"\tf\tfprop:(arg0, arg1)\n#\n# with --sort=no\n#\n# Universal-ctags output format\nb\tinput.foo\t/^def b@prop(arg0, arg1):$/;\"\tf\tfprop:(arg0, arg1)\na\tinput.foo\t/^def a@prop(arg0,\targ1):$/;\"\tf\tfprop:(arg0,\\targ1)\n# Exuberant-ctags output format\n# 'a' has a tab char in fprop fields. So ctags drops it silent.\nb\tinput.foo\t/^def b@prop(arg0, arg1):$/;\"\tf\tfprop:(arg0, arg1)\n" }, { "path": "Tmain/tag-relative-option-in-etags.d/indirect/src/input.c", "content": "int main (void) {return 0;}\n" }, { "path": "Tmain/tag-relative-option-in-etags.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\nARGS=\"--quiet --options=NONE\"\nO=TAGS.TMP\n\n. ../utils.sh\n\nfor x in no yes default; do\n touch $BUILDDIR/${x}-$O\ndone\n\nif ! direq_maybe $BUILDDIR .; then\n\tcp -r indirect $BUILDDIR\n\tcopied=yes\nfi\n(\n cd $BUILDDIR/indirect\n\n ${CTAGS} ${ARGS} -e -o ../no-${O} --tag-relative=no src/input.c\n ${CTAGS} ${ARGS} -e -o ../yes-${O} --tag-relative=yes src/input.c\n ${CTAGS} ${ARGS} -e -o ../default-${O} src/input.c\n)\n\nfor x in no yes default; do\n echo '#' ${x}\n # convert path separators in the output\n sed -e 's|\\\\|/|g' $BUILDDIR/${x}-$O\n rm $BUILDDIR/${x}-$O\ndone\n\nif [ \"$copied\" = \"yes\" ]; then\n\tchmod -R u+w $BUILDDIR/indirect\n\trm -rf $BUILDDIR/indirect\nfi\n\nexit $?\n" }, { "path": "Tmain/tag-relative-option-in-etags.d/stdout-expected.txt", "content": "# no\n\f\nsrc/input.c,37\nint main (void) {return 0;}main\u00011,0\n# yes\n\f\nindirect/src/input.c,37\nint main (void) {return 0;}main\u00011,0\n# default\n\f\nindirect/src/input.c,37\nint main (void) {return 0;}main\u00011,0\n" }, { "path": "Tmain/tag-relative-option-no-optarg.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/tag-relative-option-no-optarg.d/run.sh", "content": "# Copyright: 2019 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE \"\n\n${CTAGS} $O --tag-relative --_force-quit=0\n" }, { "path": "Tmain/tag-relative-option.d/input.c", "content": "#define X 1\n" }, { "path": "Tmain/tag-relative-option.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nO=\"--quiet --options=NONE -o - -x \"\nP=$(pwd)\n\nif type realpath > /dev/null 2>&1; then\n P=$(realpath \"$P\")\n cd \"$P\"\nfi\n\n. ../utils.sh\n\nif ! ${CTAGS} $O --help | grep -e --tag-relative | grep --quiet -e always; then\n\techo \"--tag-relative=always|never is not available on this platform\"\n\texit ${__SKIP__}\nfi\n\n{\n F=./input.c\n ${CTAGS} $O --_xformat=\"default: $F -> %F\" $F\n ${CTAGS} $O --_xformat=\"never: $F -> %F\" --tag-relative=never $F\n ${CTAGS} $O --_xformat=\"no: $F -> %F\" --tag-relative=no $F\n ${CTAGS} $O --_xformat=\"yes: $F -> %F\" --tag-relative=yes $F\n ${CTAGS} $O --_xformat=\"always: $F -> %F\" --tag-relative=always $F\n\n F=input.c\n ${CTAGS} $O --_xformat=\"default: $F -> %F\" $F\n ${CTAGS} $O --_xformat=\"never: $F -> %F\" --tag-relative=never $F\n ${CTAGS} $O --_xformat=\"no: $F -> %F\" --tag-relative=no $F\n ${CTAGS} $O --_xformat=\"yes: $F -> %F\" --tag-relative=yes $F\n ${CTAGS} $O --_xformat=\"always: $F -> %F\" --tag-relative=always $F\n\n F=${P}/input.c\n ${CTAGS} $O --_xformat=\"default: $F -> %F\" $F\n ${CTAGS} $O --_xformat=\"never: $F -> %F\" --tag-relative=never $F\n ${CTAGS} $O --_xformat=\"no: $F -> %F\" --tag-relative=no $F\n ${CTAGS} $O --_xformat=\"yes: $F -> %F\" --tag-relative=yes $F\n ${CTAGS} $O --_xformat=\"always: $F -> %F\" --tag-relative=always $F\n} | {\n # Normalize Windows driver letter\n #\n # comment time: Sat Feb 6 13:11:44 UTC 2021\n # comment author: leleliu008@gmail.com\n #\n # as far as I know, the most widely used unix-like POSIX-compatible environments on Windows are Cygwin and MSYS2. Actually, MSYS2 is a modified fork of Cygwin. They both provide a command-line tool called cygpath which can be used to convert Windows PATH to UNIX path. There exists other unix-like POSIX-compatible environments on Windows, git-for-windows as an example, but they all based on Cygwin or MSYS2.\n if command -v cygpath > /dev/null && command -v awk > /dev/null ; then\n awk '{if ($NF ~ /^[A-Z]:/) { \"cygpath \"$NF | getline newpath; sub($NF,newpath) } print}'\n else\n # \\l is a GNU extension. But only Windows's path match [A-Z]: pattern, Cygwin and MSYS2 use GNU sed.\n sed 's|\\([A-Z]\\):|/\\l\\1|'\n fi\n} | {\n\t# Unescape\n\tsed -e 's|\\\\\\\\|\\\\|g'\n} | {\n\t# Convert to /\n sed -e 's|\\\\|/|g'\n} | {\n\t# Convert pwd test environment neutral\n sed -e \"s|${P}|/abs|g\"\n}\n" }, { "path": "Tmain/tag-relative-option.d/stdout-expected.txt", "content": "default: ./input.c -> ./input.c\nnever: ./input.c -> /abs/input.c\nno: ./input.c -> ./input.c\nyes: ./input.c -> input.c\nalways: ./input.c -> input.c\ndefault: input.c -> input.c\nnever: input.c -> /abs/input.c\nno: input.c -> input.c\nyes: input.c -> input.c\nalways: input.c -> input.c\ndefault: /abs/input.c -> /abs/input.c\nnever: /abs/input.c -> /abs/input.c\nno: /abs/input.c -> /abs/input.c\nyes: /abs/input.c -> /abs/input.c\nalways: /abs/input.c -> input.c\n" }, { "path": "Tmain/tags-output-typed-fields.d/input.c", "content": "static int local;\nint global;\n" }, { "path": "Tmain/tags-output-typed-fields.d/input.ctst", "content": "f\n" }, { "path": "Tmain/tags-output-typed-fields.d/input.rst", "content": "==============================================\nTITLE\n==============================================\n\nsection\n-------\n" }, { "path": "Tmain/tags-output-typed-fields.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --output-format=u-ctags \\\n\t\t --language-force=CTagsSelfTest input.ctst\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --output-format=u-ctags \\\n\t\t --fields-RestructuredText=+'{overline}' \\\n\t\t input.rst\n\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --output-format=u-ctags \\\n\t\t input.c\n" }, { "path": "Tmain/tags-output-typed-fields.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/tags-output-typed-fields.d/stdout-expected.txt", "content": "atag\tinput.ctst\t/^f$/;\"\tf\nbtag\tinput.ctst\t/^f$/;\"\tf\tbField:\nctag\tinput.ctst\t/^f$/;\"\tf\tbField:\ndtag\tinput.ctst\t/^f$/;\"\tf\tsbField:val\netag\tinput.ctst\t/^f$/;\"\tf\tsbField:\nftag\tinput.ctst\t/^f$/;\"\tf\tsField:val\ngtag\tinput.ctst\t/^f$/;\"\tf\tsField:\nhtag\tinput.ctst\t/^f$/;\"\tf\tiField:23\nitag\tinput.ctst\t/^f$/;\"\tf\tiField:-3\njtag\tinput.ctst\t/^f$/;\"\tf\tiField:1\nktag\tinput.ctst\t/^f$/;\"\tf\tiField:0\nTITLE\tinput.rst\t/^TITLE$/;\"\tH\toverline:\nsection\tinput.rst\t/^section$/;\"\th\ttitle:TITLE\nglobal\tinput.c\t/^int global;$/;\"\tv\ttyperef:typename:int\nlocal\tinput.c\t/^static int local;$/;\"\tv\ttyperef:typename:int\tfile:\n" }, { "path": "Tmain/tmain-example.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/tmain-example.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nBUILDDIR=$2\n\n${CTAGS} --quiet --options=NONE --list-kinds=Ruby && echo X > ${BUILDDIR}/tags\n" }, { "path": "Tmain/tmain-example.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/tmain-example.d/stdout-expected.txt", "content": "c classes\nf methods\nm modules\nS singleton methods\nC constants\nA accessors\na aliases\nL libraries\n" }, { "path": "Tmain/tmain-example.d/tags-expected.txt", "content": "X\n" }, { "path": "Tmain/tmain-skip-example.d/run.sh", "content": "# Copyright: 2015 Masatake YAMATO\n# License: GPL-2\n\n. ../utils.sh\n\nif ${CTAGS} --quiet --options=NONE --list-features | grep -q afasdfasfasfsa; then\n echo\nelse\n skip \"example: no such feature\"\nfi\n" }, { "path": "Tmain/tmain-skip-example.d/stdout-expected.txt", "content": "THIS FILE WILL NOT BE USE.\n" }, { "path": "Tmain/trace-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/trace-option.d/input.unknown", "content": "" }, { "path": "Tmain/trace-option.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\nis_feature_available $CTAGS debug\n\n# For comparison the output and the expectation, sed removes signature parts from the output.\n$CTAGS --quiet --options=NONE --_trace=CTagsSelfTest --language-force=CTagsSelfTest ./input.unknown\nexit $?\n" }, { "path": "Tmain/trace-option.d/stderr-expected.txt", "content": "[>> parseFile][at 0] Parsing file ./input.unknown\n [>> createCTSTTags][at 0] Parsing starts\n [<< createCTSTTags][at 0] \n[<< parseFile][at 0] \n" }, { "path": "Tmain/two-inputs-requiring-scope-stack.d/a.dts", "content": "/ {\n\taa: c@0 { };\n\tab: c@1 { };\n\tac: c@2 { };\n\tad: c@3 { };\n\tae: c@4 { };\n\taf: c@5 { };\n\tag: c@6 { };\n\tah: c@7 { };\n\tai: c@8 { };\n\taj: c@9 { };\n\tak: c@10 { };\n\tal: c@11 { };\n\tam: c@12 { };\n\tan: c@13 { };\n\tao: c@14 { };\n\tap: c@15 { };\n\taq: c@16 { };\n\tar: c@17 { };\n\tas: c@18 { };\n\tat: c@19 { };\n\tau: c@20 { };\n\tav: c@21 { };\n\taw: c@22 { };\n\tax: c@23 { };\n\tay: c@24 { };\n\tba: c@25 { };\n\tbb: c@26 { };\n\tbc: c@27 { };\n\tbd: c@28 { };\n\tbe: c@29 { };\n\tbf: c@30 { };\n\tbg: c@31 { };\n\tbh: c@32 { };\n\tbi: c@33 { };\n\tbj: c@34 { };\n\tbk: c@35 { };\n\tbl: c@36 { };\n\tbm: c@37 { };\n\tbn: c@38 { };\n\tbo: c@39 { };\n\tbp: c@40 { };\n\tbq: c@41 { };\n\tbr: c@42 { };\n\tbs: c@43 { };\n\tbt: c@44 { };\n\tbu: c@45 { };\n\tbv: c@46 { };\n\tbw: c@47 { };\n\tbx: c@48 { };\n\tby: c@49 { };\n\tca: c@50 { };\n\tcb: c@51 { };\n\tcc: c@52 { };\n\tcd: c@53 { };\n\tce: c@54 { };\n\tcf: c@55 { };\n\tcg: c@56 { };\n\tch: c@57 { };\n\tci: c@58 { };\n\tcj: c@59 { };\n\tck: c@60 { };\n\tcl: c@61 { };\n\tcm: c@62 { };\n\tcn: c@63 { };\n\tco: c@64 { };\n\tcp: c@65 { };\n\tcq: c@66 { };\n\tcr: c@67 { };\n\tcs: c@68 { };\n\tct: c@69 { };\n\tcu: c@70 { };\n\tcv: c@71 { };\n\tcw: c@72 { };\n\tcx: c@73 { };\n\tcy: c@74 { };\n\tda: c@75 { };\n\tdb: c@76 { };\n\tdc: c@77 { };\n\tdd: c@78 { };\n\tde: c@79 { };\n\tdf: c@80 { };\n\tdg: c@81 { };\n\tdh: c@82 { };\n\tdi: c@83 { };\n\tdj: c@84 { };\n\tdk: c@85 { };\n\tdl: c@86 { };\n\tdm: c@87 { };\n\tdn: c@88 { };\n\tdo: c@89 { };\n\tdp: c@90 { };\n\tdq: c@91 { };\n\tdr: c@92 { };\n\tds: c@93 { };\n\tdt: c@94 { };\n\tdu: c@95 { };\n\tdv: c@96 { };\n\tdw: c@97 { };\n\tdx: c@98 { };\n\tdy: c@99 { };\n\tea: c@100 { };\n\teb: c@101 { };\n\tec: c@102 { };\n\ted: c@103 { };\n\tee: c@104 { };\n\tef: c@105 { };\n\teg: c@106 { };\n\teh: c@107 { };\n\tei: c@108 { };\n\tej: c@109 { };\n\tek: c@110 { };\n\tel: c@111 { };\n\tem: c@112 { };\n\ten: c@113 { };\n\teo: c@114 { };\n\tep: c@115 { };\n\teq: c@116 { };\n\ter: c@117 { };\n\tes: c@118 { };\n\tet: c@119 { };\n\teu: c@120 { };\n\tev: c@121 { };\n\tew: c@122 { };\n\tex: c@123 { };\n\tey: c@124 { };\n\tfa: c@125 { };\n\tfb: c@126 { };\n\tfc: c@127 { };\n\tfd: c@128 { };\n\tfe: c@129 { };\n\tff: c@130 { };\n\tfg: c@131 { };\n\tfh: c@132 { };\n\tfi: c@133 { };\n\tfj: c@134 { };\n\tfk: c@135 { };\n\tfl: c@136 { };\n\tfm: c@137 { };\n\tfn: c@138 { };\n\tfo: c@139 { };\n\tfp: c@140 { };\n\tfq: c@141 { };\n\tfr: c@142 { };\n\tfs: c@143 { };\n\tft: c@144 { };\n\tfu: c@145 { };\n\tfv: c@146 { };\n\tfw: c@147 { };\n\tfx: c@148 { };\n\tfy: c@149 { };\n\tga: c@150 { };\n\tgb: c@151 { };\n\tgc: c@152 { };\n\tgd: c@153 { };\n\tge: c@154 { };\n\tgf: c@155 { };\n\tgg: c@156 { };\n\tgh: c@157 { };\n\tgi: c@158 { };\n\tgj: c@159 { };\n\tgk: c@160 { };\n\tgl: c@161 { };\n\tgm: c@162 { };\n\tgn: c@163 { };\n\tgo: c@164 { };\n\tgp: c@165 { };\n\tgq: c@166 { };\n\tgr: c@167 { };\n\tgs: c@168 { };\n\tgt: c@169 { };\n\tgu: c@170 { };\n\tgv: c@171 { };\n\tgw: c@172 { };\n\tgx: c@173 { };\n\tgy: c@174 { };\n\tha: c@175 { };\n\thb: c@176 { };\n\thc: c@177 { };\n\thd: c@178 { };\n\the: c@179 { };\n\thf: c@180 { };\n\thg: c@181 { };\n\thh: c@182 { };\n\thi: c@183 { };\n\thj: c@184 { };\n\thk: c@185 { };\n\thl: c@186 { };\n\thm: c@187 { };\n\thn: c@188 { };\n\tho: c@189 { };\n\thp: c@190 { };\n\thq: c@191 { };\n\thr: c@192 { };\n\ths: c@193 { };\n\tht: c@194 { };\n\thu: c@195 { };\n\thv: c@196 { };\n\thw: c@197 { };\n\thx: c@198 { };\n\thy: c@199 { };\n\tia: c@200 { };\n\tib: c@201 { };\n\tic: c@202 { };\n\tid: c@203 { };\n\tie: c@204 { };\n\tif: c@205 { };\n\tig: c@206 { };\n\tih: c@207 { };\n\tii: c@208 { };\n\tij: c@209 { };\n\tik: c@210 { };\n\til: c@211 { };\n\tim: c@212 { };\n\tin: c@213 { };\n\tio: c@214 { };\n\tip: c@215 { };\n\tiq: c@216 { };\n\tir: c@217 { };\n\tis: c@218 { };\n\tit: c@219 { };\n\tiu: c@220 { };\n\tiv: c@221 { };\n\tiw: c@222 { };\n\tix: c@223 { };\n\tiy: c@224 { };\n\tja: c@225 { };\n\tjb: c@226 { };\n\tjc: c@227 { };\n\tjd: c@228 { };\n\tje: c@229 { };\n\tjf: c@230 { };\n\tjg: c@231 { };\n\tjh: c@232 { };\n\tji: c@233 { };\n\tjj: c@234 { };\n\tjk: c@235 { };\n\tjl: c@236 { };\n\tjm: c@237 { };\n\tjn: c@238 { };\n\tjo: c@239 { };\n\tjp: c@240 { };\n\tjq: c@241 { };\n\tjr: c@242 { };\n\tjs: c@243 { };\n\tjt: c@244 { };\n\tju: c@245 { };\n\tjv: c@246 { };\n\tjw: c@247 { };\n\tjx: c@248 { };\n\tjy: c@249 { };\n\tka: c@250 { };\n\tkb: c@251 { };\n\tkc: c@252 { };\n\tkd: c@253 { };\n\tke: c@254 { };\n\tkf: c@255 { };\n\tkg: c@256 { };\n\tkh: c@257 { };\n\tki: c@258 { };\n\tkj: c@259 { };\n\tkk: c@260 { };\n\tkl: c@261 { };\n\tkm: c@262 { };\n\tkn: c@263 { };\n\tko: c@264 { };\n\tkp: c@265 { };\n\tkq: c@266 { };\n\tkr: c@267 { };\n\tks: c@268 { };\n\tkt: c@269 { };\n\tku: c@270 { };\n\tkv: c@271 { };\n\tkw: c@272 { };\n\tkx: c@273 { };\n\tky: c@274 { };\n\tla: c@275 { };\n\tlb: c@276 { };\n\tlc: c@277 { };\n\tld: c@278 { };\n\tle: c@279 { };\n\tlf: c@280 { };\n\tlg: c@281 { };\n\tlh: c@282 { };\n\tli: c@283 { };\n\tlj: c@284 { };\n\tlk: c@285 { };\n\tll: c@286 { };\n\tlm: c@287 { };\n\tln: c@288 { };\n\tlo: c@289 { };\n\tlp: c@290 { };\n\tlq: c@291 { };\n\tlr: c@292 { };\n\tls: c@293 { };\n\tlt: c@294 { };\n\tlu: c@295 { };\n\tlv: c@296 { };\n\tlw: c@297 { };\n\tlx: c@298 { };\n\tly: c@299 { };\n\tma: c@300 { };\n\tmb: c@301 { };\n\tmc: c@302 { };\n\tmd: c@303 { };\n\tme: c@304 { };\n\tmf: c@305 { };\n\tmg: c@306 { };\n\tmh: c@307 { };\n\tmi: c@308 { };\n\tmj: c@309 { };\n\tmk: c@310 { };\n\tml: c@311 { };\n\tmm: c@312 { };\n\tmn: c@313 { };\n\tmo: c@314 { };\n\tmp: c@315 { };\n\tmq: c@316 { };\n\tmr: c@317 { };\n\tms: c@318 { };\n\tmt: c@319 { };\n\tmu: c@320 { };\n\tmv: c@321 { };\n\tmw: c@322 { };\n\tmx: c@323 { };\n\tmy: c@324 { };\n\tna: c@325 { };\n\tnb: c@326 { };\n\tnc: c@327 { };\n\tnd: c@328 { };\n\tne: c@329 { };\n\tnf: c@330 { };\n\tng: c@331 { };\n\tnh: c@332 { };\n\tni: c@333 { };\n\tnj: c@334 { };\n\tnk: c@335 { };\n\tnl: c@336 { };\n\tnm: c@337 { };\n\tnn: c@338 { };\n\tno: c@339 { };\n\tnp: c@340 { };\n\tnq: c@341 { };\n\tnr: c@342 { };\n\tns: c@343 { };\n\tnt: c@344 { };\n\tnu: c@345 { };\n\tnv: c@346 { };\n\tnw: c@347 { };\n\tnx: c@348 { };\n\tny: c@349 { };\n\toa: c@350 { };\n\tob: c@351 { };\n\toc: c@352 { };\n\tod: c@353 { };\n\toe: c@354 { };\n\tof: c@355 { };\n\tog: c@356 { };\n\toh: c@357 { };\n\toi: c@358 { };\n\toj: c@359 { };\n\tok: c@360 { };\n\tol: c@361 { };\n\tom: c@362 { };\n\ton: c@363 { };\n\too: c@364 { };\n\top: c@365 { };\n\toq: c@366 { };\n\tor: c@367 { };\n\tos: c@368 { };\n\tot: c@369 { };\n\tou: c@370 { };\n\tov: c@371 { };\n\tow: c@372 { };\n\tox: c@373 { };\n\toy: c@374 { };\n\tpa: c@375 { };\n\tpb: c@376 { };\n\tpc: c@377 { };\n\tpd: c@378 { };\n\tpe: c@379 { };\n\tpf: c@380 { };\n\tpg: c@381 { };\n\tph: c@382 { };\n\tpi: c@383 { };\n\tpj: c@384 { };\n\tpk: c@385 { };\n\tpl: c@386 { };\n\tpm: c@387 { };\n\tpn: c@388 { };\n\tpo: c@389 { };\n\tpp: c@390 { };\n\tpq: c@391 { };\n\tpr: c@392 { };\n\tps: c@393 { };\n\tpt: c@394 { };\n\tpu: c@395 { };\n\tpv: c@396 { };\n\tpw: c@397 { };\n\tpx: c@398 { };\n\tpy: c@399 { };\n\tqa: c@400 { };\n\tqb: c@401 { };\n\tqc: c@402 { };\n\tqd: c@403 { };\n\tqe: c@404 { };\n\tqf: c@405 { };\n\tqg: c@406 { };\n\tqh: c@407 { };\n\tqi: c@408 { };\n\tqj: c@409 { };\n\tqk: c@410 { };\n\tql: c@411 { };\n\tqm: c@412 { };\n\tqn: c@413 { };\n\tqo: c@414 { };\n\tqp: c@415 { };\n\tqq: c@416 { };\n\tqr: c@417 { };\n\tqs: c@418 { };\n\tqt: c@419 { };\n\tqu: c@420 { };\n\tqv: c@421 { };\n\tqw: c@422 { };\n\tqx: c@423 { };\n\tqy: c@424 { };\n\tra: c@425 { };\n\trb: c@426 { };\n\trc: c@427 { };\n\trd: c@428 { };\n\tre: c@429 { };\n\trf: c@430 { };\n\trg: c@431 { };\n\trh: c@432 { };\n\tri: c@433 { };\n\trj: c@434 { };\n\trk: c@435 { };\n\trl: c@436 { };\n\trm: c@437 { };\n\trn: c@438 { };\n\tro: c@439 { };\n\trp: c@440 { };\n\trq: c@441 { };\n\trr: c@442 { };\n\trs: c@443 { };\n\trt: c@444 { };\n\tru: c@445 { };\n\trv: c@446 { };\n\trw: c@447 { };\n\trx: c@448 { };\n\try: c@449 { };\n\tsa: c@450 { };\n\tsb: c@451 { };\n\tsc: c@452 { };\n\tsd: c@453 { };\n\tse: c@454 { };\n\tsf: c@455 { };\n\tsg: c@456 { };\n\tsh: c@457 { };\n\tsi: c@458 { };\n\tsj: c@459 { };\n\tsk: c@460 { };\n\tsl: c@461 { };\n\tsm: c@462 { };\n\tsn: c@463 { };\n\tso: c@464 { };\n\tsp: c@465 { };\n\tsq: c@466 { };\n\tsr: c@467 { };\n\tss: c@468 { };\n\tst: c@469 { };\n\tsu: c@470 { };\n\tsv: c@471 { };\n\tsw: c@472 { };\n\tsx: c@473 { };\n\tsy: c@474 { };\n\tta: c@475 { };\n\ttb: c@476 { };\n\ttc: c@477 { };\n\ttd: c@478 { };\n\tte: c@479 { };\n\ttf: c@480 { };\n\ttg: c@481 { };\n\tth: c@482 { };\n\tti: c@483 { };\n\ttj: c@484 { };\n\ttk: c@485 { };\n\ttl: c@486 { };\n\ttm: c@487 { };\n\ttn: c@488 { };\n\tto: c@489 { };\n\ttp: c@490 { };\n\ttq: c@491 { };\n\ttr: c@492 { };\n\tts: c@493 { };\n\ttt: c@494 { };\n\ttu: c@495 { };\n\ttv: c@496 { };\n\ttw: c@497 { };\n\ttx: c@498 { };\n\tty: c@499 { };\n\tua: c@500 { };\n\tub: c@501 { };\n\tuc: c@502 { };\n\tud: c@503 { };\n\tue: c@504 { };\n\tuf: c@505 { };\n\tug: c@506 { };\n\tuh: c@507 { };\n\tui: c@508 { };\n\tuj: c@509 { };\n\tuk: c@510 { };\n\tul: c@511 { };\n\tum: c@512 { };\n\tun: c@513 { };\n\tuo: c@514 { };\n\tup: c@515 { };\n\tuq: c@516 { };\n\tur: c@517 { };\n\tus: c@518 { };\n\tut: c@519 { };\n\tuu: c@520 { };\n\tuv: c@521 { };\n\tuw: c@522 { };\n\tux: c@523 { };\n\tuy: c@524 { };\n\tva: c@525 { };\n\tvb: c@526 { };\n\tvc: c@527 { };\n\tvd: c@528 { };\n\tve: c@529 { };\n\tvf: c@530 { };\n\tvg: c@531 { };\n\tvh: c@532 { };\n\tvi: c@533 { };\n\tvj: c@534 { };\n\tvk: c@535 { };\n\tvl: c@536 { };\n\tvm: c@537 { };\n\tvn: c@538 { };\n\tvo: c@539 { };\n\tvp: c@540 { };\n\tvq: c@541 { };\n\tvr: c@542 { };\n\tvs: c@543 { };\n\tvt: c@544 { };\n\tvu: c@545 { };\n\tvv: c@546 { };\n\tvw: c@547 { };\n\tvx: c@548 { };\n\tvy: c@549 { };\n\twa: c@550 { };\n\twb: c@551 { };\n\twc: c@552 { };\n\twd: c@553 { };\n\twe: c@554 { };\n\twf: c@555 { };\n\twg: c@556 { };\n\twh: c@557 { };\n\twi: c@558 { };\n\twj: c@559 { };\n\twk: c@560 { };\n\twl: c@561 { };\n\twm: c@562 { };\n\twn: c@563 { };\n\two: c@564 { };\n\twp: c@565 { };\n\twq: c@566 { };\n\twr: c@567 { };\n\tws: c@568 { };\n\twt: c@569 { };\n\twu: c@570 { };\n\twv: c@571 { };\n\tww: c@572 { };\n\twx: c@573 { };\n\twy: c@574 { };\n\txa: c@575 { };\n\txb: c@576 { };\n\txc: c@577 { };\n\txd: c@578 { };\n\txe: c@579 { };\n\txf: c@580 { };\n\txg: c@581 { };\n\txh: c@582 { };\n\txi: c@583 { };\n\txj: c@584 { };\n\txk: c@585 { };\n\txl: c@586 { };\n\txm: c@587 { };\n\txn: c@588 { };\n\txo: c@589 { };\n\txp: c@590 { };\n\txq: c@591 { };\n\txr: c@592 { };\n\txs: c@593 { };\n\txt: c@594 { };\n\txu: c@595 { };\n\txv: c@596 { };\n\txw: c@597 { };\n\txx: c@598 { };\n\txy: c@599 { };\n\tya: c@600 { };\n\tyb: c@601 { };\n\tyc: c@602 { };\n\tyd: c@603 { };\n\tye: c@604 { };\n\tyf: c@605 { };\n\tyg: c@606 { };\n\tyh: c@607 { };\n\tyi: c@608 { };\n\tyj: c@609 { };\n\tyk: c@610 { };\n\tyl: c@611 { };\n\tym: c@612 { };\n\tyn: c@613 { };\n\tyo: c@614 { };\n\typ: c@615 { };\n\tyq: c@616 { };\n\tyr: c@617 { };\n\tys: c@618 { };\n\tyt: c@619 { };\n\tyu: c@620 { };\n\tyv: c@621 { };\n\tyw: c@622 { };\n\tyx: c@623 { };\n\tyy: c@624 { };\n};\n" }, { "path": "Tmain/two-inputs-requiring-scope-stack.d/b.dts", "content": "/ {\n b: b@0 { };\n};\n" }, { "path": "Tmain/unreadable-input.d/input-1.c", "content": "int v1;\n" }, { "path": "Tmain/unreadable-input.d/run.sh", "content": "#!/bin/sh\n\n# Copyright: 2020 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\nINPUT0=/tmp/u-ctags/input-0.c\n\n. ../utils.sh\n\nif ! type pidof > /dev/null 2>&1; then\n\t# pidof is needed to find auditd.\n\tskip \"pidof command is not available\"\nfi\n\nif ! pidof auditd > /dev/null 2>&1; then\n\t# sudo expects auditd is running.\n\tskip \"auditd is not running\"\nfi\n\nif [ $(id -u) = 0 ] && ! sudo -u '#1' $CTAGS --version > /dev/null; then\n\tskip \"sudo needed in this test case doesn't work expectedly on this platform (execution)\"\nfi\n\nmkdir -p ${INPUT0%/*}\necho \"int v0;\" > ${INPUT0}\nchmod a-r ${INPUT0}\n\nif [ $(id -u) = 0 ] && sudo -u '#1' cat ${INPUT0} > /dev/null 2>&1; then\n\trm ${INPUT0}\n\tskip \"sudo needed in this test case doesn't work expectedly on this platform (file reading)\"\nelif [ $(id -u) != 0 ] && cat ${INPUT0} > /dev/null 2>&1; then\n\trm ${INPUT0}\n\tskip \"chmod a-r doesn't work expectedly on this platform\"\nfi\n\n\n{\n\techo ${INPUT0}\n\techo input-1.c\n} | {\n\tif [ $(id -u) = 0 ]; then\n\t\t# The root can read a file even we did \"chmod a-r\".\n\t\tsudo -u '#1' $CTAGS --quiet --options=NONE -L - -o -\n\telse\n\t\t$CTAGS --quiet --options=NONE -L - -o -\n\tfi\n}\nrm ${INPUT0}\n" }, { "path": "Tmain/unreadable-input.d/stderr-expected.txt", "content": "ctags: Warning: cannot open \"/tmp/u-ctags/input-0.c\" : Permission denied\n" }, { "path": "Tmain/unreadable-input.d/stdout-expected.txt", "content": "v1\tinput-1.c\t/^int v1;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Tmain/utils.sh", "content": "__SKIP__=77\n__INTERNAL_ERROR__=76\n\ninternal_error()\n{\n\techo \"$@\"\n\texit ${__INTERNAL_ERROR__}\n}\n\nskip()\n{\n\techo \"$@\"\n\texit ${__SKIP__}\n}\n\nremove_commit_id()\n{\n # Remove a commit id embedded in tags file\n sed -i -e '/!_TAG_PROGRAM_VERSION.*/s#/[^/]*/#//#' $1\n}\n\nfilesize()\n{\n wc -c < \"$1\"\n}\n\nis_feature_available()\n{\n local ctags=$1\n\tlocal tmp=$2\n\tlocal o=\"--quiet --options=NONE\"\n\tlocal neg\n\tlocal feat\n\n\tif [ \"${tmp}\" = '!' ]; then\n\t\tneg=1\n\t\tfeat=$3\n\telse\n\t\tfeat=$2\n\tfi\n\n\tif [ \"${neg}\" = 1 ]; then\n\t\tif ${ctags} $o --with-list-header=no --list-features | grep -q \"$feat\"; then\n\t\t\tskip \"feature \\\"$feat\\\" is available in $ctags\"\n\t\tfi\n\telse\n\t\tif ! ${ctags} $o --with-list-header=no --list-features | grep -q \"$feat\"; then\n\t\t\tskip \"feature \\\"$feat\\\" is not available in $ctags\"\n\t\tfi\n\tfi\n}\n\nskip_if_user_has_dot_ctags_d()\n{\n\tif [ -d ~/.ctags.d ]; then\n\t\tskip \"this test case doesn't work well if you have ~/.ctags.d\"\n\tfi\n}\n\nskip_if_no_readtags()\n{\n\tif [ -z \"${1}\" ]; then\n\t\tinternal_error 'skip_if_no_readtags(): missing \"$1\"'\n\tfi\n\n\tif ! [ -x \"${1}\" ]; then\n\t\tskip \"no readtags\"\n\tfi\n}\n\nskip_if_running_on_msys()\n{\n\tif [ -n \"$MSYSTEM\" ]; then\n\t\tskip \"this test case doesn't work well on MSYS2\"\n\tfi\n}\n\nexit_if_win32()\n{\n\tis_feature_available $1 '!' win32\n}\n\nexit_unless_win32()\n{\n\tis_feature_available $1 win32\n}\n\nexit_if_no_case_insensitive_filenames()\n{\n\tis_feature_available $1 case-insensitive-filenames\n}\n\nrun_with_format()\n{\n echo '#' $*\n local format=$1\n shift\n ${CTAGS} --quiet --options=NONE --output-format=$format \"$@\" -o - input.*\n}\n\nexit_status_for_input_c()\n{\n\tlocal ctags=$1\n\tshift\n\n\tlocal remove_file=$1\n\tshift\n\n\tprintf \"%s => \" \"$(echo \"$*\" | sed -e 's#[^ ][^ ]*/\\([^ ]*\\)#\\1#g')\"\n\t${ctags} --quiet --options=NONE \"$@\" input.c > /dev/null\n\tlocal result_local=$?\n\n\tif [ \"$remove_file\" != \"none\" ]; then\n\t\trm -f \"$remove_file\"\n\tfi\n\n\tif [ \"$result_local\" = 0 ]; then\n\t\techo \"ok\"\n\telse\n\t\techo \"failed\"\n\tfi\n}\n\nget_column_index()\n{\n\tlocal index=0\n\tlocal ctags=$1\n\tlocal option=$2\n\tlocal column=$3\n\n\tfor x in $($ctags --quiet --options=NONE --with-list-header \"$option\" | sed -ne 's/^#\\(.*\\)$/\\1/p'); do\n\t\tif [ \"$x\" = \"$column\" ]; then\n\t\t\techo $index\n\t\t\treturn 0\n\t\tfi\n\t\tindex=$(expr $index + 1)\n\tdone\n\n\techo -1\n\treturn 1\n}\n\nfilter_by_column_index()\n{\n\tlocal index=$1\n\n\tawk '{print $'$(expr $index + 1)'}'\n}\n\necho2()\n{\n\t# use a external echo command here.\n\t# built-in echo suppresses \\1.\n\t/bin/echo \"$@\"\n\t/bin/echo \"$@\" 1>&2\n}\n\ndireq_maybe ()\n{\n [ \"$(cd ${1} && pwd)\" = \"$(cd ${2} && pwd)\" ]\n return $?\n}\n\ncheck_encoding()\n{\n if iconv -l 2> /dev/null | grep -qi \"$1\"; then\n\t\treturn 0\n\tfi\n\tskip \"iconv doesn't know about the encoding: $1\"\n}\n\njdropver()\n{\n\tsed -e 's/, \"version\": \"[0-9.]*\"//'\n}\n" }, { "path": "Tmain/version-option.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/version-option.d/run.sh", "content": "# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=\"$1\"\n\n$CTAGS --quiet --options=NONE --version=C\n" }, { "path": "Tmain/version-option.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/version-option.d/stdout-expected.txt", "content": "parser/C: 2.2\n" }, { "path": "Tmain/versioning.d/broken-extra.ctags", "content": "--langdef=TEST{version=10.9}\n--_extradef-TEST=fullname,extended full name{version=-4}\n" }, { "path": "Tmain/versioning.d/broken-field.ctags", "content": "--langdef=TEST{version=10.9}\n--_fielddef-TEST=param,parameters{version=-3}\n" }, { "path": "Tmain/versioning.d/broken-kind.ctags", "content": "--langdef=TEST{version=10.9}\n--kinddef-TEST=d,def,definitions{version=-1}\n" }, { "path": "Tmain/versioning.d/broken-role.ctags", "content": "--langdef=TEST{version=10.9}\n--kinddef-TEST=m,macro,macros{version=3}\n--_roledef-TEST.{macro}=expanded,expanded macros{version=-2}\n" }, { "path": "Tmain/versioning.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/versioning.d/run.sh", "content": "#!/bin/sh\n# Copyright: 2022 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --langdef=TEST'{version=a.9}' --version=TEST\n${CTAGS} --quiet --options=NONE --langdef=TEST'{version=10.b}' --version=TEST\n${CTAGS} --quiet --options=NONE --langdef=TEST'{version=-1.9}' --version=TEST\n${CTAGS} --quiet --options=NONE --langdef=TEST'{version=10.-3}' --version=TEST\n\n${CTAGS} --quiet --options=NONE --options=./test.ctags --version=TEST\n${CTAGS} --quiet --options=NONE --options=./test.ctags --list-kinds-full=TEST\n${CTAGS} --quiet --options=NONE --options=./test.ctags --list-roles=TEST\n${CTAGS} --quiet --options=NONE --options=./test.ctags --list-fields=TEST\n${CTAGS} --quiet --options=NONE --options=./test.ctags --list-extras=TEST\n${CTAGS} --quiet --options=NONE --options=./test.ctags --describe-language=TEST\n\n${CTAGS} --quiet --options=NONE --options=./broken-kind.ctags --_force-quit=0\necho broken kind: $? 1>&2\n${CTAGS} --quiet --options=NONE --options=./broken-role.ctags --_force-quit=0\necho broken role: $? 1>&2\n${CTAGS} --quiet --options=NONE --options=./broken-field.ctags --_force-quit=0\necho broken field: $? 1>&2\n${CTAGS} --quiet --options=NONE --options=./broken-extra.ctags --_force-quit=0\necho broken extra: $? 1>&2\n\n${CTAGS} --quiet --options=NONE --options=./warning-kind.ctags --_force-quit=0\necho warning kind: $? 1>&2\n${CTAGS} --quiet --options=NONE --options=./warning-role.ctags --_force-quit=0\necho warning role: $? 1>&2\n${CTAGS} --quiet --options=NONE --options=./warning-field.ctags --_force-quit=0\necho warning field: $? 1>&2\n${CTAGS} --quiet --options=NONE --options=./warning-extra.ctags --_force-quit=0\necho warning extra: $? 1>&2\n" }, { "path": "Tmain/versioning.d/stderr-expected.txt", "content": "ctags: Failed to parse the version number (the current part) for language \"TEST\": a.9\nctags: Failed to parse the version number (the age part) for language \"TEST\": 10.b\nctags: Failed to parse the version number (the current part) for language \"TEST\": -1.9\nctags: Failed to parse the version number (the age part) for language \"TEST\": 10.-3\nctags: Failed to parse the version number for kind \"def\": -1\nbroken kind: 1\nctags: Failed to parse the version number for role \"expanded\": -2\nbroken role: 1\nctags: Failed to parse the version number for field \"param\": -3\nbroken field: 1\nctags: Failed to parse the version number for extra \"fullname\": -4\nbroken extra: 1\nctags: Warning: the version number (11) of kind \"d,def\" of language \"TEST\" should be less than or equal to the current number (10) of the language\nwarning kind: 0\nctags: Warning: the version number (11) of role \"expanded\" of language \"TEST\" should be less than or equal to the current number (10) of the language\nwarning role: 0\nctags: Warning: the version number (11) of field \"param\" of language \"TEST\" should be less than or equal to the current number (10) of the language\nwarning field: 0\nctags: Warning: the version number (11) of extra \"fullname\" of language \"TEST\" should be less than or equal to the current number (10) of the language\nwarning extra: 0\n" }, { "path": "Tmain/versioning.d/stdout-expected.txt", "content": "parser/TEST: 10.9\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nd def yes no 0 NONE 6 definitions\nm macro yes no 2 NONE 3 macros\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nm/macro expanded on 4 expanded macros\nm/macro redef on 5 redefinied macros\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- local no TEST s-- no -- 6 used in narrow scopes\n- param no TEST s-- no -- 4 parameters\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- fullname no TEST no 9 extended full name\n- shortname no TEST no 10 the named only narow scopes\nAbout TEST language\n=======================================================\nenabled: yes\nversion: 10.9\n\nMappings/rexprs\n-------------------------------------------------------\n\n\nMappings/patterns\n-------------------------------------------------------\n MYTEST\n\nMappings/extensions\n-------------------------------------------------------\n *.mytest\n\nAliases\n-------------------------------------------------------\n#ALIAS\nmy-test\n\nKinds\n-------------------------------------------------------\n#LETTER NAME ENABLED REFONLY NROLES MASTER VER DESCRIPTION\nd def yes no 0 NONE 6 definitions\nm macro yes no 2 NONE 3 macros\n\nRoles\n-------------------------------------------------------\n#KIND(L/N) NAME ENABLED VER DESCRIPTION\nm/macro expanded on 4 expanded macros\nm/macro redef on 5 redefinied macros\n\nFields\n-------------------------------------------------------\n#LETTER NAME ENABLED LANGUAGE JSTYPE FIXED OP VER DESCRIPTION\n- local no TEST s-- no -- 6 used in narrow scopes\n- param no TEST s-- no -- 4 parameters\n\nExtras\n-------------------------------------------------------\n#LETTER NAME ENABLED LANGUAGE FIXED VER DESCRIPTION\n- fullname no TEST no 9 extended full name\n- shortname no TEST no 10 the named only narow scopes\n\nParameters\n-------------------------------------------------------\n#NAME DESCRIPTION\ndebug enable the debug features\n\nSub parsers stacked on this parser\n-------------------------------------------------------\n#NAME BASEPARSER DIRECTIONS\nEXAMINE TEST base => sub {shared}\n\nImplementation specific status\n-------------------------------------------------------\nallow null tags: no\n" }, { "path": "Tmain/versioning.d/test.ctags", "content": "--langdef=TEST{version=10.9}\n--map-TEST=+.mytest\n--map-TEST=+(MYTEST)\n--alias-TEST=+my-test\n\n--kinddef-TEST=d,def,definitions{version=6}\n--kinddef-TEST=m,macro,macros{version=3}\n--_roledef-TEST.{macro}=expanded,expanded macros{version=4}\n--_roledef-TEST.{macro}=redef,redefinied macros{version=5}\n\n--_fielddef-TEST=param,parameters{version=4}\n--_fielddef-TEST=local,used in narrow scopes{version=6}\n\n--_extradef-TEST=fullname,extended full name{version=9}\n--_extradef-TEST=shortname,the named only narow scopes{version=10}\n\n\n--_paramdef-TEST=debug,enable the debug features\n\n--langdef=EXAMINE{base=TEST}{shared}\n" }, { "path": "Tmain/versioning.d/warning-extra.ctags", "content": "--langdef=TEST{version=10.9}\n--_extradef-TEST=fullname,extended full name{version=11}\n" }, { "path": "Tmain/versioning.d/warning-field.ctags", "content": "--langdef=TEST{version=10.9}\n--_fielddef-TEST=param,parameters{version=11}\n" }, { "path": "Tmain/versioning.d/warning-kind.ctags", "content": "--langdef=TEST{version=10.9}\n--kinddef-TEST=d,def,definitions{version=11}\n" }, { "path": "Tmain/versioning.d/warning-role.ctags", "content": "--langdef=TEST{version=10.9}\n--kinddef-TEST=m,macro,macros{version=3}\n--_roledef-TEST.{macro}=expanded,expanded macros{version=11}\n" }, { "path": "Tmain/w32-slash-in-exclude-option.d/input.d/capture_me/input.c", "content": "int capture_me_1(void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/w32-slash-in-exclude-option.d/input.d/dont_capture_me/input.c", "content": "int dont_capture_me(void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/w32-slash-in-exclude-option.d/input.d/input.c", "content": "int capture_me_0(void)\n{\n\treturn 0;\n}\n" }, { "path": "Tmain/w32-slash-in-exclude-option.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nexit_unless_win32 \"$CTAGS\"\n\nMSYS2_ARG_CONV_EXCL=dont_capture_me/input.c ${CTAGS} --quiet --options=NONE -R -o - \\\n\t\t --exclude='input.d/dont_capture_me/input.c' input.d\n" }, { "path": "Tmain/w32-slash-in-exclude-option.d/stdout-expected.txt", "content": "capture_me_0\tinput.d/input.c\t/^int capture_me_0(void)$/;\"\tf\ttyperef:typename:int\ncapture_me_1\tinput.d/capture_me/input.c\t/^int capture_me_1(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/exit-expected.txt", "content": "0\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/garbage.ctags", "content": "--langdef=Garbage\n--map-Garbage=.garbage\n\n--regex-Garbage=/a//{{\n /garbage0\n (garbage1)\n}}\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/input.garbage", "content": "a\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/input.kconfig", "content": "config BCH_CONST_M\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/run.sh", "content": "# Copyright: 2025 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n$CTAGS --quiet --options=NONE --options=./garbage.ctags -o - input.garbage\n\n$CTAGS --quiet --options=NONE --map-Kconfig=+.kconfig -o - input.kconfig > /dev/null\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/stderr-expected.txt", "content": "ctags: Warning: [Garbage] 2 objects are left on the operand stack: input.garbage\n" }, { "path": "Tmain/warn-garbage-on-ostack.d/stdout-expected.txt", "content": "" }, { "path": "Tmain/warn-reusing-kind-letter.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE \\\n\t --langdef=X \\\n\t --regex-X='/./\\0/a,anyobject/' \\\n\t --regex-X='/./\\0/a,anyitem/' \\\n\t --langdef=Y \\\n\t --regex-Y='/./\\0/b,any' \\\n\t --regex-Y='/./\\0/b,any' \\\n\t --_force-quit=0 2>&1 | sed -e 's/.*ctags\\(.exe\\)\\{0,1\\}: //'\n" }, { "path": "Tmain/warn-reusing-kind-letter.d/stdout-expected.txt", "content": "Warning: Don't reuse the kind letter `a' in a language X (old: \"anyobject\", new: \"anyitem\")\n" }, { "path": "Tmain/wildcard-in-lang-of-fields-option.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE \\\n\t\t -o - --fields-all=+{signature}-{typeref} --list-fields | grep 'signature\\|typeref'\n" }, { "path": "Tmain/wildcard-in-lang-of-fields-option.d/stdout-expected.txt", "content": "S signature yes NONE s-- no rw 0 Signature of routine (e.g. prototype or parameter list)\nt typeref no NONE s-- no rw 0 Type and name of a variable or typedef\n" }, { "path": "Tmain/wrong-parser-name-in-field.d/exit-expected.txt", "content": "1\n" }, { "path": "Tmain/wrong-parser-name-in-field.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --fields-Cxx=+{end} --list-fields=Cxx\nexit $?\n" }, { "path": "Tmain/wrong-parser-name-in-field.d/stderr-expected.txt", "content": "ctags: Warning: Unknown language: Cxx (ignoring \"--fields-Cxx\")\nctags: Unknown language \"Cxx\" in \"list-fields\" option\n" }, { "path": "Tmain/xref-output-common-fields.d/input.py", "content": "class Foo:\n def doIt():\n pass\n" }, { "path": "Tmain/xref-output-common-fields.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n${CTAGS} --quiet --options=NONE --list-fields | while read K REST; do\n if ! [ \"$K\" = '-' ]; then\n\techo \"field: $K\"\n\t${CTAGS} --quiet --options=NONE -x --_xformat=\"output: %N %${K}\" -o - input.py\n\techo \"status: $?\"\n\techo\n fi\ndone\n" }, { "path": "Tmain/xref-output-common-fields.d/stdout-expected.txt", "content": "field: #LETTER\nstatus: 1\n\nfield: N\noutput: Foo Foo\noutput: doIt doIt\nstatus: 0\n\nfield: F\noutput: Foo input.py\noutput: doIt input.py\nstatus: 0\n\nfield: P\noutput: Foo /^class Foo:$/\noutput: doIt /^ def doIt():$/\nstatus: 0\n\nfield: C\noutput: Foo class Foo:\noutput: doIt def doIt():\nstatus: 0\n\nfield: E\noutput: Foo \noutput: doIt \nstatus: 0\n\nfield: K\noutput: Foo class\noutput: doIt member\nstatus: 0\n\nfield: R\noutput: Foo D\noutput: doIt D\nstatus: 0\n\nfield: S\noutput: Foo -\noutput: doIt ()\nstatus: 0\n\nfield: T\noutput: Foo 0\noutput: doIt 0\nstatus: 0\n\nfield: Z\noutput: Foo \noutput: doIt Foo\nstatus: 0\n\nfield: a\noutput: Foo public\noutput: doIt public\nstatus: 0\n\nfield: e\noutput: Foo 3\noutput: doIt 3\nstatus: 0\n\nfield: f\noutput: Foo -\noutput: doIt -\nstatus: 0\n\nfield: i\noutput: Foo \noutput: doIt -\nstatus: 0\n\nfield: k\noutput: Foo c\noutput: doIt m\nstatus: 0\n\nfield: l\noutput: Foo Python\noutput: doIt Python\nstatus: 0\n\nfield: m\noutput: Foo -\noutput: doIt -\nstatus: 0\n\nfield: n\noutput: Foo 1\noutput: doIt 2\nstatus: 0\n\nfield: o\noutput: Foo \noutput: doIt \nstatus: 0\n\nfield: p\noutput: Foo \noutput: doIt class\nstatus: 0\n\nfield: r\noutput: Foo def\noutput: doIt def\nstatus: 0\n\nfield: s\noutput: Foo \noutput: doIt Foo\nstatus: 0\n\nfield: t\noutput: Foo -\noutput: doIt -\nstatus: 0\n\nfield: x\noutput: Foo \noutput: doIt \nstatus: 0\n\nfield: z\noutput: Foo class\noutput: doIt member\nstatus: 0\n\n" }, { "path": "Tmain/xref-output-formatting-parser-specific-field.d/input.rst", "content": "Top level\n==============\n\nsubsection\n--------------\n" }, { "path": "Tmain/xref-output-formatting-parser-specific-field.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho \"#\"\necho \"# JUST LONG NAME\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{sectionMarker}\" \\\n\t input.rst\n\necho \"#\"\necho \"# LANG, LONG NAME\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{reStructuredText.sectionMarker}\" \\\n\t input.rst\n\necho \"#\"\necho \"# WILDCARD, LONG NAME\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{*.sectionMarker}\" \\\n\t input.rst\n\necho \"#\"\necho \"# WRONG LANGUAGE\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{NOSUCHLANG.sectionMarker}\" \\\n\t input.rst\n\necho \"#\"\necho \"# WRONG FIELD\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{NOSUCHFIELD}\" \\\n\t input.rst\n\necho \"#\"\necho \"# ENABLING COMMON FIELD BY SPECIFYING WILDCARD\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{*.language}\" \\\n\t input.rst\n\necho \"#\"\necho \"# LIST: ENABLING COMMON FIELD BY SPECIFYING WILDCARD\"\necho \"#\"\n${CTAGS} --quiet --options=NONE \\\n\t -x \\\n\t --_xformat=\"%10N %10{*.language}\" \\\n\t --list-fields | grep -v NSIS | grep language\n\n\nexit $?\n" }, { "path": "Tmain/xref-output-formatting-parser-specific-field.d/stderr-expected.txt", "content": "ctags: No such field name: sectionMarker\nctags: No suitable parser for field name: NOSUCHLANG.sectionMarker\nctags: No such field name: NOSUCHFIELD\n" }, { "path": "Tmain/xref-output-formatting-parser-specific-field.d/stdout-expected.txt", "content": "#\n# JUST LONG NAME\n#\n#\n# LANG, LONG NAME\n#\n Top level =\nsubsection -\n#\n# WILDCARD, LONG NAME\n#\n Top level =\nsubsection -\n#\n# WRONG LANGUAGE\n#\n#\n# WRONG FIELD\n#\n#\n# ENABLING COMMON FIELD BY SPECIFYING WILDCARD\n#\n Top level ReStructuredText\nsubsection ReStructuredText\n#\n# LIST: ENABLING COMMON FIELD BY SPECIFYING WILDCARD\n#\nl language yes NONE s-- no r- 0 Language of input file containing tag\n- target yes Thrift s-- no -- 0 the target language specified at \"namespace\"\n" }, { "path": "Tmain/xref-output-ptag-in-list-extras.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\nO=/tmp/ctags-tmain-$$\n\necho '#' tags regular file\n\"${CTAGS}\" --options=NONE --output-format=u-ctags -o $O --list-extras | grep pseudo\n\necho '#' tags -\n\"${CTAGS}\" --options=NONE --output-format=u-ctags -o - --list-extras | grep pseudo\n\necho '#' tags NOTHING\n\"${CTAGS}\" --options=NONE --output-format=u-ctags --list-extras | grep pseudo\n\necho '#' xref regular file\n\"${CTAGS}\" --options=NONE --output-format=xref -o $O --list-extras | grep pseudo\n\necho '#' xref -\n\"${CTAGS}\" --options=NONE --output-format=xref -o - --list-extras | grep pseudo\n\necho '#' xref NOTHING\n\"${CTAGS}\" --options=NONE --output-format=xref --list-extras | grep pseudo\n\nrm -f $O\n" }, { "path": "Tmain/xref-output-ptag-in-list-extras.d/stdout-expected.txt", "content": "# tags regular file\np pseudo yes NONE no 0 Include pseudo tags\n# tags -\np pseudo no NONE no 0 Include pseudo tags\n# tags NOTHING\np pseudo yes NONE no 0 Include pseudo tags\n# xref regular file\np pseudo no NONE no 0 Include pseudo tags\n# xref -\np pseudo no NONE no 0 Include pseudo tags\n# xref NOTHING\np pseudo no NONE no 0 Include pseudo tags\n" }, { "path": "Tmain/xref-output-to-file.d/input.c", "content": "#include \n\nstatic int foo (void)\n{\n return 1;\n}\n\nint\nmain(void)\n{\n return foo();\n}\n" }, { "path": "Tmain/xref-output-to-file.d/run.sh", "content": "# Copyright: 2017 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\n. ../utils.sh\n\nO=/tmp/ctags-tmain-$$.xref\n$CTAGS --quiet --options=NONE --output-format=xref -f ${O} input.c > /dev/null && cat ${O}\ns=$?\n\nrm -f ${O}\n\nexit $s\n" }, { "path": "Tmain/xref-output-to-file.d/stdout-expected.txt", "content": "foo function 3 input.c static int foo (void)\nmain function 9 input.c main(void)\n" }, { "path": "Tmain/xref-output-typed-fields.d/input.c", "content": "static int local;\nint global;\n" }, { "path": "Tmain/xref-output-typed-fields.d/input.ctst", "content": "f\n" }, { "path": "Tmain/xref-output-typed-fields.d/input.rst", "content": "==============================================\nTITLE\n==============================================\n\nsection\n.......\n" }, { "path": "Tmain/xref-output-typed-fields.d/run.sh", "content": "# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\nCTAGS=$1\n\necho '# input.ctst'\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --output-format=xref --_xformat='%{name} -> b=%{CTagsSelfTest.bField},sb=%{CTagsSelfTest.sbField},s=%{CTagsSelfTest.sField},i=%{CTagsSelfTest.iField}' \\\n\t\t --language-force=CTagsSelfTest input.ctst\n\necho '# input.rst'\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --output-format=xref --_xformat='%{name} -> %{RestructuredText.overline}' \\\n\t\t input.rst\n\necho '# input.c'\n${CTAGS} --quiet --options=NONE -o - \\\n\t\t --output-format=xref --_xformat='%{name} -> %{file}' \\\n\t\t input.c\n" }, { "path": "Tmain/xref-output-typed-fields.d/stderr-expected.txt", "content": "" }, { "path": "Tmain/xref-output-typed-fields.d/stdout-expected.txt", "content": "# input.ctst\natag -> b=-,sb=,s=,i=\nbtag -> b=bField,sb=,s=,i=\nctag -> b=bField,sb=,s=,i=\ndtag -> b=-,sb=val,s=,i=\netag -> b=-,sb=-,s=,i=\nftag -> b=-,sb=,s=val,i=\ngtag -> b=-,sb=,s=,i=\nhtag -> b=-,sb=,s=,i=23\nitag -> b=-,sb=,s=,i=-3\njtag -> b=-,sb=,s=,i=1\nktag -> b=-,sb=,s=,i=0\n# input.rst\nTITLE -> overline\nsection -> -\n# input.c\nglobal -> -\nlocal -> file\n" }, { "path": "Units/afl-fuzz.r/github-issue-528-sml.d/expected.tags", "content": "" }, { "path": "Units/afl-fuzz.r/github-issue-528-sml.d/input.sml", "content": "and" }, { "path": "Units/afl-fuzz.r/github-issue-529-bas.d/input.bas", "content": ":\t:\n" }, { "path": "Units/afl-fuzz.r/github-issue-530-css.d/input.css", "content": "0[\"\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-531-make.d/input.mk", "content": "define\t0\n" }, { "path": "Units/afl-fuzz.r/github-issue-532-vim.d/input.vim", "content": "vn\t0\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-536-flex.d/input.as", "content": "0'\t'={0:0\n" }, { "path": "Units/afl-fuzz.r/github-issue-537-beta.d/input.bet", "content": "--0\t0:--\n" }, { "path": "Units/afl-fuzz.r/github-issue-538-sql.d/input.sql", "content": "cursor '\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-539-js.d/input.js", "content": "let`\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-540-fortran.d/input.f", "content": "type;generic\"\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-541-json.d/input.json", "content": "{\"\\\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-542-vhdl.d/input.vhdl", "content": "constant\"\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-543-eiffel.d/input.e", "content": "class feature d alias\"\t\n" }, { "path": "Units/afl-fuzz.r/github-issue-625-r.d/input.r", "content": "0<-\n" }, { "path": "Units/afl-fuzz.r/github-issue-627-perl.d/input.pl", "content": "use constant{,=>\n\n" }, { "path": "Units/afl-fuzz.r/github-issue-628-vera.d/input.vr", "content": "typedef interface c e;\n" }, { "path": "Units/csharp-review-needed.r/array_ref_and_out.cs.t/expected.tags", "content": "FillArray\tinput.cs\t/^ static public void FillArray(out int[] myArray) $/;\"\tm\tclass:TestOut\nMain\tinput.cs\t/^ static public void Main() $/;\"\tm\tclass:TestOut\nMyMethod\tinput.cs\t/^public static void MyMethod(out int[] arr) $/;\"\tm\nMyMethod\tinput.cs\t/^public static void MyMethod(ref int[] arr) $/;\"\tm\nTestOut\tinput.cs\t/^class TestOut $/;\"\tc\n" }, { "path": "Units/csharp-review-needed.r/array_ref_and_out.cs.t/input.cs", "content": "// Programmer's Reference: Passing Array Using ref and out\npublic static void MyMethod(out int[] arr) \n{\n arr = new int[10]; // definite assignment of arr\n}\n\npublic static void MyMethod(ref int[] arr) \n{\n arr = new int[10]; // arr initialized to a different array\n}\n\nusing System; \nclass TestOut \n{\n static public void FillArray(out int[] myArray) \n {\n // Initialize the array:\n myArray = new int[5] {1, 2, 3, 4, 5};\n }\n\n static public void Main() \n {\n int[] myArray; // Initialization is not required\n\n // Pass the array to the callee using out:\n FillArray(out myArray);\n\n // Display the array elements:\n Console.WriteLine(\"Array elements are:\");\n for (int i=0; i < myArray.Length; i++)\n Console.WriteLine(myArray[i]);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/attributes.cs.t/expected.tags", "content": "Author\tinput.cs\t/^ public Author(string name) { this.name = name; version = 1.0; }$/;\"\tm\tclass:Author\nAuthor\tinput.cs\t/^public class Author : Attribute$/;\"\tc\nMyDllimportClass\tinput.cs\t/^[DllImport] public class MyDllimportClass {}$/;\"\tc\nTraceMethod\tinput.cs\t/^[Conditional(\"DEBUG\"), Conditional(\"TEST1\")] void TraceMethod() {}$/;\"\tm\nname\tinput.cs\t/^ string name;$/;\"\tf\tclass:Author\tfile:\nversion\tinput.cs\t/^ public double version;$/;\"\tf\tclass:Author\n" }, { "path": "Units/csharp-review-needed.r/attributes.cs.t/input.cs", "content": "[DllImport] public class MyDllimportClass {}\n\n[DllImport(\"user32.dll\", SetLastError=false, ExactSpelling=false)]\n[DllImport(\"user32.dll\", ExactSpelling=false, SetLastError=false)]\n[DllImport(\"user32.dll\")]\n\n[Conditional(\"DEBUG\"), Conditional(\"TEST1\")] void TraceMethod() {}\n\nusing System;\n[AttributeUsage(AttributeTargets.Class|AttributeTargets.Struct)]\npublic class Author : Attribute\n{\n public Author(string name) { this.name = name; version = 1.0; }\n public double version;\n string name;\n}\n\n[AttributeUsage(AttributeTargets.Class|AttributeTargets.Struct,\n AllowMultiple=true)] // multiuse attribute\npublic class Author : Attribute\n{\n}\n" }, { "path": "Units/csharp-review-needed.r/bug1515910.cs.t/expected.tags", "content": "C\tinput.cs\t/^public class C {$/;\"\tc\nEnum1\tinput.cs\t/^enum Enum1 : byte {$/;\"\tg\nMyGenericClass1\tinput.cs\t/^public class MyGenericClass1 { }$/;\"\tc\nValue1\tinput.cs\t/^\tValue1, Values$/;\"\te\tenum:Enum1\tfile:\nValues\tinput.cs\t/^\tValue1, Values$/;\"\te\tenum:Enum1\tfile:\nint1\tinput.cs\t/^ private int int1 = 123;$/;\"\tf\tclass:C\tfile:\nstr1\tinput.cs\t/^ private string str1 = @\"abc\\\\\";$/;\"\tf\tclass:C\tfile:\nstr2\tinput.cs\t/^ private string str2 = @\"abc\\\\\";$/;\"\tf\tclass:C\tfile:\nstr3\tinput.cs\t/^ private string str3 = \"abc\";$/;\"\tf\tclass:C\tfile:\n" }, { "path": "Units/csharp-review-needed.r/bug1515910.cs.t/input.cs", "content": "// Simple generic classes.\npublic class MyGenericClass1 { }\n\n// Derived enums.\nenum Enum1 : byte {\n\tValue1, Values\n}\n\n// Verbatim strings.\npublic class C {\n private string str1 = @\"abc\\\";\n private int int1 = 123;\n private string str2 = @\"abc\\\";\n private string str3 = \"abc\";\n}\n" }, { "path": "Units/csharp-review-needed.r/bug1611054.cs.t/expected.tags", "content": "C\tinput.cs\t/^class C {$/;\"\tc\na\tinput.cs\t/^\tpublic String a() {$/;\"\tm\tclass:C\nb\tinput.cs\t/^\tpublic void b() {$/;\"\tm\tclass:C\n" }, { "path": "Units/csharp-review-needed.r/bug1611054.cs.t/input.cs", "content": "class C {\n\tpublic String a() {\n\t\treturn @\"c:\\\";\n\t}\n\t// this tag is missing in ctags 5.6\n\tpublic void b() {\n\t}\n}\n" }, { "path": "Units/csharp-review-needed.r/bug1800065.cs.t/expected.tags", "content": "C\tinput.cs\t/^public class C {$/;\"\tc\ntitle\tinput.cs\t/^ private string title;$/;\"\tf\tclass:C\tfile:\nwindow\tinput.cs\t/^ private Gtk.Window window;$/;\"\tf\tclass:C\tfile:\n" }, { "path": "Units/csharp-review-needed.r/bug1800065.cs.t/input.cs", "content": "using Gtk;\npublic class C {\n private Gtk.Window window;\n private string title;\n}\n" }, { "path": "Units/csharp-review-needed.r/bug1830343.cs.t/expected.tags", "content": "ForEachTest\tinput.cs\t/^class ForEachTest {$/;\"\tc\nMain\tinput.cs\t/^\tstatic void Main(string[] args) {$/;\"\tm\tclass:ForEachTest\tfile:\n" }, { "path": "Units/csharp-review-needed.r/bug1830343.cs.t/input.cs", "content": "class ForEachTest {\n\tstatic void Main(string[] args) {\n\t\tint[] fibarray = new int[] { 0, 1, 2, 3, 5, 8, 13 };\n\t\tforeach (int i in fibarray) {\n\t\t\tSystem.Console.WriteLine(i);\n\t\t}\n\t}\n}\n" }, { "path": "Units/csharp-review-needed.r/bug1830344.cs.t/expected.tags", "content": "C\tinput.cs\t/^public class C {$/;\"\tc\nm\tinput.cs\t/^\tpublic void m() {$/;\"\tm\tclass:C\n" }, { "path": "Units/csharp-review-needed.r/bug1830344.cs.t/input.cs", "content": "public class C {\n\tpublic void m() {\n\t\tbool flagCheck = true;\n\t\tif (flagCheck == true) {\n\t\t\tConsole.WriteLine(\"true\");\n\t\t} else {\n\t\t\tConsole.WriteLine(\"false\");\n\t\t}\n\t}\n}\n" }, { "path": "Units/csharp-review-needed.r/bug2411878.cs.t/expected.tags", "content": "C\tinput.cs\t/^public class C {$/;\"\tc\nm_name\tinput.cs\t/^ private System.String m_name;$/;\"\tf\tclass:C\tfile:\n" }, { "path": "Units/csharp-review-needed.r/bug2411878.cs.t/input.cs", "content": "public class C {\n private System.String m_name;\n}\n" }, { "path": "Units/csharp-review-needed.r/events.cs.t/expected.tags", "content": "Add\tinput.cs\t/^ public override int Add(object value) $/;\"\tm\tclass:MyCollections.ListWithChangedEvent\nChanged\tinput.cs\t/^ public event ChangedEventHandler Changed;$/;\"\tE\tclass:MyCollections.ListWithChangedEvent\nChanged\tinput.cs\t/^ public event EventHandler Changed;$/;\"\tE\tclass:MyCollections.ListWithChangedEvent\nChangedEventHandler\tinput.cs\t/^ public delegate void ChangedEventHandler(object sender, EventArgs e);$/;\"\tm\tnamespace:MyCollections\nClear\tinput.cs\t/^ public override void Clear() $/;\"\tm\tclass:MyCollections.ListWithChangedEvent\nDetach\tinput.cs\t/^ public void Detach() $/;\"\tm\tclass:TestEvents.EventListener\nEventListener\tinput.cs\t/^ public EventListener(ListWithChangedEvent list) $/;\"\tm\tclass:TestEvents.EventListener\nEventListener\tinput.cs\t/^ class EventListener $/;\"\tc\tnamespace:TestEvents\nList\tinput.cs\t/^ private ListWithChangedEvent List;$/;\"\tf\tclass:TestEvents.EventListener\tfile:\nListChanged\tinput.cs\t/^ private void ListChanged(object sender, EventArgs e) $/;\"\tm\tclass:TestEvents.EventListener\tfile:\nListWithChangedEvent\tinput.cs\t/^ public class ListWithChangedEvent: ArrayList $/;\"\tc\tnamespace:MyCollections\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:TestEvents.Test\nMyCollections\tinput.cs\t/^namespace MyCollections $/;\"\tn\nOnChanged\tinput.cs\t/^ protected virtual void OnChanged(EventArgs e) $/;\"\tm\tclass:MyCollections.ListWithChangedEvent\nTest\tinput.cs\t/^ class Test $/;\"\tc\tnamespace:TestEvents\nTestEvents\tinput.cs\t/^namespace TestEvents $/;\"\tn\n" }, { "path": "Units/csharp-review-needed.r/events.cs.t/input.cs", "content": "// events1.cs\nusing System;\nnamespace MyCollections \n{\n using System.Collections;\n\n // A delegate type for hooking up change notifications.\n public delegate void ChangedEventHandler(object sender, EventArgs e);\n\n // A class that works just like ArrayList, but sends event\n // notifications whenever the list changes.\n public class ListWithChangedEvent: ArrayList \n {\n // An event that clients can use to be notified whenever the\n // elements of the list change.\n public event ChangedEventHandler Changed;\n\n // Invoke the Changed event; called whenever list changes\n protected virtual void OnChanged(EventArgs e) \n {\n if (Changed != null)\n Changed(this, e);\n }\n\n // Override some of the methods that can change the list;\n // invoke event after each\n public override int Add(object value) \n {\n int i = base.Add(value);\n OnChanged(EventArgs.Empty);\n return i;\n }\n\n public override void Clear() \n {\n base.Clear();\n OnChanged(EventArgs.Empty);\n }\n\n public override object this[int index] \n {\n set \n {\n base[index] = value;\n OnChanged(EventArgs.Empty);\n }\n }\n }\n}\n\nnamespace TestEvents \n{\n using MyCollections;\n\n class EventListener \n {\n private ListWithChangedEvent List;\n\n public EventListener(ListWithChangedEvent list) \n {\n List = list;\n // Add \"ListChanged\" to the Changed event on \"List\".\n List.Changed += new ChangedEventHandler(ListChanged);\n }\n\n // This will be called whenever the list changes.\n private void ListChanged(object sender, EventArgs e) \n {\n Console.WriteLine(\"This is called when the event fires.\");\n }\n\n public void Detach() \n {\n // Detach the event and delete the list\n List.Changed -= new ChangedEventHandler(ListChanged);\n List = null;\n }\n }\n\n class Test \n {\n // Test the ListWithChangedEvent class.\n public static void Main() \n {\n // Create a new list.\n ListWithChangedEvent list = new ListWithChangedEvent();\n\n // Create a class that listens to the list's change event.\n EventListener listener = new EventListener(list);\n\n // Add and remove items from the list.\n list.Add(\"item 1\");\n list.Clear();\n listener.Detach();\n }\n }\n}\n\n// events2.cs\nusing System;\nnamespace MyCollections \n{\n using System.Collections;\n\n // A class that works just like ArrayList, but sends event\n // notifications whenever the list changes:\n public class ListWithChangedEvent: ArrayList \n {\n // An event that clients can use to be notified whenever the\n // elements of the list change:\n public event EventHandler Changed;\n\n // Invoke the Changed event; called whenever list changes:\n protected virtual void OnChanged(EventArgs e) \n {\n if (Changed != null)\n Changed(this,e);\n }\n\n // Override some of the methods that can change the list;\n // invoke event after each:\n public override int Add(object value) \n {\n int i = base.Add(value);\n OnChanged(EventArgs.Empty);\n return i;\n }\n\n public override void Clear() \n {\n base.Clear();\n OnChanged(EventArgs.Empty);\n }\n\n public override object this[int index] \n {\n set \n {\n base[index] = value;\n OnChanged(EventArgs.Empty);\n }\n }\n }\n}\n\nnamespace TestEvents \n{\n using MyCollections;\n\n class EventListener \n {\n private ListWithChangedEvent List;\n\n public EventListener(ListWithChangedEvent list) \n {\n List = list;\n // Add \"ListChanged\" to the Changed event on \"List\":\n List.Changed += new EventHandler(ListChanged);\n }\n\n // This will be called whenever the list changes:\n private void ListChanged(object sender, EventArgs e) \n {\n Console.WriteLine(\"This is called when the event fires.\");\n }\n\n public void Detach() \n {\n // Detach the event and delete the list:\n List.Changed -= new EventHandler(ListChanged);\n List = null;\n }\n }\n\n class Test \n {\n // Test the ListWithChangedEvent class:\n public static void Main() \n {\n // Create a new list:\n ListWithChangedEvent list = new ListWithChangedEvent();\n\n // Create a class that listens to the list's change event:\n EventListener listener = new EventListener(list);\n\n // Add and remove items from the list:\n list.Add(\"item 1\");\n list.Clear();\n listener.Detach();\n }\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/general.cs.t/expected.tags", "content": "C1\tinput.cs\t/^ class C1 \\/\\/ N1.C1$/;\"\tc\tnamespace:N1\nC2\tinput.cs\t/^ class C2 \\/\\/ N1.C1.C2$/;\"\tc\tclass:N1.C1\nC2\tinput.cs\t/^ class C2 \\/\\/ N1.N2.C2$/;\"\tc\tnamespace:N1.N2\nIMyInterface\tinput.cs\t/^ interface IMyInterface $/;\"\ti\tnamespace:MyNamespace1\nMain\tinput.cs\t/^ public static void Main(string[] args) $/;\"\tm\tclass:MyNamespace1.MyClass2\nMyClass1\tinput.cs\t/^ class MyClass1 $/;\"\tc\tnamespace:MyNamespace1\nMyClass2\tinput.cs\t/^ class MyClass2 $/;\"\tc\tnamespace:MyNamespace1\nMyDelegate\tinput.cs\t/^ delegate int MyDelegate();$/;\"\tm\tnamespace:MyNamespace1\nMyEnum\tinput.cs\t/^ enum MyEnum $/;\"\tg\tnamespace:MyNamespace1\nMyNamespace1\tinput.cs\t/^namespace MyNamespace1 $/;\"\tn\nMyNamespace2\tinput.cs\t/^ namespace MyNamespace2 $/;\"\tn\tnamespace:MyNamespace1\nMyStruct\tinput.cs\t/^ struct MyStruct $/;\"\ts\tnamespace:MyNamespace1\nN1\tinput.cs\t/^namespace N1 \\/\\/ N1$/;\"\tn\nN2\tinput.cs\t/^ namespace N2 \\/\\/ N1.N2$/;\"\tn\tnamespace:N1\n" }, { "path": "Units/csharp-review-needed.r/general.cs.t/input.cs", "content": "// General Structure of a C# Program\n// A skeleton of a C# program \nusing System;\nnamespace MyNamespace1 \n{\n class MyClass1 \n {\n }\n struct MyStruct \n {\n }\n interface IMyInterface \n {\n }\n delegate int MyDelegate();\n enum MyEnum \n {\n } \n namespace MyNamespace2 \n {\n }\n class MyClass2 \n {\n public static void Main(string[] args) \n {\n }\n }\n}\n\n\n// Using Fully Qualified Names\nnamespace N1 // N1\n{\n class C1 // N1.C1\n {\n class C2 // N1.C1.C2\n {\n }\n }\n namespace N2 // N1.N2\n {\n class C2 // N1.N2.C2\n {\n }\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/indexer.cs.t/expected.tags", "content": "IndexerClass\tinput.cs\t/^class IndexerClass $/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass $/;\"\tc\nmyArray\tinput.cs\t/^ private int [] myArray = new int[100]; $/;\"\tf\tclass:IndexerClass\tfile:\n" }, { "path": "Units/csharp-review-needed.r/indexer.cs.t/input.cs", "content": "// cs_keyword_indexers.cs\nusing System;\nclass IndexerClass \n{\n private int [] myArray = new int[100]; \n public int this [int index] // indexer declaration\n {\n get \n {\n // Check the index limits\n if (index < 0 || index >= 100)\n return 0;\n else\n return myArray[index];\n }\n set \n {\n if (!(index < 0 || index >= 100))\n myArray[index] = value;\n }\n }\n}\n\npublic class MainClass \n{\n public static void Main() \n {\n IndexerClass b = new IndexerClass();\n // call the indexer to initialize the elements #3 and #5:\n b[3] = 256;\n b[5] = 1024;\n for (int i=0; i<=10; i++) \n {\n Console.WriteLine(\"Element #{0} = {1}\", i, b[i]);\n }\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/interface_indexers.cs.t/expected.tags", "content": "IMyInterface\tinput.cs\t/^public interface IMyInterface $/;\"\ti\nIndexerClass\tinput.cs\t/^class IndexerClass : IMyInterface$/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass $/;\"\tc\nmyArray\tinput.cs\t/^ private int [] myArray = new int[100]; $/;\"\tf\tclass:IndexerClass\tfile:\n" }, { "path": "Units/csharp-review-needed.r/interface_indexers.cs.t/input.cs", "content": "// cs_interface_indexers.cs\nusing System;\n// Indexer on an interface:\npublic interface IMyInterface \n{\n // indexer declaration:\n int this[int index] \n {\n get; \n set; \n }\n}\n\n// Implementing the interface:\nclass IndexerClass : IMyInterface\n{\n private int [] myArray = new int[100]; \n public int this [int index] // indexer declaration\n {\n get \n {\n // Check the index limits\n if (index < 0 || index >= 100)\n return 0;\n else\n return myArray[index];\n }\n set \n {\n if (!(index < 0 || index >= 100))\n myArray[index] = value;\n }\n }\n}\n\npublic class MainClass \n{\n public static void Main() \n {\n IndexerClass b = new IndexerClass();\n // call the indexer to initialize the elements #3 and #5:\n b[2] = 4;\n b[5] = 32;\n for (int i=0; i<=10; i++) \n {\n Console.WriteLine(\"Element #{0} = {1}\", i, b[i]);\n }\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/interface_properties.cs.t/expected.tags", "content": "Counter\tinput.cs\t/^ int Counter $/;\"\tp\tinterface:IEmployee\nCounter\tinput.cs\t/^ public int Counter $/;\"\tp\tclass:Employee\nEmployee\tinput.cs\t/^ public Employee() $/;\"\tm\tclass:Employee\nEmployee\tinput.cs\t/^public class Employee: IEmployee $/;\"\tc\nIEmployee\tinput.cs\t/^interface IEmployee $/;\"\ti\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass $/;\"\tc\nName\tinput.cs\t/^ public string Name $/;\"\tp\tclass:Employee\nName\tinput.cs\t/^ string Name $/;\"\tp\tinterface:IEmployee\ncounter\tinput.cs\t/^ private int counter;$/;\"\tf\tclass:Employee\tfile:\nname\tinput.cs\t/^ private string name;$/;\"\tf\tclass:Employee\tfile:\nnumberOfEmployees\tinput.cs\t/^ public static int numberOfEmployees;$/;\"\tf\tclass:Employee\n" }, { "path": "Units/csharp-review-needed.r/interface_properties.cs.t/input.cs", "content": "// cs_interface_properties.cs\n// Interface Properties\nusing System;\ninterface IEmployee \n{\n string Name \n {\n get;\n set;\n }\n\n int Counter \n {\n get;\n }\n}\n\npublic class Employee: IEmployee \n{\n public static int numberOfEmployees;\n private int counter;\n private string name;\n // Read-write instance property:\n public string Name \n {\n get \n {\n return name; \n }\n set \n {\n name = value; \n }\n }\n // Read-only instance property:\n public int Counter \n {\n get \n {\n return counter; \n }\n }\n // Constructor:\n public Employee() \n {\n counter = ++counter + numberOfEmployees;\n }\n}\n\npublic class MainClass \n{\n public static void Main() \n {\n Console.Write(\"Enter number of employees: \");\n string s = Console.ReadLine();\n Employee.numberOfEmployees = int.Parse(s);\n Employee e1 = new Employee();\n Console.Write(\"Enter the name of the new employee: \");\n e1.Name = Console.ReadLine(); \n Console.WriteLine(\"The employee information:\");\n Console.WriteLine(\"Employee number: {0}\", e1.Counter);\n Console.WriteLine(\"Employee name: {0}\", e1.Name);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/internal.cs.t/expected.tags", "content": "BaseClass\tinput.cs\t/^internal class BaseClass $/;\"\tc\nIntM\tinput.cs\t/^ public static int IntM = 0;$/;\"\tf\tclass:BaseClass\n" }, { "path": "Units/csharp-review-needed.r/internal.cs.t/input.cs", "content": "// Assembly1.cs\n// compile with: /target:library\ninternal class BaseClass \n{\n public static int IntM = 0;\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_abstract.cs.t/expected.tags", "content": "GetX\tinput.cs\t/^ public abstract int GetX \\/\\/ Abstract property$/;\"\tp\tclass:MyBaseC\nGetX\tinput.cs\t/^ public override int GetX \\/\\/ overriding property$/;\"\tp\tclass:MyDerivedC\nGetY\tinput.cs\t/^ public abstract int GetY \\/\\/ Abstract property$/;\"\tp\tclass:MyBaseC\nGetY\tinput.cs\t/^ public override int GetY \\/\\/ overriding property$/;\"\tp\tclass:MyDerivedC\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyDerivedC\nMyBaseC\tinput.cs\t/^abstract class MyBaseC \\/\\/ Abstract class$/;\"\tc\nMyDerivedC\tinput.cs\t/^class MyDerivedC: MyBaseC$/;\"\tc\nMyMethod\tinput.cs\t/^ public abstract void MyMethod(); \\/\\/ Abstract method$/;\"\tm\tclass:MyBaseC\nMyMethod\tinput.cs\t/^ public override void MyMethod() $/;\"\tm\tclass:MyDerivedC\nx\tinput.cs\t/^ protected int x = 100; $/;\"\tf\tclass:MyBaseC\ny\tinput.cs\t/^ protected int y = 150;$/;\"\tf\tclass:MyBaseC\n" }, { "path": "Units/csharp-review-needed.r/keyword_abstract.cs.t/input.cs", "content": "// abstract_keyword.cs\n// Abstract Classes\nusing System;\nabstract class MyBaseC // Abstract class\n{\n protected int x = 100; \n protected int y = 150;\n public abstract void MyMethod(); // Abstract method\n\n public abstract int GetX // Abstract property\n {\n get;\n }\n\n public abstract int GetY // Abstract property\n {\n get;\n }\n}\n\nclass MyDerivedC: MyBaseC\n{\n public override void MyMethod() \n {\n x++;\n y++; \n } \n\n public override int GetX // overriding property\n {\n get \n {\n return x+10;\n }\n }\n\n public override int GetY // overriding property\n {\n get\n {\n return y+10;\n }\n }\n\n public static void Main() \n {\n MyDerivedC mC = new MyDerivedC();\n mC.MyMethod();\n Console.WriteLine(\"x = {0}, y = {1}\", mC.GetX, mC.GetY); \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_catch_try.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyClass\nMyClass\tinput.cs\t/^class MyClass $/;\"\tc\nMyFn\tinput.cs\t/^ public void MyFn(string s) $/;\"\tm\tclass:MyClass\n" }, { "path": "Units/csharp-review-needed.r/keyword_catch_try.cs.t/input.cs", "content": "// Ordering catch clauses\nusing System;\nclass MyClass \n{\n public static void Main() \n {\n MyClass x = new MyClass();\n try \n {\n string s = null;\n x.MyFn(s);\n }\n\n // Most specific:\n catch (ArgumentNullException e) \n {\n Console.WriteLine(\"{0} First exception caught.\", e);\n }\n\n // Least specific:\n catch (Exception e) \n {\n Console.WriteLine(\"{0} Second exception caught.\", e);\n }\n\n }\n\n public void MyFn(string s) \n {\n if (s == null) \n throw new ArgumentNullException();\n } \n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_class.cs.t/expected.tags", "content": "Kid\tinput.cs\t/^ public Kid() $/;\"\tm\tclass:Kid\nKid\tinput.cs\t/^ public Kid(string name, int age) $/;\"\tm\tclass:Kid\nKid\tinput.cs\t/^public class Kid $/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass $/;\"\tc\nPrintKid\tinput.cs\t/^ public void PrintKid() $/;\"\tm\tclass:Kid\nage\tinput.cs\t/^ private int age;$/;\"\tf\tclass:Kid\tfile:\nname\tinput.cs\t/^ private string name;$/;\"\tf\tclass:Kid\tfile:\n" }, { "path": "Units/csharp-review-needed.r/keyword_class.cs.t/input.cs", "content": "// keyword_class.cs\n// class example\nusing System;\npublic class Kid \n{\n private int age;\n private string name;\n\n // Default constructor:\n public Kid() \n {\n name = \"N/A\";\n }\n\n // Constructor:\n public Kid(string name, int age) \n {\n this.name = name;\n this.age = age;\n }\n\n // Printing method:\n public void PrintKid() \n {\n Console.WriteLine(\"{0}, {1} years old.\", name, age);\n }\n}\n\npublic class MainClass \n{\n public static void Main() \n {\n // Create objects\n // Objects must be created using the new operator:\n Kid kid1 = new Kid(\"Craig\", 11);\n Kid kid2 = new Kid(\"Sally\", 10);\n\n // Create an object using the default constructor:\n Kid kid3 = new Kid(); \n\n // Display results:\n Console.Write(\"Kid #1: \");\n kid1.PrintKid();\n Console.Write(\"Kid #2: \");\n kid2.PrintKid();\n Console.Write(\"Kid #3: \");\n kid3.PrintKid();\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_const.cs.t/expected.tags", "content": "ConstTest\tinput.cs\t/^public class ConstTest $/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:ConstTest\nMyClass\tinput.cs\t/^ public MyClass(int p1, int p2) $/;\"\tm\tclass:ConstTest.MyClass\nMyClass\tinput.cs\t/^ class MyClass $/;\"\tc\tclass:ConstTest\nc1\tinput.cs\t/^ public const int c1 = 5;$/;\"\tf\tclass:ConstTest.MyClass\nc2\tinput.cs\t/^ public const int c2 = c1 + 5;$/;\"\tf\tclass:ConstTest.MyClass\nx\tinput.cs\t/^ public int x;$/;\"\tf\tclass:ConstTest.MyClass\ny\tinput.cs\t/^ public int y;$/;\"\tf\tclass:ConstTest.MyClass\n" }, { "path": "Units/csharp-review-needed.r/keyword_const.cs.t/input.cs", "content": "// const_keyword.cs\n// Constants\nusing System;\npublic class ConstTest \n{\n class MyClass \n {\n public int x;\n public int y;\n public const int c1 = 5;\n public const int c2 = c1 + 5;\n\n public MyClass(int p1, int p2) \n {\n x = p1; \n y = p2;\n }\n }\n\n public static void Main() \n {\n MyClass mC = new MyClass(11, 22); \n Console.WriteLine(\"x = {0}, y = {1}\", mC.x, mC.y);\n Console.WriteLine(\"c1 = {0}, c2 = {1}\", MyClass.c1, MyClass.c2 );\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_delegate.cs.t/expected.tags", "content": "DelegateFunction\tinput.cs\t/^ public static void DelegateFunction(int i)$/;\"\tm\tclass:Program\nInstanceMethod\tinput.cs\t/^ public void InstanceMethod() $/;\"\tm\tclass:MyClass\nMain\tinput.cs\t/^ public static void Main()$/;\"\tm\tclass:Program\nMain\tinput.cs\t/^ static public void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass $/;\"\tc\nMyClass\tinput.cs\t/^public class MyClass $/;\"\tc\nMyDelegate\tinput.cs\t/^delegate void MyDelegate();$/;\"\tm\nMyDelegate\tinput.cs\t/^delegate void MyDelegate(int i);$/;\"\tm\nProgram\tinput.cs\t/^class Program$/;\"\tc\nStaticMethod\tinput.cs\t/^ static public void StaticMethod() $/;\"\tm\tclass:MyClass\nTakesADelegate\tinput.cs\t/^ public static void TakesADelegate(MyDelegate SomeFunction)$/;\"\tm\tclass:Program\n" }, { "path": "Units/csharp-review-needed.r/keyword_delegate.cs.t/input.cs", "content": "// keyword_delegate.cs\n// delegate declaration\ndelegate void MyDelegate(int i);\n\nclass Program\n{\n public static void Main()\n {\n TakesADelegate(new MyDelegate(DelegateFunction));\n }\n\n public static void TakesADelegate(MyDelegate SomeFunction)\n {\n SomeFunction(21);\n }\n \n public static void DelegateFunction(int i)\n {\n System.Console.WriteLine(\"Called by delegate with number: {0}.\", i);\n }\n}\n//\n// keyword_delegate2.cs\n// Calling both static and instance methods from delegates\nusing System;\n\n// delegate declaration\ndelegate void MyDelegate();\n\npublic class MyClass \n{\n public void InstanceMethod() \n {\n Console.WriteLine(\"A message from the instance method.\"); \n }\n\n static public void StaticMethod() \n {\n Console.WriteLine(\"A message from the static method.\");\n }\n}\n\npublic class MainClass \n{\n static public void Main() \n {\n MyClass p = new MyClass();\n\n // Map the delegate to the instance method:\n MyDelegate d = new MyDelegate(p.InstanceMethod);\n d();\n\n // Map to the static method:\n d = new MyDelegate(MyClass.StaticMethod);\n d();\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_enum.cs.t/expected.tags", "content": "Days\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\tg\tclass:EnumTest\nEnumTest\tinput.cs\t/^public class EnumTest $/;\"\tc\nFri\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:EnumTest\nMax\tinput.cs\t/^ enum Range :long {Max = 2147483648L, Min = 255L};$/;\"\te\tenum:EnumTest.Range\tfile:\nMin\tinput.cs\t/^ enum Range :long {Max = 2147483648L, Min = 255L};$/;\"\te\tenum:EnumTest.Range\tfile:\nMon\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\nRange\tinput.cs\t/^ enum Range :long {Max = 2147483648L, Min = 255L};$/;\"\tg\tclass:EnumTest\nSat\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\nSun\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\nThu\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\nTue\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\nWed\tinput.cs\t/^ enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};$/;\"\te\tenum:EnumTest.Days\tfile:\n" }, { "path": "Units/csharp-review-needed.r/keyword_enum.cs.t/input.cs", "content": "// C# Programmer's Reference: enum\n// keyword_enum.cs\n// enum initialization:\nusing System;\npublic class EnumTest \n{\n enum Days {Sat=1, Sun, Mon, Tue, Wed, Thu, Fri};\n\n public static void Main() \n {\n int x = (int) Days.Sun;\n int y = (int) Days.Fri;\n Console.WriteLine(\"Sun = {0}\", x);\n Console.WriteLine(\"Fri = {0}\", y);\n }\n}\n\n// keyword_enum2.cs\n// Using long enumerators\nusing System;\npublic class EnumTest \n{\n enum Range :long {Max = 2147483648L, Min = 255L};\n public static void Main() \n {\n long x = (long) Range.Max;\n long y = (long) Range.Min;\n Console.WriteLine(\"Max = {0}\", x);\n Console.WriteLine(\"Min = {0}\", y);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_event.cs.t/expected.tags", "content": "Event1\tinput.cs\t/^ public event MyDelegate1 Event1 $/;\"\tp\tclass:PropertyEventsSample\nEvent2\tinput.cs\t/^ public event MyDelegate1 Event2 $/;\"\tp\tclass:PropertyEventsSample\nEvent3\tinput.cs\t/^ public event MyDelegate2 Event3 $/;\"\tp\tclass:PropertyEventsSample\nEvent4\tinput.cs\t/^ public event MyDelegate3 Event4 $/;\"\tp\tclass:PropertyEventsSample\nEvent5\tinput.cs\t/^ public event MyDelegate3 Event5 $/;\"\tp\tclass:PropertyEventsSample\nEvent6\tinput.cs\t/^ public event MyDelegate4 Event6 $/;\"\tp\tclass:PropertyEventsSample\nExplicitEventsSample\tinput.cs\t/^public class ExplicitEventsSample: I1, I2 $/;\"\tc\nFireAway\tinput.cs\t/^ public void FireAway() $/;\"\tm\tclass:MyClass\nFireAway\tinput.cs\t/^ void FireAway();$/;\"\tm\tinterface:I\nFireEvents\tinput.cs\t/^ private void FireEvents() $/;\"\tm\tclass:ExplicitEventsSample\tfile:\nI\tinput.cs\t/^public interface I $/;\"\ti\nI1\tinput.cs\t/^public interface I1 $/;\"\ti\nI2\tinput.cs\t/^public interface I2 $/;\"\ti\nI2.MyEvent\tinput.cs\t/^ event MyDelegate2 I2.MyEvent \\/\\/ explicit implementation of I2.MyEvent$/;\"\tp\tclass:ExplicitEventsSample\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyClass\nMain\tinput.cs\t/^ static public void Main () $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass $/;\"\tc\nMyClass\tinput.cs\t/^public class MyClass $/;\"\tc\nMyClass\tinput.cs\t/^public class MyClass: I $/;\"\tc\nMyDelegate\tinput.cs\t/^public delegate void MyDelegate(); \\/\\/ delegate declaration$/;\"\tm\nMyDelegate1\tinput.cs\t/^public delegate void MyDelegate1();$/;\"\tm\nMyDelegate1\tinput.cs\t/^public delegate void MyDelegate1(int i);$/;\"\tm\nMyDelegate2\tinput.cs\t/^public delegate int MyDelegate2(string s);$/;\"\tm\nMyDelegate2\tinput.cs\t/^public delegate void MyDelegate2(string s);$/;\"\tm\nMyDelegate3\tinput.cs\t/^public delegate void MyDelegate3(int i, object o);$/;\"\tm\nMyDelegate4\tinput.cs\t/^public delegate void MyDelegate4();$/;\"\tm\nMyEvent\tinput.cs\t/^ event MyDelegate MyEvent;$/;\"\tE\tinterface:I\nMyEvent\tinput.cs\t/^ event MyDelegate1 MyEvent;$/;\"\tE\tinterface:I1\nMyEvent\tinput.cs\t/^ event MyDelegate2 MyEvent;$/;\"\tE\tinterface:I2\nMyEvent\tinput.cs\t/^ public event MyDelegate MyEvent;$/;\"\tE\tclass:MyClass\nMyEvent\tinput.cs\t/^ public event MyDelegate1 MyEvent; \\/\\/ normal implementation of I1.MyEvent.$/;\"\tE\tclass:ExplicitEventsSample\nMyEvent2Storage\tinput.cs\t/^ private MyDelegate2 MyEvent2Storage; \\/\\/ underlying storage for I2.MyEvent.$/;\"\tf\tclass:ExplicitEventsSample\tfile:\nPropertyEventsSample\tinput.cs\t/^public class PropertyEventsSample $/;\"\tc\neventTable\tinput.cs\t/^ private Hashtable eventTable = new Hashtable();$/;\"\tf\tclass:PropertyEventsSample\tfile:\nf\tinput.cs\t/^ static private void f() $/;\"\tm\tclass:MainClass\tfile:\n" }, { "path": "Units/csharp-review-needed.r/keyword_event.cs.t/input.cs", "content": "// event_keyword.cs\nusing System;\npublic delegate void MyDelegate(); // delegate declaration\n\npublic interface I \n{\n event MyDelegate MyEvent;\n void FireAway();\n}\n\npublic class MyClass: I \n{\n public event MyDelegate MyEvent;\n\n public void FireAway() \n {\n if (MyEvent != null)\n MyEvent();\n }\n}\n\npublic class MainClass \n{\n static private void f() \n {\n Console.WriteLine(\"This is called when the event fires.\");\n }\n\n static public void Main () \n {\n I i = new MyClass();\n\n i.MyEvent += new MyDelegate(f);\n i.FireAway();\n }\n}\n\n// event_keyword2.cs\nusing System;\nusing System.Collections;\n\npublic delegate void MyDelegate1(int i);\npublic delegate void MyDelegate2(string s);\npublic delegate void MyDelegate3(int i, object o);\npublic delegate void MyDelegate4();\n\npublic class PropertyEventsSample \n{\n private Hashtable eventTable = new Hashtable();\n\n public event MyDelegate1 Event1 \n {\n add \n {\n eventTable[\"Event1\"] = (MyDelegate1)eventTable[\"Event1\"] + value;\n }\n remove\n {\n eventTable[\"Event1\"] = (MyDelegate1)eventTable[\"Event1\"] - value; \n }\n }\n\n public event MyDelegate1 Event2 \n {\n add \n {\n eventTable[\"Event2\"] = (MyDelegate1)eventTable[\"Event2\"] + value;\n }\n remove\n {\n eventTable[\"Event2\"] = (MyDelegate1)eventTable[\"Event2\"] - value; \n }\n }\n\n public event MyDelegate2 Event3 \n {\n add \n {\n eventTable[\"Event3\"] = (MyDelegate2)eventTable[\"Event3\"] + value;\n }\n remove\n {\n eventTable[\"Event3\"] = (MyDelegate2)eventTable[\"Event3\"] - value; \n }\n }\n\n public event MyDelegate3 Event4 \n {\n add \n {\n eventTable[\"Event4\"] = (MyDelegate3)eventTable[\"Event4\"] + value;\n }\n remove\n {\n eventTable[\"Event4\"] = (MyDelegate3)eventTable[\"Event4\"] - value; \n }\n }\n\n public event MyDelegate3 Event5 \n {\n add \n {\n eventTable[\"Event5\"] = (MyDelegate3)eventTable[\"Event5\"] + value;\n }\n remove\n {\n eventTable[\"Event5\"] = (MyDelegate3)eventTable[\"Event5\"] - value; \n }\n }\n\n public event MyDelegate4 Event6 \n {\n add \n {\n eventTable[\"Event6\"] = (MyDelegate4)eventTable[\"Event6\"] + value;\n }\n remove\n {\n eventTable[\"Event6\"] = (MyDelegate4)eventTable[\"Event6\"] - value; \n }\n }\n}\n\npublic class MyClass \n{\n public static void Main() \n {\n }\n}\n\n// event_keyword3.cs\nusing System;\n\npublic delegate void MyDelegate1();\n\npublic interface I1 \n{\n event MyDelegate1 MyEvent;\n}\n\npublic delegate int MyDelegate2(string s);\n\npublic interface I2 \n{\n event MyDelegate2 MyEvent;\n}\n\npublic class ExplicitEventsSample: I1, I2 \n{\n public event MyDelegate1 MyEvent; // normal implementation of I1.MyEvent.\n\n event MyDelegate2 I2.MyEvent // explicit implementation of I2.MyEvent\n {\n add\n {\n MyEvent2Storage += value;\n }\n remove\n {\n MyEvent2Storage -= value;\n }\n }\n\n private MyDelegate2 MyEvent2Storage; // underlying storage for I2.MyEvent.\n\n private void FireEvents() \n {\n if (MyEvent != null)\n MyEvent();\n if (MyEvent2Storage != null)\n MyEvent2Storage(\"hello\");\n }\n}\n\npublic class MyClass \n{\n public static void Main() \n {\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_explicit.cs.t/expected.tags", "content": "Digit\tinput.cs\t/^ public Digit(byte value) $/;\"\tm\tstruct:Digit\nDigit\tinput.cs\t/^struct Digit$/;\"\ts\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:Test\nTest\tinput.cs\t/^class Test $/;\"\tc\noperator Digit\tinput.cs\t/^ public static explicit operator Digit(byte b) $/;\"\tm\tstruct:Digit\nvalue\tinput.cs\t/^ byte value;$/;\"\tf\tstruct:Digit\n" }, { "path": "Units/csharp-review-needed.r/keyword_explicit.cs.t/input.cs", "content": "// cs_keyword_explicit.cs\nusing System;\nstruct Digit\n{\n byte value;\n public Digit(byte value) \n {\n if (value<0 || value>9) throw new ArgumentException();\n this.value = value;\n }\n\n // define explicit byte-to-Digit conversion operator:\n public static explicit operator Digit(byte b) \n {\n Console.WriteLine(\"conversion occurred\");\n return new Digit(b);\n }\n}\n\nclass Test \n{\n public static void Main() \n {\n byte b = 3;\n Digit d = (Digit)b; // explicit conversion\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_extern.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static int Main() $/;\"\tm\tclass:MyClass\nMessageBox\tinput.cs\t/^ public static extern int MessageBox(int h, string m, string c, int type);$/;\"\tm\tclass:MyClass\tfile:\nMyClass\tinput.cs\t/^class MyClass $/;\"\tc\n" }, { "path": "Units/csharp-review-needed.r/keyword_extern.cs.t/input.cs", "content": "using System;\nusing System.Runtime.InteropServices;\nclass MyClass \n{\n [DllImport(\"User32.dll\")]\n public static extern int MessageBox(int h, string m, string c, int type);\n\n public static int Main() \n {\n string myString; \n Console.Write(\"Enter your message: \");\n myString = Console.ReadLine();\n return MessageBox(0, myString, \"My Message Box\", 0);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_implicit.cs.t/expected.tags", "content": "Digit\tinput.cs\t/^ public Digit(byte value) $/;\"\tm\tstruct:Digit\nDigit\tinput.cs\t/^struct Digit$/;\"\ts\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:Test\nTest\tinput.cs\t/^class Test $/;\"\tc\noperator byte\tinput.cs\t/^ public static implicit operator byte(Digit d) $/;\"\tm\tstruct:Digit\nvalue\tinput.cs\t/^ byte value;$/;\"\tf\tstruct:Digit\n" }, { "path": "Units/csharp-review-needed.r/keyword_implicit.cs.t/input.cs", "content": "// cs_keyword_implicit.cs\nusing System;\nstruct Digit\n{\n byte value;\n\n public Digit(byte value) \n {\n if (value < 0 || value > 9) throw new ArgumentException();\n this.value = value;\n }\n\n // define implicit Digit-to-byte conversion operator:\n public static implicit operator byte(Digit d) \n {\n Console.WriteLine( \"conversion occurred\" );\n return d.value;\n }\n}\n\nclass Test \n{\n public static void Main() \n {\n Digit d = new Digit(3);\n\n // implicit (no cast) conversion from Digit to byte\n byte b = d; \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_interface.cs.t/expected.tags", "content": "IPoint\tinput.cs\t/^interface IPoint $/;\"\ti\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^class MainClass $/;\"\tc\nMyPoint\tinput.cs\t/^ public MyPoint(int x, int y) $/;\"\tm\tclass:MyPoint\nMyPoint\tinput.cs\t/^class MyPoint : IPoint $/;\"\tc\nPrintPoint\tinput.cs\t/^ private static void PrintPoint(IPoint p) $/;\"\tm\tclass:MainClass\tfile:\nmyX\tinput.cs\t/^ private int myX;$/;\"\tf\tclass:MyPoint\tfile:\nmyY\tinput.cs\t/^ private int myY;$/;\"\tf\tclass:MyPoint\tfile:\nx\tinput.cs\t/^ int x $/;\"\tp\tinterface:IPoint\nx\tinput.cs\t/^ public int x $/;\"\tp\tclass:MyPoint\ny\tinput.cs\t/^ int y $/;\"\tp\tinterface:IPoint\ny\tinput.cs\t/^ public int y $/;\"\tp\tclass:MyPoint\n" }, { "path": "Units/csharp-review-needed.r/keyword_interface.cs.t/input.cs", "content": "// keyword_interface.cs\n// Interface implementation\nusing System;\ninterface IPoint \n{\n // Property signatures:\n int x \n {\n get; \n set; \n }\n\n int y \n {\n get; \n set; \n }\n}\n\nclass MyPoint : IPoint \n{\n // Fields:\n private int myX;\n private int myY;\n\n // Constructor:\n public MyPoint(int x, int y) \n {\n myX = x;\n myY = y;\n }\n\n // Property implementation:\n public int x \n {\n get \n {\n return myX;\n }\n\n set \n {\n myX = value; \n }\n }\n\n public int y \n {\n get \n {\n return myY; \n }\n set \n {\n myY = value; \n }\n }\n}\n\nclass MainClass \n{\n private static void PrintPoint(IPoint p) \n {\n Console.WriteLine(\"x={0}, y={1}\", p.x, p.y);\n }\n\n public static void Main() \n {\n MyPoint p = new MyPoint(2,3);\n Console.Write(\"My Point: \");\n PrintPoint(p);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_namespace.cs.t/expected.tags", "content": "AlternativeNestedNameSpaceClass\tinput.cs\t/^\tpublic class AlternativeNestedNameSpaceClass$/;\"\tc\tnamespace:SomeNameSpace.Nested\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:SomeNameSpace.MyClass\nMyClass\tinput.cs\t/^ public class MyClass $/;\"\tc\tnamespace:SomeNameSpace\nNested\tinput.cs\t/^ namespace Nested \\/\\/ a nested namespace$/;\"\tn\tnamespace:SomeNameSpace\nNestedNameSpaceClass\tinput.cs\t/^ public class NestedNameSpaceClass $/;\"\tc\tnamespace:SomeNameSpace.Nested\nSayHello\tinput.cs\t/^ public static void SayHello() $/;\"\tm\tclass:SomeNameSpace.Nested.NestedNameSpaceClass\nSomeNameSpace\tinput.cs\t/^namespace SomeNameSpace$/;\"\tn\nSomeNameSpace.Nested\tinput.cs\t/^namespace SomeNameSpace.Nested$/;\"\tn\n" }, { "path": "Units/csharp-review-needed.r/keyword_namespace.cs.t/input.cs", "content": "// cs_namespace_keyword.cs\nusing System;\nnamespace SomeNameSpace\n{\n public class MyClass \n {\n public static void Main() \n {\n Nested.NestedNameSpaceClass.SayHello();\n }\n }\n\n namespace Nested // a nested namespace\n {\n public class NestedNameSpaceClass \n {\n public static void SayHello() \n {\n Console.WriteLine(\"Hello\");\n }\n }\n }\n}\n\n// namespace can nest multiple levels at once.\nnamespace SomeNameSpace.Nested\n{\n\tpublic class AlternativeNestedNameSpaceClass\n\t{\n\t}\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_out.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyClass\nMyClass\tinput.cs\t/^public class MyClass $/;\"\tc\nTestOut\tinput.cs\t/^ public static int TestOut(out char i) $/;\"\tm\tclass:MyClass\n" }, { "path": "Units/csharp-review-needed.r/keyword_out.cs.t/input.cs", "content": "// cs_out.cs \nusing System;\npublic class MyClass \n{\n public static int TestOut(out char i) \n {\n i = 'b';\n return -1;\n }\n\n public static void Main() \n {\n char i; // variable need not be initialized\n Console.WriteLine(TestOut(out i));\n Console.WriteLine(i);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_override.cs.t/expected.tags", "content": "Area\tinput.cs\t/^ public override double Area() $/;\"\tm\tclass:TestClass.Cube\nArea\tinput.cs\t/^ public virtual double Area() $/;\"\tm\tclass:TestClass.Square\nCube\tinput.cs\t/^ public Cube(double x): base(x) $/;\"\tm\tclass:TestClass.Cube\nCube\tinput.cs\t/^ class Cube: Square $/;\"\tc\tclass:TestClass\nMain\tinput.cs\t/^ public static void Main()$/;\"\tm\tclass:TestClass\nSquare\tinput.cs\t/^ public Square(double x) $/;\"\tm\tclass:TestClass.Square\nSquare\tinput.cs\t/^ public class Square $/;\"\tc\tclass:TestClass\nTestClass\tinput.cs\t/^class TestClass $/;\"\tc\nx\tinput.cs\t/^ public double x;$/;\"\tf\tclass:TestClass.Square\n" }, { "path": "Units/csharp-review-needed.r/keyword_override.cs.t/input.cs", "content": "// cs_override_keyword.cs\n// Calling overriden methods from the base class\nusing System;\nclass TestClass \n{\n public class Square \n {\n public double x;\n\n // Constructor:\n public Square(double x) \n {\n this.x = x;\n }\n\n public virtual double Area() \n {\n return x*x; \n }\n }\n\n class Cube: Square \n {\n // Constructor:\n public Cube(double x): base(x) \n {\n }\n\n // Calling the Area base method:\n public override double Area() \n {\n return (6*(base.Area())); \n }\n }\n\n public static void Main()\n {\n double x = 5.2;\n Square s = new Square(x);\n Square c = new Cube(x);\n Console.WriteLine(\"Area of Square = {0:F2}\", s.Area());\n Console.WriteLine(\"Area of Cube = {0:F2}\", c.Area());\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_params.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyClass\nMyClass\tinput.cs\t/^public class MyClass $/;\"\tc\nUseParams\tinput.cs\t/^ public static void UseParams(params int[] list) $/;\"\tm\tclass:MyClass\nUseParams2\tinput.cs\t/^ public static void UseParams2(params object[] list) $/;\"\tm\tclass:MyClass\n" }, { "path": "Units/csharp-review-needed.r/keyword_params.cs.t/input.cs", "content": "// cs_params.cs\nusing System;\npublic class MyClass \n{\n\n public static void UseParams(params int[] list) \n {\n for ( int i = 0 ; i < list.Length ; i++ )\n Console.WriteLine(list[i]);\n Console.WriteLine();\n }\n\n public static void UseParams2(params object[] list) \n {\n for ( int i = 0 ; i < list.Length ; i++ )\n Console.WriteLine((object)list[i]);\n Console.WriteLine();\n }\n\n public static void Main() \n {\n UseParams(1, 2, 3);\n UseParams2(1, 'a', \"test\"); \n\n int[] myarray = new int[3] {10,11,12};\n UseParams(myarray);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_private.cs.t/expected.tags", "content": "AccessSalary\tinput.cs\t/^ public double AccessSalary() {$/;\"\tm\tclass:Employee\nEmployee\tinput.cs\t/^class Employee $/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^class MainClass $/;\"\tc\nname\tinput.cs\t/^ public string name = \"xx\";$/;\"\tf\tclass:Employee\nnot_visible\tinput.cs\t/^ private int not_visible = 3; \\/\\/ strangely, not in original example$/;\"\tf\tclass:Employee\tfile:\nsalary\tinput.cs\t/^ double salary = 100.00; \\/\\/ private access by default$/;\"\tf\tclass:Employee\tfile:\n" }, { "path": "Units/csharp-review-needed.r/keyword_private.cs.t/input.cs", "content": "// private_keyword.cs\nusing System;\nclass Employee \n{\n public string name = \"xx\";\n double salary = 100.00; // private access by default\n private int not_visible = 3; // strangely, not in original example\n public double AccessSalary() {\n return salary;\n }\n}\n\nclass MainClass \n{\n public static void Main() \n {\n Employee e = new Employee();\n\n // Accessing the public field:\n string n = e.name; \n \n // Accessing the private field:\n double s = e.AccessSalary(); \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_protected.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyDerivedC\nMyClass\tinput.cs\t/^class MyClass $/;\"\tc\nMyDerivedC\tinput.cs\t/^class MyDerivedC: MyClass $/;\"\tc\nx\tinput.cs\t/^ protected int x; $/;\"\tf\tclass:MyClass\ny\tinput.cs\t/^ protected int y;$/;\"\tf\tclass:MyClass\n" }, { "path": "Units/csharp-review-needed.r/keyword_protected.cs.t/input.cs", "content": "// protected_keyword.cs\nusing System;\nclass MyClass \n{\n protected int x; \n protected int y;\n}\n\nclass MyDerivedC: MyClass \n{\n public static void Main() \n {\n MyDerivedC mC = new MyDerivedC();\n\n // Direct access to protected members:\n mC.x = 10;\n mC.y = 15;\n Console.WriteLine(\"x = {0}, y = {1}\", mC.x, mC.y); \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_public.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MyClass2\nMyClass1\tinput.cs\t/^class MyClass1 $/;\"\tc\nMyClass2\tinput.cs\t/^class MyClass2 $/;\"\tc\nx\tinput.cs\t/^ public int x; $/;\"\tf\tclass:MyClass1\ny\tinput.cs\t/^ public int y;$/;\"\tf\tclass:MyClass1\n" }, { "path": "Units/csharp-review-needed.r/keyword_public.cs.t/input.cs", "content": "// protected_public.cs\n// Public access\nusing System;\nclass MyClass1 \n{\n public int x; \n public int y;\n}\n\nclass MyClass2 \n{\n public static void Main() \n {\n MyClass1 mC = new MyClass1();\n\n // Direct access to public members:\n mC.x = 10;\n mC.y = 15;\n Console.WriteLine(\"x = {0}, y = {1}\", mC.x, mC.y); \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_sealed.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^class MainClass $/;\"\tc\nMyClass\tinput.cs\t/^sealed class MyClass $/;\"\tc\nx\tinput.cs\t/^ public int x; $/;\"\tf\tclass:MyClass\ny\tinput.cs\t/^ public int y;$/;\"\tf\tclass:MyClass\n" }, { "path": "Units/csharp-review-needed.r/keyword_sealed.cs.t/input.cs", "content": "// cs_sealed_keyword.cs\n// Sealed classes\nusing System;\nsealed class MyClass \n{\n public int x; \n public int y;\n}\n\nclass MainClass \n{\n public static void Main() \n {\n MyClass mC = new MyClass(); \n mC.x = 110;\n mC.y = 150;\n Console.WriteLine(\"x = {0}, y = {1}\", mC.x, mC.y); \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_static.cs.t/expected.tags", "content": "AddEmployee\tinput.cs\t/^ public static int AddEmployee() $/;\"\tm\tclass:Employee\nEmployee\tinput.cs\t/^ public Employee () $/;\"\tm\tclass:Employee\nEmployee\tinput.cs\t/^ public Employee (string name, string id) $/;\"\tm\tclass:Employee\nEmployee\tinput.cs\t/^public class Employee $/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^class MainClass: Employee $/;\"\tc\nemployeeCounter\tinput.cs\t/^ public static int employeeCounter;$/;\"\tf\tclass:Employee\nid\tinput.cs\t/^ public string id;$/;\"\tf\tclass:Employee\nname\tinput.cs\t/^ public string name;$/;\"\tf\tclass:Employee\n" }, { "path": "Units/csharp-review-needed.r/keyword_static.cs.t/input.cs", "content": "// cs_static_keyword.cs\n// Static members\nusing System;\npublic class Employee \n{\n public string id;\n public string name;\n\n public Employee () \n {\n }\n\n public Employee (string name, string id) \n {\n this.name = name;\n this.id = id;\n } \n\n public static int employeeCounter;\n\n public static int AddEmployee() \n {\n return ++employeeCounter;\n }\n}\n\nclass MainClass: Employee \n{\n public static void Main() \n {\n Console.Write(\"Enter the employee's name: \");\n string name = Console.ReadLine();\n Console.Write(\"Enter the employee's ID: \"); \n string id = Console.ReadLine();\n // Create the employee object:\n Employee e = new Employee (name, id);\n Console.Write(\"Enter the current number of employees: \");\n string n = Console.ReadLine();\n Employee.employeeCounter = Int32.Parse(n);\n Employee.AddEmployee();\n // Display the new information:\n Console.WriteLine(\"Name: {0}\", e.name);\n Console.WriteLine(\"ID: {0}\", e.id);\n Console.WriteLine(\"New Number of Employees: {0}\",\n Employee.employeeCounter);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_struct.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^class MainClass $/;\"\tc\nPoint\tinput.cs\t/^ public Point(int p1, int p2) $/;\"\tm\tstruct:Point\nPoint\tinput.cs\t/^public struct Point $/;\"\ts\nx\tinput.cs\t/^ public int x, y;$/;\"\tf\tstruct:Point\ny\tinput.cs\t/^ public int x, y;$/;\"\tf\tstruct:Point\n" }, { "path": "Units/csharp-review-needed.r/keyword_struct.cs.t/input.cs", "content": "// keyword_struct.cs\n// struct declaration and initialization\nusing System;\npublic struct Point \n{\n public int x, y;\n\n public Point(int p1, int p2) \n {\n x = p1;\n y = p2; \n }\n}\n\nclass MainClass \n{\n public static void Main() \n {\n // Initialize: \n Point myPoint = new Point();\n Point yourPoint = new Point(10,10);\n\n // Display results:\n Console.Write(\"My Point: \");\n Console.WriteLine(\"x = {0}, y = {1}\", myPoint.x, myPoint.y);\n Console.Write(\"Your Point: \");\n Console.WriteLine(\"x = {0}, y = {1}\", yourPoint.x, yourPoint.y);\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_virtual.cs.t/expected.tags", "content": "Area\tinput.cs\t/^ public override double Area()$/;\"\tm\tclass:TestClass.Sphere\nArea\tinput.cs\t/^ public override double Area() $/;\"\tm\tclass:TestClass.Circle\nArea\tinput.cs\t/^ public override double Area() $/;\"\tm\tclass:TestClass.Cylinder\nArea\tinput.cs\t/^ public virtual double Area() $/;\"\tm\tclass:TestClass.Dimensions\nCircle\tinput.cs\t/^ public Circle(double r): base(r, 0) $/;\"\tm\tclass:TestClass.Circle\nCircle\tinput.cs\t/^ public class Circle: Dimensions $/;\"\tc\tclass:TestClass\nCylinder\tinput.cs\t/^ public Cylinder(double r, double h): base(r, h) $/;\"\tm\tclass:TestClass.Cylinder\nCylinder\tinput.cs\t/^ class Cylinder: Dimensions $/;\"\tc\tclass:TestClass\nDimensions\tinput.cs\t/^ public Dimensions (double x, double y) $/;\"\tm\tclass:TestClass.Dimensions\nDimensions\tinput.cs\t/^ public Dimensions() $/;\"\tm\tclass:TestClass.Dimensions\nDimensions\tinput.cs\t/^ public class Dimensions $/;\"\tc\tclass:TestClass\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:TestClass\nSphere\tinput.cs\t/^ public Sphere(double r): base(r, 0) $/;\"\tm\tclass:TestClass.Sphere\nSphere\tinput.cs\t/^ class Sphere: Dimensions $/;\"\tc\tclass:TestClass\nTestClass\tinput.cs\t/^class TestClass $/;\"\tc\npi\tinput.cs\t/^ public const double pi = Math.PI;$/;\"\tf\tclass:TestClass.Dimensions\nx\tinput.cs\t/^ protected double x, y;$/;\"\tf\tclass:TestClass.Dimensions\ny\tinput.cs\t/^ protected double x, y;$/;\"\tf\tclass:TestClass.Dimensions\n" }, { "path": "Units/csharp-review-needed.r/keyword_virtual.cs.t/input.cs", "content": "// cs_virtual_keyword.cs\n// Virtual and override\nusing System;\nclass TestClass \n{\n public class Dimensions \n {\n public const double pi = Math.PI;\n protected double x, y;\n public Dimensions() \n {\n }\n public Dimensions (double x, double y) \n {\n this.x = x;\n this.y = y;\n }\n\n public virtual double Area() \n {\n return x*y;\n }\n }\n\n public class Circle: Dimensions \n {\n public Circle(double r): base(r, 0) \n {\n }\n\n public override double Area() \n { \n return pi * x * x; \n }\n }\n\n class Sphere: Dimensions \n {\n public Sphere(double r): base(r, 0) \n {\n }\n\n public override double Area()\n {\n return 4 * pi * x * x; \n }\n }\n\n class Cylinder: Dimensions \n {\n public Cylinder(double r, double h): base(r, h) \n {\n }\n\n public override double Area() \n {\n return 2*pi*x*x + 2*pi*x*y; \n }\n }\n\n public static void Main() \n {\n double r = 3.0, h = 5.0;\n Dimensions c = new Circle(r);\n Dimensions s = new Sphere(r);\n Dimensions l = new Cylinder(r, h);\n // Display results:\n Console.WriteLine(\"Area of Circle = {0:F2}\", c.Area());\n Console.WriteLine(\"Area of Sphere = {0:F2}\", s.Area());\n Console.WriteLine(\"Area of Cylinder = {0:F2}\", l.Area());\n }\n}\n" }, { "path": "Units/csharp-review-needed.r/keyword_volatile.cs.t/expected.tags", "content": "Main\tinput.cs\t/^ public static void Main()$/;\"\tm\tclass:Test\nTest\tinput.cs\t/^ Test(int _i)$/;\"\tm\tclass:Test\tfile:\nTest\tinput.cs\t/^class Test$/;\"\tc\ni\tinput.cs\t/^ public volatile int i;$/;\"\tf\tclass:Test\n" }, { "path": "Units/csharp-review-needed.r/keyword_volatile.cs.t/input.cs", "content": "// csharp_volatile.cs\nclass Test\n{\n public volatile int i;\n \n Test(int _i)\n {\n i = _i;\n }\n public static void Main()\n {\n \n }\n}\n" }, { "path": "Units/csharp-review-needed.r/property.cs.t/expected.tags", "content": "Counter\tinput.cs\t/^ public static int Counter $/;\"\tp\tclass:Employee\nEmployee\tinput.cs\t/^ public Employee() $/;\"\tm\tclass:Employee\nEmployee\tinput.cs\t/^public class Employee $/;\"\tc\nMain\tinput.cs\t/^ public static void Main() $/;\"\tm\tclass:MainClass\nMainClass\tinput.cs\t/^public class MainClass$/;\"\tc\nName\tinput.cs\t/^ public string Name $/;\"\tp\tclass:Employee\ncounter\tinput.cs\t/^ private static int counter;$/;\"\tf\tclass:Employee\tfile:\nname\tinput.cs\t/^ private string name;$/;\"\tf\tclass:Employee\tfile:\nnumberOfEmployees\tinput.cs\t/^ public static int numberOfEmployees;$/;\"\tf\tclass:Employee\n" }, { "path": "Units/csharp-review-needed.r/property.cs.t/input.cs", "content": "// property.cs\n// Properties\nusing System;\npublic class Employee \n{\n public static int numberOfEmployees;\n private static int counter;\n private string name;\n\n // A read-write instance property:\n public string Name \n {\n get \n {\n return name; \n }\n set \n {\n name = value; \n }\n }\n\n // A read-only static property:\n public static int Counter \n {\n get \n {\n return counter; \n }\n }\n\n // Constructor:\n public Employee() \n {\n // Calculate the employee's number:\n counter = ++counter + numberOfEmployees;\n }\n}\n\npublic class MainClass\n{\n public static void Main() \n {\n Employee.numberOfEmployees = 100;\n Employee e1 = new Employee();\n e1.Name = \"Claude Vige\"; \n Console.WriteLine(\"Employee number: {0}\", Employee.Counter);\n Console.WriteLine(\"Employee name: {0}\", e1.Name);\n }\n}\n" }, { "path": "Units/extension-with-template-suffix.d/expected.tags", "content": "main\tinput.c.in\t/^main (void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/extension-with-template-suffix.d/input.c.in", "content": "int\nmain (void)\n{\n return 0;\n}\n" }, { "path": "Units/extra-anonymous.d/args.ctags", "content": "--sort=no\n--extras=+{anonymous}\n--fields=+{extras}\n" }, { "path": "Units/extra-anonymous.d/expected.tags", "content": "__anonf6b77c200108\tinput.c\t/^struct {$/;\"\ts\tfile:\textras:fileScope,anonymous\nx\tinput.c\t/^ int x;$/;\"\tm\tstruct:__anonf6b77c200108\ttyperef:typename:int\tfile:\textras:fileScope\n__anonf6b77c20020a\tinput.c\t/^union {$/;\"\tu\tfile:\textras:fileScope,anonymous\nx\tinput.c\t/^ int x;$/;\"\tm\tunion:__anonf6b77c20020a\ttyperef:typename:int\tfile:\textras:fileScope\n__anonf6b77c200303\tinput.c\t/^enum {$/;\"\tg\tfile:\textras:fileScope,anonymous\nX\tinput.c\t/^ X;$/;\"\te\tenum:__anonf6b77c200303\tfile:\textras:fileScope\nClass2\tinput-0.js\t/^var Class2 = function() {$/;\"\tc\nc2m1\tinput-0.js\t/^ this.c2m1 = function() {$/;\"\tm\tclass:Class2\nanonymousFunctiond33a4a170300\tinput-0.js\t/^ c2m3(function() {$/;\"\tf\tmethod:Class2.c2m1\textras:anonymous\nClass3\tinput-0.js\t/^var Class3 = function() {$/;\"\tc\nc3m1\tinput-0.js\t/^ this.c3m1 = function() {$/;\"\tm\tclass:Class3\nanonymousFunctiond33a4a170600\tinput-0.js\t/^ return function(n) {$/;\"\tf\tmethod:Class3.c3m1\textras:anonymous\nf1\tinput-0.js\t/^function f1(y) {$/;\"\tf\nanonymousFunctiond33a4a170700\tinput-0.js\t/^ return function(x) {$/;\"\tf\tfunction:f1\textras:anonymous\nMixin\tinput-0.js\t/^function Mixin(superclass) {$/;\"\tc\nAnonymousClassd33a4a170801\tinput-0.js\t/^ return class extends superclass {$/;\"\tc\tclass:Mixin\textras:anonymous\nhello\tinput-0.js\t/^ hello() {$/;\"\tm\tclass:Mixin.AnonymousClassd33a4a170801\nAnonymousClassd33a4a170901\tinput-0.js\t/^class {$/;\"\tc\textras:anonymous\nmethod8\tinput-0.js\t/^\tmethod8(n) { return n * n; }$/;\"\tm\tclass:AnonymousClassd33a4a170901\n" }, { "path": "Units/extra-anonymous.d/input-0.js", "content": "var Class2 = function() {\n this.c2m1 = function() {\n c2m3(function() {\n return { 'test': {} };\n });\n };\n};\n\nvar Class3 = function() {\n this.c3m1 = function() {\n return function(n) {\n if (n == 42) {\n return 0;\n } else {\n return (n + 1) % 42;\n }\n };\n };\n}\n\nfunction f1(y) {\n return function(x) {\n return x*y;\n }\n}\n\nfunction Mixin(superclass) {\n return class extends superclass {\n hello() {\n return \"hello from mixin\";\n }\n }\n}\n\nclass {\n\tmethod8(n) { return n * n; }\n}\n\n" }, { "path": "Units/extra-anonymous.d/input.c", "content": "struct {\n int x;\n};\n\nunion {\n int x;\n};\n\nenum {\n X;\n};\n" }, { "path": "Units/extra-disabling-anonymous.d/args.ctags", "content": "--sort=no\n--extras=-{anonymous}\n--fields=+{extras}\n" }, { "path": "Units/extra-disabling-anonymous.d/expected.tags", "content": "x\tinput.c\t/^ int x;$/;\"\tm\tstruct:__anon335cadda0108\ttyperef:typename:int\tfile:\textras:fileScope\nx\tinput.c\t/^ int x;$/;\"\tm\tunion:__anon335cadda020a\ttyperef:typename:int\tfile:\textras:fileScope\nX\tinput.c\t/^ X;$/;\"\te\tenum:__anon335cadda0303\tfile:\textras:fileScope\nClass2\tinput-0.js\t/^var Class2 = function() {$/;\"\tc\nc2m1\tinput-0.js\t/^ this.c2m1 = function() {$/;\"\tm\tclass:Class2\nClass3\tinput-0.js\t/^var Class3 = function() {$/;\"\tc\nc3m1\tinput-0.js\t/^ this.c3m1 = function() {$/;\"\tm\tclass:Class3\nf1\tinput-0.js\t/^function f1(y) {$/;\"\tf\nMixin\tinput-0.js\t/^function Mixin(superclass) {$/;\"\tc\nhello\tinput-0.js\t/^ hello() {$/;\"\tm\tclass:Mixin.AnonymousClass2503d9910801\nmethod8\tinput-0.js\t/^\tmethod8(n) { return n * n; }$/;\"\tm\tclass:AnonymousClass2503d9910901\n" }, { "path": "Units/extra-disabling-anonymous.d/input-0.js", "content": "var Class2 = function() {\n this.c2m1 = function() {\n c2m3(function() {\n return { 'test': {} };\n });\n };\n};\n\nvar Class3 = function() {\n this.c3m1 = function() {\n return function(n) {\n if (n == 42) {\n return 0;\n } else {\n return (n + 1) % 42;\n }\n };\n };\n}\n\nfunction f1(y) {\n return function(x) {\n return x*y;\n }\n}\n\nfunction Mixin(superclass) {\n return class extends superclass {\n hello() {\n return \"hello from mixin\";\n }\n }\n}\n\nclass {\n\tmethod8(n) { return n * n; }\n}\n\n" }, { "path": "Units/extra-disabling-anonymous.d/input.c", "content": "struct {\n int x;\n};\n\nunion {\n int x;\n};\n\nenum {\n X;\n};\n" }, { "path": "Units/extra-file-scope-option.d/args.ctags", "content": "--extras=-F\n" }, { "path": "Units/extra-file-scope-option.d/expected.tags", "content": "y\tinput.c\t/^ void y(void) {}$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/extra-file-scope-option.d/input.c", "content": "static void x(void) {}\n void y(void) {}\n" }, { "path": "Units/extra-total-lines.d/args.ctags", "content": "# `f' is optional\n# There was a bug that `.' was disabled when `f' was specified together.\n\n## This test case lost the original aim when\n## `.` extra field is replaced with `end:` field.\n\n--extras=+f\n--fields=+e\n--excmd=number\n" }, { "path": "Units/extra-total-lines.d/expected.tags", "content": "input.c\tinput.c\t1;\"\tF\tend:6\nmain\tinput.c\t2;\"\tf\ttyperef:typename:int\tend:5\n" }, { "path": "Units/extra-total-lines.d/foo.h", "content": "a\nb\nc\nd\ne\nf\ng\nh\ni\nj\nk\nl\nl\nm\nn\no\np\nq\nr\ns\nt\nu\nv\nw\nx\ny\nz\n" }, { "path": "Units/extra-total-lines.d/input.c", "content": "# 1 \"./foo.h\"\nint main(void)\n{\n return 0;\n}\n/* comment */\n" }, { "path": "Units/flags-langdef-directions.r/bidirectional.d/args.ctags", "content": "--sort=no\n--fields=+{language}\n\n--langdef=Base\n--map-Base=.base\n--kinddef-Base=b,basefunc,functions in Base language\n--regex-Base=/(^[a-z0-9]+)\\(/\\1/b/\n\n--langdef=Sub{base=Base}{bidirectional}\n--map-Sub=.sub\n--kinddef-Sub=s,subdef,definitions in Sub language\n--regex-Sub=/[ \\t]*@def[ \\t]+([a-z0-9]+).*;$/\\1/d/\n" }, { "path": "Units/flags-langdef-directions.r/bidirectional.d/expected.tags", "content": "f\tinput.base\t/^f() [$/;\"\tb\tlanguage:Base\nv\tinput.base\t/^\t@def v 1;$/;\"\td\tlanguage:Sub\nf0\tinput-0.sub\t/^f0() [$/;\"\tb\tlanguage:Base\nv0\tinput-0.sub\t/^\t@def v0 1;$/;\"\td\tlanguage:Sub\n" }, { "path": "Units/flags-langdef-directions.r/bidirectional.d/input-0.sub", "content": "f0() [\n\t@def v0 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/bidirectional.d/input.base", "content": "f() [\n\t@def v 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/dedicated.d/args.ctags", "content": "--sort=no\n--fields=+{language}\n\n--langdef=Base\n--map-Base=.base\n--kinddef-Base=b,basefunc,functions in Base language\n--regex-Base=/(^[a-z0-9]+)\\(/\\1/b/\n\n--langdef=Sub{base=Base}{dedicated}\n--map-Sub=.sub\n--kinddef-Sub=s,subdef,definitions in Sub language\n--regex-Sub=/[ \\t]*@def[ \\t]+([a-z0-9]+).*;$/\\1/d/\n" }, { "path": "Units/flags-langdef-directions.r/dedicated.d/expected.tags", "content": "f\tinput.base\t/^f() [$/;\"\tb\tlanguage:Base\nf0\tinput-0.sub\t/^f0() [$/;\"\tb\tlanguage:Base\nv0\tinput-0.sub\t/^\t@def v0 1;$/;\"\td\tlanguage:Sub\n" }, { "path": "Units/flags-langdef-directions.r/dedicated.d/input-0.sub", "content": "f0() [\n\t@def v0 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/dedicated.d/input.base", "content": "f() [\n\t@def v 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/default.d/args.ctags", "content": "--sort=no\n--fields=+{language}\n\n--langdef=Base\n--map-Base=.base\n--kinddef-Base=b,basefunc,functions in Base language\n--regex-Base=/(^[a-z0-9]+)\\(/\\1/b/\n\n--langdef=Sub{base=Base}\n--map-Sub=.sub\n--kinddef-Sub=s,subdef,definitions in Sub language\n--regex-Sub=/[ \\t]*@def[ \\t]+([a-z0-9]+).*;$/\\1/d/\n" }, { "path": "Units/flags-langdef-directions.r/default.d/expected.tags", "content": "f\tinput.base\t/^f() [$/;\"\tb\tlanguage:Base\nv\tinput.base\t/^\t@def v 1;$/;\"\td\tlanguage:Sub\nv0\tinput-0.sub\t/^\t@def v0 1;$/;\"\td\tlanguage:Sub\n" }, { "path": "Units/flags-langdef-directions.r/default.d/input-0.sub", "content": "f0() [\n\t@def v0 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/default.d/input.base", "content": "f() [\n\t@def v 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/shared.d/args.ctags", "content": "--sort=no\n--fields=+{language}\n\n--langdef=Base\n--map-Base=.base\n--kinddef-Base=b,basefunc,functions in Base language\n--regex-Base=/(^[a-z0-9]+)\\(/\\1/b/\n\n--langdef=Sub{base=Base}{shared}\n--map-Sub=.sub\n--kinddef-Sub=s,subdef,definitions in Sub language\n--regex-Sub=/[ \\t]*@def[ \\t]+([a-z0-9]+).*;$/\\1/d/\n" }, { "path": "Units/flags-langdef-directions.r/shared.d/expected.tags", "content": "f\tinput.base\t/^f() [$/;\"\tb\tlanguage:Base\nv\tinput.base\t/^\t@def v 1;$/;\"\td\tlanguage:Sub\nv0\tinput-0.sub\t/^\t@def v0 1;$/;\"\td\tlanguage:Sub\n" }, { "path": "Units/flags-langdef-directions.r/shared.d/input-0.sub", "content": "f0() [\n\t@def v0 1;\n]\n" }, { "path": "Units/flags-langdef-directions.r/shared.d/input.base", "content": "f() [\n\t@def v 1;\n]\n" }, { "path": "Units/foreign-tags.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+rlK\n\n--_roledef-C.f=documented,documented in a API document\n\n--langdef=DocC{_foreignLanguage=C}\n--map-DocC=.docc\n--regex-DocC=/^- +function: *([a-zA-Z_][a-zA-Z_0-9]+)\\(/\\1/f/{_language=C}{_role=documented}\n" }, { "path": "Units/foreign-tags.d/expected.tags", "content": "compress\tinput.docc\t/^- function: compress(const char *plain_text, enum algorithm alg) => char *$/;\"\tfunction\tlanguage:C\troles:documented\ndecompress\tinput.docc\t/^- function: decompress(const char *compressed_byteseq) => char *$/;\"\tfunction\tlanguage:C\troles:documented\n" }, { "path": "Units/foreign-tags.d/input.docc", "content": "- function: compress(const char *plain_text, enum algorithm alg) => char *\n Compress a C string PLAING_TEXT with the algorithm specified with ALG.\n\n- function: decompress(const char *compressed_byteseq) => char *\n Decompress a byte sequence compressed by compress().\n" }, { "path": "Units/fuzz-hitting-assertions.r/README", "content": "With compiling ctags with -DDEBUG option, Assert macros are\nenabled. Current -DDEBUG is given by default.\n\nThe fuzz target could make some assertions false for -DDEBUG\nctags. This directory contains such unwanted inputs found by the\ntarget. They are minimized by SHRINK=1.\n\nLet's fix them!\nDon't forget rename .b directory to .d.\n" }, { "path": "Units/fuzz-hitting-assertions.r/csharp-fha-0.d/expected.tags", "content": "" }, { "path": "Units/fuzz-hitting-assertions.r/csharp-fha-0.d/input.cs", "content": "r PARAM = 1;" }, { "path": "Units/fuzz-hitting-assertions.r/d-fha-0.d/README", "content": "Because the input is invalid as D lagnauge source code.\nFor this input parser cannot build proper scope information.\n\nexpected.tags in this directory is just placeholder. Nothing is\nexpected for invalid input.\n" }, { "path": "Units/fuzz-hitting-assertions.r/d-fha-0.d/expected.tags", "content": "T\tinput.d\t/^template(){T;$/;\"\tm\tfile:\n" }, { "path": "Units/fuzz-hitting-assertions.r/d-fha-0.d/input.d", "content": "template(){T;\n" }, { "path": "Units/fuzz-hitting-assertions.r/eiffel-fha-0.d/expected.tags", "content": "" }, { "path": "Units/fuzz-hitting-assertions.r/eiffel-fha-0.d/input.e", "content": "_" }, { "path": "Units/fuzz-hitting-assertions.r/java-fha-0.d/expected.tags", "content": "" }, { "path": "Units/fuzz-hitting-assertions.r/java-fha-0.d/input.java", "content": "r PARAM = 1;" }, { "path": "Units/fuzz-hitting-assertions.r/systemverilog-fha-0.d/expected.tags", "content": "" }, { "path": "Units/fuzz-hitting-assertions.r/systemverilog-fha-0.d/input.sv", "content": "int\n" }, { "path": "Units/fuzz-hitting-assertions.r/vera-fha-0.d/expected.tags", "content": "iA\tinput.vr\t/^interface iA {/;\"\ti\n" }, { "path": "Units/fuzz-hitting-assertions.r/vera-fha-0.d/input.vr", "content": "interface iA {" }, { "path": "Units/fuzz-hitting-assertions.r/verilog-fha-0.d/expected.tags", "content": "" }, { "path": "Units/fuzz-hitting-assertions.r/verilog-fha-0.d/input.v", "content": "input\n" }, { "path": "Units/guest-in-optlib-single-line.d/args.ctags", "content": "--sort=no\n--extras=+g\n--fields=+ln\n\n--langdef=single\n--map-single=.single\n\n--kinddef-single=d,def,definitions\n\n--regex-single=/^DEF:([a-zA-Z0-9]+)/\\1/d\n\n--regex-single=/^BEGIN:([a-zA-Z0-9]+)$//{_guest=\\1,0end,}\n--regex-single=/^BEGIN$//{_guest=,0end,}\n--regex-single=/^END:([a-zA-Z0-9]+)$//{_guest=\\1,,0start}\n--regex-single=/^END$//{_guest=,,0start}\n\n--regex-single=/^BEGIN_FILE:([a-zA-Z0-9.]+)$//{_guest=*1,0end,}\n--regex-single=/^BEGIN_FILE$//{_guest=,0end,}\n--regex-single=/^END_FILE:([a-zA-Z0-9.]+)$//{_guest=*1,,0start}\n--regex-single=/^END_FILE$//{_guest=,,0start}\n\n--regex-single=/^BEGIN_C$//{_guest=C,0end,}\n--regex-single=/^END_C$//{_guest=C,,0start}\n\n--regex-single=/^(BEGIN:([a-zA-Z0-9]+)<).*(>END)$//{_guest=\\2,1end,3start}\n--regex-single=/^BEGIN_FILE:([a-zA-Z0-9.]+)<(.*)>END_FILE$//{_guest=*1,2start,2end}\n--regex-single=/^(BEGIN_C<).*(>END_C)$//{_guest=C,1end,2start}\n" }, { "path": "Units/guest-in-optlib-single-line.d/expected.tags", "content": "S0\tinput.single\t/^DEF:S0$/;\"\tr\tline:1\tlanguage:single\nE0\tinput.single\t/^DEF:E0$/;\"\tr\tline:7\tlanguage:single\nS1\tinput.single\t/^DEF:S1$/;\"\tr\tline:10\tlanguage:single\nE1\tinput.single\t/^DEF:E1$/;\"\tr\tline:16\tlanguage:single\nS2\tinput.single\t/^DEF:S2$/;\"\tr\tline:18\tlanguage:single\nE2\tinput.single\t/^DEF:E2$/;\"\tr\tline:24\tlanguage:single\nS3\tinput.single\t/^DEF:S3$/;\"\tr\tline:26\tlanguage:single\nE3\tinput.single\t/^DEF:E3$/;\"\tr\tline:32\tlanguage:single\nS4\tinput.single\t/^DEF:S4$/;\"\tr\tline:34\tlanguage:single\nE4\tinput.single\t/^DEF:E4$/;\"\tr\tline:43\tlanguage:single\nS5\tinput.single\t/^DEF:S5$/;\"\tr\tline:45\tlanguage:single\nE5\tinput.single\t/^DEF:E5$/;\"\tr\tline:47\tlanguage:single\nS6\tinput.single\t/^DEF:S6$/;\"\tr\tline:49\tlanguage:single\nE6\tinput.single\t/^DEF:E6$/;\"\tr\tline:51\tlanguage:single\nS7\tinput.single\t/^DEF:S7$/;\"\tr\tline:53\tlanguage:single\nE7\tinput.single\t/^DEF:E7$/;\"\tr\tline:55\tlanguage:single\nf0\tinput.single\t/^(defun f0 () (list))$/;\"\tf\tline:4\tlanguage:Lisp\nf1\tinput.single\t/^(defun f1 () (list))$/;\"\tf\tline:13\tlanguage:Lisp\nf2\tinput.single\t/^(defun f2 () (list))$/;\"\tf\tline:21\tlanguage:Lisp\nf3\tinput.single\t/^(defun f3 () (list))$/;\"\tf\tline:29\tlanguage:Lisp\nf4\tinput.single\t/^int f4 (void)$/;\"\tf\tline:37\tlanguage:C\ttyperef:typename:int\nf5\tinput.single\t/(defun f5 () (list))/;\"\tf\tline:46\tlanguage:Lisp\nf6\tinput.single\t/(defun f6 () (list))/;\"\tf\tline:50\tlanguage:Lisp\nf7\tinput.single\t/int f7 (void) { return 0; }/;\"\tf\tline:54\tlanguage:C\ttyperef:typename:int\nv0\tinput-0.single\t/(defvar v0 0/;\"\tv\tline:1\tlanguage:Lisp\ng0\tinput-1.single\t/^(defun g0 () (list))$/;\"\tf\tline:2\tlanguage:Lisp\ng1\tinput-1.single\t/^int g1 (void) { return 0; }$/;\"\tf\tline:6\tlanguage:C\ttyperef:typename:int\ng2\tinput-1.single\t/^function g2$/;\"\tf\tline:10\tlanguage:Sh\nEOF\tinput-1.single\t/^\tcat > foo.rst <END\n" }, { "path": "Units/guest-in-optlib-single-line.d/input-1.single", "content": "BEGIN:lisp\n(defun g0 () (list))\nEND\n\nBEGIN:C\nint g1 (void) { return 0; }\nEND\n\nBEGIN:Sh\nfunction g2\n{\n\tcat > foo.rst <END\nDEF:E5\n\nDEF:S6\nBEGIN_FILE:bar.cl<(defun f6 () (list))>END_FILE\nDEF:E6\n\nDEF:S7\nBEGIN_CEND_C\nDEF:E7\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-after-shbang.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-after-shbang.d/expected.tags", "content": "main\tinput.nolang\t/^(define (main args) 1)$/;\"\tf\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-after-shbang.d/input.nolang", "content": "#!/bin/sh\n#| -*- scheme -*- |#\n:; exec gosh -- $0 \"$@\"\n(define (main args) 1)\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-eof.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-eof.d/expected.tags", "content": "hello-world\tinput.nolang\t/^(defun hello-world () (message \"hello, world\"))$/;\"\tf\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-eof.d/input.nolang", "content": "(defun hello-world () (message \"hello, world\"))\n;; Local Variables:\n;; mode: lisp\n;; compile-command: \"cc foo.c -Dfoo=bar -Dhack=whatever \\\n;; -Dmumble=blaah\"\n;; End:\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n;; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-firstline0.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-firstline0.d/expected.tags", "content": "hello-world\tinput.nolang\t/^(defun hello-world () (message \"hello, world\"))$/;\"\tf\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-firstline0.d/input.nolang", "content": ";; -*- mode: Lisp; fill-column: 75; comment-column: 50; -*-\n(defun hello-world () (message \"hello, world\"))\n\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-firstline1.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-firstline1.d/expected.tags", "content": "hello\tinput.nolang\t/^hello (void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-emacs-firstline1.d/input.nolang", "content": "/* -*- C -*- */\nint\nhello (void)\n{\n return printf(\"hello, world\\n\");\n}\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim0-head.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim0-head.d/expected.tags", "content": "main\tinput.nolang\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim0-head.d/input.nolang", "content": "/* ex:set filetype=c.qt: */\nint\nmain(void)\n{\n\treturn 0;\n}\n\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim0-tail.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim0-tail.d/expected.tags", "content": "main\tinput.nolang\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim0-tail.d/input.nolang", "content": "int\nmain(void)\n{\n\treturn 0;\n}\n\n/* ex:set filetype=c.qt: */\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim1-head.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim1-head.d/expected.tags", "content": "main\tinput.nolang\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim1-head.d/input.nolang", "content": "/* vim: se noet ft=c.qt: */\n\nint\nmain(void)\n{\n\treturn 0;\n}\n\n\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim1-tail.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim1-tail.d/expected.tags", "content": "main\tinput.nolang\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim1-tail.d/input.nolang", "content": "int\nmain(void)\n{\n\treturn 0;\n}\n\n/* vim: se noet ft=c.qt: */\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim2-head.d/args.ctags", "content": "--fields=+l\n--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim2-head.d/expected.tags", "content": "main\tinput.nolang\t/^main(void)$/;\"\tf\tlanguage:C\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim2-head.d/input.nolang", "content": "\n\n\n// vim: noet ft=first ft=c.qt\nint\nmain(void)\n{\n\treturn 0;\n}\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim2-tail.d/args.ctags", "content": "--fields=+l\n--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim2-tail.d/expected.tags", "content": "main\tinput.nolang\t/^main(void)$/;\"\tf\tlanguage:C\ttyperef:typename:int\n" }, { "path": "Units/main-guessing.r/nolang-modeline-vim2-tail.d/input.nolang", "content": "int\nmain(void)\n{\n\treturn 0;\n}\n\n// vim: noet ft=first ft=c.qt\n" }, { "path": "Units/main-guessing.r/nolang-modeline-zsh-autoload.d/args.ctags", "content": "-G\n--fields=+l\n" }, { "path": "Units/main-guessing.r/nolang-modeline-zsh-autoload.d/expected.tags", "content": "_ctags\tinput.nolang\t/^_ctags() {$/;\"\tf\tlanguage:Zsh\n" }, { "path": "Units/main-guessing.r/nolang-modeline-zsh-autoload.d/input.nolang", "content": "#autoload\n_ctags() {\n\t return 0\n}\n" }, { "path": "Units/main-guessing.r/nolang-modeline-zsh-compdef.d/args.ctags", "content": "-G\n--fields=+l\n\n" }, { "path": "Units/main-guessing.r/nolang-modeline-zsh-compdef.d/expected.tags", "content": "_ctags\tinput.nolang\t/^_ctags() {$/;\"\tf\tlanguage:Zsh\n" }, { "path": "Units/main-guessing.r/nolang-modeline-zsh-compdef.d/input.nolang", "content": "#compdef ctags\n_ctags() {\n\t return 0\n}\n" }, { "path": "Units/main-guessing.r/nolang-shebang-python3.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/main-guessing.r/nolang-shebang-python3.d/expected.tags", "content": "foo\tinput.nolang\t/^def foo():$/;\"\tf\n" }, { "path": "Units/main-guessing.r/nolang-shebang-python3.d/input.nolang", "content": "#!/usr/bin/python3\n\ndef foo():\n pass\n\n" }, { "path": "Units/matlab-tg-corpus.d/expected.tags", "content": "backtrack\tinput.m\t/^function [xn,fn,fcall] = backtrack(xc,d,fc,fnc,DDfnc,c,gamma,eps)$/;\"\tf\ncDDfnc\tinput.m\t/^ cDDfnc = gamma*cDDfnc;$/;\"\tv\ncDDfnc\tinput.m\t/^cDDfnc = c*DDfnc;$/;\"\tv\nd\tinput.m\t/^ d = gamma*d;$/;\"\tv\nfcall\tinput.m\t/^ fcall = fcall+1;$/;\"\tv\nfcall\tinput.m\t/^fcall = 1 ;$/;\"\tv\nfn\tinput.m\t/^ fn = feval(fnc,xn);$/;\"\tv\nfn\tinput.m\t/^fn = feval(fnc,xn);$/;\"\tv\nfunc1\tinput.m\t/^function [x,y,z] = func1 $/;\"\tf\nfunc2\tinput.m\t/^function x = func2 $/;\"\tf\nfunc3\tinput.m\t/^function func3 $/;\"\tf\nxn\tinput.m\t/^ xn = xc;$/;\"\tv\nxn\tinput.m\t/^ xn = xc+d;$/;\"\tv\nxn\tinput.m\t/^xn = xc+d;$/;\"\tv\n" }, { "path": "Units/matlab-tg-corpus.d/features", "content": "regex\n" }, { "path": "Units/matlab-tg-corpus.d/input.m", "content": "% http://www.math.washington.edu/~burke/crs/516/HTML/backtrack.html\n% Backtracking Linesearch\n\nfunction [xn,fn,fcall] = backtrack(xc,d,fc,fnc,DDfnc,c,gamma,eps)\n%\n%GENERAL DESCRIPTION\n%\n%This function performs the basic backtracking subroutine.\n%The subroutine requires the following input:\n% xc = the current point,\n% d = the direction of search,\n% fc = the current function value,\n% fnc = a string variable for the function name,\n% DDfnc = the directional derivative of fnc at xc in the\n% direction d, must have DDfnc < 0,\n% c = the slope modification parameter in (0,1),\n% gamma = the backstepping parameter in (0,1),\n% eps = the stopping criteria for norm(xn - xc),\n% that is, the main algorithm stops when\n% norm(xn - xc) <= eps.\n%\n%The routine returns\n% xn = the new point,\n% fn = the function value at the new point,\n% fnc = the number of calls to fnc.\n%\n%TERMINATION CRITERIA\n%\n%The backtracking is terminated if the step to the new point\n%xn is so small that it triggers termination in the main algorithm,\n%i.e. norm(xc - xn) <= eps. In this case we return xn = xc if\n%fn >= fc (we have not reduced the function value); otherwise,\n%we return xn.\n%\n%THE MATH\n%\n%The backtracking routing attempts to find a step size for\n%reducing the value of the function fnc given the current point xc\n%and a direction d. It does this by successively trying step sizes\n%of the form gamma^s for s = 0,1,2... to find the smallest\n%value of s for which the inequality\n%\n% fnc(xc+gamma^s*d)\\le fnc(xc)+c*gamma^s*DD\n%\n% is satisfied. The new point to be returned is then given\n% by xn = xc+gamma^s*d.\n%\n%CHECK INPUT SPECIFICATIONS\n%\nif DDfnc >= 0,\n error('The backtracking subroutine has been sent a direction of nondesce\nnt. Program has been terminated.')\nend\nif c<= 0 | c>= 1,\n error('The slope modification parameter c in the backtracking subroutine\n is not in (0,1).')\nend\nif gamma<=0 | gamma >=1,\n error('The backtracking parameter gamma is not in (0,1).')\nend\nif eps <= 0,\n error('The termination criteria eps sent to the backtracking line search\n is not positive.')\nend\n\n%\n%CHECK DIMENSIONS\n%\nif size(xc)~=size(d)\n error('The vectors sent to backtrack are not of the same dimension.')\nend\n\n%\n%\n%EXECUTE THE LINE SEARCH\n%\n%\n\nxn = xc+d;\ncDDfnc = c*DDfnc;\nfn = feval(fnc,xn);\nfcall = 1 ;\n\nwhile fn > fc+cDDfnc,\n d = gamma*d;\n cDDfnc = gamma*cDDfnc;\n xn = xc+d;\n fn = feval(fnc,xn);\n fcall = fcall+1;\n\n%Check if the step to xn is too small.\n if norm(d) <= eps,\n disp('linesearch step too small')\n if fn >= fc,\n xn = xc;\n end\n break\n end\nend\n\n\nfunction [x,y,z] = func1 \nfunction x = func2 \nfunction func3 \n\n" }, { "path": "Units/mtable-simple-with-continuation.d/args.ctags", "content": "--fields=+nKZe\n\n--langdef=X\n--langmap=X:.mtable\n--kinddef-X=c,class,classes\n--kinddef-X=n,namespace,namespaces\n\n--_tabledef-X=toplevel\n--_tabledef-X=class\n--_tabledef-X=classEnd\n--_tabledef-X=namespace\n--_tabledef-X=blockHead\n--_tabledef-X=block\n--_tabledef-X=blockEnd\n--_tabledef-X=separator\n\n--_mtable-regex-X=toplevel/class[ \\t\\n]//{tenter=class}\n--_mtable-regex-X=toplevel/namespace[ \\t\\n]//{tenter=namespace}\n--_mtable-regex-X=toplevel/[ \\n\\t]//\n--_mtable-regex-X=toplevel/.//{tenter=separator}\n\n--_mtable-regex-X=separator/[ \\n\\t]//{tleave}\n--_mtable-regex-X=separator/.//\n\n--_mtable-regex-X=class/([a-zA-Z0-9]+)/\\1/c/{tenter=blockHead,classEnd}{scope=push}\n--_mtable-regex-X=class/.//\n\n--_mtable-regex-X=namespace/([a-zA-Z0-9]+)/\\1/n/{tenter=blockHead,classEnd}{scope=push}\n--_mtable-regex-X=namespace/.//\n\n--_mtable-regex-X=blockHead/\\{//{tenter=block,blockEnd}\n--_mtable-regex-X=blockHead/.//\n\n--_mtable-regex-X=block/\\}//{tleave}\n--_mtable-extend-X=block+toplevel\n# --_mtable-regex-X=block/.//\n\n--_mtable-regex-X=classEnd///{tleave}{scope=pop}\n--_mtable-regex-X=blockEnd///{tleave}\n\n--kinds-X=-n\n" }, { "path": "Units/mtable-simple-with-continuation.d/expected.tags", "content": "a\tinput.mtable\t/^class a$/;\"\tclass\tline:1\tend:4\nc\tinput.mtable\t/^class c$/;\"\tclass\tline:13\tscope:namespace:e\tend:21\nd\tinput.mtable\t/^\tclass d {$/;\"\tclass\tline:17\tscope:class:e.c\tend:19\n" }, { "path": "Units/mtable-simple-with-continuation.d/input.mtable", "content": "class a\n{\n\t.\n}\n\n\ndummyclass b {\n.\n}\n\nnamespace e {\n\nclass c\n\n\t{ ..\n\n\tclass d {\n\n}\n\n}\n}\n" }, { "path": "Units/mtable-simple-with-table-extending.d/args.ctags", "content": "--fields=+nKZe\n--sort=no\n\n--langdef=X\n--langmap=X:.mtable\n--kinddef-X=v,var,variables\n--kinddef-X=f,fun,functions\n\n--_tabledef-X=main\n--_tabledef-X=comment_sharp_sa\n--_tabledef-X=comment_sharp_sharp\n--_tabledef-X=char\n--_tabledef-X=string\n--_tabledef-X=varlist\n--_tabledef-X=func\n--_tabledef-X=fbody\n--_tabledef-X=generic\n\n--_mtable-regex-X=generic/\\/\\*//{tenter=comment_sharp_sa}\n--_mtable-regex-X=generic/\\/\\///{tenter=comment_sharp_sharp}\n--_mtable-regex-X=generic/'//{tenter=char}\n--_mtable-regex-X=generic/\"//{tenter=string}\n\n--_mtable-extend-X=main+generic\n--_mtable-regex-X=main/var//{tenter=varlist}\n--_mtable-regex-X=main/function//{tenter=func}\n--_mtable-regex-X=main/.//\n\n--_mtable-regex-X=comment_sharp_sa/\\*\\///{tleave}\n--_mtable-regex-X=comment_sharp_sa/.//\n\n--_mtable-regex-X=comment_sharp_sharp/\\n//{tleave}\n--_mtable-regex-X=comment_sharp_sharp/.//\n\n--_mtable-regex-X=char/'//{tleave}\n--_mtable-regex-X=char/.//\n\n--_mtable-regex-X=string/\"//{tleave}\n--_mtable-regex-X=string/.//\n\n--_mtable-extend-X=varlist+generic\n--_mtable-regex-X=varlist/([a-zA-Z]+)/\\1/v/{scope=ref}\n--_mtable-regex-X=varlist/;//{tleave}\n--_mtable-regex-X=varlist/.//\n\n--_mtable-extend-X=func+generic\n--_mtable-regex-X=func/([a-zA-Z]+)/\\1/f/{scope=push}\n--_mtable-regex-X=func/\\{//{tjump=fbody}\n--_mtable-regex-X=func/.//\n\n--_mtable-extend-X=fbody+generic\n--_mtable-regex-X=fbody/\\}//{tleave}{scope=pop}\n--_mtable-regex-X=fbody/var//{tenter=varlist}\n--_mtable-regex-X=fbody/function//{tenter=func}\n--_mtable-regex-X=fbody/.//\n" }, { "path": "Units/mtable-simple-with-table-extending.d/expected.tags", "content": "foo\tinput.mtable\t/^function foo$/;\"\tfun\tline:1\tend:17\na\tinput.mtable\t/^\tvar a, b,$/;\"\tvar\tline:3\tscope:fun:foo\nb\tinput.mtable\t/^\tvar a, b,$/;\"\tvar\tline:3\tscope:fun:foo\nc\tinput.mtable\t/^c, e = \"x\";$/;\"\tvar\tline:16\tscope:fun:foo\ne\tinput.mtable\t/^c, e = \"x\";$/;\"\tvar\tline:16\tscope:fun:foo\nbar\tinput.mtable\t/^function bar$/;\"\tfun\tline:19\tend:27\ny\tinput.mtable\t/^\tvar y;$/;\"\tvar\tline:21\tscope:fun:bar\nbaz\tinput.mtable\t/^\tfunction baz$/;\"\tfun\tline:22\tscope:fun:bar\tend:25\nz\tinput.mtable\t/^\t\tvar z;$/;\"\tvar\tline:24\tscope:fun:bar.baz\n" }, { "path": "Units/mtable-simple-with-table-extending.d/input.mtable", "content": "function foo\n{\n\tvar a, b,\n\n\n/* \n\n, \n\n\n*/\n\n\n// D,\n\nc, e = \"x\";\n}\n\nfunction bar\n{\n\tvar y;\n\tfunction baz\n\t{\n\t\tvar z;\n\t}\n\n}\n\n" }, { "path": "Units/mtable-simple.d/args.ctags", "content": "--fields=+nKZe\n--sort=no\n\n--langdef=X\n--langmap=X:.mtable\n--kinddef-X=v,var,variables\n--kinddef-X=f,fun,functions\n\n--_tabledef-X=main\n--_tabledef-X=comment_sharp_sa\n--_tabledef-X=comment_sharp_sharp\n--_tabledef-X=char\n--_tabledef-X=string\n--_tabledef-X=varlist\n--_tabledef-X=func\n--_tabledef-X=fbody\n\n--_mtable-regex-X=main/\\/\\*//{tenter=comment_sharp_sa}\n--_mtable-regex-X=main/\\/\\///{tenter=comment_sharp_sharp}\n--_mtable-regex-X=main/'//{tenter=char}\n--_mtable-regex-X=main/\"//{tenter=string}\n--_mtable-regex-X=main/var//{tenter=varlist}\n--_mtable-regex-X=main/function//{tenter=func}\n--_mtable-regex-X=main/.//\n\n--_mtable-regex-X=comment_sharp_sa/\\*\\///{tleave}\n--_mtable-regex-X=comment_sharp_sa/.//\n\n--_mtable-regex-X=comment_sharp_sharp/\\n//{tleave}\n--_mtable-regex-X=comment_sharp_sharp/.//\n\n--_mtable-regex-X=char/'//{tleave}\n--_mtable-regex-X=char/.//\n\n--_mtable-regex-X=string/\"//{tleave}\n--_mtable-regex-X=string/.//\n\n--_mtable-regex-X=varlist/\\/\\*//{tenter=comment_sharp_sa}\n--_mtable-regex-X=varlist/\\/\\///{tenter=comment_sharp_sharp}\n--_mtable-regex-X=varlist/'//{tenter=char}\n--_mtable-regex-X=varlist/\"//{tenter=string}\n--_mtable-regex-X=varlist/([a-zA-Z]+)/\\1/v/{scope=ref}\n--_mtable-regex-X=varlist/;//{tleave}\n--_mtable-regex-X=varlist/.//\n\n--_mtable-regex-X=func/\\/\\*//{tenter=comment_sharp_sa}\n--_mtable-regex-X=func/\\/\\///{tenter=comment_sharp_sharp}\n--_mtable-regex-X=func/'//{tenter=char}\n--_mtable-regex-X=func/\"//{tenter=string}\n--_mtable-regex-X=func/([a-zA-Z]+)/\\1/f/{scope=push}\n--_mtable-regex-X=func/\\{//{tjump=fbody}\n--_mtable-regex-X=func/.//\n\n--_mtable-regex-X=fbody/\\/\\*//{tenter=comment_sharp_sa}\n--_mtable-regex-X=fbody/\\/\\///{tenter=comment_sharp_sharp}\n--_mtable-regex-X=fbody/'//{tenter=char}\n--_mtable-regex-X=fbody/\"//{tenter=string}\n--_mtable-regex-X=fbody/\\}//{tleave}{scope=pop}\n--_mtable-regex-X=fbody/var//{tenter=varlist}\n--_mtable-regex-X=fbody/function//{tenter=func}\n--_mtable-regex-X=fbody/.//\n" }, { "path": "Units/mtable-simple.d/expected.tags", "content": "foo\tinput.mtable\t/^function foo$/;\"\tfun\tline:1\tend:17\na\tinput.mtable\t/^\tvar a, b,$/;\"\tvar\tline:3\tscope:fun:foo\nb\tinput.mtable\t/^\tvar a, b,$/;\"\tvar\tline:3\tscope:fun:foo\nc\tinput.mtable\t/^c, e = \"x\";$/;\"\tvar\tline:16\tscope:fun:foo\ne\tinput.mtable\t/^c, e = \"x\";$/;\"\tvar\tline:16\tscope:fun:foo\nbar\tinput.mtable\t/^function bar$/;\"\tfun\tline:19\tend:27\ny\tinput.mtable\t/^\tvar y;$/;\"\tvar\tline:21\tscope:fun:bar\nbaz\tinput.mtable\t/^\tfunction baz$/;\"\tfun\tline:22\tscope:fun:bar\tend:25\nz\tinput.mtable\t/^\t\tvar z;$/;\"\tvar\tline:24\tscope:fun:bar.baz\n" }, { "path": "Units/mtable-simple.d/input.mtable", "content": "function foo\n{\n\tvar a, b,\n\n\n/* \n\n, \n\n\n*/\n\n\n// D,\n\nc, e = \"x\";\n}\n\nfunction bar\n{\n\tvar y;\n\tfunction baz\n\t{\n\t\tvar z;\n\t}\n\n}\n\n" }, { "path": "Units/noext-tg-matlab.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/noext-tg-matlab.d/expected.tags", "content": "backtrack\tinput.nolang\t/^function [xn,fn,fcall] = backtrack(xc,d,fc,fnc,DDfnc,c,gamma,eps)$/;\"\tf\ncDDfnc\tinput.nolang\t/^ cDDfnc = gamma*cDDfnc;$/;\"\tv\ncDDfnc\tinput.nolang\t/^cDDfnc = c*DDfnc;$/;\"\tv\nd\tinput.nolang\t/^ d = gamma*d;$/;\"\tv\nfcall\tinput.nolang\t/^ fcall = fcall+1;$/;\"\tv\nfcall\tinput.nolang\t/^fcall = 1 ;$/;\"\tv\nfn\tinput.nolang\t/^ fn = feval(fnc,xn);$/;\"\tv\nfn\tinput.nolang\t/^fn = feval(fnc,xn);$/;\"\tv\nfunc1\tinput.nolang\t/^function [x,y,z] = func1 $/;\"\tf\nfunc2\tinput.nolang\t/^function x = func2 $/;\"\tf\nfunc3\tinput.nolang\t/^function func3 $/;\"\tf\nxn\tinput.nolang\t/^ xn = xc;$/;\"\tv\nxn\tinput.nolang\t/^ xn = xc+d;$/;\"\tv\nxn\tinput.nolang\t/^xn = xc+d;$/;\"\tv\n" }, { "path": "Units/noext-tg-matlab.d/features", "content": "regex\n" }, { "path": "Units/noext-tg-matlab.d/input.nolang", "content": "% -*- matlab -*-\n% http://www.math.washington.edu/~burke/crs/516/HTML/backtrack.html\n% Backtracking Linesearch\n\nfunction [xn,fn,fcall] = backtrack(xc,d,fc,fnc,DDfnc,c,gamma,eps)\n%\n%GENERAL DESCRIPTION\n%\n%This function performs the basic backtracking subroutine.\n%The subroutine requires the following input:\n% xc = the current point,\n% d = the direction of search,\n% fc = the current function value,\n% fnc = a string variable for the function name,\n% DDfnc = the directional derivative of fnc at xc in the\n% direction d, must have DDfnc < 0,\n% c = the slope modification parameter in (0,1),\n% gamma = the backstepping parameter in (0,1),\n% eps = the stopping criteria for norm(xn - xc),\n% that is, the main algorithm stops when\n% norm(xn - xc) <= eps.\n%\n%The routine returns\n% xn = the new point,\n% fn = the function value at the new point,\n% fnc = the number of calls to fnc.\n%\n%TERMINATION CRITERIA\n%\n%The backtracking is terminated if the step to the new point\n%xn is so small that it triggers termination in the main algorithm,\n%i.e. norm(xc - xn) <= eps. In this case we return xn = xc if\n%fn >= fc (we have not reduced the function value); otherwise,\n%we return xn.\n%\n%THE MATH\n%\n%The backtracking routing attempts to find a step size for\n%reducing the value of the function fnc given the current point xc\n%and a direction d. It does this by successively trying step sizes\n%of the form gamma^s for s = 0,1,2... to find the smallest\n%value of s for which the inequality\n%\n% fnc(xc+gamma^s*d)\\le fnc(xc)+c*gamma^s*DD\n%\n% is satisfied. The new point to be returned is then given\n% by xn = xc+gamma^s*d.\n%\n%CHECK INPUT SPECIFICATIONS\n%\nif DDfnc >= 0,\n error('The backtracking subroutine has been sent a direction of nondesce\nnt. Program has been terminated.')\nend\nif c<= 0 | c>= 1,\n error('The slope modification parameter c in the backtracking subroutine\n is not in (0,1).')\nend\nif gamma<=0 | gamma >=1,\n error('The backtracking parameter gamma is not in (0,1).')\nend\nif eps <= 0,\n error('The termination criteria eps sent to the backtracking line search\n is not positive.')\nend\n\n%\n%CHECK DIMENSIONS\n%\nif size(xc)~=size(d)\n error('The vectors sent to backtrack are not of the same dimension.')\nend\n\n%\n%\n%EXECUTE THE LINE SEARCH\n%\n%\n\nxn = xc+d;\ncDDfnc = c*DDfnc;\nfn = feval(fnc,xn);\nfcall = 1 ;\n\nwhile fn > fc+cDDfnc,\n d = gamma*d;\n cDDfnc = gamma*cDDfnc;\n xn = xc+d;\n fn = feval(fnc,xn);\n fcall = fcall+1;\n\n%Check if the step to xn is too small.\n if norm(d) <= eps,\n disp('linesearch step too small')\n if fn >= fc,\n xn = xc;\n end\n break\n end\nend\n\n\nfunction [x,y,z] = func1 \nfunction x = func2 \nfunction func3 \n\n" }, { "path": "Units/noext-tg-objc.d/args.ctags", "content": "--guess-language-eagerly\n" }, { "path": "Units/noext-tg-objc.d/expected.tags", "content": "FileTree\tinput.nolang\t/^@implementation FileTree$/;\"\tI\nFolderTree\tinput.nolang\t/^@implementation FolderTree$/;\"\tI\nMyClass\tinput.nolang\t/^@implementation MyClass$/;\"\tI\naddChild:\tinput.nolang\t/^- (FolderTree*)addChild:(FileTree*)subTree$/;\"\tm\timplementation:FolderTree\ncreateFileList:atPlace:\tinput.nolang\t/^+ (void) createFileList: (NSString*)root atPlace:(FolderTree*)parentFolder$/;\"\tc\timplementation:FolderTree\ncreateLayoutTree\tinput.nolang\t/^- (LayoutTree*)createLayoutTree$/;\"\tm\timplementation:FileTree\ncreateLayoutTree\tinput.nolang\t/^- (LayoutTree*)createLayoutTree$/;\"\tm\timplementation:FolderTree\ndealloc\tinput.nolang\t/^- (void)dealloc$/;\"\tm\timplementation:FileTree\ndealloc\tinput.nolang\t/^- (void)dealloc$/;\"\tm\timplementation:FolderTree\ngetDiskSize\tinput.nolang\t/^- (FileSize)getDiskSize$/;\"\tm\timplementation:FileTree\ninitWithName:andSize:atPlace:\tinput.nolang\t/^- (id)initWithName:(NSString*)treeName$/;\"\tm\timplementation:FileTree\ninitWithName:atPlace:\tinput.nolang\t/^- (id)initWithName:(NSString*)treeName$/;\"\tm\timplementation:FileTree\ninitWithName:atPlace:\tinput.nolang\t/^- (id)initWithName:(NSString*)treeName$/;\"\tm\timplementation:FolderTree\nmain\tinput.nolang\t/^int main(int argc, char** argv)$/;\"\tf\nmyClassMethod:with:\tinput.nolang\t/^+ (void)myClassMethod:(int)arg1 with:(id)arg2;$/;\"\tc\timplementation:MyClass\nmyInstanceMethod:with:\tinput.nolang\t/^- (void)myInstanceMethod:(int)arg1 with:(id)arg2;$/;\"\tm\timplementation:MyClass\npopulateChildList:\tinput.nolang\t/^- (void) populateChildList:(NSString*)root$/;\"\tm\timplementation:FolderTree\n" }, { "path": "Units/noext-tg-objc.d/input.nolang", "content": "/* -*- objc -*- */\n#if 0\n// This is ABOUT of Units facility.\n// ABC\n/* ABC */\n/* ABC\n */\n/* ABC\n *\n */\n#include \n#include \"stdio.h\"\n#include \n#include \"a/stdio.h\"\n#include \"a_stdio.h\"\n#endif\n\nint main(int argc, char** argv)\n{\n return __pid;\n}\n#endif\n@implementation MyClass\n\n+ (void)myClassMethod:(int)arg1 with:(id)arg2;\n- (void)myInstanceMethod:(int)arg1 with:(id)arg2;\n\n@end\n\n@implementation FileTree\n- (FileSize)getDiskSize\n{\n return diskSize;\n}\n\n- (id)initWithName:(NSString*)treeName\n atPlace:(FolderTree*)parentFolder\n{\n self = [super init];\n\n diskSize = 0;\n name = treeName;\n parent = parentFolder;\n [name retain];\n representation = nil;\n\n return self;\n}\n\n- (id)initWithName:(NSString*)treeName\n andSize:(FileSize)size\n atPlace:(FolderTree*)parentFolder\n{\n self = [super init];\n\n diskSize = size;\n name = treeName;\n parent = parentFolder;\n [name retain];\n representation = nil;\n\n return self;\n}\n\n- (void)dealloc\n{\n [name release];\n [representation release];\n [super dealloc];\n}\n\n- (LayoutTree*)createLayoutTree\n{\n return nil;\n}\n@end\n\n@implementation FolderTree\n- (id)initWithName:(NSString*)treeName\n atPlace:(FolderTree*)parentFolder\n{\n self = [super initWithName:treeName\n atPlace:parentFolder];\n\n children = [[NSMutableArray alloc] init];\n return self;\n}\n\n- (void)dealloc\n{\n [children release];\n [super dealloc];\n}\n\n+ (void) createFileList: (NSString*)root atPlace:(FolderTree*)parentFolder\n{\n\tNSFileManager *localFileManager = [[NSFileManager alloc] init];\n\tNSURL\t\t *rootUrl = [NSURL fileURLWithPath:root];\n\tNSDirectoryEnumerator *dirEnumerator = [localFileManager enumeratorAtURL:rootUrl\n\t\t\t\t\t\t\t\t\t\t\t\n includingPropertiesForKeys:[NSArray arrayWithObjects:\n NSURLNameKey,\n NSURLIsDirectoryKey,\n nil]\n\t\t\t\t\t\t\t\t\t\t\t\n options:NSDirectoryEnumerationSkipsHiddenFiles\n\t\t\t\t\t\t\t\t\t\t\t\n errorHandler:nil];\n \n\tfor (NSURL *theURL in dirEnumerator)\n\t{\n [theURL getResourceValue:&fileName\n\t\t\t\t\t\t forKey:NSURLNameKey\n\t\t\t\t\t\t error:NULL];\n \n // Ignore files under the _extras directory\n if ([isDirectory boolValue]==YES)\n {\n [folder populateChildList:root];\n }\n else if ([isDirectory boolValue]==NO)\n {\n [parentFolder addChild:f];\n }\t\t\n }\n}\n\n- (void) populateChildList:(NSString*)root\n{\n NSString *thisRoot = [[root stringByAppendingString:@\"/\"]\n stringByAppendingString:name];\n \n [FolderTree createFileList:thisRoot\n atPlace:self];\n \n for ( FileTree *f in children )\n diskSize += [f getDiskSize];\n}\n\n- (FolderTree*)addChild:(FileTree*)subTree\n{\n [children addObject:subTree];\n return self;\n}\n\n- (LayoutTree*)createLayoutTree\n{\n return\n [[LayoutTree alloc] initWithFileList:children\n andTotalSize:diskSize];\n}\n@end\n" }, { "path": "Units/objc-tg-corpus.d/expected.tags", "content": "FileTree\tinput.m\t/^@implementation FileTree$/;\"\tI\nFolderTree\tinput.m\t/^@implementation FolderTree$/;\"\tI\nMyClass\tinput.m\t/^@implementation MyClass$/;\"\tI\naddChild:\tinput.m\t/^- (FolderTree*)addChild:(FileTree*)subTree$/;\"\tm\timplementation:FolderTree\ncreateFileList:atPlace:\tinput.m\t/^+ (void) createFileList: (NSString*)root atPlace:(FolderTree*)parentFolder$/;\"\tc\timplementation:FolderTree\ncreateLayoutTree\tinput.m\t/^- (LayoutTree*)createLayoutTree$/;\"\tm\timplementation:FileTree\ncreateLayoutTree\tinput.m\t/^- (LayoutTree*)createLayoutTree$/;\"\tm\timplementation:FolderTree\ndealloc\tinput.m\t/^- (void)dealloc$/;\"\tm\timplementation:FileTree\ndealloc\tinput.m\t/^- (void)dealloc$/;\"\tm\timplementation:FolderTree\ngetDiskSize\tinput.m\t/^- (FileSize)getDiskSize$/;\"\tm\timplementation:FileTree\ninitWithName:andSize:atPlace:\tinput.m\t/^- (id)initWithName:(NSString*)treeName$/;\"\tm\timplementation:FileTree\ninitWithName:atPlace:\tinput.m\t/^- (id)initWithName:(NSString*)treeName$/;\"\tm\timplementation:FileTree\ninitWithName:atPlace:\tinput.m\t/^- (id)initWithName:(NSString*)treeName$/;\"\tm\timplementation:FolderTree\nmain\tinput.m\t/^int main(int argc, char** argv)$/;\"\tf\nmyClassMethod:with:\tinput.m\t/^+ (void)myClassMethod:(int)arg1 with:(id)arg2;$/;\"\tc\timplementation:MyClass\nmyInstanceMethod:with:\tinput.m\t/^- (void)myInstanceMethod:(int)arg1 with:(id)arg2;$/;\"\tm\timplementation:MyClass\npopulateChildList:\tinput.m\t/^- (void) populateChildList:(NSString*)root$/;\"\tm\timplementation:FolderTree\n" }, { "path": "Units/objc-tg-corpus.d/input.m", "content": "#if 0\n// This is ABOUT of Units facility.\n// ABC\n/* ABC */\n/* ABC\n */\n/* ABC\n *\n */\n#include \n#include \"stdio.h\"\n#include \n#include \"a/stdio.h\"\n#include \"a_stdio.h\"\n#endif\n\nint main(int argc, char** argv)\n{\n return __pid;\n}\n#endif\n@implementation MyClass\n\n+ (void)myClassMethod:(int)arg1 with:(id)arg2;\n- (void)myInstanceMethod:(int)arg1 with:(id)arg2;\n\n@end\n\n@implementation FileTree\n- (FileSize)getDiskSize\n{\n return diskSize;\n}\n\n- (id)initWithName:(NSString*)treeName\n atPlace:(FolderTree*)parentFolder\n{\n self = [super init];\n\n diskSize = 0;\n name = treeName;\n parent = parentFolder;\n [name retain];\n representation = nil;\n\n return self;\n}\n\n- (id)initWithName:(NSString*)treeName\n andSize:(FileSize)size\n atPlace:(FolderTree*)parentFolder\n{\n self = [super init];\n\n diskSize = size;\n name = treeName;\n parent = parentFolder;\n [name retain];\n representation = nil;\n\n return self;\n}\n\n- (void)dealloc\n{\n [name release];\n [representation release];\n [super dealloc];\n}\n\n- (LayoutTree*)createLayoutTree\n{\n return nil;\n}\n@end\n\n@implementation FolderTree\n- (id)initWithName:(NSString*)treeName\n atPlace:(FolderTree*)parentFolder\n{\n self = [super initWithName:treeName\n atPlace:parentFolder];\n\n children = [[NSMutableArray alloc] init];\n return self;\n}\n\n- (void)dealloc\n{\n [children release];\n [super dealloc];\n}\n\n+ (void) createFileList: (NSString*)root atPlace:(FolderTree*)parentFolder\n{\n\tNSFileManager *localFileManager = [[NSFileManager alloc] init];\n\tNSURL\t\t *rootUrl = [NSURL fileURLWithPath:root];\n\tNSDirectoryEnumerator *dirEnumerator = [localFileManager enumeratorAtURL:rootUrl\n\t\t\t\t\t\t\t\t\t\t\t\n includingPropertiesForKeys:[NSArray arrayWithObjects:\n NSURLNameKey,\n NSURLIsDirectoryKey,\n nil]\n\t\t\t\t\t\t\t\t\t\t\t\n options:NSDirectoryEnumerationSkipsHiddenFiles\n\t\t\t\t\t\t\t\t\t\t\t\n errorHandler:nil];\n \n\tfor (NSURL *theURL in dirEnumerator)\n\t{\n [theURL getResourceValue:&fileName\n\t\t\t\t\t\t forKey:NSURLNameKey\n\t\t\t\t\t\t error:NULL];\n \n // Ignore files under the _extras directory\n if ([isDirectory boolValue]==YES)\n {\n [folder populateChildList:root];\n }\n else if ([isDirectory boolValue]==NO)\n {\n [parentFolder addChild:f];\n }\t\t\n }\n}\n\n- (void) populateChildList:(NSString*)root\n{\n NSString *thisRoot = [[root stringByAppendingString:@\"/\"]\n stringByAppendingString:name];\n \n [FolderTree createFileList:thisRoot\n atPlace:self];\n \n for ( FileTree *f in children )\n diskSize += [f getDiskSize];\n}\n\n- (FolderTree*)addChild:(FileTree*)subTree\n{\n [children addObject:subTree];\n return self;\n}\n\n- (LayoutTree*)createLayoutTree\n{\n return\n [[LayoutTree alloc] initWithFileList:children\n andTotalSize:diskSize];\n}\n@end\n" }, { "path": "Units/option-add-alias.d/args.ctags", "content": "--alias-python=+serpent\n--guess-language-eagerly\n" }, { "path": "Units/option-add-alias.d/expected.tags", "content": "main\tinput.nolang\t/^def main (args):$/;\"\tf\n" }, { "path": "Units/option-add-alias.d/input.nolang", "content": "#!/bin/serpent\ndef main (args):\n print args\n" }, { "path": "Units/option-disable-kind-in-both.d/args.ctags", "content": "--regex-c=/define (.*);/\\1/f,function/\n--kinds-c=-f\n" }, { "path": "Units/option-disable-kind-in-both.d/expected.tags", "content": "" }, { "path": "Units/option-disable-kind-in-both.d/input.c", "content": "int\nmain(void)\n{\n define a;\n return a;\n}\n" }, { "path": "Units/option-disable-kind-in-builtin.d/args.ctags", "content": "--regex-c=/define (.*);/\\1/X,XDEFINE/\n--kinds-c=-f\n" }, { "path": "Units/option-disable-kind-in-builtin.d/expected.tags", "content": "a\tinput.c\t/^ define a;$/;\"\tX\n" }, { "path": "Units/option-disable-kind-in-builtin.d/features", "content": "regex\n" }, { "path": "Units/option-disable-kind-in-builtin.d/input.c", "content": "int\nmain(void)\n{\n define a;\n return a;\n}\n" }, { "path": "Units/option-disable-kind-in-regex.d/args.ctags", "content": "--regex-c=/define (.*);/\\1/X,XDEFINE/\n--kinds-c=-X\n" }, { "path": "Units/option-disable-kind-in-regex.d/expected.tags", "content": "main\tinput.c\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-disable-kind-in-regex.d/input.c", "content": "int\nmain(void)\n{\n define a;\n return a;\n}\n" }, { "path": "Units/option-extradef.d/args.ctags", "content": "--_extradef-Python=main,__main__ entry points\n--extras-Python=+{main}\n--regex-Python=/^if __name__ == '__main__':/__main__/f/{_extra=main}\n--fields=+E\n" }, { "path": "Units/option-extradef.d/expected.tags", "content": "__main__\tinput.py\t/^if __name__ == '__main__':$/;\"\tf\textras:main\n" }, { "path": "Units/option-extradef.d/input.py", "content": "#\n#\n#\n\nif __name__ == '__main__':\n do_something()\n \n" }, { "path": "Units/option-file-tags-no.d/args.ctags", "content": "--file-tags=no\n--fields=+K\n" }, { "path": "Units/option-file-tags-no.d/expected.tags", "content": "" }, { "path": "Units/option-file-tags-no.d/input.mk", "content": "" }, { "path": "Units/option-file-tags.d/args.ctags", "content": "--file-tags\n--fields=+K\n" }, { "path": "Units/option-file-tags.d/expected.tags", "content": "input.mk\tinput.mk\t1;\"\tfile\n" }, { "path": "Units/option-file-tags.d/input.mk", "content": "" }, { "path": "Units/option-input-file.d/README", "content": "This test case is intended to be run under valgrind for capaturing memory leaks.\n" }, { "path": "Units/option-input-file.d/args.ctags", "content": "SOMETHING STRING\n" }, { "path": "Units/option-input-file.d/expected.tags", "content": "main\tinput.c\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-input-file.d/input.c", "content": "int\nmain(void)\n{\n}\n" }, { "path": "Units/option-lang-compatibility.d/args.ctags", "content": "--langdef=foo\n--langmap=foo:+.foo\n--regex-foo=/^\\/([a-z]) def$/\\1/d,definition/\n" }, { "path": "Units/option-lang-compatibility.d/expected.tags", "content": "x\tinput.foo\t/^\\/x def$/;\"\td\ny\tinput.foo\t/^\\/y def$/;\"\td\nz\tinput.foo\t/^\\/z def$/;\"\td\n" }, { "path": "Units/option-lang-compatibility.d/features", "content": "regex\n" }, { "path": "Units/option-lang-compatibility.d/input.foo", "content": "/x def\n/y def\n/z def\n" }, { "path": "Units/option-langmap-ext--ext.d/args.ctags", "content": "--langmap=c:.c.x\n" }, { "path": "Units/option-langmap-ext--ext.d/expected.tags", "content": "main\tinput.x\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-langmap-ext--ext.d/input.x", "content": "int\nmain(void)\n{\n\treturn 0;\n}" }, { "path": "Units/option-langmap-ext--pat-ext.d/args.ctags", "content": "--langmap=c:.c(input.zzz).x\n" }, { "path": "Units/option-langmap-ext--pat-ext.d/expected.tags", "content": "main\tinput.zzz\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-langmap-ext--pat-ext.d/input.zzz", "content": "int\nmain(void)\n{\n\treturn 0;\n}" }, { "path": "Units/option-langmap-ext-pat--ext.d/args.ctags", "content": "--langmap=c:.c(input.ZZZ).x\n" }, { "path": "Units/option-langmap-ext-pat--ext.d/expected.tags", "content": "main\tinput.x\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-langmap-ext-pat--ext.d/input.x", "content": "int\nmain(void)\n{\n\treturn 0;\n}" }, { "path": "Units/option-langmap-pat--ext.d/args.ctags", "content": "--langmap=c:(input.YYY).x\n" }, { "path": "Units/option-langmap-pat--ext.d/expected.tags", "content": "main\tinput.x\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-langmap-pat--ext.d/input.x", "content": "int\nmain(void)\n{\n\treturn 0;\n}" }, { "path": "Units/option-langmap-pat--pat-ext.d/args.ctags", "content": "--langmap=c:(input.yyy)(input.zzz).x\n" }, { "path": "Units/option-langmap-pat--pat-ext.d/expected.tags", "content": "main\tinput.zzz\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-langmap-pat--pat-ext.d/input.zzz", "content": "int\nmain(void)\n{\n\treturn 0;\n}" }, { "path": "Units/option-regex-attaching-role.r/extending-existing-parser.d/args.ctags", "content": "#\n# This is an example of capturing reference tags by extending\n# already existing parser.\n# \n# Gauche is an implementation Scheme language.\n# It has a module system.\n#\n# Copyright: 2018 Masatake YAMATO\n# License: GPL-2\n#\n--langdef=myGauche{base=Scheme}\n\n--kinddef-myGauche=m,module,modules\n--_roledef-myGauche.m=used,specified as argument for use\n--_roledef-myGauche.{module}=exported,specified as argument for export\n--_roledef-myGauche.{module}=selected,specified as argument for select\n\n--_tabledef-myGauche=main\n--_tabledef-myGauche=export\n\n\n#\n# MAIN TABLE\n#\n\n# Cut the corners.\n# In serious parser, You should define tables for select-module, define-module and use.\n--_mtable-regex-myGauche=main/\\(define-module[ \\t\\n]+([-a-zA-Z0-9]+)/\\1/m/{tenter=main}{scope=push}\n\n--_mtable-regex-myGauche=main/\\(//{tenter=main}{scope=push}{placeholder}\n--_mtable-regex-myGauche=main/\\)//{tleave}{scope=pop}\n--_mtable-regex-myGauche=main/[ \\t\\n]+//\n\n# Cut the corners.\n--_mtable-regex-myGauche=main/select-module[ \\t\\n]+([-a-zA-Z0-9]+)/\\1/m/{_role=selected}{scope=set}\n--_mtable-regex-myGauche=main/use[ \\t\\n]+([-a-zA-Z0-9]+)/\\1/m/{_role=used}{scope=ref}\n\n--_mtable-regex-myGauche=main/export[ \\t\\n]+//{tenter=export}\n\n# TODO: This fall-back pattern should be implementated in ctags main side as default behaviour.\n--_mtable-regex-myGauche=main/.//\n\n#\n# EXPORT TABLE\n#\n\n--_mtable-regex-myGauche=export/[ \\t\\n]+//\n\n# TODO: Why \\0 is not allowed?\n--_mtable-regex-myGauche=export/([-a-zA-Z0-9]+)/\\1/m/{_role=exported}{scope=ref}\n\n# Return to parent table with ungetc\n--_mtable-regex-myGauche=export/\\)//{_advanceTo=0start}{tleave}\n--_mtable-regex-myGauche=export/.//\n\n\n--extras=+r\n--fields=+r\n\n--fields=+K{scope}{language}\n\n--sort=no\n" }, { "path": "Units/option-regex-attaching-role.r/extending-existing-parser.d/expected.tags", "content": "foo\tinput.scm\t/^(define-module foo$/;\"\tunknown\tlanguage:Scheme\troles:def\tdefiner:DEFINE-MODULE\nfoobar\tinput.scm\t/^(define (foobar)$/;\"\tfunction\tlanguage:Scheme\troles:def\nfoo\tinput.scm\t/^(define-module foo$/;\"\tmodule\tlanguage:myGauche\troles:def\nbar\tinput.scm\t/^ (use bar)$/;\"\tmodule\tlanguage:myGauche\tscope:module:foo\troles:used\nbaz0\tinput.scm\t/^ (export baz0 baz1))$/;\"\tmodule\tlanguage:myGauche\tscope:module:foo\troles:exported\nbaz1\tinput.scm\t/^ (export baz0 baz1))$/;\"\tmodule\tlanguage:myGauche\tscope:module:foo\troles:exported\nfoo\tinput.scm\t/^(select-module foo)$/;\"\tmodule\tlanguage:myGauche\troles:selected\n" }, { "path": "Units/option-regex-attaching-role.r/extending-existing-parser.d/input.scm", "content": "(define-module foo\n (use bar)\n (export baz0 baz1))\n(select-module foo)\n(define (foobar)\n 1)\n" }, { "path": "Units/option-regex-attaching-role.r/standing-alone-line-parser.d/args.ctags", "content": "--langdef=FOO\n--map-FOO=.foo\n\n--kinddef-FOO=m,module,modules\n--kinddef-FOO=f,foofile,files written in FOO{_refonly}\n--kinddef-FOO=n,namespace,namespace\n\n--_fielddef-FOO=assocMod,module associated with the namespace\n\n--_roledef-FOO.m=used,refereed as an external module\n--_roledef-FOO.{module}=loaded,loaded into the current name space\n--_roledef-FOO.f=loaded,loaded into the current name space\n\n--regex-FOO=/^defmod +([A-Z]+)/\\1/m/\n--regex-FOO=/^use +([A-Z]+)/\\1/m/{_role=used}\n--regex-FOO=/^load +([A-Z]+)/\\1/m/{_role=loaded}\n--regex-FOO=/^load +\"([^\"]+)\"/\\1/f/{_role=loaded}\n--regex-FOO=/^load-and-use +([A-Z]+)/\\1/m/{_role=loaded}{_role=used}\n\n--regex-FOO=/^use +([A-Z]+) +as +([a-z]+)/\\2/n/{_field=assocMod:\\1}\n--regex-FOO=/^load-and-use +([A-Z]+) +as +([a-z]+)/\\2/n/{_field=assocMod:\\1}\n\n--fields=+r\n--fields-FOO=+{assocMod}\n--extras=+r\n--sort=no\n" }, { "path": "Units/option-regex-attaching-role.r/standing-alone-line-parser.d/expected.tags", "content": "A\tinput.foo\t/^use A$/;\"\tm\troles:used\nB\tinput.foo\t/^load B$/;\"\tm\troles:loaded\nC.foo\tinput.foo\t/^load \"C.foo\"$/;\"\tf\troles:loaded\nD\tinput.foo\t/^load-and-use D$/;\"\tm\troles:used,loaded\nE\tinput.foo\t/^use E as e$/;\"\tm\troles:used\ne\tinput.foo\t/^use E as e$/;\"\tn\troles:def\tassocMod:E\nF\tinput.foo\t/^load-and-use F as f$/;\"\tm\troles:used,loaded\nf\tinput.foo\t/^load-and-use F as f$/;\"\tn\troles:def\tassocMod:F\nMYMODULE\tinput.foo\t/^defmod MYMODULE$/;\"\tm\troles:def\n" }, { "path": "Units/option-regex-attaching-role.r/standing-alone-line-parser.d/input.foo", "content": "use A\nload B\nload \"C.foo\"\nload-and-use D\n\nuse E as e\nload-and-use F as f\n\ndefmod MYMODULE\n" }, { "path": "Units/option-same-kind-in-regex-and-builtin.d/args.ctags", "content": "--regex-c=/define (.*);/\\1/f,function/\n--kinds-c=f\n" }, { "path": "Units/option-same-kind-in-regex-and-builtin.d/expected.tags", "content": "a\tinput.c\t/^ define a;$/;\"\tf\nmain\tinput.c\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/option-same-kind-in-regex-and-builtin.d/features", "content": "regex\n" }, { "path": "Units/option-same-kind-in-regex-and-builtin.d/input.c", "content": "unsigned int level = 42;\nint\nmain(void)\n{\n define a;\n return a;\n}\n" }, { "path": "Units/optlib-recursive.d/args.ctags", "content": "--options=lang\n" }, { "path": "Units/optlib-recursive.d/expected.tags", "content": "Animal\tinput.cof\t/^class Animal$/;\"\tc\nHorse\tinput.cof\t/^class Horse extends Animal$/;\"\tc\nSnake\tinput.cof\t/^class Snake extends Animal$/;\"\tc\nconstructor\tinput.cof\t/^ constructor: (@name) ->$/;\"\tf\nmove\tinput.cof\t/^ move: (meters) ->$/;\"\tf\nmove\tinput.cof\t/^ move: ->$/;\"\tf\n" }, { "path": "Units/optlib-recursive.d/features", "content": "option-directory\nregex\n" }, { "path": "Units/optlib-recursive.d/input.cof", "content": "# Taken from http://coffeescript.org/\n\nclass Animal\n constructor: (@name) ->\n\n move: (meters) ->\n alert @name + \" moved #{meters}m.\"\n\nclass Snake extends Animal\n move: ->\n alert \"Slithering...\"\n super 5\n\nclass Horse extends Animal\n move: ->\n alert \"Galloping...\"\n super 45\n" }, { "path": "Units/optlib-recursive.d/optlib/lang/a.ctags", "content": "#\n# Taken from https://github.com/fishman/dot_files/blob/master/ctags/.ctags\n#\n--langdef=Cof\n" }, { "path": "Units/optlib-recursive.d/optlib/lang/b.ctags", "content": "#\n# Taken from https://github.com/fishman/dot_files/blob/master/ctags/.ctags\n#\n--langmap=Cof:.cof\n" }, { "path": "Units/optlib-recursive.d/optlib/lang/c.ctags", "content": "#\n# Taken from https://github.com/fishman/dot_files/blob/master/ctags/.ctags\n#\n--regex-Cof=/^[ \\t]*class ([a-zA-Z_$][0-9a-zA-Z_.$]*).*$/\\1/c,class/\n" }, { "path": "Units/optlib-recursive.d/optlib/lang/d.ctags", "content": "#\n# Taken from https://github.com/fishman/dot_files/blob/master/ctags/.ctags\n#\n--regex-Cof=/^[ \\t]*([a-zA-Z_$@][0-9a-zA-Z_$\\.]*)[ \\t]*[:=].*[=-]>.*$/\\1/f,function/\n" }, { "path": "Units/optlib-recursive.d/optlib/lang/e.ctags", "content": "#\n# Taken from https://github.com/fishman/dot_files/blob/master/ctags/.ctags\n#\n--regex-Cof=/^[ \\t]*([a-zA-Z_$@][0-9a-zA-Z_$\\.]*)[ \\t]*=[^->\\n]*$/\\1/v,variable/\n" }, { "path": "Units/optlib-simple.d/args.ctags", "content": "--options=coffee.ctags\n" }, { "path": "Units/optlib-simple.d/expected.tags", "content": "Animal\tinput.coffee\t/^class Animal$/;\"\tc\nHorse\tinput.coffee\t/^class Horse extends Animal$/;\"\tc\nSnake\tinput.coffee\t/^class Snake extends Animal$/;\"\tc\nconstructor\tinput.coffee\t/^ constructor: (@name) ->$/;\"\tf\nmove\tinput.coffee\t/^ move: (meters) ->$/;\"\tf\nmove\tinput.coffee\t/^ move: ->$/;\"\tf\n" }, { "path": "Units/optlib-simple.d/features", "content": "regex\n" }, { "path": "Units/optlib-simple.d/input.coffee", "content": "# Taken from http://coffeescript.org/\n\nclass Animal\n constructor: (@name) ->\n\n move: (meters) ->\n alert @name + \" moved #{meters}m.\"\n\nclass Snake extends Animal\n move: ->\n alert \"Slithering...\"\n super 5\n\nclass Horse extends Animal\n move: ->\n alert \"Galloping...\"\n super 45\n" }, { "path": "Units/optlib-simple.d/optlib/coffee.ctags", "content": "#\n# Taken from https://github.com/fishman/dot_files/blob/master/ctags/.ctags\n#\n--langdef=coffee\n--langmap=coffee:.coffee\n--regex-coffee=/^[ \\t]*class ([a-zA-Z_$][0-9a-zA-Z_.$]*).*$/\\1/c,class/\n--regex-coffee=/^[ \\t]*([a-zA-Z_$@][0-9a-zA-Z_$\\.]*)[ \\t]*[:=].*[=-]>.*$/\\1/f,function/\n--regex-coffee=/^[ \\t]*([a-zA-Z_$@][0-9a-zA-Z_$\\.]*)[ \\t]*=[^->\\n]*$/\\1/v,variable/\n" }, { "path": "Units/optscript.r/op-access.d/args.ctags", "content": "--sort=no\n--langdef=X\n--map-X=.unknown\n--kinddef-X=v,var,variables\n--fields=+{access}\n--regex-X=/^(pub|priv) +var +([a-z]+)$/\\2/v/{{\n . \\1 (pub) eq {(public)}{(private)} ifelse access:\n mark . :access {\n 0 string cvs\n (-) \\2 _buildstring\n /var _tag _commit pop\n } {\n cleartomark\n } ifelse\n}}\n" }, { "path": "Units/optscript.r/op-access.d/expected.tags", "content": "x\tinput.unknown\t/^pub var x$/;\"\tv\taccess:public\npublic-x\tinput.unknown\t/^pub var x$/;\"\tv\ny\tinput.unknown\t/^priv var y$/;\"\tv\taccess:private\nprivate-y\tinput.unknown\t/^priv var y$/;\"\tv\n" }, { "path": "Units/optscript.r/op-access.d/input.unknown", "content": "pub var x\npriv var y\n" }, { "path": "Units/optscript.r/op-anongen.d/args.ctags", "content": "--sort=no\n--fields=+{extras}{language}\n\n--langdef=Foo{_foreignLanguage=C}\n--map-Foo=.foo\n--kinddef-Foo=a,app,applications\n\n--regex-Foo=/^c:(.)$//{{\n \\1 /C /struct _anongen /C /struct _foreigntag _commit /anonymous _markextra\n}}\n\n--regex-Foo=/^f:(.)$//{{\n \\1 /app _anongen /app _tag _commit /anonymous _markextra\n}}\n" }, { "path": "Units/optscript.r/op-anongen.d/expected.tags", "content": "15263c7700108\tinput.foo\t/^c:1$/;\"\ts\tlanguage:C\textras:anonymous\n25263c7700100\tinput.foo\t/^f:2$/;\"\ta\tlanguage:Foo\textras:anonymous\n" }, { "path": "Units/optscript.r/op-anongen.d/input.foo", "content": "c:1\nf:2\n" }, { "path": "Units/optscript.r/op-end.d/args.ctags", "content": "--fields=+en\n\n--langdef=X\n--map-X=.unknown\n--kinddef-X=d,def,definitions\n\n--regex-X=/[ \\t]*def ([a-z])/\\1/d/{exclusive}{{\n\t. _scopetop { scope: } if\n . _scopeset\n}}\n\n--regex-X=/[ \\t]*(end)//{{\n\t_scopetop {\n 1 _matchloc end:\n _scopepop\n } if\n}}\n" }, { "path": "Units/optscript.r/op-end.d/expected.tags", "content": "a\tinput.unknown\t/^def a$/;\"\td\tline:1\tend:9\nb\tinput.unknown\t/^ def b$/;\"\td\tline:2\tdef:a\tend:4\nc\tinput.unknown\t/^ def c$/;\"\td\tline:5\tdef:a\tend:8\nd\tinput.unknown\t/^ \tdef d$/;\"\td\tline:6\tdef:a.c\tend:7\n" }, { "path": "Units/optscript.r/op-end.d/input.unknown", "content": "def a\n def b\n \t...\n end\n def c\n \tdef d\n\tend\n end\nend\n\nend\n" }, { "path": "Units/optscript.r/op-extras.d/args.ctags", "content": "--sort=no\n--fields=+{extras}\n\n--langdef=X\n--map-X=.unknown\n--_tabledef-X=main\n\n--kinddef-X=d,def,definitions\n\n--_extradef-X=foo,...\n--extras-X=+{foo}\n--_extradef-X=bar,...\n--extras-X=-{bar}\n\n--extras=+{subparser}\n--extras=-{reference}\n\n--_prelude-X={{\n\t/maketag0 {\n\t\t/def 1 /start _matchloc _tag _commit\n\t} def\n\t/maketag {\n\t\tmaketag0 pop\n\t} def\n}}\n\n--_mtable-regex-X=main/(a)//{{\n\t/X.foo _extraenabled {\\1} {(A)} ifelse\n\tmaketag\n}}\n\n--_mtable-regex-X=main/(b)//{{\n\t/X.bar _extraenabled {\\1} {(B)} ifelse\n\tmaketag\n}}\n\n--_mtable-regex-X=main/(c)//{{\n\t/subparser _extraenabled {\\1} {(C)} ifelse\n\tmaketag\n}}\n\n--_mtable-regex-X=main/(d)//{{\n\t/reference\t_extraenabled {\\1} {(D)} ifelse\n\tmaketag\n}}\n\n--_mtable-regex-X=main/(e)//{{\n\t(eCommon) maketag0 /reference _markextra\n\t(a.b.eCommon2) maketag0 dup /reference _markextra /qualified _markextra\n\t(eLangspec) maketag0 /X.foo _markextra\n\t(eLangspec+Common) maketag0 dup /X.foo _markextra /reference _markextra\n}}\n\n--_mtable-regex-X=main/(x)//{{\n\t{\n\t\t/nosuchextra _extraenabled\n\t} stopped {\n\t\t(OK:no such extra)\n\t} {\n\t\tpop (thiShouldNotBeTagged)\n\t} ifelse maketag\n}}\n\n--_mtable-regex-X=main/(y)//{{\n\t{\n\t\t/X.nosuchextra\t_extraenabled\n\t} stopped {\n\t\t(OK:no such language extra)\n\t} {\n\t\tpop (thiShouldNotBeTagged)\n\t} ifelse maketag\n}}\n\n--_mtable-regex-X=main/(z)//{{\n\t% this one is for testing _tquit.\n\t_tquit\n}}\n" }, { "path": "Units/optscript.r/op-extras.d/expected.tags", "content": "a\tinput.unknown\t/^abcdaxyezb$/;\"\td\nB\tinput.unknown\t/^abcdaxyezb$/;\"\td\nc\tinput.unknown\t/^abcdaxyezb$/;\"\td\nD\tinput.unknown\t/^abcdaxyezb$/;\"\td\na\tinput.unknown\t/^abcdaxyezb$/;\"\td\nOK:no such extra\tinput.unknown\t/^abcdaxyezb$/;\"\td\nOK:no such language extra\tinput.unknown\t/^abcdaxyezb$/;\"\td\neCommon\tinput.unknown\t/^abcdaxyezb$/;\"\td\textras:reference\na.b.eCommon2\tinput.unknown\t/^abcdaxyezb$/;\"\td\textras:qualified,reference\neLangspec\tinput.unknown\t/^abcdaxyezb$/;\"\td\textras:foo\neLangspec+Common\tinput.unknown\t/^abcdaxyezb$/;\"\td\textras:reference,foo\n" }, { "path": "Units/optscript.r/op-extras.d/input.unknown", "content": "abcdaxyezb\n\n" }, { "path": "Units/optscript.r/op-inherits.d/args.ctags", "content": "--fields=+{inherits}\n--sort=no\n--fields=+{extras}\n\n--langdef=X\n--map-X=.unknown\n\n--kinddef-X=c,class,classes\n\n--regex-X=/^class[ \\t]+([A-Z]+)(<([A-Z]+))?/\\1/c/{scope=push}{{\n \\3 _isstring {\n . \\3 inherits:\n } if\n}}\n\n--regex-X=/[ \\t]*set_paring[ \\t]+([A-Z]+)//{{\n _scopetop {\n \\1 inherits:\n } if\n}}\n\n--regex-X=/[ \\t]*clear_paring//{{\n _scopetop {\n false inherits:\n } if\n}}\n\n--regex-X=/^end//{scope=pop}{placeholder}\n" }, { "path": "Units/optscript.r/op-inherits.d/expected.tags", "content": "A\tinput.unknown\t/^class A) . :name _buildstring\n . :kind\n . _tagloc _tag _commit\n /FOO.withprefix _markextra\n}}\n" }, { "path": "Units/optscript.r/op-tagloc.d/expected.tags", "content": "x\tinput.foo\t/^def x$/;\"\td\textras:withprefix\ny\tinput.foo\t/^def y$/;\"\td\textras:withprefix\nx\tinput.foo\t/^def x$/;\"\td\ny\tinput.foo\t/^def y$/;\"\td\n" }, { "path": "Units/optscript.r/op-tagloc.d/input.foo", "content": "def x\ndef y\n" }, { "path": "Units/optscript.r/op-traced.d/args.ctags", "content": "--langdef=X\n--map-X=.unknown\n--kinddef-X=d,def,definitions\n\n--regex-X=/[ \\t]*def ([a-z])/\\1/d/{exclusive}{{\n _traced {\n\t mark . :name (-debug) _buildstring /def _tag _commit pop\n } if\n}}\n\n--_trace=X\n" }, { "path": "Units/optscript.r/op-traced.d/expected.tags", "content": "a\tinput.unknown\t/^def a$/;\"\td\na-debug\tinput.unknown\t/^def a$/;\"\td\n" }, { "path": "Units/optscript.r/op-traced.d/features", "content": "debug\n" }, { "path": "Units/optscript.r/op-traced.d/input.unknown", "content": "def a\n" }, { "path": "Units/optscript.r/op-typeref.d/args.ctags", "content": "--langdef=X\n--map-X=.unknown\n--kinddef-X=d,def,definitions\n--kinddef-X=t,type,type definitions\n\n--_prelude-X={{\n /typedict 5 dict def\n}}\n\n--regex-X=/^type[ ]+([A-Z]+)$/\\1/t/{{\n typedict \\1 cvn . put\n}}\n\n# [string string]\n--regex-X=/def[ ]+([a-z]+)[ ]*:[ ]*([a-z]+)/\\1/d/{{\n\t. [ (postfix) \\2 ] typeref:\n}}\n\n# string\n--regex-X=/def[ ]+<([a-z]+)>[ ]*([a-z]+)/\\2/d/{{\n\t. \\1 typeref:\n}}\n\n# index\n--regex-X=/def[ ]+([A-Z]+)\\^([a-z]+)/\\2/d/{{\n typedict \\1 cvn known {\n . typedict \\1 cvn get typeref:\n } if\n}}\n\n# false\n--regex-X=/def[ ]+([a-z]+)\\^!([a-z]+)/\\2/d/{{\n\t. \\1 typeref:\n . false typeref:\n}}\n" }, { "path": "Units/optscript.r/op-typeref.d/expected.tags", "content": "T\tinput.unknown\t/^type T$/;\"\tt\na\tinput.unknown\t/^def a:int = 1$/;\"\td\ttyperef:postfix:int\nb\tinput.unknown\t/^def b:str = \"abc\"$/;\"\td\ttyperef:postfix:str\nc\tinput.unknown\t/^def c = true$/;\"\td\ttyperef:typename:boolean\nd\tinput.unknown\t/^def T^d = 1.0$/;\"\td\ttyperef:type:T\ne\tinput.unknown\t/^def float^!e = 1.0$/;\"\td\n" }, { "path": "Units/optscript.r/op-typeref.d/input.unknown", "content": "def a:int = 1\ndef b:str = \"abc\"\n\ndef c = true\n\ntype T\n\ndef T^d = 1.0\n\ndef float^!e = 1.0\n" }, { "path": "Units/optscript.r/with-foreignLanguage-flag.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+rl\n\n--langdef=XXX{_foreignLanguage=C}\n--map-XXX=.xxx\n--fields=+n\n\n--kinddef-XXX=a,abc,abcx\n--_roledef-XXX.a=assigned,assigned\n\n--regex-XXX=/^(a)$/\\1/a/\n\n--regex-XXX=/^(b)$//{{\n \\1 /abc _tag _commit pop\n}}\n--regex-XXX=/^(c)$/\\1/a/{_role=assigned}\n--regex-XXX=/^(d)$//{{\n \\1 /abc /assigned _reftag _commit pop\n}}\n\n--_roledef-C.f=arolefortesting,a role for testing\n--regex-XXX=/\\/\\*(A)\\(\\)\\*\\//\\1/f/{_language=C}\n--regex-XXX=/\\/\\*(B)\\(\\)\\*\\///{{\n \\1 /C /function _foreigntag _commit pop\n}}\n\n--regex-XXX=/\\/\\*(C)\\(\\)\\*\\//\\1/f/{_language=C}{_role=arolefortesting}\n--regex-XXX=/\\/\\*(D)\\(\\)\\*\\//\\1/f/{_role=arolefortesting}{_language=C}\n--regex-XXX=/\\/\\*(E)\\(\\)\\*\\///{{\n \\1 /C /function /arolefortesting _foreignreftag _commit pop\n 1 _matchloc\n}}\n\n--regex-XXX=/\\/\\*(F)\\(\\)\\*\\///{{\n dup\n \\1 /C /function 4 -1 roll _foreigntag _commit pop\n}}\n\n--regex-XXX=/\\/\\*(G)\\(\\)\\*\\///{{\n dup\n \\1 /C /function /arolefortesting 5 -1 roll _foreignreftag _commit pop\n}}\n\n--regex-XXX=/\\/\\*(H)\\(\\)\\*\\///{{\n \\1 /C /function null 5 -1 roll _foreignreftag _commit pop\n}}\n\n--regex-C=/FUNC\\(([a-z]*)\\);/\\1/f/\n" }, { "path": "Units/optscript.r/with-foreignLanguage-flag.d/expected.tags", "content": "a\tinput.xxx\t/^a$/;\"\ta\tline:1\tlanguage:XXX\troles:def\nb\tinput.xxx\t/^b$/;\"\ta\tline:2\tlanguage:XXX\troles:def\nc\tinput.xxx\t/^c$/;\"\ta\tline:3\tlanguage:XXX\troles:assigned\nd\tinput.xxx\t/^d$/;\"\ta\tline:4\tlanguage:XXX\troles:assigned\nA\tinput.xxx\t/^\\/*A()*\\/$/;\"\tf\tline:5\tlanguage:C\troles:def\nB\tinput.xxx\t/^\\/*B()*\\/$/;\"\tf\tline:6\tlanguage:C\troles:def\nC\tinput.xxx\t/^\\/*C()*\\/$/;\"\tf\tline:7\tlanguage:C\troles:arolefortesting\nD\tinput.xxx\t/^\\/*D()*\\/$/;\"\tf\tline:8\tlanguage:C\troles:arolefortesting\nE\tinput.xxx\t/^\\/*E()*\\/$/;\"\tf\tline:9\tlanguage:C\troles:arolefortesting\nF\tinput.xxx\t/^\\/*E()*\\/$/;\"\tf\tline:9\tlanguage:C\troles:def\nG\tinput.xxx\t/^\\/*E()*\\/$/;\"\tf\tline:9\tlanguage:C\troles:arolefortesting\nH\tinput.xxx\t/^\\/*E()*\\/$/;\"\tf\tline:9\tlanguage:C\troles:def\nmyfunc\tinput-0.c\t/^FUNC(myfunc);$/;\"\tf\tline:1\tlanguage:C\troles:def\n" }, { "path": "Units/optscript.r/with-foreignLanguage-flag.d/input-0.c", "content": "FUNC(myfunc);\n" }, { "path": "Units/optscript.r/with-foreignLanguage-flag.d/input.xxx", "content": "a\nb\nc\nd\n/*A()*/\n/*B()*/\n/*C()*/\n/*D()*/\n/*E()*/\n/*F()*/\n/*G()*/\n/*H()*/\n" }, { "path": "Units/paramdef.r/no-set.d/args.ctags", "content": "--langdef=Foo\n--map-Foo=.foo\n--kinddef-Foo=v,xval,externally defined values\n--_paramdef-Foo=VAR,desc\n--regex-Foo=/(x)//{{\n /VAR _param {\n /xval _tag _commit pop\n } {\n \\1 /xval _tag _commit pop\n } ifelse\n}}\n" }, { "path": "Units/paramdef.r/no-set.d/expected.tags", "content": "x\tinput.foo\t/^x$/;\"\tv\n" }, { "path": "Units/paramdef.r/no-set.d/input.foo", "content": "x\n" }, { "path": "Units/paramdef.r/simple.d/args.ctags", "content": "--langdef=Foo\n--map-Foo=.foo\n--kinddef-Foo=v,xval,externally defined values\n--_paramdef-Foo=VAR,desc\n--regex-Foo=/(x)//{{\n /VAR _param {\n /xval _tag _commit pop\n } if\n}}\n--param-Foo.VAR=y\n" }, { "path": "Units/paramdef.r/simple.d/expected.tags", "content": "y\tinput.foo\t/^x$/;\"\tv\n" }, { "path": "Units/paramdef.r/simple.d/input.foo", "content": "x\n" }, { "path": "Units/parser-I18nRubyGem.r/language-force.d/args.ctags", "content": "--sort=no\n--language-force=I18nRubyGem\n--fields=+E\n" }, { "path": "Units/parser-I18nRubyGem.r/language-force.d/expected.tags", "content": "test\tinput.i18n\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser\nother\tinput.i18n\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser\ndog\tinput.i18n\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ncat\tinput.i18n\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ntracer\tinput.i18n\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\nreporter\tinput.i18n\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\ntest\tinput.i18n\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.test\tinput.i18n\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeful\nother\tinput.i18n\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.other\tinput.i18n\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeful\nanimals.dog\tinput.i18n\t/^ dog: dog$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.dog\tinput.i18n\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\nanimals.cat\tinput.i18n\t/^ cat: cat$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.cat\tinput.i18n\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\ntools.tracer\tinput.i18n\t/^ tracer: tracer$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.tracer\tinput.i18n\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\ntools.reporter\tinput.i18n\t/^ reporter: reporter$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.reporter\tinput.i18n\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\n" }, { "path": "Units/parser-I18nRubyGem.r/language-force.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/language-force.d/input.i18n", "content": "---\nen:\n test: 2\n other: 10\n animals:\n dog: dog\n cat: cat\n tools:\n tracer: tracer\n reporter: reporter\n" }, { "path": "Units/parser-I18nRubyGem.r/locale-kind.d/args.ctags", "content": "--sort=no\n--language-force=I18nRubyGem\n--fields=+E\n--extras-I18nRubyGem=\n--kinds-I18nRubyGem={locale}\n" }, { "path": "Units/parser-I18nRubyGem.r/locale-kind.d/expected.tags", "content": "en\tinput.yml\t/^en:$/;\"\tl\textras:subparser\nen\tinput-0.yml\t/^en:$/;\"\tl\textras:subparser\n" }, { "path": "Units/parser-I18nRubyGem.r/locale-kind.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/locale-kind.d/input-0.yml", "content": "---\nen:\n hello: hello\n" }, { "path": "Units/parser-I18nRubyGem.r/locale-kind.d/input.yml", "content": "---\nen:\n test: 2\n other: 10\n animals:\n dog: dog\n cat: cat\n tools:\n tracer: tracer\n reporter: reporter\n" }, { "path": "Units/parser-I18nRubyGem.r/no-language-force.d/args.ctags", "content": "--sort=no\n--fields=+E\n" }, { "path": "Units/parser-I18nRubyGem.r/no-language-force.d/expected.tags", "content": "test\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser\nother\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser\ndog\tinput.yml\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ncat\tinput.yml\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ntracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\nreporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\ntest\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.test\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeful\nother\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.other\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeful\nanimals.dog\tinput.yml\t/^ dog: dog$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.dog\tinput.yml\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\nanimals.cat\tinput.yml\t/^ cat: cat$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.cat\tinput.yml\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\ntools.tracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.tracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\ntools.reporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.reporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.hello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeful\n" }, { "path": "Units/parser-I18nRubyGem.r/no-language-force.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/no-language-force.d/input-0.yml", "content": "---\nen:\n hello: hello\n" }, { "path": "Units/parser-I18nRubyGem.r/no-language-force.d/input.yml", "content": "---\nen:\n test: 2\n other: 10\n animals:\n dog: dog\n cat: cat\n tools:\n tracer: tracer\n reporter: reporter\n" }, { "path": "Units/parser-I18nRubyGem.r/no-locale.d/args.ctags", "content": "--sort=no\n--fields=+E\n" }, { "path": "Units/parser-I18nRubyGem.r/no-locale.d/expected.tags", "content": "hello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.hello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeful\n" }, { "path": "Units/parser-I18nRubyGem.r/no-locale.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/no-locale.d/input-0.yml", "content": "---\nen:\n hello: hello\n" }, { "path": "Units/parser-I18nRubyGem.r/no-locale.d/input.yml", "content": "---\nnosuchlocale:\n test: 2\n other: 10\n animals:\n dog: dog\n cat: cat\n tools:\n tracer: tracer\n reporter: reporter\n" }, { "path": "Units/parser-I18nRubyGem.r/qualified.d/args.ctags", "content": "--sort=no\n--language-force=I18nRubyGem\n--fields=+E\n--extras=+q\n--extras-I18nRubyGem=-{localeful}\n" }, { "path": "Units/parser-I18nRubyGem.r/qualified.d/expected.tags", "content": "test\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser\nen.test\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:qualified,subparser\nother\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser\nen.other\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:qualified,subparser\ndog\tinput.yml\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\nen.animals.dog\tinput.yml\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:qualified,subparser\ncat\tinput.yml\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\nen.animals.cat\tinput.yml\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:qualified,subparser\ntracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\nen.tools.tracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:qualified,subparser\nreporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\nen.tools.reporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:qualified,subparser\ntest\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeless\nother\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeless\nanimals.dog\tinput.yml\t/^ dog: dog$/;\"\tk\tlocale:en\textras:subparser,localeless\nanimals.cat\tinput.yml\t/^ cat: cat$/;\"\tk\tlocale:en\textras:subparser,localeless\ntools.tracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tlocale:en\textras:subparser,localeless\ntools.reporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tlocale:en\textras:subparser,localeless\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser\nen.hello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:qualified,subparser\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeless\n" }, { "path": "Units/parser-I18nRubyGem.r/qualified.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/qualified.d/input-0.yml", "content": "---\nen:\n hello: hello\n" }, { "path": "Units/parser-I18nRubyGem.r/qualified.d/input.yml", "content": "---\nen:\n test: 2\n other: 10\n animals:\n dog: dog\n cat: cat\n tools:\n tracer: tracer\n reporter: reporter\n" }, { "path": "Units/parser-I18nRubyGem.r/simple-I18nRubyGem.d/args.ctags", "content": "--sort=no\n--language-force=I18nRubyGem\n--fields=+E\n" }, { "path": "Units/parser-I18nRubyGem.r/simple-I18nRubyGem.d/expected.tags", "content": "test\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser\nother\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser\ndog\tinput.yml\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ncat\tinput.yml\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ntracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\nreporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\ntest\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.test\tinput.yml\t/^ test: 2$/;\"\tk\tlocale:en\textras:subparser,localeful\nother\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.other\tinput.yml\t/^ other: 10$/;\"\tk\tlocale:en\textras:subparser,localeful\nanimals.dog\tinput.yml\t/^ dog: dog$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.dog\tinput.yml\t/^ dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\nanimals.cat\tinput.yml\t/^ cat: cat$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.cat\tinput.yml\t/^ cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\ntools.tracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.tracer\tinput.yml\t/^ tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\ntools.reporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.reporter\tinput.yml\t/^ reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser\nhello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.hello\tinput-0.yml\t/^ hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeful\n" }, { "path": "Units/parser-I18nRubyGem.r/simple-I18nRubyGem.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/simple-I18nRubyGem.d/input-0.yml", "content": "---\nen:\n hello: hello\n" }, { "path": "Units/parser-I18nRubyGem.r/simple-I18nRubyGem.d/input.yml", "content": "---\nen:\n test: 2\n other: 10\n animals:\n dog: dog\n cat: cat\n tools:\n tracer: tracer\n reporter: reporter\n" }, { "path": "Units/parser-I18nRubyGem.r/symbols.d/args.ctags", "content": "--sort=no\n--language-force=I18nRubyGem\n--fields=+E\n" }, { "path": "Units/parser-I18nRubyGem.r/symbols.d/expected.tags", "content": "test\tinput.yml\t/^ :test: 2$/;\"\tk\tlocale:en\textras:subparser\nother\tinput.yml\t/^ :other: 10$/;\"\tk\tlocale:en\textras:subparser\ndog\tinput.yml\t/^ :dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ncat\tinput.yml\t/^ :cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser\ntracer\tinput.yml\t/^ :tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\nreporter\tinput.yml\t/^ :reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser\ntest\tinput.yml\t/^ :test: 2$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.test\tinput.yml\t/^ :test: 2$/;\"\tk\tlocale:en\textras:subparser,localeful\nother\tinput.yml\t/^ :other: 10$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.other\tinput.yml\t/^ :other: 10$/;\"\tk\tlocale:en\textras:subparser,localeful\nanimals.dog\tinput.yml\t/^ :dog: dog$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.dog\tinput.yml\t/^ :dog: dog$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\nanimals.cat\tinput.yml\t/^ :cat: cat$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.animals.cat\tinput.yml\t/^ :cat: cat$/;\"\tk\tkeyInMiddle:en.animals\textras:subparser,localeful\ntools.tracer\tinput.yml\t/^ :tracer: tracer$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.tracer\tinput.yml\t/^ :tracer: tracer$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\ntools.reporter\tinput.yml\t/^ :reporter: reporter$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.tools.reporter\tinput.yml\t/^ :reporter: reporter$/;\"\tk\tkeyInMiddle:en.tools\textras:subparser,localeful\nhello\tinput-0.yml\t/^ :hello: hello$/;\"\tk\tlocale:en\textras:subparser\nhello\tinput-0.yml\t/^ :hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeless\nen.hello\tinput-0.yml\t/^ :hello: hello$/;\"\tk\tlocale:en\textras:subparser,localeful\n" }, { "path": "Units/parser-I18nRubyGem.r/symbols.d/features", "content": "yaml\n" }, { "path": "Units/parser-I18nRubyGem.r/symbols.d/input-0.yml", "content": "---\n:en:\n :hello: hello\n" }, { "path": "Units/parser-I18nRubyGem.r/symbols.d/input.yml", "content": "---\n:en:\n :test: 2\n :other: 10\n :animals:\n :dog: dog\n :cat: cat\n :tools:\n :tracer: tracer\n :reporter: reporter\n" }, { "path": "Units/parser-ada.r/ada-adb.d/expected.tags", "content": "Altivec\tinput.adb\t/^procedure Altivec is$/;\"\tr\nVector_A\tinput.adb\t/^ Vector_A : constant vector_unsigned_int := To_Vector (View_A);$/;\"\tn\tsubprogram:Altivec\tfile:\nVector_B\tinput.adb\t/^ Vector_B : constant vector_unsigned_int := To_Vector (View_B);$/;\"\tn\tsubprogram:Altivec\tfile:\nVector_C\tinput.adb\t/^ Vector_C : vector_unsigned_int;$/;\"\tv\tsubprogram:Altivec\tfile:\nView_A\tinput.adb\t/^ View_A : constant VUI_View := (Values => (1, 2, 3, 4));$/;\"\tn\tsubprogram:Altivec\tfile:\nView_B\tinput.adb\t/^ View_B : constant VUI_View := (Values => (1, 1, 1, 1));$/;\"\tn\tsubprogram:Altivec\tfile:\nView_C\tinput.adb\t/^ View_C : VUI_View;$/;\"\tv\tsubprogram:Altivec\tfile:\n" }, { "path": "Units/parser-ada.r/ada-adb.d/input.adb", "content": "-- Taken from altivec of GNAT examples (http://www.adacore.com/developers/code-samples/gnat-examples/)\n-- ====================================================================================================\n-- This example shows how to create and manipulate vectors by the mean of high\n-- level views.\n\nwith GNAT.Altivec; use GNAT.Altivec;\nwith GNAT.Altivec.Conversions; use GNAT.Altivec.Conversions;\nwith GNAT.Altivec.Vector_Operations; use GNAT.Altivec.Vector_Operations;\nwith GNAT.Altivec.Vector_Types; use GNAT.Altivec.Vector_Types;\nwith GNAT.Altivec.Vector_Views; use GNAT.Altivec.Vector_Views;\n\nwith GNAT.IO; use GNAT.IO;\n\nprocedure Altivec is\n\n View_A : constant VUI_View := (Values => (1, 2, 3, 4));\n Vector_A : constant vector_unsigned_int := To_Vector (View_A);\n\n View_B : constant VUI_View := (Values => (1, 1, 1, 1));\n Vector_B : constant vector_unsigned_int := To_Vector (View_B);\n\n Vector_C : vector_unsigned_int;\n View_C : VUI_View;\n\nbegin\n Vector_C := vec_add (Vector_A, Vector_B);\n -- C = A + B\n\n View_C := To_View (Vector_C);\n\n for I in View_C.Values'Range loop\n Put_Line (unsigned_int'Image (View_C.Values (I)));\n end loop;\n\nend Altivec;\n" }, { "path": "Units/parser-ada.r/ada-ads.d/expected.tags", "content": "Adjust\tinput.ads\t/^ procedure Adjust(S: in out Stack);$/;\"\tR\tpackspec:GenStack\nData\tinput.ads\t/^ Data: Data_Ptr;$/;\"\tc\ttype:Node\tfile:\nData_Ptr\tinput.ads\t/^ type Data_Ptr is access StackData'Class;$/;\"\tt\tpackspec:GenStack\tfile:\nEmpty\tinput.ads\t/^ function Empty(S: Stack) return Boolean;$/;\"\tR\tpackspec:GenStack\nFinalize\tinput.ads\t/^ procedure Finalize(S: in out Stack);$/;\"\tR\tpackspec:GenStack\nGenStack\tinput.ads\t/^package GenStack is$/;\"\tP\nHead\tinput.ads\t/^ Head: Node_Ptr;$/;\"\tc\ttype:Stack\tfile:\nInitialize\tinput.ads\t/^ procedure Initialize(S: in out Stack);$/;\"\tR\tpackspec:GenStack\nNext\tinput.ads\t/^ Next: Node_Ptr;$/;\"\tc\ttype:Node\tfile:\nNode\tinput.ads\t/^ type Node is record$/;\"\tt\tpackspec:GenStack\tfile:\nNode_Ptr\tinput.ads\t/^ type Node_Ptr is access Node;$/;\"\tt\tpackspec:GenStack\tfile:\nPop\tinput.ads\t/^ procedure Pop(S: in out Stack; D: in out StackData'class);$/;\"\tR\tpackspec:GenStack\nPush\tinput.ads\t/^ procedure Push(S: in out Stack; D: StackData'class);$/;\"\tR\tpackspec:GenStack\nStack\tinput.ads\t/^ type Stack is new Controlled with private;$/;\"\tt\tpackspec:GenStack\nStack\tinput.ads\t/^ type Stack is new Controlled with record$/;\"\tt\tpackspec:GenStack\tfile:\nStackData\tinput.ads\t/^ type StackData is new Controlled with null record;$/;\"\tt\tpackspec:GenStack\nTop\tinput.ads\t/^ procedure Top(S: Stack; Data: in out StackData'class);$/;\"\tR\tpackspec:GenStack\n" }, { "path": "Units/parser-ada.r/ada-ads.d/input.ads", "content": "-- Object-oriented generalized stack. This illustrates the use of a\n-- controlled type, which is one that has construction and destructions.\n-- It also shows how to create two related types in the same package so\n-- that they can share private declarations. This sort of thing is\n-- accomplished in Java or C++ using nested classes, or using friend\n-- declarations in C++.\n--\nwith Ada.Finalization; use Ada.Finalization;\n\npackage GenStack is\n -- This is the stack type.\n type Stack is new Controlled with private;\n\n -- This is the base type for nodes. Client packages must derive their\n -- nodes from StackData. Since it comes from Controlled, the user can\n -- override the Initialize, Adjust, and Finalize methods as needed.\n type StackData is new Controlled with null record;\n\n -- Initialization operations.\n procedure Initialize(S: in out Stack);\n procedure Adjust(S: in out Stack);\n procedure Finalize(S: in out Stack);\n\n -- Stack operations.\n procedure Push(S: in out Stack; D: StackData'class);\n procedure Pop(S: in out Stack; D: in out StackData'class);\n procedure Top(S: Stack; Data: in out StackData'class);\n function Empty(S: Stack) return Boolean;\n\n private\n -- Pointer to the node type.\n type Node;\n type Node_Ptr is access Node;\n\n -- Here is the generalized stack itself. We would just make it the\n -- pointer itself, but it needs to be a record so it can be in a with.\n type Stack is new Controlled with record\n Head: Node_Ptr;\n end record;\n\n -- Now, we need a pointer to the data part.\n type Data_Ptr is access StackData'Class;\n\n -- This is the node type.\n type Node is record\n Data: Data_Ptr;\n Next: Node_Ptr;\n end record;\n\nend GenStack;\n" }, { "path": "Units/parser-ada.r/ada-block-tracking.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-ada.r/ada-block-tracking.d/expected.tags", "content": "Input\tinput.adb\t/^package body Input is$/;\"\tp\nF\tinput.adb\t/^ function F (S : Integer) return Integer is$/;\"\tr\tpackage:Input\tfile:\nR\tinput.adb\t/^ R : Integer;$/;\"\tv\tsubprogram:F\tfile:\nT\tinput.adb\t/^\tT : Integer := 2;$/;\"\tv\tanon:declare\tfile:\nP\tinput.adb\t/^\tP : Integer := 4;$/;\"\tv\tanon:declare\tfile:\nG\tinput.adb\t/^ function G (A : Integer) return Integer is$/;\"\tr\tpackage:Input\tfile:\nB\tinput.adb\t/^ B : Integer;$/;\"\tv\tsubprogram:G\tfile:\nC\tinput.adb\t/^\tC : Integer := 2;$/;\"\tv\tanon:declare\tfile:\nD\tinput.adb\t/^\tD : Integer := 4;$/;\"\tv\tanon:declare\tfile:\n" }, { "path": "Units/parser-ada.r/ada-block-tracking.d/input.adb", "content": "package body Input is\n function F (S : Integer) return Integer is\n R : Integer;\n begin\n if S < 1 then\n declare\n\tT : Integer := 2;\n begin\n\tif S > T then\n\t T := 3;\n\tend if;\n\tR := S;\n end;\n else\n declare\n\tP : Integer := 4;\n begin\n\treturn P;\n end;\n end if;\n return R;\n end F;\n function G (A : Integer) return Integer is\n B : Integer;\n begin\n if A < 1 then\n declare\n\tC : Integer := 2;\n begin\n\tcase A is\n\t when 1 => null;\n\t when others => null;\n\tend case;\n\tB := A;\n end;\n else\n declare\n\tD : Integer := 4;\n begin\n\treturn D;\n end;\n end if;\n return B;\n end G;\nend Input;\n" }, { "path": "Units/parser-ada.r/ada-block-tracking.d/validator", "content": "gnat\n" }, { "path": "Units/parser-ada.r/ada-char-literal.d/expected.tags-e", "content": "\f\ninput.adb,158\npackage body System.Val_Util isSystem.Val_Util/b\u00014,69\n procedure Bad_Value (S : String) isBad_Value/p\u00016,102\n procedure Not_Tagged isNot_Tagged/p\u000111,236\n" }, { "path": "Units/parser-ada.r/ada-char-literal.d/input.adb", "content": "--- file: s-valuti.adb\nwith System.Case_Util; use System.Case_Util;\n\npackage body System.Val_Util is\n\n procedure Bad_Value (S : String) is\n begin\n raise Constraint_Error with \"bad input for 'Value: \"\"\" & S & '\"';\n end Bad_Value;\n\n procedure Not_Tagged is\n begin\n null;\n end Not_Tagged;\nend System.Val_Util;\n" }, { "path": "Units/parser-ada.r/ada-end-without-designator.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-ada.r/ada-end-without-designator.d/expected.tags", "content": "Truc\tinput.adb\t/^procedure Truc is$/;\"\tr\nSome_Function\tinput.adb\t/^ function Some_Function return Boolean is$/;\"\tr\tsubprogram:Truc\tfile:\nInner_Function_Without_End_Label\tinput.adb\t/^ function Inner_Function_Without_End_Label return Boolean is$/;\"\tr\tsubprogram:Some_Function\tfile:\nResult\tinput.adb\t/^ Result : constant Boolean := Inner_Function_Without_End_Label;$/;\"\tn\tsubprogram:Some_Function\tfile:\nSmurf\tinput.adb\t/^ function Smurf return Integer is$/;\"\tr\tsubprogram:Truc\tfile:\n" }, { "path": "Units/parser-ada.r/ada-end-without-designator.d/input.adb", "content": "-- Taken from #4205 submitted by @koenmeersman\nprocedure Truc is\n function Some_Function return Boolean is\n function Inner_Function_Without_End_Label return Boolean is\n begin\n return True;\n end;\n Result : constant Boolean := Inner_Function_Without_End_Label;\n begin\n return Result;\n end Some_Function;\n \n function Smurf return Integer is\n begin\n if Some_Function then\n return 1;\n else\n return 2;\n end if;\n end Smurf;\nbegin\n if Smurf > 2 then\n raise Program_Error;\n end if;\nend Truc;\n\n" }, { "path": "Units/parser-ada.r/ada-end-without-designator.d/validator", "content": "gnat\n" }, { "path": "Units/parser-ada.r/ada-entry.d/args.ctags", "content": "--sort=no\n--kinds-Ada=+E\n\n--langdef=GnatProject\n--map-GnatProject=.gpr\n\n--kinddef-GnatProject=P,project,projects\n--regex-GnatProject=/^project[ \\t]+([a-zA-Z0-9_]+)/\\1/P/\n\n" }, { "path": "Units/parser-ada.r/ada-entry.d/expected.tags", "content": "Input\tinput.adb\t/^procedure Input is$/;\"\tr\nInput_0\tinput_0.gpr\t/^project Input_0 is$/;\"\tP\nInput_1\tinput_1.adb\t/^package body Input_1 is$/;\"\tp\nMa_Tasche\tinput_1.adb\t/^ task body Ma_Tasche is$/;\"\tk\tpackage:Input_1\tfile:\nVar_Continuer\tinput_1.adb\t/^ Var_Continuer : Boolean := False;$/;\"\tv\ttask:Ma_Tasche\tfile:\nBoucle_Principale\tinput_1.adb\t/^ Boucle_Principale :$/;\"\ti\ttask:Ma_Tasche\tfile:\nAccepter\tinput_1.adb\t/^ accept Accepter$/;\"\te\tidentifier:Boucle_Principale\tfile:\nMon_Autre_Tasche\tinput_1.adb\t/^ task body Mon_Autre_Tasche is$/;\"\tk\tpackage:Input_1\tfile:\nUne_Autre_Tasche_1\tinput_1.adb\t/^ Une_Autre_Tasche_1 : Tasche_Type_1_T;$/;\"\tv\tpackage:Input_1\tfile:\nTasche_Type_1_T\tinput_1.adb\t/^ task body Tasche_Type_1_T is$/;\"\tk\tpackage:Input_1\tfile:\nTasche_Type_2_T\tinput_1.adb\t/^ task body Tasche_Type_2_T is$/;\"\tk\tpackage:Input_1\tfile:\nTasche_Type_3_T\tinput_1.adb\t/^ task body Tasche_Type_3_T is$/;\"\tk\tpackage:Input_1\tfile:\nUne_Autre_Tasche_2\tinput_1.adb\t/^ Une_Autre_Tasche_2 : Tasche_Type_2_T;$/;\"\tv\tpackage:Input_1\tfile:\nUne_Autre_Tasche_3\tinput_1.adb\t/^ Une_Autre_Tasche_3 : Tasche_Type_3_T (Taille => 5);$/;\"\tv\tpackage:Input_1\tfile:\nObjet_Protege\tinput_1.adb\t/^ protected body Objet_Protege is$/;\"\to\tpackage:Input_1\tfile:\nDemarrer\tinput_1.adb\t/^ entry Demarrer$/;\"\te\tprotected:Objet_Protege\tfile:\nFaire\tinput_1.adb\t/^ procedure Faire is$/;\"\tr\tprotected:Objet_Protege\tfile:\nTester\tinput_1.adb\t/^ function Tester$/;\"\tr\tprotected:Objet_Protege\tfile:\nType_Protege\tinput_1.adb\t/^ protected body Type_Protege is$/;\"\to\tpackage:Input_1\tfile:\nDemarrer\tinput_1.adb\t/^ entry Demarrer$/;\"\te\tprotected:Type_Protege\tfile:\nFaire\tinput_1.adb\t/^ procedure Faire is$/;\"\tr\tprotected:Type_Protege\tfile:\nTester\tinput_1.adb\t/^ function Tester$/;\"\tr\tprotected:Type_Protege\tfile:\nDiscriminant_Protege\tinput_1.adb\t/^ protected body Discriminant_Protege is$/;\"\to\tpackage:Input_1\tfile:\nDemarrer\tinput_1.adb\t/^ entry Demarrer$/;\"\te\tprotected:Discriminant_Protege\tfile:\nFaire\tinput_1.adb\t/^ procedure Faire is$/;\"\tr\tprotected:Discriminant_Protege\tfile:\nTester\tinput_1.adb\t/^ function Tester$/;\"\tr\tprotected:Discriminant_Protege\tfile:\nInput_1\tinput_1.ads\t/^package Input_1 is$/;\"\tP\nMa_Tasche\tinput_1.ads\t/^ task Ma_Tasche is$/;\"\tK\tpackspec:Input_1\nAccepter\tinput_1.ads\t/^ entry Accepter$/;\"\tE\ttaskspec:Ma_Tasche\nMon_Autre_Tasche\tinput_1.ads\t/^ task Mon_Autre_Tasche;$/;\"\tK\tpackspec:Input_1\nTasche_Type_1_T\tinput_1.ads\t/^ task type Tasche_Type_1_T;$/;\"\tK\tpackspec:Input_1\nUne_Tasche\tinput_1.ads\t/^ Une_Tasche : Tasche_Type_1_T;$/;\"\tv\tpackspec:Input_1\nTasche_Type_2_T\tinput_1.ads\t/^ task type Tasche_Type_2_T is$/;\"\tK\tpackspec:Input_1\nStart\tinput_1.ads\t/^ entry Start;$/;\"\tE\ttaskspec:Tasche_Type_2_T\nLire\tinput_1.ads\t/^ entry Lire$/;\"\tE\ttaskspec:Tasche_Type_2_T\nTasche_Type_3_T\tinput_1.ads\t/^ task type Tasche_Type_3_T$/;\"\tK\tpackspec:Input_1\nStart\tinput_1.ads\t/^ entry Start;$/;\"\tE\ttaskspec:Tasche_Type_3_T\nObjet_Protege\tinput_1.ads\t/^ protected Objet_Protege is$/;\"\tO\tpackspec:Input_1\nDemarrer\tinput_1.ads\t/^ entry Demarrer;$/;\"\tE\tprotectspec:Objet_Protege\nFaire\tinput_1.ads\t/^ procedure Faire;$/;\"\tR\tprotectspec:Objet_Protege\nTester\tinput_1.ads\t/^ function Tester return Boolean;$/;\"\tR\tprotectspec:Objet_Protege\nVariable\tinput_1.ads\t/^ Variable : Boolean := True;$/;\"\tv\tprotectspec:Objet_Protege\tfile:\nType_Protege\tinput_1.ads\t/^ protected type Type_Protege is$/;\"\tO\tpackspec:Input_1\nDemarrer\tinput_1.ads\t/^ entry Demarrer;$/;\"\tE\tprotectspec:Type_Protege\nFaire\tinput_1.ads\t/^ procedure Faire;$/;\"\tR\tprotectspec:Type_Protege\nTester\tinput_1.ads\t/^ function Tester return Boolean;$/;\"\tR\tprotectspec:Type_Protege\nVariable\tinput_1.ads\t/^ Variable : Boolean := True;$/;\"\tv\tprotectspec:Type_Protege\tfile:\nDiscriminant_Protege\tinput_1.ads\t/^ protected type Discriminant_Protege$/;\"\tO\tpackspec:Input_1\nDemarrer\tinput_1.ads\t/^ entry Demarrer;$/;\"\tE\tprotectspec:Discriminant_Protege\nFaire\tinput_1.ads\t/^ procedure Faire;$/;\"\tR\tprotectspec:Discriminant_Protege\nTester\tinput_1.ads\t/^ function Tester return Boolean;$/;\"\tR\tprotectspec:Discriminant_Protege\nVariable\tinput_1.ads\t/^ Variable : Boolean := True;$/;\"\tv\tprotectspec:Discriminant_Protege\tfile:\n" }, { "path": "Units/parser-ada.r/ada-entry.d/input.adb", "content": "with Ada.Text_IO;\n-- with Mes_Tasches_P;\nwith Input_1;\n\n-- procedure Client is\nprocedure Input is\n\nbegin\n\n Ada.Text_IO.Put_Line (\"Tasks won't stop, kill it with CTRL-C\");\n -- Mes_Tasches_P.Ma_Tasche.Accepter (Continuer => True);\n Input_1.Ma_Tasche.Accepter (Continuer => True);\n\nend Input;\n-- end Client;\n" }, { "path": "Units/parser-ada.r/ada-entry.d/input_0.gpr", "content": "-- project Client is\nproject Input_0 is\n\n for Main use (\"input.adb\");\n\n for Source_Dirs use (\"./**\");\n for Object_Dir use \"obj/\";\n for Exec_Dir use \"bin/\";\n\n for Create_Missing_Dirs use \"True\";\n\n package Compiler is\n for Default_Switches (\"Ada\") use (\"-O0\", \"-Wall\");\n end Compiler;\n\nend Input_0;\n-- end Client;\n" }, { "path": "Units/parser-ada.r/ada-entry.d/input_1.adb", "content": "-- package body Mes_Tasches_P is\npackage body Input_1 is\n ---------------------------------------------------------------------------\n task body Ma_Tasche is\n Var_Continuer : Boolean := False;\n begin\n Boucle_Principale :\n loop\n accept Accepter\n (Continuer : Boolean)\n do\n Var_Continuer := Continuer;\n end Accepter;\n end loop Boucle_Principale;\n end Ma_Tasche;\n ---------------------------------------------------------------------------\n\n ---------------------------------------------------------------------------\n task body Mon_Autre_Tasche is\n begin\n null;\n end Mon_Autre_Tasche;\n ---------------------------------------------------------------------------\n\n Une_Autre_Tasche_1 : Tasche_Type_1_T;\n\n ---------------------------------------------------------------------------\n task body Tasche_Type_1_T is\n begin\n null;\n end Tasche_Type_1_T;\n ---------------------------------------------------------------------------\n\n ---------------------------------------------------------------------------\n task body Tasche_Type_2_T is\n begin\n null;\n end Tasche_Type_2_T;\n ---------------------------------------------------------------------------\n\n ---------------------------------------------------------------------------\n task body Tasche_Type_3_T is\n begin\n null;\n end Tasche_Type_3_T;\n ---------------------------------------------------------------------------\n\n Une_Autre_Tasche_2 : Tasche_Type_2_T;\n Une_Autre_Tasche_3 : Tasche_Type_3_T (Taille => 5);\n\n ---------------------------------------------------------------------------\n protected body Objet_Protege is\n entry Demarrer\n when Variable\n is\n begin\n null;\n end Demarrer;\n\n procedure Faire is\n begin\n null;\n end Faire;\n\n function Tester\n return Boolean\n is\n begin\n return Variable;\n end Tester;\n end Objet_Protege;\n ---------------------------------------------------------------------------\n\n ---------------------------------------------------------------------------\n protected body Type_Protege is\n entry Demarrer\n when Variable\n is\n begin\n null;\n end Demarrer;\n\n procedure Faire is\n begin\n null;\n end Faire;\n\n function Tester\n return Boolean\n is\n begin\n return Variable;\n end Tester;\n end Type_Protege;\n ---------------------------------------------------------------------------\n\n ---------------------------------------------------------------------------\n protected body Discriminant_Protege is\n entry Demarrer\n when Variable\n is\n begin\n null;\n end Demarrer;\n\n procedure Faire is\n begin\n null;\n end Faire;\n\n function Tester\n return Boolean\n is\n begin\n return Variable;\n end Tester;\n end Discriminant_Protege;\n ---------------------------------------------------------------------------\n\nend Input_1;\n-- end Mes_Tasches_P;\n" }, { "path": "Units/parser-ada.r/ada-entry.d/input_1.ads", "content": "-- package Mes_Tasches_P is\npackage Input_1 is\n\n task Ma_Tasche is\n entry Accepter\n (Continuer : Boolean);\n end Ma_Tasche;\n\n task Mon_Autre_Tasche;\n\n task type Tasche_Type_1_T;\n\n Une_Tasche : Tasche_Type_1_T;\n\n task type Tasche_Type_2_T is\n entry Start;\n entry Lire\n (Donnee : out Integer);\n end Tasche_Type_2_T;\n\n -- Task type with discriminant.\n task type Tasche_Type_3_T\n -- We could have any number of arguments in discriminant\n -- Work exactly like argument in procedure/function/entry/accept\n (Taille : Integer)\n is\n entry Start;\n end Tasche_Type_3_T;\n\n -- protected objects.\n\n protected Objet_Protege is\n entry Demarrer;\n procedure Faire;\n function Tester return Boolean;\n private\n Variable : Boolean := True;\n end Objet_Protege;\n\n protected type Type_Protege is\n entry Demarrer;\n procedure Faire;\n function Tester return Boolean;\n private\n Variable : Boolean := True;\n end Type_Protege;\n\n protected type Discriminant_Protege\n (Priorite : Natural)\n is\n entry Demarrer;\n procedure Faire;\n function Tester return Boolean;\n private\n Variable : Boolean := True;\n end Discriminant_Protege;\n\nend Input_1;\n-- end Mes_Tasches_P;\n" }, { "path": "Units/parser-ada.r/ada-etags-suffix.d/args.ctags", "content": "--sort=no\n--kinds-Ada=-l\n" }, { "path": "Units/parser-ada.r/ada-etags-suffix.d/expected.tags-e", "content": "\f\ninput.ads,0\n\f\ninput_0.adb,234\npackage body Input_0 isInput_0/b\u00011,0\n function My_Function return Boolean isMy_Function/f\u00012,24\n procedure My_Procedure isMy_Procedure/p\u00017,115\n task body My_Task isMy_Task/b\u000112,187\n accept GET (X: in My_T) doGET\u000114,220\n\f\ninput_0.ads,217\npackage Input_0 isInput_0/s\u00011,0\n function My_Function return Boolean;My_Function/f\u00015,192\n procedure My_Procedure;My_Procedure/p\u00019,411\n type My_T is (A, B, C);My_T/t\u000116,792\n task My_Task isMy_Task/k\u000120,973\n" }, { "path": "Units/parser-ada.r/ada-etags-suffix.d/input.ads", "content": "-- DUMMY\n" }, { "path": "Units/parser-ada.r/ada-etags-suffix.d/input_0.adb", "content": "package body Input_0 is\n function My_Function return Boolean is\n begin\n return True;\n end My_Function;\n\n procedure My_Procedure is\n begin\n null;\n end My_Procedure;\n\n task body My_Task is\n begin\n accept GET (X: in My_T) do\n\t null;\n end GET;\n end My_Task;\n\n end Input_0;\n" }, { "path": "Units/parser-ada.r/ada-etags-suffix.d/input_0.ads", "content": "package Input_0 is\n -- Expecting above to create tag 'Input_0/s' as this is 'package spec'-definition with name 'Input_0'.\n -- Emacs tag-search on Input_0/s should navigate to the above.\n\n function My_Function return Boolean;\n -- Expecting above to create tag 'My_Function/f' as this is 'function'-definition with name My_Function.\n -- Emacs tag-search on My_Function/f should navigate to the above.\n\n procedure My_Procedure;\n -- Expecting above to create tag 'My_Procedure/p' as this is 'procedure'-definition with name My_Procedure.\n -- Emacs tag-search on My_Procedure/p should navigate to the above.\n\n -- Expecting above to create tag 'Input_0/s' as this is 'package spec'-definition with name 'Input_0'.\n -- Emacs tag-search on Input_0/s should navigate to the above.\n\n type My_T is (A, B, C);\n -- Expecting above to create tag 'My_T/t' as this is 'type'-definition with name 'My_T'.\n -- Emacs tag-search on My_T/t should navigate to the above.\n\n task My_Task is\n -- Expecting above to create tag 'My_Task/k' as this is 'task'-definition with name 'My_Task'.\n -- Emacs tag-search on My_Task/k should navigate to the above.\n entry GET (X : in My_T);\n end My_Task;\n\nend Input_0;\n" }, { "path": "Units/parser-ada.r/ada-expression-function-with-generic.d/expected.tags-e", "content": "\f\ninput.adb,486\nprocedure My_Package isMy_Package/p\u00011,0\n package Generic_Integer_Images isGeneric_Integer_Images/s\u00015,71\n function Digit_To_Character (X : Unsigned_Type) return Character;Digit_To_Character/f\u00016,107\n type Unsigned_Type is range <>;Unsigned_Type\u00014,35\n package body Generic_Integer_Images isGeneric_Integer_Images/b\u00019,208\n function Digit_To_Character (X : Unsigned_Type) return Character isDigit_To_Character/f\u000110,249\n type Signed_Address is rangeSigned_Address/t\u000114,379\n" }, { "path": "Units/parser-ada.r/ada-expression-function-with-generic.d/input.adb", "content": "procedure My_Package is\n\n generic\n type Unsigned_Type is range <>;\n package Generic_Integer_Images is\n function Digit_To_Character (X : Unsigned_Type) return Character;\n end Generic_Integer_Images;\n\n package body Generic_Integer_Images is\n function Digit_To_Character (X : Unsigned_Type) return Character is\n (Character'Val (0));\n end Generic_Integer_Images;\n\n type Signed_Address is range\n -2**(Standard'Address_Size - 1) .. 2**(Standard'Address_Size - 1) - 1; \nbegin\n null;\nend My_Package;\n" }, { "path": "Units/parser-ada.r/ada-expression-function.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-ada.r/ada-expression-function.d/expected.tags", "content": "Test\tinput.adb\t/^procedure Test is$/;\"\tr\nMy_Type\tinput.adb\t/^ My_Type : Boolean := True;$/;\"\tv\tsubprogram:Test\tfile:\nTagged_Procedure\tinput.adb\t/^ procedure Tagged_Procedure is$/;\"\tr\tsubprogram:Test\tfile:\nBoolean_As_String\tinput.adb\t/^ function Boolean_As_String return String is$/;\"\tr\tsubprogram:Tagged_Procedure\tfile:\nAnother_Boolean_As_String\tinput.adb\t/^ function Another_Boolean_As_String return String is$/;\"\tr\tsubprogram:Tagged_Procedure\tfile:\np0\tinput.adb\t/^ procedure p0 is\t$/;\"\tr\tsubprogram:Tagged_Procedure\tfile:\nYet_Boolean_As_String\tinput.adb\t/^ function Yet_Boolean_As_String return String is$/;\"\tr\tsubprogram:Tagged_Procedure\tfile:\np1\tinput.adb\t/^ procedure p1 is\t$/;\"\tr\tsubprogram:Tagged_Procedure\tfile:\nNot_Tagged_Procedure\tinput.adb\t/^ procedure Not_Tagged_Procedure is$/;\"\tr\tsubprogram:Test\tfile:\n" }, { "path": "Units/parser-ada.r/ada-expression-function.d/input.adb", "content": "with Ada.Text_IO;\t\n\nprocedure Test is\n\n My_Type : Boolean := True;\n\n procedure Tagged_Procedure is\n function Boolean_As_String return String is\n (case My_Type is\n when True => \"True Value\",\n when False => \"False Value\");\n\t \n function Another_Boolean_As_String return String is\n (case My_Type is when True => \"; function dummy0 return String is (\",\n when False => \"; function dummy1 return String is (\");\t \n procedure p0 is\t\n begin\n Ada.Text_IO.put (\"-0\");\n end p0;\t \t \n function Yet_Boolean_As_String return String is\n (case My_Type is\n when True => \"1\",\n when False => \"0\");\n procedure p1 is\t\n begin\n Ada.Text_IO.put (\"-1\");\n end p1;\t \n begin\n null;\n end Tagged_Procedure;\n\n procedure Not_Tagged_Procedure is\n begin\n null;\n end Not_Tagged_Procedure;\nbegin\n null;\nend Test;\n" }, { "path": "Units/parser-ada.r/ada-function.d/args.ctags", "content": "--language-force=Ada\n" }, { "path": "Units/parser-ada.r/ada-function.d/input.broken", "content": "function a(){}}function b(" }, { "path": "Units/parser-ada.r/ada-generic-in-package.d/args.ctags", "content": "--sort=no\n--kinds-Ada=+{formal}\n" }, { "path": "Units/parser-ada.r/ada-generic-in-package.d/expected.tags-e", "content": "\f\ninput.ads,278\npackage My_Package isMy_Package/s\u00012,48\n package Conversions isConversions/s\u00016,108\n function From_Big_Real (Arg : Integer) return Num;From_Big_Real/f\u00017,133\n type Num is digits <>;Num\u00015,81\n type Missing_Tag is recordMissing_Tag/t\u000110,208\n Num : Integer;Num\u000111,237\n\f\ninput_1.adb,1666\nprocedure Input_1 isInput_1/p\u00011,0\n procedure Generic_Reverse_Array (X : in out Array_T);Generic_Reverse_Array/p\u00019,200\n type T is private;T\u00014,32\n type Index is range <>;Index\u00015,55\n type Array_T is array (Index range <>) of T;Array_T\u00016,83\n with function Img (A, B: T) return boolean;Img\u00018,152\n procedure Generic_Reverse_Array (X : in out Array_T) isGeneric_Reverse_Array/p\u000111,257\n\tTmp : T;Tmp\u000115,389\n\tX_Left : T renames X (I);X_Left\u000116,403\n\tX_Right : T renames X (X'Last + X'First - I);X_Right\u000117,431\n type Color is (None, Black, Red, Green, Blue, White);Color/t\u000126,603\n type Color is (None, Black, Red, Green, Blue, White);None\u000126,603\n type Color is (None, Black, Red, Green, Blue, White);Black\u000126,603\n type Color is (None, Black, Red, Green, Blue, White);Red\u000126,603\n type Color is (None, Black, Red, Green, Blue, White);Green\u000126,603\n type Color is (None, Black, Red, Green, Blue, White);Blue\u000126,603\n type Color is (None, Black, Red, Green, Blue, White);White\u000126,603\n type Color_Array is array (Integer range <>) of Color;Color_Array/t\u000127,659\n procedure Reverse_Color_Array is new Generic_Reverse_ArrayReverse_Color_Array/p\u000128,716\n type Shape is (None, Circle, Triangle, Square);Shape/t\u000131,859\n type Shape is (None, Circle, Triangle, Square);None\u000131,859\n type Shape is (None, Circle, Triangle, Square);Circle\u000131,859\n type Shape is (None, Circle, Triangle, Square);Triangle\u000131,859\n type Shape is (None, Circle, Triangle, Square);Square\u000131,859\n type Shape_Array is array (Integer range <>) of Shape;Shape_Array/t\u000132,909\n procedure Reverse_Shape_Array is new Generic_Reverse_ArrayReverse_Shape_Array/p\u000133,966\n\f\ninput_2.ads,301\npackage input_2 isinput_2/s\u00011,0\n type Generator is null record;Generator/t\u00013,20\n type Unsigned is mod <>;Unsigned\u00015,63\n type Real is digits <>;Real\u00016,92\n with function Random (G: Generator) return Unsigned is <>;Random\u00017,120\n function Random (G: Generator) return Real;Random/f\u00018,183\n" }, { "path": "Units/parser-ada.r/ada-generic-in-package.d/input.ads", "content": "-- Taken from #2925 submitted by @koenmeersman\npackage My_Package is\n\n generic\n type Num is digits <>;\n package Conversions is\n function From_Big_Real (Arg : Integer) return Num;\n end Conversions;\n\n type Missing_Tag is record\n Num : Integer;\n end record;\n\nend My_Package;\n" }, { "path": "Units/parser-ada.r/ada-generic-in-package.d/input_1.adb", "content": "procedure Input_1 is\n\n generic\n type T is private;\n type Index is range <>;\n type Array_T is array (Index range <>) of T;\n Null_Value : T;\n with function Img (A, B: T) return boolean;\n procedure Generic_Reverse_Array (X : in out Array_T);\n\n procedure Generic_Reverse_Array (X : in out Array_T) is\n begin\n for I in X'First .. (X'Last + X'First) / 2 loop\n declare\n\tTmp : T;\n\tX_Left : T renames X (I);\n\tX_Right : T renames X (X'Last + X'First - I);\n begin\n\tTmp := X_Left;\n\tX_Left := X_Right;\n\tX_Right := Tmp;\n end;\n end loop;\n end Generic_Reverse_Array;\n\n type Color is (None, Black, Red, Green, Blue, White);\n type Color_Array is array (Integer range <>) of Color;\n procedure Reverse_Color_Array is new Generic_Reverse_Array\n (T => Color, Index => Integer, Array_T => Color_Array, Null_Value => None);\n\n type Shape is (None, Circle, Triangle, Square);\n type Shape_Array is array (Integer range <>) of Shape;\n procedure Reverse_Shape_Array is new Generic_Reverse_Array\n (T => Shape, Index => Integer, Array_T => Shape_Array, Null_Value => None);\n\nbegin\n null;\nend Input_1;\n" }, { "path": "Units/parser-ada.r/ada-generic-in-package.d/input_2.ads", "content": "package input_2 is\n\n type Generator is null record;\n generic\n type Unsigned is mod <>;\n type Real is digits <>;\n with function Random (G: Generator) return Unsigned is <>;\n function Random (G: Generator) return Real;\n\nend input_2;" }, { "path": "Units/parser-ada.r/ada-is-end.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-ada.r/ada-is-end.d/expected.tags", "content": "Seg_Fault_Example\tinput.ada\t/^procedure Seg_Fault_Example is$/;\"\tr\n" }, { "path": "Units/parser-ada.r/ada-is-end.d/input.ada", "content": "with Ada.Text_IO;\n\nprocedure Seg_Fault_Example is\n\n" }, { "path": "Units/parser-ada.r/ada-label.d/args.ctags", "content": "--sort=no\n--kinds-Ada=\"\"\n--kinds-Ada=+{label}" }, { "path": "Units/parser-ada.r/ada-label.d/expected.tags", "content": "Null_Before_Label\tinput.adb\t/^ <> null; <>$/;\"\tb\tsubprogram:Input\tfile:\nNull_After_Label\tinput.adb\t/^ <> null; <>$/;\"\tb\tsubprogram:Input\tfile:\nAssignment_Before_Label\tinput.adb\t/^ <> X := 1; <>$/;\"\tb\tsubprogram:Input\tfile:\nAssignment_After_Label\tinput.adb\t/^ <> X := 1; <>$/;\"\tb\tsubprogram:Input\tfile:\nExit_Before_Label\tinput.adb\t/^ <> exit; <>$/;\"\tb\tanon:loop\tfile:\nExit_After_Label\tinput.adb\t/^ <> exit; <>$/;\"\tb\tanon:loop\tfile:\nGoto_Before_Label\tinput.adb\t/^ <> goto Assignment_Before_Label; <>$/;\"\tb\tanon:loop\tfile:\nGoto_After_Label\tinput.adb\t/^ <> goto Assignment_Before_Label; <>$/;\"\tb\tanon:loop\tfile:\nProcedure_Call_Before_Label\tinput.adb\t/^ <> Ada.Text_IO.Put_Line (\"Hello World\"); <> Ada.Text_IO.Put_Line (\"Hello World\"); <> return; <>$/;\"\tb\tsubprogram:Input\tfile:\nReturn_After_Label\tinput.adb\t/^ <> return; <>$/;\"\tb\tsubprogram:Input\tfile:\nAccept_Before_Label\tinput.adb\t/^ <> accept Start(Nr : in Natural) do$/;\"\tb\ttask:Server\tfile:\nRequeue_Before_Label\tinput.adb\t/^\t<> requeue Start; <>$/;\"\tb\tentry:Start\tfile:\nRequeue_After_Label\tinput.adb\t/^\t<> requeue Start; <>$/;\"\tb\tentry:Start\tfile:\nAccept_After_Label\tinput.adb\t/^ end Start; <>$/;\"\tb\ttask:Server\tfile:\nEntry_Before_Label\tinput.adb\t/^ <> My_Task.Start (1); <>$/;\"\tb\tanon:declare\tfile:\nEntry_After_Label\tinput.adb\t/^ <> My_Task.Start (1); <>$/;\"\tb\tanon:declare\tfile:\nDelay_Before_Label\tinput.adb\t/^ <> delay 100.0; <>$/;\"\tb\tanon:declare\tfile:\nDelay_After_Label\tinput.adb\t/^ <> delay 100.0; <>$/;\"\tb\tanon:declare\tfile:\nAbort_Before_Label\tinput.adb\t/^ <> abort My_Task; <>$/;\"\tb\tanon:declare\tfile:\nAbort_After_Label\tinput.adb\t/^ <> abort My_Task; <>$/;\"\tb\tanon:declare\tfile:\nSelect_Before_Statement\tinput.adb\t/^ <> select$/;\"\tb\tanon:declare\tfile:\nSelect_After_Statement\tinput.adb\t/^ end select; <>$/;\"\tb\ttask:Server\tfile:\nCode_Before_Label\tinput.adb\t/^ <>$/;\"\tb\ttask:Server\tfile:\nCode_After_Label\tinput.adb\t/^ <>$/;\"\tb\ttask:Server\tfile:\nMultiple_1_Before_Label\tinput.adb\t/^ <> <> <> null; <> <> <> null; <> <> <> null; <> <> <> null; <> <> <> null; <> <> <> null; <> raise constraint_error; <>$/;\"\tb\ttask:Server\tfile:\nRaise_After_Label\tinput.adb\t/^ <> raise constraint_error; <>$/;\"\tb\ttask:Server\tfile:\nIf_Before_Label\tinput.adb\t/^ <> if X>1 then$/;\"\tb\ttask:Server\tfile:\nIf_After_Label\tinput.adb\t/^ end if; <> $/;\"\tb\ttask:Server\tfile:\nCase_Before_Label\tinput.adb\t/^ <> case X is$/;\"\tb\ttask:Server\tfile:\nCase_Code_Before_Label\tinput.adb\t/^ when 1 => <> Ada.Text_IO.Put_Line (\"1\"); <> $/;\"\tb\ttask:Server\tfile:\nCase_Code_After_Label\tinput.adb\t/^ when 1 => <> Ada.Text_IO.Put_Line (\"1\"); <> $/;\"\tb\ttask:Server\tfile:\nCase_After_Label\tinput.adb\t/^ end case; <>$/;\"\tb\ttask:Server\tfile:\nLoop_Before_Label\tinput.adb\t/^ <> loop\t$/;\"\tb\ttask:Server\tfile:\nLoop_Code_Before_Label\tinput.adb\t/^ <> Ada.Text_IO.Put_Line (\"1\"); <>$/;\"\tb\tanon:loop\tfile:\nLoop_Code_After_Label\tinput.adb\t/^ <> Ada.Text_IO.Put_Line (\"1\"); <>$/;\"\tb\tanon:loop\tfile:\nLoop_After_Label\tinput.adb\t/^ end loop; <>$/;\"\tb\ttask:Server\tfile:\nWhile_Before_Label\tinput.adb\t/^ <> while X > 1 loop$/;\"\tb\ttask:Server\tfile:\nWhile_Code_Before_Label\tinput.adb\t/^ <> X := X + 1; <>$/;\"\tb\tanon:loop\tfile:\nWhile_Code_After_Label\tinput.adb\t/^ <> X := X + 1; <>$/;\"\tb\tanon:loop\tfile:\nWhile_After_Label\tinput.adb\t/^ end loop; <>$/;\"\tb\ttask:Server\tfile:\nFor_Before_Label\tinput.adb\t/^ <> for I in 1 .. X loop$/;\"\tb\ttask:Server\tfile:\nFor_Code_Before_Label\tinput.adb\t/^ <> Ada.Text_IO.Put_Line (X'Image); <> $/;\"\tb\tanon:loop\tfile:\nFor_Code_After_Label\tinput.adb\t/^ <> Ada.Text_IO.Put_Line (X'Image); <> $/;\"\tb\tanon:loop\tfile:\nFor_After_Label\tinput.adb\t/^ end loop; <>$/;\"\tb\ttask:Server\tfile:\nDeclare_Before_Label\tinput.adb\t/^ <> declare$/;\"\tb\ttask:Server\tfile:\nDeclare_After_Label\tinput.adb\t/^ end; <>$/;\"\tb\ttask:Server\tfile:\nBegin_Before_Label\tinput.adb\t/^ <> begin$/;\"\tb\ttask:Server\tfile:\nBegin_After_Label\tinput.adb\t/^ end; <>$/;\"\tb\ttask:Server\tfile:\nReturn_Before_Label\tinput.adb\t/^ <> return Coord : Coordinate do$/;\"\tb\tsubprogram:Extended_Return\tfile:\nReturn_After_Label\tinput.adb\t/^ end return; <>$/;\"\tb\tsubprogram:Extended_Return\tfile:\n" }, { "path": "Units/parser-ada.r/ada-label.d/input.adb", "content": "-- Test labels\n-- See: ARM 5.1 : Simple and Compound Statements - Sequences of Statements\n--\n-- A label should come before a simple statement or a compound statment.\n--\n-- Check if file compiles: gnatmake -gnatc Units/parser-ada.r/ada-label.d/input.adb\n--\nwith Ada.Text_IO;\n\nprocedure Input is\n X : Integer;\nbegin\n -- ARM 5.1(4/2) : Simple statements\n -- null statement\n <> null; <>\n\n -- assignment\n <> X := 1; <>\n\n for I in 1 .. X loop\n if I > 1 then\n -- exit statement\n <> exit; <>\n elsif I > 2 then\n -- goto statement\n <> goto Assignment_Before_Label; <>\n end if;\n end loop;\n \n -- procedure call statement\n <> Ada.Text_IO.Put_Line (\"Hello World\"); <>\n if X > 1 then\n -- simple return statement\n <> return; <>\n end if;\n\n declare\n task type Server is\n entry Start(Nr : in Natural);\n end Server;\n\n task body Server is\n Iden : Natural;\n begin\n <> accept Start(Nr : in Natural) do\n Iden := Nr;\n\t<> requeue Start; <>\n end Start; <>\n Ada.Text_IO.Put_Line (\"Working...\");\n end;\n\n My_Task : Server;\n begin\n <> My_Task.Start (1); <>\n <> delay 100.0; <>\n <> abort My_Task; <>\n if X > 1 then\n <> select\n My_Task.Start (1);\n or\n delay 10.0;\n end select; <>\n end if;\n end;\n <>\n Ada.Text_IO.Put_Line (\"Code 1\");\n Ada.Text_IO.Put_Line (\"Code 2\"); \n <>\n <> <> <> null; <> <> <>\n <> raise constraint_error; <>\n\n -- ARM 5.1(5/2) Compound statements\n -- if statement\n <> if X>1 then\n Ada.Text_IO.Put_Line (\"X>1\");\n elsif X > 2 then\n Ada.Text_IO.Put_Line (\"X > 2\");\n end if; <> \n\n -- case statement\n <> case X is\n when 1 => <> Ada.Text_IO.Put_Line (\"1\"); <> \n when 2 => Ada.Text_IO.Put_Line (\"2\");\n when others => Ada.Text_IO.Put_Line (\"2\");\n end case; <>\n\n -- loop statement\n <> loop\t\n <> Ada.Text_IO.Put_Line (\"1\"); <>\n exit;\n end loop; <>\n\n <> while X > 1 loop\n <> X := X + 1; <>\n end loop; <>\n \n <> for I in 1 .. X loop\n <> Ada.Text_IO.Put_Line (X'Image); <> \n end loop; <>\n \n -- block statement\n <> declare\n Y : Integer;\n begin\n Y := X + 1;\n Ada.Text_IO.Put_Line (Y'Image);\n end; <>\n\n <> begin\n null;\n end; <>\n\n -- extended return statement\n declare\n type Coordinate is record\n X : Integer;\n Y : Integer; \n end record;\n \n function Extended_Return return Coordinate is\n begin\n <> return Coord : Coordinate do\n Coord.X := 10;\n\tCoord.Y := 20;\n end return; <>\n end Extended_Return;\n begin\n null;\n end;\n\n -- accept statement See above <> and <>\n -- select statement See above <> and <> \nend Input;" }, { "path": "Units/parser-ada.r/ada-overriding.d/args.ctags", "content": "--kinds-Ada=+E\n--sort=no\n" }, { "path": "Units/parser-ada.r/ada-overriding.d/expected.tags", "content": "Input\tinput.ads\t/^package Input$/;\"\tP\nTasche_T\tinput.ads\t/^ task type Tasche_T is new Carte_T with$/;\"\tK\tpackspec:Input\nCoucou\tinput.ads\t/^ entry Coucou;$/;\"\tE\ttaskspec:Tasche_T\nInutile\tinput.ads\t/^ procedure Inutile$/;\"\tR\tpackspec:Input\ninput_2\tinput_2.adb\t/^package body input_2$/;\"\tp\nTasche_T\tinput_2.adb\t/^ task body Tasche_T is$/;\"\tk\tpackage:input_2\tfile:\nCoucou\tinput_2.adb\t/^ accept Coucou do$/;\"\te\ttask:Tasche_T\tfile:\nInutile\tinput_2.adb\t/^ procedure Inutile$/;\"\tr\tpackage:input_2\tfile:\nInput_3\tinput_3.ads\t/^package Input_3 is$/;\"\tP\nObject\tinput_3.ads\t/^ type Object is tagged null record;$/;\"\tt\tpackspec:Input_3\nPrimitive\tinput_3.ads\t/^ function Primitive return access Object; -- new in Ada 2005$/;\"\tR\tpackspec:Input_3\nDerived_Object\tinput_3.ads\t/^ type Derived_Object is new Object with null record;$/;\"\tt\tpackspec:Input_3\nPrimitive\tinput_3.ads\t/^ procedure Primitive (This : in Derived_Object); -- new primitive operation$/;\"\tR\tpackspec:Input_3\nPrimitive\tinput_3.ads\t/^ function Primitive return access Derived_Object;$/;\"\tR\tpackspec:Input_3\n" }, { "path": "Units/parser-ada.r/ada-overriding.d/input.ads", "content": "-- Taken from #2382 submitted by @JulienPivard\n-- @summary\n-- Implémentation par une tâche.\n-- @description\n-- Implémentation par une tache de la classe synchronisé.\n-- @group Version tâche\n--\n-- package Carte_P.Tasche_P\npackage Input\n with\n Pure => False,\n Preelaborate => False,\n Elaborate_Body => True,\n Spark_Mode => Off\nis\n\n ---------------------------------------------------------------------------\n task type Tasche_T is new Carte_T with\n -- Implémentation par une tâche de l'interface Carte_T.\n\n -----------------------------------\n overriding\n entry Coucou;\n -- Implémentation par un accept.\n\n -----------------------------------\n -- overriding\n -- entry Inutile;\n -- Implémentation par un accept.\n -- @param This\n -- La carte.\n end Tasche_T;\n ---------------------------------------------------------------------------\n\n overriding\n procedure Inutile\n (This : in out Tasche_T);\n -- Implémentation par une procédure.\n -- @param This\n -- La carte.\n\nend Carte_P.Tasche_P;\n" }, { "path": "Units/parser-ada.r/ada-overriding.d/input_2.adb", "content": "-- Taken from #2382 submitted by @JulienPivard\nwith Ada.Text_IO;\n\npackage body input_2\n with Spark_Mode => Off\nis\n\n ---------------------------------------------------------------------------\n task body Tasche_T is\n -- Les déclarations qui vont bien.\n begin\n accept Coucou do\n null;\n end Coucou;\n\n Ada.Text_IO.Put_Line (Item => \"Wesh gros je suis une tâche\");\n\n -- accept Inutile do\n -- null;\n -- end Inutile;\n abort Tasche_T;\n end Tasche_T;\n ---------------------------------------------------------------------------\n\n ---------------------------------------------------------------------------\n overriding\n procedure Inutile\n (This : in out Tasche_T)\n is\n begin\n null;\n end Inutile;\n ---------------------------------------------------------------------------\n\nend input_2;\n\n" }, { "path": "Units/parser-ada.r/ada-overriding.d/input_3.ads", "content": "-- Taken from https://en.wikibooks.org/wiki/Ada_Programming/Object_Orientation#Overriding_indicators\npackage Input_3 is\n type Object is tagged null record;\n\n function Primitive return access Object; -- new in Ada 2005\n\n type Derived_Object is new Object with null record;\n\n not overriding -- new optional keywords in Ada 2005\n procedure Primitive (This : in Derived_Object); -- new primitive operation\n\n overriding\n function Primitive return access Derived_Object;\nend X;\n" }, { "path": "Units/parser-ada.r/ada-partial-bug.d/expected.tags", "content": "Altivec\tinput.adb\t/^procedure Altivec is$/;\"\tr\n" }, { "path": "Units/parser-ada.r/ada-partial-bug.d/input.adb", "content": "procedure Altivec is\n\n V" }, { "path": "Units/parser-ada.r/ada-partial-bug2.d/input.adb", "content": "procedure Altivec is:\n\n V" }, { "path": "Units/parser-ada.r/ada-partial-type.d/expected.tags", "content": "One\tinput.ads\t/^ One: access T;$/;\"\tc\ttype:T\tfile:\nP\tinput.ads\t/^package P is$/;\"\tP\nT\tinput.ads\t/^ type T is record$/;\"\tt\tpackspec:P\nTwo\tinput.ads\t/^ Two: access T$/;\"\tc\ttype:T\tfile:\n" }, { "path": "Units/parser-ada.r/ada-partial-type.d/input.ads", "content": "package P is\n type T;\n type T is record\n One: access T;\n -- Missing semicolon used to choke the Ada parser\n Two: access T\n end record;\nend P;\n" }, { "path": "Units/parser-ada.r/ada-protected.d/input.adb", "content": "protected\n" }, { "path": "Units/parser-ada.r/ada-separate.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-ada.r/ada-separate.d/expected.tags", "content": "Buffer\tinput.adb\t/^separate (Buffer);$/;\"\tp\troles:subunit\nTest\tinput.adb\t/^package body Test is$/;\"\tp\tpackage:Buffer\troles:def\nParent\tinput-1.adb\t/^package body Parent is$/;\"\tp\troles:def\nVariable\tinput-1.adb\t/^ Variable : String := \"Hello, there.\";$/;\"\tv\tpackage:Parent\tfile:\troles:def\nParent\tinput-1.adb\t/^separate(Parent)$/;\"\tp\troles:subunit\nInner\tinput-1.adb\t/^procedure Inner is$/;\"\tr\tpackage:Parent\troles:def\n" }, { "path": "Units/parser-ada.r/ada-separate.d/input-1.adb", "content": "-- Taken from https://www.adaic.org/resources/add_content/standards/05rm/html/RM-10-1-3.html\npackage body Parent is\n Variable : String := \"Hello, there.\";\n procedure Inner is separate;\nend Parent;\n\nwith Ada.Text_IO;\nseparate(Parent)\nprocedure Inner is\nbegin\n Ada.Text_IO.Put_Line(Variable);\nend Inner;\n" }, { "path": "Units/parser-ada.r/ada-separate.d/input.adb", "content": "-- Taken from #2943 submitted by @koenmeersman\nwith Ada.Text_IO;\n\nseparate (Buffer);\n\npackage body Test is\n procedure Inner is separate;\nbegin\n null;\nend Test;\n\n" }, { "path": "Units/parser-ada.r/ada-string-literal.d/expected.tags-e", "content": "\f\ninput.adb,660\nprocedure Reproduce isReproduce/p\u00012,18\n type String_T is new String;String_T/t\u00014,42\n function \"+\" (Left : String) return String_T is (String_T(Left));\"+\"/f\u00015,73\n function \"+\" (Left : String_T; Right : String) return String_T is (String_T(String (Left) & Ri\"+\"/f\u00016,141\n package Generic_G isGeneric_G/s\u000110,283\n procedure Go;Go/p\u000111,306\n package body Generic_G isGeneric_G/b\u000114,342\n procedure Go isGo/p\u000115,370\n package Impl isImpl/s\u000121,481\n procedure Go;Go/p\u000122,499\n package body Impl isImpl/b\u000125,530\n package Generic1 is new Generic_G (Description => +\"; \" +\":\");Generic1/s\u000126,553\n procedure Go renames Generic1.Go;Go/p\u000127,620\n" }, { "path": "Units/parser-ada.r/ada-string-literal.d/input.adb", "content": "with Ada.Text_IO;\nprocedure Reproduce is\n\n type String_T is new String;\n function \"+\" (Left : String) return String_T is (String_T(Left));\n function \"+\" (Left : String_T; Right : String) return String_T is (String_T(String (Left) & Right));\n\n generic\n Description : String_T;\n package Generic_G is\n procedure Go;\n end Generic_G;\n\n package body Generic_G is\n procedure Go is\n begin\n Ada.Text_IO.Put_Line (String (Description));\n end Go;\n end Generic_G;\n\n package Impl is\n procedure Go;\n end Impl;\n\n package body Impl is\n package Generic1 is new Generic_G (Description => +\"; \" +\":\");\n procedure Go renames Generic1.Go;\n end Impl;\n\nbegin\n Impl.Go;\nend Reproduce;\n" }, { "path": "Units/parser-ada.r/ada-type-new-without-with.d/args.ctags", "content": "--sort=no\n--kinds-Ada=*\n" }, { "path": "Units/parser-ada.r/ada-type-new-without-with.d/expected.tags", "content": "Input\tinput.adb\t/^procedure Input is$/;\"\tr\nPak\tinput.adb\t/^ package Pak is$/;\"\tP\tsubprogram:Input\tfile:\nInteger_1\tinput.adb\t/^ type Integer_1 is range 1 .. 10;$/;\"\tt\tpackspec:Pak\nP\tinput.adb\t/^ procedure P (I: in Integer_1); -- primitive operation, assumes 1 .. 10$/;\"\tR\tpackspec:Pak\nI\tinput.adb\t/^ procedure P (I: in Integer_1); -- primitive operation, assumes 1 .. 10$/;\"\ta\tsubprogspec:P\tfile:\nInteger_2\tinput.adb\t/^ type Integer_2 is new Integer_1 range 8 .. 10; -- must not break P's assumption$/;\"\tt\tpackspec:Pak\nPak\tinput.adb\t/^ package body Pak is$/;\"\tp\tsubprogram:Input\tfile:\nA\tinput.adb\t/^ A: Integer_1 := 4;$/;\"\tv\tsubprogram:Input\tfile:\nB\tinput.adb\t/^ B: Integer_2 := 9;$/;\"\tv\tsubprogram:Input\tfile:\n" }, { "path": "Units/parser-ada.r/ada-type-new-without-with.d/input.adb", "content": "-- Taken from https://en.wikibooks.org/wiki/Ada_Programming/Type_System\n--\n-- This code has a from of \"type foo is new ...\"\n-- Though \"new\" is used in the form, \"with\" doesn't\n-- follow \"new\" like \"type foo is new bar with ...\".\n--\nprocedure Input is\n\n package Pak is\n type Integer_1 is range 1 .. 10;\n procedure P (I: in Integer_1); -- primitive operation, assumes 1 .. 10\n type Integer_2 is new Integer_1 range 8 .. 10; -- must not break P's assumption\n\t\t\t\t\t\t\t-- procedure P (I: in Integer_2); inherited P implicitly defined here\n end Pak;\n\n package body Pak is\n -- omitted\n end Pak;\n\n use Pak;\n A: Integer_1 := 4;\n B: Integer_2 := 9;\n\nbegin\n\n P (B); -- OK, call the inherited operation\n\nend Derived_Types;\n" }, { "path": "Units/parser-ada.r/ada-whitespaces-between-id-and-colon.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-ada.r/ada-whitespaces-between-id-and-colon.d/expected.tags", "content": "Go\tinput.adb\t/^procedure Go is$/;\"\tr\nLoop_Label\tinput.adb\t/^ Loop_Label :$/;\"\ti\tsubprogram:Go\tfile:\nNot_Tagged\tinput.adb\t/^ procedure Not_Tagged is$/;\"\tr\tanon:declare\tfile:\n" }, { "path": "Units/parser-ada.r/ada-whitespaces-between-id-and-colon.d/input.adb", "content": "-- Taken from #2933 submitted by @koenmeersman\nprocedure Go is\nbegin\n Loop_Label :\n while True loop\n declare\n procedure Not_Tagged is\n begin\n null;\n end Step_T;\n begin\n null;\n end;\n end loop Loop_Label;\nend Go;\n" }, { "path": "Units/parser-ansibleplaybook.r/broken-input.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-ansibleplaybook.r/broken-input.d/args.ctags", "content": "--language-force=AnsiblePlaybook\n" }, { "path": "Units/parser-ansibleplaybook.r/broken-input.d/features", "content": "yaml\n" }, { "path": "Units/parser-ansibleplaybook.r/broken-input.d/input.yml", "content": "f: x\n y:\n" }, { "path": "Units/parser-ansibleplaybook.r/play-name.d/args.ctags", "content": "--fields=+e\n" }, { "path": "Units/parser-ansibleplaybook.r/play-name.d/expected.tags", "content": "Update ctags\tinput.yml\t/^- name: Update ctags$/;\"\tp\tend:3\nUpdate etags\tinput.yml\t/^- name: Update etags$/;\"\tp\tend:5\n" }, { "path": "Units/parser-ansibleplaybook.r/play-name.d/features", "content": "yaml\n" }, { "path": "Units/parser-ansibleplaybook.r/play-name.d/input.yml", "content": "- name: Update ctags\n yum: pkg=ctags latest\n- name: Update etags\n yum: pkg=etags latest\n" }, { "path": "Units/parser-ant.r/regex-based.d/args.ctags", "content": "--language-force=ant\n" }, { "path": "Units/parser-ant.r/regex-based.d/expected.tags", "content": "MyProject\tinput.xml\t/^$/;\"\tp\nclean\tinput.xml\t/^ $/;\"\tt\ncompile_something\tinput.xml\t/^ $/;\"\tt\ndeploy\tinput.xml\t/^ $/;\"\tt\ngenerate_h_from_java\tinput.xml\t/^ $/;\"\tt\ninit\tinput.xml\t/^ $/;\"\tt\njavadoc\tinput.xml\t/^ $/;\"\tt\nrootDir\tinput.xml\t/^ $/;\"\tP\nsrcDir\tinput.xml\t/^ $/;\"\tP\n" }, { "path": "Units/parser-ant.r/regex-based.d/features", "content": "!xpath\n" }, { "path": "Units/parser-ant.r/regex-based.d/input.xml", "content": "\r\n\r\n\r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n\r\n \r\n\r\n \r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n\r\n \r\n\r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n\t\t \r\n \r\n\r\n \r\n \t \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n \r\n\r\n" }, { "path": "Units/parser-ant.r/xpath-based-unix.d/args.ctags", "content": "--language-force=ant\n--extras=+r\n--fields=+rln\n" }, { "path": "Units/parser-ant.r/xpath-based-unix.d/expected.tags", "content": "MyProject\tinput.xml\t/^$/;\"\tp\tline:3\tlanguage:Ant\troles:def\nanother.ant\tinput.xml\t/^ $/;\"\ti\tline:4\tlanguage:Ant\tproject:MyProject\troles:imported\nbase.classpath\tinput.xml\t/^ $/;\"\ti\tline:11\tlanguage:XML\troles:def\nclean\tinput.xml\t/^ $/;\"\tt\tline:16\tlanguage:Ant\tproject:MyProject\troles:def\ncompile_something\tinput.xml\t/^ $/;\"\tt\tline:23\tlanguage:Ant\tproject:MyProject\troles:def\ndeploy\tinput.xml\t/^ $/;\"\tt\tline:68\tlanguage:Ant\tproject:MyProject\troles:def\ngenerate_h_from_java\tinput.xml\t/^ $/;\"\tt\tline:47\tlanguage:Ant\tproject:MyProject\troles:def\ninit\tinput.xml\t/^ $/;\"\tt\tline:6\tlanguage:Ant\tproject:MyProject\troles:def\njavadoc\tinput.xml\t/^ $/;\"\tt\tline:52\tlanguage:Ant\tproject:MyProject\troles:def\nx\tinput.xml\t/^ $/;\"\tP\tline:5\tlanguage:Ant\tproject:MyProject\troles:def\n" }, { "path": "Units/parser-ant.r/xpath-based-unix.d/features", "content": "xpath\n" }, { "path": "Units/parser-ant.r/xpath-based-unix.d/input.xml", "content": "\n\n\n \n \n \n \n \n \n \n \n \n \n \n\n \n \n \n\n \n \n \n \n\n \n \n \n\n \n\n \n\n \n \n \n \n\n \n \n \n \n \n \n \n\n \n\n \n \n \n \n \n \n \n \n \n \n \n\t\t \n \n\n \n \t \n \n\n \n \n \n\n \n \n \n\n \n \n\n" }, { "path": "Units/parser-ant.r/xpath-based.d/args.ctags", "content": "--language-force=ant\n--extras=+r\n--fields=+rln\n" }, { "path": "Units/parser-ant.r/xpath-based.d/expected.tags", "content": "MyProject\tinput.xml\t/^$/;\"\tp\tline:3\tlanguage:Ant\troles:def\nanother.ant\tinput.xml\t/^ $/;\"\ti\tline:4\tlanguage:Ant\tproject:MyProject\troles:imported\nbase.classpath\tinput.xml\t/^ $/;\"\ti\tline:11\tlanguage:XML\troles:def\nclean\tinput.xml\t/^ $/;\"\tt\tline:16\tlanguage:Ant\tproject:MyProject\troles:def\ncompile_something\tinput.xml\t/^ $/;\"\tt\tline:23\tlanguage:Ant\tproject:MyProject\troles:def\ndeploy\tinput.xml\t/^ $/;\"\tt\tline:68\tlanguage:Ant\tproject:MyProject\troles:def\ngenerate_h_from_java\tinput.xml\t/^ $/;\"\tt\tline:47\tlanguage:Ant\tproject:MyProject\troles:def\ninit\tinput.xml\t/^ $/;\"\tt\tline:6\tlanguage:Ant\tproject:MyProject\troles:def\njavadoc\tinput.xml\t/^ $/;\"\tt\tline:52\tlanguage:Ant\tproject:MyProject\troles:def\nx\tinput.xml\t/^ $/;\"\tP\tline:5\tlanguage:Ant\tproject:MyProject\troles:def\n" }, { "path": "Units/parser-ant.r/xpath-based.d/features", "content": "xpath\n" }, { "path": "Units/parser-ant.r/xpath-based.d/input.xml", "content": "\r\n\r\n\r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n\r\n \r\n\r\n \r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n\r\n \r\n\r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n \r\n\t\t \r\n \r\n\r\n \r\n \t \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n \r\n \r\n\r\n \r\n \r\n\r\n" }, { "path": "Units/parser-asciidoc.r/anchor-asciidoc.d/expected.tags", "content": "Chapter 1 (Level 0)\tinput.asciidoc\t/^= Chapter 1 (Level 0)$/;\"\tc\nChapter 2\tinput.asciidoc\t/^Chapter 2$/;\"\tc\nLevel 3 Section 1.1.1.1 Title\tinput.asciidoc\t/^==== Level 3 Section 1.1.1.1 Title$/;\"\tt\tsubsection:Subsection 1.1.1\nLevel 4 Section 1.1.1.1.1 Title\tinput.asciidoc\t/^===== Level 4 Section 1.1.1.1.1 Title [#inline-anchor-1]$/;\"\tT\tsubsubsection:Level 3 Section 1.1.1.1 Title\nSection 1.1\tinput.asciidoc\t/^== Section 1.1$/;\"\ts\tchapter:Chapter 1 (Level 0)\nSection 1.2\tinput.asciidoc\t/^== Section 1.2$/;\"\ts\tchapter:Chapter 1 (Level 0)\nSection 2.1\tinput.asciidoc\t/^Section 2.1$/;\"\ts\tchapter:Chapter 2\nSubsection 1.1.1\tinput.asciidoc\t/^=== Subsection 1.1.1$/;\"\tS\tsection:Section 1.1\nSubsection 1.2.1 Title\tinput.asciidoc\t/^=== [#inline-anchor-2a]Subsection 1.2.1 Title [[inline-anchor-2b, Subsection 1.2.1]]$/;\"\tS\tsection:Section 1.2\nSubsection 1.2.2 Title\tinput.asciidoc\t/^=== [[inline-anchor-3a]][#inline-anchor-3b]Subsection 1.2.2 Title [#inline-anchor-3c] ===$/;\"\tS\tsection:Section 1.2\nSubsection 2.1.1\tinput.asciidoc\t/^Subsection 2.1.1$/;\"\tS\tsection:Section 2.1\nchapter_2_anchor\tinput.asciidoc\t/^[[chapter_2_anchor]]$/;\"\ta\tsubsection:Subsection 1.2.2 Title\ninline-anchor-1\tinput.asciidoc\t/^===== Level 4 Section 1.1.1.1.1 Title [#inline-anchor-1]$/;\"\ta\tsubsubsection:Level 3 Section 1.1.1.1 Title\ninline-anchor-2a\tinput.asciidoc\t/^=== [#inline-anchor-2a]Subsection 1.2.1 Title [[inline-anchor-2b, Subsection 1.2.1]]$/;\"\ta\tsection:Section 1.2\ninline-anchor-2b\tinput.asciidoc\t/^=== [#inline-anchor-2a]Subsection 1.2.1 Title [[inline-anchor-2b, Subsection 1.2.1]]$/;\"\ta\tsection:Section 1.2\ninline-anchor-3a\tinput.asciidoc\t/^=== [[inline-anchor-3a]][#inline-anchor-3b]Subsection 1.2.2 Title [#inline-anchor-3c] ===$/;\"\ta\tsection:Section 1.2\ninline-anchor-3b\tinput.asciidoc\t/^=== [[inline-anchor-3a]][#inline-anchor-3b]Subsection 1.2.2 Title [#inline-anchor-3c] ===$/;\"\ta\tsection:Section 1.2\ninline-anchor-3c\tinput.asciidoc\t/^=== [[inline-anchor-3a]][#inline-anchor-3b]Subsection 1.2.2 Title [#inline-anchor-3c] ===$/;\"\ta\tsection:Section 1.2\nsection_1_1_1_1_anchor\tinput.asciidoc\t/^[#section_1_1_1_1_anchor]$/;\"\ta\tsubsection:Subsection 1.1.1\nsection_1_1_1_anchor\tinput.asciidoc\t/^[[section_1_1_1_anchor, The section 1.1.1 anchor]]$/;\"\ta\tsection:Section 1.1\nsection_1_1_anchor\tinput.asciidoc\t/^[[section_1_1_anchor]]$/;\"\ta\tchapter:Chapter 1 (Level 0)\nsection_1_2_anchor\tinput.asciidoc\t/^[#section_1_2_anchor, The section 1.2 anchor]$/;\"\ta\tl4subsection:Level 4 Section 1.1.1.1.1 Title\nsection_2_1_1_anchor\tinput.asciidoc\t/^[#section_2_1_1_anchor]$/;\"\ta\tsection:Section 2.1\nsection_2_1_anchor\tinput.asciidoc\t/^[[section_2_1_anchor]]$/;\"\ta\tchapter:Chapter 2\n" }, { "path": "Units/parser-asciidoc.r/anchor-asciidoc.d/input.asciidoc", "content": "= Chapter 1 (Level 0)\n\nIntro text of chapter 1\n\n[[section_1_1_anchor]]\n== Section 1.1\n\nText of section 1.1\n\n[[section_1_1_1_anchor, The section 1.1.1 anchor]]\n=== Subsection 1.1.1\n\nText of subsection 1.1.1\n\n[#section_1_1_1_1_anchor]\n==== Level 3 Section 1.1.1.1 Title\n\nText of subsection 1.1.1.1\n\n===== Level 4 Section 1.1.1.1.1 Title [#inline-anchor-1]\n\nText of subsection 1.1.1.1\n\n[#section_1_2_anchor, The section 1.2 anchor]\n== Section 1.2\n\n[#invalid anchor for Text of section 1.2\n\n=== [#inline-anchor-2a]Subsection 1.2.1 Title [[inline-anchor-2b, Subsection 1.2.1]]\n\nText of subsection 1.2.1\n\n=== [[inline-anchor-3a]][#inline-anchor-3b]Subsection 1.2.2 Title [#inline-anchor-3c] ===\n\nText of subsection 1.2.2\n\n// and now two-line titles:\n\n[[chapter_2_anchor]]\nChapter 2\n=========\n\nIntro text of chapter 2\n\n[[section_2_1_anchor]]\nSection 2.1\n------------\n\nText of section 2.1\n\n[#section_2_1_1_anchor]\nSubsection 2.1.1\n~~~~~~~~~~~~~~~\n\nother invalid anchors:\n[[]]\n[#]\n[#,]\n[[]\n[#\n" }, { "path": "Units/parser-asciidoc.r/anchor-invalid-asciidoc.d/expected.tags", "content": "L1\tinput.adoc\t/^== L1$/;\"\ts\tchapter:[A B]\nL1_b\tinput.adoc\t/^== L1_b$/;\"\ts\tchapter:[A B]\nL2\tinput.adoc\t/^=== L2$/;\"\tS\tsection:L1\nL3 Title\tinput.adoc\t/^==== L3 Title$/;\"\tt\tsubsection:L2\nL4 Title [ ]\tinput.adoc\t/^===== L4 Title [ ]$/;\"\tT\tsubsubsection:L3 Title\n[ #bad] L2_b Title [,]\tinput.adoc\t/^=== [ #bad] L2_b Title [,]$/;\"\tS\tsection:L1_b\n[A B]\tinput.adoc\t/^= [A B]$/;\"\tc\n[foo][bar] L2_c Title [[]\tinput.adoc\t/^=== [foo][bar] L2_c Title [[] ===$/;\"\tS\tsection:L1_b\ngood_anchor\tinput.adoc\t/^[[good_anchor, ]]$/;\"\ta\tsection:L1\n" }, { "path": "Units/parser-asciidoc.r/anchor-invalid-asciidoc.d/input.adoc", "content": "= [A B]\n\nIntro text of chapter 1\n\n[c]\n== L1\n\nText of section 1.1\n\n[[good_anchor, ]]\n=== L2\n\nText of subsection 1.1.1\n\n[#]\n==== L3 Title\n\nText of subsection 1.1.1.1\n\n===== L4 Title [ ]\n\nText of subsection 1.1.1.1\n\n[, bad]\n== L1_b\n\n[#invalid anchor for Text of section 1.2\n\n=== [ #bad] L2_b Title [,]\n\nText of subsection 1.2.1\n\n=== [foo][bar] L2_c Title [[] ===\n\nText of subsection 1.2.2\n" }, { "path": "Units/parser-asciidoc.r/one-character-title.d/expected.tags", "content": "a\tinput.adoc\t/^= a$/;\"\tc\nb\tinput.adoc\t/^== b$/;\"\ts\tchapter:a\nc\tinput.adoc\t/^=== c$/;\"\tS\tsection:b\n" }, { "path": "Units/parser-asciidoc.r/one-character-title.d/input.adoc", "content": "= a\n\nLorem Ipsum.\n\n== b\n\nLorem Ipsum.\n\n=== c\n\nLorem Ipsum.\n" }, { "path": "Units/parser-asciidoc.r/simple-asciidoc.d/expected.tags", "content": "Chapter 1 (Level 0)\tinput.asciidoc\t/^= Chapter 1 (Level 0)$/;\"\tc\nChapter 2\tinput.asciidoc\t/^Chapter 2$/;\"\tc\nLevel 3 Section 1.1.1.1 Title\tinput.asciidoc\t/^==== Level 3 Section 1.1.1.1 Title$/;\"\tt\tsubsection:Subsection 1.1.1\nLevel 3 Section 2.1.1.1 Title\tinput.asciidoc\t/^Level 3 Section 2.1.1.1 Title$/;\"\tt\tsubsection:Subsection 2.1.1\nLevel 4 Section 1.1.1.1.1 Title\tinput.asciidoc\t/^===== Level 4 Section 1.1.1.1.1 Title$/;\"\tT\tsubsubsection:Level 3 Section 1.1.1.1 Title\nLevel 4 Section 2.1.1.1.1 Title\tinput.asciidoc\t/^Level 4 Section 2.1.1.1.1 Title$/;\"\tT\tsubsubsection:Level 3 Section 2.1.1.1 Title\nLevel 5 Section 1.1.1.1.1.1 Title\tinput.asciidoc\t/^====== Level 5 Section 1.1.1.1.1.1 Title$/;\"\tu\tl4subsection:Level 4 Section 1.1.1.1.1 Title\nSection 1.1\tinput.asciidoc\t/^== Section 1.1$/;\"\ts\tchapter:Chapter 1 (Level 0)\nSection 1.2\tinput.asciidoc\t/^== Section 1.2$/;\"\ts\tchapter:Chapter 1 (Level 0)\nSection 2.1\tinput.asciidoc\t/^Section 2.1$/;\"\ts\tchapter:Chapter 2\nSection 2.2\tinput.asciidoc\t/^Section 2.2$/;\"\ts\tchapter:Chapter 2\nSubsection 1.1.1\tinput.asciidoc\t/^=== Subsection 1.1.1$/;\"\tS\tsection:Section 1.1\nSubsection 2.1.1\tinput.asciidoc\t/^Subsection 2.1.1$/;\"\tS\tsection:Section 2.1\n" }, { "path": "Units/parser-asciidoc.r/simple-asciidoc.d/input.asciidoc", "content": "= Chapter 1 (Level 0)\n\nIntro text of chapter 1\n\n== Section 1.1\n\nText of section 1.1\n\n=== Subsection 1.1.1\n\nText of subsection 1.1.1\n\n==== Level 3 Section 1.1.1.1 Title\n\nText of subsection 1.1.1.1\n\n===== Level 4 Section 1.1.1.1.1 Title\n\nText of subsection 1.1.1.1.1\n\n====== Level 5 Section 1.1.1.1.1.1 Title\n\nText of subsection 1.1.1.1.1.1\n\n== Section 1.2\n\nText of section 1.2\n\n// and now two-line titles:\n\nChapter 2\n=========\n\nIntro text of chapter 2\n\nSection 2.1\n------------\n\nText of section 2.1\n\nSubsection 2.1.1\n~~~~~~~~~~~~~~~\n\nLevel 3 Section 2.1.1.1 Title\n^^^^^^^^^^^^^^^^^^^^^^^^^^^^^\n\nText of subsection 2.1.1.1\n\nLevel 4 Section 2.1.1.1.1 Title\n+++++++++++++++++++++++++++++++\n\nText of subsection 2.1.1.1.1\n\n\nSection 2.2\n-----------\n\nText of section 2.2\n\n" }, { "path": "Units/parser-asciidoc.r/utf8-asciidoc.d/expected.tags", "content": "@Ѐ–𐀀\tinput.asc\t/^=== @Ѐ–𐀀$/;\"\tS\tsection:Šéçtiön 1.1\nChàptěr 1\tinput.asc\t/^Chàptěr 1$/;\"\tc\nSubsubsection 1.1.1.1\tinput.asc\t/^==== Subsubsection 1.1.1.1$/;\"\tt\tsubsection:@Ѐ–𐀀\nŠéçtiön 1.1\tinput.asc\t/^Šéçtiön 1.1$/;\"\ts\tchapter:Chàptěr 1\n" }, { "path": "Units/parser-asciidoc.r/utf8-asciidoc.d/input.asc", "content": "Chàptěr 1\n=========\n\nIntro text of chapter 1\n\nŠéçtiön 1.1\n-----------\n\nText of section 1.1\n\n=== @Ѐ–𐀀\n\nText of subsection 1.1.1\n\n==== Subsubsection 1.1.1.1\n\n" }, { "path": "Units/parser-asm.r/68hc11.asm.d/expected.tags", "content": "COLD\tinput.asm\t/^COLD LDS #STACK$/;\"\tl\nINTERRUPTS\tinput.asm\t/^INTERRUPTS:$/;\"\tl\nPORTD\tinput.asm\t/^PORTD EQU $1008$/;\"\td\nPROMPT\tinput.asm\t/^PROMPT FCB CR,LF$/;\"\tl\nSP\tinput.asm\t/^SP EQU $20$/;\"\td\nTRAPP\tinput.asm\t/^TRAPP FCB CR,LF$/;\"\tl\nsym1\tinput.asm\t/^sym1 EQU 1$/;\"\td\nsym2\tinput.asm\t/^sym2: EQU 2$/;\"\td\nsym3\tinput.asm\t/^sym3:$/;\"\tl\nsym4\tinput.asm\t/^sym4: bne sym3$/;\"\tl\n" }, { "path": "Units/parser-asm.r/68hc11.asm.d/input.asm", "content": "INTERRUPTS:\n;\nPORTD EQU $1008\n;\nSP EQU $20\n;\nTRAPP FCB CR,LF\n FCB CR,LF\n FCC ' ******** ILLEGAL OPCODE TRAP !!! ********'\n FCB CR,LF\n FCB 0\nPROMPT FCB CR,LF\n FCC ' 68Mon V1.2 (C) 1992 Keith Vasilakes'\n FCB CR,LF\n FCB 0\nCOLD LDS #STACK\n LDAA #$20\n\n; http://www.mekatronix.com/downloads/docs/as11_man.pdf\nsym1 EQU 1\nsym2: EQU 2\nsym3:\nsym4: bne sym3\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-cmdline.d/args.ctags", "content": "--sort=no\n--param-Asm.useCPreProcessor=1\n--param-CPreProcessor._expand=1\n--fields=+{signature}\n--fields-CPreProcessor=+{macrodef}\n--param-Asm.extraLinesepChars=;\n-DGENTRY(LABEL)=.global LABEL; LABEL:\n-DLENTRY(LABEL)=LABEL; LABEL:\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-cmdline.d/expected.tags", "content": "gfunc0\tinput.S\t/^GENTRY(gfunc0)$/;\"\ts\ngfunc0\tinput.S\t/^GENTRY(gfunc0)$/;\"\tl\nlfunc\tinput.S\t/^LENTRY(lfunc)$/;\"\tl\nlfunc\tinput.S\t/^LENTRY(lfunc)$/;\"\tl\ngfunc1\tinput.S\t/^GENTRY(gfunc1)$/;\"\ts\ngfunc1\tinput.S\t/^GENTRY(gfunc1)$/;\"\tl\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-cmdline.d/input.S", "content": "GENTRY(gfunc0)\n\tnop\n\nLENTRY(lfunc)\n\tnop\n\nGENTRY(gfunc1)\n\tnop\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-limitation.d/args.ctags", "content": "--param-CPreProcessor._expand=1\n--fields-CPreProcessor=+{macrodef}\n--fields=+{language}{signature}\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-limitation.d/expected.tags", "content": "X\tinput.S\t/^#define X /;\"\td\tlanguage:CPreProcessor\tfile:\tmacrodef:Y\nY\tinput.S\t/^#define Y Y$/;\"\td\tlanguage:CPreProcessor\tfile:\tmacrodef:Y\nY\tinput.S\t/^X:$/;\"\tl\tlanguage:Asm\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-limitation.d/input.S", "content": "#define X Y\n#define Y Y\nX:\n\tnop\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-multi-line-args-last-items.b/args.ctags", "content": "--sort=no\n--param-Asm.useCPreProcessor=1\n--param-CPreProcessor._expand=1\n--fields=+{signature}{line}\n--fields-CPreProcessor=+{macrodef}\n--param-Asm.commentCharsAtBOL=#\n--param-Asm.extraLinesepChars=;\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-multi-line-args-last-items.b/expected.tags", "content": "ENTRY\tinput.S\t/^#define ENTRY(/;\"\td\tline:1\tfile:\tsignature:(SYMBOL,LABEL)\tmacrodef:.global SYMBOL ;LABEL: nop\nE\tinput.S\t/^ENTRY($/;\"\ts\tline:6\nF\tinput.S\t/^\tF)$/;\"\tl\tline:7\nG\tinput.S\t/^ENTRY($/;\"\ts\tline:10\nH\tinput.S\t/^\t)$/;\"\tl\tline:11\nI\tinput.S\t/^ENTRY($/;\"\ts\tline:15\nJ\tinput.S\t/^\t)$/;\"\tl\tline:16\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-multi-line-args-last-items.b/input.S", "content": "#define ENTRY(SYMBOL,LABEL) .global SYMBOL\t;\\\nLABEL: \\\n\tnop\n\nENTRY(\n\tE,\n\tF)\n\nENTRY(\n\tG,\n\tH\n\t)\n\nENTRY(\n\tI,\n\tJ,K,\n\tL\n\t)\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-multi-line-args.d/args.ctags", "content": "--sort=no\n--param-Asm.useCPreProcessor=1\n--param-CPreProcessor._expand=1\n--fields=+{signature}{line}\n--fields-CPreProcessor=+{macrodef}\n--param-Asm.commentCharsAtBOL=#\n--param-Asm.extraLinesepChars=;\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-multi-line-args.d/expected.tags", "content": "ENTRY\tinput.S\t/^#define ENTRY(/;\"\td\tline:1\tfile:\tsignature:(SYMBOL,LABEL)\tmacrodef:.global SYMBOL ;LABEL: nop\nA\tinput.S\t/^ENTRY(A, B)$/;\"\ts\tline:5\nB\tinput.S\t/^ENTRY(A, B)$/;\"\tl\tline:5\nC\tinput.S\t/^ENTRY(C,$/;\"\ts\tline:6\nD\tinput.S\t/^\tD)$/;\"\tl\tline:7\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion-with-multi-line-args.d/input.S", "content": "#define ENTRY(SYMBOL,LABEL) .global SYMBOL\t;\\\nLABEL: \\\n\tnop\n\nENTRY(A, B)\nENTRY(C,\n\tD)\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/args.ctags", "content": "--sort=no\n--param-Asm.useCPreProcessor=1\n--param-CPreProcessor._expand=1\n--fields=+{signature}\n--fields-CPreProcessor=+{macrodef}\n--param-Asm.commentCharsAtBOL=#\n--param-Asm.extraLinesepChars=;\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/expected.tags", "content": "ENTRY\tinput.S\t/^#define ENTRY(/;\"\td\tfile:\tsignature:(LABEL)\tmacrodef:.global LABEL ;LABEL\nmain\tinput.S\t/^ENTRY(main):$/;\"\ts\nmain\tinput.S\t/^ENTRY(main):$/;\"\tl\nENTRY2\tinput.S\t/^#define ENTRY2(/;\"\td\tfile:\tsignature:(LABEL,UNUSED)\tmacrodef:.global LABEL ;LABEL\nloop0\tinput.S\t/^ENTRY2(loop0, \"STRING\"):$/;\"\ts\nloop0\tinput.S\t/^ENTRY2(loop0, \"STRING\"):$/;\"\tl\nloop1\tinput.S\t/^ENTRY2(loop1, 'c'):$/;\"\ts\nloop1\tinput.S\t/^ENTRY2(loop1, 'c'):$/;\"\tl\nloop2\tinput.S\t/^ENTRY2(loop2, ('c')):$/;\"\ts\nloop2\tinput.S\t/^ENTRY2(loop2, ('c')):$/;\"\tl\nASM_NL\tinput.S\t/^#define ASM_NL\t/;\"\td\tfile:\tmacrodef:;\nSYM_ENTRY\tinput.S\t/^#define SYM_ENTRY(/;\"\td\tfile:\tsignature:(name,linkage,align...)\tmacrodef:linkage(name) ASM_NL align ASM_NL name:\nSYM_START\tinput.S\t/^#define SYM_START(/;\"\td\tfile:\tsignature:(name,linkage,align...)\tmacrodef:SYM_ENTRY(name, linkage, align)\nSYM_CODE_START\tinput.S\t/^#define SYM_CODE_START(/;\"\td\tfile:\tsignature:(name)\tmacrodef:SYM_START(name, SYM_L_GLOBAL, SYM_A_ALIGN)\nasm_exc_nmi\tinput.S\t/^SYM_CODE_START(asm_exc_nmi)$/;\"\tl\nENTRY0\tinput-0.S\t/^#define ENTRY0(/;\"\td\tfile:\tsignature:(LABEL)\tmacrodef:.global LABEL ;LABEL\nENTRY1\tinput-1.S\t/^#define ENTRY1(/;\"\td\tfile:\tsignature:(LABEL)\tmacrodef:.global LABEL ;LABEL\nENTRY2\tinput-2.S\t/^#define ENTRY2(/;\"\td\tfile:\tsignature:(LABEL)\tmacrodef:.global LABEL ;LABEL\nexit2\tinput-2.S\t/^ENTRY2(exit2):$/;\"\ts\nexit2\tinput-2.S\t/^ENTRY2(exit2):$/;\"\tl\nENTRY3\tinput-3.S\t/^#define ENTRY3 /;\"\td\tfile:\tmacrodef:label3:; nop;.section .entry.text, \nlabel3\tinput-3.S\t/^\tENTRY3\"a\"$/;\"\tl\nENTRY4\tinput-4.S\t/^#define ENTRY4 /;\"\td\tfile:\tmacrodef:label4:\nENTRY5\tinput-4.S\t/^#define ENTRY5 /;\"\td\tfile:\tmacrodef:label5:\nlabel4\tinput-4.S\t/^ENTRY4;\tnop$/;\"\tl\nlabel5\tinput-4.S\t/^ENTRY5$/;\"\tl\nMAC5\tinput-5.S\t/^#define MAC5 /;\"\td\tfile:\tmacrodef:maclabel5:; nop;maclabel50:; nop\nmaclabel5\tinput-5.S\t/^MAC5/;\"\tl\nmaclabel50\tinput-5.S\t/^MAC5/;\"\tl\nENTRYZ\tinput-6.S\t/^#define ENTRYZ /;\"\td\tfile:\tmacrodef:label6:; nop;.section .entry.text, \nlabel6\tinput-6.S\t/^\tENTRYZ'z'$/;\"\tl\nX\tinput-7.S\t/^#define X(/;\"\td\tfile:\tsignature:()\tmacrodef:mylabel:; nop;\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-0.S", "content": "#define ENTRY0(LABEL) .global LABEL\t;\\\nLABEL\n\n#comment\nENTRY0(dummy0:\n\tnop\n\nexit0:\n\tnop\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-1.S", "content": "#define ENTRY1(LABEL) .global LABEL\t;\\\nLABEL\n\n#comment\nENTRY1(dummy1:\n\tnop\n\nENTRY1(exit1):\n\tnop\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-2.S", "content": "#define ENTRY2(LABEL) .global LABEL\t;\\\nLABEL\n\n#comment\nENTRY2()\n\nENTRY2(exit2):\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-3.S", "content": "#define ENTRY3 label3:;\tnop;.section .entry.text, \n\tENTRY3\"a\"\n/* gcc -c input-3.S (x86_64) */\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-4.S", "content": "#define ENTRY4 label4:\n#define ENTRY5 label5:\nENTRY4;\tnop\nENTRY5\n\tnop\n/* gcc -c input-3.S (x86_64) */\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-5.S", "content": "/* Don't put NEWLINE at the eof this file.\n No NEWLINE is part of testing. */\n#define MAC5 maclabel5:;\tnop;maclabel50:;\tnop\n\nMAC5" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-6.S", "content": "/* This is abroken input (at lesat for GAS) */\n#define ENTRYZ label6:;\tnop;.section .entry.text, \n\tENTRYZ'z'\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input-7.S", "content": "#define X() mylabel:;\tnop;\n\nX:\n\tnop\n" }, { "path": "Units/parser-asm.r/asm-cpp-macro-expansion.d/input.S", "content": "#define ENTRY(LABEL) .global LABEL\t;\\\nLABEL\n\n#comment\nENTRY(main):\n\tnop\n\n#define ENTRY2(LABEL,UNUSED) .global LABEL\t;\\\nLABEL\nENTRY2(loop0, \"STRING\"):\n\tnop\n\nENTRY2(loop1, 'c'):\n\tnop\n\nENTRY2(loop2, ('c')):\n\tnop\n\n/* Taken from linux kernel */\n#define ASM_NL\t\t ;\n#define SYM_ENTRY(name, linkage, align...)\t\t\\\n\tlinkage(name) ASM_NL\t\t\t\t\\\n\talign ASM_NL\t\t\t\t\t\\\n\tname:\n\n#define SYM_START(name, linkage, align...)\t\t\\\n\tSYM_ENTRY(name, linkage, align)\n\n#define SYM_CODE_START(name)\t\t\t\t\\\n\tSYM_START(name, SYM_L_GLOBAL, SYM_A_ALIGN)\n\nSYM_CODE_START(asm_exc_nmi)\n\tUNWIND_HINT_IRET_REGS\n\tENDBR\n" }, { "path": "Units/parser-asm.r/bd32.s.d/expected.tags", "content": "CRLF\tinput.s\t/^CRLF dc.b 13,10,0 , , null$/;\"\td\nTEST\tinput.s\t/^TEST move.l a0,a1 get argv in a1$/;\"\tl\nsignon\tinput.s\t/^signon dc.b 'TEST PROGRAM for BD32 programming drivers'$/;\"\td\ntest_1\tinput.s\t/^test_1 moveq.l #BD_PUTS,d0 puts () system call$/;\"\tl\ntest_error\tinput.s\t/^test_error moveq.l #BD_QUIT,d0 all done - quit$/;\"\tl\n" }, { "path": "Units/parser-asm.r/bd32.s.d/input.s", "content": "* From: http://www.programmersheaven.com/zone5/cat462/3642.htm\n* For 68000 assembler manual, see http://www.ece.iit.edu/ftp/242/Asm.doc\n*\n* test driver for BD32 programming command\n* Scott Howard February 1992\n* Format: TEST [ ...]\n* simply echoes the command line parameters back to the user\n\n opt nol\n include ipd.inc\n opt l\n dc.l TEST execution address\nsignon dc.b 'TEST PROGRAM for BD32 programming drivers'\nCRLF dc.b 13,10,0 , , null\n even\n\n* following is the mainline routine for the driver\n\nTEST move.l a0,a1 get argv in a1\n move.l d0,d2 get argc\n lea.l signon(PC),a0 print signon string\n moveq.l #BD_PUTS,d0 use 'putstring' function in BD32\n\t\tbgnd\n cmpi.l #2,d2 arg count < 2?\n bcc test_1\n moveq.l #1,d1 bail out - error code 1\n bra test_error\ntest_1 moveq.l #BD_PUTS,d0 puts () system call\n movea.l (a1)+,a0 point to next string\n\t\tbgnd\n moveq.l #' ',d1 print space between each one\n moveq.l #BD_PUTCHAR,d0\n\t\tbgnd\n subq #1,d2\n bne test_1 loop till done\n\t\tlea.l\tCRLF(PC),a0\tpoint to string\n moveq.l #BD_PUTS,d0 display it on user screen\n\t\tbgnd\n clr.l d1 indicate 'no error' to BD32\ntest_error moveq.l #BD_QUIT,d0 all done - quit\n\t\tbgnd\n\n END TEST\n" }, { "path": "Units/parser-asm.r/bug538629.asm.d/expected.tags", "content": "MYMACRO\tinput.asm\t/^\tMYMACRO EQU 01234h$/;\"\td\n" }, { "path": "Units/parser-asm.r/bug538629.asm.d/input.asm", "content": "\tMYMACRO EQU 01234h\n" }, { "path": "Units/parser-asm.r/cpp-parameter-false.d/args.ctags", "content": "--sort=no\n--param-Asm.useCPreProcessor=0\n" }, { "path": "Units/parser-asm.r/cpp-parameter-false.d/expected.tags", "content": "labelM\tinput.s\t/^\t.global labelM$/;\"\ts\nlabelM\tinput.s\t/^labelM:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/cpp-parameter-false.d/input.s", "content": "#define labelM main\n\n\t.global labelM\nlabelM:\n\tnop\n" }, { "path": "Units/parser-asm.r/cpp-parameter-true.d/args.ctags", "content": "--sort=no\n--param-Asm.useCPreProcessor=1\n" }, { "path": "Units/parser-asm.r/cpp-parameter-true.d/expected.tags", "content": "labelM\tinput.S\t/^#define labelM /;\"\td\tfile:\nlabelM\tinput.S\t/^\t.global labelM$/;\"\ts\nlabelM\tinput.S\t/^labelM:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/cpp-parameter-true.d/input.S", "content": "#define labelM main\n\n\t.global labelM\nlabelM:\n\tnop\n" }, { "path": "Units/parser-asm.r/crash-when-deleting-token.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-asm.r/crash-when-deleting-token.d/args.ctags", "content": "-Iconst\n" }, { "path": "Units/parser-asm.r/crash-when-deleting-token.d/input.S", "content": "\tconst\n\n" }, { "path": "Units/parser-asm.r/directive-before-label.d/expected.tags", "content": "" }, { "path": "Units/parser-asm.r/directive-before-label.d/input.s", "content": "\t.aDirective label\n\n" }, { "path": "Units/parser-asm.r/gas-parameterized-comment-no-cpp.d/args.ctags", "content": "--sort=no\n--param-Asm.commentCharsAtBOL=L\n--param-Asm.useCPreProcessor=false\n" }, { "path": "Units/parser-asm.r/gas-parameterized-comment-no-cpp.d/expected.tags", "content": "retry\tinput.s\t/^retry:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/gas-parameterized-comment-no-cpp.d/input.s", "content": "#define X 1\nLoop:\nretry:\n\tjmp retry\n" }, { "path": "Units/parser-asm.r/gas-parameterized-comment.d/args.ctags", "content": "--sort=no\n--param-Asm.commentCharsAtBOL=L\n--param-Asm.useCPreProcessor=true\n" }, { "path": "Units/parser-asm.r/gas-parameterized-comment.d/expected.tags", "content": "X\tinput.s\t/^#define X /;\"\td\tfile:\nretry\tinput.s\t/^retry:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/gas-parameterized-comment.d/input.s", "content": "#define X 1\nLoop:\nretry:\n\tjmp retry\n" }, { "path": "Units/parser-asm.r/gas-parameterized-linesep-no-cpp.d/args.ctags", "content": "--sort=no\n--param-Asm.extraLinesepChars=,\n# To increse the test coverage, overwrite the parameter\n# that set from the command line once.\n--param-Asm.extraLinesepChars=;\n--param-Asm.useCPreProcessor=false\n" }, { "path": "Units/parser-asm.r/gas-parameterized-linesep-no-cpp.d/expected.tags", "content": "retry\tinput.s\t/^retry:;loop:$/;\"\tl\nloop\tinput.s\t/^retry:;loop:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/gas-parameterized-linesep-no-cpp.d/input.s", "content": "#define X 1\nretry:;loop:\n\tjmp retry\n\tjmp loop\n" }, { "path": "Units/parser-asm.r/gas-parameterized-linesep.d/args.ctags", "content": "--sort=no\n--param-Asm.extraLinesepChars=,\n# To increse the test coverage, overwrite the parameter\n# that set from the command line once.\n--param-Asm.extraLinesepChars=;\n--param-Asm.useCPreProcessor=true\n" }, { "path": "Units/parser-asm.r/gas-parameterized-linesep.d/expected.tags", "content": "X\tinput.s\t/^#define X /;\"\td\tfile:\nretry\tinput.s\t/^retry:;loop:$/;\"\tl\nloop\tinput.s\t/^retry:;loop:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/gas-parameterized-linesep.d/input.s", "content": "#define X 1\nretry:;loop:\n\tjmp retry\n\tjmp loop\n" }, { "path": "Units/parser-asm.r/gas-section.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+rlK\n" }, { "path": "Units/parser-asm.r/gas-section.d/expected.tags", "content": "machine/asm.h\tinput.s\t/^#include /;\"\theader\tlanguage:CPreProcessor\troles:system\n.rodata.cst8\tinput.s\t/^\t.section .rodata.cst8,\"aM\",@progbits,8$/;\"\tinputSection\tlanguage:LdScript\troles:destination\none\tinput.s\t/^one:\t.double 1.0$/;\"\tlabel\tlanguage:Asm\troles:def\nlimit\tinput.s\t/^limit:\t.double 0.29$/;\"\tlabel\tlanguage:Asm\troles:def\n.inittext\tinput-0.s\t/^\t.section \".inittext\",\"ax\"$/;\"\tinputSection\tlanguage:LdScript\troles:destination\nintcall\tinput-0.s\t/^\t.globl\tintcall$/;\"\tsymbol\tlanguage:LdScript\tinputSection:.inittext\troles:def\nintcall\tinput-0.s\t/^intcall:$/;\"\tlabel\tlanguage:Asm\troles:def\ndefine_ftsec\tinput-1.s\t/^.macro define_ftsec name$/;\"\tmacro\tlanguage:Asm\troles:def\n.head.text.\\\\name\\\\()\tinput-1.s\t/^\t.section \".head.text.\\\\name\\\\()\",\"ax\",@progbits$/;\"\tinputSection\tlanguage:LdScript\troles:destination\n" }, { "path": "Units/parser-asm.r/gas-section.d/input-0.s", "content": "/* Taken from linux/arch/x86/boot/bioscall.S */\n\n/*\n * \"Glove box\" for BIOS calls. Avoids the constant problems with BIOSes\n * touching registers they shouldn't be.\n */\n\n\t.code16\n\t.section \".inittext\",\"ax\"\n\t.globl\tintcall\n\t.type\tintcall, @function\nintcall:\n\t/* Self-modify the INT instruction. Ugly, but works. */\n\tcmpb\t%al, 3f\n" }, { "path": "Units/parser-asm.r/gas-section.d/input-1.s", "content": "/* Taken from linux/arch/powerpc/include/asm/head-64.h */\n#ifdef __ASSEMBLY__\n.macro define_ftsec name\n\t.section \".head.text.\\name\\()\",\"ax\",@progbits\n.endm\n#endif\n" }, { "path": "Units/parser-asm.r/gas-section.d/input.s", "content": "/* Taken from glibc/sysdeps/x86_64/fpu/e_logl.S */\n\n/*\n * Written by J.T. Conklin .\n * Public domain.\n *\n * Adapted for `long double' by Ulrich Drepper .\n * Adapted for x86-64 by Andreas Jaeger .\n */\n\n#include \n\n\n\t.section .rodata.cst8,\"aM\",@progbits,8\n\n\t.p2align 3\n\t.type one,@object\none:\t.double 1.0\n\tASM_SIZE_DIRECTIVE(one)\n\t/* It is not important that this constant is precise. It is only\n\t a value which is known to be on the safe side for using the\n\t fyl2xp1 instruction. */\n\t.type limit,@object\nlimit:\t.double 0.29\n\tASM_SIZE_DIRECTIVE(limit)\n" }, { "path": "Units/parser-asm.r/gas.s.d/args.ctags", "content": "--fields=+en\n" }, { "path": "Units/parser-asm.r/gas.s.d/expected.tags", "content": "X\tinput.s\t/^#define X /;\"\td\tline:7\tfile:\tend:7\n_EQU\tinput.s\t/^.equ _EQU equ1$/;\"\td\tline:14\n_EQUIV\tinput.s\t/^.equiv _EQUIV equiv2$/;\"\td\tline:15\n_EQV\tinput.s\t/^.eqv _EQV eqv3$/;\"\td\tline:16\naltsum\tinput.s\t/^.macro altsum from=0, to=6$/;\"\tm\tline:8\tend:13\nsum\tinput.s\t/^.macro sum from=0, to=5$/;\"\tm\tline:1\tend:6\n" }, { "path": "Units/parser-asm.r/gas.s.d/input.s", "content": ".macro sum from=0, to=5\n\t.long \\from\n\t.if \\to-\\from\n\tsum \"(\\from+1)\",\\to\n\t.endif\n\t.endm\n#define X 1\n.macro altsum from=0, to=6\n\t.long \\from\n\t.if \\to-\\from\n\tsum \"(\\from+1)\",\\to\n\t.endif\n\t.endm\n.equ _EQU equ1\n.equiv _EQUIV equiv2\n.eqv _EQV eqv3\n" }, { "path": "Units/parser-asm.r/label-capturing.d/expected.tags", "content": "idtentry\tinput.S\t/^.macro idtentry sym do_sym has_error_code:req paranoid=0 shift_ist=-1 ist_offset=0 create_gap=0 /;\"\tm\n" }, { "path": "Units/parser-asm.r/label-capturing.d/input.S", "content": "/* Taken from linux/arch/x86/entry/entry_64.S\n idtentry is a macro. It should not be captured as a label. */\n\n/* SPDX-License-Identifier: GPL-2.0 */\n/*\n * linux/arch/x86_64/entry.S\n *\n * Copyright (C) 1991, 1992 Linus Torvalds\n * Copyright (C) 2000, 2001, 2002 Andi Kleen SuSE Labs\n * Copyright (C) 2000 Pavel Machek \n *\n * entry.S contains the system-call and fault low-level handling routines.\n *\n * Some of this is documented in Documentation/x86/entry_64.rst\n *\n * A note on terminology:\n * - iret frame:\tArchitecture defined interrupt frame from SS to RIP\n *\t\t\tat the top of the kernel process stack.\n *\n * Some macro usage:\n * - SYM_FUNC_START/END:Define functions in the symbol table.\n * - TRACE_IRQ_*:\tTrace hardirq state for lock debugging.\n * - idtentry:\t\tDefine exception entry points.\n */\n\t\n.macro idtentry sym do_sym has_error_code:req paranoid=0 shift_ist=-1 ist_offset=0 create_gap=0 read_cr2=0\nSYM_CODE_START(\\sym)\n\tUNWIND_HINT_IRET_REGS offset=\\has_error_code*8\n\n\t/* Sanity check */\n\t.if \\shift_ist != -1 && \\paranoid != 1\n\t.error \"using shift_ist requires paranoid=1\"\n\t.endif\n\n\t.if \\create_gap && \\paranoid\n\t.error \"using create_gap requires paranoid=0\"\n\t.endif\n\n\tASM_CLAC\n\n\t.if \\has_error_code == 0\n\tpushq\t$-1\t\t\t\t/* ORIG_RAX: no syscall to restart */\n\t.endif\n\n\t.if \\paranoid == 1\n\ttestb\t$3, CS-ORIG_RAX(%rsp)\t\t/* If coming from userspace, switch stacks */\n\tjnz\t.Lfrom_usermode_switch_stack_\\@\n\t.endif\n\n\t.if \\create_gap == 1\n\t/*\n\t * If coming from kernel space, create a 6-word gap to allow the\n\t * int3 handler to emulate a call instruction.\n\t */\n\ttestb\t$3, CS-ORIG_RAX(%rsp)\n\tjnz\t.Lfrom_usermode_no_gap_\\@\n\t.rept\t6\n\tpushq\t5*8(%rsp)\n\t.endr\n\tUNWIND_HINT_IRET_REGS offset=8\n.Lfrom_usermode_no_gap_\\@:\n\t.endif\n\n\tidtentry_part \\do_sym, \\has_error_code, \\read_cr2, \\paranoid, \\shift_ist, \\ist_offset\n\n\t.if \\paranoid == 1\n\t/*\n\t * Entry from userspace. Switch stacks and treat it\n\t * as a normal entry. This means that paranoid handlers\n\t * run in real process context if user_mode(regs).\n\t */\n.Lfrom_usermode_switch_stack_\\@:\n\tidtentry_part \\do_sym, \\has_error_code, \\read_cr2, paranoid=0\n\t.endif\n\n_ASM_NOKPROBE(\\sym)\nSYM_CODE_END(\\sym)\n.endm\n\nidtentry divide_error\t\t\tdo_divide_error\t\t\thas_error_code=0\nidtentry overflow\t\t\tdo_overflow\t\t\thas_error_code=0\nidtentry bounds\t\t\t\tdo_bounds\t\t\thas_error_code=0\nidtentry invalid_op\t\t\tdo_invalid_op\t\t\thas_error_code=0\nidtentry device_not_available\t\tdo_device_not_available\t\thas_error_code=0\nidtentry double_fault\t\t\tdo_double_fault\t\t\thas_error_code=1 paranoid=2 read_cr2=1\nidtentry coprocessor_segment_overrun\tdo_coprocessor_segment_overrun\thas_error_code=0\nidtentry invalid_TSS\t\t\tdo_invalid_TSS\t\t\thas_error_code=1\nidtentry segment_not_present\t\tdo_segment_not_present\t\thas_error_code=1\nidtentry spurious_interrupt_bug\t\tdo_spurious_interrupt_bug\thas_error_code=0\nidtentry coprocessor_error\t\tdo_coprocessor_error\t\thas_error_code=0\nidtentry alignment_check\t\tdo_alignment_check\t\thas_error_code=1\nidtentry simd_coprocessor_error\t\tdo_simd_coprocessor_error\thas_error_code=0\n\n\t\n\n\t\n" }, { "path": "Units/parser-asm.r/label-just-before-comment-no-cpp.d/args.ctags", "content": "--sort=no\n--param-Asm.commentCharsInMOL=;\n--param-Asm.useCPreProcessor=false\n" }, { "path": "Units/parser-asm.r/label-just-before-comment-no-cpp.d/expected.tags", "content": "retry\tinput.s\t/^retry:;loop:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/label-just-before-comment-no-cpp.d/input.s", "content": "#define X 1\nretry:;loop:\n\tjmp retry\n\tjmp retry\n" }, { "path": "Units/parser-asm.r/label-just-before-comment.d/args.ctags", "content": "--sort=no\n--param-Asm.commentCharsInMOL=;\n--param-Asm.useCPreProcessor=true\n" }, { "path": "Units/parser-asm.r/label-just-before-comment.d/expected.tags", "content": "X\tinput.s\t/^#define X /;\"\td\tfile:\nretry\tinput.s\t/^retry:;loop:$/;\"\tl\n" }, { "path": "Units/parser-asm.r/label-just-before-comment.d/input.s", "content": "#define X 1\nretry:;loop:\n\tjmp retry\n\tjmp retry\n" }, { "path": "Units/parser-asm.r/macro-params.d/args.ctags", "content": "--sort=no\n--kinds-Asm=+z\n--fields=+eSo\n--fields-Asm=+{properties}\n" }, { "path": "Units/parser-asm.r/macro-params.d/expected.tags", "content": "comm\tinput.asm\t/^\t.macro comm$/;\"\tm\tend:4\nplus1\tinput.asm\t/^\t.macro plus1 p, p1$/;\"\tm\tsignature:p p1\tend:7\np\tinput.asm\t/^\t.macro plus1 p, p1$/;\"\tz\tmacro:plus1\tnth:0\np1\tinput.asm\t/^\t.macro plus1 p, p1$/;\"\tz\tmacro:plus1\tnth:1\nplus2\tinput.asm\t/^\t.macro plus2 p p1$/;\"\tm\tsignature:p p1\tend:10\np\tinput.asm\t/^\t.macro plus2 p p1$/;\"\tz\tmacro:plus2\tnth:0\np1\tinput.asm\t/^\t.macro plus2 p p1$/;\"\tz\tmacro:plus2\tnth:1\nreserve_str\tinput.asm\t/^\t.macro reserve_str p1=0 p2$/;\"\tm\tsignature:p1=0 p2\tend:13\np1\tinput.asm\t/^\t.macro reserve_str p1=0 p2$/;\"\tz\tmacro:reserve_str\tnth:0\np2\tinput.asm\t/^\t.macro reserve_str p1=0 p2$/;\"\tz\tmacro:reserve_str\tnth:1\nm\tinput.asm\t/^\t.macro m p1:req, p2=0, p3:vararg$/;\"\tm\tsignature:p1:req p2=0 p3:vararg\tend:16\np1\tinput.asm\t/^\t.macro m p1:req, p2=0, p3:vararg$/;\"\tz\tmacro:m\tnth:0\tproperties:req\np2\tinput.asm\t/^\t.macro m p1:req, p2=0, p3:vararg$/;\"\tz\tmacro:m\tnth:1\np3\tinput.asm\t/^\t.macro m p1:req, p2=0, p3:vararg$/;\"\tz\tmacro:m\tnth:2\tproperties:vararg\nfunc_define\tinput.asm\t/^\t.macro\tfunc_define\tname,nr=0$/;\"\tm\tsignature:name nr=0\tend:27\nname\tinput.asm\t/^\t.macro\tfunc_define\tname,nr=0$/;\"\tz\tmacro:func_define\tnth:0\nnr\tinput.asm\t/^\t.macro\tfunc_define\tname,nr=0$/;\"\tz\tmacro:func_define\tnth:1\n\\\\name\tinput.asm\t/^\t.macro\t\\\\name\targ1,arg2,arg3,arg4$/;\"\tm\tmacro:func_define\tsignature:arg1 arg2 arg3 arg4\tend:26\narg1\tinput.asm\t/^\t.macro\t\\\\name\targ1,arg2,arg3,arg4$/;\"\tz\tmacro:func_define.\\\\name\tnth:0\narg2\tinput.asm\t/^\t.macro\t\\\\name\targ1,arg2,arg3,arg4$/;\"\tz\tmacro:func_define.\\\\name\tnth:1\narg3\tinput.asm\t/^\t.macro\t\\\\name\targ1,arg2,arg3,arg4$/;\"\tz\tmacro:func_define.\\\\name\tnth:2\narg4\tinput.asm\t/^\t.macro\t\\\\name\targ1,arg2,arg3,arg4$/;\"\tz\tmacro:func_define.\\\\name\tnth:3\n" }, { "path": "Units/parser-asm.r/macro-params.d/input.asm", "content": "\t;; Taken from \"7.63 '.macro'\", the section of the info document for Gas\n\n\t.macro comm\n\t.endm\n\n\t.macro plus1 p, p1\n\t.endm\n\n\t.macro plus2 p p1\n\t.endm\n\n\t.macro reserve_str p1=0 p2\n\t.endm\n\n\t.macro m p1:req, p2=0, p3:vararg\n\t.endm\n\n\t;; Taken From linux/arch/m68k/kernel/head.S\n\t.macro\tfunc_define\tname,nr=0\n\t.macro\t\\name\targ1,arg2,arg3,arg4\n\t\tmove_stack\t\\nr,\\arg1,\\arg2,\\arg3,\\arg4\n\t\tfunc_call\t\\name\n\t.if\t\\nr\n\t\tlea\t%sp@(\\nr*4),%sp\n\t.endif\n\t.endm\n\t.endm\n" }, { "path": "Units/parser-asm.r/masm.asm.d/expected.tags", "content": "BYTE_BUFFER\tinput.asm\t/^BYTE_BUFFER LABEL BYTE$/;\"\tl\nLabelMaker1\tinput.asm\t/^LabelMaker1:$/;\"\tl\nLabelMaker2\tinput.asm\t/^LabelMaker2:$/;\"\tl\nMsg\tinput.asm\t/^Msg\tDB \"Text string\"$/;\"\td\nQUACK\tinput.asm\t/^QUACK PROC PUBLIC$/;\"\tl\nWORD_BUFFER\tinput.asm\t/^WORD_BUFFER DW 512 dup (?)$/;\"\td\nhllequal\tinput.asm\t/^hllequal := 4$/;\"\td\nmyequ\tinput.asm\t/^myequ\tEQU 3$/;\"\td\nmyequal\tinput.asm\t/^myequal = 4$/;\"\td\nmymacro\tinput.asm\t/^mymacro macro args$/;\"\tm\nmystruct\tinput.asm\t/^mystruct struct$/;\"\tt\n" }, { "path": "Units/parser-asm.r/masm.asm.d/input.asm", "content": ".MODEL medium\n.DATA\nMsg\tDB \"Text string\"\n.CODE \nQUACK PROC PUBLIC\n enter 0, 0 ; May be an instruction or a macro\n mov bx, OFFSET DGROUP:Msg\n mov bx, [bp+6]\n mov WORD PTR [bx], ax\n leave\n ret 2\nQUACK ENDP\nEND\n\nmyequ\tEQU 3\nmyequal = 4\n\n; http://www.xploiter.com/mirrors/asm/asm_1.htm\nhllequal := 4\n\nBYTE_BUFFER LABEL BYTE\nWORD_BUFFER DW 512 dup (?)\n\n mov bx, ax\nLabelMaker1:\n xor ax, ax\nLabelMaker2:\n\nmymacro macro args\nendm\n\nmystruct struct\nends\n" }, { "path": "Units/parser-asm.r/moniker.x68.d/expected.tags", "content": "CHECK2\tinput.x68\t/^CHECK2 \tCMPI.B #'A',(A0) Is Char > A ?$/;\"\tl\nDUMMY\tinput.x68\t/^DUMMY\t DS.B 1$/;\"\td\nF_NAME\tinput.x68\t/^F_NAME DS.B 80$/;\"\td\nINITIAL\tinput.x68\t/^INITIAL \tMOVEA.L #F_NAME,A1 Move the first char to A1$/;\"\tl\nPRNSURNAME\tinput.x68\t/^PRNSURNAME\tMOVEA.L #S_NAME,A1 Pointer to start of prompt text$/;\"\tl\nPROMPT1\tinput.x68\t/^PROMPT1 DC.B 'Please enter your firstname (Max 80): '$/;\"\td\nPROMPT2\tinput.x68\t/^PROMPT2 DC.B 'Please enter your surname (Max 80): '$/;\"\td\nPRTSTR\tinput.x68\t/^PRTSTR \tEQU 1 Print string Function$/;\"\td\nQUIT\tinput.x68\t/^QUIT \tSTOP #$2700 Stop the prorgam$/;\"\tl\nREADSTR\tinput.x68\t/^READSTR \tEQU 2 Read string function$/;\"\td\nRETURNFALSE\tinput.x68\t/^RETURNFALSE MOVE.B #0,D5\t\t\t Moves a zero to D5 to make CAPS false$/;\"\tl\nRETURNTRUE\tinput.x68\t/^RETURNTRUE MOVE.B #1,D5\t\t\t Moves a one to D5 to make CAPS ture$/;\"\tl\nSTART\tinput.x68\t/^START \tMOVEA.L #PROMPT1,A1 Pointer to start of prompt text$/;\"\tl\nSURNAME\tinput.x68\t/^SURNAME \tMOVEA.L #PROMPT2,A1 Pointer to start of prompt text$/;\"\tl\nS_NAME\tinput.x68\t/^S_NAME DS.B 80$/;\"\td\n" }, { "path": "Units/parser-asm.r/moniker.x68.d/input.x68", "content": "* http://www.xrmx.com/solutions/software/68k-fe/samples/moniker.x68\n* MONIKER.X68\n* Author : Greg Colley\n* Date : 29/01/99\n \n* Program Description.\n* This will prompt for surname and firstname, and check if its uppercase\n* If it is it prints Initial + surname else it repromts.\n*\t This program will only exit when nothing is entered in the surname or \n*\t firstname.\n \nPRTSTR \tEQU 1 Print string Function\nREADSTR \tEQU 2 Read string function\n\n \tORG $1000 Start of code location\n\n* \tPrint user prompt for enter the firstname\n*\t\t=========================================\nSTART \tMOVEA.L #PROMPT1,A1 Pointer to start of prompt text\n \tMOVE.B #PRTSTR,D0 Set up print string function\n \tMOVE.W #(PROMPT2-PROMPT1),D1 The prompt string length\n \tTRAP #15 Print Prompt\n \n* \tGet firstname\n*\t\t=============\n \tMOVEA.L #F_NAME,A1 Pointer to store the sentence\n \tMOVE.B #READSTR,D0 Set up readstring function\n \tTRAP #15 Get string from KB\n \tMOVE.W D1,D4 Save length of input string to d4\n \n\n* \tCheck if Return is pressed\n \tCMPI.W #0,D4 Is the length = 0\n \tBEQ QUIT If length = 0 then Quit\n\n*\t\tSet up the stuff to check it the entered word is in CAPS\n*\t\t========================================================\n \tMOVEA.L #F_NAME,A0 Move the first char to A0\n \tJSR CHECK2 Check if uppercase\n \n \tCMPI.B #1,D5 See if all the sentence is CAPS\n \tBCS START if it is'nt then re-enter \n\n\n* \tPrint user prompt for enter the surname\n*\t\t=======================================\nSURNAME \tMOVEA.L #PROMPT2,A1 Pointer to start of prompt text\n \tMOVE.B #PRTSTR,D0 Set up print string function\n \tMOVE.W #(F_NAME-PROMPT2),D1 The prompt string length\n \tTRAP #15 Print Prompt\n \n* \tGet surname\n*\t\t===========\n \tMOVEA.L #S_NAME,A1 Pointer to store the sentence\n \tMOVE.B #READSTR,D0 Set up readstring function\n \tTRAP #15 Get string from KB\n \tMOVE.W D1,D4 Save length on input string\n MOVE.W D1,D3 Save length of input string to d3\n\n* \tCheck is Return is pressed\n \tCMPI.W #0,D4 Is the length = 0\n \tBEQ QUIT If length = 0 then Quit\n\n*\t\tSet up the stuff to check it the entered word is in CAPS\n*\t\t========================================================\n \tMOVEA.L #S_NAME,A0 Move the first char to A0 \n \tJSR CHECK2 Check if uppercase \n \n \tCMPI.B #1,D5 See if all the sentence is CAPS\n \tBCS SURNAME if it is'nt then re-enter \n\n* \tMove the first char for fname and prints it (Initial Bit)\n*\t\t=========================================================\nINITIAL \tMOVEA.L #F_NAME,A1 Move the first char to A1\n \tMOVE.B (A1),D1 Move the first char of F_NAME to D1\n \tMOVE.B #6,D0 Set up trap number\n \tTRAP #15 Print the Initial\n\nPRNSURNAME\tMOVEA.L #S_NAME,A1 Pointer to start of prompt text\n \tMOVE.B #0,D0 Set up print string function\n \tMOVE.W D3,D1 The prompt string length\n \tTRAP #15 Print Prompt\n\nQUIT \tSTOP #$2700 Stop the prorgam\n\n\n* \tCheck if uppercase\n*\t\t==================\n*\t\tThis subroutine will return a 1 in, d5 if it's OK or \n* \treturn a 0 in d5 if its not ok.\n\nCHECK2 \tCMPI.B #'A',(A0) Is Char > A ?\n \tBCS RETURNFALSE If no then re-enter\n \tCMP.B #('Z'+1),(A0)+ Check if char is < Z\n \tBCC RETURNFALSE If it is then it must be a cap\n \tSUBI.B #1,D4 Decrease s_name / f_name Length\n \tBNE CHECK2 jump if the sentence is not = 0\n\nRETURNTRUE MOVE.B #1,D5\t\t\t Moves a one to D5 to make CAPS ture\n RTS\t\t\t\t\t Jump back to the main program\n\nRETURNFALSE MOVE.B #0,D5\t\t\t Moves a zero to D5 to make CAPS false\n RTS Jump back to the main program\n\n\n\n* \tVar's & Const's\n*\t\t===============\n\nPROMPT1 DC.B 'Please enter your firstname (Max 80): '\nPROMPT2 DC.B 'Please enter your surname (Max 80): '\nF_NAME DS.B 80\nS_NAME DS.B 80\nDUMMY\t DS.B 1\n\n\t\tEND\t$1000\t\t\t\tEnd of assembley\n" }, { "path": "Units/parser-asm.r/unbalanced-end-macro.d/expected.tags", "content": "" }, { "path": "Units/parser-asm.r/unbalanced-end-macro.d/input.S", "content": "\tNOP\n\t.endm\n" }, { "path": "Units/parser-autoconf.r/disabling-m4.d/args.ctags", "content": "--sort=no\n--fields=+elnr\n--extras=+fr\n--languages=-M4\n" }, { "path": "Units/parser-autoconf.r/disabling-m4.d/expected.tags", "content": "PKG_PREREQ\tinput.ac\t/^AC_DEFUN([PKG_PREREQ],$/;\"\tm\tline:4\tlanguage:Autoconf\troles:def\tend:8\ninput.ac\tinput.ac\t1;\"\tF\tline:1\tlanguage:Autoconf\troles:def\tend:12\n" }, { "path": "Units/parser-autoconf.r/disabling-m4.d/input.ac", "content": "changequote([`],['])\ndefine(`x', 1)\nchangequote(`[',`]')\nAC_DEFUN([PKG_PREREQ],\n[m4_define([PKG_MACROS_VERSION], [0.29])\nm4_if(m4_version_compare(PKG_MACROS_VERSION, [$1]), -1,\n [m4_fatal([pkg.m4 version $1 or higher is required but ]PKG_MACROS_VERSION[ found])])\n])dnl PKG_PREREQ\nm4_define([y], 2)\nm4_changequote([`],['])\ndefine(`z', 3)\n\n" }, { "path": "Units/parser-autoconf.r/forcing-autoconf-and-disabling-m4.d/args.ctags", "content": "--sort=no\n--fields=+elnr\n--extras=+fr\n--languages=-M4\n--language-force=Autoconf\n" }, { "path": "Units/parser-autoconf.r/forcing-autoconf-and-disabling-m4.d/expected.tags", "content": "PKG_PREREQ\tinput.m4\t/^AC_DEFUN([PKG_PREREQ],$/;\"\tm\tline:4\tlanguage:Autoconf\troles:def\tend:8\ninput.m4\tinput.m4\t1;\"\tF\tline:1\tlanguage:Autoconf\troles:def\tend:12\n" }, { "path": "Units/parser-autoconf.r/forcing-autoconf-and-disabling-m4.d/input.m4", "content": "changequote([`],['])\ndefine(`x', 1)\nchangequote(`[',`]')\nAC_DEFUN([PKG_PREREQ],\n[m4_define([PKG_MACROS_VERSION], [0.29])\nm4_if(m4_version_compare(PKG_MACROS_VERSION, [$1]), -1,\n [m4_fatal([pkg.m4 version $1 or higher is required but ]PKG_MACROS_VERSION[ found])])\n])dnl PKG_PREREQ\nm4_define([y], 2)\nm4_changequote([`],['])\ndefine(`z', 3)\n\n" }, { "path": "Units/parser-autoconf.r/nested-block.ac.d/args.ctags", "content": "--sort=no\n--fields=+lneKz\n" }, { "path": "Units/parser-autoconf.r/nested-block.ac.d/expected.tags", "content": "USE_STDBOOL_H\tinput.ac\t/^\tAH_TEMPLATE([USE_STDBOOL_H], [whether or not to use .])$/;\"\tkind:template\tline:3\tlanguage:Autoconf\tend:3\nUSE_STDBOOL_H\tinput.ac\t/^\tAC_DEFINE([USE_STDBOOL_H])$/;\"\tkind:definition\tline:4\tlanguage:Autoconf\tend:4\nbool\tinput.ac\t/^\tAH_TEMPLATE([bool], [type for 'bool' if is missing or broken.])$/;\"\tkind:template\tline:7\tlanguage:Autoconf\tend:7\ntrue\tinput.ac\t/^\tAH_TEMPLATE([true], [value of 'true' if is missing or broken.])$/;\"\tkind:template\tline:8\tlanguage:Autoconf\tend:8\nfalse\tinput.ac\t/^\tAH_TEMPLATE([false], [value of 'false' if is missing or broken.])$/;\"\tkind:template\tline:9\tlanguage:Autoconf\tend:9\ntrue\tinput.ac\t/^\tAC_DEFINE([true], [1])$/;\"\tkind:definition\tline:10\tlanguage:Autoconf\tend:10\nfalse\tinput.ac\t/^\tAC_DEFINE([false], [0])$/;\"\tkind:definition\tline:11\tlanguage:Autoconf\tend:11\n" }, { "path": "Units/parser-autoconf.r/nested-block.ac.d/input.ac", "content": "AC_CHECK_HEADERS([stdbool.h],\n[\n\tAH_TEMPLATE([USE_STDBOOL_H], [whether or not to use .])\n\tAC_DEFINE([USE_STDBOOL_H])\n],\n[\n\tAH_TEMPLATE([bool], [type for 'bool' if is missing or broken.])\n\tAH_TEMPLATE([true], [value of 'true' if is missing or broken.])\n\tAH_TEMPLATE([false], [value of 'false' if is missing or broken.])\n\tAC_DEFINE([true], [1])\n\tAC_DEFINE([false], [0])\n])\n" }, { "path": "Units/parser-autoconf.r/no-string-literal.d/expected.tags", "content": "HAVE_CONFDB\tinput.ac\t/^AC_DEFINE_UNQUOTED(HAVE_CONFDB, $HAVE_confdb, Have the old herarchial Corosync config API)$/;\"\td\nUUID_FILE\tinput.ac\t/^AC_DEFINE_UNQUOTED(UUID_FILE,\"$localstatedir\\/lib\\/heartbeat\\/hb_uuid\", I'm a bad boy.)$/;\"\td\n" }, { "path": "Units/parser-autoconf.r/no-string-literal.d/input.ac", "content": "dnl Taken from configure.ac of pacemaker\nAC_DEFINE_UNQUOTED(UUID_FILE,\"$localstatedir/lib/heartbeat/hb_uuid\", I'm a bad boy.)\nAC_DEFINE_UNQUOTED(HAVE_CONFDB, $HAVE_confdb, Have the old herarchial Corosync config API)\n" }, { "path": "Units/parser-autoconf.r/simple.ac.d/args.ctags", "content": "--sort=no\n--fields=+KeE\n" }, { "path": "Units/parser-autoconf.r/simple.ac.d/expected.tags", "content": "universal-ctags\tinput.ac\t/^AC_INIT([universal-ctags],[0.0.0])$/;\"\tpackage\textras:subparser\tend:1\nTMPDIR\tinput.ac\t/^AH_TEMPLATE([TMPDIR],$/;\"\ttemplate\textras:subparser\tend:4\nCHECK_HEADER_DEFINE\tinput.ac\t/^AC_DEFUN([CHECK_HEADER_DEFINE], [$/;\"\tmacro\textras:subparser\tend:19\nctags-libexecdir\tinput.ac\t/^AC_ARG_WITH([ctags-libexecdir],$/;\"\toptwith\textras:subparser\tend:22\ntmpdir\tinput.ac\t/^AC_ARG_ENABLE(tmpdir,$/;\"\toptenable\textras:subparser\tend:26\npkgsysconfdir\tinput.ac\t/^AC_SUBST([pkgsysconfdir])$/;\"\tsubst\textras:subparser\tend:27\npkglibexecdir\tinput.ac\t/^AC_SUBST([pkglibexecdir])$/;\"\tsubst\textras:subparser\tend:28\nINSTALL_LIB\tinput.ac\t/^AM_CONDITIONAL(INSTALL_LIB, [test \"x$enable_readlib\" = \"xyes\"])$/;\"\tcondition\textras:subparser\tend:29\nINSTALL_ETAGS\tinput.ac\t/^AM_CONDITIONAL(INSTALL_ETAGS, [test \"x$enable_etags\" = \"xyes\"])$/;\"\tcondition\textras:subparser\tend:30\nUSE_READCMD\tinput.ac\t/^AM_CONDITIONAL(USE_READCMD, [test \"x$enable_readcmd\" = \"xyes\"])$/;\"\tcondition\textras:subparser\tend:31\nctags_name_executable\tinput.ac\t/^AC_SUBST(ctags_name_executable)$/;\"\tsubst\textras:subparser\tend:35\netags_name_executable\tinput.ac\t/^AC_SUBST(etags_name_executable)$/;\"\tsubst\textras:subparser\tend:37\nETAGS\tinput.ac\t/^AC_DEFINE_UNQUOTED(ETAGS, \"$etags_name_executable\")$/;\"\tdefinition\textras:subparser\tend:39\nMSDOS_STYLE_PATH\tinput.ac\t/^\tAC_DEFINE(MSDOS_STYLE_PATH)$/;\"\tdefinition\textras:subparser\tend:45\n" }, { "path": "Units/parser-autoconf.r/simple.ac.d/input.ac", "content": "AC_INIT([universal-ctags],[0.0.0])\nAH_TEMPLATE([TMPDIR],\n\t[If you wish to change the directory in which temporary files are stored,\n\tdefine this label to the directory desired.])\nAC_DEFUN([CHECK_HEADER_DEFINE], [\n\tAC_MSG_CHECKING([if $1 is defined in $2])\n\tAC_EGREP_CPP([$2:$1],\n[\n#include <$2>\n#ifdef $1\nconst char *result_yes = \"$2:$1\";\n#endif\n], [\n\tAC_MSG_RESULT(yes)\n\t[$3]\n], [\n\tAC_MSG_RESULT(no)\n\t[$4]\n]) ])\nAC_ARG_WITH([ctags-libexecdir],\n\t[AS_HELP_STRING([--with-ctags-libexecdir=DIR],\n\t\t['universal-ctags'-specific program executables [LIBEXECDIR/ctags]])])\nAC_ARG_ENABLE(tmpdir,\n\t[AS_HELP_STRING([--enable-tmpdir=DIR],\n\t\t[default directory for temporary files [ARG=/tmp]])],\n\ttmpdir_specified=yes)\nAC_SUBST([pkgsysconfdir])\nAC_SUBST([pkglibexecdir])\nAM_CONDITIONAL(INSTALL_LIB, [test \"x$enable_readlib\" = \"xyes\"])\nAM_CONDITIONAL(INSTALL_ETAGS, [test \"x$enable_etags\" = \"xyes\"])\nAM_CONDITIONAL(USE_READCMD, [test \"x$enable_readcmd\" = \"xyes\"])\n\ndnl AC_MSG_NOTICE(Change with $program_transform_name)\nctags_name_executable=`echo ctags | sed \"$program_transform_name\"`\nAC_SUBST(ctags_name_executable)\netags_name_executable=`echo etags | sed \"$program_transform_name\"`\nAC_SUBST(etags_name_executable)\n\nAC_DEFINE_UNQUOTED(ETAGS, \"$etags_name_executable\")\n\n# Check for host type\ncase \"$host\" in\n i?86-*-mingw* | x86_64-*-mingw*)\n\thost_mingw=yes\n\tAC_DEFINE(MSDOS_STYLE_PATH)\n\t;;\nesac\n" }, { "path": "Units/parser-autoconf.r/simple2.ac.d/args.ctags", "content": "--sort=no\n--fields=+elnr\n--extras=+fr\n" }, { "path": "Units/parser-autoconf.r/simple2.ac.d/expected.tags", "content": "x\tinput.ac\t/^define(`x', 1)$/;\"\td\tline:2\tlanguage:M4\troles:def\tend:2\nPKG_PREREQ\tinput.ac\t/^AC_DEFUN([PKG_PREREQ],$/;\"\tm\tline:4\tlanguage:Autoconf\troles:def\tend:8\nPKG_MACROS_VERSION\tinput.ac\t/^[m4_define([PKG_MACROS_VERSION], [0.29])$/;\"\td\tline:5\tlanguage:M4\troles:def\tend:5\ny\tinput.ac\t/^m4_define([y], 2)$/;\"\td\tline:9\tlanguage:M4\troles:def\tend:9\nz\tinput.ac\t/^define(`z', 3)$/;\"\td\tline:11\tlanguage:M4\troles:def\tend:11\ninput.ac\tinput.ac\t1;\"\tF\tline:1\tlanguage:Autoconf\troles:def\tend:12\n" }, { "path": "Units/parser-autoconf.r/simple2.ac.d/input.ac", "content": "changequote([`],['])\ndefine(`x', 1)\nchangequote(`[',`]')\nAC_DEFUN([PKG_PREREQ],\n[m4_define([PKG_MACROS_VERSION], [0.29])\nm4_if(m4_version_compare(PKG_MACROS_VERSION, [$1]), -1,\n [m4_fatal([pkg.m4 version $1 or higher is required but ]PKG_MACROS_VERSION[ found])])\n])dnl PKG_PREREQ\nm4_define([y], 2)\nm4_changequote([`],['])\ndefine(`z', 3)\n\n" }, { "path": "Units/parser-autoit.r/simple-au3.d/args.ctags", "content": "--fields=+erS\n--fields-AutoIt=+{properties}\n--extras=+r\n" }, { "path": "Units/parser-autoit.r/simple-au3.d/expected.tags", "content": "All functions\tinput.au3\t/^#Region All functions$/;\"\tr\troles:def\tend:54\nConstants.au3\tinput.au3\t/^#include $/;\"\tS\troles:system\nGUIConstantsEx.au3\tinput.au3\t/^#include$/;\"\tS\troles:system\nMyDouble\tinput.au3\t/^Func MyDouble($iValue)$/;\"\tf\tregion:All functions\tsignature:($iValue)\troles:def\tend:32\nMyDouble0\tinput.au3\t/^func MyDouble0($iValue)$/;\"\tf\tregion:All functions\tsignature:($iValue)\troles:def\tend:38\nMyDouble1\tinput.au3\t/^ \tFUNC MyDouble1($iValue)$/;\"\tf\tregion:All functions\tsignature:($iValue)\troles:def\tend:43\nMyDummy\tinput.au3\t/^FUNC MyDummy($iValue)$/;\"\tf\tregion:All functions\tsignature:($iValue)\troles:def\tend:53\nMyVolatileDouble\tinput.au3\t/^Volatile Func MyVolatileDouble ($iValue)$/;\"\tf\tregion:All functions\tsignature:($iValue)\troles:def\tend:47\tproperties:volatile\nWindowsConstants.au3\tinput.au3\t/^#include \"WindowsConstants.au3\"$/;\"\tS\troles:local\niDoubled\tinput.au3\t/^Local $iDoubled = 0$/;\"\tl\troles:def\niFirst\tinput.au3\t/^ LOCAL STATIC $iFirst = 0$/;\"\tl\tfunc:All functions.MyDummy\troles:def\tproperties:static\niNumber\tinput.au3\t/^Local $iNumber = 10$/;\"\tl\troles:def\niSecond\tinput.au3\t/^ STATIC LOCAL $iSecond = 1$/;\"\tl\tfunc:All functions.MyDummy\troles:def\tproperties:static\niSomething\tinput.au3\t/^ Local $iSomething = 42$/;\"\tl\tfunc:All functions.MyDouble0\troles:def\n" }, { "path": "Units/parser-autoit.r/simple-au3.d/input.au3", "content": "; Taken from https://www.autoitscript.com/autoit3/docs/intro/lang_functions.htm\n\n#include \n#include\n#include \"WindowsConstants.au3\"\n\nLocal $iNumber = 10\nLocal $iDoubled = 0\n\nFor $i = 1 To 10\n $iDoubled = MyDouble($iNumber)\n MsgBox($MB_OK, \"\", $iNumber & \" doubled is \" & $iDoubled)\n $iNumber = $iDoubled\nNext\nExit\n\n#cs\nFunc Ignored()\nEndFunc\n#comments-start\nFunc Ignored0()\nEndFunc\n#comments-end\nFunc Ignored1()\nEndFunc\n#ce\n\n#Region All functions\nFunc MyDouble($iValue)\n $iValue = $iValue * 2\n Return $iValue\nEndFunc ;==>MyDouble\n\nfunc MyDouble0($iValue)\n Local $iSomething = 42\n $iValue = $iValue * 2\n Return $iValue\nEndFunc ;==>MyDouble\n\n \tFUNC MyDouble1($iValue)\n $iValue = $iValue * 2\n Return $iValue\nEndFunc\n\nVolatile Func MyVolatileDouble ($iValue)\n Return $iValue * 2;\nEndFunc\n\nFUNC MyDummy($iValue)\n LOCAL STATIC $iFirst = 0\n STATIC LOCAL $iSecond = 1\n RETURN $iValue * $iSecond + $iFirst\nENDFUNC\n#EndRegion All functions\n" }, { "path": "Units/parser-automake.r/disable-make-parser.d/args.ctags", "content": "--language-force=Automake\n--languages=-Make\n--fields=+r\n--extras=+r\n" }, { "path": "Units/parser-automake.r/disable-make-parser.d/expected.tags", "content": "bin\tinput.am\t/^bin_PROGRAMS = x$/;\"\td\troles:program\nx\tinput.am\t/^bin_PROGRAMS = x$/;\"\tP\tdirectory:bin\troles:def\n" }, { "path": "Units/parser-automake.r/disable-make-parser.d/input.am", "content": "bin_PROGRAMS = x\n" }, { "path": "Units/parser-automake.r/eof-value.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-automake.r/eof-value.d/args.ctags", "content": "--kinds-all'\n--fields=*\n--fields-all=*\n--extras=*\n--extras-all=*\n--roles-all.*=*\n" }, { "path": "Units/parser-automake.r/eof-value.d/input.am", "content": "l:\n\t" }, { "path": "Units/parser-automake.r/langstack.am.d/args.ctags", "content": "--sort=no\n--language-force=Automake\n--fields=+rlK\n--extras=+r\n" }, { "path": "Units/parser-automake.r/langstack.am.d/expected.tags", "content": "prefix\tinput.am\t/^prefix=c$/;\"\tmacro\tlanguage:Make\troles:def\n$(top_srcdir)/source.mak\tinput.am\t/^include $(top_srcdir)\\/source.mak$/;\"\tmakefile\tlanguage:Make\troles:included\ncbin\tinput.am\t/^cbin=$(bindir)\\/ctags$/;\"\tmacro\tlanguage:Make\troles:def\ncbin_PROGRAMS\tinput.am\t/^cbin_PROGRAMS = $(prefix)ctags$/;\"\tmacro\tlanguage:Make\troles:def\ncbin\tinput.am\t/^cbin_PROGRAMS = $(prefix)ctags$/;\"\tdirectory\tlanguage:Automake\troles:program\n$(prefix)ctags\tinput.am\t/^cbin_PROGRAMS = $(prefix)ctags$/;\"\tprogram\tlanguage:Automake\tdirectory:cbin\troles:def\n__prefix_ctags\tinput.am\t/^cbin_PROGRAMS = $(prefix)ctags$/;\"\tprogram\tlanguage:Automake\tdirectory:cbin\troles:def\nINSTALL_ETAGS\tinput.am\t/^if INSTALL_ETAGS$/;\"\tcondition\tlanguage:Automake\troles:branched\ninstall-exec-hook\tinput.am\t/^install-exec-hook:$/;\"\ttarget\tlanguage:Make\troles:def\nuninstall-hook\tinput.am\t/^uninstall-hook:$/;\"\ttarget\tlanguage:Make\troles:def\n" }, { "path": "Units/parser-automake.r/langstack.am.d/input.am", "content": "prefix=c\n\ninclude $(top_srcdir)/source.mak\n\ncbin=$(bindir)/ctags\ncbin_PROGRAMS = $(prefix)ctags\n\nif INSTALL_ETAGS\ninstall-exec-hook:\n\tcd $(DESTDIR)$(bindir) && \\\n\t\t$(LN_S) ctags$(EXEEXT) etags$(EXEEXT)\n\nuninstall-hook:\n\trm $(DESTDIR)$(bindir)/etags$(EXEEXT)\nendif\n" }, { "path": "Units/parser-automake.r/noinst.d/args.ctags", "content": "--sort=no\n--extras=sr\n--fields=lZKrz\n" }, { "path": "Units/parser-automake.r/noinst.d/expected.tags", "content": "check_LIBRARIES\tinput.am\t/^check_LIBRARIES = libt0.a libt1.a$/;\"\tkind:macro\tlanguage:Make\troles:def\nlibt0.a\tinput.am\t/^check_LIBRARIES = libt0.a libt1.a$/;\"\tkind:library\tlanguage:Automake\tscope:pseudodir:check\troles:def\nlibt0_a\tinput.am\t/^check_LIBRARIES = libt0.a libt1.a$/;\"\tkind:library\tlanguage:Automake\tscope:pseudodir:check\troles:def\nlibt1.a\tinput.am\t/^check_LIBRARIES = libt0.a libt1.a$/;\"\tkind:library\tlanguage:Automake\tscope:pseudodir:check\troles:def\nlibt1_a\tinput.am\t/^check_LIBRARIES = libt0.a libt1.a$/;\"\tkind:library\tlanguage:Automake\tscope:pseudodir:check\troles:def\ncheck_PROGRAMS\tinput.am\t/^check_PROGRAMS = testprog0 testprog1$/;\"\tkind:macro\tlanguage:Make\troles:def\ntestprog0\tinput.am\t/^check_PROGRAMS = testprog0 testprog1$/;\"\tkind:program\tlanguage:Automake\tscope:pseudodir:check\troles:def\ntestprog1\tinput.am\t/^check_PROGRAMS = testprog0 testprog1$/;\"\tkind:program\tlanguage:Automake\tscope:pseudodir:check\troles:def\nEXTRA_PROGRAMS\tinput.am\t/^EXTRA_PROGRAMS = xprog0 xprog1$/;\"\tkind:macro\tlanguage:Make\troles:def\nxprog0\tinput.am\t/^EXTRA_PROGRAMS = xprog0 xprog1$/;\"\tkind:program\tlanguage:Automake\tscope:pseudodir:EXTRA\troles:def\nxprog1\tinput.am\t/^EXTRA_PROGRAMS = xprog0 xprog1$/;\"\tkind:program\tlanguage:Automake\tscope:pseudodir:EXTRA\troles:def\n" }, { "path": "Units/parser-automake.r/noinst.d/input.am", "content": "check_LIBRARIES = libt0.a libt1.a\ncheck_PROGRAMS = testprog0 testprog1\nEXTRA_PROGRAMS = xprog0 xprog1\n" }, { "path": "Units/parser-automake.r/objprefix.d/args.ctags", "content": "--sort=no\n--extras=sr\n--fields=lZKrzE\n" }, { "path": "Units/parser-automake.r/objprefix.d/expected.tags", "content": "dist_data_DATA\tinput.am\t/^dist_data_DATA = distribute-this$/;\"\tkind:macro\tlanguage:Make\troles:def\ndata\tinput.am\t/^dist_data_DATA = distribute-this$/;\"\tkind:directory\tlanguage:Automake\troles:data\textras:reference,subparser\ndistribute-this\tinput.am\t/^dist_data_DATA = distribute-this$/;\"\tkind:data\tlanguage:Automake\tscope:directory:data\troles:def\textras:subparser\nbin_PROGRAMS\tinput.am\t/^bin_PROGRAMS = foo$/;\"\tkind:macro\tlanguage:Make\troles:def\nbin\tinput.am\t/^bin_PROGRAMS = foo$/;\"\tkind:directory\tlanguage:Automake\troles:program\textras:reference,subparser\nfoo\tinput.am\t/^bin_PROGRAMS = foo$/;\"\tkind:program\tlanguage:Automake\tscope:directory:bin\troles:def\textras:subparser\nnodist_foo_SOURCES\tinput.am\t/^nodist_foo_SOURCES = do-not-distribute.c$/;\"\tkind:macro\tlanguage:Make\troles:def\nnobase_include_HEADERS\tinput.am\t/^nobase_include_HEADERS = sys\\/types.h$/;\"\tkind:macro\tlanguage:Make\troles:def\nman_MANS\tinput.am\t/^man_MANS = foo.1$/;\"\tkind:macro\tlanguage:Make\troles:def\nman\tinput.am\t/^man_MANS = foo.1$/;\"\tkind:directory\tlanguage:Automake\troles:man\textras:reference,subparser\nfoo.1\tinput.am\t/^man_MANS = foo.1$/;\"\tkind:man\tlanguage:Automake\tscope:directory:man\troles:def\textras:subparser\nnotrans_man_MANS\tinput.am\t/^notrans_man_MANS = foo.3$/;\"\tkind:macro\tlanguage:Make\troles:def\nman\tinput.am\t/^notrans_man_MANS = foo.3$/;\"\tkind:directory\tlanguage:Automake\troles:man\textras:reference,subparser\nfoo.3\tinput.am\t/^notrans_man_MANS = foo.3$/;\"\tkind:man\tlanguage:Automake\tscope:directory:man\troles:def\textras:subparser\nnotrans_dist_man3_MANS\tinput.am\t/^notrans_dist_man3_MANS = bar.3$/;\"\tkind:macro\tlanguage:Make\troles:def\nman3\tinput.am\t/^notrans_dist_man3_MANS = bar.3$/;\"\tkind:directory\tlanguage:Automake\troles:man\textras:reference,subparser\nbar.3\tinput.am\t/^notrans_dist_man3_MANS = bar.3$/;\"\tkind:man\tlanguage:Automake\tscope:directory:man3\troles:def\textras:subparser\n" }, { "path": "Units/parser-automake.r/objprefix.d/input.am", "content": "dist_data_DATA = distribute-this\nbin_PROGRAMS = foo\nnodist_foo_SOURCES = do-not-distribute.c\nnobase_include_HEADERS = sys/types.h\nman_MANS = foo.1\nnotrans_man_MANS = foo.3\nnotrans_dist_man3_MANS = bar.3\n" }, { "path": "Units/parser-automake.r/simple.am.d/args.ctags", "content": "--sort=no\n--language-force=Automake\n--fields=+r\n--extras=+r\n" }, { "path": "Units/parser-automake.r/simple.am.d/expected.tags", "content": "$(top_srcdir)/source.mak\tinput.am\t/^include $(top_srcdir)\\/source.mak$/;\"\tI\troles:included\nEXTRA_DIST\tinput.am\t/^EXTRA_DIST = $(NULL)$/;\"\tm\troles:def\nbin_PROGRAMS\tinput.am\t/^bin_PROGRAMS = ctags$/;\"\tm\troles:def\nbin\tinput.am\t/^bin_PROGRAMS = ctags$/;\"\td\troles:program\nctags\tinput.am\t/^bin_PROGRAMS = ctags$/;\"\tP\tdirectory:bin\troles:def\nUSE_READCMD\tinput.am\t/^if USE_READCMD$/;\"\tc\troles:branched\nbin\tinput.am\t/^bin_PROGRAMS+= readtags$/;\"\td\troles:program\nreadtags\tinput.am\t/^bin_PROGRAMS+= readtags$/;\"\tP\tdirectory:bin\troles:def\nreadtags_CPPFLAGS\tinput.am\t/^readtags_CPPFLAGS = -I. -I$(srcdir) -I$(srcdir)\\/main -I$(srcdir)\\/read$/;\"\tm\troles:def\ndist_readtags_SOURCES\tinput.am\t/^dist_readtags_SOURCES = $(READTAGS_SRCS) $(READTAGS_HEADS)$/;\"\tm\troles:def\nHAVE_FNMATCH\tinput.am\t/^if !HAVE_FNMATCH$/;\"\tc\troles:branched\nHAVE_REGCOMP\tinput.am\t/^if !HAVE_REGCOMP$/;\"\tc\troles:branched\nHAVE_LIBXML\tinput.am\t/^if HAVE_LIBXML$/;\"\tc\troles:branched\nctags_CPPFLAGS\tinput.am\t/^ctags_CPPFLAGS = -I. -I$(srcdir) -I$(srcdir)\\/main$/;\"\tm\troles:def\nENABLE_DEBUGGING\tinput.am\t/^if ENABLE_DEBUGGING$/;\"\tc\troles:branched\nctags_CFLAGS\tinput.am\t/^ctags_CFLAGS =$/;\"\tm\troles:def\nctags_LDADD\tinput.am\t/^ctags_LDADD =$/;\"\tm\troles:def\nnodist_ctags_SOURCES\tinput.am\t/^nodist_ctags_SOURCES = $(REPOINFO_HEADS)$/;\"\tm\troles:def\nBUILT_SOURCES\tinput.am\t/^BUILT_SOURCES = $(REPOINFO_HEADS)$/;\"\tm\troles:def\nCLEANFILES\tinput.am\t/^CLEANFILES = $(REPOINFO_HEADS)$/;\"\tm\troles:def\n$(REPOINFO_OBJS)\tinput.am\t/^$(REPOINFO_OBJS): $(REPOINFO_SRCS) $(REPOINFO_HEADS)$/;\"\tt\troles:def\nBUILD_IN_GIT_REPO\tinput.am\t/^if BUILD_IN_GIT_REPO$/;\"\tc\troles:branched\nGEN_REPOINFO\tinput.am\t/^GEN_REPOINFO = $(srcdir)\\/misc\\/gen-repoinfo$/;\"\tm\troles:def\n$(REPOINFO_HEADS)\tinput.am\t/^$(REPOINFO_HEADS): $(GEN_REPOINFO) $(srcdir)\\/.git\\/*$/;\"\tt\troles:def\n$(REPOINFO_HEADS)\tinput.am\t/^$(REPOINFO_HEADS):$/;\"\tt\troles:def\nRUN_OPTLIB2C\tinput.am\t/^if RUN_OPTLIB2C$/;\"\tc\troles:branched\noptlib2c_verbose\tinput.am\t/^optlib2c_verbose = $(optlib2c_verbose_@AM_V@)$/;\"\tm\troles:def\noptlib2c_verbose_\tinput.am\t/^optlib2c_verbose_ = $(optlib2c_verbose_@AM_DEFAULT_V@)$/;\"\tm\troles:def\noptlib2c_verbose_0\tinput.am\t/^optlib2c_verbose_0 = @echo OPTLIB2C \" $@\";$/;\"\tm\troles:def\nOPTLIB2C\tinput.am\t/^OPTLIB2C = $(srcdir)\\/misc\\/optlib2c$/;\"\tm\troles:def\n%.c\tinput.am\t/^%.c: %.ctags $(OPTLIB2C) Makefile$/;\"\tt\troles:def\ndist_ctags_SOURCES\tinput.am\t/^dist_ctags_SOURCES = $(ALL_HEADS) $(ALL_SRCS)$/;\"\tm\troles:def\nman_MANS\tinput.am\t/^man_MANS = ctags.1$/;\"\tm\troles:def\nman\tinput.am\t/^man_MANS = ctags.1$/;\"\td\troles:man\nctags.1\tinput.am\t/^man_MANS = ctags.1$/;\"\tM\tdirectory:man\troles:def\nENABLE_XCMD\tinput.am\t/^if ENABLE_XCMD$/;\"\tc\troles:branched\ndriversdir\tinput.am\t/^driversdir = $(pkglibexecdir)\\/drivers$/;\"\tm\troles:def\ndrivers\tinput.am\t/^driversdir = $(pkglibexecdir)\\/drivers$/;\"\td\troles:def\ndist_drivers_SCRIPTS\tinput.am\t/^dist_drivers_SCRIPTS = libexec\\/drivers\\/coffeetags$/;\"\tm\troles:def\ndrivers\tinput.am\t/^dist_drivers_SCRIPTS = libexec\\/drivers\\/coffeetags$/;\"\td\troles:script\nlibexec/drivers/coffeetags\tinput.am\t/^dist_drivers_SCRIPTS = libexec\\/drivers\\/coffeetags$/;\"\tS\tdirectory:drivers\troles:def\nINSTALL_ETAGS\tinput.am\t/^if INSTALL_ETAGS$/;\"\tc\troles:branched\ninstall-exec-hook\tinput.am\t/^install-exec-hook:$/;\"\tt\troles:def\nuninstall-hook\tinput.am\t/^uninstall-hook:$/;\"\tt\troles:def\n$(top_srcdir)/makefiles/testing.mak\tinput.am\t/^include $(top_srcdir)\\/makefiles\\/testing.mak$/;\"\tI\troles:included\n$(top_srcdir)/makefiles/test-cases.mak\tinput.am\t/^include $(top_srcdir)\\/makefiles\\/test-cases.mak$/;\"\tI\troles:included\n$(top_srcdir)/makefiles/help.mak\tinput.am\t/^include $(top_srcdir)\\/makefiles\\/help.mak$/;\"\tI\troles:included\n" }, { "path": "Units/parser-automake.r/simple.am.d/input.am", "content": "include $(top_srcdir)/source.mak\n\n# Test cases are added to EXTRA_DIST in makefiles/test-cases.mak\nEXTRA_DIST = $(NULL)\n\nbin_PROGRAMS = ctags\n\nif USE_READCMD\nbin_PROGRAMS+= readtags\nreadtags_CPPFLAGS = -I. -I$(srcdir) -I$(srcdir)/main -I$(srcdir)/read\ndist_readtags_SOURCES = $(READTAGS_SRCS) $(READTAGS_HEADS)\nreadtags_CPPFLAGS += -DQUALIFIER -I$(srcdir)/dsl\ndist_readtags_SOURCES += $(QUALIFIER_SRCS) $(QUALIFIER_HEADS)\nendif\n\nif !HAVE_FNMATCH\nMAIN_SRCS += $(FNMATCH_SRCS)\nMAIN_HEADS += $(FNMATCH_HEADS)\nendif\n\nif !HAVE_REGCOMP\nMAIN_SRCS += $(REGEX_SRCS)\nMAIN_HEADS += $(REGEX_HEADS)\nendif\n\nif HAVE_LIBXML\nPARSER_SRCS += $(XML_SRCS)\nPARSER_HEADS += $(XML_HEADS)\nendif\n\nctags_CPPFLAGS = -I. -I$(srcdir) -I$(srcdir)/main\nif ENABLE_DEBUGGING\nctags_CPPFLAGS+= $(DEBUG_CPPFLAGS)\nendif\nctags_CPPFLAGS+= $(FNMATCH_CPPFLAGS)\nctags_CPPFLAGS+= $(REGCOMP_CPPFLAGS)\nctags_CPPFLAGS+= -DHAVE_REPOINFO_H\n\nctags_CFLAGS =\nctags_CFLAGS += $(EXTRA_CFLAGS)\nctags_CFLAGS += $(WARNING_CFLAGS)\nctags_CFLAGS += $(COVERAGE_CFLAGS)\nctags_CFLAGS += $(CGCC_CFLAGS)\nctags_CFLAGS += $(LIBXML_CFLAGS)\n\nctags_LDADD =\nctags_LDADD += $(LIBXML_LIBS)\n\nnodist_ctags_SOURCES = $(REPOINFO_HEADS)\nBUILT_SOURCES = $(REPOINFO_HEADS)\nCLEANFILES = $(REPOINFO_HEADS)\n$(REPOINFO_OBJS): $(REPOINFO_SRCS) $(REPOINFO_HEADS)\nif BUILD_IN_GIT_REPO\nGEN_REPOINFO = $(srcdir)/misc/gen-repoinfo\n$(REPOINFO_HEADS): $(GEN_REPOINFO) $(srcdir)/.git/*\n\t$(GEN_REPOINFO) > $@\nelse\n$(REPOINFO_HEADS):\n\techo > $@\nendif\n\nif RUN_OPTLIB2C\noptlib2c_verbose = $(optlib2c_verbose_@AM_V@)\noptlib2c_verbose_ = $(optlib2c_verbose_@AM_DEFAULT_V@)\noptlib2c_verbose_0 = @echo OPTLIB2C \" $@\";\nOPTLIB2C = $(srcdir)/misc/optlib2c\n%.c: %.ctags $(OPTLIB2C) Makefile\n\t$(optlib2c_verbose)$(OPTLIB2C) --transform-cmd=\"$(program_transform_name)\" $< > $@\nendif\ndist_ctags_SOURCES = $(ALL_HEADS) $(ALL_SRCS)\n\nman_MANS = ctags.1\n\nif ENABLE_XCMD\ndriversdir = $(pkglibexecdir)/drivers\ndist_drivers_SCRIPTS = libexec/drivers/coffeetags\nendif\n\nif INSTALL_ETAGS\ninstall-exec-hook:\n\tcd $(DESTDIR)$(bindir) && \\\n\t\t$(LN_S) ctags$(EXEEXT) etags$(EXEEXT)\n\nuninstall-hook:\n\trm $(DESTDIR)$(bindir)/etags$(EXEEXT)\nendif\n\ninclude $(top_srcdir)/makefiles/testing.mak\ninclude $(top_srcdir)/makefiles/test-cases.mak\n\ninclude $(top_srcdir)/makefiles/help.mak\n\n" }, { "path": "Units/parser-automake.r/subdirs.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-automake.r/subdirs.d/expected.tags", "content": "SUBDIRS\tinput.am\t/^SUBDIRS = lib src . test$/;\"\tm\nlib\tinput.am\t/^SUBDIRS = lib src . test$/;\"\ts\nsrc\tinput.am\t/^SUBDIRS = lib src . test$/;\"\ts\n.\tinput.am\t/^SUBDIRS = lib src . test$/;\"\ts\ntest\tinput.am\t/^SUBDIRS = lib src . test$/;\"\ts\ndocs\tinput.am\t/^SUBDIRS += docs$/;\"\ts\n" }, { "path": "Units/parser-automake.r/subdirs.d/input.am", "content": "SUBDIRS = lib src . test\nSUBDIRS += docs\n" }, { "path": "Units/parser-awk.r/functions.d/expected.tags", "content": "leadingWhitespace\tinput.awk\t/^\tfunction leadingWhitespace() {}$/;\"\tf\n" }, { "path": "Units/parser-awk.r/functions.d/input.awk", "content": "# match function definitions preceded by whitespace\n\tfunction leadingWhitespace() {}\n" }, { "path": "Units/parser-awk.r/gawk-alias.d/args.ctags", "content": "-G\n" }, { "path": "Units/parser-awk.r/gawk-alias.d/expected.tags", "content": "mysub\tinput.unknown\t/^function mysub(pat, repl, str, global)$/;\"\tf\n" }, { "path": "Units/parser-awk.r/gawk-alias.d/input.unknown", "content": "#!/usr/bin/env gawk\n# Taken from info manual of gawk.\nfunction mysub(pat, repl, str, global)\n{\n if (global)\n gsub(pat, repl, str)\n else\n sub(pat, repl, str)\n return str\n}\n" }, { "path": "Units/parser-awk.r/simple-awk.d/expected.tags", "content": "mysub\tinput.awk\t/^function mysub(pat, repl, str, global)$/;\"\tf\n" }, { "path": "Units/parser-awk.r/simple-awk.d/input.awk", "content": "# Taken from info manual of gawk.\nfunction mysub(pat, repl, str, global)\n{\n if (global)\n gsub(pat, repl, str)\n else\n sub(pat, repl, str)\n return str\n}\n" }, { "path": "Units/parser-awk.r/simple2-awk.d/expected.tags", "content": "max\tinput.awk\t/^function max(x, y) { return (x > y) ? x : y }$/;\"\tf\nnumjust\tinput.awk\t/^function numjust(n, s) { # position s in field n$/;\"\tf\n" }, { "path": "Units/parser-awk.r/simple2-awk.d/input.awk", "content": "# Aho, Alfred V., Brian W. Kernighan, and Peter J. Weinberger. The AWK\n# Programming Language. Reading, MA: Addison-Wesley Pub., 1988, p. 98.\n\n\n# table - simple table formatter\n\nBEGIN {\n FS = \"\\t\"; blanks = sprintf(\"%100s\", \" \")\n number = \"^[+-]?([0-9]+[.]?[0-9]*|[.][0-9]+)$\"\n}\n\n{ row[NR] = $0\n for (i = 1; i <= NF; i++) {\n if ($i ~ number)\n nwid[i] = max(nwid[i], length($i))\n wid[i] = max(wid[i], length($i))\n }\n}\n\nEND {\n for (r = 1; r <= NR; r++) {\n n = split(row[r], d)\n for (i = 1; i <= n; i++) {\n sep = (i < n) ? \" \" : \"\\n\"\n if (d[i] ~ number)\n printf(\"%\" wid[i] \"s%s\", numjust(i,d[i]), sep)\n else\n printf(\"%-\" wid[i] \"s%s\", d[i], sep)\n }\n }\n}\n\nfunction max(x, y) { return (x > y) ? x : y }\n\nfunction numjust(n, s) { # position s in field n\n return s substr(blanks, 1, int((wid[n]-nwid[n])/2))\n}\n" }, { "path": "Units/parser-basic.r/basic-labels.d/expected.tags", "content": "repeat\tinput.bas\t/^repeat:$/;\"\tl\n" }, { "path": "Units/parser-basic.r/basic-labels.d/input.bas", "content": "' This is not a label:\nREM This is not a label:\n\nrepeat:\nPRINT \"Going 'round again\"\nGOTO repeat\nEND\n" }, { "path": "Units/parser-basic.r/freebasic-access.d/args.ctags", "content": "--sort=no\n--fields=+{access}\n" }, { "path": "Units/parser-basic.r/freebasic-access.d/expected.tags", "content": "i_am_private\tinput.bas\t/^Private Sub i_am_private$/;\"\tf\taccess:private\ni_am_public\tinput.bas\t/^Public Sub i_am_public$/;\"\tf\taccess:public\n" }, { "path": "Units/parser-basic.r/freebasic-access.d/input.bas", "content": "# Taken from https://documentation.help/FreeBASIC/KeyPgPublic.html\nPrivate Sub i_am_private\nEnd Sub\n\nPublic Sub i_am_public\nEnd Sub\n" }, { "path": "Units/parser-basic.r/freebasic-decls.d/args.ctags", "content": "--sort=no\n--fields=+rE\n--extras=+r\n" }, { "path": "Units/parser-basic.r/freebasic-decls.d/expected.tags", "content": "curses\tinput.bas\t/^namespace curses 'public use this$/;\"\tn\troles:def\nwin\tinput.bas\t/^\t\ttype win as curses.curses_priv._win_st$/;\"\tt\tnamespace:curses\troles:def\n_Init\tinput.bas\t/^\t\tdeclare\tfunction\t_Init\talias \"initscr\" () as win ptr$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nGetMaxX\tinput.bas\t/^\t\tdeclare\tfunction\tGetMaxX alias\t\"getmaxx\" (byval as win ptr) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nGetMaxY\tinput.bas\t/^\t\tdeclare\tfunction\tGetMaxY alias \"getmaxy\"\t(byval as win ptr) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nCreateWindow\tinput.bas\t/^\t\tdeclare\tfunction\tCreateWindow alias \"newwin\" (byval as integer, byval as integer, byval as int/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nCreateSubWindow\tinput.bas\t/^\t\tdeclare\tfunction\tCreateSubWindow alias \"subwin\" (byval as win ptr, byval as integer, byval as /;\"\tf\tnamespace:curses\troles:decl\textras:reference\nGetChar\tinput.bas\t/^\t\tdeclare function\tGetChar alias \"getch\" () as UByte$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nCBreak\tinput.bas\t/^\t\tdeclare function\tCBreak alias \"cbreak\" () as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nEreaseTerm\tinput.bas\t/^\t\tdeclare function\tEreaseTerm alias \"erase\" () as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nClearTerm\tinput.bas\t/^\t\tdeclare function\tClearTerm alias \"clear\" () as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nEreaseWindow\tinput.bas\t/^\t\tdeclare function EreaseWindow alias \"werase\" (byval as win ptr) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nClearWindow\tinput.bas\t/^\t\tdeclare function ClearWindow alias \"wclear\" (byval as win ptr) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nDeleteWindow\tinput.bas\t/^\t\tdeclare function DeleteWindow alias \"delwin\" (byval as win ptr) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\n_Exit\tinput.bas\t/^\t\tdeclare function _Exit alias \"endwin\" () as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nRefresTerm\tinput.bas\t/^\t\tdeclare function RefresTerm alias \"refresh\" () as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nRefreshWindow\tinput.bas\t/^\t\tdeclare function RefreshWindow alias \"wrefresh\" (byval as win ptr) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nPrintTerm\tinput.bas\t/^\t\tdeclare function PrintTerm alias \"printw\" (byval as zstring ptr, ... ) as integer$/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nPrintWindow\tinput.bas\t/^\t\tdeclare function PrintWindow alias \"wprintw\" (byval as win ptr, byval as zstring ptr, ... ) as/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nSetCursorPositionTerm\tinput.bas\t/^\t\tdeclare function SetCursorPositionTerm alias \"move\" (byval as integer,byval as integer) as int/;\"\tf\tnamespace:curses\troles:decl\textras:reference\nSetCursorPositionWindow\tinput.bas\t/^\t\tdeclare function SetCursorPositionWindow alias \"wmove\" (byval as win ptr, byval as integer, by/;\"\tf\tnamespace:curses\troles:decl\textras:reference\n" }, { "path": "Units/parser-basic.r/freebasic-decls.d/input.bas", "content": "' Taken from https://termbin.com/x9wo submitted by @Glog78\nnamespace curses 'public use this\n\t#include \"curses_priv.bi\"\n\t#inclib \"curses\"\n\n\textern \"c\"\n\n\t\ttype win as curses.curses_priv._win_st\n\n\t\tdeclare\tfunction\t_Init\talias \"initscr\" () as win ptr\n\t\tdeclare\tfunction\tGetMaxX alias\t\"getmaxx\" (byval as win ptr) as integer\n\t\tdeclare\tfunction\tGetMaxY alias \"getmaxy\"\t(byval as win ptr) as integer\n\t\tdeclare\tfunction\tCreateWindow alias \"newwin\" (byval as integer, byval as integer, byval as integer, byval as integer) as win\n\t\tdeclare\tfunction\tCreateSubWindow alias \"subwin\" (byval as win ptr, byval as integer, byval as integer, byval as integer, byval as integer) as win ptr\n\t\tdeclare function\tGetChar alias \"getch\" () as UByte\n\t\tdeclare function\tCBreak alias \"cbreak\" () as integer\n\t\tdeclare function\tEreaseTerm alias \"erase\" () as integer\n\t\tdeclare function\tClearTerm alias \"clear\" () as integer\n\t\tdeclare function EreaseWindow alias \"werase\" (byval as win ptr) as integer\n\t\tdeclare function ClearWindow alias \"wclear\" (byval as win ptr) as integer\n\t\tdeclare function DeleteWindow alias \"delwin\" (byval as win ptr) as integer\n\t\tdeclare function _Exit alias \"endwin\" () as integer\n\t\tdeclare function RefresTerm alias \"refresh\" () as integer\n\t\tdeclare function RefreshWindow alias \"wrefresh\" (byval as win ptr) as integer\n\t\tdeclare function PrintTerm alias \"printw\" (byval as zstring ptr, ... ) as integer\n\t\tdeclare function PrintWindow alias \"wprintw\" (byval as win ptr, byval as zstring ptr, ... ) as integer\n\t\tdeclare function SetCursorPositionTerm alias \"move\" (byval as integer,byval as integer) as integer\n\t\tdeclare function SetCursorPositionWindow alias \"wmove\" (byval as win ptr, byval as integer, byval as integer) as integer\n\n\tend extern\n\nend namespace 'curses\n\n' vim: bs=2 sw=2 ss=2 ts=2 nu noet ft=basic\n" }, { "path": "Units/parser-basic.r/freebasic-namespace.d/args.ctags", "content": "--sort=no\n--fields=+e\n" }, { "path": "Units/parser-basic.r/freebasic-namespace.d/expected.tags", "content": "first\tinput.bas\t/^namespace first 'first defines something'$/;\"\tn\tend:12\nfirst_func\tinput.bas\t/^ sub first_func$/;\"\tf\tnamespace:first\nsecond\tinput.bas\t/^ namespace second 'second defines something'$/;\"\tn\tnamespace:first\tend:11\nfirst_func\tinput.bas\t/^ sub first_func 'oh a second first_func$/;\"\tf\tnamespace:first.second\nsecond_func\tinput.bas\t/^ sub second_func$/;\"\tf\tnamespace:first.second\nfirst_func\tinput.bas\t/^sub first_func 'oh another first_func$/;\"\tf\n" }, { "path": "Units/parser-basic.r/freebasic-namespace.d/input.bas", "content": "namespace first 'first defines something'\n sub first_func\n end sub\n\n namespace second 'second defines something'\n sub first_func 'oh a second first_func\n end sub\n\n sub second_func\n end sub\n end namespace 'ignored'\nend namespace\n\nsub first_func 'oh another first_func\nend sub\n\n' vim: bs=2 sw=2 ss=2 ts=2 nu et ft=basic\n" }, { "path": "Units/parser-basic.r/simple.bas.d/expected.tags", "content": "a\tinput.bas\t/^Common a As Integer$/;\"\tv\nb\tinput.bas\t/^Dim b As Integer$/;\"\tv\nc\tinput.bas\t/^dim as string c(20), d=\"a\", e$/;\"\tv\nd\tinput.bas\t/^dim as string c(20), d=\"a\", e$/;\"\tv\ne\tinput.bas\t/^dim as string c(20), d=\"a\", e$/;\"\tv\nf\tinput.bas\t/^Function f()$/;\"\tf\ng\tinput.bas\t/^dim shared as string g$/;\"\tv\nh\tinput.bas\t/^dim as string ptr h$/;\"\tv\ni\tinput.bas\t/^dim as string * 4096 i$/;\"\tv\nj\tinput.bas\t/^dim j as string=\"Export_GIR_FULL_\"+mid(date,7)+\",\"+mid(date,1,2)+\"\"+mid(date,4,2)+\".csv\"$/;\"\tv\nk\tinput.bas\t/^dim as string k=\"Export_GIR_FULL_\"+mid(date(),\"(\")+\",\"+mid(date,1,2)+\"\"+mid(date,4,2)+\".csv\", l$/;\"\tv\nl\tinput.bas\t/^dim as string k=\"Export_GIR_FULL_\"+mid(date(),\"(\")+\",\"+mid(date,1,2)+\"\"+mid(date,4,2)+\".csv\", l$/;\"\tv\none\tinput.bas\t/^Const one = 1$/;\"\tc\nstart\tinput.bas\t/^start:$/;\"\tl\nstr\tinput.bas\t/^DIM AS STRING str$/;\"\tv\ntest\tinput.bas\t/^Type test$/;\"\tt\n" }, { "path": "Units/parser-basic.r/simple.bas.d/input.bas", "content": "Gosub start\n\nConst one = 1\n\nCommon a As Integer\nDim b As Integer\nDIM AS STRING str\ndim as string c(20), d=\"a\", e\ndim shared as string g\ndim as string ptr h\ndim as string * 4096 i\ndim j as string=\"Export_GIR_FULL_\"+mid(date,7)+\",\"+mid(date,1,2)+\"\"+mid(date,4,2)+\".csv\"\ndim as string k=\"Export_GIR_FULL_\"+mid(date(),\"(\")+\",\"+mid(date,1,2)+\"\"+mid(date,4,2)+\".csv\", l\n\nType test\n a As Integer\n b As Integer\nEnd Type\n\nFunction f()\n a = 3\nEnd Function\n\nstart:\n f()\nReturn\n\n\n" }, { "path": "Units/parser-basic.r/simple.bb.d/expected.tags", "content": "a\tinput.bb\t/^Global a$/;\"\tv\nb\tinput.bb\t/^Dim b(100)$/;\"\tv\nf\tinput.bb\t/^Function f()$/;\"\tf\none#\tinput.bb\t/^Const one# = 1.0$/;\"\tc\nstart\tinput.bb\t/^.start$/;\"\tl\ntest\tinput.bb\t/^Type test$/;\"\tt\n" }, { "path": "Units/parser-basic.r/simple.bb.d/input.bb", "content": "Gosub start\n\nConst one# = 1.0\n\nGlobal a\nDim b(100)\n\nType test\n Field a\n Field b\nEnd Type\n\nFunction f()\n a = 3\nEnd Function\n\n.start\n f()\nReturn\n\n" }, { "path": "Units/parser-bats.r/bats-simple.d/args.ctags", "content": "--sort=no\n--extras=+sr\n--fields=+lr\n" }, { "path": "Units/parser-bats.r/bats-simple.d/expected.tags", "content": "Zeroth test\tinput.bats\t/^@test \"Zeroth test\" {$/;\"\tt\tlanguage:Bats\troles:def\nFirst test\tinput.bats\t/^@test \"First test\" {$/;\"\tt\tlanguage:Bats\troles:def\nSecond test\tinput.bats\t/^@test \"Second test\" {$/;\"\tt\tlanguage:Bats\troles:def\nLoading\tinput.bats\t/^@test \"Loading\" {$/;\"\tt\tlanguage:Bats\troles:def\nABC\tinput.bats\t/^ load \"ABC\"$/;\"\tS\tlanguage:Bats\troles:loaded\na\"b\tinput.bats\t/^ load \"a\\\\\"b\"$/;\"\tS\tlanguage:Bats\troles:loaded\nc\\\\d\tinput.bats\t/^ load \"c\\\\\\\\d\"$/;\"\tS\tlanguage:Bats\troles:loaded\nEFG\tinput.bats\t/^ load EFG$/;\"\tS\tlanguage:Bats\troles:loaded\nHIJ\tinput.bats\t/^ load 'HIJ'$/;\"\tS\tlanguage:Bats\troles:loaded\nh\\\\ij\tinput.bats\t/^ load 'h\\\\ij'$/;\"\tS\tlanguage:Bats\troles:loaded\nK L;M\tinput.bats\t/^ load K\\\\ L\\\\;M$/;\"\tS\tlanguage:Bats\troles:loaded\n" }, { "path": "Units/parser-bats.r/bats-simple.d/input.bats", "content": "#!/usr/bin/env bats\n\n@test \"Zeroth test\" {\n # will have no tags\n}\n\n# bats file_tags=a:b\n# bats test_tags=c:d\n\n@test \"First test\" {\n # will be tagged a:b, c:d\n}\n\n# bats file_tags=\n\n@test \"Second test\" {\n # will have no tags\n}\n\n@test \"Loading\" {\n load \"ABC\"\n load \"a\\\"b\"\n load \"c\\\\d\"\n load EFG\n load 'HIJ'\n load 'h\\ij'\n load K\\ L\\;M\n}\n\n# Taken from https://bats-core.readthedocs.io/en/stable/writing-tests.html\n" }, { "path": "Units/parser-bibtex.r/bib-simple.d/args.ctags", "content": "--sort=no\n--fields=+l\n" }, { "path": "Units/parser-bibtex.r/bib-simple.d/expected.tags", "content": "1957-doe_loc_ident\tinput.bib\t/^@article{1957-doe_loc_ident,$/;\"\ta\tlanguage:BibTeX\ndoe+rocket\tinput.bib\t/^@Book{doe+rocket,$/;\"\tb\tlanguage:BibTeX\ntiny_collect\tinput.bib\t/^@booklet{tiny_collect,$/;\"\tB\tlanguage:BibTeX\n1960-rocket_deep-exploration\tinput.bib\t/^@conference{1960-rocket_deep-exploration,$/;\"\tc\tlanguage:BibTeX\n1961-doe-diverse_splits\tinput.bib\t/^@inbook{1961-doe-diverse_splits,$/;\"\ti\tlanguage:BibTeX\n1960-doe-location_splits\tinput.bib\t/^@incollection{1960-doe-location_splits,$/;\"\tI\tlanguage:BibTeX\n1959-rocket_exploration\tinput.bib\t/^@INPROCEEDINGS{1959-rocket_exploration,$/;\"\tj\tlanguage:BibTeX\nman_loc_splits\tinput.bib\t/^@manual{man_loc_splits,$/;\"\tm\tlanguage:BibTeX\ndoe_mastersth\tinput.bib\t/^@mastersthesis{doe_mastersth,$/;\"\tM\tlanguage:BibTeX\ndoe_mastersth_data\tinput.bib\t/^@misc{doe_mastersth_data,$/;\"\tn\tlanguage:BibTeX\ndoe_phd\tinput.bib\t/^@phdthesis{doe_phd,$/;\"\tp\tlanguage:BibTeX\n1960_conf_splits\tinput.bib\t/^@proceedings{1960_conf_splits,$/;\"\tP\tlanguage:BibTeX\njohn_doe\tinput.bib\t/^@string{john_doe = \"Prof. Dr. John Doe\"}$/;\"\ts\tlanguage:BibTeX\n1961_splits\tinput.bib\t/^@techreport{1961_splits$/;\"\tt\tlanguage:BibTeX\nxx_thoughts\tinput.bib\t/^@unpublished{xx_thoughts,$/;\"\tu\tlanguage:BibTeX\nhicks:2001\tinput.bib\t/^@Book{hicks:2001,$/;\"\tb\tlanguage:BibTeX\nknuthwebsite\tinput.bib\t/^@online{knuthwebsite,$/;\"\tV\tlanguage:BibLaTeX\n10.1145/605432.605407\tinput.bib\t/^@Article{10.1145\\/605432.605407,$/;\"\ta\tlanguage:BibTeX\n" }, { "path": "Units/parser-bibtex.r/bib-simple.d/input.bib", "content": "% this is a comment that will be ignored\n\n@article{1957-doe_loc_ident,\n author = \"John Doe\",\n title = \"Exploration of the \n Location-Identity Split\",\n journal = \"Journal of Splits\",\n year = 1957,\n volume = 3\n}\n\n@Book{doe+rocket,\n author = \"John Doe and Rocket Scientist\",\n title = \"Theory of Splits\",\n publisher = \"Dover\",\n year = 1964,\n address = \"New York City\",\n edition = \"ninth Dover printing, tenth GPO printing\"\n}\n\n@booklet{tiny_collect,\n title = \"A tiny collection of stuff\"\n}\n\n@conference{1960-rocket_deep-exploration,\n author = \"Rocket Scientist\",\n title = \"Deep Exploration of the Singleton Split\",\n booktitle = \"34th international conference of important stuff (ICIS)\",\n year = 1960\n}\n\n@inbook{1961-doe-diverse_splits,\n author = \"John Doe\",\n title = \"A comprehensive list of splits\",\n pages = {13-39},\n publisher = \"Penguin Books\",\n year = 1961\n}\n\n@incollection{1960-doe-location_splits,\n author = \"John Doe\",\n title = \"Survey of location splits\",\n booktitle = \"Current state of the art in computational methods\",\n publisher = \"Penguin Books\",\n year = 1960\n}\n\n@INPROCEEDINGS{1959-rocket_exploration,\n author = \"Rocket Scientist\",\n title = \"Exploration of the \n Location-Singleton Split\",\n booktitle = \"33th international conference of important stuff (ICIS)\",\n year = 1959\n}\n\n@manual{man_loc_splits,\n title = \"Introduction to Location Splits\"\n}\n\n@mastersthesis{doe_mastersth,\n author = \"John Doe\"\n title = \"Evaluating location splits under identity constraints\",\n school = \"School of Computer Science\",\n year = 1955\n}\n\n@misc{doe_mastersth_data,\n author = \"John Doe\"\n title = \"Dataset of location splits under identity constraints\",\n howpublished = \"http://johndoe.edu/masterthesis/data\",\n year = 1955\n}\n\n@phdthesis{doe_phd,\n author = \"John Doe\"\n title = \"Evaluating location splits under diverse constraints\",\n school = \"School of Computer Science\",\n year = 1958\n}\n\n@proceedings{1960_conf_splits,\n title = \"First international conference of splits\",\n year = 1960\n}\n\n@string{john_doe = \"Prof. Dr. John Doe\"}\n\n@techreport{1961_splits\n, author = \"Rocket Scientist\"\n, title = \"An introduction to advanced splits\"\n, institution = \"School of Engineering\"\n, year = 1961\n}\n\n@unpublished{xx_thoughts,\n author = \"John Doe and Rocket Scientist\",\n title = \"Thoughts on the future of splits\",\n note = \"Heavily thought about\"\n}\n\n@Comment Taken from https://ja.wikipedia.org/wiki/BibTeX\n@Book{hicks:2001,\n author = \"von Hicks, III, Michael\",\n title = \"Design of a Carbon Fiber Composite Grid Structure for the GLAST\n Spacecraft Using a Novel Manufacturing Technique\",\n publisher = \"Stanford Press\",\n year = 2001,\n address = \"Palo Alto\",\n edition = \"1st,\",\n isbn = \"0-69-697269-4\"\n }\n\n@Comment Taken fron https://ja.overleaf.com/learn/latex/Bibliography_management_with_biblatex\n@online{knuthwebsite,\n author = \"Donald Knuth\",\n title = \"Knuth: Computers and Typesetting\",\n url = \"http://www-cs-faculty.stanford.edu/~uno/abcde.html\",\n keywords = \"latex,knuth\"\n}\n\n@Comment Taken from https://github.com/universal-ctags/ctags/issues/3802#issuecomment-1723511773\n@Comment submitted by @andregpss (André Silva)\n@Article{10.1145/605432.605407,\nauthor = {Levis, Philip and Culler, David},\ntitle = {Mat'{e}: A Tiny Virtual Machine for Sensor Networks},\nyear = {2002} }\n" }, { "path": "Units/parser-c.r/anonymous-param-in-broken-paramlist.d/README", "content": "This is a test case for detecting memory leaking.\n" }, { "path": "Units/parser-c.r/anonymous-param-in-broken-paramlist.d/args.ctags", "content": "--kinds-C=+z\n--extras=+{anonymous}\n" }, { "path": "Units/parser-c.r/anonymous-param-in-broken-paramlist.d/input-0.c", "content": "/* https://gitlab.gnome.org/GNOME/glib/-/blob/main/gio/gdummyproxyresolver.c */\nG_DEFINE_TYPE_WITH_CODE (GDummyProxyResolver, g_dummy_proxy_resolver, G_TYPE_OBJECT,\n\t\t\t G_IMPLEMENT_INTERFACE (G_TYPE_PROXY_RESOLVER,\n\t\t\t\t\t\tg_dummy_proxy_resolver_iface_init)\n\t\t\t _g_io_modules_ensure_extension_points_registered ();\n\t\t\t g_io_extension_point_implement (G_PROXY_RESOLVER_EXTENSION_POINT_NAME,\n\t\t\t\t\t\t\t g_define_type_id,\n\t\t\t\t\t\t\t \"dummy\",\n\t\t\t\t\t\t\t -100))\n\nstatic void\ng_dummy_proxy_resolver_finalize (GObject *object)\n{\n /* must chain up */\n G_OBJECT_CLASS (g_dummy_proxy_resolver_parent_class)->finalize (object);\n}\n" }, { "path": "Units/parser-c.r/anonymous-param-in-broken-paramlist.d/input-1.c", "content": "G (f () g ()) h (void) {\n" }, { "path": "Units/parser-c.r/anonymous-param-in-broken-paramlist.d/input.c", "content": "f(a,){\n" }, { "path": "Units/parser-c.r/attr-attached-to-array-failed.b/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-c.r/attr-attached-to-array-failed.b/expected.tags", "content": "registered_fb3\tinput.c\t/^struct fb_info *registered_fb3[FB_MAX] __read_mostly X Y();$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly X Y()\nregistered_fb7\tinput.c\t/^struct fb_info *registered_fb7[FB_MAX] __read_mostly X(\"a\");$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly X (\"a\")\nregistered_fb8\tinput.c\t/^struct fb_info *registered_fb8[FB_MAX] __read_mostly X(\"a\") C;$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly X (\"a\") C\n" }, { "path": "Units/parser-c.r/attr-attached-to-array-failed.b/input.c", "content": "struct fb_info *registered_fb3[FB_MAX] __read_mostly X Y();\nstruct fb_info *registered_fb7[FB_MAX] __read_mostly X(\"a\");\nstruct fb_info *registered_fb8[FB_MAX] __read_mostly X(\"a\") C;\n" }, { "path": "Units/parser-c.r/attr-attached-to-array.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-c.r/attr-attached-to-array.d/expected.tags", "content": "registered_fb1\tinput.c\t/^struct fb_info *registered_fb1[FB_MAX] __read_mostly;$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly\nregistered_fb2\tinput.c\t/^struct fb_info *registered_fb2[FB_MAX] __read_mostly X;$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly X\nregistered_fb4\tinput.c\t/^struct fb_info *registered_fb4[FB_MAX] __read_mostly X Y(1, 2);$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly X Y (1,2)\nregistered_fb5\tinput.c\t/^struct fb_info *registered_fb5[FB_MAX] __read_mostly X Y(1, 2), fb6[3] _Z_;$/;\"\tv\ttyperef:struct:fb_info * [FB_MAX]__read_mostly X Y (1,2)\nfb6\tinput.c\t/^struct fb_info *registered_fb5[FB_MAX] __read_mostly X Y(1, 2), fb6[3] _Z_;$/;\"\tv\ttyperef:struct:fb_info[3]_Z_\n" }, { "path": "Units/parser-c.r/attr-attached-to-array.d/input.c", "content": "struct fb_info *registered_fb1[FB_MAX] __read_mostly;\nstruct fb_info *registered_fb2[FB_MAX] __read_mostly X;\nstruct fb_info *registered_fb4[FB_MAX] __read_mostly X Y(1, 2);\nstruct fb_info *registered_fb5[FB_MAX] __read_mostly X Y(1, 2), fb6[3] _Z_;\n" }, { "path": "Units/parser-c.r/backslash-in-input.c.d/expected.tags", "content": "main\tinput.c\t/^int main \\\\$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/backslash-in-input.c.d/input.c", "content": "\nint main \\\n ()\n{\n}\n" }, { "path": "Units/parser-c.r/bit_field.c.d/args.ctags", "content": "--sort=no\n--fields-all=+{end}\n" }, { "path": "Units/parser-c.r/bit_field.c.d/expected.tags", "content": "bit_fields\tinput.c\t/^struct bit_fields {$/;\"\ts\tfile:\tend:5\na\tinput.c\t/^ unsigned int a: 1;$/;\"\tm\tstruct:bit_fields\ttyperef:typename:unsigned int:1\tfile:\tend:2\nb\tinput.c\t/^ unsigned int b: 1;$/;\"\tm\tstruct:bit_fields\ttyperef:typename:unsigned int:1\tfile:\tend:3\nc\tinput.c\t/^ unsigned int c: 2;$/;\"\tm\tstruct:bit_fields\ttyperef:typename:unsigned int:2\tfile:\tend:4\n__anon1719c4a50108\tinput.c\t/^struct {$/;\"\ts\tfile:\tend:12\nsign\tinput.c\t/^ unsigned sign : 1;$/;\"\tm\tstruct:__anon1719c4a50108\ttyperef:typename:unsigned:1\tfile:\tend:8\nexp\tinput.c\t/^ unsigned exp : _FP_EXPBITS_D;$/;\"\tm\tstruct:__anon1719c4a50108\ttyperef:typename:unsigned\tfile:\tend:9\nfrac1\tinput.c\t/^ unsigned frac1 : _FP_FRACBITS_D - (_FP_IMPLBIT_D != 0) - _FP_W_TYPE_SIZE;$/;\"\tm\tstruct:__anon1719c4a50108\ttyperef:typename:unsigned\tfile:\tend:10\nfrac0\tinput.c\t/^ unsigned frac0 : _FP_W_TYPE_SIZE;$/;\"\tm\tstruct:__anon1719c4a50108\ttyperef:typename:unsigned\tfile:\tend:11\nshortname_info\tinput.c\t/^struct shortname_info {$/;\"\ts\tfile:\tend:18\nlower\tinput.c\t/^\tunsigned char lower:1,$/;\"\tm\tstruct:shortname_info\ttyperef:typename:unsigned char:1\tfile:\tend:15\nupper\tinput.c\t/^\t\t upper:1,$/;\"\tm\tstruct:shortname_info\ttyperef:typename:unsigned char:1\tfile:\tend:16\nvalid\tinput.c\t/^\t\t valid:1;$/;\"\tm\tstruct:shortname_info\ttyperef:typename:unsigned char:1\tfile:\tend:17\n__anon1719c4a50208\tinput.c\t/^{$/;\"\ts\tfile:\tend:27\npublic\tinput.c\t/^ BYTE \tpublic: 1;$/;\"\tm\tstruct:__anon1719c4a50208\ttyperef:typename:BYTE:1\tfile:\tend:23\nbad2\tinput.c\t/^ BYTE \tbad2: 1;$/;\"\tm\tstruct:__anon1719c4a50208\ttyperef:typename:BYTE:1\tfile:\tend:24\ngroup\tinput.c\t/^ BYTE \tgroup: 1;$/;\"\tm\tstruct:__anon1719c4a50208\ttyperef:typename:BYTE:1\tfile:\tend:25\npersonal\tinput.c\t/^ BYTE \tpersonal: 1;$/;\"\tm\tstruct:__anon1719c4a50208\ttyperef:typename:BYTE:1\tfile:\tend:26\nbitfield_flags\tinput.c\t/^} bitfield_flags;$/;\"\tt\ttyperef:struct:__anon1719c4a50208\tfile:\n__anon1719c4a50308\tinput.c\t/^{$/;\"\ts\tfile:\tend:35\nthis\tinput.c\t/^ BYTE\tthis;$/;\"\tm\tstruct:__anon1719c4a50308\ttyperef:typename:BYTE\tfile:\tend:31\npublic\tinput.c\t/^ BYTE\tpublic;$/;\"\tm\tstruct:__anon1719c4a50308\ttyperef:typename:BYTE\tfile:\tend:32\nprivate\tinput.c\t/^ BYTE\tprivate;$/;\"\tm\tstruct:__anon1719c4a50308\ttyperef:typename:BYTE\tfile:\tend:33\nthat\tinput.c\t/^ BYTE\tthat;$/;\"\tm\tstruct:__anon1719c4a50308\ttyperef:typename:BYTE\tfile:\tend:34\nmystruct\tinput.c\t/^} mystruct;$/;\"\tt\ttyperef:struct:__anon1719c4a50308\tfile:\n" }, { "path": "Units/parser-c.r/bit_field.c.d/input.c", "content": "struct bit_fields {\n unsigned int a: 1;\n unsigned int b: 1;\n unsigned int c: 2;\n};\n\nstruct {\n unsigned sign : 1;\n unsigned exp : _FP_EXPBITS_D;\n unsigned frac1 : _FP_FRACBITS_D - (_FP_IMPLBIT_D != 0) - _FP_W_TYPE_SIZE;\n unsigned frac0 : _FP_W_TYPE_SIZE;\n};\n\nstruct shortname_info {\n\tunsigned char lower:1,\n\t\t upper:1,\n\t\t valid:1;\n};\n\n// Problem reported by Michael Brown on 23 October 2001.\ntypedef struct\n{\n BYTE \tpublic: 1;\n BYTE \tbad2: 1;\n BYTE \tgroup: 1;\n BYTE \tpersonal: 1;\n} bitfield_flags;\n\ntypedef struct\n{\n BYTE\tthis;\n BYTE\tpublic;\n BYTE\tprivate;\n BYTE\tthat;\n} mystruct;\n" }, { "path": "Units/parser-c.r/broken-input-cxx-operator.d/input.c", "content": "struct a::b{\n" }, { "path": "Units/parser-c.r/bug1020715.c.d/args.ctags", "content": "--fields=+S\n--excmd=number\n--kinds-C=+l\n" }, { "path": "Units/parser-c.r/bug1020715.c.d/expected.tags", "content": "f\tinput.c\t43;\"\tf\ttyperef:typename:void\tsignature:()\n" }, { "path": "Units/parser-c.r/bug1020715.c.d/input.c", "content": "/*\nBugs item #1020715, was opened at 2004-09-01 22:42\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=1020715&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Arne Georg Gleditsch (argggh)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: Strange parsing of C code\n\nInitial Comment:\nRunning ctags 5.5.4 like this\n\n/usr/local/bin/ctags --fields=+S --excmd=number -f - --c-types=+l /usr/src/source/2.6.6/drivers/scsi/aha152x.c | grep ^done\n\nreturns a bogus entry for the function \"done\" on line\n1745 with a wacky signature. The file aha152x.c is\nfrom Linux 2.6.6, but is appended for convenience.\n*/\n/*\nDate: 2007-08-14 01:00\nSender: elliotth\nHide\n\ni don't really understand why the other lines in the test case were\nnecessary to exercise the bug, but changing parseParens to call\nprocessAngleBracket instead of just skipToMatch(\"<>\") fixes this bug. i've\ncommitted that since it causes no regressions.\n\n\nDate: 2007-08-14 00:34\nSender: elliotth\nHide\n\ni've come up with a minimal test case, and committed it. it's pretty\nweird:\n*/\nvoid f() {\n\tdone(a<<1);\n\ta->a;\n\tif (a->a) {\n\t}\n}\n/*\nchange just about anything and the bizarre \"done\" tag goes away. you can't\neven switch from '->' to '.', which seems odd.\n*/\n" }, { "path": "Units/parser-c.r/bug1085585.c.d/args.ctags", "content": "--kinds-c=+p\n" }, { "path": "Units/parser-c.r/bug1085585.c.d/expected.tags", "content": "check_parity\tinput.c\t/^static int check_parity(des_cblock (*key));$/;\"\tp\ttyperef:typename:int\tfile:\ndes_check_key\tinput.c\t/^int des_check_key=0;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/bug1085585.c.d/input.c", "content": "/*\nBugs item #1085585, was opened at 2004-12-14 20:55\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=1085585&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: boisterous (yadavnav)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: ctags 5.5.4 doesn't work correctly on some files\n\nInitial Comment:\nHi,\n\nI ran exuberant ctags on the following file\n\nFreeBSD kernel : src/sys/crypto/des/des_setkey.c\n\nIf I run the 5.5.4 ctags on version 1.3 of the above\nfile then it doesn't produce all the tags\n\nThe version 1.3 is at:\n\nhttp://www.freebsd.org/cgi/cvsweb.cgi/src/sys/crypto/des/des_setkey.c?rev=1.3&content-type=text/x-cvsweb-markup\n\n[...]\n\nWhy does ctags fail on the 1.3 version of the file ?\n*/\n\n/* relevant portion from file */\nstatic int check_parity(des_cblock (*key));\nint des_check_key=0;\n" }, { "path": "Units/parser-c.r/bug1086609.c.d/expected.tags", "content": "func2\tinput.c\t/^int func2(int a)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/bug1086609.c.d/input.c", "content": "/*\nBugs item #1086609, was opened at 2004-12-16 13:07\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=1086609&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Mikhail Kruk (meshko)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: ctags getting confused by #if 0\n\nInitial Comment:\nHere is a sample C program which confuses ctags. I\nthink every line in it is significant. Dropping any of\nthe #ifdefs or the #define makes the problem go away:\n*/\n#if 0\n#define __PROC__\nint func1(\n#if 0\n#endif\n)\n{\n}\n#endif\n\nint func2(int a)\n{\n}\n/*\nSomehow the opening brace from line 3 doesn't get\nignored and the closing brace does get ignored and\nctags drops out on \"int func2(int a)\" line with \"failed\nto find match for '(' at line 11\" error.\nGranted, having #if 0 in the middle of args list is\nweird, but perfeclty legal.\n*/\n" }, { "path": "Units/parser-c.r/bug1198.c.d/args.ctags", "content": "--kinds-c=fpvx\n--fields=+tS\n" }, { "path": "Units/parser-c.r/bug1198.c.d/expected.tags", "content": "XESetCopyEventCookie\tinput.c\t/^extern Bool (*XESetCopyEventCookie($/;\"\tp\ttyperef:typename:Bool (*)(Display *,XGenericEventCookie *,XGenericEventCookie *)\tfile:\tsignature:(Display *,int,Bool (*)(Display *,XGenericEventCookie *,XGenericEventCookie *))\nf\tinput.c\t/^int (* f (char c)) (void * a)$/;\"\tf\ttyperef:typename:int (*)(void * a)\tsignature:(char c)\nf\tinput.c\t/^int (* f (char c)) (void * a);$/;\"\tp\ttyperef:typename:int (*)(void * a)\tfile:\tsignature:(char c)\ng\tinput.c\t/^static int g (void *a)$/;\"\tf\ttyperef:typename:int\tfile:\tsignature:(void * a)\n" }, { "path": "Units/parser-c.r/bug1198.c.d/input.c", "content": "/*\n Bug 1198@github reported by lvc on 26/11/2016.\n \n The latest universal ctags 015eae7 doesn't detect function XESetCopyEventCookie\n from libX11-1.3 library (include/X11/Xlibint.h):\n*/\n\nextern Bool (*XESetCopyEventCookie(\n Display* /* display */,\n int /* extension */,\n Bool (*) (\n Display* /* display */,\n XGenericEventCookie* /* in */,\n XGenericEventCookie* /* out */\n ) /* proc */\n))(\n Display*, XGenericEventCookie*, XGenericEventCookie*\n);\n\n/* also adding simplified output found by masatake */\n\nint (* f (char c)) (void * a);\n\nstatic int g (void *a)\n{\n\treturn 1;\n}\n\nint (* f (char c)) (void * a)\n{\n\treturn g;\n}" }, { "path": "Units/parser-c.r/bug1201689.c.d/expected.tags", "content": "test\tinput.c\t/^void test(a, ...)$/;\"\tf\n" }, { "path": "Units/parser-c.r/bug1201689.c.d/input.c", "content": "/*\nBugs item #1201689, was opened at 2005-05-13 18:18\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=1201689&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Scott Ferguson (shf301)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: Variable Length Argument Lists in K&R Style not Parsed\n\nInitial Comment:\nA function with a K&R style parameter list that has a \nvariable length argument list will not be added to the tags file.\n\nFor example create a file, say test.c with the following code\n*/\nvoid test(a, ...)\nchar a;\n{\n return;\n}\n/*\nRun ctags test.c. the tags file with only contain the line:\n a\ttest.c\t/^char a;$/;\"\tv\n\nThis occurs with ctags 5.3 and 5.5.4. \n\nVariable length argument lists work fine if the function is in \nANSI style, void test(char a, ...) will work fine.\n*/\n" }, { "path": "Units/parser-c.r/bug1458930.c.d/args.ctags", "content": "--kinds-c=+p\n" }, { "path": "Units/parser-c.r/bug1458930.c.d/expected.tags", "content": "x\tinput.c\t/^char x();$/;\"\tp\ttyperef:typename:char\tfile:\ny\tinput.c\t/^wchar_t y();$/;\"\tp\ttyperef:typename:wchar_t\tfile:\n" }, { "path": "Units/parser-c.r/bug1458930.c.d/input.c", "content": "// test with --kinds-c=+p\nchar x();\nwchar_t y();\n" }, { "path": "Units/parser-c.r/bug1466117.c.d/expected.tags", "content": "__anonadd2b98b0108\tinput.c\t/^typedef struct {$/;\"\ts\tfile:\na\tinput.c\t/^\tint a;$/;\"\tm\tstruct:__anonadd2b98b0108\ttyperef:typename:int\tfile:\na\tinput.c\t/^\tint a;$/;\"\tm\tstruct:mystruct\ttyperef:typename:int\tfile:\nb\tinput.c\t/^\tint b;$/;\"\tm\tstruct:__anonadd2b98b0108\ttyperef:typename:int\tfile:\nb\tinput.c\t/^\tint b;$/;\"\tm\tstruct:mystruct\ttyperef:typename:int\tfile:\nmystruct\tinput.c\t/^typedef struct mystruct {$/;\"\ts\tfile:\nmystruct\tinput.c\t/^} mystruct;$/;\"\tt\ttyperef:struct:__anonadd2b98b0108\tfile:\n" }, { "path": "Units/parser-c.r/bug1466117.c.d/input.c", "content": "typedef struct mystruct {\n\tint a;\n\tint b;\n};\n\ntypedef struct {\n\tint a;\n\tint b;\n} mystruct;\n\n" }, { "path": "Units/parser-c.r/bug1491666.c.d/args.ctags", "content": "--kinds-c=+l\n" }, { "path": "Units/parser-c.r/bug1491666.c.d/expected.tags", "content": "__anon329ddd920108\tinput.c\t/^typedef struct {$/;\"\ts\tfile:\nmain\tinput.c\t/^void main (void) {$/;\"\tf\ttyperef:typename:void\nmy_struct\tinput.c\t/^} my_struct;$/;\"\tt\ttyperef:struct:__anon329ddd920108\tfile:\nvar1\tinput.c\t/^\tmy_struct var1;$/;\"\tl\tfunction:main\ttyperef:typename:my_struct\tfile:\nvar2\tinput.c\t/^\t\tvar2;$/;\"\tl\tfunction:main\ttyperef:typename:my_struct\tfile:\nx\tinput.c\t/^\t\tx;$/;\"\tm\tstruct:__anon329ddd920108\ttyperef:typename:int\tfile:\ny\tinput.c\t/^\t\ty;$/;\"\tm\tstruct:__anon329ddd920108\ttyperef:typename:float\tfile:\n" }, { "path": "Units/parser-c.r/bug1491666.c.d/input.c", "content": "typedef struct {\n\tint\n\t\tx;\n\n\tfloat\n\t\ty;\n} my_struct;\n\nvoid main (void) {\n\tmy_struct var1;\n\tmy_struct\n\t\tvar2;\n}\n" }, { "path": "Units/parser-c.r/bug1764143.h.d/expected.tags", "content": "arch_reset\tinput.h\t/^static inline void arch_reset(char mode)$/;\"\tf\ttyperef:typename:void\nomap1_arch_reset\tinput.h\t/^static inline void omap1_arch_reset(char mode)$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-c.r/bug1764143.h.d/input.h", "content": "static inline void omap1_arch_reset(char mode)\n{\n\t/*\n\t * Workaround for 5912/1611b bug mentioned in sprz209d.pdf p. 28\n\t * \"Global Software Reset Affects Traffic Controller Frequency\".\n\t */\n\tif (cpu_is_omap5912()) {\n\t\tomap_writew(omap_readw(DPLL_CTL) & ~(1 << 4),\n\t\t\t\t DPLL_CTL);\n\t\tomap_writew(0x8, ARM_RSTCT1);\n\t}\n\n\tif (machine_is_voiceblue())\n\t\tvoiceblue_reset();\n\telse\n\t\tomap_writew(1, ARM_RSTCT1);\n}\n\nstatic inline void arch_reset(char mode)\n{\n\tif (!cpu_is_omap24xx())\n\t\tomap1_arch_reset(mode);\n\telse\n\t\tomap_prcm_arch_reset(mode);\n}\n\n#endif\n" }, { "path": "Units/parser-c.r/bug2554.c.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-c.r/bug2554.c.d/expected.tags", "content": "__anonbbb2b4710108\tinput.c\t/^{$/;\"\ts\tfile:\nn\tinput.c\t/^ int*n;$/;\"\tm\tstruct:__anonbbb2b4710108\ttyperef:typename:int *\tfile:\nS\tinput.c\t/^} S;$/;\"\tt\ttyperef:struct:__anonbbb2b4710108\tfile:\nfoo\tinput.c\t/^struct foo {$/;\"\ts\tfile:\nbar\tinput.c\t/^\tint bar;$/;\"\tm\tstruct:foo\ttyperef:typename:int\tfile:\nv\tinput.c\t/^} v = {$/;\"\tv\ttyperef:struct:foo\nw\tinput.c\t/^struct foo w = {$/;\"\tv\ttyperef:struct:foo\n" }, { "path": "Units/parser-c.r/bug2554.c.d/input.c", "content": "/* valgrind reported an error when ctags built with\n * --enable-debugging configure option.\n *\n * To reproduce:\n *\n * $ make units LANGUAGES=C VG=1\n *\n */\ntypedef struct\n{\n int*n;\n} S;\n\nstruct foo {\n\tint bar;\n} v = {\n\t.bar = 1,\n};\n\nstruct foo w = {\n\t.bar = 2,\n};\n" }, { "path": "Units/parser-c.r/bug507864.c.d/README", "content": "This one is prepared as part of a bug report,\nsf-bugs:22, http://sourceforge.net/p/ctags/bugs/22/.\n\nDarren Hiebert closed the bug with \"closed-wont-fix\"\nstatus with following comment:\n\n The use of a macro call in an argument list, as shown in\n bad_code.c is too problematic to derive a good solution for.\n Such bizarre used of macros are rare and not worth the risk\n of breaking more common situations.\n\nSo I(Masatake YAMATO), don't touch this case and put it\nhere.\n" }, { "path": "Units/parser-c.r/bug507864.c.d/expected.tags", "content": "func1\tinput.c\t/^FUNCSTS func1(ENTSEQNO(seq)) {}$/;\"\tf\ttyperef:typename:FUNCSTS\nfunc2\tinput.c\t/^FUNCSTS func2 (MEMTXT(form_msg), MEMTXT (text), MEMTXT (mail)) {}$/;\"\tf\ttyperef:typename:FUNCSTS\n" }, { "path": "Units/parser-c.r/bug507864.c.d/input.c", "content": "FUNCSTS func1(ENTSEQNO(seq)) {}\nFUNCSTS func2 (MEMTXT(form_msg), MEMTXT (text), MEMTXT (mail)) {}\n" }, { "path": "Units/parser-c.r/bug556645.c.d/README", "content": "This one is prepared as part of a bug report,\nsf-bugs:33, http://sourceforge.net/p/ctags/bugs/33/.\n\nDarren Hiebert closed the bug with \"closed-wont-fix\"\nstatus with following comment:\n\n This cannot be handled without preprocessing. Ctags does not\n do preprocessing for a number of reasons, and so will never\n handle such a situation. You can do the preprocessing\n yourself and run ctags on the output with the\n --line-directives option.\n\nSo I(Masatake YAMATO), don't touch this case and put it\nhere.\n\n--------------------------------------------------------------------\n\nSurprisingly, new C/Cxx parser can capture Qtype well.\n\n" }, { "path": "Units/parser-c.r/bug556645.c.d/expected.tags", "content": "A1\tinput.c\t/^#define A1(/;\"\td\tfile:\nQtype\tinput.c\t/^typedef A1(ilm_struct, 1) Qtype;$/;\"\tt\tfile:\n" }, { "path": "Units/parser-c.r/bug556645.c.d/input.c", "content": "/*\nFrom noreply@sourceforge.net Wed May 29 23:11:25 2002\nDate: Wed, 15 May 2002 23:25:52 -0700\nFrom: noreply@sourceforge.net\nTo: noreply@sourceforge.net\nSubject: [ ctags-Bugs-556645 ] Some typedef can not be tagged in C code\n\nBugs item #556645, was opened at 2002-05-16 14:25\nYou can respond by visiting: \nhttp://sourceforge.net/tracker/?func=detail&atid=106556&aid=556645&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Howard Wu (howardhbwu)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: Some typedef can not be tagged in C code\n\nInitial Comment:\nMy Ctags version:5.2.3\n\nThe typedef of \"Qtype\" as the following,\n\n*/\n#define A1(_type, _length) \\\nstruct { \\\n \t unsigned int head; \\\n \t unsigned int tail; \\\n \t bool is_full; \\\n \t _type queue[_length]; \\\n\t}\n\ntypedef A1(ilm_struct, 1) Qtype;\n\n/*\nAs using ctags, the \"Qtype\" can not be tagged by it.\n*/\n" }, { "path": "Units/parser-c.r/bug556646.c.d/expected.tags", "content": "A\tinput.c\t/^ A = INDX_T2$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_C1\tinput.c\t/^ INDX_C1,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_C2\tinput.c\t/^ INDX_C2,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_IM1\tinput.c\t/^ INDX_IM1,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_IM2\tinput.c\t/^ INDX_IM2,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_L\tinput.c\t/^ INDX_L,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_L2\tinput.c\t/^ INDX_L2,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_M\tinput.c\t/^ INDX_M,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_NIL\tinput.c\t/^ INDX_NIL = 0x00,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_P\tinput.c\t/^ INDX_P,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_R\tinput.c\t/^ INDX_R,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_R2\tinput.c\t/^ INDX_R2,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_S\tinput.c\t/^ INDX_S,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_S1\tinput.c\t/^ INDX_S1,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_S2\tinput.c\t/^ INDX_S2,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_S3\tinput.c\t/^ INDX_S3,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_S4\tinput.c\t/^ INDX_S4,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_T\tinput.c\t/^ INDX_T,$/;\"\te\tenum:__anone0aee1a10103\tfile:\nINDX_T2\tinput.c\t/^ INDX_T2,$/;\"\te\tenum:__anone0aee1a10103\tfile:\n__anone0aee1a10103\tinput.c\t/^typedef enum{$/;\"\tg\tfile:\ntask_indx_type\tinput.c\t/^} task_indx_type;$/;\"\tt\ttyperef:enum:__anone0aee1a10103\tfile:\n" }, { "path": "Units/parser-c.r/bug556646.c.d/input.c", "content": "/*\nBugs item #556646, was opened at 2002-05-16 14:36\nYou can respond by visiting: \nhttp://sourceforge.net/tracker/?func=detail&atid=106556&aid=556646&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Howard Wu (howardhbwu)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: Some typedef can not be tagged in C code\n\nInitial Comment:\nMy Ctags version: 5.2.3\n*/\ntypedef enum{\n INDX_NIL = 0x00,\n INDX_P,\n INDX_S,\n INDX_M,\n INDX_S1,\n INDX_S2,\n INDX_S3,\n INDX_C1,\n INDX_C2,\n INDX_S4,\n INDX_T,\n INDX_L,\n INDX_R,\n INDX_R2,\n INDX_IM1,\n INDX_IM2,\n INDX_L2,\n INDX_T2,\n A = INDX_T2\n} task_indx_type;\n\n/*\n\"task_indx_type\" can not be tagged with Ctags\n*/\n" }, { "path": "Units/parser-c.r/bug945.c.d/args.ctags", "content": "-I __read_mostly\n\n" }, { "path": "Units/parser-c.r/bug945.c.d/expected.tags", "content": "edsa_packet_type\tinput.c\t/^struct packet_type edsa_packet_type __read_mostly = {$/;\"\tv\ttyperef:struct:packet_type\n" }, { "path": "Units/parser-c.r/bug945.c.d/input.c", "content": "/*\n Bug 945@github reported by masatake on 21/05/2016.\n The code below was treated as a struct declaration instead\n of variable declaration.\n*/\n\n/* Taken from linux-3.10.0-229.fc21.x86_64/net/dsa/tag_edsa.c */\nstruct packet_type edsa_packet_type __read_mostly = {\n\t.type\t= cpu_to_be16(ETH_P_EDSA),\n\t.func\t= edsa_rcv,\n};\n" }, { "path": "Units/parser-c.r/bug950.c.d/args.ctags", "content": "--kinds-c=p\n--fields=+tS\n" }, { "path": "Units/parser-c.r/bug950.c.d/expected.tags", "content": "IdentifyImageMonochrome\tinput.c\t/^ IdentifyImageMonochrome(const Image *,ExceptionInfo *),$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(const Image *,ExceptionInfo *)\nIsGrayImage\tinput.c\t/^ IsGrayImage(const Image *,ExceptionInfo *),$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(const Image *,ExceptionInfo *)\nIsMonochromeImage\tinput.c\t/^ IsMonochromeImage(const Image *,ExceptionInfo *),$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(const Image *,ExceptionInfo *)\nIsOpaqueImage\tinput.c\t/^ IsOpaqueImage(const Image *,ExceptionInfo *),$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(const Image *,ExceptionInfo *)\nSetImageChannelDepth\tinput.c\t/^ SetImageChannelDepth(Image *,const ChannelType,const size_t),$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(Image *,const ChannelType,const size_t)\nSetImageDepth\tinput.c\t/^ SetImageDepth(Image *,const size_t),$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(Image *,const size_t)\nSetImageType\tinput.c\t/^ SetImageType(Image *,const ImageType);$/;\"\tp\ttyperef:typename:MagickExport MagickBooleanType\tfile:\tsignature:(Image *,const ImageType)\n" }, { "path": "Units/parser-c.r/bug950.c.d/input.c", "content": "/*\n Bug 931@github reported by lvc on 24/05/2016.\n \n The latest version (9320ecf) of the universal ctags failed to recognize\n SetImageChannelDepth symbol in the ImageMagick library header file\n (include/ImageMagick-6/magick/attribute.h, v6.9.4-4):\n \n In fact only the last function prototype was extracted and everything\n else was treated as a giant return type.\n*/\n\nextern MagickExport MagickBooleanType\n IdentifyImageMonochrome(const Image *,ExceptionInfo *),\n IsGrayImage(const Image *,ExceptionInfo *),\n IsMonochromeImage(const Image *,ExceptionInfo *),\n IsOpaqueImage(const Image *,ExceptionInfo *),\n SetImageChannelDepth(Image *,const ChannelType,const size_t),\n SetImageDepth(Image *,const size_t),\n SetImageType(Image *,const ImageType);\n " }, { "path": "Units/parser-c.r/c-define-mixed.d/args.ctags", "content": "--excmd=mixed\n--fields=+n\n" }, { "path": "Units/parser-c.r/c-define-mixed.d/expected.tags", "content": "X\tinput.c\t/^#define X /;\"\td\tline:1\tfile:\nY\tinput.c\t/^#define Y(/;\"\td\tline:6\tfile:\n" }, { "path": "Units/parser-c.r/c-define-mixed.d/input.c", "content": "#define X 1\n/* 2 */\n/* 3 */\n/* 4 */\n/* 5 */\n#define Y(v) (6 + v)\n/* 7 */\n" }, { "path": "Units/parser-c.r/c-digraphs.d/expected.tags", "content": "A\tinput.c\t/^%:define A /;\"\td\tfile:\nB\tinput.c\t/^%:define B /;\"\td\tfile:\nM3_INIT\tinput.c\t/^%:define M3_INIT(/;\"\td\tfile:\nSTRINGIFY\tinput.c\t/^%:define STRINGIFY(x) STRINGIFY_/;\"\td\tfile:\nSTRINGIFY_INTERN\tinput.c\t/^%:define STRINGIFY_INTERN(/;\"\td\tfile:\nbuf\tinput.c\t/^ char *buf;$/;\"\tm\tstruct:str\ttyperef:typename:char *\tfile:\nlen\tinput.c\t/^ unsigned int len, size;$/;\"\tm\tstruct:str\ttyperef:typename:unsigned int\tfile:\nmain\tinput.c\t/^int main(void)$/;\"\tf\ttyperef:typename:int\nmatrix3\tinput.c\t/^typedef int matrix3<:3:>;$/;\"\tt\ttyperef:typename:int[3]\tfile:\nsize\tinput.c\t/^ unsigned int len, size;$/;\"\tm\tstruct:str\ttyperef:typename:unsigned int\tfile:\nstr\tinput.c\t/^struct str <%$/;\"\ts\tfile:\n" }, { "path": "Units/parser-c.r/c-digraphs.d/input.c", "content": "\n/* simple trigraphs */\n%:define A 1\n%:define B 2\n%:define STRINGIFY_INTERN(x) %:x\n%:define STRINGIFY(x) STRINGIFY_INTERN(x)\n\n%:define M3_INIT(a, b, c) <% a, b, c %>\ntypedef int matrix3<:3:>;\n\nstruct str <%\n char *buf;\n unsigned int len, size;\n%>;\n\nint main(void)\n<%\n const char *hello = STRINGIFY(hello);\n matrix3 m = M3_INIT(1, 2, 3);\n\n return m<:2:>;\n%>\n\n%:if 0\n#define bug4\n%:endif\n\n\n/* test the same with untaken preprocessor paths (as they are then not read by\n * the C parser but get.c) */\n#if 0\n%:define if0d_A 1\n%:define if0d_B 2\n#endif\n\n" }, { "path": "Units/parser-c.r/c-include.d/args.ctags", "content": "--kinds-c=+h\n--fields=+r\n--extras=+r\n" }, { "path": "Units/parser-c.r/c-include.d/expected.tags", "content": "../e.h\tinput.c\t/^#include <..\\/e.h>/;\"\th\troles:system\n../f.h\tinput.c\t/^#include \"..\\/f.h\"/;\"\th\troles:local\nD\tinput.c\t/^#define D /;\"\td\tfile:\troles:def\na.h\tinput.c\t/^#include /;\"\th\troles:system\nb.h\tinput.c\t/^#include \"b.h\"/;\"\th\troles:local\ng.h\tinput.c\t/^#include/;\"\th\troles:system\nh.h\tinput.c\t/^#include\"h.h\"/;\"\th\troles:local\ni.h\tinput.c\t/^#include /;\"\th\troles:system\nj.h\tinput.c\t/^#include \"j.h\"/;\"\th\troles:local\nstdio.h\tinput.c\t/^ # \tinclude /;\"\th\troles:system\nsys/c.h\tinput.c\t/^#include /;\"\th\troles:system\nsys/d.h\tinput.c\t/^#include \"sys\\/d.h\"/;\"\th\troles:local\n" }, { "path": "Units/parser-c.r/c-include.d/input.c", "content": "#include \n#include \"b.h\"\n\n#include \n#include \"sys/d.h\"\n\n/* this is actually a syntax error */\n\"\n#include \n#include \\\"L.h\\\"\n\"\n\n#include <../e.h>\n#include \"../f.h\"\n\nint\nM(void)\n{\n return 0;\n}\n\n#define D 1\n\n#include\n#include\"h.h\"\n\n#include \n#include \"j.h\"\n\n # \tinclude \n/* objc constant String */\n@\"#include\"\n" }, { "path": "Units/parser-c.r/c-keyword-alignas.d/args.ctags", "content": "--sort=no\n--kinds-C=+l\n" }, { "path": "Units/parser-c.r/c-keyword-alignas.d/expected.tags", "content": "sse_t\tinput.c\t/^struct sse_t$/;\"\ts\tfile:\nsse_data\tinput.c\t/^ alignas(16) float sse_data[4];$/;\"\tm\tstruct:sse_t\ttyperef:typename:float[4]\tfile:\nsse_data_\tinput.c\t/^ _Alignas(16) float sse_data_[4];$/;\"\tm\tstruct:sse_t\ttyperef:typename:float[4]\tfile:\ndata\tinput.c\t/^struct data$/;\"\ts\tfile:\nx\tinput.c\t/^ char x;$/;\"\tm\tstruct:data\ttyperef:typename:char\tfile:\ncacheline\tinput.c\t/^ alignas(128) char cacheline[128]; \\/\\/ over-aligned array of char,$/;\"\tm\tstruct:data\ttyperef:typename:char[128]\tfile:\ncacheline_\tinput.c\t/^ _Alignas(128) char cacheline_[128];$/;\"\tm\tstruct:data\ttyperef:typename:char[128]\tfile:\nmain\tinput.c\t/^int main(void)$/;\"\tf\ttyperef:typename:int\nd\tinput.c\t/^ alignas(2048) struct data d; \\/\\/ this instance of data is aligned even stricter$/;\"\tl\tfunction:main\ttyperef:struct:data\tfile:\nd_\tinput.c\t/^ _Alignas(2048) struct data d_;$/;\"\tl\tfunction:main\ttyperef:struct:data\tfile:\n" }, { "path": "Units/parser-c.r/c-keyword-alignas.d/input.c", "content": "/* Taken from https://en.cppreference.com/w/c/language/_Alignas */\n#include \n#include \n\n// every object of type struct sse_t will be aligned to 16-byte boundary\n// (note: needs support for DR 444)\nstruct sse_t\n{\n alignas(16) float sse_data[4];\n _Alignas(16) float sse_data_[4];\n};\n\n// every object of type struct data will be aligned to 128-byte boundary\nstruct data\n{\n char x;\n alignas(128) char cacheline[128]; // over-aligned array of char,\n // not array of over-aligned chars\n _Alignas(128) char cacheline_[128];\n\n};\n\nint main(void)\n{\n printf(\"sizeof(data) = %zu (1 byte + 127 bytes padding + 128-byte array)\\n\",\n sizeof(struct data));\n\n printf(\"alignment of sse_t is %zu\\n\", alignof(struct sse_t));\n\n alignas(2048) struct data d; // this instance of data is aligned even stricter\n _Alignas(2048) struct data d_;\n (void)d; // suppresses \"maybe unused\" warning\n}\n" }, { "path": "Units/parser-c.r/c-knr.d/args.ctags", "content": "--kinds-c=fz\n\n" }, { "path": "Units/parser-c.r/c-knr.d/expected.tags", "content": "f01\tinput.c\t/^int f01()$/;\"\tf\ttyperef:typename:int\nf02\tinput.c\t/^int f02(f02a01,f02a02)$/;\"\tf\nf02a01\tinput.c\t/^ int f02a01;$/;\"\tz\tfunction:f02\ttyperef:typename:int\tfile:\nf02a02\tinput.c\t/^ int f02a02;$/;\"\tz\tfunction:f02\ttyperef:typename:int\tfile:\nf03\tinput.c\t/^int f03(void)$/;\"\tf\ttyperef:typename:int\nf04\tinput.c\t/^int f04(...)$/;\"\tf\ttyperef:typename:int\nf05\tinput.c\t/^int f05($/;\"\tf\nf05a01\tinput.c\t/^\tunsigned short f05a01;$/;\"\tz\tfunction:f05\ttyperef:typename:unsigned short\tfile:\nf05a02\tinput.c\t/^\tint * f05a02;$/;\"\tz\tfunction:f05\ttyperef:typename:int *\tfile:\nf06\tinput.c\t/^int f06(f06a01,f06a02)$/;\"\tf\nf06a01\tinput.c\t/^\tunsigned short int f06a01, ** f06a02;$/;\"\tz\tfunction:f06\ttyperef:typename:unsigned short int\tfile:\nf06a02\tinput.c\t/^\tunsigned short int f06a01, ** f06a02;$/;\"\tz\tfunction:f06\ttyperef:typename:unsigned short int **\tfile:\n" }, { "path": "Units/parser-c.r/c-knr.d/input.c", "content": "int f01()\n{\n\treturn 0;\n}\n\nint f02(f02a01,f02a02)\n int f02a01;\n int f02a02;\n{\n\treturn f02a01 + f02a02;\n}\n\nint f03(void)\n{\n\treturn 0;\n}\n\nint f04(...)\n{\n\treturn 0;\n}\n\nint f05(\n\t\tf05a01,\n\t\tf05a02,\n\t\t...\n\t)\n\tunsigned short f05a01;\n\tint * f05a02;\n{\n\treturn 0;\n}\n\nint f06(f06a01,f06a02)\n\tunsigned short int f06a01, ** f06a02;\n{\n\treturn 0;\n}\n\n" }, { "path": "Units/parser-c.r/c-label.d/args.ctags", "content": "--kinds-c=+L\n" }, { "path": "Units/parser-c.r/c-label.d/expected.tags", "content": "main\tinput.c\t/^main(int argc)$/;\"\tf\ttyperef:typename:int\nout\tinput.c\t/^ out:$/;\"\tL\tfunction:main\tfile:\n" }, { "path": "Units/parser-c.r/c-label.d/input.c", "content": "int\nmain(int argc)\n{\n goto out;\n switch (argc)\n {\n case 1:\n break;\n case A|B:\n break;\n default:\n break;\n }\n out:\n return 0;\n}\n" }, { "path": "Units/parser-c.r/c-multichars-between-single-quotes.d/expected.tags", "content": "c\tinput.c\t/^char c[]={'o.'};$/;\"\tv\ttyperef:typename:char[]\n" }, { "path": "Units/parser-c.r/c-multichars-between-single-quotes.d/input.c", "content": "char c[]={'o.'};\n" }, { "path": "Units/parser-c.r/c-sample.d/expected.tags", "content": "main\tinput.c\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/c-sample.d/input.c", "content": "int\nmain(void)\n{\n return 0;\n}\n" }, { "path": "Units/parser-c.r/c-size_t-wchar_t-typedef.d/expected.tags", "content": "size_t\tinput.c\t/^typedef int size_t;$/;\"\tt\ttyperef:typename:int\tfile:\nwchar_t\tinput.c\t/^typedef int wchar_t;$/;\"\tt\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-c.r/c-size_t-wchar_t-typedef.d/input.c", "content": "\ntypedef int size_t;\ntypedef int wchar_t;\n" }, { "path": "Units/parser-c.r/c-struct-var-with-initializer.d/args.ctags", "content": "--sort=no\n--kinds-c=+lz\n--fields=+K\n" }, { "path": "Units/parser-c.r/c-struct-var-with-initializer.d/expected.tags", "content": "__anon61565e570108\tinput.c\t/^struct {$/;\"\tstruct\tfile:\na\tinput.c\t/^ int a;$/;\"\tmember\tstruct:__anon61565e570108\ttyperef:typename:int\tfile:\nb\tinput.c\t/^} b = { 1 };$/;\"\tvariable\ttyperef:struct:__anon61565e570108\nc\tinput.c\t/^int c;$/;\"\tvariable\ttyperef:typename:int\nd\tinput.c\t/^int d(int e) {$/;\"\tfunction\ttyperef:typename:int\ne\tinput.c\t/^int d(int e) {$/;\"\tparameter\tfunction:d\ttyperef:typename:int\tfile:\n__anon61565e570208\tinput.c\t/^ struct {$/;\"\tstruct\tfunction:d\tfile:\nf\tinput.c\t/^ int f;$/;\"\tmember\tstruct:d::__anon61565e570208\ttyperef:typename:int\tfile:\ng\tinput.c\t/^ } g = { 1 };$/;\"\tlocal\tfunction:d\ttyperef:struct:d::__anon61565e570208\tfile:\nh\tinput.c\t/^ int h;$/;\"\tlocal\tfunction:d\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-c.r/c-struct-var-with-initializer.d/input.c", "content": "/* Derived from an issue (#1311) opened by BodoStroesser */\n\nstruct {\n int a;\n} b = { 1 };\n\nint c;\n\nint d(int e) {\n struct {\n int f;\n } g = { 1 };\n int h;\n g = (typeof(g)){ 2 };\n}\n" }, { "path": "Units/parser-c.r/c-trigraphs.d/expected.tags", "content": "A\tinput.c\t/^??=define A /;\"\td\tfile:\nB\tinput.c\t/^??=define B /;\"\td\tfile:\nD\tinput.c\t/^??=define D /;\"\td\tfile:\nE\tinput.c\t/^??=define E /;\"\td\tfile:\nF\tinput.c\t/^??=define F /;\"\td\tfile:\nM3_INIT\tinput.c\t/^??=define M3_INIT(/;\"\td\tfile:\nSTRINGIFY\tinput.c\t/^??=define STRINGIFY(x) STRINGIFY_/;\"\td\tfile:\nSTRINGIFY_INTERN\tinput.c\t/^??=define STRINGIFY_INTERN(/;\"\td\tfile:\nbuf\tinput.c\t/^ char *buf;$/;\"\tm\tstruct:str\ttyperef:typename:char *\tfile:\nlen\tinput.c\t/^ unsigned int len, size;$/;\"\tm\tstruct:str\ttyperef:typename:unsigned int\tfile:\nmain\tinput.c\t/^int main(void)$/;\"\tf\ttyperef:typename:int\nmatrix3\tinput.c\t/^typedef int matrix3??(3??);$/;\"\tt\ttyperef:typename:int[3]\tfile:\nsize\tinput.c\t/^ unsigned int len, size;$/;\"\tm\tstruct:str\ttyperef:typename:unsigned int\tfile:\nstr\tinput.c\t/^struct str ??<$/;\"\ts\tfile:\n" }, { "path": "Units/parser-c.r/c-trigraphs.d/input.c", "content": "\n/* simple trigraphs */\n??=define A 1\n??=define B 2\n??=define STRINGIFY_INTERN(x) ??=x\n??=define STRINGIFY(x) STRINGIFY_INTERN(x)\n\n/* doesn't expand to anything that makes sense, but as \"???\" is not a valid\n * trigraph it should not prevent \"??/\" to match */\n??=define D 4 ???/\n#define bug1\n??=define E ?????/\n#define bug2\n\n/* \\ isn't interpreted for trigraphs */\n??=define F ???\\??/\nextern int bug3 = ??-0;\n\n??=define M3_INIT(a, b, c) ??< a, b, c ??>\ntypedef int matrix3??(3??);\n\nstruct str ??<\n char *buf;\n unsigned int len, size;\n??>;\n\nint main(void)\n??<\n const char *hello = STRINGIFY(hello);\n matrix3 m = M3_INIT(1, 2, 3);\n\n return m??(2??);\n??>\n\n/* FIXME: how to test \"??'\" (\"^\"), \"??!\" (\"|\") and \"??-\" (\"~\")?\n * I can't think of a construct CTags cares about using those */\n\n??=if 0\n#define bug4\n??=endif\n\n\n/* test the same with untaken preprocessor paths (as they are then not read by\n * the C parser but get.c) */\n#if 0\n\n??=define if0d_A 1\n??=define if0d_B 2\n??=define if0d_C 4 ???/\n#define bug5\n??=define I ?????/\n#define bug6\n??=define I ??????????/\n#define bug7\n\n#endif\n" }, { "path": "Units/parser-c.r/c-var-initialized-using-macro.d/args.ctags", "content": "--sort=no\n--kinds-C=+lp\n" }, { "path": "Units/parser-c.r/c-var-initialized-using-macro.d/expected.tags", "content": "INIT\tinput.c\t/^#define INIT(/;\"\td\tfile:\ni\tinput.c\t/^static const int i = INIT(2);$/;\"\tv\ttyperef:typename:const int\tfile:\nj\tinput.c\t/^int j;$/;\"\tv\ttyperef:typename:int\nk\tinput.c\t/^int k = 1;$/;\"\tv\ttyperef:typename:int\nf\tinput.c\t/^int f(void)$/;\"\tf\ttyperef:typename:int\nl\tinput.c\t/^\tint l = INIT(3);$/;\"\tl\tfunction:f\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-c.r/c-var-initialized-using-macro.d/input.c", "content": "#define INIT(x) x\n\nstatic const int i = INIT(2);\nint j;\nint k = 1;\n\nint f(void)\n{\n\tint l = INIT(3);\n\treturn l + k + j + i;\n}\n" }, { "path": "Units/parser-c.r/complex_decl.c.d/expected.tags", "content": "ScanAction\tinput.c\t/^static void (* const(ScanAction[5][5]))(void *)= {};$/;\"\tv\ttyperef:typename:void (* const ([5][5]))(void *)\tfile:\n" }, { "path": "Units/parser-c.r/complex_decl.c.d/input.c", "content": "/* Complex declarations */\nstatic void (* const(ScanAction[5][5]))(void *)= {};\n" }, { "path": "Units/parser-c.r/cxx-keywords-simple.d/args.ctags", "content": "--sort=no\n--kinds-C=+p\n--fields=+K\n" }, { "path": "Units/parser-c.r/cxx-keywords-simple.d/expected.tags", "content": "private\tinput.h\t/^struct private {int x;} v24;$/;\"\tstruct\nx\tinput.h\t/^struct private {int x;} v24;$/;\"\tmember\tstruct:private\ttyperef:typename:int\nv24\tinput.h\t/^struct private {int x;} v24;$/;\"\tvariable\ttyperef:struct:private\nprotected\tinput.h\t/^struct protected {int x;} v25;$/;\"\tstruct\nx\tinput.h\t/^struct protected {int x;} v25;$/;\"\tmember\tstruct:protected\ttyperef:typename:int\nv25\tinput.h\t/^struct protected {int x;} v25;$/;\"\tvariable\ttyperef:struct:protected\npublic\tinput.h\t/^struct public {int x;} v26;$/;\"\tstruct\nx\tinput.h\t/^struct public {int x;} v26;$/;\"\tmember\tstruct:public\ttyperef:typename:int\nv26\tinput.h\t/^struct public {int x;} v26;$/;\"\tvariable\ttyperef:struct:public\ns24\tinput.h\t/^struct s24 {int private;} ;$/;\"\tstruct\nprivate\tinput.h\t/^struct s24 {int private;} ;$/;\"\tmember\tstruct:s24\ttyperef:typename:int\ns25\tinput.h\t/^struct s25 {int protected;} ;$/;\"\tstruct\nprotected\tinput.h\t/^struct s25 {int protected;} ;$/;\"\tmember\tstruct:s25\ttyperef:typename:int\ns26\tinput.h\t/^struct s26 {int public;} ;$/;\"\tstruct\npublic\tinput.h\t/^struct s26 {int public;} ;$/;\"\tmember\tstruct:s26\ttyperef:typename:int\nprivate\tinput.h\t/^typedef int private; \\/* 24 *\\/$/;\"\ttypedef\ttyperef:typename:int\nprotected\tinput.h\t/^typedef int protected; \\/* 25 *\\/$/;\"\ttypedef\ttyperef:typename:int\npublic\tinput.h\t/^typedef int public; \\/* 26 *\\/$/;\"\ttypedef\ttyperef:typename:int\nv24\tinput.h\t/^int v24, private;$/;\"\tvariable\ttyperef:typename:int\nprivate\tinput.h\t/^int v24, private;$/;\"\tvariable\ttyperef:typename:int\nv25\tinput.h\t/^int v25, protected;$/;\"\tvariable\ttyperef:typename:int\nprotected\tinput.h\t/^int v25, protected;$/;\"\tvariable\ttyperef:typename:int\nv26\tinput.h\t/^int v26, public;$/;\"\tvariable\ttyperef:typename:int\npublic\tinput.h\t/^int v26, public;$/;\"\tvariable\ttyperef:typename:int\nprivate\tinput.h\t/^int private (int a24);$/;\"\tprototype\ttyperef:typename:int\nprotected\tinput.h\t/^int protected (int a25);$/;\"\tprototype\ttyperef:typename:int\npublic\tinput.h\t/^int public (int a26);$/;\"\tprototype\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/cxx-keywords-simple.d/input.h", "content": "struct private {int x;} v24;\nstruct protected {int x;} v25;\nstruct public {int x;} v26;\nstruct s24 {int private;} ;\nstruct s25 {int protected;} ;\nstruct s26 {int public;} ;\ntypedef int private; /* 24 */\ntypedef int protected; /* 25 */\ntypedef int public; /* 26 */\nint v24, private;\nint v25, protected;\nint v26, public;\nint private (int a24);\nint protected (int a25);\nint public (int a26);\n" }, { "path": "Units/parser-c.r/cxx-scope-keywords.d/args.ctags", "content": "--sort=no\n--kinds-C=+L\n--fields=+K\n" }, { "path": "Units/parser-c.r/cxx-scope-keywords.d/expected.tags", "content": "data0\tinput.h\t/^struct data0 {$/;\"\tstruct\nprivate\tinput.h\t/^\tvoid *private;$/;\"\tmember\tstruct:data0\ttyperef:typename:void *\npublic\tinput.h\t/^\tvoid *public;$/;\"\tmember\tstruct:data0\ttyperef:typename:void *\nprotected\tinput.h\t/^\tvoid *protected;$/;\"\tmember\tstruct:data0\ttyperef:typename:void *\ndata1\tinput.h\t/^struct data1 {$/;\"\tstruct\nprivate\tinput.h\t/^\tvoid *private\\/* comment *\\/;$/;\"\tmember\tstruct:data1\ttyperef:typename:void *\npublic\tinput.h\t/^\tvoid *public\\/* comment$/;\"\tmember\tstruct:data1\ttyperef:typename:void *\nprotected\tinput.h\t/^\tvoid *protected \\/* comment$/;\"\tmember\tstruct:data1\ttyperef:typename:void *\ndata2\tinput.h\t/^struct data2 {$/;\"\tstruct\nprivate\tinput.h\t/^\tvoid *private ;$/;\"\tmember\tstruct:data2\ttyperef:typename:void *\npublic\tinput.h\t/^\tint public:1 ;$/;\"\tmember\tstruct:data2\ttyperef:typename:int:1\nprotected\tinput.h\t/^\tvoid *protected __attribute__ ((aligned (8))) ;$/;\"\tmember\tstruct:data2\ttyperef:typename:void *\nfoo\tinput.h\t/^void foo(void) {$/;\"\tfunction\ttyperef:typename:void\nprivate\tinput.h\t/^private:$/;\"\tlabel\tfunction:foo\tfile:\nbar\tinput.h\t/^void bar(void) {$/;\"\tfunction\ttyperef:typename:void\nprivate\tinput.h\t/^private :$/;\"\tlabel\tfunction:bar\tfile:\nbaz\tinput.h\t/^void baz(void) {$/;\"\tfunction\ttyperef:typename:void\nprivate\tinput.h\t/^ private\\/* coment *\\/:$/;\"\tlabel\tfunction:baz\tfile:\nprivate\tinput.h\t/^int private;$/;\"\tvariable\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/cxx-scope-keywords.d/input.h", "content": "struct data0 {\n\tvoid *private;\n\tvoid *public;\n\tvoid *protected;\n};\n\nstruct data1 {\n\tvoid *private/* comment */;\n\tvoid *public/* comment\n\t\t\t\t */ ;\n\tvoid *protected /* comment\n\t\t\t\t\t */;\n};\n\nstruct data2 {\n\tvoid *private ;\n\tint public:1 ;\n\tvoid *protected __attribute__ ((aligned (8))) ;\n};\n\nvoid foo(void) {\n goto private;\nprivate:\n return;\n}\n\nvoid bar(void) {\n goto private ;\nprivate :\n return;\n}\n\nvoid baz(void) {\n\tgoto private/* comment */;\n private/* coment */:\n return;\n}\n\nint private;\n" }, { "path": "Units/parser-c.r/directives-2.c.d/args.ctags", "content": "--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-c.r/directives-2.c.d/expected.tags", "content": "func\tinput.c\t/^int func()$/;\"\tf\ttyperef:typename:int\troles:def\nmain\tinput.c\t/^int main()$/;\"\tf\ttyperef:typename:int\troles:def\n" }, { "path": "Units/parser-c.r/directives-2.c.d/input.c", "content": "int main()\n{\n if (something) {\n printf(\"hello\");\n#ifdef world\n } else\n printf(\" world\\n\");\n#else\n }\n#endif\n}\n\nint func()\n{\n}\n" }, { "path": "Units/parser-c.r/directives.c.d/README", "content": "About the expected output, see #379.\n" }, { "path": "Units/parser-c.r/directives.c.d/args.ctags", "content": "--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-c.r/directives.c.d/expected.tags", "content": "FUNCTION_LIKE\tinput.c\t/^#define FUNCTION_LIKE(/;\"\td\tfile:\troles:def\nMACRO_TO_SEE1\tinput.c\t/^# define MACRO_TO_SEE1 /;\"\td\tfile:\troles:def\nMACRO_TO_SEE1\tinput.c\t/^#undef MACRO_TO_SEE1$/;\"\td\tfile:\troles:undef\nMACRO_TO_SEE2\tinput.c\t/^# define MACRO_TO_SEE2 /;\"\td\tfile:\troles:def\nMACRO_TO_SEE3\tinput.c\t/^# define MACRO_TO_SEE3 /;\"\td\tfile:\troles:def\nMACRO_TO_SEE4\tinput.c\t/^# define MACRO_TO_SEE4 /;\"\td\tfile:\troles:def\nPATH1\tinput.c\t/^#define PATH1$/;\"\td\tfile:\troles:def\nPATH1b\tinput.c\t/^#define PATH1b$/;\"\td\tfile:\troles:def\nSEE_THIS_MACRO\tinput.c\t/^# define SEE_THIS_MACRO /;\"\td\tfile:\troles:def\nVARIABLE_LIKE\tinput.c\t/^#define VARIABLE_LIKE\t/;\"\td\tfile:\troles:def\nWeakSymbol\tinput.c\t/^#pragma weak WeakSymbol /;\"\td\tfile:\troles:def\na\tinput.c\t/^int a;$/;\"\tv\ttyperef:typename:int\troles:def\nb\tinput.c\t/^int b;$/;\"\tv\ttyperef:typename:int\troles:def\nbar1\tinput.c\t/^int bar1 (void)$/;\"\tf\ttyperef:typename:int\troles:def\nc\tinput.c\t/^int c;$/;\"\tv\ttyperef:typename:int\troles:def\nd\tinput.c\t/^int d;$/;\"\tv\ttyperef:typename:int\troles:def\nfoo1\tinput.c\t/^int foo1 (void)$/;\"\tf\ttyperef:typename:int\troles:def\ng\tinput.c\t/^int g;$/;\"\tv\ttyperef:typename:int\troles:def\np1\tinput.c\t/^int p1;$/;\"\tv\ttyperef:typename:int\troles:def\nwith_long_comment\tinput.c\t/^#define with_long_comment /;\"\td\tfile:\troles:def\nz_this_branch_is_chosen\tinput.c\t/^#define z_this_branch_is_chosen /;\"\td\tfile:\troles:def\n" }, { "path": "Units/parser-c.r/directives.c.d/input.c", "content": "/* Test simple cases */\n#define VARIABLE_LIKE\tsome_value\n#define FUNCTION_LIKE(a,b) (a + b)\n#pragma weak WeakSymbol = StrongSymbol\n\n#define with_long_comment /* line 1\n\t\t\t line 2 */\n\n/* Test usual case */\n#ifdef MY_MACRO\n# define MACRO_TO_SEE1 1\nint a;\n#elif YOUR_MACRO\n# define MACRO_TO_SEE2 2\nint b;\n#elif defined (THEIR_MACRO)\n# define MACRO_TO_SEE3 3\nint c;\n#else\n# define MACRO_TO_SEE4 4\nint d;\n#endif\n\n/* Test commented-out case */\n#if 0\n#define IGNORE_MACRO\nint e;\n# if 0\n# define ANOTHER_IGNORE_MACRO\nint f;\n# else\n# define YAIM\n# endif\n#else\n# define SEE_THIS_MACRO 1\nint g;\n#endif\n\n/* Test path selection algorithm */\n#ifdef OK\n#define PATH1\nint foo1 (void)\n{\n#define z_this_branch_is_chosen 0\n#elif defined (OK)\n#define PATH2\nint foo2 (void)\n{\n#else\n#define PATH3\nint foo3 (void)\n{\n#endif\n}\n\nint bar1 (void)\n{\n#ifdef OK\n#define PATH1b\n}\nint p1;\n#elif defined (OK)\n#define PATH2b\n}\nint p2;\n#else\n#define PATH3b\n}\nint p3;\n#endif\n#undef MACRO_TO_SEE1\n\n" }, { "path": "Units/parser-c.r/end-field-of-macro.d/args.ctags", "content": "--fields-all=+{end}\n--fields=+{line}\n" }, { "path": "Units/parser-c.r/end-field-of-macro.d/expected.tags", "content": "F\tinput.c\t/^#define F(/;\"\td\tline:1\tfile:\tend:1\nG\tinput.c\t/^#define G$/;\"\td\tline:2\tfile:\tend:2\nZ\tinput.c\t/^#define Z(/;\"\td\tline:4\tfile:\tend:8\n" }, { "path": "Units/parser-c.r/end-field-of-macro.d/input.c", "content": "#define F(X) X\n#define G\n#include \n#define Z(Y)\t\t\t\t\t\\\nint main (void)\t\t\t\t\t\\\n{\t\t\t\t\t\t\\\n return 0;\t\t\t\t\t\\\n}\n" }, { "path": "Units/parser-c.r/end-field-of-var.d/args.ctags", "content": "--sort=no\n--fields=+ne\n" }, { "path": "Units/parser-c.r/end-field-of-var.d/expected.tags", "content": "n\tinput.c\t/^int n [2] = {$/;\"\tv\tline:1\ttyperef:typename:int[2]\tend:4\nm0\tinput.c\t/^int m0 [2] = {$/;\"\tv\tline:7\ttyperef:typename:int[2]\tend:10\nm1\tinput.c\t/^}, m1 [3] = {$/;\"\tv\tline:10\ttyperef:typename:int[3]\tend:14\npoint\tinput.c\t/^struct point {$/;\"\ts\tline:16\tfile:\tend:18\nx\tinput.c\t/^\tint x, y;$/;\"\tm\tline:17\tstruct:point\ttyperef:typename:int\tfile:\tend:17\ny\tinput.c\t/^\tint x, y;$/;\"\tm\tline:17\tstruct:point\ttyperef:typename:int\tfile:\tend:17\nP\tinput.c\t/^struct point P = {$/;\"\tv\tline:20\ttyperef:struct:point\tend:23\n" }, { "path": "Units/parser-c.r/end-field-of-var.d/input.c", "content": "int n [2] = {\n\t1,\n\t2,\n};\n\n\nint m0 [2] = {\n\t3,\n\t4,\n}, m1 [3] = {\n\t5,\n\t6,\n\t8,\n};\n\nstruct point {\n\tint x, y;\n};\n\nstruct point P = {\n\t.x = 1,\n\t.y = 2,\n};\n" }, { "path": "Units/parser-c.r/enum-bit-fields.d/args.ctags", "content": "--sort=no\n--fields-C=+{macrodef}\n--param-CPreProcessor._expand=1\n--fields=+{signature}\n" }, { "path": "Units/parser-c.r/enum-bit-fields.d/expected.tags", "content": "s0\tinput.c\t/^struct s0 {$/;\"\ts\tfile:\n__anon4724ae570103\tinput.c\t/^\tenum {ID0} e0:1;$/;\"\tg\tstruct:s0\tfile:\nID0\tinput.c\t/^\tenum {ID0} e0:1;$/;\"\te\tenum:s0::__anon4724ae570103\tfile:\ne0\tinput.c\t/^\tenum {ID0} e0:1;$/;\"\tm\tstruct:s0\ttyperef:enum:s0::__anon4724ae570103:1\tfile:\nx0\tinput.c\t/^\tint x0;$/;\"\tm\tstruct:s0\ttyperef:typename:int\tfile:\nE1\tinput.c\t/^enum E1 {ID1};$/;\"\tg\tfile:\nID1\tinput.c\t/^enum E1 {ID1};$/;\"\te\tenum:E1\tfile:\ns1\tinput.c\t/^struct s1 {$/;\"\ts\tfile:\ne1\tinput.c\t/^\tenum E1 e1:1;$/;\"\tm\tstruct:s1\ttyperef:enum:E1:1\tfile:\nx1\tinput.c\t/^\tint x1;$/;\"\tm\tstruct:s1\ttyperef:typename:int\tfile:\ns2\tinput.c\t/^struct s2 {$/;\"\ts\tfile:\nE2\tinput.c\t/^\tenum E2 {ID2} e2:1;$/;\"\tg\tstruct:s2\tfile:\nID2\tinput.c\t/^\tenum E2 {ID2} e2:1;$/;\"\te\tenum:s2::E2\tfile:\ne2\tinput.c\t/^\tenum E2 {ID2} e2:1;$/;\"\tm\tstruct:s2\ttyperef:enum:s2::E2:1\tfile:\nx2\tinput.c\t/^\tint x2;$/;\"\tm\tstruct:s2\ttyperef:typename:int\tfile:\nE3\tinput.c\t/^enum E3 {ID3};$/;\"\tg\tfile:\nID3\tinput.c\t/^enum E3 {ID3};$/;\"\te\tenum:E3\tfile:\ns3\tinput.c\t/^struct s3 {$/;\"\ts\tfile:\ne3\tinput.c\t/^\tenum E3 e3:1;$/;\"\tm\tstruct:s3\ttyperef:enum:E3:1\tfile:\nx3\tinput.c\t/^\tint x3;$/;\"\tm\tstruct:s3\ttyperef:typename:int\tfile:\nE4\tinput.c\t/^enum E4 {ID4};$/;\"\tg\tfile:\nID4\tinput.c\t/^enum E4 {ID4};$/;\"\te\tenum:E4\tfile:\nbits\tinput.c\t/^#define bits /;\"\td\tfile:\tmacrodef:7\ns4\tinput.c\t/^struct s4 {$/;\"\ts\tfile:\ne4_1\tinput.c\t/^\tenum E4 e4_1:1, e4_2:2, e4_3:bits;$/;\"\tm\tstruct:s4\ttyperef:enum:E4:1\tfile:\ne4_2\tinput.c\t/^\tenum E4 e4_1:1, e4_2:2, e4_3:bits;$/;\"\tm\tstruct:s4\ttyperef:enum:E4:2\tfile:\ne4_3\tinput.c\t/^\tenum E4 e4_1:1, e4_2:2, e4_3:bits;$/;\"\tm\tstruct:s4\ttyperef:enum:E4:7\tfile:\nx4\tinput.c\t/^\tint x4;$/;\"\tm\tstruct:s4\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-c.r/enum-bit-fields.d/input.c", "content": "struct s0 {\n\tenum {ID0} e0:1;\n\tint x0;\n};\n\nenum E1 {ID1};\nstruct s1 {\n\tenum E1 e1:1;\n\tint x1;\n};\n\nstruct s2 {\n\tenum E2 {ID2} e2:1;\n\tint x2;\n};\n\nenum E3 {ID3};\nstruct s3 {\n\tenum E3 e3:1;\n\tint x3;\n};\n\nenum E4 {ID4};\n#define bits 7\nstruct s4 {\n\tenum E4 e4_1:1, e4_2:2, e4_3:bits;\n\tint x4;\n};\n" }, { "path": "Units/parser-c.r/enum.c.d/args.ctags", "content": "--sort=no" }, { "path": "Units/parser-c.r/enum.c.d/expected.tags", "content": "E1\tinput.c\t/^enum E1 {$/;\"\tg\tfile:\nE1_member1\tinput.c\t/^ E1_member1 = 1,$/;\"\te\tenum:E1\tfile:\nE1_member2\tinput.c\t/^ E1_member2,$/;\"\te\tenum:E1\tfile:\nE1_member3\tinput.c\t/^ E1_member3$/;\"\te\tenum:E1\tfile:\n__anonbdb313d80103\tinput.c\t/^enum {$/;\"\tg\tfile:\nAnon1_member1\tinput.c\t/^\tAnon1_member1$/;\"\te\tenum:__anonbdb313d80103\tfile:\nvar1\tinput.c\t/^enum E1 var1;$/;\"\tv\ttyperef:enum:E1\n__anonbdb313d80203\tinput.c\t/^enum { Anon2_member1 } var2;$/;\"\tg\tfile:\nAnon2_member1\tinput.c\t/^enum { Anon2_member1 } var2;$/;\"\te\tenum:__anonbdb313d80203\tfile:\nvar2\tinput.c\t/^enum { Anon2_member1 } var2;$/;\"\tv\ttyperef:enum:__anonbdb313d80203\n__anonbdb313d80303\tinput.c\t/^enum { Anon3_member1 } function(){ return Anon3_member1; };$/;\"\tg\tfile:\nAnon3_member1\tinput.c\t/^enum { Anon3_member1 } function(){ return Anon3_member1; };$/;\"\te\tenum:__anonbdb313d80303\tfile:\nfunction\tinput.c\t/^enum { Anon3_member1 } function(){ return Anon3_member1; };$/;\"\tf\ttyperef:enum:__anonbdb313d80303\nE2\tinput.c\t/^enum E2 { E2_member1 } var3[10];$/;\"\tg\tfile:\nE2_member1\tinput.c\t/^enum E2 { E2_member1 } var3[10];$/;\"\te\tenum:E2\tfile:\nvar3\tinput.c\t/^enum E2 { E2_member1 } var3[10];$/;\"\tv\ttyperef:enum:E2[10]\n" }, { "path": "Units/parser-c.r/enum.c.d/input.c", "content": "enum E1 {\n E1_member1 = 1,\n E1_member2,\n E1_member3\n};\n\nenum {\n\tAnon1_member1\n};\n\nenum E1 var1;\nenum { Anon2_member1 } var2;\n\n// The following is valid only in C\nenum { Anon3_member1 } function(){ return Anon3_member1; };\n\n// The following is accepted by gcc but it is also semantically flawed since the\n// function definition cannot be present in the same compilation unit.\n// \n// enum { Anon4_member1 } function2();\n//\n// It's true that the definition for function2 *could* be in some other compilation\n// unit and since the enum is technically an int, it might even work at linker level.\n//\n// However, it's ugly and complicates ctags parsing quite a lot.\n// So for now I deliberately choose to not support it. If you find a piece of code\n// that needs it, drop me a mail at :P\n\nenum E2 { E2_member1 } var3[10];\n\n\n\n\n" }, { "path": "Units/parser-c.r/extern_variable.h.b/README", "content": "Exuberant ctags generates following tags file\n\n\t$ ctags -o - --C-kinds='x' input.h\n\tC\t/home/jet/var/ctags/Units/review-needed.r/extern_variable.h.t/input.h\t/^class C;$/;\"\tx\n\tS\t/home/jet/var/ctags/Units/review-needed.r/extern_variable.h.t/input.h\t/^struct S;$/;\"\tx\n\ta\t/home/jet/var/ctags/Units/review-needed.r/extern_variable.h.t/input.h\t/^extern int a;$/;\"\tx\n\tb\t/home/jet/var/ctags/Units/review-needed.r/extern_variable.h.t/input.h\t/^extern struct B b;$/;\"\tx\n\nUniversal ctags generates following tags file\n\n\t$ ./ctags -o - --kinds-C='x' input.h\n\ta\t/home/jet/var/ctags/Units/review-needed.r/extern_variable.h.t/input.h\t/^extern int a;$/;\"\tx\ttyperef:typename:int\n\tb\t/home/jet/var/ctags/Units/review-needed.r/extern_variable.h.t/input.h\t/^extern struct B b;$/;\"\tx\ttyperef:struct:B\n\nI marked this .b. We have to consider which behavior is better.\n" }, { "path": "Units/parser-c.r/extern_variable.h.b/args.ctags", "content": "--kinds-C=x\n" }, { "path": "Units/parser-c.r/extern_variable.h.b/expected.tags", "content": "" }, { "path": "Units/parser-c.r/extern_variable.h.b/input.h", "content": "extern int a;\nextern struct B b;\nstruct S;\nclass C;\n" }, { "path": "Units/parser-c.r/func-after-typedef-for-fptr-returning-enum.d/args.ctags", "content": "--sort=no\n--fields=+S\n" }, { "path": "Units/parser-c.r/func-after-typedef-for-fptr-returning-enum.d/expected.tags", "content": "s\tinput.c\t/^enum s { E };$/;\"\tg\tfile:\nE\tinput.c\t/^enum s { E };$/;\"\te\tenum:s\tfile:\ng\tinput.c\t/^typedef enum s (*g)(void);$/;\"\tt\ttyperef:enum:s (*)(void)\tfile:\nf\tinput.c\t/^void f(void){}$/;\"\tf\ttyperef:typename:void\tsignature:(void)\n" }, { "path": "Units/parser-c.r/func-after-typedef-for-fptr-returning-enum.d/input.c", "content": "enum s { E };\ntypedef enum s (*g)(void);\nvoid f(void){}\n" }, { "path": "Units/parser-c.r/func-after-typedef-for-fptr-returning-struct.d/args.ctags", "content": "--sort=no\n--fields=+S\n" }, { "path": "Units/parser-c.r/func-after-typedef-for-fptr-returning-struct.d/expected.tags", "content": "s\tinput.c\t/^struct s {};$/;\"\ts\tfile:\ng\tinput.c\t/^typedef struct s (*g)(void);$/;\"\tt\ttyperef:struct:s (*)(void)\tfile:\nf\tinput.c\t/^void f(void){}$/;\"\tf\ttyperef:typename:void\tsignature:(void)\n" }, { "path": "Units/parser-c.r/func-after-typedef-for-fptr-returning-struct.d/input.c", "content": "struct s {};\ntypedef struct s (*g)(void);\nvoid f(void){}\n" }, { "path": "Units/parser-c.r/func_typedef.h.d/expected.tags", "content": "symlist_t\tinput.h\t/^typedef SLIST_HEAD(symlist, symbol_node) symlist_t;$/;\"\tt\n" }, { "path": "Units/parser-c.r/func_typedef.h.d/input.h", "content": "typedef SLIST_HEAD(symlist, symbol_node) symlist_t;\n" }, { "path": "Units/parser-c.r/if0.c.d/args.ctags", "content": "--if0\n" }, { "path": "Units/parser-c.r/if0.c.d/expected.tags", "content": "x\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\ny\tinput.c\t/^int y;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/if0.c.d/input.c", "content": "#if 0\nint x;\n#else\nint y;\n#endif\n" }, { "path": "Units/parser-c.r/line_directives.c.d/README", "content": "Universal ctags also reports NEWLANG as the language for input.c.\n\n================== THE ORIGINAL DOCUMENT ==================\n\nCurrently this test case made an assertion failure.\nSee also #402.\n\n\"OK.zzz \", a line of input.c changes the language, the value stored to\na global variable, File.source.language.\n\nInitially ctags sets C to File.source.language. However, ctags sets\nNEWLANG to it as specified in args.ctags when ctags reads the line.\n\nReset the language is not so bad. However, when the preprocessor part(get.c)\nof C parser reads \"#define x 1\" from input stream, get.c makes a\n'v, variable definitions' kind tag. Such kind doesn't exist in the kind table of\nNEWLANG. This makes the assertion failure.\n\nWe can remove the code which reset File.source.language to avoid the\nassertion failure::\n\n```\n diff --git a/main/read.c b/main/read.c\n index 91c661c..79af808 100644\n --- a/main/read.c\n +++ b/main/read.c\n @@ -118,7 +118,7 @@ static boolean setSourceFileName (vString *const fileName)\n\t\t\t\t vStringValue (File.path), vStringValue (fileName));\n\t\t\t pathName = vStringNewOwn (tmp);\n\t\t }\n -\t\tsetSourceFileParameters (pathName, language);\n +\t\tsetSourceFileParameters (pathName, getSourceLanguage());\n\t\t result = TRUE;\n\t }\n\t return result;\n```\n\nThis looks good to me. However the output (tags file) becomes incompatible\nto exuberant ctags when --fields=+l option is given to ctags.\n\n```\n[exuberant]$ ctags -o - --fields='+l' \\\n --langdef=NEWLANG --langmap=NEWLANG:+.zzz --line-directives --excmd=number \\\n Units/review-needed.r/line_directives.c.d/input.c\nctags: Warning: Ignoring non-option in ./.ctags\n\na\tUnits/review-needed.r/line_directives.c.d/a.c\t10;\"\tv\tlanguage:C\nb\tUnits/review-needed.r/line_directives.c.d/b.c\t20;\"\tv\tlanguage:C\nc\tUnits/review-needed.r/line_directives.c.d/c.c\t30;\"\tv\tlanguage:C\nd\tUnits/review-needed.r/line_directives.c.d/OK.zzz\t2;\"\tv\tlanguage:NEWLANG\n\n[universal]$ ./ctags -o - --fields='+l' \\\n --langdef=NEWLANG --langmap=NEWLANG:+.zzz --line-directives --excmd=number \\\n Units/review-needed.r/line_directives.c.d/input.c\n\na\tUnits/review-needed.r/line_directives.c.d/a.c\t10;\"\tv\tlanguage:C\nb\tUnits/review-needed.r/line_directives.c.d/b.c\t20;\"\tv\tlanguage:C\nc\tUnits/review-needed.r/line_directives.c.d/c.c\t30;\"\tv\tlanguage:C\nd\tUnits/review-needed.r/line_directives.c.d/OK.zzz\t2;\"\tv\tlanguage:C\n```\n\nExuberant ctags reports NEWLANG as the language of OK.zzz.\nUniversal ctags reports C as the language of OK.zzz.\n\n'v' is a kind of C language. So even we ignore the assertion\nissue, C should be reported. This is my position.\n\nAs suffix shows OK.zzz is obviously not a C language source\ncode. Reporting C as its language is wrong. This may be\nthe position of exuberant ctags.\n\nI replaced expected.tags with the output of universal ctags\nwith the above patch.\n" }, { "path": "Units/parser-c.r/line_directives.c.d/args.ctags", "content": "--line-directives\n--excmd=number\n--fields=+l\n--langdef=NEWLANG\n--map-NEWLANG=+.zzz\n" }, { "path": "Units/parser-c.r/line_directives.c.d/expected.tags", "content": "a\ta.c\t10;\"\tv\tlanguage:C\ttyperef:typename:int\nb\tb.c\t20;\"\tv\tlanguage:C\ttyperef:typename:int\nc\tc.c\t30;\"\tv\tlanguage:C\ttyperef:typename:int\nd\tOK.zzz\t2;\"\tv\tlanguage:NEWLANG\ttyperef:typename:int\ne\tOK.y\t100;\"\tv\tlanguage:YACC\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/line_directives.c.d/input.c", "content": "/* ANSI format */\n# line 10 \"a.c\"\nint a;\n/* GNU C format */\n# 20 \"b.c\"\nint b;\n/* obsolete format */\n# 30 c.c\nint c;\n/* invalid formats */\n# 1 OK.zzz\n# 0 Not OK\nint d;\n\n# 100 OK.y\nint e;\n" }, { "path": "Units/parser-c.r/local.c.d/args.ctags", "content": "--kinds-c=+lL\n" }, { "path": "Units/parser-c.r/local.c.d/expected.tags", "content": "a\tinput.c\t/^ int a;$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\nb\tinput.c\t/^ int b = 3;$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\nisContextualKeyword\tinput.c\t/^static boolean isContextualKeyword (const tokenInfo *const token)$/;\"\tf\ttyperef:typename:boolean\tfile:\nlabel\tinput.c\t/^label:$/;\"\tL\tfunction:isContextualKeyword\tfile:\nmain\tinput.c\t/^main ()$/;\"\tf\nresult\tinput.c\t/^ boolean result;$/;\"\tl\tfunction:isContextualKeyword\ttyperef:typename:boolean\tfile:\n" }, { "path": "Units/parser-c.r/local.c.d/input.c", "content": "main ()\n{\n int a;\n int b = 3;\n a = 2;\n}\n\nstatic boolean isContextualKeyword (const tokenInfo *const token)\n{\n boolean result;\nlabel:\n goto label;\n switch (token->keyword)\n {\n\tcase KEYWORD_UNION:\n\t result = TRUE;\n\t break;\n\n\tdefault: result = FALSE; break;\n }\n return result;\n}\n" }, { "path": "Units/parser-c.r/macrodef.d/args.ctags", "content": "--sort=no\n--fields-C=+{macrodef}\n--fields=+Sl\n" }, { "path": "Units/parser-c.r/macrodef.d/expected.tags", "content": "INT\tinput.c\t/^#define INT /;\"\td\tlanguage:C\tfile:\tmacrodef:1\nSTR\tinput.c\t/^#define STR /;\"\td\tlanguage:C\tfile:\tmacrodef:\"bar\"\nCHR\tinput.c\t/^#define CHR /;\"\td\tlanguage:C\tfile:\tmacrodef:'b'\nHEX\tinput.c\t/^#define HEX /;\"\td\tlanguage:C\tfile:\tmacrodef:0xff01\nOCT\tinput.c\t/^#define OCT /;\"\td\tlanguage:C\tfile:\tmacrodef:0644\nSYSCALL_METADATA\tinput.c\t/^#define SYSCALL_METADATA(/;\"\td\tlanguage:C\tfile:\tsignature:(sname,nb,...)\tmacrodef:\nSYSCALL_DEFINE2\tinput.c\t/^#define SYSCALL_DEFINE2(/;\"\td\tlanguage:C\tfile:\tsignature:(name,...)\tmacrodef:SYSCALL_DEFINEx(2, _##name, __VA_ARGS__)\nSYSCALL_DEFINEx\tinput.c\t/^#define SYSCALL_DEFINEx(/;\"\td\tlanguage:C\tfile:\tsignature:(x,sname,...)\tmacrodef:SYSCALL_METADATA(sname, x, __VA_ARGS__) __SYSCALL_DEFINEx(x, sname, __VA_ARGS__)\n__SYSCALL_DEFINEx\tinput.c\t/^#define __SYSCALL_DEFINEx(/;\"\td\tlanguage:C\tfile:\tsignature:(x,name,...)\tmacrodef:__diag_push(); __diag_ignore(GCC, 8, \"-Wattribute-alias\", \"Type aliasing is used to sanitize syscall arguments\"); asmlinkage long sys##name(__MAP(x,__SC_DECL,__VA_ARGS__)) __attribute__((alias(__stringify(__se_sys##name)))); ALLOW_ERROR_INJECTION(sys##name, ERRNO); static inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__)); asmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__)); asmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__)) { long ret = __do_sys##name(__MAP(x,__SC_CAST,__VA_ARGS__)); __MAP(x,__SC_TEST,__VA_ARGS__); __PROTECT(x, ret,__MAP(x,__SC_ARGS,__VA_ARGS__)); return ret; } __diag_pop(); static inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))\n__MAP1\tinput.c\t/^#define __MAP1(/;\"\td\tlanguage:C\tfile:\tsignature:(m,t,a,...)\tmacrodef:m(t,a)\n__MAP2\tinput.c\t/^#define __MAP2(/;\"\td\tlanguage:C\tfile:\tsignature:(m,t,a,...)\tmacrodef:m(t,a), __MAP1(m,__VA_ARGS__)\n__MAP\tinput.c\t/^#define __MAP(n,...) __MAP#/;\"\td\tlanguage:C\tfile:\tsignature:(n,...)\tmacrodef:__MAP##n(__VA_ARGS__)\n__SC_DECL\tinput.c\t/^#define __SC_DECL(/;\"\td\tlanguage:C\tfile:\tsignature:(t,a)\tmacrodef:t a\n" }, { "path": "Units/parser-c.r/macrodef.d/input.c", "content": "#define INT 1\n#define STR \"bar\"\n#define CHR 'b'\n#define HEX 0xff01\n#define OCT 0644\n\n/*\n * Taken from linux kernel\n */\n#define SYSCALL_METADATA(sname, nb, ...)\n#define SYSCALL_DEFINE2(name, ...) SYSCALL_DEFINEx(2, _##name, __VA_ARGS__)\n#define SYSCALL_DEFINEx(x, sname, ...)\t\t\t\t\\\n\tSYSCALL_METADATA(sname, x, __VA_ARGS__)\t\t\t\\\n\t__SYSCALL_DEFINEx(x, sname, __VA_ARGS__)\n\n/*\n * The asmlinkage stub is aliased to a function named __se_sys_*() which\n * sign-extends 32-bit ints to longs whenever needed. The actual work is\n * done within __do_sys_*().\n */\n#define __SYSCALL_DEFINEx(x, name, ...)\t\t\t\t\t\\\n\t__diag_push();\t\t\t\t\t\t\t\\\n\t__diag_ignore(GCC, 8, \"-Wattribute-alias\",\t\t\t\\\n\t\t \"Type aliasing is used to sanitize syscall arguments\");\\\n\tasmlinkage long sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))\t\\\n\t\t__attribute__((alias(__stringify(__se_sys##name))));\t\\\n\tALLOW_ERROR_INJECTION(sys##name, ERRNO);\t\t\t\\\n\tstatic inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__));\\\n\tasmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__));\t\\\n\tasmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__))\t\\\n\t{\t\t\t\t\t\t\t\t\\\n\t\tlong ret = __do_sys##name(__MAP(x,__SC_CAST,__VA_ARGS__));\\\n\t\t__MAP(x,__SC_TEST,__VA_ARGS__);\t\t\t\t\\\n\t\t__PROTECT(x, ret,__MAP(x,__SC_ARGS,__VA_ARGS__));\t\\\n\t\treturn ret;\t\t\t\t\t\t\\\n\t}\t\t\t\t\t\t\t\t\\\n\t__diag_pop();\t\t\t\t\t\t\t\\\n\tstatic inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))\n\n#define __MAP1(m,t,a,...) m(t,a)\n#define __MAP2(m,t,a,...) m(t,a), __MAP1(m,__VA_ARGS__)\n#define __MAP(n,...) __MAP##n(__VA_ARGS__)\n\n#define __SC_DECL(t, a)\tt a\n#if 0\nSYSCALL_DEFINE2(setregid16, old_gid_t, rgid, old_gid_t, egid)\n{\n\treturn __sys_setregid(low2highgid(rgid), low2highgid(egid));\n}\n#endif\n" }, { "path": "Units/parser-c.r/macroexpand-empty-arg.d/args.ctags", "content": "--sort=no\n--fields=+n{signature}\n--param-CPreProcessor._expand=1\n--fields-C={macrodef}\n" }, { "path": "Units/parser-c.r/macroexpand-empty-arg.d/expected.tags", "content": "X\tinput.c\t/^#define X$/;\"\td\tline:1\tfile:\tmacrodef:\nm0\tinput.c\t/^#define m0(/;\"\td\tline:2\tfile:\tsignature:(Q,W,E,R)\tmacrodef:int Q\nm1\tinput.c\t/^#define m1(/;\"\td\tline:3\tfile:\tsignature:(Q,W,E,R)\tmacrodef:int W\nm2\tinput.c\t/^#define m2(/;\"\td\tline:4\tfile:\tsignature:(Q,W,E,R)\tmacrodef:int E\nm3\tinput.c\t/^#define m3(/;\"\td\tline:5\tfile:\tsignature:(Q,W,E,R)\tmacrodef:int R\na\tinput.c\t/^m0(a,b,c,d);$/;\"\tv\tline:7\ttyperef:typename:int\na\tinput.c\t/^m0(a,X,c,d);$/;\"\tv\tline:8\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,X,d);$/;\"\tv\tline:9\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,c,X);$/;\"\tv\tline:10\ttyperef:typename:int\na\tinput.c\t/^m0(a,X,X,d);$/;\"\tv\tline:11\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,X,X);$/;\"\tv\tline:12\ttyperef:typename:int\na\tinput.c\t/^m0(a,X,c,X);$/;\"\tv\tline:13\ttyperef:typename:int\na\tinput.c\t/^m0(a,X,X,X);$/;\"\tv\tline:14\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,c,d);$/;\"\tv\tline:16\ttyperef:typename:int\nb\tinput.c\t/^m1(X,b,c,d);$/;\"\tv\tline:17\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,X,d);$/;\"\tv\tline:18\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,c,X);$/;\"\tv\tline:19\ttyperef:typename:int\nb\tinput.c\t/^m1(X,b,X,d);$/;\"\tv\tline:20\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,X,X);$/;\"\tv\tline:21\ttyperef:typename:int\nb\tinput.c\t/^m1(X,b,c,X);$/;\"\tv\tline:22\ttyperef:typename:int\nb\tinput.c\t/^m1(X,b,X,X);$/;\"\tv\tline:23\ttyperef:typename:int\nc\tinput.c\t/^m2(a,b,c,d);$/;\"\tv\tline:25\ttyperef:typename:int\nc\tinput.c\t/^m2(X,b,c,d);$/;\"\tv\tline:26\ttyperef:typename:int\nc\tinput.c\t/^m2(a,X,c,d);$/;\"\tv\tline:27\ttyperef:typename:int\nc\tinput.c\t/^m2(a,b,c,X);$/;\"\tv\tline:28\ttyperef:typename:int\nc\tinput.c\t/^m2(X,X,c,d);$/;\"\tv\tline:29\ttyperef:typename:int\nc\tinput.c\t/^m2(a,X,c,X);$/;\"\tv\tline:30\ttyperef:typename:int\nc\tinput.c\t/^m2(X,b,c,X);$/;\"\tv\tline:31\ttyperef:typename:int\nc\tinput.c\t/^m2(X,X,c,X);$/;\"\tv\tline:32\ttyperef:typename:int\nd\tinput.c\t/^m3(a,b,c,d);$/;\"\tv\tline:34\ttyperef:typename:int\nd\tinput.c\t/^m3(X,b,c,d);$/;\"\tv\tline:35\ttyperef:typename:int\nd\tinput.c\t/^m3(a,X,c,d);$/;\"\tv\tline:36\ttyperef:typename:int\nd\tinput.c\t/^m3(a,b,X,d);$/;\"\tv\tline:37\ttyperef:typename:int\nd\tinput.c\t/^m3(X,X,c,d);$/;\"\tv\tline:38\ttyperef:typename:int\nd\tinput.c\t/^m3(a,X,X,d);$/;\"\tv\tline:39\ttyperef:typename:int\nd\tinput.c\t/^m3(X,b,X,d);$/;\"\tv\tline:40\ttyperef:typename:int\nd\tinput.c\t/^m3(X,X,X,d);$/;\"\tv\tline:41\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,c,d);$/;\"\tv\tline:43\ttyperef:typename:int\na\tinput.c\t/^m0(a,,c,d);$/;\"\tv\tline:44\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,,d);$/;\"\tv\tline:45\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,c,);$/;\"\tv\tline:46\ttyperef:typename:int\na\tinput.c\t/^m0(a,,,d);$/;\"\tv\tline:47\ttyperef:typename:int\na\tinput.c\t/^m0(a,b,,);$/;\"\tv\tline:48\ttyperef:typename:int\na\tinput.c\t/^m0(a,,c,);$/;\"\tv\tline:49\ttyperef:typename:int\na\tinput.c\t/^m0(a,,,);$/;\"\tv\tline:50\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,c,d);$/;\"\tv\tline:52\ttyperef:typename:int\nb\tinput.c\t/^m1(,b,c,d);$/;\"\tv\tline:53\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,,d);$/;\"\tv\tline:54\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,c,);$/;\"\tv\tline:55\ttyperef:typename:int\nb\tinput.c\t/^m1(,b,,d);$/;\"\tv\tline:56\ttyperef:typename:int\nb\tinput.c\t/^m1(a,b,,);$/;\"\tv\tline:57\ttyperef:typename:int\nb\tinput.c\t/^m1(,b,c,);$/;\"\tv\tline:58\ttyperef:typename:int\nb\tinput.c\t/^m1(,b,,);$/;\"\tv\tline:59\ttyperef:typename:int\nc\tinput.c\t/^m2(a,b,c,d);$/;\"\tv\tline:61\ttyperef:typename:int\nc\tinput.c\t/^m2(,b,c,d);$/;\"\tv\tline:62\ttyperef:typename:int\nc\tinput.c\t/^m2(a,,c,d);$/;\"\tv\tline:63\ttyperef:typename:int\nc\tinput.c\t/^m2(a,b,c,);$/;\"\tv\tline:64\ttyperef:typename:int\nc\tinput.c\t/^m2(,,c,d);$/;\"\tv\tline:65\ttyperef:typename:int\nc\tinput.c\t/^m2(a,,c,);$/;\"\tv\tline:66\ttyperef:typename:int\nc\tinput.c\t/^m2(,b,c,);$/;\"\tv\tline:67\ttyperef:typename:int\nc\tinput.c\t/^m2(,,c,);$/;\"\tv\tline:68\ttyperef:typename:int\nd\tinput.c\t/^m3(a,b,c,d);$/;\"\tv\tline:70\ttyperef:typename:int\nd\tinput.c\t/^m3(,b,c,d);$/;\"\tv\tline:71\ttyperef:typename:int\nd\tinput.c\t/^m3(a,,c,d);$/;\"\tv\tline:72\ttyperef:typename:int\nd\tinput.c\t/^m3(a,b,,d);$/;\"\tv\tline:73\ttyperef:typename:int\nd\tinput.c\t/^m3(,,c,d);$/;\"\tv\tline:74\ttyperef:typename:int\nd\tinput.c\t/^m3(a,,,d);$/;\"\tv\tline:75\ttyperef:typename:int\nd\tinput.c\t/^m3(,b,,d);$/;\"\tv\tline:76\ttyperef:typename:int\nd\tinput.c\t/^m3(,,,d);$/;\"\tv\tline:77\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/macroexpand-empty-arg.d/input.c", "content": "#define X\n#define m0(Q,W,E,R) int Q\n#define m1(Q,W,E,R) int W\n#define m2(Q,W,E,R) int E\n#define m3(Q,W,E,R) int R\n\nm0(a,b,c,d);\nm0(a,X,c,d);\nm0(a,b,X,d);\nm0(a,b,c,X);\nm0(a,X,X,d);\nm0(a,b,X,X);\nm0(a,X,c,X);\nm0(a,X,X,X);\n\nm1(a,b,c,d);\nm1(X,b,c,d);\nm1(a,b,X,d);\nm1(a,b,c,X);\nm1(X,b,X,d);\nm1(a,b,X,X);\nm1(X,b,c,X);\nm1(X,b,X,X);\n\nm2(a,b,c,d);\nm2(X,b,c,d);\nm2(a,X,c,d);\nm2(a,b,c,X);\nm2(X,X,c,d);\nm2(a,X,c,X);\nm2(X,b,c,X);\nm2(X,X,c,X);\n\nm3(a,b,c,d);\nm3(X,b,c,d);\nm3(a,X,c,d);\nm3(a,b,X,d);\nm3(X,X,c,d);\nm3(a,X,X,d);\nm3(X,b,X,d);\nm3(X,X,X,d);\n\nm0(a,b,c,d);\nm0(a,,c,d);\nm0(a,b,,d);\nm0(a,b,c,);\nm0(a,,,d);\nm0(a,b,,);\nm0(a,,c,);\nm0(a,,,);\n\nm1(a,b,c,d);\nm1(,b,c,d);\nm1(a,b,,d);\nm1(a,b,c,);\nm1(,b,,d);\nm1(a,b,,);\nm1(,b,c,);\nm1(,b,,);\n\nm2(a,b,c,d);\nm2(,b,c,d);\nm2(a,,c,d);\nm2(a,b,c,);\nm2(,,c,d);\nm2(a,,c,);\nm2(,b,c,);\nm2(,,c,);\n\nm3(a,b,c,d);\nm3(,b,c,d);\nm3(a,,c,d);\nm3(a,b,,d);\nm3(,,c,d);\nm3(a,,,d);\nm3(,b,,d);\nm3(,,,d);\n" }, { "path": "Units/parser-c.r/macroexpand-typeof.d/args.ctags", "content": "--sort=no\n--param-CPreProcessor._expand=true\n--fields-C=+{macrodef}\n--fields=+{signature}\n--kinds-C=+x\n" }, { "path": "Units/parser-c.r/macroexpand-typeof.d/expected.tags", "content": "__attribute_copy__\tinput.c\t/^# define __attribute_copy__(/;\"\td\tfile:\tsignature:(arg)\tmacrodef:__attribute__ ((__copy__ (arg)))\nweak_alias\tinput.c\t/^# define weak_alias(name, aliasname) _weak_alias /;\"\td\tfile:\tsignature:(name,aliasname)\tmacrodef:_weak_alias (name, aliasname)\n_weak_alias\tinput.c\t/^# define _weak_alias(/;\"\td\tfile:\tsignature:(name,aliasname)\tmacrodef:extern __typeof (name) aliasname __attribute__ ((weak, alias (#name))) __attribute_copy__ (name);\n__brk\tinput.c\t/^__brk (void *addr)$/;\"\tf\ttyperef:typename:int\tsignature:(void * addr)\nbrk\tinput.c\t/^weak_alias (__brk, brk)$/;\"\tx\ttyperef:typename:__typeof(__brk)\n" }, { "path": "Units/parser-c.r/macroexpand-typeof.d/input.c", "content": "// Derrived from glibc\n# define __attribute_copy__(arg) __attribute__ ((__copy__ (arg)))\n# define weak_alias(name, aliasname) _weak_alias (name, aliasname)\n# define _weak_alias(name, aliasname) \\\n extern __typeof (name) aliasname __attribute__ ((weak, alias (#name))) \\\n __attribute_copy__ (name);\n\nint\n__brk (void *addr)\n{\n\t/* ... */\n\treturn 0;\n}\nweak_alias (__brk, brk)\n" }, { "path": "Units/parser-c.r/macroexpand-with-linenum-adjustment.d/args.ctags", "content": "--sort=no\n--fields=+ne\n-D SYSCALL_DEFINE3(name,...)=long name(__VA_ARGS__)\n--param-CPreProcessor._expand=1\n--fields=+{signature}\n--fields-C=+{macrodef}\n" }, { "path": "Units/parser-c.r/macroexpand-with-linenum-adjustment.d/expected.tags", "content": "faccessat\tinput.c\t/^SYSCALL_DEFINE3(faccessat, int, dfd, const char __user *, filename, int, mode)$/;\"\tf\tline:1\ttyperef:typename:long\tsignature:(int,dfd,const char __user *,filename,int,mode)\tend:4\nfchmodat\tinput.c\t/^SYSCALL_DEFINE3(fchmodat, int, dfd, const char __user *, filename,$/;\"\tf\tline:6\ttyperef:typename:long\tsignature:(int,dfd,const char __user *,filename,umode_t,mode)\tend:10\nmysyscall\tinput.c\t/^\tmysyscall, int, dfd,$/;\"\tf\tline:16\ttyperef:typename:long\tsignature:(int,dfd,const char __user *,filename,umode_t,mode)\tend:21\nINJECT_MEMBERS\tinput.c\t/^#define INJECT_MEMBERS(/;\"\td\tline:23\tfile:\tsignature:(m0,m1)\tend:26\tmacrodef:int m0; int padding; int m1\nP\tinput.c\t/^struct P {$/;\"\ts\tline:28\tfile:\tend:33\nx\tinput.c\t/^\t\tx$/;\"\tm\tline:30\tstruct:P\ttyperef:typename:int\tfile:\npadding\tinput.c\t/^\tINJECT_MEMBERS($/;\"\tm\tline:29\tstruct:P\ttyperef:typename:int\tfile:\tend:29\ny\tinput.c\t/^\t\ty);$/;\"\tm\tline:32\tstruct:P\ttyperef:typename:int\tfile:\tend:32\n" }, { "path": "Units/parser-c.r/macroexpand-with-linenum-adjustment.d/input.c", "content": "SYSCALL_DEFINE3(faccessat, int, dfd, const char __user *, filename, int, mode)\n{\n return do_faccessat(dfd, filename, mode, 0);\n}\n\nSYSCALL_DEFINE3(fchmodat, int, dfd, const char __user *, filename,\n umode_t, mode)\n{\n return do_fchmodat(dfd, filename, mode, 0);\n}\n\nSYSCALL_DEFINE3(\n\t/*\n\t * noise\n\t */\n\tmysyscall, int, dfd,\n\tconst char __user *, filename,\n umode_t, mode)\n{\n return 0;\n}\n\n#define INJECT_MEMBERS(m0, m1) \\\n\tint m0; \\\n\tint padding; \\\n\tint m1\n\nstruct P {\n\tINJECT_MEMBERS(\n\t\tx\n\t\t,\n\t\ty);\n};\n" }, { "path": "Units/parser-c.r/macros.c.d/README", "content": "This case tests multiple behavior of C parser.\n\n1. #pragma weak\n\n2. Top level function call like macro expansions\n\n (MACRO1, MACRO2, MACRO3)\n\n If a macro takes one parameter, according to my observation ctags\n records the parameter as a variable by default. It looks sensible\n behavior.\n\n Look at following code:\n\n #define DEF_LANG(X) struct Lang X\n ...\n DEF_LANG(alpha);\n\n In this case ctags records alpha by default. MACRO1 tests this\n default behavior.\n\n With -I option you can make this behavior for a specified macro be\n disabled. MACRO2 tests the -I option.\n\n If a macro takes more than one parameters, according to my\n observation ctags records nothing. In the future we can change\n this behavior interesting way but in this case tests the current\n implementation(MACRO3).\n\n3. name before double parenthesis\n\n (__ARGS)\n\n ctags.1 says:\n\n Ctags will also try to specially handle arguments lists\n enclosed in double sets of parentheses in order to accept the\n following conditional construct:\n\n extern void foo __ARGS((int one, char two));\n\n Any name immediately preceding the \"((\" will be automatically\n ignored and the previous name will be used.\n\n4. #undef\n" }, { "path": "Units/parser-c.r/macros.c.d/args.ctags", "content": "--kinds-c=+p\n--fields=+S\n-I MACRO2\n--fields=+r\n--extras=+r\n" }, { "path": "Units/parser-c.r/macros.c.d/expected.tags", "content": "DECL1\tinput.c\t/^DECL1(foo); \\/* gcc will accept this as function prototype (with some warnings) *\\/$/;\"\tp\tfile:\tsignature:(foo)\troles:def\nDECL3\tinput.c\t/^DECL3(x, y); \\/* gcc will accept this as function prototype (with some warnings) *\\/$/;\"\tp\tfile:\tsignature:(x,y)\troles:def\nFUNCTION_LIKE\tinput.c\t/^#define FUNCTION_LIKE(/;\"\td\tfile:\tsignature:(a,b)\troles:def\nFUNCTION_LIKE\tinput.c\t/^#undef FUNCTION_LIKE$/;\"\td\tfile:\troles:undef\nVARIABLE_LIKE\tinput.c\t/^#define VARIABLE_LIKE\t/;\"\td\tfile:\troles:def\nVARIABLE_LIKE\tinput.c\t/^#undef VARIABLE_LIKE$/;\"\td\tfile:\troles:undef\nWeakSymbol\tinput.c\t/^#pragma weak WeakSymbol /;\"\td\tfile:\troles:def\nprototype1\tinput.c\t/^void prototype1 __ARGS((int arg1, void *arg2));$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(int arg1,void * arg2)\troles:def\nprototype2\tinput.c\t/^void prototype2 __ARGS((int arg1, void *arg2))$/;\"\tf\ttyperef:typename:void\tsignature:(int arg1,void * arg2)\troles:def\n" }, { "path": "Units/parser-c.r/macros.c.d/input.c", "content": "#define VARIABLE_LIKE\tsome_value\n#define FUNCTION_LIKE(a,b) (a + b)\n#pragma weak WeakSymbol = StrongSymbol\n\n/* handling of spoofing macros */\nDECL1(foo); /* gcc will accept this as function prototype (with some warnings) */\nMACRO2(bar);\nDECL3(x, y); /* gcc will accept this as function prototype (with some warnings) */\n\nvoid prototype1 __ARGS((int arg1, void *arg2));\nvoid prototype2 __ARGS((int arg1, void *arg2))\n{\n}\n#undef FUNCTION_LIKE\n#undef VARIABLE_LIKE\n" }, { "path": "Units/parser-c.r/option-disable-undef.c.d/args.ctags", "content": "#--undef=no\n" }, { "path": "Units/parser-c.r/option-disable-undef.c.d/expected.tags", "content": "MACRO_TO_SEE\tinput.c\t/^#define MACRO_TO_SEE$/;\"\td\tfile:\n" }, { "path": "Units/parser-c.r/option-disable-undef.c.d/input.c", "content": "#define MACRO_TO_SEE\n#undef MACRO_NOT_TO_SEE\n" }, { "path": "Units/parser-c.r/properties-thread.d/args.ctags", "content": "--sort=no\n--kinds-c=*-{parameter}\n--fields=+x\n--fields-c=+{properties}\n" }, { "path": "Units/parser-c.r/properties-thread.d/expected.tags", "content": "i\tinput.c\t/^__thread int i;$/;\"\tv\ttyperef:typename:int\tproperties:thread_local\ns\tinput.c\t/^extern __thread struct state s;$/;\"\tx\ttyperef:struct:state\tproperties:extern,thread_local\np\tinput.c\t/^static __thread char *p;$/;\"\tv\ttyperef:typename:char *\tfile:\tproperties:static,thread_local\nq\tinput.c\t/^static _Thread_local char *q;$/;\"\tv\ttyperef:typename:char *\tfile:\tproperties:static,thread_local\n" }, { "path": "Units/parser-c.r/properties-thread.d/input.c", "content": "/* Taken from https://gcc.gnu.org/onlinedocs/gcc-3.3.1/gcc/Thread-Local.html#Thread-Local */\n__thread int i;\nextern __thread struct state s;\nstatic __thread char *p;\n\nstatic _Thread_local char *q;\n" }, { "path": "Units/parser-c.r/properties.c.d/args.ctags", "content": "--sort=no\n--kinds-c=*\n--fields=+x\n--fields-c=+{properties}\n" }, { "path": "Units/parser-c.r/properties.c.d/expected.tags", "content": "T\tinput.c\t/^static struct T {int t;} f1(int i)$/;\"\ts\tfile:\nt\tinput.c\t/^static struct T {int t;} f1(int i)$/;\"\tm\tstruct:T\ttyperef:typename:int\tfile:\nf1\tinput.c\t/^static struct T {int t;} f1(int i)$/;\"\tf\ttyperef:struct:T\tfile:\tproperties:static\ni\tinput.c\t/^static struct T {int t;} f1(int i)$/;\"\tz\tfunction:f1\ttyperef:typename:int\tfile:\nr\tinput.c\t/^ struct T r = {.t = i};$/;\"\tl\tfunction:f1\ttyperef:struct:T\tfile:\n" }, { "path": "Units/parser-c.r/properties.c.d/input.c", "content": "// See #3943.\n// static struct S {int s;} fS1(int i);\n\n/* This is invalid input as C++ code. */\nstatic struct T {int t;} f1(int i)\n{\n struct T r = {.t = i};\n return r;\n}\n" }, { "path": "Units/parser-c.r/prototype.h.d/args.ctags", "content": "--kinds-C=+p\n\n" }, { "path": "Units/parser-c.r/prototype.h.d/expected.tags", "content": "prototype_a\tinput.h\t/^int prototype_a (int a, char *b);$/;\"\tp\ttyperef:typename:int\nprototype_b\tinput.h\t/^extern void prototype_b (void);$/;\"\tp\ttyperef:typename:void\n" }, { "path": "Units/parser-c.r/prototype.h.d/input.h", "content": "int prototype_a (int a, char *b);\nextern void prototype_b (void);\n" }, { "path": "Units/parser-c.r/recursive-macros-2.d/README", "content": "typeref field for `p' in expected.tags may be changed when\nthe definition for CXX_PARSER_MAXIMUM_MACRO_USE_COUNT is changed.\n" }, { "path": "Units/parser-c.r/recursive-macros-2.d/args.ctags", "content": "--kinds-C=*\n-D p=a\n-D a=(p+p)\n" }, { "path": "Units/parser-c.r/recursive-macros-2.d/expected.tags", "content": "dummy\tinput.c\t/^int dummy;$/;\"\tv\ttyperef:typename:int\np\tinput.c\t/^int p;$/;\"\tv\ttyperef:typename:int ((((((((+p)+p)+p)+p)+p)+p)+p)+p)\n" }, { "path": "Units/parser-c.r/recursive-macros-2.d/input.c", "content": "int p;\nint dummy;\n" }, { "path": "Units/parser-c.r/recursive-macros.d/args.ctags", "content": "--kinds-C=*\n-D p=a\n-D a=p+p\n" }, { "path": "Units/parser-c.r/recursive-macros.d/expected.tags", "content": "dummy\tinput.c\t/^int dummy;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-c.r/recursive-macros.d/input.c", "content": "int p;\nint dummy;\n" }, { "path": "Units/parser-c.r/spurious_label_tags.c.d/args.ctags", "content": "--kinds-c=+lp\n" }, { "path": "Units/parser-c.r/spurious_label_tags.c.d/expected.tags", "content": "label_forced_tags\tinput.c\t/^static void label_forced_tags(void)$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Units/parser-c.r/spurious_label_tags.c.d/input.c", "content": "/* When run with --kinds-c=+lp option demonstrates spurious tags for statement\n * following a label\n */\nstatic void label_forced_tags(void)\n{\nlabel1:\n\tproto1(arg);\nlabel2:\n\tif (arg)\n\t\tproto2(arg);\nlabel3:\n\tvariable = 3;\n\twhile (condition) {\n\tlabel4:\n\t\tproto3(arg);\n\t}\n}\n" }, { "path": "Units/parser-c.r/static_array.c.d/expected.tags", "content": "charset2uni\tinput.c\t/^static wchar_t charset2uni[256] = {$/;\"\tv\ttyperef:typename:wchar_t[256]\tfile:\n" }, { "path": "Units/parser-c.r/static_array.c.d/input.c", "content": "/* Demonstrates temporary bug caused by statement reinitialization */\nstatic wchar_t charset2uni[256] = {\n};\n" }, { "path": "Units/parser-c.r/using-cxx-keyword-in-c-code.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-c.r/using-cxx-keyword-in-c-code.d/expected.tags", "content": "mutable\tinput.c\t/^static int mutable;$/;\"\tv\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-c.r/using-cxx-keyword-in-c-code.d/input.c", "content": "static int mutable;\n" }, { "path": "Units/parser-c.r/vardef-surrounded-by-parentheses.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-c.r/vardef-surrounded-by-parentheses.d/expected.tags", "content": "A\tinput.c\t/^int (A);$/;\"\tv\ttyperef:typename:int ()\nB\tinput.c\t/^int *(B);$/;\"\tv\ttyperef:typename:int * ()\nC\tinput.c\t/^struct s *(C);$/;\"\tv\ttyperef:struct:s * ()\na\tinput.c\t/^int (a[1]);$/;\"\tv\ttyperef:typename:int ([1])\nb\tinput.c\t/^int *(b[2]);$/;\"\tv\ttyperef:typename:int * ([2])\nc\tinput.c\t/^int (c[1][2]);$/;\"\tv\ttyperef:typename:int ([1][2])\nd\tinput.c\t/^int *(d[2][3]);$/;\"\tv\ttyperef:typename:int * ([2][3])\ne\tinput.c\t/^int *(* const volatile * e[3]);$/;\"\tv\ttyperef:typename:int * (* const volatile * [3])\ns\tinput.c\t/^struct s {$/;\"\ts\tfile:\nf\tinput.c\t/^\tint *(* const volatile * f[3][3]);$/;\"\tm\tstruct:s\ttyperef:typename:int * (* const volatile * [3][3])\tfile:\ng\tinput.c\t/^\tint (g[3]);$/;\"\tm\tstruct:s\ttyperef:typename:int ([3])\tfile:\nt\tinput.c\t/^} t;$/;\"\tv\ttyperef:struct:s\nh\tinput.c\t/^int (* volatile * (*h[1]));$/;\"\tv\ttyperef:typename:int (* volatile * (* [1]))\n" }, { "path": "Units/parser-c.r/vardef-surrounded-by-parentheses.d/input.c", "content": "// The next one will be reconigzed as a macro.\n// struct s (a);\nint (A);\nMACRO(ARGS);\nint *(B);\nstruct s *(C);\n\nint (a[1]);\nint *(b[2]);\nint (c[1][2]);\nint *(d[2][3]);\nint *(* const volatile * e[3]);\n\nstruct s {\n\tint *(* const volatile * f[3][3]);\n\tint (g[3]);\n} t;\n\nint (* volatile * (*h[1]));\n" }, { "path": "Units/parser-cargo.r/simple.d/args.ctags", "content": "--languages=-TOML\n--languages=+Cargo\n\n--map-Cargo=.cargo\n--sort=no\n--fields=+lK\n" }, { "path": "Units/parser-cargo.r/simple.d/expected.tags", "content": "myapp\tinput.cargo\t/^name = \"myapp\"$/;\"\tpackage\tlanguage:Cargo\n" }, { "path": "Units/parser-cargo.r/simple.d/features", "content": "packcc\n" }, { "path": "Units/parser-cargo.r/simple.d/input.cargo", "content": "[package]\nname = \"myapp\"\n" }, { "path": "Units/parser-clojure.r/broken-ns.d/expected.tags", "content": "" }, { "path": "Units/parser-clojure.r/broken-ns.d/input-0.clj", "content": "(ns ^abc\n" }, { "path": "Units/parser-clojure.r/broken-ns.d/input-1.clj", "content": "(ns ^abc\n" }, { "path": "Units/parser-clojure.r/broken-ns.d/input.clj", "content": "(ns ^{:doc \"Document\"}\n" }, { "path": "Units/parser-clojure.r/clojure-def-in-unknown-scope.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-clojure.r/clojure-def-in-unknown-scope.d/expected.tags", "content": "N\tinput.clj\t/^(ns N)$/;\"\tn\ndefn\tinput.clj\t/^(defn defn [n]$/;\"\tf\tnamespace:N\nS\tinput.clj\t/^(ns S$/;\"\tn\ng\tinput.clj\t/^(N\\/defn 'g)$/;\"\tY\tnamespace:S\tname:g\nh\tinput.clj\t/^(clojure.core\\/defn h [] 1)$/;\"\tf\tnamespace:S\n" }, { "path": "Units/parser-clojure.r/clojure-def-in-unknown-scope.d/input.clj", "content": "(ns N)\n\n(defn defn [n]\n 1)\n\n(ns S\n (:require [N]))\n\n(N/defn 'g)\n(clojure.core/defn h [] 1)\n" }, { "path": "Units/parser-clojure.r/clojure-metadata-in-fn.d/expected.tags", "content": "my-fn\tinput.clj\t/^(defn my-fn [])$/;\"\tf\nmy-hinted-fn\tinput.clj\t/^(defn my-hinted-fn ^MyReturnType [])$/;\"\tf\nmy-private-fn\tinput.clj\t/^(defn ^:private my-private-fn [])$/;\"\tf\nmy-private-hinted-fn\tinput.clj\t/^(defn ^:private my-private-hinted-fn ^MyReturnType [])$/;\"\tf\nmy-public-fn\tinput.clj\t/^(defn ^{:foo :bar} my-public-fn [])$/;\"\tf\nso-many-hints\tinput.clj\t/^(defn ^:private so-many-hints ^MyReturnType$/;\"\tf\n" }, { "path": "Units/parser-clojure.r/clojure-metadata-in-fn.d/input.clj", "content": "(defn my-fn [])\n\n(defn ^:private my-private-fn [])\n\n(defn ^{:foo :bar} my-public-fn [])\n\n(defn my-hinted-fn ^MyReturnType [])\n\n(defn ^:private my-private-hinted-fn ^MyReturnType [])\n\n(defn ^:private so-many-hints ^MyReturnType\n [^MyArgType x])\n" }, { "path": "Units/parser-clojure.r/clojure-metadata-in-ns.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-clojure.r/clojure-metadata-in-ns.d/expected.tags", "content": "ns0\tinput.clj\t/^(ns ^{:doc \"Utility functions.\"} ns0)$/;\"\tn\ndebug0?\tinput.clj\t/^(defn debug0? ^boolean$/;\"\tf\tnamespace:ns0\nns1\tinput-0.clj\t/^(ns ^:dynamic ns1)$/;\"\tn\ndebug1?\tinput-0.clj\t/^(defn debug1? ^boolean$/;\"\tf\tnamespace:ns1\nns2\tinput-0.clj\t/^(ns ^String ns2)$/;\"\tn\ndebug2?\tinput-0.clj\t/^(defn debug2? ^boolean$/;\"\tf\tnamespace:ns2\nns00\tinput-0.clj\t/^(ns ^{:doc \"Utility functions.\"} ^{:doc1 \"something\"} ns00)$/;\"\tn\ndebug00?\tinput-0.clj\t/^(defn debug00? ^boolean$/;\"\tf\tnamespace:ns00\nns01\tinput-0.clj\t/^(ns ^{:doc \"Utility functions.\"} ^:dynamic ns01)$/;\"\tn\ndebug01?\tinput-0.clj\t/^(defn debug01? ^boolean$/;\"\tf\tnamespace:ns01\nns02\tinput-0.clj\t/^(ns ^{:doc \"Utility functions.\"} ^String ns02)$/;\"\tn\ndebug02?\tinput-0.clj\t/^(defn debug02? ^boolean$/;\"\tf\tnamespace:ns02\nns10\tinput-0.clj\t/^(ns ^:dynamic ^{:doc \"Utility functions.\"} ns10)$/;\"\tn\ndebug10?\tinput-0.clj\t/^(defn debug10? ^boolean$/;\"\tf\tnamespace:ns10\nns11\tinput-0.clj\t/^(ns ^:dynamic ^:dynamic-something ns11)$/;\"\tn\ndebug11?\tinput-0.clj\t/^(defn debug11? ^boolean$/;\"\tf\tnamespace:ns11\nns12\tinput-0.clj\t/^(ns ^:dynamic ^String ns12)$/;\"\tn\ndebug12?\tinput-0.clj\t/^(defn debug12? ^boolean$/;\"\tf\tnamespace:ns12\nns20\tinput-0.clj\t/^(ns ^String ^{:doc \"Utility functions.\"} ns20)$/;\"\tn\ndebug20?\tinput-0.clj\t/^(defn debug20? ^boolean$/;\"\tf\tnamespace:ns20\nns21\tinput-0.clj\t/^(ns ^String ^:dynamic ns21)$/;\"\tn\ndebug21?\tinput-0.clj\t/^(defn debug21? ^boolean$/;\"\tf\tnamespace:ns21\nns22\tinput-0.clj\t/^(ns ^String ^String-something ns22)$/;\"\tn\ndebug22?\tinput-0.clj\t/^(defn debug22? ^boolean$/;\"\tf\tnamespace:ns22\n" }, { "path": "Units/parser-clojure.r/clojure-metadata-in-ns.d/input-0.clj", "content": "(ns ^:dynamic ns1)\n(defn debug1? ^boolean\n []\n goog.DEBUG)\n\n(ns ^String ns2)\n(defn debug2? ^boolean\n []\n goog.DEBUG)\n\n(ns ^{:doc \"Utility functions.\"} ^{:doc1 \"something\"} ns00)\n(defn debug00? ^boolean\n []\n goog.DEBUG)\n\n(ns ^{:doc \"Utility functions.\"} ^:dynamic ns01)\n(defn debug01? ^boolean\n []\n goog.DEBUG)\n\n(ns ^{:doc \"Utility functions.\"} ^String ns02)\n(defn debug02? ^boolean\n []\n goog.DEBUG)\n\n\n(ns ^:dynamic ^{:doc \"Utility functions.\"} ns10)\n(defn debug10? ^boolean\n []\n goog.DEBUG)\n\n(ns ^:dynamic ^:dynamic-something ns11)\n(defn debug11? ^boolean\n []\n goog.DEBUG)\n\n(ns ^:dynamic ^String ns12)\n(defn debug12? ^boolean\n []\n goog.DEBUG)\n\n(ns ^String ^{:doc \"Utility functions.\"} ns20)\n(defn debug20? ^boolean\n []\n goog.DEBUG)\n\n(ns ^String ^:dynamic ns21)\n(defn debug21? ^boolean\n []\n goog.DEBUG)\n\n(ns ^String ^String-something ns22)\n(defn debug22? ^boolean\n []\n goog.DEBUG)\n" }, { "path": "Units/parser-clojure.r/clojure-metadata-in-ns.d/input.clj", "content": ";; Taken from #1657 opened by @arichiardi\n(ns ^{:doc \"Utility functions.\"} ns0)\n(defn debug0? ^boolean\n []\n goog.DEBUG)\n" }, { "path": "Units/parser-clojure.r/clojure-methods.b/README", "content": "About methodId kind, see #4126.\n" }, { "path": "Units/parser-clojure.r/clojure-methods.b/args.ctags", "content": "--sort=no\n--fields=+KzZ\n" }, { "path": "Units/parser-clojure.r/clojure-methods.b/expected.tags", "content": "multimethod.test\tinput.clj\t/^(ns multimethod.test)$/;\"\tkind:namespace\ntest\tinput.clj\t/^(defmulti test$/;\"\tkind:multi\tscope:namespace:multimethod.test\ndocumented-multimethod\tinput.clj\t/^(defmulti documented-multimethod \"Documentation\"$/;\"\tkind:multi\tscope:namespace:multimethod.test\ntest\tinput.clj\t/^(defmethod test nil$/;\"\tkind:method\tscope:namespace:multimethod.test\ntest\tinput.clj\t/^(defmethod test :test$/;\"\tkind:method\tscope:namespace:multimethod.test\ntest\tinput.clj\t/^(defmethod test :test2 named-method$/;\"\tkind:method\tscope:namespace:multimethod.test\nnamed-method\tinput.clj\t/^(defmethod test :test2 named-method$/;\"\tkind:methodId\tmethod:test\tscope:namespace:multimethod.test\n" }, { "path": "Units/parser-clojure.r/clojure-methods.b/input.clj", "content": "(ns multimethod.test)\n\n(defmulti test\n (fn [type] type))\n\n(defmulti documented-multimethod \"Documentation\"\n (fn [type] type))\n\n(defmethod test nil\n [& _]\n nil)\n\n(defmethod test :test\n [& _]\n nil)\n\n(defmethod test :test2 named-method\n [& _]\n nil)\n" }, { "path": "Units/parser-clojure.r/clojure-vars.b/args.ctags", "content": "--sort=no\n--fields=+KzZ\n" }, { "path": "Units/parser-clojure.r/clojure-vars.b/expected.tags", "content": "vars.test\tinput.clj\t/^(ns vars.test)$/;\"\tkind:namespace\nvar\tinput.clj\t/^(def var 'var)$/;\"\tkind:variable\tnamespace:vars.test\ndoc-var\tinput.clj\t/^(def doc-var \"Documentation\" 'var)$/;\"\tkind:variable\tscope:namespace:vars.test\ndynamic-var\tinput.clj\t/^(def dynamic-var ^:dynamic 'var)$/;\"\tkind:variable\tscope:namespace:vars.test\nconst-var\tinput.clj\t/^(def const-var ^:const 'var)$/;\"\tkind:variable\tscope:namespace:vars.test\nonce-var\tinput.clj\t/^(defonce once-var 'evaluated-once)$/;\"\tkind:variable\tscope:namespace:vars.test\nfn-var\tinput.clj\t/^(def fn-var (fn [] true))$/;\"\tkind:function\tscope:namespace:vars.test\n" }, { "path": "Units/parser-clojure.r/clojure-vars.b/input.clj", "content": "(ns vars.test)\n\n(def var 'var)\n\n(def doc-var \"Documentation\" 'var)\n\n(def dynamic-var ^:dynamic 'var)\n\n(def const-var ^:const 'var)\n\n(defonce once-var 'evaluated-once)\n\n(def fn-var (fn [] true))\n" }, { "path": "Units/parser-clojure.r/macros.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-clojure.r/macros.d/expected.tags", "content": "with-tree\tinput.clj\t/^(defmacro with-tree$/;\"\tm\nunless\tinput.clj\t/^(defmacro unless [pred a b]$/;\"\tm\n" }, { "path": "Units/parser-clojure.r/macros.d/input.clj", "content": ";; Taken from https://clojuredocs.org/clojure.core/defmacro\n\n(defmacro with-tree\n \"works on a JTree and restores its expanded paths after executing body\"\n [tree & body]\n `(let [tree# ~tree\n root# (.getRoot (.getModel tree#))\n expanded# (if-let [x# (.getExpandedDescendants\n tree# (TreePath. root#))]\n (enumeration-seq x#)\n ())\n selectionpaths# (. selectionmodel# getSelectionPaths)]\n ~@body\n (doseq [path# expanded#]\n (.expandPath tree# path#))))\n\n(defmacro unless [pred a b]\n `(if (not ~pred) ~a ~b))\n" }, { "path": "Units/parser-clojure.r/simple-clojure.d/expected.tags", "content": "another.name\tinput.clj\t/^(clojure.core\\/ns another.name)$/;\"\tn\napp.controller\tinput.clj\t/^(ns app.controller)$/;\"\tn\ncore-function-with-body\tinput.clj\t/^(clojure.core\\/defn core-function-with-body []$/;\"\tf\tnamespace:app.controller\nempty-fn\tinput.clj\t/^ (defn empty-fn [])$/;\"\tf\tnamespace:app.controller\nfunction-with-body\tinput.clj\t/^(defn function-with-body []$/;\"\tf\tnamespace:app.controller\nx\tinput.clj\t/^(defn x [])$/;\"\tf\tnamespace:another.name\n" }, { "path": "Units/parser-clojure.r/simple-clojure.d/input.clj", "content": "(ns app.controller)\n\n (defn empty-fn [])\n\n(defn function-with-body []\n (println \"body\"))\n\n(clojure.core/defn core-function-with-body []\n (println \"core\"))\n\n'(defn quoted-function [])\n(quote quoted-function2 [])\n\n(clojure.core/ns another.name)\n(defn x [])\n" }, { "path": "Units/parser-cmake.r/cmake-comments.d/expected.tags", "content": "another_good_target\tinput.cmake\t/^add_library(another_good_target# <-- target$/;\"\tt\ngood_target\tinput.cmake\t/^ good_target# this is legal comment placement set(NO_TAG foo)$/;\"\tt\ntag_this\tinput.cmake\t/^]]set(tag_this)$/;\"\tv\n" }, { "path": "Units/parser-cmake.r/cmake-comments.d/input.cmake", "content": "# this is a test of comments set(DO_NOT_TAG \"foo\")\n\n#[[\nmulti-linecomments\noption(DO_NOT_TAG \"foo\" OFF)\n] not the end\n]]set(tag_this)\n\nadd_custom_target(# comment set(NO_TAG \"foo\")\n # anothe rline comment\n good_target# this is legal comment placement set(NO_TAG foo)\n ALL)\n\nadd_library(another_good_target# <-- target\n SHARED # set(NO_TAG bar)\n gmock-all.cc\n )\n" }, { "path": "Units/parser-cmake.r/cmake-function.d/args.ctags", "content": "--fields=+ne\n" }, { "path": "Units/parser-cmake.r/cmake-function.d/expected.tags", "content": "Bfunctiontag_this_2\tinput.cmake\t/^\tfunction(\tBfunctiontag_this_2 ${BAR})$/;\"\tf\tline:3\tend:4\na\tinput.cmake\t/^function(a)$/;\"\tf\tline:20\tend:28\nb\tinput.cmake\t/^ function(b)$/;\"\tf\tline:22\tfunction:a\tend:27\nc\tinput.cmake\t/^ function(c)$/;\"\tf\tline:24\tfunction:a.b\tend:26\ncxx_shared_library\tinput.cmake\t/^function(cxx_shared_library#$/;\"\tf\tline:6\tend:9\nd_ALSO_Tag_this\tinput.cmake\t/^ d_ALSO_Tag_this#[[ set(foo) ]]$/;\"\tf\tline:12\tend:14\neLastlyTagThis_\tinput.cmake\t/^eLastlyTagThis_ \"hello\")$/;\"\tf\tline:17\tend:18\ntag_this1\tinput.cmake\t/^function(tag_this1)$/;\"\tf\tline:1\tend:2\nvar1_in_func_a\tinput.cmake\t/^ set(var1_in_func_a TRUE)$/;\"\tv\tline:21\tfunction:a\nvar2_in_func_a_b\tinput.cmake\t/^\tset(var2_in_func_a_b TRUE)$/;\"\tv\tline:23\tfunction:a.b\nvar3_in_func_a_b_c\tinput.cmake\t/^ \tset(var3_in_func_a_b_c TRUE)$/;\"\tv\tline:25\tfunction:a.b.c\nvar4_in_no_func\tinput.cmake\t/^set(var4_in_no_func TRUE)$/;\"\tv\tline:30\n" }, { "path": "Units/parser-cmake.r/cmake-function.d/input.cmake", "content": "function(tag_this1)\nendfunction(tag_this1)\n\tfunction(\tBfunctiontag_this_2 ${BAR})\n\tendfunction()\n\nfunction(cxx_shared_library#\n name cxx_flags)\n cxx_library_with_type(${name} SHARED \"${cxx_flags}\" ${ARGN})\nendfunction()\n\n FUNCTION\t\t(\n d_ALSO_Tag_this#[[ set(foo) ]]\n true)\n ENDFUNCTION()\n\nFunction(\neLastlyTagThis_ \"hello\")\nEndfunction()\n\nfunction(a)\n set(var1_in_func_a TRUE)\n function(b)\n\tset(var2_in_func_a_b TRUE)\n function(c)\n \tset(var3_in_func_a_b_c TRUE)\n endfunction(c)\n endfunction(b)\nendfunction(a)\n\nset(var4_in_no_func TRUE)\n\nfunction(${not_this} foo)\nfunction(not-this foo)\nfunction(not.this foo)\nfunction(1notthis foo)\n" }, { "path": "Units/parser-cmake.r/cmake-macro.d/args.ctags", "content": "--fields=+ne\n" }, { "path": "Units/parser-cmake.r/cmake-macro.d/expected.tags", "content": "Bmacrotag_this_2\tinput.cmake\t/^\tmacro(\tBmacrotag_this_2 ${BAR})$/;\"\tm\tline:3\na\tinput.cmake\t/^macro(a)$/;\"\tm\tline:20\ncxx_shared_library\tinput.cmake\t/^macro(cxx_shared_library#$/;\"\tm\tline:6\nd_ALSO_Tag_this\tinput.cmake\t/^ d_ALSO_Tag_this#[[ set(foo) ]]$/;\"\tm\tline:12\neLastlyTagThis_\tinput.cmake\t/^eLastlyTagThis_ \"hello\")$/;\"\tm\tline:17\ntag_this1\tinput.cmake\t/^macro(tag_this1)$/;\"\tm\tline:1\nvar1_unscoped\tinput.cmake\t/^ set(var1_unscoped TRUE)$/;\"\tv\tline:21\n" }, { "path": "Units/parser-cmake.r/cmake-macro.d/input.cmake", "content": "macro(tag_this1)\nendmacro(tag_this1)\n\tmacro(\tBmacrotag_this_2 ${BAR})\n\tendmacro()\n\nmacro(cxx_shared_library#\n name cxx_flags)\n cxx_library_with_type(${name} SHARED \"${cxx_flags}\" ${ARGN})\nendmacro()\n\n MACRO\t\t(\n d_ALSO_Tag_this#[[ set(foo) ]]\n true)\n ENDMACRO()\n\nMacro(\neLastlyTagThis_ \"hello\")\nEndmacro()\n\nmacro(a)\n set(var1_unscoped TRUE)\nendmacro(a)\n\nmacro(${not_this} foo)\nmacro(not-this foo)\nmacro(not.this foo)\nmacro(1not_this foo)\n" }, { "path": "Units/parser-cmake.r/cmake-option.d/expected.tags", "content": "1_tag_this\tinput.cmake\t/^option(1_tag_this foo)$/;\"\tD\nB-option-tag_this_2\tinput.cmake\t/^option(B-option-tag_this_2 ${BAR})$/;\"\tD\nc_TAG_THIS\tinput.cmake\t/^ option ( c_TAG_THIS but_not_this)$/;\"\tD\nd-ALSO-Tag.this\tinput.cmake\t/^ d-ALSO-Tag.this$/;\"\tD\ne.LastlyTagThis\tinput.cmake\t/^e.LastlyTagThis \"hello\")$/;\"\tD\n" }, { "path": "Units/parser-cmake.r/cmake-option.d/input.cmake", "content": "option(1_tag_this foo)\noption(B-option-tag_this_2 ${BAR})\n\n option ( c_TAG_THIS but_not_this)\n\n OPTION\t\t(\n d-ALSO-Tag.this\n true)\n\nOption(\ne.LastlyTagThis \"hello\")\n\noption(${not_this} foo)\noption(${ not_this } foo)\noption(not~this foo)\n" }, { "path": "Units/parser-cmake.r/cmake-project.d/expected.tags", "content": "1_tag_this\tinput.cmake\t/^project(1_tag_this)$/;\"\tp\nB-project-tag_this_2\tinput.cmake\t/^project(B-project-tag_this_2 ${BAR})$/;\"\tp\nc_TAG_THIS\tinput.cmake\t/^ project ( c_TAG_THIS but_not_this)$/;\"\tp\nd-ALSO-Tag.this\tinput.cmake\t/^ d-ALSO-Tag.this$/;\"\tp\ne.LastlyTagThis\tinput.cmake\t/^e.LastlyTagThis \"hello\")$/;\"\tp\n" }, { "path": "Units/parser-cmake.r/cmake-project.d/input.cmake", "content": "project(1_tag_this)\nproject(B-project-tag_this_2 ${BAR})\n\n project ( c_TAG_THIS but_not_this)\n\n PROJECT\t\t(\n d-ALSO-Tag.this\n\t)\n\nProject(\ne.LastlyTagThis \"hello\")\n\nproject(${not_this})\nproject(${ not_this })\nproject(not/this)\n" }, { "path": "Units/parser-cmake.r/cmake-scoped-variable.d/args.ctags", "content": "--fields=+ne\n" }, { "path": "Units/parser-cmake.r/cmake-scoped-variable.d/expected.tags", "content": "_var10\tinput.cmake\t/^ set (_var10 \"\\/FI\\\\\"${_prefixFileNative}\\\\\"\" \"\\/FI\\\\\"${_prefixFileNative}\\\\\"\")$/;\"\tv\tline:24\tfunction:cxx_shared_library\n_var11_unscoped\tinput.cmake\t/^ set (_var11_unscoped \"\\/FI\\\\\"${_prefixFileNative}\\\\\"\" \"\\/FI\\\\\"${_prefixFileNative}\\\\\"\" PARENT_/;\"\tv\tline:25\n_var6\tinput.cmake\t/^ set (_var6 \"-x ${_xLanguage_${_language}} -c \\\\\"${_prefixFile}\\\\\" -o \\\\\"${_pchFile}\\\\\"\")$/;\"\tv\tline:16\tfunction:cxx_shared_library\n_var7_unscoped\tinput.cmake\t/^ set (_var7_unscoped \"-x ${_xLanguage_${_language}} -c \\\\\"${_prefixFile}\\\\\" -o \\\\\"${_pchFile}\\\\/;\"\tv\tline:17\n_var8_unscoped\tinput.cmake\t/^ \t_var8_unscoped$/;\"\tv\tline:19\tfunction:cxx_shared_library\n_var9\tinput.cmake\t/^ set (_var9 \"\\/FI\\\\\"${_prefixFileNative}\\\\\"\")$/;\"\tv\tline:23\tfunction:cxx_shared_library\na\tinput.cmake\t/^function(a)$/;\"\tf\tline:39\tend:50\nb\tinput.cmake\t/^\tfunction(b)$/;\"\tf\tline:40\tfunction:a\tend:49\nc\tinput.cmake\t/^\t\tfunction(c ...)$/;\"\tf\tline:45\tfunction:a.b\tend:48\ncxx_shared_library\tinput.cmake\t/^function(cxx_shared_library name cxx_flags)$/;\"\tf\tline:12\tend:26\nfunc1\tinput.cmake\t/^function(func1)$/;\"\tf\tline:1\tend:4\nfunc2\tinput.cmake\t/^\tfunction(\tfunc2 ${BAR})$/;\"\tf\tline:6\tend:10\nfunc4\tinput.cmake\t/^ func4$/;\"\tf\tline:29\tend:33\nmacro1\tinput.cmake\t/^macro(macro1)$/;\"\tm\tline:35\nmacro2\tinput.cmake\t/^\t\tmacro(macro2)$/;\"\tm\tline:41\nvar1\tinput.cmake\t/^\tset(var1 TRUE)$/;\"\tv\tline:2\tfunction:func1\nvar13_unscoped\tinput.cmake\t/^\tset(var13_unscoped TRUE)$/;\"\tv\tline:36\nvar14_a_b\tinput.cmake\t/^\t\t\tset(var14_a_b TRUE)$/;\"\tv\tline:42\tfunction:a.b\nvar15_a_b_c\tinput.cmake\t/^\t\t\tset(var15_a_b_c TRUE)$/;\"\tv\tline:46\tfunction:a.b.c\nvar2\tinput.cmake\t/^\tset(var2 \"hello\")$/;\"\tv\tline:3\tfunction:func1\nvar_12\tinput.cmake\t/^\t\tSET ( var_12 \"hello\" foo ${bar})$/;\"\tv\tline:31\tfunction:func4\nvar_16_unscoped\tinput.cmake\t/^\t\t\tset(var_16_unscoped \"hello \\\\\"\" ${ARGN} \"\\\\\" world\" PARENT_SCOPE)$/;\"\tv\tline:47\nvar_3_unscoped\tinput.cmake\t/^\t\tset ( var_3_unscoped \"hello\" PARENT_SCOPE)$/;\"\tv\tline:7\nvar_4_unscoped\tinput.cmake\t/^\t\tset ( var_4_unscoped \"hello\" \"world\" PARENT_SCOPE)$/;\"\tv\tline:8\nvar_5_unscoped\tinput.cmake\t/^\t\tset ( var_5_unscoped \"hello \\\\\"\" ${ARGN} \"\\\\\" world\" PARENT_SCOPE)$/;\"\tv\tline:9\n" }, { "path": "Units/parser-cmake.r/cmake-scoped-variable.d/input.cmake", "content": "function(func1)\n\tset(var1 TRUE)\n\tset(var2 \"hello\")\nendfunction()\n\n\tfunction(\tfunc2 ${BAR})\n\t\tset ( var_3_unscoped \"hello\" PARENT_SCOPE)\n\t\tset ( var_4_unscoped \"hello\" \"world\" PARENT_SCOPE)\n\t\tset ( var_5_unscoped \"hello \\\"\" ${ARGN} \"\\\" world\" PARENT_SCOPE)\n\tendfunction()\n\nfunction(cxx_shared_library name cxx_flags)\n cxx_library_with_type(${name} SHARED \"${cxx_flags}\" ${ARGN})\n\n # yes cmake files reall have these types of things:\n set (_var6 \"-x ${_xLanguage_${_language}} -c \\\"${_prefixFile}\\\" -o \\\"${_pchFile}\\\"\")\n set (_var7_unscoped \"-x ${_xLanguage_${_language}} -c \\\"${_prefixFile}\\\" -o \\\"${_pchFile}\\\"\" PARENT_SCOPE)\n set (\n \t_var8_unscoped\n \t\"-x ${_xLanguage_${_language}} -c \\\"${_prefixFile}\\\" -o \\\"${_pchFile}\\\"\"\n \tPARENT_SCOPE)\n\n set (_var9 \"/FI\\\"${_prefixFileNative}\\\"\")\n set (_var10 \"/FI\\\"${_prefixFileNative}\\\"\" \"/FI\\\"${_prefixFileNative}\\\"\")\n set (_var11_unscoped \"/FI\\\"${_prefixFileNative}\\\"\" \"/FI\\\"${_prefixFileNative}\\\"\" PARENT_SCOPE)\nendfunction()\n\n FUNCTION\t\t(\n func4\n true)\n\t\tSET ( var_12 \"hello\" foo ${bar})\n\n\tENDFUNCTION()\n\nmacro(macro1)\n\tset(var13_unscoped TRUE)\nendmacro()\n\nfunction(a)\n\tfunction(b)\n\t\tmacro(macro2)\n\t\t\tset(var14_a_b TRUE)\n\t\tendmacro()\n\n\t\tfunction(c ...)\n\t\t\tset(var15_a_b_c TRUE)\n\t\t\tset(var_16_unscoped \"hello \\\"\" ${ARGN} \"\\\" world\" PARENT_SCOPE)\n\t\tendfunction()\n\tendfunction()\nendfunction()\n\n\n" }, { "path": "Units/parser-cmake.r/cmake-simple.d/expected.tags", "content": "BUILD_GMOCK\tinput.cmake\t/^option(BUILD_GMOCK \"Builds the googlemock subproject\" ON)$/;\"\tD\nBUILD_GTEST\tinput.cmake\t/^option(BUILD_GTEST \"Builds the googletest subproject\" OFF)$/;\"\tD\nCMAKE_INSTALL_BINDIR\tinput.cmake\t/^ set(CMAKE_INSTALL_BINDIR \"bin\" CACHE STRING \"User executables (bin)\")$/;\"\tv\nCMAKE_INSTALL_INCLUDEDIR\tinput.cmake\t/^ set(CMAKE_INSTALL_INCLUDEDIR \"include\" CACHE STRING \"C header files (include)\")$/;\"\tv\nCMAKE_INSTALL_LIBDIR\tinput.cmake\t/^ set(CMAKE_INSTALL_LIBDIR \"lib${LIB_SUFFIX}\" CACHE STRING \"Object code libraries (lib)\")$/;\"\tv\ngoogletest-distribution\tinput.cmake\t/^project( googletest-distribution )$/;\"\tp\n" }, { "path": "Units/parser-cmake.r/cmake-simple.d/input.cmake", "content": "# taken from https://github.com/google/googletest/blob/master/CMakeLists.txt\ncmake_minimum_required(VERSION 2.6.4)\n\nif (POLICY CMP0048)\n cmake_policy(SET CMP0048 NEW)\nendif (POLICY CMP0048)\n\nproject( googletest-distribution )\n\nenable_testing()\n\ninclude(CMakeDependentOption)\nif (CMAKE_VERSION VERSION_LESS 2.8.5)\n set(CMAKE_INSTALL_BINDIR \"bin\" CACHE STRING \"User executables (bin)\")\n set(CMAKE_INSTALL_LIBDIR \"lib${LIB_SUFFIX}\" CACHE STRING \"Object code libraries (lib)\")\n set(CMAKE_INSTALL_INCLUDEDIR \"include\" CACHE STRING \"C header files (include)\")\n mark_as_advanced(CMAKE_INSTALL_BINDIR CMAKE_INSTALL_LIBDIR CMAKE_INSTALL_INCLUDEDIR)\nelse()\n include(GNUInstallDirs)\nendif()\n\noption(BUILD_GTEST \"Builds the googletest subproject\" OFF)\n\n#Note that googlemock target already builds googletest\noption(BUILD_GMOCK \"Builds the googlemock subproject\" ON)\n\ncmake_dependent_option(INSTALL_GTEST \"Enable installation of googletest. (Projects embedding googletest may want to turn this OFF.)\" ON \"BUILD_GTEST OR BUILD_GMOCK\" OFF)\ncmake_dependent_option(INSTALL_GMOCK \"Enable installation of googlemock. (Projects embedding googlemock may want to turn this OFF.)\" ON \"BUILD_GMOCK\" OFF)\n\nif(BUILD_GMOCK)\n add_subdirectory( googlemock )\nelseif(BUILD_GTEST)\n add_subdirectory( googletest )\nendif()\n" }, { "path": "Units/parser-cmake.r/cmake-target.d/expected.tags", "content": "1_tag_this\tinput.cmake\t/^add_custom_target(1_tag_this)$/;\"\tt\n1_tag_this\tinput.cmake\t/^add_executable(1_tag_this)$/;\"\tt\n1_tag_this\tinput.cmake\t/^add_library(1_tag_this)$/;\"\tt\nB-add_custom_target-tag_this_2\tinput.cmake\t/^add_custom_target(B-add_custom_target-tag_this_2 ${BAR})$/;\"\tt\nB-add_executable-tag_this_2\tinput.cmake\t/^add_executable(B-add_executable-tag_this_2#[[ set(foo) ]]${BAR})$/;\"\tt\nB-add_library-tag_this_2\tinput.cmake\t/^add_library(B-add_library-tag_this_2#$/;\"\tt\nc_TAG_THIS\tinput.cmake\t/^ add_custom_target ( c_TAG_THIS#$/;\"\tt\nc_TAG_THIS\tinput.cmake\t/^ add_executable ( c_TAG_THIS but_not_this)$/;\"\tt\nc_TAG_THIS\tinput.cmake\t/^ add_library ( c_TAG_THIS but_not_this)$/;\"\tt\nd-ALSO-Tag.this\tinput.cmake\t/^\t\td-ALSO-Tag.this$/;\"\tt\nd-ALSO-Tag.this\tinput.cmake\t/^ d-ALSO-Tag.this\t$/;\"\tt\nd-ALSO-Tag.this\tinput.cmake\t/^ d-ALSO-Tag.this$/;\"\tt\ne.LastlyTagThis\tinput.cmake\t/^e.LastlyTagThis \"CustomTarget\")$/;\"\tt\ne.LastlyTagThis\tinput.cmake\t/^e.LastlyTagThis \"Executable\")$/;\"\tt\ne.LastlyTagThis\tinput.cmake\t/^e.LastlyTagThis \"Library\")$/;\"\tt\n" }, { "path": "Units/parser-cmake.r/cmake-target.d/input.cmake", "content": "add_custom_target(1_tag_this)\nadd_custom_target(B-add_custom_target-tag_this_2 ${BAR})\n\n add_custom_target ( c_TAG_THIS#\n but_not_this)\n\n ADD_CUSTOM_TARGET\t\t(\n d-ALSO-Tag.this\n\t)\n\nAdd_Custom_target(\ne.LastlyTagThis \"CustomTarget\")\n\nadd_custom_target(${not_this})\nadd_custom_target(${ not_this })\nadd_custom_target(not/this)\n\n\nadd_executable(1_tag_this)\nadd_executable(B-add_executable-tag_this_2#[[ set(foo) ]]${BAR})\n\n add_executable ( c_TAG_THIS but_not_this)\n\n ADD_EXECUTABLE \t (\n d-ALSO-Tag.this\t\n )\n\nAdd_Executable(\ne.LastlyTagThis \"Executable\")\n\nadd_executable(${not_this})\nadd_executable(${ not_this })\nadd_executable(not/this)\n\n\nadd_library(1_tag_this)\nadd_library(B-add_library-tag_this_2#\n ${BAR})\n\n add_library ( c_TAG_THIS but_not_this)\n\n ADD_LIBRARY (\n\t\td-ALSO-Tag.this\n )\n\nAdd_Library(\ne.LastlyTagThis \"Library\")\n\nadd_library(${not_this})\nadd_library(${ not_this })\nadd_library(not/this)\n" }, { "path": "Units/parser-cmake.r/cmake-variable.d/expected.tags", "content": "1_tag_this\tinput.cmake\t/^set(1_tag_this foo)$/;\"\tv\nB-set-tag_this_2\tinput.cmake\t/^set(B-set-tag_this_2 ${BAR})$/;\"\tv\nc_TAG_THIS\tinput.cmake\t/^ set ( c_TAG_THIS but_not_this)$/;\"\tv\nd-ALSO-Tag.this\tinput.cmake\t/^ d-ALSO-Tag.this$/;\"\tv\ne.LastlyTagThis\tinput.cmake\t/^e.LastlyTagThis \"hello\")$/;\"\tv\n" }, { "path": "Units/parser-cmake.r/cmake-variable.d/input.cmake", "content": "set(1_tag_this foo)\nset(B-set-tag_this_2 ${BAR})\n\n set ( c_TAG_THIS but_not_this)\n\n SET\t\t(\n d-ALSO-Tag.this\n true)\n\nSet(\ne.LastlyTagThis \"hello\")\n\nset(${not_this} foo)\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorld.d/expected.tags", "content": "CONFIGURATION\tinput.cbl\t/^ CONFIGURATION SECTION.$/;\"\ts\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nHelloWorld\tinput.cbl\t/^ PROGRAM-ID. HelloWorld.$/;\"\tP\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorld.d/input.cbl", "content": " ******************************************************************\n * Author: Colin Duquesnoy\n * Date: 23/02/2014\n * Purpose: Hello world world example mean to test parser with a\n * non free syntax.\n * Tectonics: cobc\n ******************************************************************\n IDENTIFICATION DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n PROGRAM-ID. HelloWorld.\n ENVIRONMENT DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n CONFIGURATION SECTION.\n *-----------------------\n INPUT-OUTPUT SECTION.\n *-----------------------\n DATA DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n FILE SECTION.\n *-----------------------\n WORKING-STORAGE SECTION.\n *-----------------------\n PROCEDURE DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n MAIN-PROCEDURE.\n **\n * The main procedure of the program\n **\n DISPLAY \"Hello world\"\n STOP RUN.\n ** add other procedures here\n END PROGRAM HelloWorld.\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorldFree.d/args.ctags", "content": "--language-force=CobolFree\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorldFree.d/expected.tags", "content": "CONFIGURATION\tinput.cbl\t/^CONFIGURATION SECTION.$/;\"\ts\nDATA\tinput.cbl\t/^DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^FILE SECTION.$/;\"\ts\nIDENTIFICATION\tinput.cbl\t/^IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^MAIN-PROCEDURE.$/;\"\tp\nPROCEDURE\tinput.cbl\t/^PROCEDURE DIVISION.$/;\"\tD\nWORKING-STORAGE\tinput.cbl\t/^WORKING-STORAGE SECTION.$/;\"\ts\nYOUR-PROGRAM-NAME\tinput.cbl\t/^PROGRAM-ID. YOUR-PROGRAM-NAME.$/;\"\tP\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorldFree.d/input.cbl", "content": "IDENTIFICATION DIVISION.\nPROGRAM-ID. YOUR-PROGRAM-NAME.\nENVIRONMENT DIVISION.\nCONFIGURATION SECTION.\nINPUT-OUTPUT SECTION.\nDATA DIVISION.\nFILE SECTION.\nWORKING-STORAGE SECTION.\nPROCEDURE DIVISION.\nMAIN-PROCEDURE.\n DISPLAY \"Hello world\"\n DISPLAY 'HAHA'\nSTOP RUN.\nEND PROGRAM YOUR-PROGRAM-NAME.\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorldLatin1.d/expected.tags", "content": "CONFIGURATION\tinput.cbl\t/^ CONFIGURATION SECTION.$/;\"\ts\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\nYOUR-PROGRAM-NAME\tinput.cbl\t/^ PROGRAM-ID. YOUR-PROGRAM-NAME.$/;\"\tP\n" }, { "path": "Units/parser-cobol-to-review.r/HelloWorldLatin1.d/input.cbl", "content": " ******************************************************************\n * Author: Colin Duquesnoy\n * Date: 23/02/2014\n * Purpose: Test d'un fichier encod en latin-1.\n * non free syntax.\n * Tectonics: cobc\n ******************************************************************\n IDENTIFICATION DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n PROGRAM-ID. YOUR-PROGRAM-NAME.\n ENVIRONMENT DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n CONFIGURATION SECTION.\n *-----------------------\n INPUT-OUTPUT SECTION.\n *-----------------------\n DATA DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n FILE SECTION.\n *-----------------------\n WORKING-STORAGE SECTION.\n *-----------------------\n PROCEDURE DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n MAIN-PROCEDURE.\n **\n * The main procedure of the program\n **\n DISPLAY \"Hello world\"\n STOP RUN.\n ** add other procedures here\n END PROGRAM YOUR-PROGRAM-NAME.\n" }, { "path": "Units/parser-cobol-to-review.r/MALFORMED.d/expected.tags", "content": "CONFIGURATION\tinput.cbl\t/^ CONFIGURATION SECTION.$/;\"\ts\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\nYOUR-PROGRAM-NAME\tinput.cbl\t/^ PROGRAM-ID. YOUR-PROGRAM-NAME.$/;\"\tP\nvar\tinput.cbl\t/^ 01 var PIC 99.$/;\"\td\n" }, { "path": "Units/parser-cobol-to-review.r/MALFORMED.d/input.cbl", "content": " ******************************************************************\n * Author:\n * Date:\n * Purpose:\n * Tectonics: cobc\n ******************************************************************\n PROGRAM-ID. YOUR-PROGRAM-NAME.\n IDENTIFICATION DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n CONFIGURATION SECTION.\n *-----------------------\n INPUT-OUTPUT SECTION.\n *-----------------------\n DATA DIVISION.\n 01 var PIC 99.\n 02 generate-a-p\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n FILE SECTION.\n *-----------------------\n WORKING-STORAGE SECTION.\n ENVIRONMENT DIVISION.\n *-----------------------\n PROCEDURE DIVISION.\n *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-\n MAIN-PROCEDURE.\n **\n * The main procedure of the program\n **\n DISPLAY \"Hello world\"\n\n STOP RUN.\n ** add other procedures here\n END PROGRAM YOUR-PROGRAM-NAME.\n" }, { "path": "Units/parser-cobol-to-review.r/README", "content": "Imported from https://github.com/OpenCobolIDE/OpenCobolIDE/tree/master/test/testfiles.\n\nhttps://github.com/OpenCobolIDE/OpenCobolIDE/ is GPLv3\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-PRINTER.d/expected.tags", "content": "BUF-NB-LIGNES-PAR-PAGE\tinput.cbl\t/^ 01 BUF-NB-LIGNES-PAR-PAGE PIC 99 VALUE 10.$/;\"\td\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nHELLO-WORLD\tinput.cbl\t/^ HELLO-WORLD.$/;\"\tp\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPA-BUFFER\tinput.cbl\t/^ 02 PA-BUFFER PIC X(80) VALUE SPACES .$/;\"\td\tgroup:PRINTER-PARAM\nPA-HOWMANY\tinput.cbl\t/^ 02 PA-HOWMANY PIC 99 VALUE 1 .$/;\"\td\tgroup:PRINTER-PARAM\nPA-RESET\tinput.cbl\t/^ 02 PA-RESET PIC X VALUE \"N\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHAT\tinput.cbl\t/^ 02 PA-WHAT PIC X(5) VALUE \"LINES\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHEN\tinput.cbl\t/^ 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .$/;\"\td\tgroup:PRINTER-PARAM\nPRINTER-PARAM\tinput.cbl\t/^ 01 PRINTER-PARAM.$/;\"\tg\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nTEST-PRINTER\tinput.cbl\t/^ PROGRAM-ID. TEST-PRINTER.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-PRINTER.d/input.cbl", "content": " *******************************************************************\n **=================================================================\n ** Ce programme teste le module VIRTUAL-PRINTER\n **\n ** Auteurs: Colin Duquesnoy, Thomas Bertels\n ** Date: Mai 2013\n *******************************************************************\n IDENTIFICATION DIVISION.\n **************************************\n PROGRAM-ID. TEST-PRINTER.\n **\n ENVIRONMENT DIVISION.\n **************************************\n **\n INPUT-OUTPUT SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n DATA DIVISION.\n **************************************\n FILE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n WORKING-STORAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n 01 PRINTER-PARAM.\n 02 PA-RESET PIC X VALUE \"N\" .\n 02 PA-BUFFER PIC X(80) VALUE SPACES .\n 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .\n 02 PA-WHAT PIC X(5) VALUE \"LINES\" .\n 02 PA-HOWMANY PIC 99 VALUE 1 .\n 01 BUF-NB-LIGNES-PAR-PAGE PIC 99 VALUE 10.\n **\n PROCEDURE DIVISION.\n **************************************\n MAIN-PROCEDURE.\n DISPLAY \"Proj UF31: Test virtual printer\"\n\n DISPLAY \"Combien de lignes par pages desirez-vous ?\"\n ACCEPT BUF-NB-LIGNES-PAR-PAGE\n\n MOVE \"O\" TO PA-RESET\n01234A call\n \"VIRTUAL-PRINTER\" using PRINTER-PARAM\n\n MOVE \"Bonjour\" TO PA-BUFFER\n01234A call\n \"VIRTUAL-PRINTER\" using PRINTER-PARAM\n\n MOVE \"La vie est dure et pleine de confiture\" to PA-BUFFER\n MOVE \"LINES\" TO PA-WHAT\n MOVE \"BEFORE\" TO PA-WHEN\n MOVE 5 TO PA-HOWMANY\n01234A call\n \"VIRTUAL-PRINTER\"\n using\n PRINTER-PARAM\n\n MOVE \"Bonjour\" TO PA-BUFFER\n MOVE \"PAGE\" TO PA-WHAT\n MOVE \"BEFORE\" TO PA-WHEN\n01234A call\n \"VIRTUAL-PRINTER\" using PRINTER-PARAM\n\n MOVE \"Bye bye\" TO PA-BUFFER\n01234A call\n \"VIRTUAL-PRINTER\" using PRINTER-PARAM\n\n DISPLAY \"End\"\n STOP RUN.\n HELLO-WORLD.\n DISPLAY \"Hello World!!\".\n END PROGRAM TEST-PRINTER.\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-PRINTER2.d/expected.tags", "content": "BUF-NB-LIGNES-PAR-PAGE\tinput.cbl\t/^ 01 BUF-NB-LIGNES-PAR-PAGE PIC 99 VALUE 10.$/;\"\td\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPA-BUFFER\tinput.cbl\t/^ 02 PA-BUFFER PIC X(80) VALUE SPACES .$/;\"\td\tgroup:PRINTER-PARAM\nPA-HOWMANY\tinput.cbl\t/^ 02 PA-HOWMANY PIC 99 VALUE 1 .$/;\"\td\tgroup:PRINTER-PARAM\nPA-RESET\tinput.cbl\t/^ 02 PA-RESET PIC X VALUE \"N\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHAT\tinput.cbl\t/^ 02 PA-WHAT PIC X(5) VALUE \"LINES\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHEN\tinput.cbl\t/^ 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .$/;\"\td\tgroup:PRINTER-PARAM\nPRINTER-PARAM\tinput.cbl\t/^ 01 PRINTER-PARAM.$/;\"\tg\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nTEST-PRINTER\tinput.cbl\t/^ PROGRAM-ID. TEST-PRINTER.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-PRINTER2.d/input.cbl", "content": " *******************************************************************\n **=================================================================\n ** Ce programme teste le module VIRTUAL-PRINTER\n **\n ** Auteurs: Colin Duquesnoy, Thomas Bertels\n ** Date: Mai 2013\n *******************************************************************\n IDENTIFICATION DIVISION.\n **************************************\n PROGRAM-ID. TEST-PRINTER.\n **\n ENVIRONMENT DIVISION.\n **************************************\n **\n INPUT-OUTPUT SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n DATA DIVISION.\n **************************************\n FILE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n WORKING-STORAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n 01 PRINTER-PARAM.\n 02 PA-RESET PIC X VALUE \"N\" .\n 02 PA-BUFFER PIC X(80) VALUE SPACES .\n 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .\n 02 PA-WHAT PIC X(5) VALUE \"LINES\" .\n 02 PA-HOWMANY PIC 99 VALUE 1 .\n 01 BUF-NB-LIGNES-PAR-PAGE PIC 99 VALUE 10.\n **\n PROCEDURE DIVISION.\n **************************************\n MAIN-PROCEDURE.\n DISPLAY \"Proj UF31: Test virtual printer\"\n\n DISPLAY \"Combien de lignes par pages desirez-vous ?\"\n ACCEPT BUF-NB-LIGNES-PAR-PAGE\n\n MOVE \"O\" TO PA-RESET\n CALL \"VIRTUAL-PRINTER\"\n USING PRINTER-PARAM\n\n CALL \"VIRTUAL-PRINTER2\"\n USING PRINTER-PARAM\n END PROGRAM TEST-PRINTER.\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-PRINTER3.d/expected.tags", "content": "BUF-NB-LIGNES-PAR-PAGE\tinput.cbl\t/^ 01 BUF-NB-LIGNES-PAR-PAGE PIC 99 VALUE 10.$/;\"\td\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nHELLO-WORLD\tinput.cbl\t/^ HELLO-WORLD.$/;\"\tp\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPA-BUFFER\tinput.cbl\t/^ 02 PA-BUFFER PIC X(80) VALUE SPACES .$/;\"\td\tgroup:PRINTER-PARAM\nPA-HOWMANY\tinput.cbl\t/^ 02 PA-HOWMANY PIC 99 VALUE 1 .$/;\"\td\tgroup:PRINTER-PARAM\nPA-RESET\tinput.cbl\t/^ 02 PA-RESET PIC X VALUE \"N\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHAT\tinput.cbl\t/^ 02 PA-WHAT PIC X(5) VALUE \"LINES\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHEN\tinput.cbl\t/^ 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .$/;\"\td\tgroup:PRINTER-PARAM\nPRINTER-PARAM\tinput.cbl\t/^ 01 PRINTER-PARAM.$/;\"\tg\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nTEST-PRINTER\tinput.cbl\t/^ PROGRAM-ID. TEST-PRINTER.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-PRINTER3.d/input.cbl", "content": " *******************************************************************\n **=================================================================\n ** Ce programme teste le module VIRTUAL-PRINTER\n **\n ** Auteurs: Colin Duquesnoy, Thomas Bertels\n ** Date: Mai 2013\n *******************************************************************\n IDENTIFICATION DIVISION.\n **************************************\n PROGRAM-ID. TEST-PRINTER.\n **\n ENVIRONMENT DIVISION.\n **************************************\n **\n INPUT-OUTPUT SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n DATA DIVISION.\n **************************************\n FILE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n WORKING-STORAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n 01 PRINTER-PARAM.\n 02 PA-RESET PIC X VALUE \"N\" .\n 02 PA-BUFFER PIC X(80) VALUE SPACES .\n 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .\n 02 PA-WHAT PIC X(5) VALUE \"LINES\" .\n 02 PA-HOWMANY PIC 99 VALUE 1 .\n 01 BUF-NB-LIGNES-PAR-PAGE PIC 99 VALUE 10.\n **\n PROCEDURE DIVISION.\n **************************************\n MAIN-PROCEDURE.\n DISPLAY \"Proj UF31: Test virtual printer\"\n\n DISPLAY \"Combien de lignes par pages desirez-vous ?\"\n ACCEPT BUF-NB-LIGNES-PAR-PAGE\n\n MOVE \"O\" TO PA-RESET\n CALL \"VIRTUAL-PRINTER\" USING PRINTER-PARAM\n\n MOVE \"Bonjour\" TO PA-BUFFER\n CALL \"VIRTUAL-PRINTER\" USING PRINTER-PARAM\n\n MOVE \"La vie est dure et pleine de confiture\" to PA-BUFFER\n MOVE \"LINES\" TO PA-WHAT\n MOVE \"BEFORE\" TO PA-WHEN\n MOVE 5 TO PA-HOWMANY\n CALL \"VIRTUAL-PRINTER\" USING PRINTER-PARAM\n\n MOVE \"Bonjour\" TO PA-BUFFER\n MOVE \"PAGE\" TO PA-WHAT\n MOVE \"BEFORE\" TO PA-WHEN\n CALL \"VIRTUAL-PRINTER\" USING PRINTER-PARAM\n\n MOVE \"Bye bye\" TO PA-BUFFER\n CALL \"VIRTUAL-PRINTER\" USING PRINTER-PARAM\n\n DISPLAY \"End\"\n STOP RUN.\n HELLO-WORLD.\n DISPLAY \"Hello World!!\".\n END PROGRAM TEST-PRINTER.\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-SINGLE-QUOTES.d/expected.tags", "content": "DATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nHELLO-WORLD\tinput.cbl\t/^ HELLO-WORLD.$/;\"\tp\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nPA-BUFFER\tinput.cbl\t/^ 02 PA-BUFFER PIC X(80) VALUE SPACES .$/;\"\td\tgroup:PRINTER-PARAM\nPA-HOWMANY\tinput.cbl\t/^ 02 PA-HOWMANY PIC 99 VALUE 1 .$/;\"\td\tgroup:PRINTER-PARAM\nPA-RESET\tinput.cbl\t/^ 02 PA-RESET PIC X VALUE \"N\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHAT\tinput.cbl\t/^ 02 PA-WHAT PIC X(5) VALUE \"LINES\" .$/;\"\td\tgroup:PRINTER-PARAM\nPA-WHEN\tinput.cbl\t/^ 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .$/;\"\td\tgroup:PRINTER-PARAM\nPRINTER-PARAM\tinput.cbl\t/^ 01 PRINTER-PARAM.$/;\"\tg\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nTEST-PRINTER\tinput.cbl\t/^ PROGRAM-ID. TEST-PRINTER.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/TEST-SINGLE-QUOTES.d/input.cbl", "content": " *******************************************************************\n **=================================================================\n ** Ce programme teste le module VIRTUAL-PRINTER\n **\n ** Auteurs: Colin Duquesnoy, Thomas Bertels\n ** Date: Mai 2013\n *******************************************************************\n IDENTIFICATION DIVISION.\n **************************************\n PROGRAM-ID. TEST-PRINTER.\n **\n ENVIRONMENT DIVISION.\n **************************************\n **\n INPUT-OUTPUT SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n DATA DIVISION.\n **************************************\n FILE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n **\n WORKING-STORAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n 01 PRINTER-PARAM.\n 02 PA-RESET PIC X VALUE \"N\" .\n 02 PA-BUFFER PIC X(80) VALUE SPACES .\n 02 PA-WHEN PIC X(6) VALUE \"AFTER\" .\n 02 PA-WHAT PIC X(5) VALUE \"LINES\" .\n 02 PA-HOWMANY PIC 99 VALUE 1 .\n **\n PROCEDURE DIVISION.\n **************************************\n MAIN-PROCEDURE.\n DISPLAY \"Proj UF31: Test virtual printer\"\n\n MOVE \"O\" TO PA-RESET\n CALL 'VIRTUAL-PRINTER' USING PRINTER-PARAM\n\n MOVE \"Bonjour\" TO PA-BUFFER\n CALL 'VIRTUAL-PRINTER' USING PRINTER-PARAM\n\n MOVE \"La vie est dure et pleine de confiture\" to PA-BUFFER\n MOVE \"LINES\" TO PA-WHAT\n MOVE \"BEFORE\" TO PA-WHEN\n MOVE 5 TO PA-HOWMANY\n CALL 'VIRTUAL-PRINTER' USING PRINTER-PARAM\n\n MOVE \"Bonjour\" TO PA-BUFFER\n MOVE \"PAGE\" TO PA-WHAT\n MOVE \"BEFORE\" TO PA-WHEN\n CALL 'VIRTUAL-PRINTER' USING PRINTER-PARAM\n\n MOVE \"Bye bye\" TO PA-BUFFER\n CALL 'VIRTUAL-PRINTER' USING PRINTER-PARAM\n\n DISPLAY \"End\"\n STOP RUN.\n HELLO-WORLD.\n DISPLAY \"Hello World!!\".\n END PROGRAM TEST-PRINTER.\n" }, { "path": "Units/parser-cobol-to-review.r/VIRTUAL-PRINTER.d/expected.tags", "content": "DATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENREG-PRINTER\tinput.cbl\t/^ 01 ENREG-PRINTER PIC X(80).$/;\"\td\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nFILE-CONTROL\tinput.cbl\t/^ FILE-CONTROL.$/;\"\tp\nFPRINTER\tinput.cbl\t/^ FD FPRINTER.$/;\"\tf\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nLINKAGE\tinput.cbl\t/^ LINKAGE SECTION.$/;\"\ts\nMAIN-PRINTER\tinput.cbl\t/^ MAIN-PRINTER.$/;\"\tp\nPA-BUFFER\tinput.cbl\t/^ 02 PA-BUFFER PIC X(80) .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-HOWMANY\tinput.cbl\t/^ 02 PA-HOWMANY PIC 99 .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-RESET\tinput.cbl\t/^ 02 PA-RESET PIC X .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-WHAT\tinput.cbl\t/^ 02 PA-WHAT PIC X(5) .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-WHEN\tinput.cbl\t/^ 02 PA-WHEN PIC X(6) .$/;\"\td\tgroup:RECEIVED-PARAM\nRECEIVED-PARAM\tinput.cbl\t/^ 01 RECEIVED-PARAM.$/;\"\tg\nVIRTUAL-PRINTER\tinput.cbl\t/^ PROGRAM-ID. VIRTUAL-PRINTER.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/VIRTUAL-PRINTER.d/input.cbl", "content": " *******************************************************************\n ** Virtual printer subprogram\n *******************************************************************\n IDENTIFICATION DIVISION.\n **************************************\n PROGRAM-ID. VIRTUAL-PRINTER.\n **\n ENVIRONMENT DIVISION.\n ***************************************\n **\n INPUT-OUTPUT SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n FILE-CONTROL.\n SELECT FPRINTER ASSIGN to \"./printer.dat\"\n ORGANIZATION LINE SEQUENTIAL\n ACCESS SEQUENTIAL.\n **\n DATA DIVISION.\n **************************************\n FILE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n FD FPRINTER.\n 01 ENREG-PRINTER PIC X(80).\n **\n WORKING-STORAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n LINKAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n 01 RECEIVED-PARAM.\n 02 PA-RESET PIC X .\n 02 PA-BUFFER PIC X(80) .\n 02 PA-WHEN PIC X(6) .\n 02 PA-WHAT PIC X(5) .\n 02 PA-HOWMANY PIC 99 .\n PROCEDURE DIVISION USING RECEIVED-PARAM.\n **************************************\n MAIN-PRINTER.\n IF(PA-RESET = \"O\")\n OPEN OUTPUT FPRINTER\n if(PA-WHEN = \"AFTER\")\n if(PA-WHEN = \"AFTER\")\n WRITE ENREG-PRINTER\n END-IF\n END-IF\n ELSE\n OPEN EXTEND FPRINTER\n IF(PA-WHEN = \"AFTER\")\n IF(PA-WHAT = \"PAGE\")\n MOVE '>------------------------------------------'\n -'------------------------------------<' TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n ELSE\n SUBTRACT 1 FROM PA-HOWMANY\n PERFORM PA-HOWMANY TIMES\n MOVE SPACES TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n END-PERFORM\n END-IF\n END-IF\n WRITE ENREG-PRINTER FROM PA-BUFFER\n IF(PA-WHEN = \"BEFORE\")\n IF(PA-WHAT = \"PAGE\")\n MOVE '>------------------------------------------'\n -'------------------------------------<' TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n ELSE\n SUBTRACT 1 FROM PA-HOWMANY\n PERFORM PA-HOWMANY TIMES\n MOVE SPACES TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n END-PERFORM\n END-IF\n END-IF\n END-IF\n CLOSE FPRINTER\n MOVE \"N\" TO PA-RESET\n MOVE SPACES TO PA-BUFFER\n MOVE \"AFTER\" TO PA-WHEN\n MOVE \"LINES\" TO PA-WHAT\n MOVE 1 TO PA-HOWMANY\n EXIT PROGRAM.\n END PROGRAM VIRTUAL-PRINTER.\n" }, { "path": "Units/parser-cobol-to-review.r/VIRTUAL-PRINTER2.d/args.ctags", "content": "--language-force=CobolVariable\n" }, { "path": "Units/parser-cobol-to-review.r/VIRTUAL-PRINTER2.d/expected.tags", "content": "DATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nENREG-PRINTER\tinput.cbl\t/^ 01 ENREG-PRINTER PIC X(80).$/;\"\td\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nFILE-CONTROL\tinput.cbl\t/^ FILE-CONTROL.$/;\"\tp\nFPRINTER\tinput.cbl\t/^ FD FPRINTER.$/;\"\tf\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUTPUT\tinput.cbl\t/^ INPUT-OUTPUT SECTION.$/;\"\ts\nLINKAGE\tinput.cbl\t/^ LINKAGE SECTION.$/;\"\ts\nMAIN-PRINTER\tinput.cbl\t/^ MAIN-PRINTER.$/;\"\tp\nPA-BUFFER\tinput.cbl\t/^ 02 PA-BUFFER PIC X(80) .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-HOWMANY\tinput.cbl\t/^ 02 PA-HOWMANY PIC 99 .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-RESET\tinput.cbl\t/^ 02 PA-RESET PIC X .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-WHAT\tinput.cbl\t/^ 02 PA-WHAT PIC X(5) .$/;\"\td\tgroup:RECEIVED-PARAM\nPA-WHEN\tinput.cbl\t/^ 02 PA-WHEN PIC X(6) .$/;\"\td\tgroup:RECEIVED-PARAM\nRECEIVED-PARAM\tinput.cbl\t/^ RECEIVED-PARAM.$/;\"\tp\nRECEIVED-PARAM\tinput.cbl\t/^ 01 RECEIVED-PARAM.$/;\"\tg\nVIRTUAL-PRINTER\tinput.cbl\t/^ PROGRAM-ID. VIRTUAL-PRINTER.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review.r/VIRTUAL-PRINTER2.d/input.cbl", "content": " *******************************************************************\n ** Virtual printer subprogram\n *******************************************************************\n IDENTIFICATION DIVISION.\n **************************************\n PROGRAM-ID. VIRTUAL-PRINTER.\n **\n ENVIRONMENT DIVISION.\n ***************************************\n **\n INPUT-OUTPUT SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n FILE-CONTROL.\n SELECT FPRINTER ASSIGN to \"./printer.dat\"\n ORGANIZATION LINE SEQUENTIAL\n ACCESS SEQUENTIAL.\n **\n DATA DIVISION.\n **************************************\n FILE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n FD FPRINTER.\n 01 ENREG-PRINTER PIC X(80).\n **\n WORKING-STORAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n LINKAGE SECTION.\n **-*-*-*-*-*-*-*-*-*-*-*-*-*\n 01 RECEIVED-PARAM.\n 02 PA-RESET PIC X .\n 02 PA-BUFFER PIC X(80) .\n 02 PA-WHEN PIC X(6) .\n 02 PA-WHAT PIC X(5) .\n 02 PA-HOWMANY PIC 99 .\n PROCEDURE DIVISION\n USING\n RECEIVED-PARAM.\n **************************************\n MAIN-PRINTER.\n IF(PA-RESET = \"O\")\n OPEN OUTPUT FPRINTER\n ELSE\n OPEN EXTEND FPRINTER\n IF(PA-WHEN = \"AFTER\")\n IF(PA-WHAT = \"PAGE\")\n MOVE '>------------------------------------------'\n -'------------------------------------<' TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n ELSE\n SUBTRACT 1 FROM PA-HOWMANY\n PERFORM PA-HOWMANY TIMES\n MOVE SPACES TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n END-PERFORM\n END-IF\n END-IF\n WRITE ENREG-PRINTER FROM PA-BUFFER\n IF(PA-WHEN = \"BEFORE\")\n IF(PA-WHAT = \"PAGE\")\n MOVE '>------------------------------------------'\n -'------------------------------------<' TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n ELSE\n SUBTRACT 1 FROM PA-HOWMANY\n PERFORM PA-HOWMANY TIMES\n MOVE SPACES TO ENREG-PRINTER\n WRITE ENREG-PRINTER\n END-PERFORM\n END-IF\n END-IF\n END-IF\n CLOSE FPRINTER\n MOVE \"N\" TO PA-RESET\n MOVE SPACES TO PA-BUFFER\n MOVE \"AFTER\" TO PA-WHEN\n MOVE \"LINES\" TO PA-WHAT\n MOVE 1 TO PA-HOWMANY\n EXIT PROGRAM.\n END PROGRAM VIRTUAL-PRINTER.\n" }, { "path": "Units/parser-cobol-to-review2.r/FETCHTBL.d/expected.tags", "content": "AUTHOR\tinput.cbl\t/^ AUTHOR. TSH.$/;\"\tp\nD-EMP-NAME\tinput.cbl\t/^ 05 D-EMP-NAME PIC X(20).$/;\"\td\tgroup:D-EMP-REC\nD-EMP-NO\tinput.cbl\t/^ 05 D-EMP-NO PIC 9(04).$/;\"\td\tgroup:D-EMP-REC\nD-EMP-REC\tinput.cbl\t/^ 01 D-EMP-REC.$/;\"\tg\nD-EMP-SALARY\tinput.cbl\t/^ 05 D-EMP-SALARY PIC --,--9.$/;\"\td\tgroup:D-EMP-REC\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nDATE-WRITTEN\tinput.cbl\t/^ DATE-WRITTEN. 2013-06-28.$/;\"\tp\nDBNAME\tinput.cbl\t/^ 01 DBNAME PIC X(30) VALUE SPACE.$/;\"\td\nEMP-CNT\tinput.cbl\t/^ 01 EMP-CNT PIC 9(04).$/;\"\td\nEMP-NAME\tinput.cbl\t/^ 05 EMP-NAME PIC X(20) .$/;\"\td\tgroup:EMP-REC-VARS\nEMP-NO\tinput.cbl\t/^ 05 EMP-NO PIC S9(04).$/;\"\td\tgroup:EMP-REC-VARS\nEMP-REC-VARS\tinput.cbl\t/^ 01 EMP-REC-VARS.$/;\"\tg\nEMP-SALARY\tinput.cbl\t/^ 05 EMP-SALARY PIC S9(04).$/;\"\td\tgroup:EMP-REC-VARS\nEND-EVALUATE\tinput.cbl\t/^ END-EVALUATE.$/;\"\tp\nEND-PERFORM\tinput.cbl\t/^ END-PERFORM.$/;\"\tp\nERROR-RTN\tinput.cbl\t/^ ERROR-RTN.$/;\"\tp\nFETCHTBL\tinput.cbl\t/^ PROGRAM-ID. FETCHTBL.$/;\"\tP\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nMAIN-RTN\tinput.cbl\t/^ MAIN-RTN.$/;\"\tp\nPASSWD\tinput.cbl\t/^ 01 PASSWD PIC X(10) VALUE SPACE.$/;\"\td\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nUSERNAME\tinput.cbl\t/^ 01 USERNAME PIC X(30) VALUE SPACE.$/;\"\td\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review2.r/FETCHTBL.d/input.cbl", "content": " ******************************************************************\n * Open Cobol ESQL (Ocesql) Sample Program\n *\n * FETCHTBL --- demonstrates CONNECT, SELECT COUNT(*), \n * DECLARE cursor, FETCH cursor, COMMIT, \n * ROLLBACK, DISCONNECT\n *\n * Copyright 2013 Tokyo System House Co., Ltd.\n ******************************************************************\n IDENTIFICATION DIVISION.\n ******************************************************************\n PROGRAM-ID. FETCHTBL.\n AUTHOR. TSH.\n DATE-WRITTEN. 2013-06-28.\n\n ******************************************************************\n DATA DIVISION.\n ******************************************************************\n WORKING-STORAGE SECTION.\n 01 D-EMP-REC.\n 05 D-EMP-NO PIC 9(04).\n 05 FILLER PIC X.\n 05 D-EMP-NAME PIC X(20).\n 05 FILLER PIC X.\n 05 D-EMP-SALARY PIC --,--9.\n\n EXEC SQL BEGIN DECLARE SECTION END-EXEC.\n 01 DBNAME PIC X(30) VALUE SPACE.\n 01 USERNAME PIC X(30) VALUE SPACE.\n 01 PASSWD PIC X(10) VALUE SPACE.\n 01 EMP-REC-VARS.\n 05 EMP-NO PIC S9(04).\n 05 EMP-NAME PIC X(20) .\n 05 EMP-SALARY PIC S9(04).\n 01 EMP-CNT PIC 9(04).\n EXEC SQL END DECLARE SECTION END-EXEC.\n\n EXEC SQL INCLUDE SQLCA END-EXEC.\n ******************************************************************\n PROCEDURE DIVISION.\n ******************************************************************\n MAIN-RTN.\n DISPLAY \"*** FETCHTBL STARTED ***\".\n \n * WHENEVER IS NOT YET SUPPORTED :(\n * EXEC SQL WHENEVER SQLERROR PERFORM ERROR-RTN END-EXEC.\n \n * CONNECT\n MOVE \"testdb\" TO DBNAME.\n MOVE \"postgres\" TO USERNAME.\n MOVE SPACE TO PASSWD.\n EXEC SQL\n CONNECT :USERNAME IDENTIFIED BY :PASSWD USING :DBNAME \n END-EXEC.\n IF SQLCODE NOT = ZERO PERFORM ERROR-RTN STOP RUN.\n \n * SELECT COUNT(*) INTO HOST-VARIABLE\n EXEC SQL \n SELECT COUNT(*) INTO :EMP-CNT FROM EMP\n END-EXEC.\n DISPLAY \"TOTAL RECORD: \" EMP-CNT.\n \n * DECLARE CURSOR\n EXEC SQL \n DECLARE C1 CURSOR FOR\n SELECT EMP_NO, EMP_NAME, EMP_SALARY \n FROM EMP\n ORDER BY EMP_NO\n END-EXEC.\n EXEC SQL\n OPEN C1\n END-EXEC.\n \n * FETCH\n DISPLAY \"---- -------------------- ------\".\n DISPLAY \"NO NAME SALARY\".\n DISPLAY \"---- -------------------- ------\".\n EXEC SQL \n FETCH C1 INTO :EMP-NO, :EMP-NAME, :EMP-SALARY\n END-EXEC.\n PERFORM UNTIL SQLCODE NOT = ZERO\n MOVE EMP-NO TO D-EMP-NO\n MOVE EMP-NAME TO D-EMP-NAME\n MOVE EMP-SALARY TO D-EMP-SALARY\n DISPLAY D-EMP-REC\n EXEC SQL \n FETCH C1 INTO :EMP-NO, :EMP-NAME, :EMP-SALARY\n END-EXEC\n END-PERFORM.\n \n * CLOSE CURSOR\n EXEC SQL \n CLOSE C1 \n END-EXEC. \n \n * COMMIT\n EXEC SQL \n COMMIT WORK\n END-EXEC.\n \n * DISCONNECT\n EXEC SQL\n DISCONNECT ALL\n END-EXEC.\n \n * END\n DISPLAY \"*** FETCHTBL FINISHED ***\".\n STOP RUN.\n\n ******************************************************************\n ERROR-RTN.\n ******************************************************************\n DISPLAY \"*** SQL ERROR ***\".\n DISPLAY \"SQLCODE: \" SQLCODE \" \" NO ADVANCING.\n EVALUATE SQLCODE\n WHEN +10\n DISPLAY \"Record not found\"\n WHEN -01\n DISPLAY \"Connection falied\"\n WHEN -20\n DISPLAY \"Internal error\"\n WHEN -30\n DISPLAY \"PostgreSQL error\"\n DISPLAY \"ERRCODE: \" SQLSTATE\n DISPLAY SQLERRMC\n *> TO RESTART TRANSACTION, DO ROLLBACK.\n EXEC SQL\n ROLLBACK\n END-EXEC\n WHEN OTHER\n DISPLAY \"Undefined error\"\n DISPLAY \"ERRCODE: \" SQLSTATE\n DISPLAY SQLERRMC\n END-EVALUATE.\n ******************************************************************\n\n" }, { "path": "Units/parser-cobol-to-review2.r/INSERTTBL.d/expected.tags", "content": "AUTHOR\tinput.cbl\t/^ AUTHOR. TSH.$/;\"\tp\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nDATE-WRITTEN\tinput.cbl\t/^ DATE-WRITTEN. 2013-06-28.$/;\"\tp\nDBNAME\tinput.cbl\t/^ 01 DBNAME PIC X(30) VALUE SPACE.$/;\"\td\nEMP-NAME\tinput.cbl\t/^ 03 EMP-NAME PIC X(20) .$/;\"\td\tgroup:EMP-REC-VARS\nEMP-NO\tinput.cbl\t/^ 03 EMP-NO PIC S9(04) VALUE ZERO.$/;\"\td\tgroup:EMP-REC-VARS\nEMP-REC-VARS\tinput.cbl\t/^ 01 EMP-REC-VARS.$/;\"\tg\nEMP-SALARY\tinput.cbl\t/^ 03 EMP-SALARY PIC S9(04) VALUE ZERO.$/;\"\td\tgroup:EMP-REC-VARS\nEND-EVALUATE\tinput.cbl\t/^ END-EVALUATE.$/;\"\tp\nEND-PERFORM\tinput.cbl\t/^ END-PERFORM.$/;\"\tp\nERROR-RTN\tinput.cbl\t/^ ERROR-RTN.$/;\"\tp\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nIDX\tinput.cbl\t/^ 01 IDX PIC 9(02).$/;\"\td\nINSERTTBL\tinput.cbl\t/^ PROGRAM-ID. INSERTTBL.$/;\"\tP\nMAIN-RTN\tinput.cbl\t/^ MAIN-RTN.$/;\"\tp\nPASSWD\tinput.cbl\t/^ 01 PASSWD PIC X(10) VALUE SPACE.$/;\"\td\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nSYS-TIME\tinput.cbl\t/^ 01 SYS-TIME PIC 9(08).$/;\"\td\nTEST-DATA\tinput.cbl\t/^ 01 TEST-DATA.$/;\"\tg\nTEST-DATA-R\tinput.cbl\t/^ 01 TEST-DATA-R REDEFINES TEST-DATA.$/;\"\td\nTEST-NAME\tinput.cbl\t/^ 05 TEST-NAME PIC X(20) .$/;\"\td\tdata:TEST-DATA-R.TEST-TBL\nTEST-NO\tinput.cbl\t/^ 05 TEST-NO PIC S9(04).$/;\"\td\tdata:TEST-DATA-R.TEST-TBL\nTEST-SALARY\tinput.cbl\t/^ 05 TEST-SALARY PIC S9(04).$/;\"\td\tdata:TEST-DATA-R.TEST-TBL\nTEST-TBL\tinput.cbl\t/^ 03 TEST-TBL OCCURS 10.$/;\"\td\tdata:TEST-DATA-R\nUSERNAME\tinput.cbl\t/^ 01 USERNAME PIC X(30) VALUE SPACE.$/;\"\td\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol-to-review2.r/INSERTTBL.d/input.cbl", "content": " ******************************************************************\n * Open Cobol ESQL (Ocesql) Sample Program\n *\n * INSERTTBL -- demonstrates CONNECT, DROP TABLE, CREATE TABLE, \n * INSERT rows, COMMIT, ROLLBACK, DISCONNECT\n *\n * Copyright 2013 Tokyo System House Co., Ltd.\n ******************************************************************\n IDENTIFICATION DIVISION.\n ******************************************************************\n PROGRAM-ID. INSERTTBL.\n AUTHOR. TSH.\n DATE-WRITTEN. 2013-06-28.\n\n ******************************************************************\n DATA DIVISION.\n ******************************************************************\n WORKING-STORAGE SECTION.\n 01 TEST-DATA.\n *>\"---+++++++++++++++++++++----\"\n * 03 FILLER PIC X(28) VALUE \"0001HOKKAI TARO 0400\".\n * 03 FILLER PIC X(28) VALUE \"0002AOMORI JIRO 0350\".\n * 03 FILLER PIC X(28) VALUE \"0003AKITA SABURO 0300\".\n * 03 FILLER PIC X(28) VALUE \"0004IWATE SHIRO 025p\".\n * 03 FILLER PIC X(28) VALUE \"0005MIYAGI GORO 020p\".\n * 03 FILLER PIC X(28) VALUE \"0006FUKUSHIMA RIKURO 0150\".\n * 03 FILLER PIC X(28) VALUE \"0007TOCHIGI SHICHIRO 010p\".\n * 03 FILLER PIC X(28) VALUE \"0008IBARAKI HACHIRO 0050\".\n * 03 FILLER PIC X(28) VALUE \"0009GUMMA KURO 020p\".\n * 03 FILLER PIC X(28) VALUE \"0010SAITAMA JURO 0350\".\n 03 FILLER PIC X(28) VALUE \"0001kC@Y 0400\".\n 03 FILLER PIC X(28) VALUE \"0002X@Y 0350\".\n 03 FILLER PIC X(28) VALUE \"0003Hc@OY 0300\".\n 03 FILLER PIC X(28) VALUE \"0004@lY 025p\".\n 03 FILLER PIC X(28) VALUE \"0005{@ܘY 020p\".\n 03 FILLER PIC X(28) VALUE \"0006@ZY 0150\".\n 03 FILLER PIC X(28) VALUE \"0007Ȗ؁@Y 010p\".\n 03 FILLER PIC X(28) VALUE \"0008@Y 0050\".\n 03 FILLER PIC X(28) VALUE \"0009Qn@Y 020p\".\n 03 FILLER PIC X(28) VALUE \"0010ʁ@\\Y 0350\".\n 01 TEST-DATA-R REDEFINES TEST-DATA.\n 03 TEST-TBL OCCURS 10.\n 05 TEST-NO PIC S9(04).\n 05 TEST-NAME PIC X(20) .\n 05 TEST-SALARY PIC S9(04).\n 01 IDX PIC 9(02).\n 01 SYS-TIME PIC 9(08).\n \n EXEC SQL BEGIN DECLARE SECTION END-EXEC.\n 01 DBNAME PIC X(30) VALUE SPACE.\n 01 USERNAME PIC X(30) VALUE SPACE.\n 01 PASSWD PIC X(10) VALUE SPACE.\n 01 EMP-REC-VARS.\n 03 EMP-NO PIC S9(04) VALUE ZERO.\n 03 EMP-NAME PIC X(20) .\n 03 EMP-SALARY PIC S9(04) VALUE ZERO.\n EXEC SQL END DECLARE SECTION END-EXEC.\n\n EXEC SQL INCLUDE SQLCA END-EXEC.\n ******************************************************************\n PROCEDURE DIVISION.\n ******************************************************************\n MAIN-RTN.\n DISPLAY \"*** INSERTTBL STARTED ***\".\n\n * WHENEVER IS NOT YET SUPPORTED :(\n * EXEC SQL WHENEVER SQLERROR PERFORM ERROR-RTN END-EXEC.\n \n * CONNECT\n MOVE \"testdb\" TO DBNAME.\n MOVE \"postgres\" TO USERNAME.\n MOVE SPACE TO PASSWD.\n EXEC SQL\n CONNECT :USERNAME IDENTIFIED BY :PASSWD USING :DBNAME \n END-EXEC.\n IF SQLCODE NOT = ZERO PERFORM ERROR-RTN STOP RUN.\n \n * DROP TABLE\n EXEC SQL\n DROP TABLE IF EXISTS EMP\n END-EXEC.\n IF SQLCODE NOT = ZERO PERFORM ERROR-RTN.\n \n * CREATE TABLE \n EXEC SQL\n CREATE TABLE EMP\n (\n EMP_NO NUMERIC(4,0) NOT NULL,\n EMP_NAME CHAR(20),\n EMP_SALARY NUMERIC(4,0),\n CONSTRAINT IEMP_0 PRIMARY KEY (EMP_NO)\n )\n END-EXEC.\n IF SQLCODE NOT = ZERO PERFORM ERROR-RTN STOP RUN.\n \n * INSERT ROWS USING LITERAL\n EXEC SQL\n * INSERT INTO EMP VALUES (46, 'KAGOSHIMA ROKURO', -320)\n INSERT INTO EMP VALUES (46, '@ZY', -320)\n END-EXEC.\n IF SQLCODE NOT = ZERO PERFORM ERROR-RTN.\n\n EXEC SQL\n * INSERT INTO EMP VALUES (47, 'OKINAWA SHICHIRO', 480)\n INSERT INTO EMP VALUES (47, '@Y', 480)\n END-EXEC.\n IF SQLCODE NOT = ZERO PERFORM ERROR-RTN.\n\n * INSERT ROWS USING HOST VARIABLE\n PERFORM VARYING IDX FROM 1 BY 1 UNTIL IDX > 10\n MOVE TEST-NO(IDX) TO EMP-NO\n MOVE TEST-NAME(IDX) TO EMP-NAME\n MOVE TEST-SALARY(IDX) TO EMP-SALARY\n EXEC SQL\n INSERT INTO EMP VALUES\n (:EMP-NO,:EMP-NAME,:EMP-SALARY)\n END-EXEC\n IF SQLCODE NOT = ZERO \n PERFORM ERROR-RTN\n EXIT PERFORM\n END-IF\n END-PERFORM.\n\n * COMMIT\n EXEC SQL COMMIT WORK END-EXEC.\n \n * DISCONNECT\n EXEC SQL\n DISCONNECT ALL\n END-EXEC.\n \n * END\n DISPLAY \"*** INSERTTBL FINISHED ***\".\n STOP RUN.\n\n ******************************************************************\n ERROR-RTN.\n ******************************************************************\n DISPLAY \"*** SQL ERROR ***\".\n DISPLAY \"SQLCODE: \" SQLCODE \" \" NO ADVANCING.\n EVALUATE SQLCODE\n WHEN +10\n DISPLAY \"Record not found\"\n WHEN -01\n DISPLAY \"Connection falied\"\n WHEN -20\n DISPLAY \"Internal error\"\n WHEN -30\n DISPLAY \"PostgreSQL error\"\n DISPLAY \"ERRCODE: \" SQLSTATE\n DISPLAY SQLERRMC\n *> TO RESTART TRANSACTION, DO ROLLBACK.\n EXEC SQL\n ROLLBACK\n END-EXEC\n WHEN OTHER\n DISPLAY \"Undefined error\"\n DISPLAY \"ERRCODE: \" SQLSTATE\n DISPLAY SQLERRMC\n END-EVALUATE.\n ****************************************************************** \n" }, { "path": "Units/parser-cobol-to-review2.r/README", "content": "License: GPLv2+\n\nTaken from https://github.com/opensourcecobol/Open-COBOL-ESQL/tree/develop/sample\nand https://github.com/opensourcecobol/Open-COBOL-ESQL/blob/develop/copy/sqlca.cbl\n" }, { "path": "Units/parser-cobol-to-review2.r/sqlca.d/expected.tags", "content": "SQLCABC\tinput.cbl\t/^ 05 SQLCABC PIC S9(9) COMP-5.$/;\"\td\nSQLCAID\tinput.cbl\t/^ 05 SQLCAID PIC X(8).$/;\"\td\nSQLCODE\tinput.cbl\t/^ 05 SQLCODE PIC S9(9) COMP-5.$/;\"\td\nSQLERRD\tinput.cbl\t/^ 05 SQLERRD OCCURS 6 TIMES *> used only ERRD(3)$/;\"\td\nSQLERRM\tinput.cbl\t/^ 05 SQLERRM.$/;\"\tg\nSQLERRMC\tinput.cbl\t/^ 49 SQLERRMC PIC X(70).$/;\"\td\tgroup:SQLERRM\nSQLERRML\tinput.cbl\t/^ 49 SQLERRML PIC S9(4) COMP-5.$/;\"\td\tgroup:SQLERRM\nSQLERRP\tinput.cbl\t/^ 05 SQLERRP PIC X(8). *> not used$/;\"\td\nSQLSTATE\tinput.cbl\t/^ 05 SQLSTATE PIC X(5).$/;\"\td\nSQLWARN\tinput.cbl\t/^ 05 SQLWARN. *> not used$/;\"\tg\nSQLWARN0\tinput.cbl\t/^ 10 SQLWARN0 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN1\tinput.cbl\t/^ 10 SQLWARN1 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN2\tinput.cbl\t/^ 10 SQLWARN2 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN3\tinput.cbl\t/^ 10 SQLWARN3 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN4\tinput.cbl\t/^ 10 SQLWARN4 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN5\tinput.cbl\t/^ 10 SQLWARN5 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN6\tinput.cbl\t/^ 10 SQLWARN6 PIC X(1).$/;\"\td\tgroup:SQLWARN\nSQLWARN7\tinput.cbl\t/^ 10 SQLWARN7 PIC X(1).$/;\"\td\tgroup:SQLWARN\n" }, { "path": "Units/parser-cobol-to-review2.r/sqlca.d/input.cbl", "content": " ******************************************************************\n * SQLCA: SQL Communications Area for Ocesql *\n ******************************************************************\n 01 SQLCA GLOBAL.\n 05 SQLCAID PIC X(8).\n 05 SQLCABC PIC S9(9) COMP-5.\n 05 SQLCODE PIC S9(9) COMP-5.\n 05 SQLERRM.\n 49 SQLERRML PIC S9(4) COMP-5.\n 49 SQLERRMC PIC X(70).\n 05 SQLERRP PIC X(8). *> not used\n 05 SQLERRD OCCURS 6 TIMES *> used only ERRD(3)\n PIC S9(9) COMP-5.\n 05 SQLWARN. *> not used\n 10 SQLWARN0 PIC X(1).\n 10 SQLWARN1 PIC X(1).\n 10 SQLWARN2 PIC X(1).\n 10 SQLWARN3 PIC X(1).\n 10 SQLWARN4 PIC X(1).\n 10 SQLWARN5 PIC X(1).\n 10 SQLWARN6 PIC X(1).\n 10 SQLWARN7 PIC X(1).\n 05 SQLSTATE PIC X(5).\n ******************************************************************\n" }, { "path": "Units/parser-cobol.r/comments.d/expected.tags", "content": "" }, { "path": "Units/parser-cobol.r/comments.d/input.cbl", "content": " * DONTTAGME SECTION.\n" }, { "path": "Units/parser-cobol.r/helloworld.d/expected.tags", "content": "00-MAIN\tinput.cbl\t/^ 04100 00-MAIN. 00160000$/;\"\tp\nCONFIGURATION\tinput.cbl\t/^ 02100 CONFIGURATION SECTION. 00090000$/;\"\ts\nDATA\tinput.cbl\t/^ 03000 DATA DIVISION. 00140000$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ 02000 ENVIRONMENT DIVISION. 00080000$/;\"\tD\nHELLO\tinput.cbl\t/^ 01100 PROGRAM-ID. 'HELLO'. 00070000$/;\"\tP\nIDENTIFICATION\tinput.cbl\t/^ 01000 IDENTIFICATION DIVISION. 00060000$/;\"\tD\nOBJECT-COMPUTER\tinput.cbl\t/^ 02120 OBJECT-COMPUTER. HERCULES. 00110000$/;\"\tp\nPROCEDURE\tinput.cbl\t/^ 04000 PROCEDURE DIVISION. 00150000$/;\"\tD\nSOURCE-COMPUTER\tinput.cbl\t/^ 02110 SOURCE-COMPUTER. GNULINUX. 00100000$/;\"\tp\nSPECIAL-NAMES\tinput.cbl\t/^ 02200 SPECIAL-NAMES. 00120000$/;\"\tp\n" }, { "path": "Units/parser-cobol.r/helloworld.d/input.cbl", "content": " 00000* VALIDATION OF BASE COBOL INSTALL 00050000\n 01000 IDENTIFICATION DIVISION. 00060000\n 01100 PROGRAM-ID. 'HELLO'. 00070000\n 02000 ENVIRONMENT DIVISION. 00080000\n 02100 CONFIGURATION SECTION. 00090000\n 02110 SOURCE-COMPUTER. GNULINUX. 00100000\n 02120 OBJECT-COMPUTER. HERCULES. 00110000\n 02200 SPECIAL-NAMES. 00120000\n 02210 CONSOLE IS CONSL. 00130000\n 03000 DATA DIVISION. 00140000\n 04000 PROCEDURE DIVISION. 00150000\n 04100 00-MAIN. 00160000\n 04110 DISPLAY 'HELLO, WORLD' UPON CONSL. 00170000\n 04900 STOP RUN. 00180000\n" }, { "path": "Units/parser-cobol.r/helloworld2.d/expected.tags", "content": "00-MAIN\tinput.cbl\t/^ 04100 00-MAIN.$/;\"\tp\nCONFIGURATION\tinput.cbl\t/^ 02100 CONFIGURATION SECTION.$/;\"\ts\nDATA\tinput.cbl\t/^ 03000 DATA DIVISION.$/;\"\tD\nENVIRONMENT\tinput.cbl\t/^ 02000 ENVIRONMENT DIV$/;\"\tD\nHELLO WORLD\tinput.cbl\t/^ 01100 PROGRAM-ID. 'HELLO WORLD'.$/;\"\tP\nIDENTIFICATION\tinput.cbl\t/^\tIDENTIFICATION DIVISION.$/;\"\tD\nOBJECT-COMPUTER\tinput.cbl\t/^ 02120 OBJECT-COMPUTER. HERCULES.$/;\"\tp\nPROCEDURE\tinput.cbl\t/^ 04000 PROCEDUR$/;\"\tD\nSOURCE-COMPUTER\tinput.cbl\t/^ 02110 SOURCE-COMPUTER. GNULINUX.$/;\"\tp\nSPECIAL-NAMES\tinput.cbl\t/^ 02200 SPECIAL$/;\"\tp\n" }, { "path": "Units/parser-cobol.r/helloworld2.d/input.cbl", "content": " 00000* VALIDATION OF BASE COBOL INSTALL\n\tIDENTIFICATION DIVISION.\n 01100 PROGRAM-ID. 'HELLO WORLD'.\n 02000 ENVIRONMENT DIV\n -ISION.\n 02100 CONFIGURATION SECTION.\n 02110 SOURCE-COMPUTER. GNULINUX.\n 02120 OBJECT-COMPUTER. HERCULES.\n 02200 SPECIAL\n --NAMES.\n 02210 CONSOLE IS CONSL.\n 03000 DATA DIVISION.\n 04000 PROCEDUR\n - E DIVISION.\n 04100 00-MAIN.\n 04110 DISPLAY\n 'HELLO, WORLD'\n UPON CONSL.\n 04900 STOP RUN.\n" }, { "path": "Units/parser-cobol.r/issue-1324.d/README", "content": "input.cbl is taken from a post by @FrankCal in #1324.\n" }, { "path": "Units/parser-cobol.r/issue-1324.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-cobol.r/issue-1324.d/expected.tags", "content": "IDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\troles:def\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\troles:def\nCONFIGURATION\tinput.cbl\t/^ CONFIGURATION SECTION.$/;\"\ts\troles:def\nSPECIAL-NAMES\tinput.cbl\t/^ SPECIAL-NAMES.$/;\"\tp\troles:def\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\troles:def\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\troles:def\nWS-ABBRUCH-TYP\tinput.cbl\t/^ 01 WS-ABBRUCH-TYP PIC 99.$/;\"\td\troles:def\nWS-ABBRUCH-EVENT\tinput.cbl\t/^ 88 WS-ABBRUCH-EVENT VALUE 91.$/;\"\td\tdata:WS-ABBRUCH-TYP\troles:def\nWS-ABBRUCH-OBJMGR\tinput.cbl\t/^. 88 WS-ABBRUCH-OBJMGR VALUE 92.$/;\"\td\tdata:WS-ABBRUCH-TYP\troles:def\nWS-ABBRUCH-DB\tinput.cbl\t/^. 88 WS-ABBRUCH-DB VALUE 93.$/;\"\td\tdata:WS-ABBRUCH-TYP\troles:def\nWS-ABBRUCH-PGM\tinput.cbl\t/^. 88 WS-ABBRUCH-PGM VALUE 94.$/;\"\td\tdata:WS-ABBRUCH-TYP\troles:def\nF-TEXT\tinput.cbl\t/^ 01 F-TEXT.$/;\"\tg\troles:def\nF-TEXT-DB\tinput.cbl\t/^ 05 F-TEXT-DB PIC X(5).$/;\"\td\tgroup:F-TEXT\troles:def\nF-TEXT-KEY1\tinput.cbl\t/^ 05 F-TEXT-KEY1 PIC 9(8).$/;\"\td\tgroup:F-TEXT\troles:def\nF-TEXT-KEY2\tinput.cbl\t/^ 05 F-TEXT-KEY2 PIC 9(8).$/;\"\td\tgroup:F-TEXT\troles:def\nF-TEXT-KEY3\tinput.cbl\t/^ 05 F-TEXT-KEY3 PIC 99.$/;\"\td\tgroup:F-TEXT\troles:def\nF-TEXT-EVENT\tinput.cbl\t/^ 05 F-TEXT-EVENT PIC X(10).$/;\"\td\tgroup:F-TEXT\troles:def\nTCTOENV\tinput.cbl\t/^ COPY TCTOENV.$/;\"\tS\troles:copied\nTCWFLENG\tinput.cbl\t/^ COPY TCWFLENG.$/;\"\tS\troles:copied\nTCPR\tinput.cbl\t/^ COPY TCPR.$/;\"\tS\troles:copied\nLINKAGE\tinput.cbl\t/^ LINKAGE SECTION.$/;\"\ts\troles:def\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\troles:def\nMAIN\tinput.cbl\t/^ MAIN SECTION.$/;\"\ts\troles:def\nMAIN-EX\tinput.cbl\t/^ MAIN-EX. EXIT.$/;\"\tp\troles:def\nE01-PRUEFEN\tinput.cbl\t/^ E01-PRUEFEN SECTION.$/;\"\ts\troles:def\nM01-VORLAUF\tinput.cbl\t/^ M01-VORLAUF SECTION.$/;\"\ts\troles:def\nM01-VORLAUF-EX\tinput.cbl\t/^ M01-VORLAUF-EX.$/;\"\tp\troles:def\nM02-NACHLAUF\tinput.cbl\t/^ M02-NACHLAUF SECTION.$/;\"\ts\troles:def\nM02-NACHLAUF-EX\tinput.cbl\t/^ M02-NACHLAUF-EX.$/;\"\tp\troles:def\nM99-ABBRUCH\tinput.cbl\t/^ M99-ABBRUCH SECTION.$/;\"\ts\troles:def\nM99-ABBRUCH-EX\tinput.cbl\t/^ M99-ABBRUCH-EX. EXIT.$/;\"\tp\troles:def\n" }, { "path": "Units/parser-cobol.r/issue-1324.d/input.cbl", "content": " IDENTIFICATION DIVISION.\n EXEC TAA IDENTIFY EFUN SERVICE\n FAWEFUN-11 IN FAW\n END-EXEC.\n *\n ENVIRONMENT DIVISION.\n CONFIGURATION SECTION.\n SPECIAL-NAMES.\n DECIMAL-POINT IS COMMA.\n *\n DATA DIVISION.\n *\n WORKING-STORAGE SECTION.\n *\n 01 WS-ABBRUCH-TYP PIC 99.\n 88 WS-ABBRUCH-EVENT VALUE 91.\n. 88 WS-ABBRUCH-OBJMGR VALUE 92.\n. 88 WS-ABBRUCH-DB VALUE 93.\n. 88 WS-ABBRUCH-PGM VALUE 94.\n 01 F-TEXT.\n 05 F-TEXT-DB PIC X(5).\n 05 FILLER PIC X VALUE SPACE.\n 05 F-TEXT-KEY1 PIC 9(8).\n 05 FILLER PIC X VALUE '/'.\n 05 F-TEXT-KEY2 PIC 9(8).\n 05 FILLER PIC X VALUE '/'.\n 05 F-TEXT-KEY3 PIC 99.\n 05 FILLER PIC X(7) VALUE ' EVENT:'.\n 05 F-TEXT-EVENT PIC X(10).\n *\n COPY TCTOENV.\n COPY TCWFLENG.\n COPY TCPR.\n\n LINKAGE SECTION.\n *\n PROCEDURE DIVISION.\n *\n MAIN SECTION.\n EXEC TAA REGISTER END-EXEC\n\n\n EXEC TAA ON SEVERE EXIT ARBG END-EXEC\n\n\n PERFORM M01-VORLAUF\n\n\n EVALUATE TRUE\n WHEN TC-EVENT-PRUEFEN OF ME\n PERFORM E01-PRUEFEN\n SET TC-STATE-OK OF ME TO TRUE\n WHEN OTHER\n SET WS-ABBRUCH-EVENT TO TRUE\n PERFORM M99-ABBRUCH\n END-EVALUATE\n\n\n PERFORM M02-NACHLAUF\n\n\n EXEC TAA UNREGISTER END-EXEC\n *\n CONTINUE.\n MAIN-EX. EXIT.\n *\n E01-PRUEFEN SECTION.\n EXIT.\n *\n M01-VORLAUF SECTION.\n CONTINUE.\n M01-VORLAUF-EX.\n EXIT.\n *\n M02-NACHLAUF SECTION.\n CONTINUE.\n M02-NACHLAUF-EX.\n EXIT.\n *\n M99-ABBRUCH SECTION.\n EVALUATE TRUE\n WHEN WS-ABBRUCH-OBJMGR\n EXEC TAA\n SET AND RAISE SEVERE\n GROUP OMERR\n CODE 0\n END-EXEC\n WHEN WS-ABBRUCH-EVENT\n EXEC TAA\n SET SEVERE\n GROUP AAEZUG01\n CODE 2\n ARGUMENTS = (TC-EVENT)\n END-EXEC\n EXEC TAA\n SET AND RAISE SEVERE\n GROUP USERERR\n CODE 1\n END-EXEC\n WHEN WS-ABBRUCH-PGM\n EXEC TAA\n SET SEVERE\n GROUP AAEZUG01\n CODE 3\n ARGUMENTS = (TX-IM-SHORTNAME)\n END-EXEC\n EXEC TAA\n SET AND RAISE SEVERE\n GROUP USERERR\n CODE 1\n END-EXEC\n WHEN OTHER\n EXEC TAA\n SET AND RAISE SEVERE\n GROUP USERERR\n CODE 0\n END-EXEC\n END-EVALUATE\n CONTINUE.\n M99-ABBRUCH-EX. EXIT.\n" }, { "path": "Units/parser-cobol.r/levels.d/expected.tags", "content": "DATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nEVEN\tinput.cbl\t/^ 88 EVEN VALUES 2, 4, 6, 8.$/;\"\td\tdata:RECORD1.ITEM2\nG1\tinput.cbl\t/^ 02 G1.$/;\"\tg\tgroup:REC2\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nITEM1\tinput.cbl\t/^ 05 ITEM1 PICTURE X(10).$/;\"\td\tgroup:REC2.G1\nITEM1\tinput.cbl\t/^ 05 ITEM1 PIC X(1).$/;\"\td\tgroup:RECORD1\nITEM2\tinput.cbl\t/^ 05 ITEM2 PIC X(10).$/;\"\td\tgroup:REC2.G1\nITEM2\tinput.cbl\t/^ 05 ITEM2 PIC A(1).$/;\"\td\tgroup:RECORD1\nITEM3\tinput.cbl\t/^ 05 ITEM3 PIC X(6).$/;\"\td\tgroup:RECORD1\nMAIN-PROCEDURE\tinput.cbl\t/^ MAIN-PROCEDURE.$/;\"\tp\nODD\tinput.cbl\t/^ 88 ODD VALUES 1, 3, 5, 7, 9.$/;\"\td\tdata:RECORD1.ITEM2\nOTHERNAME1\tinput.cbl\t/^ 66 OTHERNAME1 RENAMES ITEM1 IN REC2.$/;\"\td\tgroup:REC2\nOTHERNAME2\tinput.cbl\t/^ 66 OTHERNAME2 RENAMES G1.$/;\"\td\tgroup:REC2\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nRDITEM4\tinput.cbl\t/^ 66 RDITEM4 RENAMES ITEM1 THRU ITEM2.$/;\"\td\tgroup:RECORD1\nRDITEM5\tinput.cbl\t/^ 66 RDITEM5 RENAMES ITEM1 THROUGH ITEM3.$/;\"\td\tgroup:RECORD1\nREC2\tinput.cbl\t/^ 01 REC2.$/;\"\tg\nRECORD1\tinput.cbl\t/^ 01 RECORD1.$/;\"\tg\nSTDLN1\tinput.cbl\t/^ 77 STDLN1 PIC A(4).$/;\"\td\nTest-Items\tinput.cbl\t/^ PROGRAM-ID. Test-Items.$/;\"\tP\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol.r/levels.d/input.cbl", "content": " IDENTIFICATION DIVISION.\n PROGRAM-ID. Test-Items.\n\n DATA DIVISION.\n WORKING-STORAGE SECTION.\n 01 RECORD1.\n 05 ITEM1 PIC X(1).\n 05 ITEM2 PIC A(1).\n 88 ODD VALUES 1, 3, 5, 7, 9.\n 88 EVEN VALUES 2, 4, 6, 8.\n 05 ITEM3 PIC X(6).\n 66 RDITEM4 RENAMES ITEM1 THRU ITEM2.\n 66 RDITEM5 RENAMES ITEM1 THROUGH ITEM3.\n 77 STDLN1 PIC A(4).\n 01 REC2.\n 02 G1.\n 05 ITEM1 PICTURE X(10).\n 05 ITEM2 PIC X(10).\n 66 OTHERNAME1 RENAMES ITEM1 IN REC2.\n 66 OTHERNAME2 RENAMES G1.\n\n PROCEDURE DIVISION.\n MAIN-PROCEDURE.\n DISPLAY \"Hello world\".\n DISPLAY OTHERNAME2.\n STOP RUN.\n END PROGRAM Test-Items.\n" }, { "path": "Units/parser-cobol.r/quoted-program-id.cbl.d/expected.tags", "content": "IDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nMAIN\tinput.cbl\t/^ MAIN.$/;\"\tp\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nTest program name\tinput.cbl\t/^ PROGRAM-ID. 'Test program name'.$/;\"\tP\n" }, { "path": "Units/parser-cobol.r/quoted-program-id.cbl.d/input.cbl", "content": " IDENTIFICATION DIVISION.\n PROGRAM-ID. 'Test program name'.\n PROCEDURE DIVISION.\n MAIN.\n DISPLAY 'This is a test program'.\n STOP RUN.\n END PROGRAM 'Test program name'.\n" }, { "path": "Units/parser-cobol.r/simple.cbl.d/expected.tags", "content": "AUTHOR\tinput.cbl\t/^ AUTHOR. Darren Hiebert.$/;\"\tp\nBegin\tinput.cbl\t/^ Begin.$/;\"\tp\nDATA\tinput.cbl\t/^ DATA DIVISION.$/;\"\tD\nDW-DAYS-IN-MONTH\tinput.cbl\t/^ 05 DW-DAYS-IN-MONTH OCCURS 12 TIMES$/;\"\td\tdata:Group-Name.Data-Item1.DW-DAYS-IN-MONTHS\nDW-DAYS-IN-MONTHS\tinput.cbl\t/^ 03 DW-DAYS-IN-MONTHS VALUE \"312831303130313130313031\".$/;\"\td\tdata:Group-Name.Data-Item1\nData-Item1\tinput.cbl\t/^ 02 Data-Item1 PIC 9 VALUE ZEROS.$/;\"\td\tgroup:Group-Name\nENVIRONMENT\tinput.cbl\t/^ ENVIRONMENT DIVISION.$/;\"\tD\nFILE\tinput.cbl\t/^ FILE SECTION.$/;\"\ts\nFILE-CONTROL\tinput.cbl\t/^ FILE-CONTROL.$/;\"\tp\nFile-Data-Item\tinput.cbl\t/^ 02 File-Data-Item PIC 9(7).$/;\"\td\tgroup:File-Group-Name\nFile-Group-Name\tinput.cbl\t/^ 01 File-Group-Name.$/;\"\tg\nFile-Name\tinput.cbl\t/^ FD File-Name.$/;\"\tf\nGroup-Name\tinput.cbl\t/^ 01 Group-Name.$/;\"\tg\nIDENTIFICATION\tinput.cbl\t/^ IDENTIFICATION DIVISION.$/;\"\tD\nINPUT-OUPUT\tinput.cbl\t/^ INPUT-OUPUT SECTION.$/;\"\ts\nPROCEDURE\tinput.cbl\t/^ PROCEDURE DIVISION.$/;\"\tD\nProgram-Name\tinput.cbl\t/^ PROGRAM-ID. Program-Name.$/;\"\tP\nSH-WORK-MMDDYYYY\tinput.cbl\t/^ 03 SH-WORK-MMDDYYYY PIC 9(08) VALUE 0.$/;\"\td\tdata:Group-Name.Data-Item1\nSH-WORK-MMDDYYYY-2\tinput.cbl\t/^ 03 SH-WORK-MMDDYYYY-2 REDEFINES SH-WORK-MMDDYYYY.$/;\"\td\tdata:Group-Name.Data-Item1\nSubprogram-Name\tinput.cbl\t/^ Subprogram-Name.$/;\"\tp\nWORKING-STORAGE\tinput.cbl\t/^ WORKING-STORAGE SECTION.$/;\"\ts\n" }, { "path": "Units/parser-cobol.r/simple.cbl.d/features", "content": "regex\n" }, { "path": "Units/parser-cobol.r/simple.cbl.d/input.cbl", "content": " IDENTIFICATION DIVISION.\n PROGRAM-ID. Program-Name.\n AUTHOR. Darren Hiebert.\n\n ENVIRONMENT DIVISION.\n INPUT-OUPUT SECTION.\n FILE-CONTROL.\n SELECT File-Name ASSIGN TO \"SAMPLE.DAT\"\n ORGANIZATION IS LINE SEQUENTIAL.\n\n DATA DIVISION.\n FILE SECTION.\n FD File-Name.\n 01 File-Group-Name.\n 02 File-Data-Item PIC 9(7).\n\n WORKING-STORAGE SECTION.\n 01 Group-Name.\n 02 Data-Item1 PIC 9 VALUE ZEROS.\n 03 SH-WORK-MMDDYYYY PIC 9(08) VALUE 0.\n 03 SH-WORK-MMDDYYYY-2 REDEFINES SH-WORK-MMDDYYYY.\n 03 DW-DAYS-IN-MONTHS VALUE \"312831303130313130313031\".\n 05 DW-DAYS-IN-MONTH OCCURS 12 TIMES\n PIC 9(02).\n\n PROCEDURE DIVISION.\n Begin.\n STOP RUN.\n\n Subprogram-Name.\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/args.ctags", "content": "--sort=no\n--fields=+lE\n--extras=+g\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/expected.tags", "content": "DO_NOTHING_\tinput.c\t/^\t.macro\tDO_NOTHING_$/;\"\tm\tlanguage:Asm\textras:guest\nDO_NOTHING_0\tinput-0.c\t/^\t.macro\tDO_NOTHING_0$/;\"\tm\tlanguage:Asm\textras:guest\ndo_nothing_1\tinput-1.c\t/^inline void do_nothing_1(void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\ndo_nothing_2\tinput-2.c\t/^\tinline void do_nothing_2 (void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\nDO_NOTHING_2\tinput-2.c\t/^\t.macro\tDO_NOTHING_2$/;\"\tm\tlanguage:Asm\textras:guest\ndo_nothing_3a\tinput-3.c\t/^\tinline void do_nothing_3a (void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\ndo_nothing_3b\tinput-3.c\t/^\tinline void do_nothing_3b (void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\nDO_NOTHING_3\tinput-3.c\t/^\t.macro\tDO_NOTHING_3$/;\"\tm\tlanguage:Asm\textras:guest\ndo_nothing_4a\tinput-4.c\t/^\tinline void do_nothing_4a (void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\ndo_nothing_4b\tinput-4.c\t/^\tinline void do_nothing_4b (void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\nDO_NOTHING_4\tinput-4.c\t/^\t.macro\tDO_NOTHING_4$/;\"\tm\tlanguage:Asm\textras:guest\ndo_nothing_5\tinput-5.c\t/^inline void do_nothing_5(void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\nDO_NOTHING_5\tinput-5.c\t/^\t.macro\tDO_NOTHING_5$/;\"\tm\tlanguage:Asm\textras:guest\ndo_nothing_6\tinput-6.c\t/^inline void do_nothing_6(void) {}$/;\"\tf\tlanguage:C\ttyperef:typename:void\nDO_NOTHING_7_NO_GUEST\tinput-7.asm\t/^.macro\tDO_NOTHING_7_NO_GUEST$/;\"\tm\tlanguage:Asm\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-0.c", "content": "#ifdef __ASSEMBLER__\n\n\t.macro\tDO_NOTHING_0\n\t nop\n\t.endm\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-1.c", "content": "#ifndef __ASSEMBLER__\n\ninline void do_nothing_1(void) {}\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-2.c", "content": "#if __ASSEMBLER__\n\n\t.macro\tDO_NOTHING_2\n\t nop\n\t.endm\n\n#else\n\n\tinline void do_nothing_2 (void) {}\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-3.c", "content": "#if __ASSEMBLER__\n\n\t.macro\tDO_NOTHING_3\n\t nop\n\t.endm\n\n#elif CONDITION3\n\n\tinline void do_nothing_3a (void) {}\n\n#else\n\n\tinline void do_nothing_3b (void) {}\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-4.c", "content": "#ifdef __ASSEMBLER__\n\n\t.macro\tDO_NOTHING_4\n\t nop\n\t.endm\n\n#elif CONDITION4\n\n\tinline void do_nothing_4a (void) {}\n\n#else\n\n\tinline void do_nothing_4b (void) {}\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-5.c", "content": "#ifndef __ASSEMBLER__\n\ninline void do_nothing_5(void) {}\n\n#else\n\n\t.macro\tDO_NOTHING_5\n\t nop\n\t.endm\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-6.c", "content": "#ifndef __ASSEMBLER__\n\ninline void do_nothing_6(void) {}\n\n#elif CONDITION5\n\n\t.macro\tDO_NOTHING_6a_this_cannot_be_tagged\n\t nop\n\t.endm\n\n#else\n\n\t.macro\tDO_NOTHING_6b_this_cannot_be_tagged\n\t nop\n\t.endm\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input-7.asm", "content": "#ifdef __ASSEMBLER__\n\n.macro\tDO_NOTHING_7_NO_GUEST\n nop\n.endm\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/asm-area.d/input.c", "content": "#if __ASSEMBLER__\n\n\t.macro\tDO_NOTHING_\n\t nop\n\t.endm\n\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/backslash-in-parameters.d/args.ctags", "content": "--sort=no\n--fields=+Sn\n" }, { "path": "Units/parser-cpreprocessor.r/backslash-in-parameters.d/expected.tags", "content": "IX_GET_BIT_FIELD16\tinput.h\t/^#define IX_GET_BIT_FIELD16(/;\"\td\tline:2\tsignature:(arg_PackedData16,arg_FieldLSBBit,arg_FieldMSBBit)\n" }, { "path": "Units/parser-cpreprocessor.r/backslash-in-parameters.d/input.h", "content": "/* Taken from u-boot */\n#define IX_GET_BIT_FIELD16(\t\t\t\t\t \\\n arg_PackedData16, \\\n arg_FieldLSBBit, \\\n arg_FieldMSBBit \\\n ) \\\n (((ix_uint16)(arg_PackedData16) & IX_BIT_FIELD_MASK16(arg_FieldLSBBit, arg_FieldMSBBit)) >> \\\n arg_FieldLSBBit)\n" }, { "path": "Units/parser-cpreprocessor.r/capture-params-in-macro-defs.d/args.ctags", "content": "--sort=no\n--language-force=CPreProcessor\n--kinds-CPreProcessor=+D\n--fields=+Sn\n" }, { "path": "Units/parser-cpreprocessor.r/capture-params-in-macro-defs.d/expected.tags", "content": "arg_PackedData16\tinput.h\t/^ arg_PackedData16, \\\\$/;\"\tD\tline:3\tmacro:IX_GET_BIT_FIELD16\narg_FieldLSBBit\tinput.h\t/^ arg_FieldLSBBit, \\\\$/;\"\tD\tline:4\tmacro:IX_GET_BIT_FIELD16\narg_FieldMSBBit\tinput.h\t/^ arg_FieldMSBBit \\\\$/;\"\tD\tline:5\tmacro:IX_GET_BIT_FIELD16\nIX_GET_BIT_FIELD16\tinput.h\t/^#define IX_GET_BIT_FIELD16(/;\"\td\tline:2\tsignature:(arg_PackedData16,arg_FieldLSBBit,arg_FieldMSBBit)\nM0\tinput.h\t/^#define M0(/;\"\td\tline:10\tsignature:()\nX\tinput.h\t/^#define M1(X) 1 + X$/;\"\tD\tline:11\tmacro:M1\nM1\tinput.h\t/^#define M1(/;\"\td\tline:11\tsignature:(X)\nX\tinput.h\t/^#define M2(X,Y) 1 + X + Y$/;\"\tD\tline:12\tmacro:M2\nY\tinput.h\t/^#define M2(X,Y) 1 + X + Y$/;\"\tD\tline:12\tmacro:M2\nM2\tinput.h\t/^#define M2(/;\"\td\tline:12\tsignature:(X,Y)\nX\tinput.h\t/^#define M3(X,Y,Z) 1 + X + Y + Z$/;\"\tD\tline:13\tmacro:M3\nY\tinput.h\t/^#define M3(X,Y,Z) 1 + X + Y + Z$/;\"\tD\tline:13\tmacro:M3\nZ\tinput.h\t/^#define M3(X,Y,Z) 1 + X + Y + Z$/;\"\tD\tline:13\tmacro:M3\nM3\tinput.h\t/^#define M3(/;\"\td\tline:13\tsignature:(X,Y,Z)\nX\tinput.h\t/^#define Mn(X,Y,Z,...) 1 + X + Y + Z$/;\"\tD\tline:14\tmacro:Mn\nY\tinput.h\t/^#define Mn(X,Y,Z,...) 1 + X + Y + Z$/;\"\tD\tline:14\tmacro:Mn\nZ\tinput.h\t/^#define Mn(X,Y,Z,...) 1 + X + Y + Z$/;\"\tD\tline:14\tmacro:Mn\nMn\tinput.h\t/^#define Mn(/;\"\td\tline:14\tsignature:(X,Y,Z,...)\n" }, { "path": "Units/parser-cpreprocessor.r/capture-params-in-macro-defs.d/input.h", "content": "/* Taken from u-boot */\n#define IX_GET_BIT_FIELD16(\t\t\t\t\t \\\n arg_PackedData16, \\\n arg_FieldLSBBit, \\\n arg_FieldMSBBit \\\n ) \\\n (((ix_uint16)(arg_PackedData16) & IX_BIT_FIELD_MASK16(arg_FieldLSBBit, arg_FieldMSBBit)) >> \\\n arg_FieldLSBBit)\n\n#define M0() 1\n#define M1(X) 1 + X\n#define M2(X,Y) 1 + X + Y\n#define M3(X,Y,Z) 1 + X + Y + Z\n#define Mn(X,Y,Z,...) 1 + X + Y + Z\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--clinet-kind.d/README", "content": "See #1514.\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--clinet-kind.d/args.ctags", "content": "--languages=-CPreProcessor\n--kinds-C=-d\n\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--clinet-kind.d/expected.tags", "content": "main\tinput.c\t/^main(int argc)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--clinet-kind.d/input.c", "content": "#define X 1\n\nint\nmain(int argc)\n{\n return X;\n}\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--cpp-kind.d/README", "content": "See #1514.\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--cpp-kind.d/args.ctags", "content": "--languages=-CPreProcessor\n--kinds-CPreProcessor=-d\n\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--cpp-kind.d/expected.tags", "content": "X\tinput.c\t/^#define X /;\"\td\tfile:\nmain\tinput.c\t/^main(int argc)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client--cpp-kind.d/input.c", "content": "#define X 1\n\nint\nmain(int argc)\n{\n return X;\n}\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client.d/README", "content": "See #1514.\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client.d/args.ctags", "content": "--languages=-CPreProcessor\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client.d/expected.tags", "content": "X\tinput.c\t/^#define X /;\"\td\tfile:\nmain\tinput.c\t/^main(int argc)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-client.d/input.c", "content": "#define X 1\n\nint\nmain(int argc)\n{\n return X;\n}\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-cpp.d/args.ctags", "content": "--languages=-CPreProcessor\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-cpp.d/expected.tags", "content": "0x00\tinput.dts\t/^\t phandle = <0x00>;$/;\"\tp\tlabel:label\nlabel\tinput.dts\t/^label: test {$/;\"\tl\nlabel2\tinput.dts\t/^\t label2: chosen { } ;$/;\"\tl\tlabel:label\n" }, { "path": "Units/parser-cpreprocessor.r/disable-cpp-cpp.d/input.dts", "content": "/dts-v1/;\n\n#include \"foo.dtsi\"\n#define bar 98\n\nlabel: test {\n dummy {\n\t label2: chosen { } ;\n\t phandle = <0x00>;\n };\n};\n#undef bar\n" }, { "path": "Units/parser-cpreprocessor.r/if0-false-with-param.c.d/args.ctags", "content": "--param-CPreProcessor.if0=false\n" }, { "path": "Units/parser-cpreprocessor.r/if0-false-with-param.c.d/expected.tags", "content": "y\tinput.c\t/^int y;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-cpreprocessor.r/if0-false-with-param.c.d/input.c", "content": "#if 0\nint x;\n#else\nint y;\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/if0-true-with-param.c.d/args.ctags", "content": "--param-CPreProcessor.if0=true\n" }, { "path": "Units/parser-cpreprocessor.r/if0-true-with-param.c.d/expected.tags", "content": "x\tinput.c\t/^int x;$/;\"\tv\ttyperef:typename:int\ny\tinput.c\t/^int y;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-cpreprocessor.r/if0-true-with-param.c.d/input.c", "content": "#if 0\nint x;\n#else\nint y;\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/macro-condition-role.d/args.ctags", "content": "--sort=no\n--roles-C++.{macro}=+{condition}\n--extras=+r\n--fields=+rn\n" }, { "path": "Units/parser-cpreprocessor.r/macro-condition-role.d/expected.tags", "content": "X0\tinput.h\t/^#ifdef X0$/;\"\td\tline:1\troles:condition\nHAVE_FEAT\tinput.h\t/^#if defined HAVE_FEAT && (Y_2k1 && _0Z \\\\$/;\"\td\tline:2\troles:condition\nY_2k1\tinput.h\t/^#if defined HAVE_FEAT && (Y_2k1 && _0Z \\\\$/;\"\td\tline:2\troles:condition\n_0Z\tinput.h\t/^#if defined HAVE_FEAT && (Y_2k1 && _0Z \\\\$/;\"\td\tline:2\troles:condition\n_A_0_\tinput.h\t/^\t\t\t\t\t\t || \\/* C *\\/ _A_0_)$/;\"\td\tline:3\troles:condition\nX1\tinput.h\t/^#ifndef X1$/;\"\td\tline:5\troles:condition\nY1\tinput.h\t/^#elif Y1$/;\"\td\tline:7\troles:condition\n" }, { "path": "Units/parser-cpreprocessor.r/macro-condition-role.d/input.h", "content": "#ifdef X0\n#if defined HAVE_FEAT && (Y_2k1 && _0Z \\\n\t\t\t\t\t\t || /* C */ _A_0_)\nextern\n#ifndef X1\nint\n#elif Y1\nlong\n#else\nshort\n#endif\nx;\n#endif\n#endif\n" }, { "path": "Units/parser-cpreprocessor.r/macrodef.d/args.ctags", "content": "--language-force=CPreProcessor\n--sort=no\n--fields-CPreProcessor=+{macrodef}\n--fields=+Sl\n" }, { "path": "Units/parser-cpreprocessor.r/macrodef.d/expected.tags", "content": "INT\tinput.h\t/^#define INT /;\"\td\tlanguage:CPreProcessor\tmacrodef:1\nSTR\tinput.h\t/^#define STR /;\"\td\tlanguage:CPreProcessor\tmacrodef:\"bar\"\nCHR\tinput.h\t/^#define CHR /;\"\td\tlanguage:CPreProcessor\tmacrodef:'b'\nHEX\tinput.h\t/^#define HEX /;\"\td\tlanguage:CPreProcessor\tmacrodef:0xff01\nOCT\tinput.h\t/^#define OCT /;\"\td\tlanguage:CPreProcessor\tmacrodef:0644\nSYSCALL_METADATA\tinput.h\t/^#define SYSCALL_METADATA(/;\"\td\tlanguage:CPreProcessor\tsignature:(sname,nb,...)\tmacrodef:\nSYSCALL_DEFINE2\tinput.h\t/^#define SYSCALL_DEFINE2(/;\"\td\tlanguage:CPreProcessor\tsignature:(name,...)\tmacrodef:SYSCALL_DEFINEx(2, _##name, __VA_ARGS__)\nSYSCALL_DEFINEx\tinput.h\t/^#define SYSCALL_DEFINEx(/;\"\td\tlanguage:CPreProcessor\tsignature:(x,sname,...)\tmacrodef:SYSCALL_METADATA(sname, x, __VA_ARGS__) __SYSCALL_DEFINEx(x, sname, __VA_ARGS__)\n__SYSCALL_DEFINEx\tinput.h\t/^#define __SYSCALL_DEFINEx(/;\"\td\tlanguage:CPreProcessor\tsignature:(x,name,...)\tmacrodef:__diag_push(); __diag_ignore(GCC, 8, \"-Wattribute-alias\", \"Type aliasing is used to sanitize syscall arguments\"); asmlinkage long sys##name(__MAP(x,__SC_DECL,__VA_ARGS__)) __attribute__((alias(__stringify(__se_sys##name)))); ALLOW_ERROR_INJECTION(sys##name, ERRNO); static inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__)); asmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__)); asmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__)) { long ret = __do_sys##name(__MAP(x,__SC_CAST,__VA_ARGS__)); __MAP(x,__SC_TEST,__VA_ARGS__); __PROTECT(x, ret,__MAP(x,__SC_ARGS,__VA_ARGS__)); return ret; } __diag_pop(); static inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))\n__MAP1\tinput.h\t/^#define __MAP1(/;\"\td\tlanguage:CPreProcessor\tsignature:(m,t,a,...)\tmacrodef:m(t,a)\n__MAP2\tinput.h\t/^#define __MAP2(/;\"\td\tlanguage:CPreProcessor\tsignature:(m,t,a,...)\tmacrodef:m(t,a), __MAP1(m,__VA_ARGS__)\n__MAP\tinput.h\t/^#define __MAP(n,...) __MAP#/;\"\td\tlanguage:CPreProcessor\tsignature:(n,...)\tmacrodef:__MAP##n(__VA_ARGS__)\n__SC_DECL\tinput.h\t/^#define __SC_DECL(/;\"\td\tlanguage:CPreProcessor\tsignature:(t,a)\tmacrodef:t a\nslash_fn\tinput.h\t/^#define slash_fn(/;\"\td\tlanguage:CPreProcessor\tsignature:(t)\tmacrodef:t fn (t i, t j) { return i / j; }\nquestion_fn\tinput.h\t/^#define question_fn(/;\"\td\tlanguage:CPreProcessor\tsignature:(t)\tmacrodef:t fn (t i, t j) { return (i < j)? i: j; }\nfinally\tinput.h\t/^#define finally(/;\"\td\tlanguage:CPreProcessor\tsignature:(X)\tmacrodef:int fin_##X(void) { return 0; } \n" }, { "path": "Units/parser-cpreprocessor.r/macrodef.d/input.h", "content": "#define INT 1\n#define STR \"bar\"\n#define CHR 'b'\n#define HEX 0xff01\n#define OCT 0644\n\n/*\n * Taken from linux kernel\n */\n#define SYSCALL_METADATA(sname, nb, ...)\n#define SYSCALL_DEFINE2(name, ...) SYSCALL_DEFINEx(2, _##name, __VA_ARGS__)\n#define SYSCALL_DEFINEx(x, sname, ...)\t\t\t\t\\\n\tSYSCALL_METADATA(sname, x, __VA_ARGS__)\t\t\t\\\n\t__SYSCALL_DEFINEx(x, sname, __VA_ARGS__)\n\n/*\n * The asmlinkage stub is aliased to a function named __se_sys_*() which\n * sign-extends 32-bit ints to longs whenever needed. The actual work is\n * done within __do_sys_*().\n */\n#define __SYSCALL_DEFINEx(x, name, ...)\t\t\t\t\t\\\n\t__diag_push();\t\t\t\t\t\t\t\\\n\t__diag_ignore(GCC, 8, \"-Wattribute-alias\",\t\t\t\\\n\t\t \"Type aliasing is used to sanitize syscall arguments\");\\\n\tasmlinkage long sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))\t\\\n\t\t__attribute__((alias(__stringify(__se_sys##name))));\t\\\n\tALLOW_ERROR_INJECTION(sys##name, ERRNO);\t\t\t\\\n\tstatic inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__));\\\n\tasmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__));\t\\\n\tasmlinkage long __se_sys##name(__MAP(x,__SC_LONG,__VA_ARGS__))\t\\\n\t{\t\t\t\t\t\t\t\t\\\n\t\tlong ret = __do_sys##name(__MAP(x,__SC_CAST,__VA_ARGS__));\\\n\t\t__MAP(x,__SC_TEST,__VA_ARGS__);\t\t\t\t\\\n\t\t__PROTECT(x, ret,__MAP(x,__SC_ARGS,__VA_ARGS__));\t\\\n\t\treturn ret;\t\t\t\t\t\t\\\n\t}\t\t\t\t\t\t\t\t\\\n\t__diag_pop();\t\t\t\t\t\t\t\\\n\tstatic inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))\n\n#define __MAP1(m,t,a,...) m(t,a)\n#define __MAP2(m,t,a,...) m(t,a), __MAP1(m,__VA_ARGS__)\n#define __MAP(n,...) __MAP##n(__VA_ARGS__)\n\n#define __SC_DECL(t, a)\tt a\n\nSYSCALL_DEFINE2(setregid16, old_gid_t, rgid, old_gid_t, egid)\n{\n\treturn __sys_setregid(low2highgid(rgid), low2highgid(egid));\n}\n\n#define slash_fn(t) t fn (t i, t j) {\t\t\t\\\n\treturn i / j;\t\t\t\t\t\t\t\t\\\n}\n\n#define question_fn(t) t fn (t i, t j) {\t\t\\\n\treturn (i < j)? i: j;\t\t\t\t\t\t\\\n}\n\n#define finally(X) \\\n\tint fin_##X(void) { return 0; } \\\n\\\n\t\\\n\\\n" }, { "path": "Units/parser-cpreprocessor.r/macroexpand.d/args.ctags", "content": "--param-CPreProcessor._expand=1\n--fields-C=+{macrodef}\n--fields=+Ss\n--sort=no\n# Override the defintion in the input file.\n-DS=float\n" }, { "path": "Units/parser-cpreprocessor.r/macroexpand.d/expected.tags", "content": "defStruct\tinput.c\t/^#define defStruct(/;\"\td\tfile:\tsignature:(PREFIX,X)\tmacrodef:struct PREFIX##X\nbegin\tinput.c\t/^#define begin /;\"\td\tfile:\tmacrodef:{\ndefField\tinput.c\t/^#define defField(/;\"\td\tfile:\tsignature:(PREFIX,T,F)\tmacrodef:T PREFIX##F;\nendf\tinput.c\t/^#define endf /;\"\td\tfile:\tmacrodef:;\nends\tinput.c\t/^#define ends /;\"\td\tfile:\tmacrodef:};\nmydefs\tinput.c\t/^#define mydefs(/;\"\td\tfile:\tsignature:(X)\tmacrodef:defStruct(my_,X)\nmydeff\tinput.c\t/^#define mydeff(/;\"\td\tfile:\tsignature:(T,Y)\tmacrodef:defField(my_,T,Y)\nyour_point\tinput.c\t/^defStruct(your_,point) begin$/;\"\ts\tfile:\nyour_x\tinput.c\t/^ defField(your_,int, x) endf$/;\"\tm\tstruct:your_point\ttyperef:typename:int\tfile:\nyour_y\tinput.c\t/^ defField(your_,int, y) endf$/;\"\tm\tstruct:your_point\ttyperef:typename:int\tfile:\nmy_point3d\tinput.c\t/^mydefs(point3d) begin$/;\"\ts\tfile:\nmy_x\tinput.c\t/^ mydeff(int, x) endf$/;\"\tm\tstruct:my_point3d\ttyperef:typename:int\tfile:\nmy_y\tinput.c\t/^ mydeff(int, y) endf$/;\"\tm\tstruct:my_point3d\ttyperef:typename:int\tfile:\nmy_z\tinput.c\t/^ mydeff(int, z) endf$/;\"\tm\tstruct:my_point3d\ttyperef:typename:int\tfile:\nT\tinput-0.c\t/^#define T /;\"\td\tfile:\tmacrodef:int\nmytype0\tinput-0.c\t/^typedef T mytype0;$/;\"\tt\ttyperef:typename:int\tfile:\nS\tinput-0.c\t/^#define S /;\"\td\tfile:\tmacrodef:int\nmytype1\tinput-0.c\t/^typedef S mytype1;$/;\"\tt\ttyperef:typename:float\tfile:\nIO7__POX_ERRSUM__UPE_ERROR\tinput-1.c\t/^#define IO7__POX_ERRSUM__UPE_ERROR GEN_MASK(IO7__POX_ERRSUM__UPE_ERROR)/;\"\td\tfile:\tmacrodef:GEN_MASK(IO7__POX_ERRSUM__UPE_ERROR)\nf\tinput-1.c\t/^f(int err_sum)$/;\"\tf\ttyperef:typename:int\tsignature:(int err_sum)\n" }, { "path": "Units/parser-cpreprocessor.r/macroexpand.d/input-0.c", "content": "#define T int\ntypedef T mytype0;\n\n#define S int\ntypedef S mytype1;\n" }, { "path": "Units/parser-cpreprocessor.r/macroexpand.d/input-1.c", "content": "/* This code could trigger an infinite loop. */\n#define IO7__POX_ERRSUM__UPE_ERROR GEN_MASK(IO7__POX_ERRSUM__UPE_ERROR)\nint\nf(int err_sum)\n{\n if (err_sum & IO7__POX_ERRSUM__UPE_ERROR) {\n return 0;\n }\n}\n" }, { "path": "Units/parser-cpreprocessor.r/macroexpand.d/input.c", "content": "#define defStruct(PREFIX,X) struct PREFIX##X\n#define begin {\n#define defField(PREFIX,T, F) T PREFIX##F;\n#define endf ;\n#define ends };\n\n#define mydefs(X) defStruct(my_,X)\n#define mydeff(T,Y) defField(my_,T,Y)\n\ndefStruct(your_,point) begin\n defField(your_,int, x) endf\n defField(your_,int, y) endf\nends\n\nmydefs(point3d) begin\n mydeff(int, x) endf\n mydeff(int, y) endf\n mydeff(int, z) endf\nends\n" }, { "path": "Units/parser-cpreprocessor.r/macros-specified-with-param.c.d/README", "content": "This case test is derrived from parser-c.r/macros.c.d.\n" }, { "path": "Units/parser-cpreprocessor.r/macros-specified-with-param.c.d/args.ctags", "content": "--kinds-c=+p\n--fields=+S\n--param-CPreProcessor.ignore=MACRO2\n--fields=+r\n--extras=+r\n" }, { "path": "Units/parser-cpreprocessor.r/macros-specified-with-param.c.d/expected.tags", "content": "DECL1\tinput.c\t/^DECL1(foo); \\/* gcc will accept this as function prototype (with some warnings) *\\/$/;\"\tp\tfile:\tsignature:(foo)\troles:def\nDECL3\tinput.c\t/^DECL3(x, y); \\/* gcc will accept this as function prototype (with some warnings) *\\/$/;\"\tp\tfile:\tsignature:(x,y)\troles:def\nFUNCTION_LIKE\tinput.c\t/^#define FUNCTION_LIKE(/;\"\td\tfile:\tsignature:(a,b)\troles:def\nFUNCTION_LIKE\tinput.c\t/^#undef FUNCTION_LIKE$/;\"\td\tfile:\troles:undef\nVARIABLE_LIKE\tinput.c\t/^#define VARIABLE_LIKE\t/;\"\td\tfile:\troles:def\nVARIABLE_LIKE\tinput.c\t/^#undef VARIABLE_LIKE$/;\"\td\tfile:\troles:undef\nWeakSymbol\tinput.c\t/^#pragma weak WeakSymbol /;\"\td\tfile:\troles:def\nprototype1\tinput.c\t/^void prototype1 __ARGS((int arg1, void *arg2));$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(int arg1,void * arg2)\troles:def\nprototype2\tinput.c\t/^void prototype2 __ARGS((int arg1, void *arg2))$/;\"\tf\ttyperef:typename:void\tsignature:(int arg1,void * arg2)\troles:def\n" }, { "path": "Units/parser-cpreprocessor.r/macros-specified-with-param.c.d/input.c", "content": "#define VARIABLE_LIKE\tsome_value\n#define FUNCTION_LIKE(a,b) (a + b)\n#pragma weak WeakSymbol = StrongSymbol\n\n/* handling of spoofing macros */\nDECL1(foo); /* gcc will accept this as function prototype (with some warnings) */\nMACRO2(bar);\nDECL3(x, y); /* gcc will accept this as function prototype (with some warnings) */\n\nvoid prototype1 __ARGS((int arg1, void *arg2));\nvoid prototype2 __ARGS((int arg1, void *arg2))\n{\n}\n#undef FUNCTION_LIKE\n#undef VARIABLE_LIKE\n" }, { "path": "Units/parser-cpreprocessor.r/simple-cpreprocessor.d/args.ctags", "content": "--language-force=CPreProcessor\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-cpreprocessor.r/simple-cpreprocessor.d/expected.tags", "content": "X\tinput.c\t/^#define X /;\"\td\tfile:\troles:def\nstdio.h\tinput.c\t/^#include /;\"\th\troles:system\n" }, { "path": "Units/parser-cpreprocessor.r/simple-cpreprocessor.d/input.c", "content": "#define X 1\n#include \n/*\n#define Y 2\n*/\n\n// #define Z 3\n" }, { "path": "Units/parser-cpreprocessor.r/skip-newlines-in-literals.d/args.ctags", "content": "--sort=no\n--fields-C={macrodef}\n" }, { "path": "Units/parser-cpreprocessor.r/skip-newlines-in-literals.d/expected.tags", "content": "X\tinput.c\t/^#define X /;\"\td\tfile:\tmacrodef:\"abc \\\\n\\\\t\\tefg\"\nY\tinput.c\t/^#define Y /;\"\td\tfile:\tmacrodef:\"abc\"\nA\tinput.c\t/^#define A /;\"\td\tfile:\tmacrodef:'a'\nB\tinput.c\t/^#define B /;\"\td\tfile:\tmacrodef:'b'\nC\tinput.c\t/^#define C /;\"\td\tfile:\tmacrodef:'\\\\n'\nD\tinput-0.c\t/^#define D \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/;\"\td\tfile:\tmacrodef:\"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalast\"\nE\tinput-0.c\t/^#define E \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/;\"\td\tfile:\tmacrodef:\"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaala\\\\n\"\nF\tinput-0.c\t/^#define F /;\"\td\tfile:\tmacrodef:\"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalasS\"\nG\tinput-0.c\t/^#define G /;\"\td\tfile:\tmacrodef:\"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalaSH\"\nH\tinput-0.c\t/^#define H /;\"\td\tfile:\tmacrodef:\"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalasS\"\nJ\tinput-1.c\t/^#define J /;\"\td\tfile:\tmacrodef:'aaaaaalast'\nK\tinput-1.c\t/^#define K /;\"\td\tfile:\tmacrodef:'aaaaaalast'\nL\tinput-1.c\t/^#define L /;\"\td\tfile:\tmacrodef:'aaaaaalast'\nM\tinput-1.c\t/^#define M /;\"\td\tfile:\tmacrodef:'aaaaaala\\\\n'\nN\tinput-1.c\t/^#define N /;\"\td\tfile:\tmacrodef:'aaaaaalast'\nO\tinput-1.c\t/^#define O /;\"\td\tfile:\tmacrodef:'aaaaaalaxx'\n" }, { "path": "Units/parser-cpreprocessor.r/skip-newlines-in-literals.d/input-0.c", "content": "#define D \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalastSHOULDBEINCLUDE\"\n#define E \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaala\\nSHOULDBEINCLUDE\"\n#define F \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalas\\nSHOULDBEINCLUDE\"\n\n#define G \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaala\\\nSHOULDBEINCLUDE\"\n#define H \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaalas\\\nSHOULDBEINCLUDE\"\n" }, { "path": "Units/parser-cpreprocessor.r/skip-newlines-in-literals.d/input-1.c", "content": "#define J 'aaaaaalastSHOULDNOTBETAGGED'\n#define K 'aaaaaalast\\n'\n#define L 'aaaaaalas\\nt'\n#define M 'aaaaaala\\nxx'\n#define N 'aaaaaalas\\\nt'\n#define O 'aaaaaala\\\nxx'\n" }, { "path": "Units/parser-cpreprocessor.r/skip-newlines-in-literals.d/input.c", "content": "#define X \"abc \\n\\t\\\n\tefg\"\n#define Y \"abc\"\n\n#define A '\\\na'\n\n#define B 'b'\n#define C '\\n'\n" }, { "path": "Units/parser-cpreprocessor.r/unget-mbyte-string.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-cpreprocessor.r/unget-mbyte-string.d/input-0.lds", "content": "i\"犬\"\n" }, { "path": "Units/parser-cpreprocessor.r/unget-mbyte-string.d/input-1.java", "content": "a(i'犬'\n" }, { "path": "Units/parser-cpreprocessor.r/unget-mbyte-string.d/input-2.lds", "content": "i'犬'\n" }, { "path": "Units/parser-cpreprocessor.r/unget-mbyte-string.d/input-3.java", "content": "a(i\"犬猫鼠羊兎鶏牛熊\"\n /* Push back a logger string */\n" }, { "path": "Units/parser-cpreprocessor.r/unget-mbyte-string.d/input.java", "content": "a(i\"犬\"\n" }, { "path": "Units/parser-cpreprocessor.r/unget-multi-bytes-string.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-cpreprocessor.r/unget-multi-bytes-string.d/input-0.lds", "content": "i\"犬\"\n" }, { "path": "Units/parser-cpreprocessor.r/unget-multi-bytes-string.d/input-1.java", "content": "a(i'犬'\n" }, { "path": "Units/parser-cpreprocessor.r/unget-multi-bytes-string.d/input-2.lds", "content": "i'犬'\n" }, { "path": "Units/parser-cpreprocessor.r/unget-multi-bytes-string.d/input.java", "content": "a(i\"犬\"\n" }, { "path": "Units/parser-csharp.r/nullable-parameters.d/args.ctags", "content": "--sort=no\n--fields=+{signature}\n" }, { "path": "Units/parser-csharp.r/nullable-parameters.d/expected.tags", "content": "Foo\tinput.cs\t/^public class Foo$/;\"\tc\nBar\tinput.cs\t/^ public void Bar(decimal? p)$/;\"\tm\tclass:Foo\tsignature:(decimal? p)\n" }, { "path": "Units/parser-csharp.r/nullable-parameters.d/input.cs", "content": "public class Foo\n{\n public void Bar(decimal? p)\n {\n }\n}\n" }, { "path": "Units/parser-css.r/css-at-rules.d/expected.tags", "content": "body\tinput.css\t/^ body { font-size: 10pt; }$/;\"\ts\nbody\tinput.css\t/^ body { font-size: 12px; }$/;\"\ts\nbody\tinput.css\t/^ body { line-height: 1.2 }$/;\"\ts\nhtml\tinput.css\t/^html { color: blue; }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-at-rules.d/input.css", "content": "\n@import \"foo.css\";\n\n@namespace url(http://www.w3.org/1999/xhtml);\n@namespace svg url(http://www.w3.org/2000/svg);\n\n@media screen {\n body { font-size: 10pt; }\n}\n@media print {\n body { font-size: 12px; }\n}\n@media screen, print {\n body { line-height: 1.2 }\n}\n\n@page :first {\n margin: 2in;\n}\n\n@font-face {\n font-family: Sample;\n src: local(\"Sample\"),\n url(Sample.ttf);\n}\n\nhtml { color: blue; }\n" }, { "path": "Units/parser-css.r/css-at-supports.d/expected.tags", "content": "html\tinput.css\t/^ html { test-property: 42; }$/;\"\ts\nhtml\tinput.css\t/^html { color: blue; }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-at-supports.d/input.css", "content": "\n@supports ((test-property: 42) or (test-property2: 42)) {\n html { test-property: 42; }\n}\n\nhtml { color: blue; }\n" }, { "path": "Units/parser-css.r/css-attribute-selectors.d/expected.tags", "content": "a[href^=\"http://\"]\tinput.css\t/^a[href^=\"http:\\/\\/\"] { color: red; }$/;\"\ts\na[href^=\"https://\"]\tinput.css\t/^a[href^=\"https:\\/\\/\"] { color: green; }$/;\"\ts\na[lang~=en]\tinput.css\t/^a[lang~=en] { background-color: light-green; }$/;\"\ts\nbody\tinput.css\t/^body { color: black; }$/;\"\ts\np\tinput.css\t/^p { color: gray }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-attribute-selectors.d/input.css", "content": "\nbody { color: black; }\na[href^=\"http://\"] { color: red; }\na[href^=\"https://\"] { color: green; }\na[lang~=en] { background-color: light-green; }\np { color: gray }\n" }, { "path": "Units/parser-css.r/css-comma-no-space.d/expected.tags", "content": "input\tinput.css\t/^input,textarea{border: 1px solid red;}$/;\"\ts\ntextarea\tinput.css\t/^input,textarea{border: 1px solid red;}$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-comma-no-space.d/input.css", "content": "input,textarea{border: 1px solid red;}\n" }, { "path": "Units/parser-css.r/css-namespace-selectors.d/expected.tags", "content": "*|div\tinput.css\t/^*|div { color: blue; }$/;\"\ts\nsvg|a\tinput.css\t/^svg|a { color: green; }$/;\"\ts\n|a\tinput.css\t/^|a { color: red; }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-namespace-selectors.d/input.css", "content": "\n|a { color: red; }\nsvg|a { color: green; }\n*|div { color: blue; }\n" }, { "path": "Units/parser-css.r/css-pseudo-classes.d/expected.tags", "content": "a:lang(en):after\tinput.css\t/^a:lang(en):after { content: \"[en]\" }$/;\"\ts\nbody :not(span)\tinput.css\t/^body :not(span) { color: green; }$/;\"\ts\nspan:not(:first-child)\tinput.css\t/^span:not(:first-child) { color: red; }$/;\"\ts\nspan:nth-child(-n+3)\tinput.css\t/^span:nth-child(-n+3) { color: lime; }$/;\"\ts\nspan:nth-child(0n+1)\tinput.css\t/^span:nth-child(0n+1) { color: lime; }$/;\"\ts\nspan:nth-child(1)\tinput.css\t/^span:nth-child(1) { color: lime; }$/;\"\ts\ntr:nth-child(10n+0)\tinput.css\t/^tr:nth-child(10n+0) { background-color: gray }$/;\"\ts\ntr:nth-child(2n)\tinput.css\t/^tr:nth-child(2n) { background-color: light-gray }$/;\"\ts\ntr:nth-child(2n+1)\tinput.css\t/^tr:nth-child(2n+1) { background-color: light-gray }$/;\"\ts\ntr:nth-child(even)\tinput.css\t/^tr:nth-child(even) { background-color: light-gray }$/;\"\ts\ntr:nth-child(odd)\tinput.css\t/^tr:nth-child(odd) { background-color: light-gray }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-pseudo-classes.d/input.css", "content": "\ntr:nth-child(2n+1) { background-color: light-gray }\ntr:nth-child(odd) { background-color: light-gray }\ntr:nth-child(2n) { background-color: light-gray }\ntr:nth-child(even) { background-color: light-gray }\ntr:nth-child(10n+0) { background-color: gray }\n\nspan:nth-child(0n+1) { color: lime; }\nspan:nth-child(1) { color: lime; }\nspan:nth-child(-n+3) { color: lime; }\n\nspan:not(:first-child) { color: red; }\nbody :not(span) { color: green; }\n\na:lang(en):after { content: \"[en]\" }\n" }, { "path": "Units/parser-css.r/css-simple.d/expected.tags", "content": "#footer\tinput.css\t/^#footer { font-size: 80%; }$/;\"\ti\n*\tinput.css\t/^* { padding:0; }$/;\"\ts\n.foo a\tinput.css\t/^.foo a, .foo b { color: blue; }$/;\"\ts\n.foo b\tinput.css\t/^.foo a, .foo b { color: blue; }$/;\"\ts\n.header\tinput.css\t/^.header { font-size: 200%; }$/;\"\tc\n.red\tinput.css\t/^.red { color: red }$/;\"\tc\ndiv.magic\tinput.css\t/^div.magic $/;\"\tc\nhtml\tinput.css\t/^html$/;\"\ts\nimg ~ p\tinput.css\t/^img ~ p {$/;\"\ts\nul > li > a\tinput.css\t/^ul > li > a {$/;\"\ts\nul li\tinput.css\t/^ul li { padding-left: 1em; }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-simple.d/input.css", "content": "\n* { padding:0; }\n\nhtml\n{\n margin: 0\n}\n\n.header { font-size: 200%; }\n\n#footer { font-size: 80%; }\n\ndiv.magic \n\n{\n/* haha */\ntext-decoration: blink;\n}\n\n.red { color: red }\n\nul li { padding-left: 1em; }\n.foo a, .foo b { color: blue; }\n\nul > li > a {\n font: monospace;\n}\n\n/* The general sibling combinator (~)\n * See https://developer.mozilla.org/en-US/docs/Web/CSS/General_sibling_combinator */\nimg ~ p {\n color: red;\n}\n" }, { "path": "Units/parser-css.r/css-singlequote-in-comment-issue2.d/expected.tags", "content": "a\tinput.css\t/^a{x:0;\\/*'*\\/}$/;\"\ts\nb\tinput.css\t/^b{y:0;}$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-singlequote-in-comment-issue2.d/input.css", "content": "a{x:0;/*'*/}\nb{y:0;}\n" }, { "path": "Units/parser-css.r/css-tag-types.d/expected.tags", "content": "#a #foo\tinput.css\t/^#a #foo{ color: red }$/;\"\ti\n#a #foo #bar\tinput.css\t/^#a #foo #bar{ color: red }$/;\"\ti\n#a #foo .bar\tinput.css\t/^#a #foo .bar{ color: red }$/;\"\tc\n#a #foo bar\tinput.css\t/^#a #foo bar{ color: red }$/;\"\ts\n#a .foo\tinput.css\t/^#a .foo{ color: red }$/;\"\tc\n#a .foo #bar\tinput.css\t/^#a .foo #bar{ color: red }$/;\"\ti\n#a .foo .bar\tinput.css\t/^#a .foo .bar{ color: red }$/;\"\tc\n#a .foo bar\tinput.css\t/^#a .foo bar{ color: red }$/;\"\ts\n#a foo\tinput.css\t/^#a foo{ color: red }$/;\"\ts\n#a foo #bar\tinput.css\t/^#a foo #bar{ color: red }$/;\"\ti\n#a foo .bar\tinput.css\t/^#a foo .bar{ color: red }$/;\"\tc\n#a foo bar\tinput.css\t/^#a foo bar{ color: red }$/;\"\ts\n.a #foo\tinput.css\t/^.a #foo{ color: red }$/;\"\ti\n.a #foo #bar\tinput.css\t/^.a #foo #bar{ color: red }$/;\"\ti\n.a #foo .bar\tinput.css\t/^.a #foo .bar{ color: red }$/;\"\tc\n.a #foo bar\tinput.css\t/^.a #foo bar{ color: red }$/;\"\ts\n.a .foo\tinput.css\t/^.a .foo{ color: red }$/;\"\tc\n.a .foo #bar\tinput.css\t/^.a .foo #bar{ color: red }$/;\"\ti\n.a .foo .bar\tinput.css\t/^.a .foo .bar{ color: red }$/;\"\tc\n.a .foo bar\tinput.css\t/^.a .foo bar{ color: red }$/;\"\ts\n.a foo\tinput.css\t/^.a foo{ color: red }$/;\"\ts\n.a foo #bar\tinput.css\t/^.a foo #bar{ color: red }$/;\"\ti\n.a foo .bar\tinput.css\t/^.a foo .bar{ color: red }$/;\"\tc\n.a foo bar\tinput.css\t/^.a foo bar{ color: red }$/;\"\ts\na #foo\tinput.css\t/^a #foo{ color: red }$/;\"\ti\na #foo #bar\tinput.css\t/^a #foo #bar{ color: red }$/;\"\ti\na #foo .bar\tinput.css\t/^a #foo .bar{ color: red }$/;\"\tc\na #foo bar\tinput.css\t/^a #foo bar{ color: red }$/;\"\ts\na .foo\tinput.css\t/^a .foo{ color: red }$/;\"\tc\na .foo #bar\tinput.css\t/^a .foo #bar{ color: red }$/;\"\ti\na .foo .bar\tinput.css\t/^a .foo .bar{ color: red }$/;\"\tc\na .foo bar\tinput.css\t/^a .foo bar{ color: red }$/;\"\ts\na foo\tinput.css\t/^a foo{ color: red }$/;\"\ts\na foo #bar\tinput.css\t/^a foo #bar{ color: red }$/;\"\ti\na foo .bar\tinput.css\t/^a foo .bar{ color: red }$/;\"\tc\na foo bar\tinput.css\t/^a foo bar{ color: red }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-tag-types.d/input.css", "content": "a foo{ color: red }\na #foo{ color: red }\na .foo{ color: red }\na foo bar{ color: red }\na foo #bar{ color: red }\na foo .bar{ color: red }\na #foo bar{ color: red }\na #foo #bar{ color: red }\na #foo .bar{ color: red }\na .foo bar{ color: red }\na .foo #bar{ color: red }\na .foo .bar{ color: red }\n\n#a foo{ color: red }\n#a #foo{ color: red }\n#a .foo{ color: red }\n#a foo bar{ color: red }\n#a foo #bar{ color: red }\n#a foo .bar{ color: red }\n#a #foo bar{ color: red }\n#a #foo #bar{ color: red }\n#a #foo .bar{ color: red }\n#a .foo bar{ color: red }\n#a .foo #bar{ color: red }\n#a .foo .bar{ color: red }\n\n.a foo{ color: red }\n.a #foo{ color: red }\n.a .foo{ color: red }\n.a foo bar{ color: red }\n.a foo #bar{ color: red }\n.a foo .bar{ color: red }\n.a #foo bar{ color: red }\n.a #foo #bar{ color: red }\n.a #foo .bar{ color: red }\n.a .foo bar{ color: red }\n.a .foo #bar{ color: red }\n.a .foo .bar{ color: red }\n" }, { "path": "Units/parser-css.r/css-trivial.d/expected.tags", "content": "a\tinput.css\t/^a{ color: red; }$/;\"\ts\nhtml\tinput.css\t/^html{ font: sans-serif; }$/;\"\ts\ninput\tinput.css\t/^input, textarea{ border: 1px solid green; }$/;\"\ts\np\tinput.css\t/^p{ text-align: justify; }$/;\"\ts\ntextarea\tinput.css\t/^input, textarea{ border: 1px solid green; }$/;\"\ts\n" }, { "path": "Units/parser-css.r/css-trivial.d/input.css", "content": "\nhtml{ font: sans-serif; }\na{ color: red; }\np{ text-align: justify; }\ninput, textarea{ border: 1px solid green; }\n" }, { "path": "Units/parser-cuda.r/cuda-sample.d/args.ctags", "content": "--sort=no\n--kinds-cuda=*" }, { "path": "Units/parser-cuda.r/cuda-sample.d/expected.tags", "content": "array1\tinput.cu\t/^__shared__ float2 array1[];$/;\"\tv\ttyperef:typename:float2[]\narray2\tinput.cu\t/^__shared__ __device__ dim3 array2[];$/;\"\tv\ttyperef:typename:dim3[]\ni1\tinput.cu\t/^__device__ volatile int i1 = 1;$/;\"\tv\ttyperef:typename:volatile int\ni2\tinput.cu\t/^__constant__ int i2 = 2;$/;\"\tv\ttyperef:typename:int\ndev1\tinput.cu\t/^__device__ void dev1(float * a,const float * __restrict__ b)$/;\"\tf\ttyperef:typename:void\na\tinput.cu\t/^__device__ void dev1(float * a,const float * __restrict__ b)$/;\"\tz\tfunction:dev1\ttyperef:typename:float *\tfile:\nb\tinput.cu\t/^__device__ void dev1(float * a,const float * __restrict__ b)$/;\"\tz\tfunction:dev1\ttyperef:typename:const float * \tfile:\nkernel1\tinput.cu\t/^__global__ void kernel1(float * a,float * __restrict__ b)$/;\"\tf\ttyperef:typename:void\na\tinput.cu\t/^__global__ void kernel1(float * a,float * __restrict__ b)$/;\"\tz\tfunction:kernel1\ttyperef:typename:float *\tfile:\nb\tinput.cu\t/^__global__ void kernel1(float * a,float * __restrict__ b)$/;\"\tz\tfunction:kernel1\ttyperef:typename:float * \tfile:\nmain\tinput.cu\t/^int main()$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cuda.r/cuda-sample.d/input.cu", "content": "// C with some CUDA extensions.\n\n__shared__ float2 array1[];\n__shared__ __device__ dim3 array2[];\n__device__ volatile int i1 = 1;\n__constant__ int i2 = 2;\n\n__device__ void dev1(float * a,const float * __restrict__ b)\n{\n}\n\n__global__ void kernel1(float * a,float * __restrict__ b)\n{\n\t\n}\n\nint main()\n{\n\tkernel1<<<1024 * 1024 / 256,256>>>(NULL,NULL);\n}\n\n" }, { "path": "Units/parser-cuda.r/param-with-default-value.d/args.ctags", "content": "--sort=no\n--fields=+{signature}\n" }, { "path": "Units/parser-cuda.r/param-with-default-value.d/expected.tags", "content": "foo1\tinput.cuh\t/^float foo1(int a)$/;\"\tf\ttyperef:typename:float\tsignature:(int a)\nfoo2\tinput.cuh\t/^bool foo2(float* pointer = NULL)$/;\"\tf\ttyperef:typename:bool\tsignature:(float * pointer=NULL)\nfoo2_alt\tinput.cuh\t/^bool foo2_alt(float* pointer)$/;\"\tf\ttyperef:typename:bool\tsignature:(float * pointer)\nfoo3\tinput.cuh\t/^bool foo3(const int a, float b, double c)$/;\"\tf\ttyperef:typename:bool\tsignature:(const int a,float b,double c)\n" }, { "path": "Units/parser-cuda.r/param-with-default-value.d/input.cuh", "content": "/* Taken from #4187 submitted by @emilioj, Emilio J. Padrón González */\nfloat foo1(int a)\n{\n for (int useless1=0; i<1000; ++i) {\n nonsense()\n }\n}\n\nbool foo2(float* pointer = NULL)\n{\n for (int useless2=0; i<1000; ++i) {\n nonsense()\n }\n}\n\nbool foo2_alt(float* pointer)\n{\n for (int useless2_alt=0; i<1000; ++i) {\n nonsense()\n }\n}\n\nbool foo3(const int a, float b, double c)\n{\n for (int useless3=0; i<1000; ++i) {\n nonsense()\n }\n}\n" }, { "path": "Units/parser-cxx.r/1117-using-in-c.d/input.c", "content": "using std::terminate_handler;\n" }, { "path": "Units/parser-cxx.r/README", "content": "See https://github.com/universal-ctags/ctags/pull/742\nlocal variable handling verified in variables-prototypes-2.cpp.d and\nvariables-prototypes.cpp.b.\n" }, { "path": "Units/parser-cxx.r/alignas-in-struct.d/expected.tags", "content": "AlignasTestStruct\tinput.cpp\t/^struct alignas( 64 ) AlignasTestStruct$/;\"\ts\tfile:\nAlignasTestStruct2\tinput.cpp\t/^class alignas( 64 ) AlignasTestStruct2$/;\"\tc\tfile:\n" }, { "path": "Units/parser-cxx.r/alignas-in-struct.d/input.cpp", "content": "// Taken from #1374 submitted by @oison-dan\nstruct alignas( 64 ) AlignasTestStruct\n{\n};\n\nclass alignas( 64 ) AlignasTestStruct2\n{\n};\n" }, { "path": "Units/parser-cxx.r/angle_bracket.cpp.d/expected.tags", "content": "bar\tinput.cpp\t/^static void bar (int value)$/;\"\tf\ttyperef:typename:void\tfile:\nbar2\tinput.cpp\t/^static bar2 (void)$/;\"\tf\tfile:\nfoo\tinput.cpp\t/^static void foo (int nelem)$/;\"\tf\ttyperef:typename:void\tfile:\n" }, { "path": "Units/parser-cxx.r/angle_bracket.cpp.d/input.cpp", "content": "static void foo (int nelem)\n{\n int rsize = 2;\n while (nelem < 0) {\n\trsize <<= 1;\n }\n}\n\nstatic void bar (int value)\n{\n return value < 0 ? value : 3;\n}\n\nstatic bar2 (void)\n{\n}\n" }, { "path": "Units/parser-cxx.r/attribute-alias.cpp.d/args.ctags", "content": "--sort=no\n--fields-C=+{alias}\n--extras=+r\n--fields=+{roles}{language}\n" }, { "path": "Units/parser-cxx.r/attribute-alias.cpp.d/expected.tags", "content": "y\tinput.c\t/^int x __attribute__((alias(\"y\")));$/;\"\ts\tlanguage:LdScript\troles:aliased\nx\tinput.c\t/^int x __attribute__((alias(\"y\")));$/;\"\tv\tlanguage:C\ttyperef:typename:int\troles:def\talias:y\n" }, { "path": "Units/parser-cxx.r/attribute-alias.cpp.d/input.c", "content": "int x __attribute__((alias(\"y\")));\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp-no-ldscript.d/args.ctags", "content": "--sort=no\n--kinds-C=+p\n--param-CPreProcessor._expand=1\n--fields-C=+{section}{macrodef}\n--fields=+S\n--fields=+rl\n--extras=+r\n--languages=-LdScript\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp-no-ldscript.d/expected.tags", "content": "f\tinput.c\t/^char f [] __attribute__((section(\"__ksymtab_strings\"), used, aligned(1)));$/;\"\tv\tlanguage:C\ttyperef:typename:char[]\troles:def\tsection:__ksymtab_strings\na\tinput.c\t/^struct duart a __attribute__ ((section (\"DUART_A\"))) = { 0 };$/;\"\tv\tlanguage:C\ttyperef:struct:duart\troles:def\tsection:DUART_A\nb\tinput.c\t/^struct duart b __attribute__ ((section (\"DUART_B\"))) = { 0 };$/;\"\tv\tlanguage:C\ttyperef:struct:duart\troles:def\tsection:DUART_B\nstack\tinput.c\t/^char stack[10000] __attribute__ ((section (\"STACK\"))) = { 0 };$/;\"\tv\tlanguage:C\ttyperef:typename:char[10000]\troles:def\tsection:STACK\ninit_data\tinput.c\t/^int init_data __attribute__ ((section (\"INITDATA\")));$/;\"\tv\tlanguage:C\ttyperef:typename:int\troles:def\tsection:INITDATA\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp-no-ldscript.d/input.c", "content": "/* Variables */\nchar f [] __attribute__((section(\"__ksymtab_strings\"), used, aligned(1)));\n\n/* Taken form gcc's info document. */\nstruct duart a __attribute__ ((section (\"DUART_A\"))) = { 0 };\nstruct duart b __attribute__ ((section (\"DUART_B\"))) = { 0 };\nchar stack[10000] __attribute__ ((section (\"STACK\"))) = { 0 };\nint init_data __attribute__ ((section (\"INITDATA\")));\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C=+p\n--param-CPreProcessor._expand=1\n--fields-C=+{section}{macrodef}\n--fields=+S\n--fields=+rl\n--extras=+r\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp.d/expected.tags", "content": "__ksymtab_strings\tinput.c\t/^char f [] __attribute__((section(\"__ksymtab_strings\"), used, aligned(1)));$/;\"\ti\tlanguage:LdScript\troles:destination\nf\tinput.c\t/^char f [] __attribute__((section(\"__ksymtab_strings\"), used, aligned(1)));$/;\"\tv\tlanguage:C\ttyperef:typename:char[]\troles:def\tsection:__ksymtab_strings\nDUART_A\tinput.c\t/^struct duart a __attribute__ ((section (\"DUART_A\"))) = { 0 };$/;\"\ti\tlanguage:LdScript\troles:destination\na\tinput.c\t/^struct duart a __attribute__ ((section (\"DUART_A\"))) = { 0 };$/;\"\tv\tlanguage:C\ttyperef:struct:duart\troles:def\tsection:DUART_A\nDUART_B\tinput.c\t/^struct duart b __attribute__ ((section (\"DUART_B\"))) = { 0 };$/;\"\ti\tlanguage:LdScript\troles:destination\nb\tinput.c\t/^struct duart b __attribute__ ((section (\"DUART_B\"))) = { 0 };$/;\"\tv\tlanguage:C\ttyperef:struct:duart\troles:def\tsection:DUART_B\nSTACK\tinput.c\t/^char stack[10000] __attribute__ ((section (\"STACK\"))) = { 0 };$/;\"\ti\tlanguage:LdScript\troles:destination\nstack\tinput.c\t/^char stack[10000] __attribute__ ((section (\"STACK\"))) = { 0 };$/;\"\tv\tlanguage:C\ttyperef:typename:char[10000]\troles:def\tsection:STACK\nINITDATA\tinput.c\t/^int init_data __attribute__ ((section (\"INITDATA\")));$/;\"\ti\tlanguage:LdScript\troles:destination\ninit_data\tinput.c\t/^int init_data __attribute__ ((section (\"INITDATA\")));$/;\"\tv\tlanguage:C\ttyperef:typename:int\troles:def\tsection:INITDATA\nCOMMAND_LINE_SIZE\tinput-0.c\t/^#define COMMAND_LINE_SIZE /;\"\td\tlanguage:C\tfile:\troles:def\tmacrodef:127\n__section\tinput-0.c\t/^#define __section(section) __attribute__((__section_/;\"\td\tlanguage:C\tfile:\tsignature:(section)\troles:def\tmacrodef:__attribute__((__section__(section)))\n__initdata\tinput-0.c\t/^#define __initdata\t/;\"\td\tlanguage:C\tfile:\troles:def\tmacrodef:__section(\".init.data\")\n.init.data\tinput-0.c\t/^char __initdata b0[COMMAND_LINE_SIZE];$/;\"\ti\tlanguage:LdScript\troles:destination\nb0\tinput-0.c\t/^char __initdata b0[COMMAND_LINE_SIZE];$/;\"\tv\tlanguage:C\ttyperef:typename:char[127]\troles:def\tsection:.init.data\n.init.data\tinput-0.c\t/^char b1[COMMAND_LINE_SIZE] __initdata;$/;\"\ti\tlanguage:LdScript\troles:destination\nb1\tinput-0.c\t/^char b1[COMMAND_LINE_SIZE] __initdata;$/;\"\tv\tlanguage:C\ttyperef:typename:char[127]\troles:def\tsection:.init.data\nbar0p\tinput-1.c\t/^extern void f0 (void) __attribute__ ((section (\"bar0p\")));$/;\"\ti\tlanguage:LdScript\troles:destination\nf0\tinput-1.c\t/^extern void f0 (void) __attribute__ ((section (\"bar0p\")));$/;\"\tp\tlanguage:C\ttyperef:typename:void\tfile:\tsignature:(void)\troles:def\tsection:bar0p\nbar0\tinput-1.c\t/^{$/;\"\ti\tlanguage:LdScript\troles:destination\nf0\tinput-1.c\t/^void f0 (void) __attribute__ ((section (\"bar0\")))$/;\"\tf\tlanguage:C\ttyperef:typename:void\tsignature:(void)\troles:def\tsection:bar0\nbar1p\tinput-1.c\t/^extern void __attribute__ ((section (\"bar1p\"))) f1 (void);$/;\"\ti\tlanguage:LdScript\troles:destination\nf1\tinput-1.c\t/^extern void __attribute__ ((section (\"bar1p\"))) f1 (void);$/;\"\tp\tlanguage:C\ttyperef:typename:void\tfile:\tsignature:(void)\troles:def\tsection:bar1p\nbar1\tinput-1.c\t/^{$/;\"\ti\tlanguage:LdScript\troles:destination\nf1\tinput-1.c\t/^void __attribute__ ((section (\"bar1\"))) f1 (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\tsignature:(void)\troles:def\tsection:bar1\nbar2p\tinput-1.c\t/^extern __attribute__ ((section (\"bar2p\"))) void f2 (void);$/;\"\ti\tlanguage:LdScript\troles:destination\nf2\tinput-1.c\t/^extern __attribute__ ((section (\"bar2p\"))) void f2 (void);$/;\"\tp\tlanguage:C\ttyperef:typename:void\tfile:\tsignature:(void)\troles:def\tsection:bar2p\nbar2\tinput-1.c\t/^{$/;\"\ti\tlanguage:LdScript\troles:destination\nf2\tinput-1.c\t/^__attribute__ ((section (\"bar2\"))) void f2 (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\tsignature:(void)\troles:def\tsection:bar2\nbar3p\tinput-1.c\t/^__attribute__ ((section (\"bar3p\"))) extern void f3 (void);$/;\"\ti\tlanguage:LdScript\troles:destination\nf3\tinput-1.c\t/^__attribute__ ((section (\"bar3p\"))) extern void f3 (void);$/;\"\tp\tlanguage:C\ttyperef:typename:void\tfile:\tsignature:(void)\troles:def\tsection:bar3p\nbar3\tinput-1.c\t/^{$/;\"\ti\tlanguage:LdScript\troles:destination\nf3\tinput-1.c\t/^__attribute__ ((section (\"bar3\"))) extern void f3 (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\tsignature:(void)\troles:def\tsection:bar3\nbar4p\tinput-1.c\t/^__attribute__ ((section (\"bar4p\"))) static void f4 (void);$/;\"\ti\tlanguage:LdScript\troles:destination\nf4\tinput-1.c\t/^__attribute__ ((section (\"bar4p\"))) static void f4 (void);$/;\"\tp\tlanguage:C\ttyperef:typename:void\tfile:\tsignature:(void)\troles:def\tsection:bar4p\nbar4\tinput-1.c\t/^{$/;\"\ti\tlanguage:LdScript\troles:destination\nf4\tinput-1.c\t/^__attribute__ ((section (\"bar4\"))) static void f4 (void)$/;\"\tf\tlanguage:C\ttyperef:typename:void\tfile:\tsignature:(void)\troles:def\tsection:bar4\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp.d/input-0.c", "content": "/* --param-CPreProcessor._expand=1 */\n#define COMMAND_LINE_SIZE 127\n#define __section(section) __attribute__((__section__(section)))\n#define __initdata\t__section(\".init.data\")\nchar __initdata b0[COMMAND_LINE_SIZE];\nchar b1[COMMAND_LINE_SIZE] __initdata;\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp.d/input-1.c", "content": "extern void f0 (void) __attribute__ ((section (\"bar0p\")));\nvoid f0 (void) __attribute__ ((section (\"bar0\")))\n{\n}\n\nextern void __attribute__ ((section (\"bar1p\"))) f1 (void);\nvoid __attribute__ ((section (\"bar1\"))) f1 (void)\n{\n}\n\nextern __attribute__ ((section (\"bar2p\"))) void f2 (void);\n__attribute__ ((section (\"bar2\"))) void f2 (void)\n{\n}\n\n__attribute__ ((section (\"bar3p\"))) extern void f3 (void);\n__attribute__ ((section (\"bar3\"))) extern void f3 (void)\n{\n}\n\n__attribute__ ((section (\"bar4p\"))) static void f4 (void);\n__attribute__ ((section (\"bar4\"))) static void f4 (void)\n{\n}\n" }, { "path": "Units/parser-cxx.r/attribute-sections.cpp.d/input.c", "content": "/* Variables */\nchar f [] __attribute__((section(\"__ksymtab_strings\"), used, aligned(1)));\n\n/* Taken form gcc's info document. */\nstruct duart a __attribute__ ((section (\"DUART_A\"))) = { 0 };\nstruct duart b __attribute__ ((section (\"DUART_B\"))) = { 0 };\nchar stack[10000] __attribute__ ((section (\"STACK\"))) = { 0 };\nint init_data __attribute__ ((section (\"INITDATA\")));\n" }, { "path": "Units/parser-cxx.r/attribute.cpp.d/args.ctags", "content": "--kinds-c++=*\n--fields-C++=+{properties}\n--fields=+tS\n--sort=no\n" }, { "path": "Units/parser-cxx.r/attribute.cpp.d/expected.tags", "content": "v1\tinput.cpp\t/^int v1 __attribute__((aligned(16)));$/;\"\tv\ttyperef:typename:int\nv2\tinput.cpp\t/^unsigned int v2 __attribute__((aligned(8),weak,visibility(\"hidden\")));$/;\"\tv\ttyperef:typename:unsigned int\nv3\tinput.cpp\t/^char v3[10000] __attribute__((section(\"STACK\"))) = { 0 };$/;\"\tv\ttyperef:typename:char[10000]\nv4\tinput.cpp\t/^char *__attribute__((aligned(8))) *v4;$/;\"\tv\ttyperef:typename:char **\ns1\tinput.cpp\t/^struct s1$/;\"\ts\tfile:\ns1v1\tinput.cpp\t/^\tchar s1v1;$/;\"\tm\tstruct:s1\ttyperef:typename:char\tfile:\ns1v2\tinput.cpp\t/^\tint s1v2[2] __attribute__((packed));$/;\"\tm\tstruct:s1\ttyperef:typename:int[2]\tfile:\nv5\tinput.cpp\t/^struct s1 __attribute__((vector_size(16))) v5;$/;\"\tv\ttyperef:struct:s1\ns2\tinput.cpp\t/^struct s2$/;\"\ts\tfile:\ns2v1\tinput.cpp\t/^\tshort s2v1[3];$/;\"\tm\tstruct:s2\ttyperef:typename:short[3]\tfile:\ns3\tinput.cpp\t/^struct __attribute__((__packed__)) s3$/;\"\ts\tfile:\ns3v1\tinput.cpp\t/^\tchar s3v1 __attribute__((deprecated));$/;\"\tm\tstruct:s3\ttyperef:typename:char\tfile:\tproperties:deprecated\ns3v2\tinput.cpp\t/^\tchar s3v2;$/;\"\tm\tstruct:s3\ttyperef:typename:char\tfile:\nt1\tinput.cpp\t/^typedef int t1 __attribute__ ((aligned (8)));$/;\"\tt\ttyperef:typename:int\tfile:\nt2\tinput.cpp\t/^typedef int t2 __attribute__ ((deprecated));$/;\"\tt\ttyperef:typename:int\tfile:\ne1\tinput.cpp\t/^enum e1 {$/;\"\tg\tfile:\ne1e1\tinput.cpp\t/^\te1e1 __attribute__((deprecated)),$/;\"\te\tenum:e1\tfile:\ne1e2\tinput.cpp\t/^\te1e2$/;\"\te\tenum:e1\tfile:\np1\tinput.cpp\t/^__attribute__((noreturn)) void p1(void),$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(void)\np2\tinput.cpp\t/^\t__attribute__((format(printf, 1, 2))) p2 (const char *, ...),$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(const char *,...)\n__anon6f96ad27010d\tinput.cpp\t/^\t__attribute__((format(printf, 1, 2))) p2 (const char *, ...),$/;\"\tz\tprototype:p2\ttyperef:typename:const char *\tfile:\np3\tinput.cpp\t/^\tp3 (void);$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(void)\np4\tinput.cpp\t/^void (__attribute__((noreturn)) ****p4) (void) __attribute__((deprecated));$/;\"\tv\ttyperef:typename:void (****)(void)\tproperties:deprecated\np5\tinput.cpp\t/^void p5() __attribute__ ((weak, alias (\"p4\")));$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:()\nf1\tinput.cpp\t/^\tf1(int f1p1,int f1p2 __attribute__((unused)),int f1p3)$/;\"\tf\ttyperef:typename:int\tsignature:(int f1p1,int f1p2,int f1p3)\tproperties:inline,deprecated\nf1p1\tinput.cpp\t/^\tf1(int f1p1,int f1p2 __attribute__((unused)),int f1p3)$/;\"\tz\tfunction:f1\ttyperef:typename:int\tfile:\nf1p2\tinput.cpp\t/^\tf1(int f1p1,int f1p2 __attribute__((unused)),int f1p3)$/;\"\tz\tfunction:f1\ttyperef:typename:int\tfile:\nf1p3\tinput.cpp\t/^\tf1(int f1p1,int f1p2 __attribute__((unused)),int f1p3)$/;\"\tz\tfunction:f1\ttyperef:typename:int\tfile:\nl1\tinput.cpp\t/^l1:$/;\"\tL\tfunction:f1\tfile:\n" }, { "path": "Units/parser-cxx.r/attribute.cpp.d/input.cpp", "content": "\n\nint v1 __attribute__((aligned(16)));\nunsigned int v2 __attribute__((aligned(8),weak,visibility(\"hidden\")));\nchar v3[10000] __attribute__((section(\"STACK\"))) = { 0 };\nchar *__attribute__((aligned(8))) *v4;\n\nstruct s1\n{\n\tchar s1v1;\n\tint s1v2[2] __attribute__((packed));\n};\n\nstruct s1 __attribute__((vector_size(16))) v5;\n\nstruct s2\n{\n\tshort s2v1[3];\n} __attribute__ ((aligned (8)));\n\nstruct __attribute__((__packed__)) s3\n{\n\tchar s3v1 __attribute__((deprecated));\n\tchar s3v2;\n};\n\ntypedef int t1 __attribute__ ((aligned (8)));\ntypedef int t2 __attribute__ ((deprecated));\n\nenum e1 {\n\te1e1 __attribute__((deprecated)),\n\te1e2\n};\n\n__attribute__((noreturn)) void p1(void),\n\t__attribute__((format(printf, 1, 2))) p2 (const char *, ...),\n\tp3 (void);\n\nvoid (__attribute__((noreturn)) ****p4) (void) __attribute__((deprecated));\nvoid p5() __attribute__ ((weak, alias (\"p4\")));\n\nint __attribute__((visibility(\"protected\")))\n\tf1(int f1p1,int f1p2 __attribute__((unused)),int f1p3)\n\t\t__attribute__ ((warn_unused_result,always_inline,deprecated))\n{\nl1:\n\t__attribute__((cold, unused)); /* Semi-colon is required here */\n\treturn -1;\n}" }, { "path": "Units/parser-cxx.r/blocks-nesting-too-deep.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-cxx.r/blocks-nesting-too-deep.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/blocks-nesting-too-deep.d/expected.tags", "content": "foo\tinput.cxx\t/^void foo(void) {$/;\"\tf\ttyperef:typename:void\nbar\tinput-0.cxx\t/^void bar(void) {}$/;\"\tf\ttyperef:typename:void\nv1\tinput-0.cxx\t/^ int v1[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[/;\"\tv\ttyperef:typename:int\nbaz\tinput-1.cxx\t/^void baz(void) {}$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/blocks-nesting-too-deep.d/input-0.cxx", "content": "//\n// Derived from https://raw.githubusercontent.com/llvm/llvm-project/25d1285eecbab731eaf418c8aab44e4eb5f9e538/clang/test/Parser/parser_overflow.c\n//\n\nvoid bar(void) {}\n\n#ifdef HUGE\n // 16384 [, 16384 ]\n int v0[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]];\n#else\n// 299 [, 299 ]\n int v1[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]];\n#endif\n" }, { "path": "Units/parser-cxx.r/blocks-nesting-too-deep.d/input-1.cxx", "content": "//\n// Derived from https://raw.githubusercontent.com/llvm/llvm-project/25d1285eecbab731eaf418c8aab44e4eb5f9e538/clang/test/Parser/parser_overflow.c\n//\n\nvoid baz(void) {}\n\n#ifdef HUGE\n // 16384 (, 16384 )\n int a0 = (((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((())))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))));\n#else\n// 299 (, 299 )\n int a1 = ((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((()))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))));\n#endif\n" }, { "path": "Units/parser-cxx.r/blocks-nesting-too-deep.d/input.cxx", "content": "//\n// Taken from https://raw.githubusercontent.com/llvm/llvm-project/25d1285eecbab731eaf418c8aab44e4eb5f9e538/clang/test/Parser/parser_overflow.c\n//\n\n// RUN: not %clang_cc1 %s -fsyntax-only -DHUGE 2>&1 | FileCheck %s\n// RUN: %clang_cc1 %s -fsyntax-only\n// RUN: not %clang_cc1 %s -fsyntax-only -fbracket-depth 299 2>&1 | FileCheck %s\n// RUN: %clang_cc1 %s -fsyntax-only -fbracket-depth 300\n// RUN: not %clang %s -fsyntax-only -fbracket-depth=299 2>&1 | FileCheck %s\n// RUN: %clang %s -fsyntax-only -fbracket-depth=300\n\nvoid foo(void) {\n#ifdef HUGE\n // 16384 {, 16384 }\n {{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}\n#else\n// 299 {, 299 }\n{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{{}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}\n#endif\n}\n\n// CHECK: fatal error: bracket nesting level exceeded maximum of {{2048|299}}\n// CHECK: note: use -fbracket-depth=N to increase maximum nesting level\n" }, { "path": "Units/parser-cxx.r/brackets.cpp.d/args.ctags", "content": "--kinds-c++=*\n--fields=+SK\n--sort=no\n" }, { "path": "Units/parser-cxx.r/brackets.cpp.d/expected.tags", "content": "EMPTY_MACRO\tinput.cpp\t/^#define EMPTY_MACRO$/;\"\tmacro\tfile:\nn01\tinput.cpp\t/^namespace n01 {$/;\"\tnamespace\tfile:\ng01\tinput.cpp\t/^\tstd::string g01 { \"\" };$/;\"\tvariable\tnamespace:n01\ttyperef:typename:std::string\nf01\tinput.cpp\t/^\tauto f01(std::string p01) -> std::string {$/;\"\tfunction\tnamespace:n01\ttyperef:typename:std::string\tsignature:(std::string p01)\np01\tinput.cpp\t/^\tauto f01(std::string p01) -> std::string {$/;\"\tparameter\tfunction:n01::f01\ttyperef:typename:std::string\tfile:\nl01\tinput.cpp\t/^\t\tstd::string l01 { \"\" };$/;\"\tlocal\tfunction:n01::f01\ttyperef:typename:std::string\tfile:\nl02\tinput.cpp\t/^\t\tstd::string l02 = { \"\" };$/;\"\tlocal\tfunction:n01::f01\ttyperef:typename:std::string\tfile:\nC01\tinput.cpp\t/^\tclass C01$/;\"\tclass\tnamespace:n01\tfile:\nm01\tinput.cpp\t/^\t\tstd::string m01 { \"\" };$/;\"\tmember\tclass:n01::C01\ttyperef:typename:std::string\tfile:\nm02\tinput.cpp\t/^\t\tstd::string m02;$/;\"\tmember\tclass:n01::C01\ttyperef:typename:std::string\tfile:\nm03\tinput.cpp\t/^\t\tstd::string m03;$/;\"\tmember\tclass:n01::C01\ttyperef:typename:std::string\tfile:\nC01\tinput.cpp\t/^\t\tC01(std::string p02)$/;\"\tfunction\tclass:n01::C01\tfile:\tsignature:(std::string p02)\np02\tinput.cpp\t/^\t\tC01(std::string p02)$/;\"\tparameter\tfunction:n01::C01::C01\ttyperef:typename:std::string\tfile:\nC01\tinput.cpp\t/^\t\tC01()$/;\"\tfunction\tclass:n01::C01\tfile:\tsignature:()\nl03\tinput.cpp\t/^\t\t\tstd::string l03 { \"\" };$/;\"\tlocal\tfunction:n01::C01::C01\ttyperef:typename:std::string\tfile:\nl04\tinput.cpp\t/^\t\t\tstd::string l04 { \"\" };$/;\"\tlocal\tfunction:n01::C01::C01\ttyperef:typename:std::string\tfile:\nl05\tinput.cpp\t/^\t\t\tC01 l05{ \"\" };$/;\"\tlocal\tfunction:n01::C01::C01\ttyperef:typename:C01\tfile:\nf02\tinput.cpp\t/^\t\tstd::string f02() const EMPTY_MACRO { }$/;\"\tfunction\tclass:n01::C01\ttyperef:typename:std::string\tfile:\tsignature:() const\nm04\tinput.cpp\t/^\t\tint m04 { 0 };$/;\"\tmember\tclass:n01::C01\ttyperef:typename:int\tfile:\nf03\tinput.cpp\t/^\t\tstd::string f03() const EMPTY_MACRO { }$/;\"\tfunction\tclass:n01::C01\ttyperef:typename:std::string\tfile:\tsignature:() const\nf04\tinput.cpp\t/^\t\tstd::string f04() const EMPTY_MACRO { }$/;\"\tfunction\tclass:n01::C01\ttyperef:typename:std::string\tfile:\tsignature:() const\nm05\tinput.cpp\t/^\t\tint m05 { 0 };$/;\"\tmember\tclass:n01::C01\ttyperef:typename:int\tfile:\nf05\tinput.cpp\t/^\t\tstd::string f05() const EMPTY_MACRO { }$/;\"\tfunction\tclass:n01::C01\ttyperef:typename:std::string\tfile:\tsignature:() const\nf06\tinput.cpp\t/^\t\tstd::string f06() const { }$/;\"\tfunction\tclass:n01::C01\ttyperef:typename:std::string\tfile:\tsignature:() const\nf07\tinput.cpp\t/^\t\tstd::string f07() { }$/;\"\tfunction\tclass:n01::C01\ttyperef:typename:std::string\tfile:\tsignature:()\n" }, { "path": "Units/parser-cxx.r/brackets.cpp.d/input.cpp", "content": "// Compile with gcc -std=c++11 input.cpp\n\n#include \n#include \n\n#define EMPTY_MACRO\n\nnamespace n01 {\n\n\tstd::string g01 { \"\" };\n\t\n\tauto f01(std::string p01) -> std::string {\n\t\t// initialization of unnamed temporary (makes no sense to report it, just don't think it's a function)\n\t\tstd::string { \"\" };\n\t\n\t\t// list initialisation for local\n\t\tstd::string l01 { \"\" };\n\t\t\n\t\t// constructor call for list initialisation\n\t\tnew std::string { \"\" };\n\n\t\t// copy list initialisation for local\n\t\tstd::string l02 = { \"\" };\n\n\t\t// return list initalizer\n\t\treturn { \"\" };\n\t}\n\t\n\tclass C01\n\t{\n\tpublic:\n\t\tstd::string m01 { \"\" };\n\t\tstd::string m02;\n\t\tstd::string m03;\n\t\n\t\tC01(std::string p02)\n\t\t\t: m02 { \"\" }\n\t\t{\n\t\t}\n\t\n\t\tC01()\n\t\t\t: m02 { \"\" },\n\t\t\tm03 { \"\" }\n\t\t{\n\t\t\tstd::string l03 { \"\" };\n\t\t\tf01({ \"\" });\n\t\t\tstd::string l04 { \"\" };\n\t\t\tC01 l05{ \"\" };\n\t\t}\n\t\t\n\t\tstd::string f02() const EMPTY_MACRO { }\n\t\tint m04 { 0 };\n\t\t\n\t\tstd::string f03() const EMPTY_MACRO { }\n\t\tstd::string f04() const EMPTY_MACRO { }\n\t\tint m05 { 0 };\n\t\t\n\t\tstd::string f05() const EMPTY_MACRO { }\n\t\tstd::string f06() const { }\n\t\tstd::string f07() { }\n\t};\n}\n\n\n" }, { "path": "Units/parser-cxx.r/broken-input.d/input.cc", "content": "__attribute__((visibility(\"protected\")))\n f1(int f1p1,int f1p2 __attribute__([(unused)),int f1p3)\n __attribute__ ((warn_unused_result,always_inline,deprecated))\n{\n" }, { "path": "Units/parser-cxx.r/bug-github-1111.cpp.d/expected.tags", "content": "" }, { "path": "Units/parser-cxx.r/bug-github-1111.cpp.d/input.cpp", "content": "test" }, { "path": "Units/parser-cxx.r/bug-github-1671.cpp.d/expected.tags", "content": "my_function\tinput.cpp\t/^void my_function()$/;\"\tf\ttyperef:typename:void\ntabs\tinput.cpp\t/^struct tabs { const static long value = x; };$/;\"\ts\tfile:\ntabs\tinput.cpp\t/^struct tabs::type> { const static long value = -x; };$/;\"\ts\tfile:\nvalue\tinput.cpp\t/^struct tabs { const static long value = x; };$/;\"\tm\tstruct:tabs\ttyperef:typename:const long\tfile:\nvalue\tinput.cpp\t/^struct tabs::type> { const static long value = -x; };$/;\"\tm\tstruct:tabs\ttyperef:typename:const long\tfile:\n" }, { "path": "Units/parser-cxx.r/bug-github-1671.cpp.d/input.cpp", "content": "/* Bug #1671 reported by davisking on 2018.01.28 */\n\ntemplate \nstruct tabs { const static long value = x; };\n\n// specialize tabs\ntemplate \nstruct tabs::type> { const static long value = -x; };\n\nvoid my_function()\n{\n}\n" }, { "path": "Units/parser-cxx.r/bug-github-1675.cpp.d/expected.tags", "content": "longlong3\tinput.cpp\t/^struct __device_builtin__ longlong3$/;\"\ts\tfile:\nlonglong4\tinput.cpp\t/^struct __device_builtin__ __builtin_align__(16) longlong4$/;\"\ts\tfile:\nw\tinput.cpp\t/^ long long int x, y, z, w;$/;\"\tm\tstruct:longlong4\ttyperef:typename:long long int\tfile:\nx\tinput.cpp\t/^ long long int x, y, z, w;$/;\"\tm\tstruct:longlong4\ttyperef:typename:long long int\tfile:\nx\tinput.cpp\t/^ long long int x, y, z;$/;\"\tm\tstruct:longlong3\ttyperef:typename:long long int\tfile:\ny\tinput.cpp\t/^ long long int x, y, z, w;$/;\"\tm\tstruct:longlong4\ttyperef:typename:long long int\tfile:\ny\tinput.cpp\t/^ long long int x, y, z;$/;\"\tm\tstruct:longlong3\ttyperef:typename:long long int\tfile:\nz\tinput.cpp\t/^ long long int x, y, z, w;$/;\"\tm\tstruct:longlong4\ttyperef:typename:long long int\tfile:\nz\tinput.cpp\t/^ long long int x, y, z;$/;\"\tm\tstruct:longlong3\ttyperef:typename:long long int\tfile:\n" }, { "path": "Units/parser-cxx.r/bug-github-1675.cpp.d/input.cpp", "content": "// issue #1675 opened by bfrg on 01/02/2018\n//\n// Structure declarations that contain macro functions are not parsed correctly.\n\n// structure longlong4 is completely ignored\nstruct __device_builtin__ __builtin_align__(16) longlong4\n{\n // x,y,z,w will be parsed as (global) variables and not members\n long long int x, y, z, w;\n};\n\n// this one is parsed correctly\nstruct __device_builtin__ longlong3\n{\n long long int x, y, z;\n};\n" }, { "path": "Units/parser-cxx.r/bug-github-1781.cpp.d/args.ctags", "content": "--fields-c++=+{properties}\n--fields=+n+a+Z+S+e\n--kinds-c++=pfzlv\n" }, { "path": "Units/parser-cxx.r/bug-github-1781.cpp.d/expected.tags", "content": "copyMatrix\tinput.cpp\t/^void copyMatrix(const ::cv::Mat source_p, LaGenMatDouble *destination_p_p)$/;\"\tf\tline:3\ttyperef:typename:void\tsignature:(const::cv::Mat source_p,LaGenMatDouble * destination_p_p)\tend:17\ncopyMatrix\tinput.cpp\t/^void copyMatrix(const LaGenMatDouble source_p, ::cv::Mat *destination_p_p)$/;\"\tf\tline:19\ttyperef:typename:void\tsignature:(const LaGenMatDouble source_p,::cv::Mat * destination_p_p)\tend:33\ndestination_p_p\tinput.cpp\t/^void copyMatrix(const ::cv::Mat source_p, LaGenMatDouble *destination_p_p)$/;\"\tz\tline:3\tscope:function:copyMatrix\ttyperef:typename:LaGenMatDouble *\tfile:\ndestination_p_p\tinput.cpp\t/^void copyMatrix(const LaGenMatDouble source_p, ::cv::Mat *destination_p_p)$/;\"\tz\tline:19\tscope:function:copyMatrix\ttyperef:typename:::cv::Mat *\tfile:\ni_l\tinput.cpp\t/^ for (int i_l = 0; i_l < source_p.rows(); ++i_l)$/;\"\tl\tline:23\tscope:function:copyMatrix\ttyperef:typename:int\tfile:\tend:23\ni_l\tinput.cpp\t/^ for (int i_l = 0; i_l < source_p.rows; ++i_l)$/;\"\tl\tline:7\tscope:function:copyMatrix\ttyperef:typename:int\tfile:\tend:7\nj_l\tinput.cpp\t/^ for (int j_l = 0; j_l < source_p.cols(); ++j_l)$/;\"\tl\tline:25\tscope:function:copyMatrix\ttyperef:typename:int\tfile:\tend:25\nj_l\tinput.cpp\t/^ for (int j_l = 0; j_l < source_p.cols; ++j_l)$/;\"\tl\tline:9\tscope:function:copyMatrix\ttyperef:typename:int\tfile:\tend:9\nsource_p\tinput.cpp\t/^void copyMatrix(const ::cv::Mat source_p, LaGenMatDouble *destination_p_p)$/;\"\tz\tline:3\tscope:function:copyMatrix\ttyperef:typename:const::cv::Mat\tfile:\nsource_p\tinput.cpp\t/^void copyMatrix(const LaGenMatDouble source_p, ::cv::Mat *destination_p_p)$/;\"\tz\tline:19\tscope:function:copyMatrix\ttyperef:typename:const LaGenMatDouble\tfile:\n" }, { "path": "Units/parser-cxx.r/bug-github-1781.cpp.d/input.cpp", "content": "// Bug reported by reidakdumont on 2018/07/05\n\nvoid copyMatrix(const ::cv::Mat source_p, LaGenMatDouble *destination_p_p)\n{\n if (destination_p_p->rows() != source_p.rows || destination_p_p->cols() != source_p.cols)\n *destination_p_p = LaGenMatDouble(source_p.rows, source_p.cols);\n for (int i_l = 0; i_l < source_p.rows; ++i_l)\n {\n for (int j_l = 0; j_l < source_p.cols; ++j_l)\n {\n if (source_p.type() == CV_32F)\n (*destination_p_p)(i_l,j_l) = source_p.at(i_l,j_l);\n else if (source_p.type() == CV_64F)\n (*destination_p_p)(i_l,j_l) = source_p.at(i_l,j_l);\n }\n }\n}\n\nvoid copyMatrix(const LaGenMatDouble source_p, ::cv::Mat *destination_p_p)\n{\n if (destination_p_p->rows != source_p.rows() || destination_p_p->cols != source_p.cols())\n *destination_p_p = ::cv::Mat(source_p.rows(), source_p.cols(), CV_64F);\n for (int i_l = 0; i_l < source_p.rows(); ++i_l)\n {\n for (int j_l = 0; j_l < source_p.cols(); ++j_l)\n {\n if (destination_p_p->type() == CV_32F)\n destination_p_p->at(i_l,j_l) = (source_p)(i_l,j_l);\n else if (destination_p_p->type() == CV_64F)\n destination_p_p->at(i_l,j_l) = (source_p)(i_l,j_l);\n }\n }\n}" }, { "path": "Units/parser-cxx.r/bug-github-2263.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*-l\n" }, { "path": "Units/parser-cxx.r/bug-github-2263.cpp.d/expected.tags", "content": "C0\tinput.cc\t/^template class C0 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template class C0 {$/;\"\tZ\tclass:C0\ttyperef:meta:class\nt\tinput.cc\t/^ T t;$/;\"\tm\tclass:C0\ttyperef:typename:T\tfile:\nC1\tinput.cc\t/^template > class C1 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template > class C1 {$/;\"\tZ\tclass:C1\ttyperef:meta:class\nT0\tinput.cc\t/^template > class C1 {$/;\"\tZ\tclass:C1\ttyperef:meta:typename\nt0\tinput.cc\t/^ T0 t0;$/;\"\tm\tclass:C1\ttyperef:typename:T0\tfile:\nc1rehash\tinput.cc\t/^ void c1rehash() {}$/;\"\tf\tclass:C1\ttyperef:typename:void\tfile:\nC2\tinput.cc\t/^template >> class C2 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template >> class C2 {$/;\"\tZ\tclass:C2\ttyperef:meta:class\nT1\tinput.cc\t/^template >> class C2 {$/;\"\tZ\tclass:C2\ttyperef:meta:typename\nt1\tinput.cc\t/^ T1 t1;$/;\"\tm\tclass:C2\ttyperef:typename:T1\tfile:\nc2rehash\tinput.cc\t/^ void c2rehash() {}$/;\"\tf\tclass:C2\ttyperef:typename:void\tfile:\nC3\tinput.cc\t/^template >>> class C3 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template >>> class C3 {$/;\"\tZ\tclass:C3\ttyperef:meta:class\nT2\tinput.cc\t/^template >>> class C3 {$/;\"\tZ\tclass:C3\ttyperef:meta:typename\nt2\tinput.cc\t/^ T2 t2;$/;\"\tm\tclass:C3\ttyperef:typename:T2\tfile:\nc3rehash\tinput.cc\t/^ void c3rehash() {}$/;\"\tf\tclass:C3\ttyperef:typename:void\tfile:\nC4\tinput.cc\t/^template >>>> class C4 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template >>>> class C4 {$/;\"\tZ\tclass:C4\ttyperef:meta:class\nT3\tinput.cc\t/^template >>>> class C4 {$/;\"\tZ\tclass:C4\ttyperef:meta:typename\nt3\tinput.cc\t/^ T3 t3;$/;\"\tm\tclass:C4\ttyperef:typename:T3\tfile:\nc4rehash\tinput.cc\t/^ void c4rehash() {}$/;\"\tf\tclass:C4\ttyperef:typename:void\tfile:\nC5\tinput.cc\t/^template >>>>> class C5 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template >>>>> class C5 {$/;\"\tZ\tclass:C5\ttyperef:meta:class\nT4\tinput.cc\t/^template >>>>> class C5 {$/;\"\tZ\tclass:C5\ttyperef:meta:typename\nt4\tinput.cc\t/^ T4 t4;$/;\"\tm\tclass:C5\ttyperef:typename:T4\tfile:\nc5rehash\tinput.cc\t/^ void c5rehash() {}$/;\"\tf\tclass:C5\ttyperef:typename:void\tfile:\nC4x1\tinput.cc\t/^template >>>, class S = int> class C4x1 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template >>>, class S = int> class C4x1 {$/;\"\tZ\tclass:C4x1\ttyperef:meta:class\nT3\tinput.cc\t/^template >>>, class S = int> class C4x1 {$/;\"\tZ\tclass:C4x1\ttyperef:meta:typename\nS\tinput.cc\t/^template >>>, class S = int> class C4x1 {$/;\"\tZ\tclass:C4x1\ttyperef:meta:class\nt3\tinput.cc\t/^ T3 t3;$/;\"\tm\tclass:C4x1\ttyperef:typename:T3\tfile:\ns\tinput.cc\t/^ S s;$/;\"\tm\tclass:C4x1\ttyperef:typename:S\tfile:\nc4x1rehash\tinput.cc\t/^ void c4x1rehash() {}$/;\"\tf\tclass:C4x1\ttyperef:typename:void\tfile:\nC4x2\tinput.cc\t/^template >>>, class S = C0> class C4x2 {$/;\"\tc\tfile:\nT\tinput.cc\t/^template >>>, class S = C0> class C4x2 {$/;\"\tZ\tclass:C4x2\ttyperef:meta:class\nT3\tinput.cc\t/^template >>>, class S = C0> class C4x2 {$/;\"\tZ\tclass:C4x2\ttyperef:meta:typename\nS\tinput.cc\t/^template >>>, class S = C0> class C4x2 {$/;\"\tZ\tclass:C4x2\ttyperef:meta:class\nt3\tinput.cc\t/^ T3 t3;$/;\"\tm\tclass:C4x2\ttyperef:typename:T3\tfile:\ns\tinput.cc\t/^ S s;$/;\"\tm\tclass:C4x2\ttyperef:typename:S\tfile:\nc4x2rehash\tinput.cc\t/^ void c4x2rehash() {}$/;\"\tf\tclass:C4x2\ttyperef:typename:void\tfile:\nmain\tinput.cc\t/^main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug-github-2263.cpp.d/input.cc", "content": "template class C0 {\n T t;\n};\n\ntemplate > class C1 {\n T0 t0;\npublic:\n void c1rehash() {}\n};\n\ntemplate >> class C2 {\n T1 t1;\npublic:\n void c2rehash() {}\n};\n\ntemplate >>> class C3 {\n T2 t2;\npublic:\n void c3rehash() {}\n};\n\ntemplate >>>> class C4 {\n T3 t3;\npublic:\n void c4rehash() {}\n};\n\ntemplate >>>>> class C5 {\n T4 t4;\npublic:\n void c5rehash() {}\n};\n\ntemplate >>>, class S = int> class C4x1 {\n T3 t3;\n S s;\npublic:\n void c4x1rehash() {}\n};\n\ntemplate >>>, class S = C0> class C4x2 {\n T3 t3;\n S s;\npublic:\n void c4x2rehash() {}\n};\n\n\nint\nmain(void)\n{\n C0 c0;\n C1 c1();\n C2 c2();\n C3 c3();\n C4 c4();\n C4x1 cx41();\n C4x2 cx42();\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/bug-github-2538.cpp.d/args.ctags", "content": "-D'M=T(M)'\n-D'x=y.x'" }, { "path": "Units/parser-cxx.r/bug-github-2538.cpp.d/expected.tags", "content": "f\tinput.cpp\t/^int f(int v)$/;\"\tf\ttyperef:typename:int\ntest\tinput.cpp\t/^struct test$/;\"\ts\tfile:\nx\tinput.cpp\t/^\tint x;$/;\"\tm\tstruct:test\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/bug-github-2538.cpp.d/input.cpp", "content": "// Recursive macro expansion causes a segmentation fault\n// or infinite loop\n\nstruct test\n{\n\tint x;\n};\n\nint f(int v)\n{\n\tstruct test y;\n\ty.x = 10;\n\treturn v & M;\n}\n" }, { "path": "Units/parser-cxx.r/bug-github-3019.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/bug-github-3019.d/expected.tags", "content": "X\tinput.cpp\t/^struct X {$/;\"\ts\tfile:\noperator int\tinput.cpp\t/^ operator int() const { return 7; }$/;\"\tf\tstruct:X\tfile:\noperator int*\tinput.cpp\t/^ explicit operator int*() const { return nullptr; }$/;\"\tf\tstruct:X\tfile:\narr_t\tinput.cpp\t/^ using arr_t = int[3];$/;\"\tt\tstruct:X\ttyperef:typename:int[3]\tfile:\noperator arr_t*\tinput.cpp\t/^ operator arr_t*() const { return nullptr; } \\/\\/ OK if done through typedef$/;\"\tf\tstruct:X\tfile:\nmain\tinput.cpp\t/^int main()$/;\"\tf\ttyperef:typename:int\nmyint\tinput-1.cpp\t/^typedef int myint;$/;\"\tt\ttyperef:typename:int\tfile:\nPoint\tinput-1.cpp\t/^struct Point {$/;\"\ts\tfile:\nPoint\tinput-1.cpp\t/^ Point (int i): x(i), y(i) {}$/;\"\tf\tstruct:Point\tfile:\nx\tinput-1.cpp\t/^ int x,y;$/;\"\tm\tstruct:Point\ttyperef:typename:int\tfile:\ny\tinput-1.cpp\t/^ int x,y;$/;\"\tm\tstruct:Point\ttyperef:typename:int\tfile:\nInt\tinput-1.cpp\t/^class Int {$/;\"\tc\tfile:\nInt\tinput-1.cpp\t/^ Int (int i = 0): val(i), p(i) {}$/;\"\tf\tclass:Int\tfile:\noperator myint\tinput-1.cpp\t/^ operator myint() const { return val; }$/;\"\tf\tclass:Int\tfile:\noperator const myint\tinput-1.cpp\t/^ operator const myint() const { return val; }$/;\"\tf\tclass:Int\tfile:\noperator myint*\tinput-1.cpp\t/^ operator myint*() const { return NULL; }$/;\"\tf\tclass:Int\tfile:\noperator const myint*\tinput-1.cpp\t/^ operator const myint*() const { return NULL; }$/;\"\tf\tclass:Int\tfile:\noperator myint*const\tinput-1.cpp\t/^ operator myint*const() const { return NULL; }$/;\"\tf\tclass:Int\tfile:\noperator const myint*const\tinput-1.cpp\t/^ operator const myint*const() const { return NULL; }$/;\"\tf\tclass:Int\tfile:\noperator int\tinput-1.cpp\t/^ operator int() const { return val; }$/;\"\tf\tclass:Int\tfile:\noperator int*\tinput-1.cpp\t/^ operator int *() const { return 0; }$/;\"\tf\tclass:Int\tfile:\noperator const int*\tinput-1.cpp\t/^ operator const int *() const { return 0; }$/;\"\tf\tclass:Int\tfile:\noperator const int*const\tinput-1.cpp\t/^ operator const int *const() const { return 0; }$/;\"\tf\tclass:Int\tfile:\noperator int*const\tinput-1.cpp\t/^ operator int *const() const { return 0; }$/;\"\tf\tclass:Int\tfile:\noperator struct Point*\tinput-1.cpp\t/^ operator struct Point *() const { return (Point *)&p; }$/;\"\tf\tclass:Int\tfile:\noperator const struct Point*\tinput-1.cpp\t/^ operator const struct Point *() const { return 0; }$/;\"\tf\tclass:Int\tfile:\noperator const struct Point*const\tinput-1.cpp\t/^ operator const struct Point *const() const { return 0; }$/;\"\tf\tclass:Int\tfile:\noperator struct Point*const\tinput-1.cpp\t/^ operator struct Point *const() const { return 0; }$/;\"\tf\tclass:Int\tfile:\nval\tinput-1.cpp\t/^ int val;$/;\"\tm\tclass:Int\ttyperef:typename:int\tfile:\np\tinput-1.cpp\t/^ struct Point p;$/;\"\tm\tclass:Int\ttyperef:struct:Point\tfile:\nmain\tinput-1.cpp\t/^int main(void)$/;\"\tf\ttyperef:typename:int\nmuchar\tinput-2.cpp\t/^typedef char muchar;$/;\"\tt\ttyperef:typename:char\tfile:\nRange\tinput-2.cpp\t/^struct Range {$/;\"\ts\tfile:\nRange\tinput-2.cpp\t/^ Range (int b, int e): begin(b), end(end) {}$/;\"\tf\tstruct:Range\tfile:\nbegin\tinput-2.cpp\t/^ int begin, end;$/;\"\tm\tstruct:Range\ttyperef:typename:int\tfile:\nend\tinput-2.cpp\t/^ int begin, end;$/;\"\tm\tstruct:Range\ttyperef:typename:int\tfile:\nChar\tinput-2.cpp\t/^class Char {$/;\"\tc\tfile:\nChar\tinput-2.cpp\t/^ Char (char i = 0): val(i), r(i, i) {}$/;\"\tf\tclass:Char\tfile:\noperator volatile muchar\tinput-2.cpp\t/^ operator volatile muchar() const { return val; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const muchar*\tinput-2.cpp\t/^ operator volatile const muchar*() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const muchar*const\tinput-2.cpp\t/^ operator volatile const muchar*const() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile int*\tinput-2.cpp\t/^ operator volatile int *() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile int*volatile\tinput-2.cpp\t/^ operator volatile int *volatile() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator int*volatile\tinput-2.cpp\t/^ operator int *volatile() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const int*\tinput-2.cpp\t/^ operator volatile const int *() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const int*volatile\tinput-2.cpp\t/^ operator volatile const int *volatile() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator int*volatile const\tinput-2.cpp\t/^ operator int *volatile const() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const int*\tinput-2.cpp\t/^ operator volatile const int *() volatile { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const int*volatile\tinput-2.cpp\t/^ operator volatile const int *volatile() volatile { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator int*volatile const\tinput-2.cpp\t/^ operator int *volatile const() volatile { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile struct Range*\tinput-2.cpp\t/^ operator volatile struct Range *() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile struct Range*volatile\tinput-2.cpp\t/^ operator volatile struct Range *volatile() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator struct Range*volatile\tinput-2.cpp\t/^ operator struct Range *volatile() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const struct Range*\tinput-2.cpp\t/^ operator volatile const struct Range *() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const struct Range*volatile\tinput-2.cpp\t/^ operator volatile const struct Range *volatile() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator struct Range*volatile const\tinput-2.cpp\t/^ operator struct Range *volatile const() const { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const struct Range*\tinput-2.cpp\t/^ operator volatile const struct Range *() volatile { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator volatile const struct Range*volatile\tinput-2.cpp\t/^ operator volatile const struct Range *volatile() volatile { return 0; }$/;\"\tf\tclass:Char\tfile:\noperator struct Range*volatile const\tinput-2.cpp\t/^ operator struct Range *volatile const() volatile { return 0; } $/;\"\tf\tclass:Char\tfile:\nval\tinput-2.cpp\t/^ int val;$/;\"\tm\tclass:Char\ttyperef:typename:int\tfile:\nr\tinput-2.cpp\t/^ struct Range r;$/;\"\tm\tclass:Char\ttyperef:struct:Range\tfile:\nmain\tinput-2.cpp\t/^int main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug-github-3019.d/input-1.cpp", "content": "typedef int myint;\n\nstruct Point {\n Point (int i): x(i), y(i) {}\n int x,y;\n};\n\nclass Int {\npublic:\n Int (int i = 0): val(i), p(i) {}\n\n operator myint() const { return val; }\n operator const myint() const { return val; }\n operator myint*() const { return NULL; }\n operator const myint*() const { return NULL; }\n\n operator myint*const() const { return NULL; }\n operator const myint*const() const { return NULL; }\n \n operator int() const { return val; }\n\n operator int *() const { return 0; }\n operator const int *() const { return 0; }\n operator const int *const() const { return 0; }\n operator int *const() const { return 0; }\n\n operator struct Point *() const { return (Point *)&p; }\n operator const struct Point *() const { return 0; }\n operator const struct Point *const() const { return 0; }\n operator struct Point *const() const { return 0; }\n\nprivate:\n int val;\n struct Point p;\n};\n\nint main(void)\n{\n return Int ();\n}\n" }, { "path": "Units/parser-cxx.r/bug-github-3019.d/input-2.cpp", "content": "typedef char muchar;\n\nstruct Range {\n Range (int b, int e): begin(b), end(end) {}\n int begin, end;\n};\n\nclass Char {\npublic:\n Char (char i = 0): val(i), r(i, i) {}\n\n operator volatile muchar() const { return val; }\n operator volatile const muchar*() const { return 0; }\n operator volatile const muchar*const() const { return 0; }\n operator volatile int *() const { return 0; }\n operator volatile int *volatile() const { return 0; }\n operator int *volatile() const { return 0; }\n operator volatile const int *() const { return 0; }\n operator volatile const int *volatile() const { return 0; }\n operator int *volatile const() const { return 0; }\n\n operator volatile const int *() volatile { return 0; }\n operator volatile const int *volatile() volatile { return 0; }\n operator int *volatile const() volatile { return 0; }\n\n operator volatile struct Range *() const { return 0; }\n operator volatile struct Range *volatile() const { return 0; }\n operator struct Range *volatile() const { return 0; }\n \n operator volatile const struct Range *() const { return 0; }\n operator volatile const struct Range *volatile() const { return 0; }\n operator struct Range *volatile const() const { return 0; }\n\n operator volatile const struct Range *() volatile { return 0; }\n operator volatile const struct Range *volatile() volatile { return 0; }\n operator struct Range *volatile const() volatile { return 0; } \n \nprivate:\n int val;\n struct Range r;\n};\n\nint main(void)\n{\n return Char ();\n}\n" }, { "path": "Units/parser-cxx.r/bug-github-3019.d/input.cpp", "content": "// Taken from #3019 submitted by @hammockt\nstruct X {\n //implicit conversion\n operator int() const { return 7; }\n \n // explicit conversion\n explicit operator int*() const { return nullptr; }\n \n// Error: array operator not allowed in conversion-type-id\n// operator int(*)[3]() const { return nullptr; }\n using arr_t = int[3];\n operator arr_t*() const { return nullptr; } // OK if done through typedef\n// operator arr_t () const; // Error: conversion to array not allowed in any case\n};\n \nint main()\n{\n X x;\n \n int n = static_cast(x); // OK: sets n to 7\n int m = x; // OK: sets m to 7\n \n int* p = static_cast(x); // OK: sets p to null\n// int* q = x; // Error: no implicit conversion\n \n int (*pa)[3] = x; // OK\n}\n" }, { "path": "Units/parser-cxx.r/bug-github-3413.cpp.d/README", "content": "This is a crash test. So no expected.tags here.\n" }, { "path": "Units/parser-cxx.r/bug-github-3413.cpp.d/input.hpp", "content": "struct S\n" }, { "path": "Units/parser-cxx.r/bug-github-871.cpp.d/args.ctags", "content": "--kinds-c++=*\n" }, { "path": "Units/parser-cxx.r/bug-github-871.cpp.d/expected.tags", "content": "funa\tinput.cpp\t/^bool funa()$/;\"\tf\ttyperef:typename:bool\nfunb\tinput.cpp\t/^int funb()$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug-github-871.cpp.d/input.cpp", "content": "// Bug reported by hierabyss on github.com.\n// funb() was not present in the ctags output.\n\nbool funa()\n{\n if (first) return false;\n\n#if defined (MACRO)\n if (a)\n {\n if (second)\n#else \n if (a)\n {\n#endif \n return false;\n }\n\n return true;\n}\n\nint funb()\n{\n}" }, { "path": "Units/parser-cxx.r/bug-github-pull-972.cpp.d/args.ctags", "content": "--sort=no\n--fields=+StiZK\n--fields-c++=+{template}{properties}\n" }, { "path": "Units/parser-cxx.r/bug-github-pull-972.cpp.d/expected.tags", "content": "A\tinput.cpp\t/^class A : public T$/;\"\tclass\tfile:\tinherits:T\ttemplate:\nthis_type\tinput.cpp\t/^ typedef A this_type;$/;\"\ttypedef\tscope:class:A\ttyperef:typename:A\tfile:\nA\tinput.cpp\t/^ A(int i ) : m_i(i)$/;\"\tfunction\tscope:class:A\tfile:\tsignature:(int i)\ncreate\tinput.cpp\t/^ static A create(int i)$/;\"\tfunction\tscope:class:A\ttyperef:typename:A\tfile:\tsignature:(int i)\tproperties:static\ng_i\tinput.cpp\t/^ static int g_i;$/;\"\tmember\tscope:class:A\ttyperef:typename:int\tfile:\tproperties:static\nm_i\tinput.cpp\t/^ int m_i;$/;\"\tmember\tscope:class:A\ttyperef:typename:int\tfile:\ng_i\tinput.cpp\t/^int A::g_i; \\/\\/ (3) fail during parsing static member definition/;\"\tmember\tscope:class:A\ttyperef:typename:int\ttemplate:\n" }, { "path": "Units/parser-cxx.r/bug-github-pull-972.cpp.d/input.cpp", "content": "// Reported by Przemyslaw Szymanski on 02.06.2016\n\ntemplate // (1) fail if there are multiple params with default values\nclass A : public T\n{\npublic:\n typedef A this_type;\n\n A(int i ) : m_i(i)\n {\n }\n\n static A create(int i)\n {\n return this_type(i); // (2) fail here\n }\n\n static int g_i;\nprivate:\n int m_i;\n};\n\ntemplate \nint A::g_i; // (3) fail during parsing static member definition" }, { "path": "Units/parser-cxx.r/bug-issue-3166.d/args.ctags", "content": "--sort=no\n--fields=+e\n" }, { "path": "Units/parser-cxx.r/bug-issue-3166.d/expected.tags", "content": "DEAMER_LANGUAGE_DATASTRUCTURE_DEFINITION_OBJECT_MAIN_THREAT_THREAT_ANALYZER_DEAMER_LEXICON_TYPE_H\tinput.cxx\t/^#define DEAMER_LANGUAGE_DATASTRUCTURE_DEFINITION_OBJECT_MAIN_THREAT_THREAT_ANALYZER_DEAMER_LEXIC/;\"\td\tfile:\tend:24\ndeamer\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tfile:\tend:42\nlanguage\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer\tfile:\tend:42\ntype\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language\tfile:\tend:42\ndefinition\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language::type\tfile:\tend:42\nobject\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language::type::definition\tfile:\tend:42\nmain\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language::type::definition::object\tfile:\tend:42\nthreat\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language::type::definition::object::main\tfile:\tend:42\ndeamer\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language::type::definition::object::main::threat\tfile:\tend:42\nlexicon\tinput.cxx\t/^namespace deamer::language::type::definition::object::main::threat::deamer::lexicon$/;\"\tn\tnamespace:deamer::language::type::definition::object::main::threat::deamer\tfile:\tend:42\nType\tinput.cxx\t/^\tenum class Type$/;\"\tg\tnamespace:deamer::language::type::definition::object::main::threat::deamer::lexicon\tfile:\tend:41\nUnknown\tinput.cxx\t/^\t\tUnknown = 0,$/;\"\te\tenum:deamer::language::type::definition::object::main::threat::deamer::lexicon::Type\tfile:\nUnusedTerminal\tinput.cxx\t/^\t\tUnusedTerminal = 1,$/;\"\te\tenum:deamer::language::type::definition::object::main::threat::deamer::lexicon::Type\tfile:\nDeletedTerminalReferencedInGrammar\tinput.cxx\t/^\t\tDeletedTerminalReferencedInGrammar = 2,$/;\"\te\tenum:deamer::language::type::definition::object::main::threat::deamer::lexicon::Type\tfile:\nCrashTerminalReferencedInGrammar\tinput.cxx\t/^\t\tCrashTerminalReferencedInGrammar = 3,$/;\"\te\tenum:deamer::language::type::definition::object::main::threat::deamer::lexicon::Type\tfile:\nTerminalIsBaseSetOfLaterTerminal\tinput.cxx\t/^\t\tTerminalIsBaseSetOfLaterTerminal = 4,$/;\"\te\tenum:deamer::language::type::definition::object::main::threat::deamer::lexicon::Type\tfile:\nNonStandardNamingConvention\tinput.cxx\t/^\t\tNonStandardNamingConvention = 5,$/;\"\te\tenum:deamer::language::type::definition::object::main::threat::deamer::lexicon::Type\tfile:\n" }, { "path": "Units/parser-cxx.r/bug-issue-3166.d/input.cxx", "content": "// Taken from theDeamerProject/Deamer/include/Deamer/Language/Type/Definition/Object/Main/Threat/Threat/Analyzer/Deamer/Lexicon/Type.h\n// of https://github.com/Deruago/theDeamerProject\n/*\n * This program is free software; you can redistribute it and/or\n * modify it under the terms of the GNU General Public License\n * as published by the Free Software Foundation; either version 3\n * of the License, or (at your option) any later version.\n *\n * This program is distributed in the hope that it will be useful,\n * but WITHOUT ANY WARRANTY; without even the implied warranty of\n * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n * GNU General Public License for more details.\n *\n * You should have received a copy of the GNU General Public License\n * along with this program; if not, write to the Free Software Foundation,\n * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.\n */\n/*\n * Part of the DeamerProject.\n * For more information go to: https://github.com/Deruago/theDeamerProject\n */\n\n#ifndef DEAMER_LANGUAGE_DATASTRUCTURE_DEFINITION_OBJECT_MAIN_THREAT_THREAT_ANALYZER_DEAMER_LEXICON_TYPE_H\n#define DEAMER_LANGUAGE_DATASTRUCTURE_DEFINITION_OBJECT_MAIN_THREAT_THREAT_ANALYZER_DEAMER_LEXICON_TYPE_H\n\nnamespace deamer::language::type::definition::object::main::threat::deamer::lexicon\n{\n\t/*! \\enum Type\n\t *\n\t *\t\\brief All lexicon threats\n\t */\n\tenum class Type\n\t{\n\t\tUnknown = 0,\n\n\t\tUnusedTerminal = 1,\n\t\tDeletedTerminalReferencedInGrammar = 2,\n\t\tCrashTerminalReferencedInGrammar = 3,\n\t\tTerminalIsBaseSetOfLaterTerminal = 4,\n\t\tNonStandardNamingConvention = 5,\n\t};\n}\n\n#endif // DEAMER_LANGUAGE_DATASTRUCTURE_DEFINITION_OBJECT_MAIN_THREAT_THREAT_ANALYZER_DEAMER_LEXICON_TYPE_H\n" }, { "path": "Units/parser-cxx.r/bug1020715.cpp.d/expected.tags", "content": "f\tinput.cpp\t/^void f() {$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/bug1020715.cpp.d/input.cpp", "content": "void f() {\n done(a<<1);\n a->a;\n if (a->a) {\n }\n}\n" }, { "path": "Units/parser-cxx.r/bug1093123.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug1093123.cpp.d/expected.tags", "content": "main\tinput.cpp\t/^int main() {$/;\"\tf\ttyperef:typename:int\nstd\tinput.cpp\t/^using namespace std;$/;\"\tU\tfunction:main\nm\tinput.cpp\t/^int m;$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/bug1093123.cpp.d/input.cpp", "content": "#include \n\nint main() {\nusing namespace std;\ncout << 0 << endl;\nint m;\n}\n" }, { "path": "Units/parser-cxx.r/bug1187505.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug1187505.cpp.d/expected.tags", "content": "Abra\tinput.cpp\t/^class Abra : public Kadabra$/;\"\tc\tfile:\n" }, { "path": "Units/parser-cxx.r/bug1187505.cpp.d/input.cpp", "content": "MY_MACRO(qwerty < 1);\n\nclass Abra : public Kadabra\n{\n};\n" }, { "path": "Units/parser-cxx.r/bug1252.cpp.d/expected.tags", "content": "_PyNone_Type\tinput.cpp\t/^PyAPI_DATA(PyTypeObject) _PyNone_Type;/;\"\tv\ttyperef:typename:PyAPI_DATA (PyTypeObject)\n" }, { "path": "Units/parser-cxx.r/bug1252.cpp.d/input.cpp", "content": "PyAPI_DATA(PyTypeObject) _PyNone_Type;" }, { "path": "Units/parser-cxx.r/bug1548443.cpp.d/args.ctags", "content": "--kinds-c++=+p\n--fields=+iaS\n--extras=+q\n" }, { "path": "Units/parser-cxx.r/bug1548443.cpp.d/expected.tags", "content": "TestStruct\tinput.cpp\t/^struct TestStruct$/;\"\ts\tfile:\nTestStruct::_number\tinput.cpp\t/^int _number;$/;\"\tm\tstruct:TestStruct\ttyperef:typename:int\tfile:\taccess:public\nTestUnion\tinput.cpp\t/^union TestUnion$/;\"\tu\tfile:\nTestUnion::_number\tinput.cpp\t/^int _number;$/;\"\tm\tunion:TestUnion\ttyperef:typename:int\tfile:\taccess:public\n_number\tinput.cpp\t/^int _number;$/;\"\tm\tstruct:TestStruct\ttyperef:typename:int\tfile:\taccess:public\n_number\tinput.cpp\t/^int _number;$/;\"\tm\tunion:TestUnion\ttyperef:typename:int\tfile:\taccess:public\n" }, { "path": "Units/parser-cxx.r/bug1548443.cpp.d/input.cpp", "content": "union TestUnion\n{\nint _number;\n};\n\nstruct TestStruct\n{\nint _number;\n};\n" }, { "path": "Units/parser-cxx.r/bug1563476.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug1563476.cpp.d/expected.tags", "content": "g\tinput.cpp\t/^int g() {$/;\"\tf\ttyperef:typename:int\nIntroduceBitDef\tinput.cpp\t/^struct IntroduceBitDef< Accessor, typename$/;\"\ts\tfile:\nAccessor\tinput.cpp\t/^template< typename Accessor >$/;\"\tZ\tstruct:IntroduceBitDef\ttyperef:meta:typename\nf\tinput.cpp\t/^ int f() { }$/;\"\tf\tstruct:IntroduceBitDef\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/bug1563476.cpp.d/input.cpp", "content": "int g() {\n}\n\ntemplate< typename Accessor, typename bEnable = void >\nstruct IntroduceBitDef;\n\ntemplate< typename Accessor >\nstruct IntroduceBitDef< Accessor, typename\nboost::enable_if_c< CoreConfig::VERSION <= 3 >::type >\n{\n\n// class body here\n// anything after this point is not parsed by ctags\n int f() { }\n\n};\n" }, { "path": "Units/parser-cxx.r/bug1575055.cpp.d/README", "content": "'m' kind is given to the `variable' in the input.\nI, Masatake YAMATO, think 'v' kind should be ginve instead.\n\n" }, { "path": "Units/parser-cxx.r/bug1575055.cpp.d/expected.tags", "content": "MyClass\tinput.cpp\t/^\tclass MyClass { };$/;\"\tc\tnamespace:TheNamespace\tfile:\nTheNamespace\tinput.cpp\t/^namespace TheNamespace {$/;\"\tn\tfile:\nvariable\tinput.cpp\t/^\tint variable;$/;\"\tv\tnamespace:TheNamespace\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug1575055.cpp.d/input.cpp", "content": "namespace TheNamespace {\n\tclass MyClass { };\n\tint variable;\n}\n" }, { "path": "Units/parser-cxx.r/bug1585745.cpp.d/expected.tags", "content": "Class5\tinput.cpp\t/^class Class5 {$/;\"\tc\tfile:\n~Class1\tinput.cpp\t/^Class1::~Class1() { }$/;\"\tf\tclass:Class1\n~Class2\tinput.cpp\t/^Class2::~ Class2() { }$/;\"\tf\tclass:Class2\n~Class3\tinput.cpp\t/^Class3:: ~Class3() { }$/;\"\tf\tclass:Class3\n~Class4\tinput.cpp\t/^Class4:: ~ Class4() { }$/;\"\tf\tclass:Class4\n~Class5\tinput.cpp\t/^ public: ~ Class5() { }$/;\"\tf\tclass:Class5\tfile:\n" }, { "path": "Units/parser-cxx.r/bug1585745.cpp.d/input.cpp", "content": "// Despite the weird whitespace, all these destructors should be recognized and tagged.\nClass1::~Class1() { }\nClass2::~ Class2() { }\nClass3:: ~Class3() { }\nClass4:: ~ Class4() { }\nclass Class5 {\n public: ~ Class5() { }\n};\n" }, { "path": "Units/parser-cxx.r/bug1770479.cpp.d/args.ctags", "content": "--kinds-c++=+l\n" }, { "path": "Units/parser-cxx.r/bug1770479.cpp.d/expected.tags", "content": "a\tinput.cpp\t/^ std::ostringstream a;$/;\"\tl\tfunction:main\ttyperef:typename:std::ostringstream\tfile:\nb\tinput.cpp\t/^ std::ostringstream b;$/;\"\tl\tfunction:main\ttyperef:typename:std::ostringstream\tfile:\nfoo\tinput.cpp\t/^int foo (int i)$/;\"\tf\ttyperef:typename:int\nmain\tinput.cpp\t/^int main (int argc, char **argv)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug1770479.cpp.d/input.cpp", "content": "#include \n\nint main (int argc, char **argv)\n{\n std::ostringstream a;\n a << \"a\";\n\n std::ostringstream b;\n b << \"b\";\n\n return 0;\n}\n\nint foo (int i)\n{\n return i;\n}\n" }, { "path": "Units/parser-cxx.r/bug1773926.cpp.d/args.ctags", "content": "-n\n" }, { "path": "Units/parser-cxx.r/bug1773926.cpp.d/expected.tags", "content": "ERROR_HAPPENED\tinput.cpp\t3;\"\td\tfile:\nNEXT_DEFINE\tinput.cpp\t5;\"\td\tfile:\nOK\tinput.cpp\t4;\"\td\tfile:\nmain\tinput.cpp\t7;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug1773926.cpp.d/input.cpp", "content": "#include \r\n\r\n#define ERROR_HAPPENED\r 50 \r\r\r\r\n#define OK 2\r\n#define NEXT_DEFINE 3\r\n\r\nint main(int argc, char* argv[])\r\n{\r\n printf(\"Hello world\\n\");\r\n return 0;\r\n}\r\n\r\n" }, { "path": "Units/parser-cxx.r/bug1799340.cpp.d/expected.tags", "content": "f1\tinput.cpp\t/^std::string & f1() {}$/;\"\tf\ttyperef:typename:std::string &\nf2\tinput.cpp\t/^const std::string & f2() {}$/;\"\tf\ttyperef:typename:const std::string &\nf3\tinput.cpp\t/^std::string const & f3() {}$/;\"\tf\ttyperef:typename:std::string const &\n" }, { "path": "Units/parser-cxx.r/bug1799340.cpp.d/input.cpp", "content": "std::string & f1() {}\nconst std::string & f2() {}\nstd::string const & f3() {}\n" }, { "path": "Units/parser-cxx.r/bug1799343-1.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug1799343-1.cpp.d/expected.tags", "content": "C\tinput.cpp\t/^struct C { int x; };$/;\"\ts\tfile:\nx\tinput.cpp\t/^struct C { int x; };$/;\"\tm\tstruct:C\ttyperef:typename:int\tfile:\nD\tinput.cpp\t/^struct D : ::C {$/;\"\ts\tfile:\nD\tinput.cpp\t/^ D() { x = 123; }$/;\"\tf\tstruct:D\tfile:\n~D\tinput.cpp\t/^ ~D() { std::cout << x << std::endl; }$/;\"\tf\tstruct:D\tfile:\nmain\tinput.cpp\t/^int main(void) {$/;\"\tf\ttyperef:typename:int\nd\tinput.cpp\t/^ D d;$/;\"\tl\tfunction:main\ttyperef:typename:D\tfile:\n" }, { "path": "Units/parser-cxx.r/bug1799343-1.cpp.d/input.cpp", "content": "#include \nstruct C { int x; };\nstruct D : ::C {\n D() { x = 123; }\n ~D() { std::cout << x << std::endl; }\n};\nint main(void) {\n D d;\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/bug1799343-2.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug1799343-2.cpp.d/expected.tags", "content": "P\tinput.cpp\t/^class P {$/;\"\tc\tfile:\nx\tinput.cpp\t/^ int x;$/;\"\tm\tclass:P\ttyperef:typename:int\tfile:\nA\tinput.cpp\t/^namespace A {$/;\"\tn\tfile:\nP\tinput.cpp\t/^ class P {$/;\"\tc\tnamespace:A\tfile:\nx\tinput.cpp\t/^ int x;$/;\"\tm\tclass:A::P\ttyperef:typename:int\tfile:\nQ\tinput.cpp\t/^ class Q {$/;\"\tc\tnamespace:A\tfile:\ny\tinput.cpp\t/^ int y;$/;\"\tm\tclass:A::Q\ttyperef:typename:int\tfile:\nC\tinput.cpp\t/^ namespace C {$/;\"\tn\tnamespace:A\tfile:\nR\tinput.cpp\t/^ class R: ::P, A::Q {$/;\"\tc\tnamespace:A::C\tfile:\nz\tinput.cpp\t/^ int z;$/;\"\tm\tclass:A::C::R\ttyperef:typename:int\tfile:\nf\tinput.cpp\t/^ int f (int v) { return v + x; }$/;\"\tf\tclass:A::C::R\ttyperef:typename:int\tfile:\nv\tinput.cpp\t/^ int f (int v) { return v + x; }$/;\"\tz\tfunction:A::C::R::f\ttyperef:typename:int\tfile:\nB\tinput.cpp\t/^namespace B {$/;\"\tn\tfile:\nS\tinput.cpp\t/^ class S : A::C::R {$/;\"\tc\tnamespace:B\tfile:\nt\tinput.cpp\t/^ int t;$/;\"\tm\tclass:B::S\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/bug1799343-2.cpp.d/input.cpp", "content": "class P {\n protected:\n int x;\n};\n\nnamespace A {\n class P {\n protected:\n int x;\n };\n class Q {\n int y;\n };\n\n namespace C {\n class R: ::P, A::Q {\n int z;\n int f (int v) { return v + x; }\n };\n }\n}\n\nnamespace B {\n class S : A::C::R {\n int t;\n };\n}\n" }, { "path": "Units/parser-cxx.r/bug1907083.cpp.d/expected.tags", "content": "m1\tinput.cpp\t/^C::T * C::m1() {}$/;\"\tf\tclass:C\ttyperef:typename:C::T *\nm2\tinput.cpp\t/^C::T * const C::m2() {}$/;\"\tf\tclass:C\ttyperef:typename:C::T * const\nm3\tinput.cpp\t/^C::T const * C::m3() {}$/;\"\tf\tclass:C\ttyperef:typename:C::T const *\nm4\tinput.cpp\t/^C::T const * const C::m4() {}$/;\"\tf\tclass:C\ttyperef:typename:C::T const * const\n" }, { "path": "Units/parser-cxx.r/bug1907083.cpp.d/input.cpp", "content": "// All of these should have \"class:C\", but m2-m4 have \"class C::C\" with ctags 5.7.\nC::T * C::m1() {}\nC::T * const C::m2() {}\nC::T const * C::m3() {}\nC::T const * const C::m4() {}\n" }, { "path": "Units/parser-cxx.r/bug1924919.cpp.d/README", "content": "The orignal bug report can be found in https://sourceforge.net/p/ctags/bugs/217/\n\nI, Masatake YAMATO, think both a bug report and developer of e-ctags go wrong.\n\nLet's consider following input:\n\n #include \n namespace mud {\n\t std::string MajorVersion;\n\t std::string MinorVersion;\n\t int (* foo) (void);\n };\n \n\nAll MajorVersion, MinorVersion and foo are tagged with 'm' kind.\nThis is less informative. Whether they are members or not can\nbe known from \"namespace:mud\" field of tags file.\n" }, { "path": "Units/parser-cxx.r/bug1924919.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug1924919.cpp.d/expected.tags", "content": "mud\tinput.cpp\t/^namespace mud {$/;\"\tn\tfile:\nMajorVersion\tinput.cpp\t/^\tstd::string MajorVersion;$/;\"\tv\tnamespace:mud\ttyperef:typename:std::string\nMinorVersion\tinput.cpp\t/^\tstd::string MinorVersion;$/;\"\tv\tnamespace:mud\ttyperef:typename:std::string\nfoo\tinput.cpp\t/^\tint (* foo) (void);$/;\"\tv\tnamespace:mud\ttyperef:typename:int (*)(void)\n" }, { "path": "Units/parser-cxx.r/bug1924919.cpp.d/input.cpp", "content": "#include \nnamespace mud {\n\tstd::string MajorVersion;\n\tstd::string MinorVersion;\n\tint (* foo) (void);\n};\n" }, { "path": "Units/parser-cxx.r/bug639639.cpp.d/expected.tags", "content": "Namespace1\tinput.h\t/^namespace Namespace1$/;\"\tn\n__anon4605901a0103\tinput.h\t/^enum {anon2=1000};$/;\"\tg\nanon2\tinput.h\t/^enum {anon2=1000};$/;\"\te\tenum:__anon4605901a0103\n" }, { "path": "Units/parser-cxx.r/bug639639.cpp.d/input.h", "content": "/*\nDate: Sun, 17 Nov 2002 04:41:42 -0800\nSubject: [ ctags-Bugs-639639 ] incorrect enum field for C++ header\n\nBugs item #639639, was opened at 2002-11-17 13:41\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=639639&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Matthias S. Benkmann (mbenkmann)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: incorrect enum field for C++ header\n\nInitial Comment:\n----------- temp2.h -------------\n*/\nnamespace Namespace1\n{\n int function2(char* str);\n}\n\nenum {anon2=1000};\n---------------------------- \n/*\n> ctags --excmd=number --fields=+kKmnsSz\n--file-scope=no -f - temp2.h\n\nNamespace1 temp2.h 1;\" kind:namespace line:1\nanon2 temp2.h 6;\" kind:enumerator line:6 \nenum:Namespace1\n\n\nAs you can see ctags thinks that anon2 belongs to enum\nNamespace1 which it obviously doesn't (Namespace1 is\nnot even an enum). It should be enum:.\n\n\n----------------------------------------------------------------------\n\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=639639&group_id=6556\n*/\n" }, { "path": "Units/parser-cxx.r/bug639644.cpp.d/expected.tags", "content": "__anon21d591360111\tinput.h\t/^{$/;\"\tn\nfoo\tinput.h\t/^ int foo;$/;\"\tv\tnamespace:__anon21d591360111\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/bug639644.cpp.d/input.h", "content": "/*\nDate: Sun, 17 Nov 2002 04:57:43 -0800\nSubject: [ ctags-Bugs-639644 ] anonymous namespaces in headers\n\nBugs item #639644, was opened at 2002-11-17 13:57\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=639644&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Matthias S. Benkmann (mbenkmann)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: anonymous namespaces in headers\n\nInitial Comment:\n--------------------temp3.h----------------\n*/\nnamespace\n{\n int foo;\n}\n/*\n---------------------------------------------\n\n> ctags -f - temp3.h\n\nfoo temp3.h /^ int foo;$/;\" m namespace:\n\nThat last field should be \"namespace:\"\nand the kind field should be variable, not member.\n\n\n\n----------------------------------------------------------------------\n\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=639644&group_id=6556\n*/\n" }, { "path": "Units/parser-cxx.r/bug665086.cpp.d/expected.tags", "content": "C12\tinput.cpp\t/^ class C12{}$/;\"\tc\tnamespace:N1::N2\tfile:\nN1\tinput.cpp\t/^namespace N1$/;\"\tn\tfile:\nN2\tinput.cpp\t/^ namespace N2$/;\"\tn\tnamespace:N1\tfile:\n" }, { "path": "Units/parser-cxx.r/bug665086.cpp.d/input.cpp", "content": "/*\nBugs item #665086, was opened at 2003-01-09 15:30\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=665086&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Welti Marco (cider101)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: nested namespaces\n\nInitial Comment:\nhi\n\nit seems that ctags has ommits the scope for nested \nnamespaces.\n*/\nnamespace N1\n{\n namespace N2\n {\n class C12{}\n }\n}\n/*\nN1\ttest.h\t/^namespace N1$/;\"\tnamespace\tline:1\nN2\ttest.h\t/^namespace N2$/;\"\tnamespace\tline:3\nC12\ttest.h\t/^ class C12{};$/;\"\tclass\tline:5\tnamespace:N1::N2\n*/\n" }, { "path": "Units/parser-cxx.r/bug834.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n" }, { "path": "Units/parser-cxx.r/bug834.cpp.d/expected.tags", "content": "std\tinput.cpp\t/^using namespace std;$/;\"\tU\tfile:\nC\tinput.cpp\t/^vector> C;$/;\"\tv\ttyperef:typename:vector>\nA\tinput.cpp\t/^struct A {$/;\"\ts\tfile:\na\tinput.cpp\t/^ int a;$/;\"\tm\tstruct:A\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^ int b;$/;\"\tm\tstruct:A\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/bug834.cpp.d/input.cpp", "content": "/*\n github issue 834 reported by hierabyss on 2016.03.12\n \n [...] after run ctags test1.cpp, there is no tag in the tags file.\n\n*/\n\n#include \n\nusing namespace std;\n\nvector> C;\n\nstruct A {\n int a;\n int b;\n};\n" }, { "path": "Units/parser-cxx.r/bug849591.cpp.d/expected.tags", "content": "Foo\tinput.cpp\t/^void MainClass< ParamClass1&, ParamClass2>::Foo()$/;\"\tf\tclass:MainClass\ttyperef:typename:void\nFoo\tinput.cpp\t/^void MainClass::Foo()$/;\"\tf\tclass:MainClass\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/bug849591.cpp.d/input.cpp", "content": "/*\nBugs item #849591, was opened at 2003-11-26 11:35\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=849591&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Igor Proskuriakov (proskig)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: C++ Member templates \n\nInitial Comment:\nHi,\nThere seems to be a problem with how ctags treats C++ \nmember templates. Example:\n*/\nvoid MainClass< ParamClass1&, ParamClass2>::Foo()\n{\n exit(0);\n};\n/*\nGenerates erroneous tag\nParamClass1\ttest.cpp\t/^void MainClass< ParamClass1&, ParamClass2>::Foo()$/;\"\tv\n\nFull ctags file:\n!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tDarren Hiebert\t/dhiebert@users.sourceforge.net/\n!_TAG_PROGRAM_NAME\tExuberant Ctags\t//\n!_TAG_PROGRAM_URL\thttp://ctags.sourceforge.net\t/official site/\n!_TAG_PROGRAM_VERSION\t5.5.2\t//\nFoo\ttest.cpp\t/^void MainClass< const ParamClass1&, ParamClass2>::Foo()$/;\"\tf\tclass:ParamClass2\nParamClass1\ttest.cpp\t/^void MainClass< ParamClass1&, ParamClass2>::Foo()$/;\"\tv\n\n-----\n\nRemoving space after first angle bracket:\n*/\nvoid MainClass::Foo()\n{\n exit(0);\n};\n/*\nmakes ctags to drop first letter from parameter class \nname:\n\naramClass1\ttest.cpp\t/^void MainClass::Foo()$/;\"\tv\n\n\nLet me know if you need any clarification with this issue.\nMany thanks in advance!\n*/\n" }, { "path": "Units/parser-cxx.r/bug852368.cpp.d/args.ctags", "content": "--kinds-C++=+p\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/bug852368.cpp.d/expected.tags", "content": "foo\tinput.cpp\t/^void foo(std::vector &);$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(std::vector &)\n" }, { "path": "Units/parser-cxx.r/bug852368.cpp.d/input.cpp", "content": "/*\nBugs item #852368, was opened at 2003-12-01 23:20\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=852368&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Welti Marco (cider101)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: c/c++ unabalanced template brackets in signature\n\nInitial Comment:\nhi,\n\nctags 5.5x generates unbalanced template brackets in \nthe method/function signature if a function parameter \nis a template.\n\ni.e.\n*/\nvoid foo(std::vector &);\n/*\ngenerates the following signature\nsignature:void (std::vector<&)\n\nlet me know if you need more details.\n\nregards\ncider\n*/\n" }, { "path": "Units/parser-cxx.r/bug872494.cpp.d/expected.tags", "content": "FooClass2\tinput.cpp\t/^class FooClass2{};$/;\"\tc\tfile:\nTemplClass\tinput.cpp\t/^template<> class TemplClass< char* > { int i;};$/;\"\tc\tfile:\nTemplClass\tinput.cpp\t/^template class TemplClass { double i;};$/;\"\tc\tfile:\ni\tinput.cpp\t/^template<> class TemplClass< char* > { int i;};$/;\"\tm\tclass:TemplClass\ttyperef:typename:int\tfile:\ni\tinput.cpp\t/^template class TemplClass { double i;};$/;\"\tm\tclass:TemplClass\ttyperef:typename:double\tfile:\n" }, { "path": "Units/parser-cxx.r/bug872494.cpp.d/input.cpp", "content": "/*\nBugs item #872494, was opened at 2004-01-07 16:33\nMessage generated for change (Tracker Item Submitted) made by Item Submitter\nYou can respond by visiting: \nhttps://sourceforge.net/tracker/?func=detail&atid=106556&aid=872494&group_id=6556\n\nCategory: None\nGroup: None\nStatus: Open\nResolution: None\nPriority: 5\nSubmitted By: Igor Proskuriakov (proskig)\nAssigned to: Nobody/Anonymous (nobody)\nSummary: C++ class template specialization\n\nInitial Comment:\nHi, \nsome time ago I posted a bug related to C++ member \ntemplate, which was fixed using patch bug849591.diff. \nMany thanks - it really fixed the problem ! \nNow about a different one.\nWhen parsing C++ file ctags seems to ignore template \nspecialization, but I think that it maybe useful to add it \nas a configurable feature. Another problem is that \ntemplate specialization seems to confuse patched \nversion of ctags (patch bug849591.diff). When running a \npatched version against the following file\n*/\ntemplate class TemplClass { double i;};\n\ntemplate<> class TemplClass< char* > { int i;};\n\nclass FooClass2{};\n/*\nit does not generate tag for FooClass2 while ctags 5.5.2 \ndoes generate tag for FooClass2. Neither of them \ngenerate tag for specialization TemplClass.\n\nthanks in advance and let me know should you need \nmore info!\n\nIgor\n*/\n" }, { "path": "Units/parser-cxx.r/c-header-as-cpp.d/args.ctags", "content": "--kinds-c++=+px\n" }, { "path": "Units/parser-cxx.r/c-header-as-cpp.d/expected.tags", "content": "private\tinput.h\t/^extern int private;$/;\"\tx\ttyperef:typename:int\nprotected\tinput.h\t/^typedef int protected;$/;\"\tt\ttyperef:typename:int\npublic\tinput.h\t/^static inline int public(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/c-header-as-cpp.d/input.h", "content": "/*\nReported by masatake in issue #930@github.\n\n.h files are always parsed in C++ mode, for safety.\nHowever they may actually contain C code, which may\nuse C++ keywords as variable names.\n\nThis test checks the C++ parser capabilities to guess such occurences.\n\n\n*/\n\nextern int private;\nstatic inline int public(void)\n{\n\treturn private;\n}\n\ntypedef int protected;\n\n" }, { "path": "Units/parser-cxx.r/class-inheritance.cpp.d/args.ctags", "content": "--kinds-c++=c\n--fields=i\n--sort=no\n" }, { "path": "Units/parser-cxx.r/class-inheritance.cpp.d/expected.tags", "content": "A\tinput.cpp\t/^class A$/\nB\tinput.cpp\t/^class B$/\nC\tinput.cpp\t/^template class C$/\nD\tinput.cpp\t/^class D : public A$/;\"\tinherits:A\nE\tinput.cpp\t/^class E : public A, public B$/;\"\tinherits:A,B\nF\tinput.cpp\t/^class F : private A, public B$/;\"\tinherits:A,B\nG\tinput.cpp\t/^class G : virtual D$/;\"\tinherits:D\nH\tinput.cpp\t/^class H : public A, virtual B$/;\"\tinherits:A,B\nI\tinput.cpp\t/^class I : public C$/;\"\tinherits:C\nJ\tinput.cpp\t/^class J : private A, public C$/;\"\tinherits:A,C\n" }, { "path": "Units/parser-cxx.r/class-inheritance.cpp.d/input.cpp", "content": "\n\nclass A\n{\n};\n\nclass B\n{\n};\n\ntemplate class C\n{\n};\n\nclass D : public A\n{\n};\n\nclass E : public A, public B\n{\n};\n\nclass F : private A, public B\n{\n};\n\nclass G : virtual D\n{\n};\n\nclass H : public A, virtual B\n{\n};\n\nclass I : public C\n{\n};\n\nclass J : private A, public C\n{\n};\n\n" }, { "path": "Units/parser-cxx.r/class.cpp.d/args.ctags", "content": "--kinds-c++=*\n--sort=no\n--fields=+{end}\n" }, { "path": "Units/parser-cxx.r/class.cpp.d/expected.tags", "content": "C01\tinput.cpp\t/^MACRO03 __attribute__(\"fancy\") __declspec(dllexport) class MY_API C01$/;\"\tc\tfile:\tend:15\n" }, { "path": "Units/parser-cxx.r/class.cpp.d/input.cpp", "content": "\n// These should be ignored.\nMACRO01 MACRO02() class N01;\nMACRO03 class __attribute__(\"cool\") N02;\n\nnamespace X;\n\n// This should be reported.\nMACRO03 __attribute__(\"fancy\") __declspec(dllexport) class MY_API C01\n{\n\t// These should be ignored.\n\tfriend class N03;\n\tMACRO04 friend class N04;\n\tfriend class X::N05;\n};\n" }, { "path": "Units/parser-cxx.r/complex-macros.d/README", "content": "input-0.cpp is a crash test.\n" }, { "path": "Units/parser-cxx.r/complex-macros.d/args.ctags", "content": "--kinds-c++=*\n--fields-c++=+{properties}\n--fields=+S\n--sort=no\n-D DECLARE_FUNCTION_1=int p0()\n-D DECLARE_FUNCTION_1A()=int p0A()\n-D DECLARE_FUNCTION_2(_ret,_name)=_ret _name();\n-D DECLARE_FUNCTION_3(_ret,_name,...)=_ret _name(__VA_ARGS__);\n-D DEPRECATED(...)=__VA_ARGS__ __attribute__((deprecated))\n-D ENUM_GNUX(n,e...)=enum n { e }\n-D DECLARE_TWO_VERSIONS_OF_FUNCTIONS(_prefix1,_prefix2)=DECLARE_FUNCTION_2(int,_prefix1 ## a) DECLARE_FUNCTION_2(int,_prefix2 ## a)\n-D STRINGIFY(token)=#token\n-D IMPLEMENT_FUNCTIONS(_prefix)=void _prefix ## a(){ }; void _prefix ## b(){ };\n-D DECLARE_VARS(_prefix)=int _prefix ## a; int _prefix ## b;\n-D DECLARE_FUNCTION_4(Ret,Class,Method,...)=Ret Class##__##Method(Class *that, ##__VA_ARGS__)\n-D DECLARE_FUNCTION_4_BEGIN(...)={\n-D DECLARE_FUNCTION_4_END(...)=}\n-D var(X)=X\n" }, { "path": "Units/parser-cxx.r/complex-macros.d/expected.tags", "content": "DECLARE_FUNCTION_1\tinput.cpp\t/^#define DECLARE_FUNCTION_1 /;\"\td\tfile:\np0\tinput.cpp\t/^DECLARE_FUNCTION_1;$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\nDECLARE_FUNCTION_1A\tinput.cpp\t/^#define DECLARE_FUNCTION_1A(/;\"\td\tfile:\tsignature:()\np0A\tinput.cpp\t/^unsigned DECLARE_FUNCTION_1A();\t\\/\\/ expand$/;\"\tp\ttyperef:typename:unsigned int\tfile:\tsignature:()\n_ret\tinput.cpp\t/^#define DECLARE_FUNCTION_2(_ret,_name) _ret _name();$/;\"\tD\tmacro:DECLARE_FUNCTION_2\n_name\tinput.cpp\t/^#define DECLARE_FUNCTION_2(_ret,_name) _ret _name();$/;\"\tD\tmacro:DECLARE_FUNCTION_2\nDECLARE_FUNCTION_2\tinput.cpp\t/^#define DECLARE_FUNCTION_2(/;\"\td\tfile:\tsignature:(_ret,_name)\np1\tinput.cpp\t/^DECLARE_FUNCTION_2(int,p1);$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\np2\tinput.cpp\t/^DECLARE_FUNCTION_2(std::string,p2);$/;\"\tp\ttyperef:typename:std::string\tfile:\tsignature:()\n_ret\tinput.cpp\t/^#define DECLARE_FUNCTION_3(_ret,_name,...) _ret _name(__VA_ARGS__);$/;\"\tD\tmacro:DECLARE_FUNCTION_3\n_name\tinput.cpp\t/^#define DECLARE_FUNCTION_3(_ret,_name,...) _ret _name(__VA_ARGS__);$/;\"\tD\tmacro:DECLARE_FUNCTION_3\nDECLARE_FUNCTION_3\tinput.cpp\t/^#define DECLARE_FUNCTION_3(/;\"\td\tfile:\tsignature:(_ret,_name,...)\np3\tinput.cpp\t/^DECLARE_FUNCTION_3(int,p3,int a,int b);$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:(int a,int b)\na\tinput.cpp\t/^DECLARE_FUNCTION_3(int,p3,int a,int b);$/;\"\tz\tprototype:p3\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^DECLARE_FUNCTION_3(int,p3,int a,int b);$/;\"\tz\tprototype:p3\ttyperef:typename:int\tfile:\nDEPRECATED\tinput.cpp\t/^#define DEPRECATED(/;\"\td\tfile:\tsignature:(...)\np4\tinput.cpp\t/^DEPRECATED(int p4());$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\tproperties:deprecated\nn\tinput.cpp\t/^#define ENUM_GNUX(n,e...) enum n { e }$/;\"\tD\tmacro:ENUM_GNUX\ne\tinput.cpp\t/^#define ENUM_GNUX(n,e...) enum n { e }$/;\"\tD\tmacro:ENUM_GNUX\nENUM_GNUX\tinput.cpp\t/^#define ENUM_GNUX(/;\"\td\tfile:\tsignature:(n,e...)\ncolor\tinput.cpp\t/^ENUM_GNUX(color, red, blue, green);$/;\"\tg\tfile:\nred\tinput.cpp\t/^ENUM_GNUX(color, red, blue, green);$/;\"\te\tenum:color\tfile:\nblue\tinput.cpp\t/^ENUM_GNUX(color, red, blue, green);$/;\"\te\tenum:color\tfile:\ngreen\tinput.cpp\t/^ENUM_GNUX(color, red, blue, green);$/;\"\te\tenum:color\tfile:\n_prefix1\tinput.cpp\t/^#define DECLARE_TWO_VERSIONS_OF_FUNCTIONS(_prefix1,_prefix2) \\\\$/;\"\tD\tmacro:DECLARE_TWO_VERSIONS_OF_FUNCTIONS\n_prefix2\tinput.cpp\t/^#define DECLARE_TWO_VERSIONS_OF_FUNCTIONS(_prefix1,_prefix2) \\\\$/;\"\tD\tmacro:DECLARE_TWO_VERSIONS_OF_FUNCTIONS\nDECLARE_TWO_VERSIONS_OF_FUNCTIONS\tinput.cpp\t/^#define DECLARE_TWO_VERSIONS_OF_FUNCTIONS(/;\"\td\tfile:\tsignature:(_prefix1,_prefix2)\np5a\tinput.cpp\t/^DECLARE_TWO_VERSIONS_OF_FUNCTIONS(p5,p6)$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\np6a\tinput.cpp\t/^DECLARE_TWO_VERSIONS_OF_FUNCTIONS(p5,p6)$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\ntoken\tinput.cpp\t/^#define STRINGIFY(token) #token$/;\"\tD\tmacro:STRINGIFY\nSTRINGIFY\tinput.cpp\t/^#define STRINGIFY(/;\"\td\tfile:\tsignature:(token)\ntest\tinput.cpp\t/^const char * test = \"\" STRINGIFY(; int notVisible;);$/;\"\tv\ttyperef:typename:const char *\nRet\tinput.cpp\t/^#define DECLARE_FUNCTION_4(Ret,Class,Method,...) Ret Class##__##Method(Class *that, ##__VA_ARGS_/;\"\tD\tmacro:DECLARE_FUNCTION_4\nClass\tinput.cpp\t/^#define DECLARE_FUNCTION_4(Ret,Class,Method,...) Ret Class##__##Method(Class *that, ##__VA_ARGS_/;\"\tD\tmacro:DECLARE_FUNCTION_4\nMethod\tinput.cpp\t/^#define DECLARE_FUNCTION_4(Ret,Class,Method,...) Ret Class##__##Method(Class *that, ##__VA_ARGS_/;\"\tD\tmacro:DECLARE_FUNCTION_4\nDECLARE_FUNCTION_4\tinput.cpp\t/^#define DECLARE_FUNCTION_4(/;\"\td\tfile:\tsignature:(Ret,Class,Method,...)\nDECLARE_FUNCTION_4_BEGIN\tinput.cpp\t/^#define DECLARE_FUNCTION_4_BEGIN(/;\"\td\tfile:\tsignature:(...)\nDECLARE_FUNCTION_4_END\tinput.cpp\t/^#define DECLARE_FUNCTION_4_END(/;\"\td\tfile:\tsignature:(...)\nfoo__bar\tinput.cpp\t/^DECLARE_FUNCTION_4(int,foo,bar,int x)$/;\"\tf\ttyperef:typename:int\tsignature:(foo * that,int x)\nthat\tinput.cpp\t/^DECLARE_FUNCTION_4(int,foo,bar,int x)$/;\"\tz\tfunction:foo__bar\ttyperef:typename:foo *\tfile:\nx\tinput.cpp\t/^DECLARE_FUNCTION_4(int,foo,bar,int x)$/;\"\tz\tfunction:foo__bar\ttyperef:typename:int\tfile:\n_prefix\tinput.cpp\t/^#define IMPLEMENT_FUNCTIONS(_prefix) \\\\$/;\"\tD\tmacro:IMPLEMENT_FUNCTIONS\nIMPLEMENT_FUNCTIONS\tinput.cpp\t/^#define IMPLEMENT_FUNCTIONS(/;\"\td\tfile:\tsignature:(_prefix)\nf1a\tinput.cpp\t/^IMPLEMENT_FUNCTIONS(f1);$/;\"\tf\ttyperef:typename:void\tsignature:()\nf1b\tinput.cpp\t/^IMPLEMENT_FUNCTIONS(f1);$/;\"\tf\ttyperef:typename:void\tsignature:()\n_prefix\tinput.cpp\t/^#define DECLARE_VARS(_prefix) int _prefix ## a; int _prefix ## b;$/;\"\tD\tmacro:DECLARE_VARS\nDECLARE_VARS\tinput.cpp\t/^#define DECLARE_VARS(/;\"\td\tfile:\tsignature:(_prefix)\nmain\tinput.cpp\t/^int main(int,char **)$/;\"\tf\ttyperef:typename:int\tsignature:(int,char **)\n__anonb64b5bec010d\tinput.cpp\t/^int main(int,char **)$/;\"\tz\tfunction:main\ttyperef:typename:int\tfile:\n__anonb64b5bec020d\tinput.cpp\t/^int main(int,char **)$/;\"\tz\tfunction:main\ttyperef:typename:char **\tfile:\nla\tinput.cpp\t/^\tDECLARE_VARS(l);$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\nlb\tinput.cpp\t/^\tDECLARE_VARS(l);$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\ninput0\tinput-0.cpp\t/^int input0;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/complex-macros.d/input-0.cpp", "content": "int input0;\nint var(input1\n\n" }, { "path": "Units/parser-cxx.r/complex-macros.d/input.cpp", "content": "#include \n\n// Macro without parameters\n#define DECLARE_FUNCTION_1 int p0()\n\nDECLARE_FUNCTION_1;\n\n// Macro without parameters\n#define DECLARE_FUNCTION_1A() int p0A()\n\nDECLARE_FUNCTION_1A; // don't expand\nunsigned DECLARE_FUNCTION_1A();\t// expand\n\n// Simple macro with parameters\n\n#define DECLARE_FUNCTION_2(_ret,_name) _ret _name();\n\nDECLARE_FUNCTION_2(int,p1);\nDECLARE_FUNCTION_2(std::string,p2);\n\n// Var args\n\n#define DECLARE_FUNCTION_3(_ret,_name,...) _ret _name(__VA_ARGS__);\n\nDECLARE_FUNCTION_3(int,p3,int a,int b);\n\n#define DEPRECATED(...) __VA_ARGS__ __attribute__((deprecated))\n\nDEPRECATED(int p4());\n\n#define ENUM_GNUX(n,e...) enum n { e }\n\nENUM_GNUX(color, red, blue, green);\n\n// Recursive macro expansion\n\n#define DECLARE_TWO_VERSIONS_OF_FUNCTIONS(_prefix1,_prefix2) \\\n\tDECLARE_FUNCTION_2(int,_prefix1 ## a) \\\n\tDECLARE_FUNCTION_2(int,_prefix2 ## a)\n\nDECLARE_TWO_VERSIONS_OF_FUNCTIONS(p5,p6)\n\n// Stringification\n#define STRINGIFY(token) #token\n\nconst char * test = \"\" STRINGIFY(; int notVisible;);\n\n// Unbalanced brackets (this comes from a nasty example in a github issue)\n#define DECLARE_FUNCTION_4(Ret,Class,Method,...) Ret Class##__##Method(Class *that, ##__VA_ARGS__)\n#define DECLARE_FUNCTION_4_BEGIN(...) { /*not really this, but this is what ctags should see*/\n#define DECLARE_FUNCTION_4_END(...) } /*not really this, but this is what ctags should see*/\n\n// Unbalanced brackets\nDECLARE_FUNCTION_4(int,foo,bar,int x)\nDECLARE_FUNCTION_4_BEGIN({)\nDECLARE_FUNCTION_4_END(},{ /*dtors*/ })\n\n// Token pasting\n\n#define IMPLEMENT_FUNCTIONS(_prefix) \\\n\tvoid _prefix ## a(){ }; \\\n\tvoid _prefix ## b(){ };\n\nIMPLEMENT_FUNCTIONS(f1);\n\n#define DECLARE_VARS(_prefix) int _prefix ## a; int _prefix ## b;\n\nint main(int,char **)\n{\n\tDECLARE_VARS(l);\n\treturn 0;\n}" }, { "path": "Units/parser-cxx.r/cpp-type-alias-with-using-keyword.d/expected.tags", "content": "Integer\tinput.cpp\t/^using Integer = int;$/;\"\tt\ttyperef:typename:int\tfile:\nVector\tinput.cpp\t/^using Vector = std::vector;$/;\"\tt\ttyperef:typename:std::vector\tfile:\n" }, { "path": "Units/parser-cxx.r/cpp-type-alias-with-using-keyword.d/input.cpp", "content": "/* C++11 introduced the \"using name = type;\" construct as an alternative\n to typedefs. Process them as typedefs. Contributed by Maxime Coste */\n\nusing Integer = int;\n\ntemplate \nusing Vector = std::vector;\n" }, { "path": "Units/parser-cxx.r/cpp_destructor.cpp.d/expected.tags", "content": "~A\tinput.cpp\t/^A::~A() { }$/;\"\tf\tclass:A\n~B\tinput.cpp\t/^B:: ~B () { }$/;\"\tf\tclass:B\n~C\tinput.cpp\t/^C:: ~ C () { }$/;\"\tf\tclass:C\n~D\tinput.cpp\t/^D:: ~D() { }$/;\"\tf\tclass:D\n~E\tinput.cpp\t/^E:: ~ E() { }$/;\"\tf\tclass:E\n~F\tinput.cpp\t/^F::~F(){ }$/;\"\tf\tclass:F\n~G\tinput.cpp\t/^G:: ~G (){ }$/;\"\tf\tclass:G\n~H\tinput.cpp\t/^H:: ~ H (){ }$/;\"\tf\tclass:H\n~I\tinput.cpp\t/^I:: ~I(){ }$/;\"\tf\tclass:I\n~J\tinput.cpp\t/^J:: ~ J(){ }$/;\"\tf\tclass:J\n" }, { "path": "Units/parser-cxx.r/cpp_destructor.cpp.d/input.cpp", "content": "A::~A() { }\n\nB:: ~B () { }\n\n// bug 1585745\nC:: ~ C () { }\n\nD:: ~D() { }\nE:: ~ E() { }\n\n\nF::~F(){ }\nG:: ~G (){ }\nH:: ~ H (){ }\nI:: ~I(){ }\nJ:: ~ J(){ }\n" }, { "path": "Units/parser-cxx.r/cxx-keyword-alignas.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/cxx-keyword-alignas.d/expected.tags", "content": "buf0\tinput.cxx\t/^alignas(64) int buf0[8192];$/;\"\tv\ttyperef:typename:int[8192]\nbuf1\tinput.cxx\t/^alignas(void *) int buf1[8192];$/;\"\tv\ttyperef:typename:int[8192]\nS\tinput.cxx\t/^struct alignas(32) S {$/;\"\ts\tfile:\ni\tinput.cxx\t/^ alignas(4) int i;$/;\"\tm\tstruct:S\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/cxx-keyword-alignas.d/input.cxx", "content": "alignas(64) int buf0[8192];\nalignas(void *) int buf1[8192];\nstruct alignas(32) S {\n alignas(4) int i;\n};\n\n" }, { "path": "Units/parser-cxx.r/cxx-keywords-as-c-identifiers.b/README", "content": "gen-input.sh generates a header file in which C++ keywords are used as C identifiers.\ngen-expected-tags.sh generates an incomplete expected.tags.\n\nCopyed from #930:\n\n I found this case in linux kernel.\n\n Consider a C language header having .h suffix.\n In C language private is not a keyword.\n New Cxx parser doesn't record a variable named private because\n the parser recognized it as C++ keyword.``\n Old Cxx parser\n\n [yamato@x201]/tmp% cat foo.h\n extern int private;\n static inline int f(void)\n {\n return private;\n }\n typedef int int32;\n\n\n [yamato@x201]/tmp% u-ctags -o - /tmp/foo.h \n # nothing is captured.\n\n [yamato@x201]/tmp% u-ctags --languages=+OldC++ --language-force=OldC++ -o - /tmp/foo.h\n f /tmp/foo.h /^static inline int f(void)$/;\" f\n int32 /tmp/foo.h /^typedef int int32;$/;\" t\n" }, { "path": "Units/parser-cxx.r/cxx-keywords-as-c-identifiers.b/args.ctags", "content": "--sort=no\n--kinds-C++=+px\n" }, { "path": "Units/parser-cxx.r/cxx-keywords-as-c-identifiers.b/expected.tags", "content": "NotKeyword\tinput.h\t/^struct NotKeyword {int x;} v0;$/;\"\ts\nx\tinput.h\t/^struct NotKeyword {int x;} v0;$/;\"\tm\tstruct:NotKeyword\ttyperef:typename:int\nv0\tinput.h\t/^struct NotKeyword {int x;} v0;$/;\"\tv\ttyperef:struct:NotKeyword\nalignas\tinput.h\t/^struct alignas {int x;} v1;$/;\"\ts\nx\tinput.h\t/^struct alignas {int x;} v1;$/;\"\tm\tstruct:alignas\ttyperef:typename:int\nv1\tinput.h\t/^struct alignas {int x;} v1;$/;\"\tv\ttyperef:struct:alignas\nalignof\tinput.h\t/^struct alignof {int x;} v2;$/;\"\ts\nx\tinput.h\t/^struct alignof {int x;} v2;$/;\"\tm\tstruct:alignof\ttyperef:typename:int\nv2\tinput.h\t/^struct alignof {int x;} v2;$/;\"\tv\ttyperef:struct:alignof\n__anon9f26d24b0108\tinput.h\t/^struct bool {int x;} v3;$/;\"\ts\nx\tinput.h\t/^struct bool {int x;} v3;$/;\"\tm\tstruct:__anon9f26d24b0108\ttyperef:typename:int\nv3\tinput.h\t/^struct bool {int x;} v3;$/;\"\tv\ttyperef:struct:__anon9f26d24b0108\ncatch\tinput.h\t/^struct catch {int x;} v4;$/;\"\ts\nx\tinput.h\t/^struct catch {int x;} v4;$/;\"\tm\tstruct:catch\ttyperef:typename:int\nv4\tinput.h\t/^struct catch {int x;} v4;$/;\"\tv\ttyperef:struct:catch\nchar16_t\tinput.h\t/^struct char16_t {int x;} v5;$/;\"\ts\nx\tinput.h\t/^struct char16_t {int x;} v5;$/;\"\tm\tstruct:char16_t\ttyperef:typename:int\nv5\tinput.h\t/^struct char16_t {int x;} v5;$/;\"\tv\ttyperef:struct:char16_t\nchar32_t\tinput.h\t/^struct char32_t {int x;} v6;$/;\"\ts\nx\tinput.h\t/^struct char32_t {int x;} v6;$/;\"\tm\tstruct:char32_t\ttyperef:typename:int\nv6\tinput.h\t/^struct char32_t {int x;} v6;$/;\"\tv\ttyperef:struct:char32_t\nclass\tinput.h\t/^struct class {int x;} v7;$/;\"\ts\nx\tinput.h\t/^struct class {int x;} v7;$/;\"\tm\tstruct:class\ttyperef:typename:int\nv7\tinput.h\t/^struct class {int x;} v7;$/;\"\tv\ttyperef:struct:class\nconcept\tinput.h\t/^struct concept {int x;} v8;$/;\"\ts\nx\tinput.h\t/^struct concept {int x;} v8;$/;\"\tm\tstruct:concept\ttyperef:typename:int\nv8\tinput.h\t/^struct concept {int x;} v8;$/;\"\tv\ttyperef:struct:concept\nconstexpr\tinput.h\t/^struct constexpr {int x;} v9;$/;\"\ts\nx\tinput.h\t/^struct constexpr {int x;} v9;$/;\"\tm\tstruct:constexpr\ttyperef:typename:int\nv9\tinput.h\t/^struct constexpr {int x;} v9;$/;\"\tv\ttyperef:struct:constexpr\nconst_cast\tinput.h\t/^struct const_cast {int x;} v10;$/;\"\ts\nx\tinput.h\t/^struct const_cast {int x;} v10;$/;\"\tm\tstruct:const_cast\ttyperef:typename:int\nv10\tinput.h\t/^struct const_cast {int x;} v10;$/;\"\tv\ttyperef:struct:const_cast\ndecltype\tinput.h\t/^struct decltype {int x;} v11;$/;\"\ts\nx\tinput.h\t/^struct decltype {int x;} v11;$/;\"\tm\tstruct:decltype\ttyperef:typename:int\nv11\tinput.h\t/^struct decltype {int x;} v11;$/;\"\tv\ttyperef:struct:decltype\ndelete\tinput.h\t/^struct delete {int x;} v12;$/;\"\ts\nx\tinput.h\t/^struct delete {int x;} v12;$/;\"\tm\tstruct:delete\ttyperef:typename:int\nv12\tinput.h\t/^struct delete {int x;} v12;$/;\"\tv\ttyperef:struct:delete\ndynamic_cast\tinput.h\t/^struct dynamic_cast {int x;} v13;$/;\"\ts\nx\tinput.h\t/^struct dynamic_cast {int x;} v13;$/;\"\tm\tstruct:dynamic_cast\ttyperef:typename:int\nv13\tinput.h\t/^struct dynamic_cast {int x;} v13;$/;\"\tv\ttyperef:struct:dynamic_cast\nexplicit\tinput.h\t/^struct explicit {int x;} v14;$/;\"\ts\nx\tinput.h\t/^struct explicit {int x;} v14;$/;\"\tm\tstruct:explicit\ttyperef:typename:int\nv14\tinput.h\t/^struct explicit {int x;} v14;$/;\"\tv\ttyperef:struct:explicit\nexport\tinput.h\t/^struct export {int x;} v15;$/;\"\ts\nx\tinput.h\t/^struct export {int x;} v15;$/;\"\tm\tstruct:export\ttyperef:typename:int\nv15\tinput.h\t/^struct export {int x;} v15;$/;\"\tv\ttyperef:struct:export\nfinal\tinput.h\t/^struct final {int x;} v16;$/;\"\ts\nx\tinput.h\t/^struct final {int x;} v16;$/;\"\tm\tstruct:final\ttyperef:typename:int\nv16\tinput.h\t/^struct final {int x;} v16;$/;\"\tv\ttyperef:struct:final\nfriend\tinput.h\t/^struct friend {int x;} v17;$/;\"\ts\nx\tinput.h\t/^struct friend {int x;} v17;$/;\"\tm\tstruct:friend\ttyperef:typename:int\nv17\tinput.h\t/^struct friend {int x;} v17;$/;\"\tv\ttyperef:struct:friend\nmutable\tinput.h\t/^struct mutable {int x;} v18;$/;\"\ts\nx\tinput.h\t/^struct mutable {int x;} v18;$/;\"\tm\tstruct:mutable\ttyperef:typename:int\nv18\tinput.h\t/^struct mutable {int x;} v18;$/;\"\tv\ttyperef:struct:mutable\nnamespace\tinput.h\t/^struct namespace {int x;} v19;$/;\"\ts\nx\tinput.h\t/^struct namespace {int x;} v19;$/;\"\tm\tstruct:namespace\ttyperef:typename:int\nv19\tinput.h\t/^struct namespace {int x;} v19;$/;\"\tv\ttyperef:struct:namespace\nnew\tinput.h\t/^struct new {int x;} v20;$/;\"\ts\nx\tinput.h\t/^struct new {int x;} v20;$/;\"\tm\tstruct:new\ttyperef:typename:int\nv20\tinput.h\t/^struct new {int x;} v20;$/;\"\tv\ttyperef:struct:new\nnoexcept\tinput.h\t/^struct noexcept {int x;} v21;$/;\"\ts\nx\tinput.h\t/^struct noexcept {int x;} v21;$/;\"\tm\tstruct:noexcept\ttyperef:typename:int\nv21\tinput.h\t/^struct noexcept {int x;} v21;$/;\"\tv\ttyperef:struct:noexcept\nnullptr\tinput.h\t/^struct nullptr {int x;} v22;$/;\"\ts\nx\tinput.h\t/^struct nullptr {int x;} v22;$/;\"\tm\tstruct:nullptr\ttyperef:typename:int\nv22\tinput.h\t/^struct nullptr {int x;} v22;$/;\"\tv\ttyperef:struct:nullptr\noperator\tinput.h\t/^struct operator {int x;} v23;$/;\"\ts\nx\tinput.h\t/^struct operator {int x;} v23;$/;\"\tm\tstruct:operator\ttyperef:typename:int\nv23\tinput.h\t/^struct operator {int x;} v23;$/;\"\tv\ttyperef:struct:operator\nprivate\tinput.h\t/^struct private {int x;} v24;$/;\"\ts\nx\tinput.h\t/^struct private {int x;} v24;$/;\"\tm\tstruct:private\ttyperef:typename:int\nv24\tinput.h\t/^struct private {int x;} v24;$/;\"\tv\ttyperef:struct:private\nprotected\tinput.h\t/^struct protected {int x;} v25;$/;\"\ts\nx\tinput.h\t/^struct protected {int x;} v25;$/;\"\tm\tstruct:protected\ttyperef:typename:int\nv25\tinput.h\t/^struct protected {int x;} v25;$/;\"\tv\ttyperef:struct:protected\npublic\tinput.h\t/^struct public {int x;} v26;$/;\"\ts\nx\tinput.h\t/^struct public {int x;} v26;$/;\"\tm\tstruct:public\ttyperef:typename:int\nv26\tinput.h\t/^struct public {int x;} v26;$/;\"\tv\ttyperef:struct:public\nreinterpret_cast\tinput.h\t/^struct reinterpret_cast {int x;} v27;$/;\"\ts\nx\tinput.h\t/^struct reinterpret_cast {int x;} v27;$/;\"\tm\tstruct:reinterpret_cast\ttyperef:typename:int\nv27\tinput.h\t/^struct reinterpret_cast {int x;} v27;$/;\"\tv\ttyperef:struct:reinterpret_cast\nrequires\tinput.h\t/^struct requires {int x;} v28;$/;\"\ts\nx\tinput.h\t/^struct requires {int x;} v28;$/;\"\tm\tstruct:requires\ttyperef:typename:int\nv28\tinput.h\t/^struct requires {int x;} v28;$/;\"\tv\ttyperef:struct:requires\nstatic_assert\tinput.h\t/^struct static_assert {int x;} v29;$/;\"\ts\nx\tinput.h\t/^struct static_assert {int x;} v29;$/;\"\tm\tstruct:static_assert\ttyperef:typename:int\nv29\tinput.h\t/^struct static_assert {int x;} v29;$/;\"\tv\ttyperef:struct:static_assert\nstatic_cast\tinput.h\t/^struct static_cast {int x;} v30;$/;\"\ts\nx\tinput.h\t/^struct static_cast {int x;} v30;$/;\"\tm\tstruct:static_cast\ttyperef:typename:int\nv30\tinput.h\t/^struct static_cast {int x;} v30;$/;\"\tv\ttyperef:struct:static_cast\ntemplate\tinput.h\t/^struct template {int x;} v31;$/;\"\ts\nx\tinput.h\t/^struct template {int x;} v31;$/;\"\tm\tstruct:template\ttyperef:typename:int\nv31\tinput.h\t/^struct template {int x;} v31;$/;\"\tv\ttyperef:struct:template\nthis\tinput.h\t/^struct this {int x;} v32;$/;\"\ts\nx\tinput.h\t/^struct this {int x;} v32;$/;\"\tm\tstruct:this\ttyperef:typename:int\nv32\tinput.h\t/^struct this {int x;} v32;$/;\"\tv\ttyperef:struct:this\nthread_local\tinput.h\t/^struct thread_local {int x;} v33;$/;\"\ts\nx\tinput.h\t/^struct thread_local {int x;} v33;$/;\"\tm\tstruct:thread_local\ttyperef:typename:int\nv33\tinput.h\t/^struct thread_local {int x;} v33;$/;\"\tv\ttyperef:struct:thread_local\nthrow\tinput.h\t/^struct throw {int x;} v34;$/;\"\ts\nx\tinput.h\t/^struct throw {int x;} v34;$/;\"\tm\tstruct:throw\ttyperef:typename:int\nv34\tinput.h\t/^struct throw {int x;} v34;$/;\"\tv\ttyperef:struct:throw\ntry\tinput.h\t/^struct try {int x;} v35;$/;\"\ts\nx\tinput.h\t/^struct try {int x;} v35;$/;\"\tm\tstruct:try\ttyperef:typename:int\nv35\tinput.h\t/^struct try {int x;} v35;$/;\"\tv\ttyperef:struct:try\ntypeid\tinput.h\t/^struct typeid {int x;} v36;$/;\"\ts\nx\tinput.h\t/^struct typeid {int x;} v36;$/;\"\tm\tstruct:typeid\ttyperef:typename:int\nv36\tinput.h\t/^struct typeid {int x;} v36;$/;\"\tv\ttyperef:struct:typeid\ntypename\tinput.h\t/^struct typename {int x;} v37;$/;\"\ts\nx\tinput.h\t/^struct typename {int x;} v37;$/;\"\tm\tstruct:typename\ttyperef:typename:int\nv37\tinput.h\t/^struct typename {int x;} v37;$/;\"\tv\ttyperef:struct:typename\nusing\tinput.h\t/^struct using {int x;} v38;$/;\"\ts\nx\tinput.h\t/^struct using {int x;} v38;$/;\"\tm\tstruct:using\ttyperef:typename:int\nv38\tinput.h\t/^struct using {int x;} v38;$/;\"\tv\ttyperef:struct:using\nvirtual\tinput.h\t/^struct virtual {int x;} v39;$/;\"\ts\nx\tinput.h\t/^struct virtual {int x;} v39;$/;\"\tm\tstruct:virtual\ttyperef:typename:int\nv39\tinput.h\t/^struct virtual {int x;} v39;$/;\"\tv\ttyperef:struct:virtual\ns0\tinput.h\t/^struct s0 {int NotKeyword;} ;$/;\"\ts\nNotKeyword\tinput.h\t/^struct s0 {int NotKeyword;} ;$/;\"\tm\tstruct:s0\ttyperef:typename:int\ns1\tinput.h\t/^struct s1 {int alignas;} ;$/;\"\ts\nalignas\tinput.h\t/^struct s1 {int alignas;} ;$/;\"\tm\tstruct:s1\ttyperef:typename:int\ns2\tinput.h\t/^struct s2 {int alignof;} ;$/;\"\ts\nalignof\tinput.h\t/^struct s2 {int alignof;} ;$/;\"\tm\tstruct:s2\ttyperef:typename:int\ns3\tinput.h\t/^struct s3 {int bool;} ;$/;\"\ts\ns4\tinput.h\t/^struct s4 {int catch;} ;$/;\"\ts\ncatch\tinput.h\t/^struct s4 {int catch;} ;$/;\"\tm\tstruct:s4\ttyperef:typename:int\ns5\tinput.h\t/^struct s5 {int char16_t;} ;$/;\"\ts\nchar16_t\tinput.h\t/^struct s5 {int char16_t;} ;$/;\"\tm\tstruct:s5\ttyperef:typename:int\ns6\tinput.h\t/^struct s6 {int char32_t;} ;$/;\"\ts\nchar32_t\tinput.h\t/^struct s6 {int char32_t;} ;$/;\"\tm\tstruct:s6\ttyperef:typename:int\ns7\tinput.h\t/^struct s7 {int class;} ;$/;\"\ts\nclass\tinput.h\t/^struct s7 {int class;} ;$/;\"\tm\tstruct:s7\ttyperef:typename:int\ns8\tinput.h\t/^struct s8 {int concept;} ;$/;\"\ts\nconcept\tinput.h\t/^struct s8 {int concept;} ;$/;\"\tm\tstruct:s8\ttyperef:typename:int\ns9\tinput.h\t/^struct s9 {int constexpr;} ;$/;\"\ts\nconstexpr\tinput.h\t/^struct s9 {int constexpr;} ;$/;\"\tm\tstruct:s9\ttyperef:typename:int\ns10\tinput.h\t/^struct s10 {int const_cast;} ;$/;\"\ts\nconst_cast\tinput.h\t/^struct s10 {int const_cast;} ;$/;\"\tm\tstruct:s10\ttyperef:typename:int\ns11\tinput.h\t/^struct s11 {int decltype;} ;$/;\"\ts\ndecltype\tinput.h\t/^struct s11 {int decltype;} ;$/;\"\tm\tstruct:s11\ttyperef:typename:int\ns12\tinput.h\t/^struct s12 {int delete;} ;$/;\"\ts\ndelete\tinput.h\t/^struct s12 {int delete;} ;$/;\"\tm\tstruct:s12\ttyperef:typename:int\ns13\tinput.h\t/^struct s13 {int dynamic_cast;} ;$/;\"\ts\ndynamic_cast\tinput.h\t/^struct s13 {int dynamic_cast;} ;$/;\"\tm\tstruct:s13\ttyperef:typename:int\ns14\tinput.h\t/^struct s14 {int explicit;} ;$/;\"\ts\nexplicit\tinput.h\t/^struct s14 {int explicit;} ;$/;\"\tm\tstruct:s14\ttyperef:typename:int\ns15\tinput.h\t/^struct s15 {int export;} ;$/;\"\ts\nexport\tinput.h\t/^struct s15 {int export;} ;$/;\"\tm\tstruct:s15\ttyperef:typename:int\ns16\tinput.h\t/^struct s16 {int final;} ;$/;\"\ts\nfinal\tinput.h\t/^struct s16 {int final;} ;$/;\"\tm\tstruct:s16\ttyperef:typename:int\ns17\tinput.h\t/^struct s17 {int friend;} ;$/;\"\ts\nfriend\tinput.h\t/^struct s17 {int friend;} ;$/;\"\tm\tstruct:s17\ttyperef:typename:int\ns18\tinput.h\t/^struct s18 {int mutable;} ;$/;\"\ts\nmutable\tinput.h\t/^struct s18 {int mutable;} ;$/;\"\tm\tstruct:s18\ttyperef:typename:int\ns19\tinput.h\t/^struct s19 {int namespace;} ;$/;\"\ts\nnamespace\tinput.h\t/^struct s19 {int namespace;} ;$/;\"\tm\tstruct:s19\ttyperef:typename:int\ns20\tinput.h\t/^struct s20 {int new;} ;$/;\"\ts\nnew\tinput.h\t/^struct s20 {int new;} ;$/;\"\tm\tstruct:s20\ttyperef:typename:int\ns21\tinput.h\t/^struct s21 {int noexcept;} ;$/;\"\ts\nnoexcept\tinput.h\t/^struct s21 {int noexcept;} ;$/;\"\tm\tstruct:s21\ttyperef:typename:int\ns22\tinput.h\t/^struct s22 {int nullptr;} ;$/;\"\ts\nnullptr\tinput.h\t/^struct s22 {int nullptr;} ;$/;\"\tm\tstruct:s22\ttyperef:typename:int\ns23\tinput.h\t/^struct s23 {int operator;} ;$/;\"\ts\noperator\tinput.h\t/^struct s23 {int operator;} ;$/;\"\tm\tstruct:s23\ttyperef:typename:int\ns24\tinput.h\t/^struct s24 {int private;} ;$/;\"\ts\nprivate\tinput.h\t/^struct s24 {int private;} ;$/;\"\tm\tstruct:s24\ttyperef:typename:int\ns25\tinput.h\t/^struct s25 {int protected;} ;$/;\"\ts\nprotected\tinput.h\t/^struct s25 {int protected;} ;$/;\"\tm\tstruct:s25\ttyperef:typename:int\ns26\tinput.h\t/^struct s26 {int public;} ;$/;\"\ts\npublic\tinput.h\t/^struct s26 {int public;} ;$/;\"\tm\tstruct:s26\ttyperef:typename:int\ns27\tinput.h\t/^struct s27 {int reinterpret_cast;} ;$/;\"\ts\nreinterpret_cast\tinput.h\t/^struct s27 {int reinterpret_cast;} ;$/;\"\tm\tstruct:s27\ttyperef:typename:int\ns28\tinput.h\t/^struct s28 {int requires;} ;$/;\"\ts\nrequires\tinput.h\t/^struct s28 {int requires;} ;$/;\"\tm\tstruct:s28\ttyperef:typename:int\ns29\tinput.h\t/^struct s29 {int static_assert;} ;$/;\"\ts\nstatic_assert\tinput.h\t/^struct s29 {int static_assert;} ;$/;\"\tm\tstruct:s29\ttyperef:typename:int\ns30\tinput.h\t/^struct s30 {int static_cast;} ;$/;\"\ts\nstatic_cast\tinput.h\t/^struct s30 {int static_cast;} ;$/;\"\tm\tstruct:s30\ttyperef:typename:int\ns31\tinput.h\t/^struct s31 {int template;} ;$/;\"\ts\ntemplate\tinput.h\t/^struct s31 {int template;} ;$/;\"\tm\tstruct:s31\ttyperef:typename:int\ns32\tinput.h\t/^struct s32 {int this;} ;$/;\"\ts\nthis\tinput.h\t/^struct s32 {int this;} ;$/;\"\tm\tstruct:s32\ttyperef:typename:int\ns33\tinput.h\t/^struct s33 {int thread_local;} ;$/;\"\ts\nthread_local\tinput.h\t/^struct s33 {int thread_local;} ;$/;\"\tm\tstruct:s33\ttyperef:typename:int\ns34\tinput.h\t/^struct s34 {int throw;} ;$/;\"\ts\nthrow\tinput.h\t/^struct s34 {int throw;} ;$/;\"\tm\tstruct:s34\ttyperef:typename:int\ns35\tinput.h\t/^struct s35 {int try;} ;$/;\"\ts\ntry\tinput.h\t/^struct s35 {int try;} ;$/;\"\tm\tstruct:s35\ttyperef:typename:int\ns36\tinput.h\t/^struct s36 {int typeid;} ;$/;\"\ts\ntypeid\tinput.h\t/^struct s36 {int typeid;} ;$/;\"\tm\tstruct:s36\ttyperef:typename:int\ns37\tinput.h\t/^struct s37 {int typename;} ;$/;\"\ts\ntypename\tinput.h\t/^struct s37 {int typename;} ;$/;\"\tm\tstruct:s37\ttyperef:typename:int\ns38\tinput.h\t/^struct s38 {int using;} ;$/;\"\ts\nusing\tinput.h\t/^struct s38 {int using;} ;$/;\"\tm\tstruct:s38\ttyperef:typename:int\ns39\tinput.h\t/^struct s39 {int virtual;} ;$/;\"\ts\nvirtual\tinput.h\t/^struct s39 {int virtual;} ;$/;\"\tm\tstruct:s39\ttyperef:typename:int\nNotKeyword\tinput.h\t/^typedef int NotKeyword; \\/* 0 *\\/$/;\"\tt\ttyperef:typename:int\nalignas\tinput.h\t/^typedef int alignas; \\/* 1 *\\/$/;\"\tt\ttyperef:typename:int\nalignof\tinput.h\t/^typedef int alignof; \\/* 2 *\\/$/;\"\tt\ttyperef:typename:int\ncatch\tinput.h\t/^typedef int catch; \\/* 4 *\\/$/;\"\tt\ttyperef:typename:int\nchar16_t\tinput.h\t/^typedef int char16_t; \\/* 5 *\\/$/;\"\tt\ttyperef:typename:int\nchar32_t\tinput.h\t/^typedef int char32_t; \\/* 6 *\\/$/;\"\tt\ttyperef:typename:int\nclass\tinput.h\t/^typedef int class; \\/* 7 *\\/$/;\"\tt\ttyperef:typename:int\nconcept\tinput.h\t/^typedef int concept; \\/* 8 *\\/$/;\"\tt\ttyperef:typename:int\nconstexpr\tinput.h\t/^typedef int constexpr; \\/* 9 *\\/$/;\"\tt\ttyperef:typename:int\nconst_cast\tinput.h\t/^typedef int const_cast; \\/* 10 *\\/$/;\"\tt\ttyperef:typename:int\ndecltype\tinput.h\t/^typedef int decltype; \\/* 11 *\\/$/;\"\tt\ttyperef:typename:int\ndelete\tinput.h\t/^typedef int delete; \\/* 12 *\\/$/;\"\tt\ttyperef:typename:int\ndynamic_cast\tinput.h\t/^typedef int dynamic_cast; \\/* 13 *\\/$/;\"\tt\ttyperef:typename:int\nexplicit\tinput.h\t/^typedef int explicit; \\/* 14 *\\/$/;\"\tt\ttyperef:typename:int\nexport\tinput.h\t/^typedef int export; \\/* 15 *\\/$/;\"\tt\ttyperef:typename:int\nfinal\tinput.h\t/^typedef int final; \\/* 16 *\\/$/;\"\tt\ttyperef:typename:int\nfriend\tinput.h\t/^typedef int friend; \\/* 17 *\\/$/;\"\tt\ttyperef:typename:int\nmutable\tinput.h\t/^typedef int mutable; \\/* 18 *\\/$/;\"\tt\ttyperef:typename:int\nnamespace\tinput.h\t/^typedef int namespace; \\/* 19 *\\/$/;\"\tt\ttyperef:typename:int\nnew\tinput.h\t/^typedef int new; \\/* 20 *\\/$/;\"\tt\ttyperef:typename:int\nnoexcept\tinput.h\t/^typedef int noexcept; \\/* 21 *\\/$/;\"\tt\ttyperef:typename:int\nnullptr\tinput.h\t/^typedef int nullptr; \\/* 22 *\\/$/;\"\tt\ttyperef:typename:int\noperator\tinput.h\t/^typedef int operator; \\/* 23 *\\/$/;\"\tt\ttyperef:typename:int\nprivate\tinput.h\t/^typedef int private; \\/* 24 *\\/$/;\"\tt\ttyperef:typename:int\nprotected\tinput.h\t/^typedef int protected; \\/* 25 *\\/$/;\"\tt\ttyperef:typename:int\npublic\tinput.h\t/^typedef int public; \\/* 26 *\\/$/;\"\tt\ttyperef:typename:int\nreinterpret_cast\tinput.h\t/^typedef int reinterpret_cast; \\/* 27 *\\/$/;\"\tt\ttyperef:typename:int\nrequires\tinput.h\t/^typedef int requires; \\/* 28 *\\/$/;\"\tt\ttyperef:typename:int\nstatic_assert\tinput.h\t/^typedef int static_assert; \\/* 29 *\\/$/;\"\tt\ttyperef:typename:int\nstatic_cast\tinput.h\t/^typedef int static_cast; \\/* 30 *\\/$/;\"\tt\ttyperef:typename:int\ntemplate\tinput.h\t/^typedef int template; \\/* 31 *\\/$/;\"\tt\ttyperef:typename:int\nthis\tinput.h\t/^typedef int this; \\/* 32 *\\/$/;\"\tt\ttyperef:typename:int\nthread_local\tinput.h\t/^typedef int thread_local; \\/* 33 *\\/$/;\"\tt\ttyperef:typename:int\nthrow\tinput.h\t/^typedef int throw; \\/* 34 *\\/$/;\"\tt\ttyperef:typename:int\ntry\tinput.h\t/^typedef int try; \\/* 35 *\\/$/;\"\tt\ttyperef:typename:int\ntypeid\tinput.h\t/^typedef int typeid; \\/* 36 *\\/$/;\"\tt\ttyperef:typename:int\ntypename\tinput.h\t/^typedef int typename; \\/* 37 *\\/$/;\"\tt\ttyperef:typename:int\nusing\tinput.h\t/^typedef int using; \\/* 38 *\\/$/;\"\tt\ttyperef:typename:int\nvirtual\tinput.h\t/^typedef int virtual; \\/* 39 *\\/$/;\"\tt\ttyperef:typename:int\nv0\tinput.h\t/^int v0, NotKeyword;$/;\"\tv\ttyperef:typename:int\nNotKeyword\tinput.h\t/^int v0, NotKeyword;$/;\"\tv\ttyperef:typename:int\nv1\tinput.h\t/^int v1, alignas;$/;\"\tv\ttyperef:typename:int\nalignas\tinput.h\t/^int v1, alignas;$/;\"\tv\ttyperef:typename:int\nv2\tinput.h\t/^int v2, alignof;$/;\"\tv\ttyperef:typename:int\nalignof\tinput.h\t/^int v2, alignof;$/;\"\tv\ttyperef:typename:int\nv3\tinput.h\t/^int v3, bool;$/;\"\tv\ttyperef:typename:int\nv4\tinput.h\t/^int v4, catch;$/;\"\tv\ttyperef:typename:int\ncatch\tinput.h\t/^int v4, catch;$/;\"\tv\ttyperef:typename:int\nv5\tinput.h\t/^int v5, char16_t;$/;\"\tv\ttyperef:typename:int\nchar16_t\tinput.h\t/^int v5, char16_t;$/;\"\tv\ttyperef:typename:int\nv6\tinput.h\t/^int v6, char32_t;$/;\"\tv\ttyperef:typename:int\nchar32_t\tinput.h\t/^int v6, char32_t;$/;\"\tv\ttyperef:typename:int\nv7\tinput.h\t/^int v7, class;$/;\"\tv\ttyperef:typename:int\nclass\tinput.h\t/^int v7, class;$/;\"\tv\ttyperef:typename:int\nv8\tinput.h\t/^int v8, concept;$/;\"\tv\ttyperef:typename:int\nconcept\tinput.h\t/^int v8, concept;$/;\"\tv\ttyperef:typename:int\nv9\tinput.h\t/^int v9, constexpr;$/;\"\tv\ttyperef:typename:int\nconstexpr\tinput.h\t/^int v9, constexpr;$/;\"\tv\ttyperef:typename:int\nv10\tinput.h\t/^int v10, const_cast;$/;\"\tv\ttyperef:typename:int\nconst_cast\tinput.h\t/^int v10, const_cast;$/;\"\tv\ttyperef:typename:int\nv11\tinput.h\t/^int v11, decltype;$/;\"\tv\ttyperef:typename:int\ndecltype\tinput.h\t/^int v11, decltype;$/;\"\tv\ttyperef:typename:int\nv12\tinput.h\t/^int v12, delete;$/;\"\tv\ttyperef:typename:int\ndelete\tinput.h\t/^int v12, delete;$/;\"\tv\ttyperef:typename:int\nv13\tinput.h\t/^int v13, dynamic_cast;$/;\"\tv\ttyperef:typename:int\ndynamic_cast\tinput.h\t/^int v13, dynamic_cast;$/;\"\tv\ttyperef:typename:int\nv14\tinput.h\t/^int v14, explicit;$/;\"\tv\ttyperef:typename:int\nexplicit\tinput.h\t/^int v14, explicit;$/;\"\tv\ttyperef:typename:int\nv15\tinput.h\t/^int v15, export;$/;\"\tv\ttyperef:typename:int\nexport\tinput.h\t/^int v15, export;$/;\"\tv\ttyperef:typename:int\nv16\tinput.h\t/^int v16, final;$/;\"\tv\ttyperef:typename:int\nfinal\tinput.h\t/^int v16, final;$/;\"\tv\ttyperef:typename:int\nv17\tinput.h\t/^int v17, friend;$/;\"\tv\ttyperef:typename:int\nfriend\tinput.h\t/^int v17, friend;$/;\"\tv\ttyperef:typename:int\nv18\tinput.h\t/^int v18, mutable;$/;\"\tv\ttyperef:typename:int\nmutable\tinput.h\t/^int v18, mutable;$/;\"\tv\ttyperef:typename:int\nv19\tinput.h\t/^int v19, namespace;$/;\"\tv\ttyperef:typename:int\nnamespace\tinput.h\t/^int v19, namespace;$/;\"\tv\ttyperef:typename:int\nv20\tinput.h\t/^int v20, new;$/;\"\tv\ttyperef:typename:int\nnew\tinput.h\t/^int v20, new;$/;\"\tv\ttyperef:typename:int\nv21\tinput.h\t/^int v21, noexcept;$/;\"\tv\ttyperef:typename:int\nnoexcept\tinput.h\t/^int v21, noexcept;$/;\"\tv\ttyperef:typename:int\nv22\tinput.h\t/^int v22, nullptr;$/;\"\tv\ttyperef:typename:int\nnullptr\tinput.h\t/^int v22, nullptr;$/;\"\tv\ttyperef:typename:int\nv23\tinput.h\t/^int v23, operator;$/;\"\tv\ttyperef:typename:int\noperator\tinput.h\t/^int v23, operator;$/;\"\tv\ttyperef:typename:int\nv24\tinput.h\t/^int v24, private;$/;\"\tv\ttyperef:typename:int\nprivate\tinput.h\t/^int v24, private;$/;\"\tv\ttyperef:typename:int\nv25\tinput.h\t/^int v25, protected;$/;\"\tv\ttyperef:typename:int\nprotected\tinput.h\t/^int v25, protected;$/;\"\tv\ttyperef:typename:int\nv26\tinput.h\t/^int v26, public;$/;\"\tv\ttyperef:typename:int\npublic\tinput.h\t/^int v26, public;$/;\"\tv\ttyperef:typename:int\nv27\tinput.h\t/^int v27, reinterpret_cast;$/;\"\tv\ttyperef:typename:int\nreinterpret_cast\tinput.h\t/^int v27, reinterpret_cast;$/;\"\tv\ttyperef:typename:int\nv28\tinput.h\t/^int v28, requires;$/;\"\tv\ttyperef:typename:int\nrequires\tinput.h\t/^int v28, requires;$/;\"\tv\ttyperef:typename:int\nv29\tinput.h\t/^int v29, static_assert;$/;\"\tv\ttyperef:typename:int\nstatic_assert\tinput.h\t/^int v29, static_assert;$/;\"\tv\ttyperef:typename:int\nv30\tinput.h\t/^int v30, static_cast;$/;\"\tv\ttyperef:typename:int\nstatic_cast\tinput.h\t/^int v30, static_cast;$/;\"\tv\ttyperef:typename:int\nv31\tinput.h\t/^int v31, template;$/;\"\tv\ttyperef:typename:int\ntemplate\tinput.h\t/^int v31, template;$/;\"\tv\ttyperef:typename:int\nv32\tinput.h\t/^int v32, this;$/;\"\tv\ttyperef:typename:int\nthis\tinput.h\t/^int v32, this;$/;\"\tv\ttyperef:typename:int\nv33\tinput.h\t/^int v33, thread_local;$/;\"\tv\ttyperef:typename:int\nthread_local\tinput.h\t/^int v33, thread_local;$/;\"\tv\ttyperef:typename:int\nv34\tinput.h\t/^int v34, throw;$/;\"\tv\ttyperef:typename:int\nthrow\tinput.h\t/^int v34, throw;$/;\"\tv\ttyperef:typename:int\nv35\tinput.h\t/^int v35, try;$/;\"\tv\ttyperef:typename:int\ntry\tinput.h\t/^int v35, try;$/;\"\tv\ttyperef:typename:int\nv36\tinput.h\t/^int v36, typeid;$/;\"\tv\ttyperef:typename:int\ntypeid\tinput.h\t/^int v36, typeid;$/;\"\tv\ttyperef:typename:int\nv37\tinput.h\t/^int v37, typename;$/;\"\tv\ttyperef:typename:int\ntypename\tinput.h\t/^int v37, typename;$/;\"\tv\ttyperef:typename:int\nv38\tinput.h\t/^int v38, using;$/;\"\tv\ttyperef:typename:int\nusing\tinput.h\t/^int v38, using;$/;\"\tv\ttyperef:typename:int\nv39\tinput.h\t/^int v39, virtual;$/;\"\tv\ttyperef:typename:int\nvirtual\tinput.h\t/^int v39, virtual;$/;\"\tv\ttyperef:typename:int\nNotKeyword\tinput.h\t/^int NotKeyword (int a0);$/;\"\tp\ttyperef:typename:int\nalignas\tinput.h\t/^int alignas (int a1);$/;\"\tp\ttyperef:typename:int\nalignof\tinput.h\t/^int alignof (int a2);$/;\"\tp\ttyperef:typename:int\ncatch\tinput.h\t/^int catch (int a4);$/;\"\tp\ttyperef:typename:int\nchar16_t\tinput.h\t/^int char16_t (int a5);$/;\"\tp\ttyperef:typename:int\nchar32_t\tinput.h\t/^int char32_t (int a6);$/;\"\tp\ttyperef:typename:int\nclass\tinput.h\t/^int class (int a7);$/;\"\tp\ttyperef:typename:int\nconcept\tinput.h\t/^int concept (int a8);$/;\"\tp\ttyperef:typename:int\nconstexpr\tinput.h\t/^int constexpr (int a9);$/;\"\tp\ttyperef:typename:int\nconst_cast\tinput.h\t/^int const_cast (int a10);$/;\"\tp\ttyperef:typename:int\ndecltype\tinput.h\t/^int decltype (int a11);$/;\"\tp\ttyperef:typename:int\ndelete\tinput.h\t/^int delete (int a12);$/;\"\tp\ttyperef:typename:int\ndynamic_cast\tinput.h\t/^int dynamic_cast (int a13);$/;\"\tp\ttyperef:typename:int\nexplicit\tinput.h\t/^int explicit (int a14);$/;\"\tp\ttyperef:typename:int\nexport\tinput.h\t/^int export (int a15);$/;\"\tp\ttyperef:typename:int\nfinal\tinput.h\t/^int final (int a16);$/;\"\tp\ttyperef:typename:int\nfriend\tinput.h\t/^int friend (int a17);$/;\"\tp\ttyperef:typename:int\nmutable\tinput.h\t/^int mutable (int a18);$/;\"\tp\ttyperef:typename:int\nnamespace\tinput.h\t/^int namespace (int a19);$/;\"\tp\ttyperef:typename:int\nnew\tinput.h\t/^int new (int a20);$/;\"\tp\ttyperef:typename:int\nnoexcept\tinput.h\t/^int noexcept (int a21);$/;\"\tp\ttyperef:typename:int\nnullptr\tinput.h\t/^int nullptr (int a22);$/;\"\tp\ttyperef:typename:int\noperator\tinput.h\t/^int operator (int a23);$/;\"\tp\ttyperef:typename:int\nprivate\tinput.h\t/^int private (int a24);$/;\"\tp\ttyperef:typename:int\nprotected\tinput.h\t/^int protected (int a25);$/;\"\tp\ttyperef:typename:int\npublic\tinput.h\t/^int public (int a26);$/;\"\tp\ttyperef:typename:int\nreinterpret_cast\tinput.h\t/^int reinterpret_cast (int a27);$/;\"\tp\ttyperef:typename:int\nrequires\tinput.h\t/^int requires (int a28);$/;\"\tp\ttyperef:typename:int\nstatic_assert\tinput.h\t/^int static_assert (int a29);$/;\"\tp\ttyperef:typename:int\nstatic_cast\tinput.h\t/^int static_cast (int a30);$/;\"\tp\ttyperef:typename:int\ntemplate\tinput.h\t/^int template (int a31);$/;\"\tp\ttyperef:typename:int\nthis\tinput.h\t/^int this (int a32);$/;\"\tp\ttyperef:typename:int\nthread_local\tinput.h\t/^int thread_local (int a33);$/;\"\tp\ttyperef:typename:int\nthrow\tinput.h\t/^int throw (int a34);$/;\"\tp\ttyperef:typename:int\ntry\tinput.h\t/^int try (int a35);$/;\"\tp\ttyperef:typename:int\ntypeid\tinput.h\t/^int typeid (int a36);$/;\"\tp\ttyperef:typename:int\ntypename\tinput.h\t/^int typename (int a37);$/;\"\tp\ttyperef:typename:int\nusing\tinput.h\t/^int using (int a38);$/;\"\tp\ttyperef:typename:int\nvirtual\tinput.h\t/^int virtual (int a39);$/;\"\tp\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/cxx-keywords-as-c-identifiers.b/gen-expected-tags.sh", "content": "#!/bin/sh\n\n# Copyright: 2016 Masatake YAMATO\n# License: GPL-2\n\n. ./keywords.sh\n\ngen_struct_tags ()\n{\n i=0\n for k in $keywords; do\n\tcat< class c {};$/;\"\tc\tfile:\nbVar\tinput.cpp\t/^c< 8 > bVar;$/;\"\tv\ttyperef:typename:c<8>\naVar\tinput.cpp\t/^c< 1<<8 > aVar;$/;\"\tv\ttyperef:typename:c<1<<8>\nf12\tinput.cpp\t/^template f12( c< 1< & aVar) { };$/;\"\tf\tsignature:(c<1< & aVar)\n" }, { "path": "Units/parser-cxx.r/cxx-shift-operators-in-template-parameters.d/input.cpp", "content": "template class c {};\nc< 8 > bVar;\nc< 1<<8 > aVar;\ntemplate f12( c< 1< & aVar) { };\n" }, { "path": "Units/parser-cxx.r/cxx11-attributes.cpp.d/args.ctags", "content": "--kinds-c++=*\n--fields-C++=+{properties}\n--fields=+tS\n--sort=no\n" }, { "path": "Units/parser-cxx.r/cxx11-attributes.cpp.d/expected.tags", "content": "f\tinput.cpp\t/^inline int f(); \\/\\/ declare f with four attributes$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\tproperties:inline\ng\tinput.cpp\t/^int g(); \\/\\/ same as above, but uses a single attr specifier that contains four attributes$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\tproperties:inline\nh\tinput.cpp\t/^int h[[gnu::always_inline]](); \\/\\/ an attribute may appear in multiple specifiers$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:()\tproperties:inline\ni\tinput.cpp\t/^int i() { return 0; }$/;\"\tf\ttyperef:typename:int\tsignature:()\nj\tinput.cpp\t/^[ [ deprecated ] ] int j(int k) {$/;\"\tf\ttyperef:typename:int\tsignature:(int k)\tproperties:deprecated\nk\tinput.cpp\t/^[ [ deprecated ] ] int j(int k) {$/;\"\tz\tfunction:j\ttyperef:typename:int\tfile:\nv1\tinput.cpp\t/^\tint v1;$/;\"\tl\tfunction:j\ttyperef:typename:int\tfile:\nfoo\tinput.cpp\t/^void foo();$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:()\nmain\tinput.cpp\t/^int main([[maybe_unused]]int argc, [[maybe_unused]]char *argv[]) {$/;\"\tf\ttyperef:typename:int\tsignature:(int argc,char * argv[])\nargc\tinput.cpp\t/^int main([[maybe_unused]]int argc, [[maybe_unused]]char *argv[]) {$/;\"\tz\tfunction:main\ttyperef:typename:int\tfile:\nargv\tinput.cpp\t/^int main([[maybe_unused]]int argc, [[maybe_unused]]char *argv[]) {$/;\"\tz\tfunction:main\ttyperef:typename:char * []\tfile:\nalpha\tinput.cpp\t/^ int alpha;$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\nbravo\tinput.cpp\t/^ int bravo;$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\ncharlie\tinput.cpp\t/^ int charlie;$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/cxx11-attributes.cpp.d/input.cpp", "content": "// Taken from https://en.cppreference.com/w/cpp/language/attributes\n[[gnu::always_inline]] [[gnu::hot]] [[gnu::const]] [[nodiscard]]\ninline int f(); // declare f with four attributes\n\n[[gnu::always_inline, gnu::const, gnu::hot, nodiscard]]\nint g(); // same as above, but uses a single attr specifier that contains four attributes\n\n// C++17:\n[[using gnu : const, always_inline, hot]] [[nodiscard]]\nint h[[gnu::always_inline]](); // an attribute may appear in multiple specifiers\n\nint i() { return 0; }\n\n[ [ deprecated ] ] int j(int k) {\n\tswitch(k)\n\t{\n\t\tcase 1:\n\t\t\t[[fallthrough]];\n\t\tcase 2:\n\t\t\t[[likely]]\n\t\t\treturn 3;\n\t}\n\t\n\tint v1;\n\t\n\treturn -1;\n}\n\n/* Taken from issue #2364 opened by andrejlevkovitch. */\n\nvoid foo();\n\nint main([[maybe_unused]]int argc, [[maybe_unused]]char *argv[]) {\n int alpha;\n int bravo;\n int charlie;\n\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/cxx11-broken-nested-attributes.cpp.d/expected.tags", "content": "i\tinput.cxx\t/^int i;$/;\"\tv\ttyperef:typename:int\nj\tinput-0.cxx\t/^[[)int j;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/cxx11-broken-nested-attributes.cpp.d/input-0.cxx", "content": "[[)int j;\n// This is a broken input; extracting j is not a must.\n" }, { "path": "Units/parser-cxx.r/cxx11-broken-nested-attributes.cpp.d/input.cxx", "content": "[[[]]]\n// This is a crash test.\nint i;\n" }, { "path": "Units/parser-cxx.r/cxx11-constexpr-variable.d/expected.tags", "content": "a_int\tinput.cpp\t/^constexpr int a_int = 1;$/;\"\tv\ttyperef:typename:int\nb_int\tinput.cpp\t/^constexpr const int b_int = 2;$/;\"\tv\ttyperef:typename:const int\nc_int\tinput.cpp\t/^static constexpr const int c_int = 3;$/;\"\tv\ttyperef:typename:const int\tfile:\nd_int\tinput.cpp\t/^static constexpr int d_int = 4;$/;\"\tv\ttyperef:typename:int\tfile:\ne_int\tinput.cpp\t/^constexpr static const int e_int = 5;$/;\"\tv\ttyperef:typename:const int\tfile:\nf_int\tinput.cpp\t/^constexpr static int f_int = 6;$/;\"\tv\ttyperef:typename:int\tfile:\ng_auto\tinput.cpp\t/^constexpr auto g_auto = 7;$/;\"\tv\ttyperef:typename:auto\nh_char_ptr\tinput.cpp\t/^constexpr static const char* const h_char_ptr = \"this is valid\";$/;\"\tv\ttyperef:typename:const char * const\tfile:\ni_char_array\tinput.cpp\t/^static constexpr const char i_char_array[] = \"this is also valid\";$/;\"\tv\ttyperef:typename:const char[]\tfile:\nj_ref\tinput.cpp\t/^static constexpr int const& j_ref = 42;$/;\"\tv\ttyperef:typename:int const &\tfile:\nk_int_ptr\tinput.cpp\t/^constexpr const int *k_int_ptr = &a_int;$/;\"\tv\ttyperef:typename:const int *\nl_raw\tinput.cpp\t/^static constexpr const char* const l_raw = R\"(setfacl {} -m g:{}:{} {})\";$/;\"\tv\ttyperef:typename:const char * const\tfile:\nm_int64\tinput.cpp\t/^static constexpr const int64_t m_int64 = 120'000;$/;\"\tv\ttyperef:typename:const int64_t\tfile:\n" }, { "path": "Units/parser-cxx.r/cxx11-constexpr-variable.d/input.cpp", "content": "constexpr int a_int = 1;\nconstexpr const int b_int = 2;\nstatic constexpr const int c_int = 3;\nstatic constexpr int d_int = 4;\nconstexpr static const int e_int = 5;\nconstexpr static int f_int = 6;\n\nconstexpr auto g_auto = 7;\n\nconstexpr static const char* const h_char_ptr = \"this is valid\";\n\nstatic constexpr const char i_char_array[] = \"this is also valid\";\n\nstatic constexpr int const& j_ref = 42;\n\nconstexpr const int *k_int_ptr = &a_int;\n\nstatic constexpr const char* const l_raw = R\"(setfacl {} -m g:{}:{} {})\";\n\nstatic constexpr const int64_t m_int64 = 120'000;\n" }, { "path": "Units/parser-cxx.r/cxx11-delete.d/args.ctags", "content": "--kinds-c++=+p\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/cxx11-delete.d/expected.tags", "content": "Del\tinput.cpp\t/^ Del(const Del &) = delete;$/;\"\tp\tclass:Del\tfile:\tsignature:(const Del &)\nDel\tinput.cpp\t/^class Del$/;\"\tc\tfile:\noperator =\tinput.cpp\t/^ void operator=(const Del& rDel) = delete;$/;\"\tp\tclass:Del\ttyperef:typename:void\tfile:\tsignature:(const Del & rDel)\n" }, { "path": "Units/parser-cxx.r/cxx11-delete.d/input.cpp", "content": "class Del\n{\nprivate:\n Del(const Del &) = delete;\n void operator=(const Del& rDel) = delete;\n};\n" }, { "path": "Units/parser-cxx.r/cxx11-final.d/args.ctags", "content": "--kinds-c++=+p\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/cxx11-final.d/expected.tags", "content": "Base\tinput.cpp\t/^class Base$/;\"\tc\tfile:\nDerived\tinput.cpp\t/^class Derived final : public Base$/;\"\tc\tfile:\nfinal\tinput.cpp\t/^\tvirtual void final();$/;\"\tp\tclass:Derived\ttyperef:typename:void\tfile:\tsignature:()\nfinal\tinput.cpp\t/^void Derived::final()$/;\"\tf\tclass:Derived\ttyperef:typename:void\tsignature:()\nfoo\tinput.cpp\t/^\tvirtual void foo() = 0;$/;\"\tp\tclass:Base\ttyperef:typename:void\tfile:\tsignature:()\nfoo\tinput.cpp\t/^\tvirtual void foo() final;$/;\"\tp\tclass:Derived\ttyperef:typename:void\tfile:\tsignature:()\nfoo\tinput.cpp\t/^void Base::foo()$/;\"\tf\tclass:Base\ttyperef:typename:void\tsignature:()\nfoo\tinput.cpp\t/^void Derived::foo()$/;\"\tf\tclass:Derived\ttyperef:typename:void\tsignature:()\n" }, { "path": "Units/parser-cxx.r/cxx11-final.d/input.cpp", "content": "class Base\n{\npublic:\n\tvirtual void foo() = 0;\n};\n\nclass Derived final : public Base\n{\n\tvirtual void foo() final;\n\tvirtual void final();\n};\n\nvoid Base::foo()\n{\n}\n\nvoid Derived::foo()\n{\n}\n\nvoid Derived::final()\n{\n}\n" }, { "path": "Units/parser-cxx.r/cxx11-lambdas.d/args.ctags", "content": "--kinds-c++=+pflz\n--fields=+SsKe\n--fields-c++=+{captures}\n--sort=no\n" }, { "path": "Units/parser-cxx.r/cxx11-lambdas.d/expected.tags", "content": "call\tinput.cpp\t/^template int call(T x)$/;\"\tfunction\ttyperef:typename:int\tsignature:(T x)\tend:6\nx\tinput.cpp\t/^template int call(T x)$/;\"\tparameter\tfunction:call\ttyperef:typename:T\tfile:\nX\tinput.cpp\t/^template class X$/;\"\tclass\tfile:\tend:10\ntest\tinput.cpp\t/^int test()$/;\"\tfunction\ttyperef:typename:int\tsignature:()\tend:30\n__anon4e7b1b580102\tinput.cpp\t/^\tauto l1 = [] { return 0; };$/;\"\tfunction\tfunction:test\tfile:\tend:14\tcaptures:[] \nl1\tinput.cpp\t/^\tauto l1 = [] { return 0; };$/;\"\tlocal\tfunction:test\ttyperef:typename:auto\tfile:\tend:14\n__anon4e7b1b580202\tinput.cpp\t/^\tauto l2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tfunction\tfunction:test\tfile:\tsignature:(int a,int b) \tend:16\tcaptures:[]\na\tinput.cpp\t/^\tauto l2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tparameter\tfunction:test::__anon4e7b1b580202\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^\tauto l2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tparameter\tfunction:test::__anon4e7b1b580202\ttyperef:typename:int\tfile:\nl2\tinput.cpp\t/^\tauto l2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tlocal\tfunction:test\ttyperef:typename:auto\tfile:\tend:16\n__anon4e7b1b580302\tinput.cpp\t/^\tauto l3 = [=](int a,int b) -> int {$/;\"\tfunction\tfunction:test\ttyperef:typename:int\tfile:\tsignature:(int a,int b) \tend:21\tcaptures:[=]\na\tinput.cpp\t/^\tauto l3 = [=](int a,int b) -> int {$/;\"\tparameter\tfunction:test::__anon4e7b1b580302\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^\tauto l3 = [=](int a,int b) -> int {$/;\"\tparameter\tfunction:test::__anon4e7b1b580302\ttyperef:typename:int\tfile:\n__anon4e7b1b580402\tinput.cpp\t/^\t\tauto l4 = [a,b](int c){ return a+b+c; };$/;\"\tfunction\tfunction:test::__anon4e7b1b580302\tfile:\tsignature:(int c)\tend:19\tcaptures:[a,b]\nc\tinput.cpp\t/^\t\tauto l4 = [a,b](int c){ return a+b+c; };$/;\"\tparameter\tfunction:test::__anon4e7b1b580302::__anon4e7b1b580402\ttyperef:typename:int\tfile:\nl4\tinput.cpp\t/^\t\tauto l4 = [a,b](int c){ return a+b+c; };$/;\"\tlocal\tfunction:test::__anon4e7b1b580302\ttyperef:typename:auto\tfile:\tend:19\nl3\tinput.cpp\t/^\tauto l3 = [=](int a,int b) -> int {$/;\"\tlocal\tfunction:test\ttyperef:typename:auto\tfile:\tend:21\n__anon4e7b1b580502\tinput.cpp\t/^\tauto l5 = [](X x,X) -> X { return X(); };$/;\"\tfunction\tfunction:test\ttyperef:typename:X\tfile:\tsignature:(X x,X) \tend:23\tcaptures:[]\nx\tinput.cpp\t/^\tauto l5 = [](X x,X) -> X { return X(); };$/;\"\tparameter\tfunction:test::__anon4e7b1b580502\ttyperef:typename:X\tfile:\n__anon4e7b1b58060d\tinput.cpp\t/^\tauto l5 = [](X x,X) -> X { return X(); };$/;\"\tparameter\tfunction:test::__anon4e7b1b580502\ttyperef:typename:X\tfile:\nl5\tinput.cpp\t/^\tauto l5 = [](X x,X) -> X { return X(); };$/;\"\tlocal\tfunction:test\ttyperef:typename:auto\tfile:\n__anon4e7b1b580702\tinput.cpp\t/^\t\t\t[l1,l2,l3](int a,int b) -> int {$/;\"\tfunction\tfunction:test\ttyperef:typename:int\tfile:\tsignature:(int a,int b) \tend:28\tcaptures:[l1,l2,l3]\na\tinput.cpp\t/^\t\t\t[l1,l2,l3](int a,int b) -> int {$/;\"\tparameter\tfunction:test::__anon4e7b1b580702\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^\t\t\t[l1,l2,l3](int a,int b) -> int {$/;\"\tparameter\tfunction:test::__anon4e7b1b580702\ttyperef:typename:int\tfile:\nv1\tinput.cpp\t/^\tint v1 = call($/;\"\tlocal\tfunction:test\ttyperef:typename:int\tfile:\tend:29\n__anon4e7b1b580802\tinput.cpp\t/^auto lg1 = [] { return 0; };$/;\"\tfunction\tfile:\tend:32\tcaptures:[] \nlg1\tinput.cpp\t/^auto lg1 = [] { return 0; };$/;\"\tvariable\ttyperef:typename:auto\tend:32\n__anon4e7b1b580902\tinput.cpp\t/^auto lg2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tfunction\tfile:\tsignature:(int a,int b) \tend:34\tcaptures:[]\na\tinput.cpp\t/^auto lg2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tparameter\tfunction:__anon4e7b1b580902\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^auto lg2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tparameter\tfunction:__anon4e7b1b580902\ttyperef:typename:int\tfile:\nlg2\tinput.cpp\t/^auto lg2 = [](int a,int b) { return a > b ? a : b; };$/;\"\tvariable\ttyperef:typename:auto\tend:34\n__anon4e7b1b580a02\tinput.cpp\t/^auto lg3 = [=](int a,int b) -> int {$/;\"\tfunction\ttyperef:typename:int\tfile:\tsignature:(int a,int b) \tend:39\tcaptures:[=]\na\tinput.cpp\t/^auto lg3 = [=](int a,int b) -> int {$/;\"\tparameter\tfunction:__anon4e7b1b580a02\ttyperef:typename:int\tfile:\nb\tinput.cpp\t/^auto lg3 = [=](int a,int b) -> int {$/;\"\tparameter\tfunction:__anon4e7b1b580a02\ttyperef:typename:int\tfile:\n__anon4e7b1b580b02\tinput.cpp\t/^\tauto lg4 = [a,b](int c){ return a+b+c; };$/;\"\tfunction\tfunction:__anon4e7b1b580a02\tfile:\tsignature:(int c)\tend:37\tcaptures:[a,b]\nc\tinput.cpp\t/^\tauto lg4 = [a,b](int c){ return a+b+c; };$/;\"\tparameter\tfunction:__anon4e7b1b580a02::__anon4e7b1b580b02\ttyperef:typename:int\tfile:\nlg4\tinput.cpp\t/^\tauto lg4 = [a,b](int c){ return a+b+c; };$/;\"\tlocal\tfunction:__anon4e7b1b580a02\ttyperef:typename:auto\tfile:\tend:37\nlg3\tinput.cpp\t/^auto lg3 = [=](int a,int b) -> int {$/;\"\tvariable\ttyperef:typename:auto\tend:39\n__anon4e7b1b580c02\tinput.cpp\t/^auto lg5 = [](X x,X) -> X { return X(); };$/;\"\tfunction\ttyperef:typename:X\tfile:\tsignature:(X x,X) \tend:41\tcaptures:[]\nx\tinput.cpp\t/^auto lg5 = [](X x,X) -> X { return X(); };$/;\"\tparameter\tfunction:__anon4e7b1b580c02\ttyperef:typename:X\tfile:\n__anon4e7b1b580d0d\tinput.cpp\t/^auto lg5 = [](X x,X) -> X { return X(); };$/;\"\tparameter\tfunction:__anon4e7b1b580c02\ttyperef:typename:X\tfile:\nlg5\tinput.cpp\t/^auto lg5 = [](X x,X) -> X { return X(); };$/;\"\tvariable\ttyperef:typename:auto\n" }, { "path": "Units/parser-cxx.r/cxx11-lambdas.d/input.cpp", "content": "// This code compiles with\n// gcc -std=c++11 input.cpp\n\ntemplate int call(T x)\n{\n}\n\ntemplate class X\n{\n};\n\nint test()\n{\n\tauto l1 = [] { return 0; };\n\n\tauto l2 = [](int a,int b) { return a > b ? a : b; };\n\n\tauto l3 = [=](int a,int b) -> int {\n\t\tauto l4 = [a,b](int c){ return a+b+c; };\n\t\treturn l4(5);\n\t};\n\t\n\tauto l5 = [](X x,X) -> X { return X(); };\n\n\tint v1 = call(\n\t\t\t[l1,l2,l3](int a,int b) -> int {\n\t\t\t\treturn l1() + l2(a,b) + l3(a,b);\n\t\t\t}\n\t);\n}\n\nauto lg1 = [] { return 0; };\n\nauto lg2 = [](int a,int b) { return a > b ? a : b; };\n\nauto lg3 = [=](int a,int b) -> int {\n\tauto lg4 = [a,b](int c){ return a+b+c; };\n\treturn lg4(5);\n};\n\nauto lg5 = [](X x,X) -> X { return X(); };\n" }, { "path": "Units/parser-cxx.r/cxx11-noexcept.d/args.ctags", "content": "--kinds-c++=+p\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/cxx11-noexcept.d/expected.tags", "content": "Base\tinput.cpp\t/^class Base$/;\"\tc\tfile:\nbar\tinput.cpp\t/^\tvirtual void bar() const noexcept = 0;$/;\"\tp\tclass:Base\ttyperef:typename:void\tfile:\tsignature:() const\nbaz\tinput.cpp\t/^\tint baz() noexcept { return 42; }$/;\"\tf\tclass:Base\ttyperef:typename:int\tfile:\tsignature:()\nfoo\tinput.cpp\t/^\tvirtual void foo() noexcept = 0;$/;\"\tp\tclass:Base\ttyperef:typename:void\tfile:\tsignature:()\n" }, { "path": "Units/parser-cxx.r/cxx11-noexcept.d/input.cpp", "content": "class Base\n{\npublic:\n\tvirtual void foo() noexcept = 0;\n\tvirtual void bar() const noexcept = 0;\n\tint baz() noexcept { return 42; }\n};\n" }, { "path": "Units/parser-cxx.r/cxx11-override.d/args.ctags", "content": "--kinds-c++=+p\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/cxx11-override.d/expected.tags", "content": "Base\tinput.cpp\t/^class Base$/;\"\tc\tfile:\nDerived\tinput.cpp\t/^class Derived : public Base$/;\"\tc\tfile:\nfoo\tinput.cpp\t/^\tvirtual void foo() = 0;$/;\"\tp\tclass:Base\ttyperef:typename:void\tfile:\tsignature:()\nfoo\tinput.cpp\t/^\tvirtual void foo() const override;$/;\"\tp\tclass:Derived\ttyperef:typename:void\tfile:\tsignature:() const\nfoo\tinput.cpp\t/^\tvirtual void foo() override;$/;\"\tp\tclass:Derived\ttyperef:typename:void\tfile:\tsignature:()\nfoo\tinput.cpp\t/^void Base::foo()$/;\"\tf\tclass:Base\ttyperef:typename:void\tsignature:()\nfoo\tinput.cpp\t/^void Derived::foo()$/;\"\tf\tclass:Derived\ttyperef:typename:void\tsignature:()\noverride\tinput.cpp\t/^\tvirtual void override();$/;\"\tp\tclass:Derived\ttyperef:typename:void\tfile:\tsignature:()\noverride\tinput.cpp\t/^void Derived::override()$/;\"\tf\tclass:Derived\ttyperef:typename:void\tsignature:()\n" }, { "path": "Units/parser-cxx.r/cxx11-override.d/input.cpp", "content": "class Base\n{\npublic:\n\tvirtual void foo() = 0;\n};\n\nclass Derived : public Base\n{\n\tvirtual void foo() override;\n\tvirtual void foo() const override;\n\tvirtual void override();\n};\n\nvoid Base::foo()\n{\n}\n\nvoid Derived::foo()\n{\n}\n\nvoid Derived::override()\n{\n}\n" }, { "path": "Units/parser-cxx.r/cxx11-raw-strings.d/expected.tags", "content": "FOUR\tinput.cpp\t/^#define FOUR /;\"\td\tfile:\nmemb1\tinput.cpp\t/^struct typ1 { int memb1; };$/;\"\tm\tstruct:typ1\ttyperef:typename:int\tfile:\nmemb2\tinput.cpp\t/^struct typ2 { int memb2; };$/;\"\tm\tstruct:typ2\ttyperef:typename:int\tfile:\nmemb3\tinput.cpp\t/^struct typ3 { int memb3; };$/;\"\tm\tstruct:typ3\ttyperef:typename:int\tfile:\nmemb4\tinput.cpp\t/^struct typ4 { int memb4; };$/;\"\tm\tstruct:typ4\ttyperef:typename:int\tfile:\nmemb5\tinput.cpp\t/^struct typ5 { int memb5; };$/;\"\tm\tstruct:typ5\ttyperef:typename:int\tfile:\nmemb6\tinput.cpp\t/^struct typ6 { int memb6; };$/;\"\tm\tstruct:typ6\ttyperef:typename:int\tfile:\nmemb7\tinput.cpp\t/^struct typ7 { int memb7; };$/;\"\tm\tstruct:typ7\ttyperef:typename:int\tfile:\nstr1\tinput.cpp\t/^static const char* str1 = R\"blah($/;\"\tv\ttyperef:typename:const char *\tfile:\nstr2\tinput.cpp\t/^static const char* str2 = R\"blah($/;\"\tv\ttyperef:typename:const char *\tfile:\nstr3\tinput.cpp\t/^static const char* str3 = FOUR\"f(iv)e\";$/;\"\tv\ttyperef:typename:const char *\tfile:\nstr4\tinput.cpp\t/^static const char* str4 = LR\"blah(\";int bug4;)blah\";$/;\"\tv\ttyperef:typename:const char *\tfile:\nstr5\tinput.cpp\t/^static const char* str5 = u8R\"blah(\";int bug5;)blah\";$/;\"\tv\ttyperef:typename:const char *\tfile:\nstr6\tinput.cpp\t/^static const char* str6 = uR\"blah(\";int bug6;)blah\";$/;\"\tv\ttyperef:typename:const char *\tfile:\nstr7\tinput.cpp\t/^static const char* str7 = UR\"blah(\";int bug7;)blah\";$/;\"\tv\ttyperef:typename:const char *\tfile:\ntyp1\tinput.cpp\t/^struct typ1 { int memb1; };$/;\"\ts\tfile:\ntyp2\tinput.cpp\t/^struct typ2 { int memb2; };$/;\"\ts\tfile:\ntyp3\tinput.cpp\t/^struct typ3 { int memb3; };$/;\"\ts\tfile:\ntyp4\tinput.cpp\t/^struct typ4 { int memb4; };$/;\"\ts\tfile:\ntyp5\tinput.cpp\t/^struct typ5 { int memb5; };$/;\"\ts\tfile:\ntyp6\tinput.cpp\t/^struct typ6 { int memb6; };$/;\"\ts\tfile:\ntyp7\tinput.cpp\t/^struct typ7 { int memb7; };$/;\"\ts\tfile:\n" }, { "path": "Units/parser-cxx.r/cxx11-raw-strings.d/input.cpp", "content": "\nstatic const char* str1 = R\"blah(\nlots\nof text\n)blah\";\n\nstruct typ1 { int memb1; };\n\nstatic const char* str2 = R\"blah(\nlots\nof text including a quote\"\n)blah\";\n\nstruct typ2 { int memb2; };\n\n/* check we don't get confused by string concatenation */\n#define FOUR \"four\"\n\nstatic const char* str3 = FOUR\"f(iv)e\";\n\nstruct typ3 { int memb3; };\n\n/* check for prefixes */\nstatic const char* str4 = LR\"blah(\";int bug4;)blah\";\nstruct typ4 { int memb4; };\n\nstatic const char* str5 = u8R\"blah(\";int bug5;)blah\";\nstruct typ5 { int memb5; };\n\nstatic const char* str6 = uR\"blah(\";int bug6;)blah\";\nstruct typ6 { int memb6; };\n\nstatic const char* str7 = UR\"blah(\";int bug7;)blah\";\nstruct typ7 { int memb7; };\n" }, { "path": "Units/parser-cxx.r/cxx11-user-defined-literals.d/expected.tags", "content": "operator \"\"_e\tinput.h\t/^float operator \"\"_e(const char*)$/;\"\tf\ttyperef:typename:float\noperator \"\"_print\tinput.h\t/^void operator\"\" _print ( const char* str )$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/cxx11-user-defined-literals.d/input.h", "content": "// Quoted from https://en.cppreference.com/w/cpp/language/user_literal:\n\n// used for side-effects\nvoid operator\"\" _print ( const char* str )\n{\n std::cout << str << '\\n';\n}\n\nfloat operator \"\"_e(const char*)\n{\n\treturn 0.0;\n}\n" }, { "path": "Units/parser-cxx.r/cxx11enum.cpp.d/args.ctags", "content": "--kinds-c++=*\n--sort=no\n--fields=+{end}\n--fields-c++=+{properties}\n--fields-c=+{properties}\n" }, { "path": "Units/parser-cxx.r/cxx11enum.cpp.d/expected.tags", "content": "a\tinput.cpp\t/^#define SOME_MACRO(a,b) 1$/;\"\tD\tmacro:SOME_MACRO\nb\tinput.cpp\t/^#define SOME_MACRO(a,b) 1$/;\"\tD\tmacro:SOME_MACRO\nSOME_MACRO\tinput.cpp\t/^#define SOME_MACRO(/;\"\td\tfile:\tend:2\nwhatever_t\tinput.cpp\t/^typedef int whatever_t;$/;\"\tt\ttyperef:typename:int\tfile:\nuint8_t\tinput.cpp\t/^typedef unsigned char uint8_t;$/;\"\tt\ttyperef:typename:unsigned char\tfile:\nE1\tinput.cpp\t/^enum E1 : int { E1_member1, E1_member2 };$/;\"\tg\ttyperef:typename:int\tfile:\tend:7\nE1_member1\tinput.cpp\t/^enum E1 : int { E1_member1, E1_member2 };$/;\"\te\tenum:E1\tfile:\nE1_member2\tinput.cpp\t/^enum E1 : int { E1_member1, E1_member2 };$/;\"\te\tenum:E1\tfile:\nE2\tinput.cpp\t/^enum E2 : long { E2_member1 };$/;\"\tg\ttyperef:typename:long\tfile:\tend:8\nE2_member1\tinput.cpp\t/^enum E2 : long { E2_member1 };$/;\"\te\tenum:E2\tfile:\nE3\tinput.cpp\t/^enum E3 : unsigned int { E3_member1 };$/;\"\tg\ttyperef:typename:unsigned int\tfile:\tend:9\nE3_member1\tinput.cpp\t/^enum E3 : unsigned int { E3_member1 };$/;\"\te\tenum:E3\tfile:\nE4\tinput.cpp\t/^enum E4 : unsigned long long int { } E4_var1, E4_var2;$/;\"\tg\ttyperef:typename:unsigned long long int\tfile:\tend:10\nE4_var1\tinput.cpp\t/^enum E4 : unsigned long long int { } E4_var1, E4_var2;$/;\"\tv\ttyperef:enum:E4\tend:10\nE4_var2\tinput.cpp\t/^enum E4 : unsigned long long int { } E4_var1, E4_var2;$/;\"\tv\ttyperef:enum:E4\tend:10\nE5\tinput.cpp\t/^enum E5 : whatever_t { E5_member1 } E5_var1;$/;\"\tg\ttyperef:typename:whatever_t\tfile:\tend:11\nE5_member1\tinput.cpp\t/^enum E5 : whatever_t { E5_member1 } E5_var1;$/;\"\te\tenum:E5\tfile:\nE5_var1\tinput.cpp\t/^enum E5 : whatever_t { E5_member1 } E5_var1;$/;\"\tv\ttyperef:enum:E5\tend:11\nEC1\tinput.cpp\t/^enum class EC1 { };$/;\"\tg\tfile:\tend:13\tproperties:scopedenum\nEC2\tinput.cpp\t/^enum class EC2 : short { EC2_member1, EC2_member2 };$/;\"\tg\ttyperef:typename:short\tfile:\tend:14\tproperties:scopedenum\nEC2_member1\tinput.cpp\t/^enum class EC2 : short { EC2_member1, EC2_member2 };$/;\"\te\tenum:EC2\tfile:\nEC2_member2\tinput.cpp\t/^enum class EC2 : short { EC2_member1, EC2_member2 };$/;\"\te\tenum:EC2\tfile:\nES1\tinput.cpp\t/^enum struct ES1 { };$/;\"\tg\tfile:\tend:16\tproperties:scopedenum\nES2\tinput.cpp\t/^enum struct ES2 : unsigned { ES2_member1, ES2_member2 };$/;\"\tg\ttyperef:typename:unsigned\tfile:\tend:17\tproperties:scopedenum\nES2_member1\tinput.cpp\t/^enum struct ES2 : unsigned { ES2_member1, ES2_member2 };$/;\"\te\tenum:ES2\tfile:\nES2_member2\tinput.cpp\t/^enum struct ES2 : unsigned { ES2_member1, ES2_member2 };$/;\"\te\tenum:ES2\tfile:\nES3\tinput.cpp\t/^enum struct ES3 : uint8_t { ES3_member1 = SOME_MACRO(1,whatever appears here), ES3_member2 };$/;\"\tg\ttyperef:typename:uint8_t\tfile:\tend:18\tproperties:scopedenum\nES3_member1\tinput.cpp\t/^enum struct ES3 : uint8_t { ES3_member1 = SOME_MACRO(1,whatever appears here), ES3_member2 };$/;\"\te\tenum:ES3\tfile:\nES3_member2\tinput.cpp\t/^enum struct ES3 : uint8_t { ES3_member1 = SOME_MACRO(1,whatever appears here), ES3_member2 };$/;\"\te\tenum:ES3\tfile:\nES4\tinput.cpp\t/^enum struct ES4 : unsigned long long int { ES4_member1 = (1234 * 10) << 1 };$/;\"\tg\ttyperef:typename:unsigned long long int\tfile:\tend:19\tproperties:scopedenum\nES4_member1\tinput.cpp\t/^enum struct ES4 : unsigned long long int { ES4_member1 = (1234 * 10) << 1 };$/;\"\te\tenum:ES4\tfile:\nES5\tinput.cpp\t/^enum struct ES5 : signed whatever_t { } ES4_var1[10];$/;\"\tg\ttyperef:typename:signed whatever_t\tfile:\tend:20\tproperties:scopedenum\nES4_var1\tinput.cpp\t/^enum struct ES5 : signed whatever_t { } ES4_var1[10];$/;\"\tv\ttyperef:enum:ES5[10]\tend:20\n__anon5f0fdc1d0103\tinput.cpp\t/^enum { Anon1_member1, Anon1_member2 };$/;\"\tg\tfile:\tend:22\nAnon1_member1\tinput.cpp\t/^enum { Anon1_member1, Anon1_member2 };$/;\"\te\tenum:__anon5f0fdc1d0103\tfile:\nAnon1_member2\tinput.cpp\t/^enum { Anon1_member1, Anon1_member2 };$/;\"\te\tenum:__anon5f0fdc1d0103\tfile:\n__anon5f0fdc1d0203\tinput.cpp\t/^enum : unsigned int { Anon2_member1 };$/;\"\tg\ttyperef:typename:unsigned int\tfile:\tend:23\nAnon2_member1\tinput.cpp\t/^enum : unsigned int { Anon2_member1 };$/;\"\te\tenum:__anon5f0fdc1d0203\tfile:\n__anon5f0fdc1d0303\tinput.cpp\t/^enum : whatever_t { Anon3_member1 };$/;\"\tg\ttyperef:typename:whatever_t\tfile:\tend:24\nAnon3_member1\tinput.cpp\t/^enum : whatever_t { Anon3_member1 };$/;\"\te\tenum:__anon5f0fdc1d0303\tfile:\nClass\tinput.cpp\t/^class Class$/;\"\tc\tfile:\tend:32\nCE1\tinput.cpp\t/^\tenum CE1 : int { CE1_member1 = 10, CE1_member2 = (CE1_member1 << 10) };$/;\"\tg\tclass:Class\ttyperef:typename:int\tfile:\tend:28\nCE1_member1\tinput.cpp\t/^\tenum CE1 : int { CE1_member1 = 10, CE1_member2 = (CE1_member1 << 10) };$/;\"\te\tenum:Class::CE1\tfile:\nCE1_member2\tinput.cpp\t/^\tenum CE1 : int { CE1_member1 = 10, CE1_member2 = (CE1_member1 << 10) };$/;\"\te\tenum:Class::CE1\tfile:\nCEC1\tinput.cpp\t/^\tenum class CEC1 : unsigned long int { CEC1_member1 };$/;\"\tg\tclass:Class\ttyperef:typename:unsigned long int\tfile:\tend:29\tproperties:scopedenum\nCEC1_member1\tinput.cpp\t/^\tenum class CEC1 : unsigned long int { CEC1_member1 };$/;\"\te\tenum:Class::CEC1\tfile:\nCES1\tinput.cpp\t/^\tenum struct CES1 : int { CES1_member1 };$/;\"\tg\tclass:Class\ttyperef:typename:int\tfile:\tend:30\tproperties:scopedenum\nCES1_member1\tinput.cpp\t/^\tenum struct CES1 : int { CES1_member1 };$/;\"\te\tenum:Class::CES1\tfile:\nFunction1\tinput.cpp\t/^\tvirtual enum CEC1 Function1(enum CE1 parameter);$/;\"\tp\tclass:Class\ttyperef:enum:CEC1\tfile:\tend:31\tproperties:virtual\nparameter\tinput.cpp\t/^\tvirtual enum CEC1 Function1(enum CE1 parameter);$/;\"\tz\tprototype:Class::Function1\ttyperef:enum:CE1\tfile:\nE1_var1\tinput.cpp\t/^enum E1 E1_var1;$/;\"\tv\ttyperef:enum:E1\tend:41\nEC1_var1\tinput.cpp\t/^enum EC1 EC1_var1[10][10];$/;\"\tv\ttyperef:enum:EC1[10][10]\tend:42\n" }, { "path": "Units/parser-cxx.r/cxx11enum.cpp.d/input.cpp", "content": "\n#define SOME_MACRO(a,b) 1\n\ntypedef int whatever_t;\ntypedef unsigned char uint8_t;\n\nenum E1 : int { E1_member1, E1_member2 };\nenum E2 : long { E2_member1 };\nenum E3 : unsigned int { E3_member1 };\nenum E4 : unsigned long long int { } E4_var1, E4_var2;\nenum E5 : whatever_t { E5_member1 } E5_var1;\n\nenum class EC1 { };\nenum class EC2 : short { EC2_member1, EC2_member2 };\n\nenum struct ES1 { };\nenum struct ES2 : unsigned { ES2_member1, ES2_member2 };\nenum struct ES3 : uint8_t { ES3_member1 = SOME_MACRO(1,whatever appears here), ES3_member2 };\nenum struct ES4 : unsigned long long int { ES4_member1 = (1234 * 10) << 1 };\nenum struct ES5 : signed whatever_t { } ES4_var1[10];\n\nenum { Anon1_member1, Anon1_member2 };\nenum : unsigned int { Anon2_member1 };\nenum : whatever_t { Anon3_member1 };\n\nclass Class\n{\n\tenum CE1 : int { CE1_member1 = 10, CE1_member2 = (CE1_member1 << 10) };\n\tenum class CEC1 : unsigned long int { CEC1_member1 };\n\tenum struct CES1 : int { CES1_member1 };\n\tvirtual enum CEC1 Function1(enum CE1 parameter);\n};\n\n// Forward declarations: we ignore them.\nenum F1 : whatever_t;\nenum class F2;\nenum class F3 : whatever_t;\nenum struct F4 : unsigned int;\n\n// variable declarations\nenum E1 E1_var1;\nenum EC1 EC1_var1[10][10];\n//enum class EC2 EC2_var1; <-- this is NOT valid C++11\n\n\n\n" }, { "path": "Units/parser-cxx.r/cxx14-combined.d/args.ctags", "content": "--kinds-c++=+p\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/cxx14-combined.d/expected.tags", "content": "Base\tinput.cpp\t/^struct Base {$/;\"\ts\tfile:\nFoo\tinput.cpp\t/^struct Foo final : public Base {$/;\"\ts\tfile:\nbar\tinput.cpp\t/^ static constexpr auto bar() noexcept { return 1; }$/;\"\tf\tstruct:Foo\ttyperef:typename:auto\tfile:\tsignature:()\nbaz\tinput.cpp\t/^ virtual void baz() const throw() = 0;$/;\"\tp\tstruct:Base\ttyperef:typename:void\tfile:\tsignature:() const\nbaz\tinput.cpp\t/^ virtual void baz() const throw() final override;$/;\"\tp\tstruct:Foo\ttyperef:typename:void\tfile:\tsignature:() const\n" }, { "path": "Units/parser-cxx.r/cxx14-combined.d/input.cpp", "content": "struct Base {\n virtual void baz() const throw() = 0;\n};\n\nstruct Foo final : public Base {\n static constexpr auto bar() noexcept { return 1; }\n virtual void baz() const throw() final override;\n};\n" }, { "path": "Units/parser-cxx.r/cxx14-digit-separator.d/args.ctags", "content": "--kinds-c++=+l" }, { "path": "Units/parser-cxx.r/cxx14-digit-separator.d/expected.tags", "content": "X\tinput.cpp\t/^class X$/;\"\tc\tfile:\na1\tinput.cpp\t/^long a1=1'048'576;$/;\"\tv\ttyperef:typename:long\na2\tinput.cpp\t/^long a2=0x10'0000;$/;\"\tv\ttyperef:typename:long\na3\tinput.cpp\t/^long a3=00'04'00'00'00;$/;\"\tv\ttyperef:typename:long\na4\tinput.cpp\t/^long a4=0b100'000000'000000'000000;$/;\"\tv\ttyperef:typename:long\nb1\tinput.cpp\t/^\tlong b1=1'048'576;$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nb2\tinput.cpp\t/^\tlong b2=0x10'0000;$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nb3\tinput.cpp\t/^\tlong b3=00'04'00'00'00;$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nb4\tinput.cpp\t/^\tlong b4=0b100'000000'000000'000000;$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nc1\tinput.cpp\t/^\tlong c1 = 'a';$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nc2\tinput.cpp\t/^\tlong c2 = 'a';$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nc3\tinput.cpp\t/^\tlong c3 = 'a';$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nc4\tinput.cpp\t/^\tlong c4 = 'a';$/;\"\tl\tfunction:test\ttyperef:typename:long\tfile:\nm1\tinput.cpp\t/^\tlong m1=1'048'576;$/;\"\tm\tclass:X\ttyperef:typename:long\tfile:\nm2\tinput.cpp\t/^\tlong m2=0x10'0000;$/;\"\tm\tclass:X\ttyperef:typename:long\tfile:\nm3\tinput.cpp\t/^\tlong m3=00'04'00'00'00;$/;\"\tm\tclass:X\ttyperef:typename:long\tfile:\nm4\tinput.cpp\t/^\tlong m4=0b100'000000'000000'000000;$/;\"\tm\tclass:X\ttyperef:typename:long\tfile:\ntest\tinput.cpp\t/^void test()$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/cxx14-digit-separator.d/input.cpp", "content": "long a1=1'048'576;\nlong a2=0x10'0000;\nlong a3=00'04'00'00'00;\nlong a4=0b100'000000'000000'000000;\n\nvoid test()\n{\n\tcall(1'048'576);\n\tcall(1'048'576,0x10'0000,'a',00'04'00'00'00);\n\n\tlong b1=1'048'576;\n\tlong c1 = 'a';\n\tlong b2=0x10'0000;\n\tlong c2 = 'a';\n\tlong b3=00'04'00'00'00;\n\tlong c3 = 'a';\n\tlong b4=0b100'000000'000000'000000;\n\tlong c4 = 'a';\n}\n\nclass X\n{\npublic:\n\tlong m1=1'048'576;\n\tlong m2=0x10'0000;\n\tlong m3=00'04'00'00'00;\n\tlong m4=0b100'000000'000000'000000;\n};\n" }, { "path": "Units/parser-cxx.r/digraph-and-template-angle-confliction.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/digraph-and-template-angle-confliction.d/expected.tags", "content": "std\tinput.hh\t/^namespace std {$/;\"\tn\nhash\tinput.hh\t/^ struct hash<::sockaddr_in> {$/;\"\ts\tnamespace:std\na\tinput.hh\t/^ int a;$/;\"\tm\tstruct:std::hash\ttyperef:typename:int\nA\tinput.hh\t/^int A <::> = {1, 2};$/;\"\tv\ttyperef:typename:int[]\nB\tinput.hh\t/^int B <:2:> = {1, 2};$/;\"\tv\ttyperef:typename:int[2]\nN\tinput.hh\t/^#define N /;\"\td\nC\tinput.hh\t/^int C <:N:> = {1, 2};$/;\"\tv\ttyperef:typename:int[]\nD\tinput.hh\t/^int D [] = {1, 2};$/;\"\tv\ttyperef:typename:int[]\nM\tinput.hh\t/^const int M = 3;$/;\"\tv\ttyperef:typename:const int\nE\tinput.hh\t/^int E <:::M:> = {1, 2};$/;\"\tv\ttyperef:typename:int[]\nfoo\tinput.hh\t/^int foo (void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/digraph-and-template-angle-confliction.d/input.hh", "content": "#include \n#include \n\nnamespace std {\n template <>\n struct hash<::sockaddr_in> {\n int a;\n };\n};\n\nint A <::> = {1, 2};\nint B <:2:> = {1, 2};\n#define N 2\nint C <:N:> = {1, 2};\nint D [] = {1, 2};\n\nconst int M = 3;\nint E <:::M:> = {1, 2};\n\nint foo (void)\n{\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/end-field-for-prototype-kind.d/args.ctags", "content": "--fields=+ne\n--kinds-C++=p\n" }, { "path": "Units/parser-cxx.r/end-field-for-prototype-kind.d/expected.tags", "content": "main\tinput.h\t/^main$/;\"\tp\tline:2\ttyperef:typename:int\tend:11\n" }, { "path": "Units/parser-cxx.r/end-field-for-prototype-kind.d/input.h", "content": "int\nmain\n(\n\tint\n\targc\n\t,\n\tchar\n\t*\n\t*\n\targv\n\t);\n" }, { "path": "Units/parser-cxx.r/enum-in-a-struct--with-q-extra.d/README", "content": "S::T::E::alpha and S::T::E::beta are not included intentionally\nTaken from the comments of cxx_tag.c::\n\n\t// If the scope kind is enumeration then we need to remove the\n\t// last scope part. This is what old ctags did.\n\n" }, { "path": "Units/parser-cxx.r/enum-in-a-struct--with-q-extra.d/args.ctags", "content": "--sort=no\n--extra=+q\n" }, { "path": "Units/parser-cxx.r/enum-in-a-struct--with-q-extra.d/expected.tags", "content": "S\tinput.cc\t/^namespace S {$/;\"\tn\tfile:\nT\tinput.cc\t/^ struct T {$/;\"\ts\tnamespace:S\tfile:\nS::T\tinput.cc\t/^ struct T {$/;\"\ts\tnamespace:S\tfile:\nE\tinput.cc\t/^ enum E {$/;\"\tg\tstruct:S::T\tfile:\nS::T::E\tinput.cc\t/^ enum E {$/;\"\tg\tstruct:S::T\tfile:\nalpha\tinput.cc\t/^ alpha, beta,$/;\"\te\tenum:S::T::E\tfile:\nS::T::alpha\tinput.cc\t/^ alpha, beta,$/;\"\te\tenum:S::T::E\tfile:\nbeta\tinput.cc\t/^ alpha, beta,$/;\"\te\tenum:S::T::E\tfile:\nS::T::beta\tinput.cc\t/^ alpha, beta,$/;\"\te\tenum:S::T::E\tfile:\nelt\tinput.cc\t/^ } elt;$/;\"\tm\tstruct:S::T\ttyperef:enum:S::T::E\tfile:\nS::T::elt\tinput.cc\t/^ } elt;$/;\"\tm\tstruct:S::T\ttyperef:enum:S::T::E\tfile:\ns\tinput.cc\t/^struct S::T s = { .elt = S::T::E::alpha };$/;\"\tv\ttyperef:struct:S::T\n" }, { "path": "Units/parser-cxx.r/enum-in-a-struct--with-q-extra.d/input.cc", "content": "namespace S {\n struct T {\n enum E {\n alpha, beta,\n } elt;\n };\n}\n\nstruct S::T s = { .elt = S::T::E::alpha };\n" }, { "path": "Units/parser-cxx.r/export-2.d/README.md", "content": "The test case testing parts of the syntax (2) in https://en.cppreference.com/w/cpp/language/modules.\n\n\texport declaration (2)\n" }, { "path": "Units/parser-cxx.r/export-2.d/args.ctags", "content": "--sort=no\n--fields-C++=+{properties}\n" }, { "path": "Units/parser-cxx.r/export-2.d/expected.tags", "content": "A\tinput.cpp\t/^export module A; \\/\\/ declares the primary module interface unit for named module 'A'$/;\"\tM\tproperties:export\nhello\tinput.cpp\t/^export char const* hello() { return \"hello\"; }$/;\"\tf\ttyperef:typename:char const *\tproperties:export\nworld\tinput.cpp\t/^char const* world() { return \"world\"; }$/;\"\tf\ttyperef:typename:char const *\nhi\tinput.cpp\t/^export namespace hi$/;\"\tn\tproperties:export\nenglish\tinput.cpp\t/^ char const* english() { return \"Hi!\"; }$/;\"\tf\tnamespace:hi\ttyperef:typename:char const *\nfrench\tinput.cpp\t/^ char const* french() { return \"Salut!\"; }$/;\"\tf\tnamespace:hi\ttyperef:typename:char const *\nx\tinput.cpp\t/^export enum x { a = 1 };$/;\"\tg\tproperties:export\na\tinput.cpp\t/^export enum x { a = 1 };$/;\"\te\tenum:x\ntd\tinput.cpp\t/^export typedef int td;$/;\"\tt\ttyperef:typename:int\tproperties:export\ns_\tinput.cpp\t/^struct s_ {$/;\"\ts\tfile:\nmbr\tinput.cpp\t/^ int mbr;$/;\"\tm\tstruct:s_\ttyperef:typename:int\tfile:\ns\tinput.cpp\t/^export struct s {$/;\"\ts\tproperties:export\nmbr\tinput.cpp\t/^ int mbr;$/;\"\tm\tstruct:s\ttyperef:typename:int\ns__\tinput.cpp\t/^struct s__ {$/;\"\ts\tfile:\nmbr\tinput.cpp\t/^ int mbr;$/;\"\tm\tstruct:s__\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/export-2.d/input.cpp", "content": "// Taken from https://en.cppreference.com/w/cpp/language/modules\n\nexport module A; // declares the primary module interface unit for named module 'A'\n\n// hello() will be visible by translations units importing 'A'\nexport char const* hello() { return \"hello\"; }\n\n// world() will NOT be visible.\nchar const* world() { return \"world\"; }\n\nexport namespace hi\n{\n char const* english() { return \"Hi!\"; }\n char const* french() { return \"Salut!\"; }\n}\n\nexport enum x { a = 1 };\n\nexport typedef int td;\n\nstruct s_ {\n int mbr;\n};\n\nexport struct s {\n int mbr;\n};\n\nstruct s__ {\n int mbr;\n};\n" }, { "path": "Units/parser-cxx.r/export-2.d/validator", "content": "cxx20+module\n\n" }, { "path": "Units/parser-cxx.r/export-3.d/README.md", "content": "The test case testing parts of the syntax (3) in https://en.cppreference.com/w/cpp/language/modules.\n\n\texport { declaration-seq(optional) } (3)\n" }, { "path": "Units/parser-cxx.r/export-3.d/args.ctags", "content": "--sort=no\n--fields-C++=+{properties}\n--kinds-C++=+p\n" }, { "path": "Units/parser-cxx.r/export-3.d/expected.tags", "content": "Y\tinput.cpp\t/^export module Y;$/;\"\tM\tproperties:export\nZ0\tinput.cpp\t/^ namespace Z0 {$/;\"\tn\tproperties:export\nz0\tinput.cpp\t/^ int z0;$/;\"\tv\tnamespace:Z0\ttyperef:typename:int\nX\tinput.cpp\t/^namespace X {$/;\"\tn\tfile:\na\tinput.cpp\t/^ int a;$/;\"\tv\tnamespace:X\ttyperef:typename:int\nx\tinput.cpp\t/^ int x;$/;\"\tv\tnamespace:X\ttyperef:typename:int\tproperties:export\nf\tinput.cpp\t/^ int f(int i);$/;\"\tp\tnamespace:X\ttyperef:typename:int\tproperties:export\nu\tinput.cpp\t/^ union u {$/;\"\tu\tnamespace:X\tproperties:export\nmbr\tinput.cpp\t/^ int mbr;$/;\"\tm\tunion:X::u\ttyperef:typename:int\nb\tinput.cpp\t/^ int b;$/;\"\tv\tnamespace:X\ttyperef:typename:int\nm\tinput.cpp\t/^int m;$/;\"\tv\ttyperef:typename:int\nz\tinput.cpp\t/^ int z;$/;\"\tv\ttyperef:typename:int\tproperties:export\nE\tinput.cpp\t/^ enum E { a = 1 };$/;\"\tg\tproperties:export\na\tinput.cpp\t/^ enum E { a = 1 };$/;\"\te\tenum:E\ntd\tinput.cpp\t/^ typedef int td;$/;\"\tt\ttyperef:typename:int\tproperties:export\nc\tinput.cpp\t/^ class c {$/;\"\tc\tproperties:export\nmbr\tinput.cpp\t/^ int mbr;$/;\"\tm\tclass:c\ttyperef:typename:int\nn\tinput.cpp\t/^int n;$/;\"\tv\ttyperef:typename:int\no\tinput.cpp\t/^static int o;$/;\"\tv\ttyperef:typename:int\tfile:\tproperties:static\n" }, { "path": "Units/parser-cxx.r/export-3.d/input.cpp", "content": "export module Y;\n\nexport {\n namespace Z0 {\n int z0;\n };\n}\n\nnamespace X {\n int a;\n export {\n int x;\n int f(int i);\n union u {\n int mbr;\n };\n\n }\n int b;\n};\n\n\nint m;\nexport {\n int z;\n enum E { a = 1 };\n typedef int td;\n class c {\n int mbr;\n };\n}\nint n;\nstatic int o;\n" }, { "path": "Units/parser-cxx.r/export-3.d/validator", "content": "cxx20+module\n\n" }, { "path": "Units/parser-cxx.r/export-namespace-alias.d/args.ctags", "content": "--sort=no\n--fields-C++=+{properties}\n--fields=+K\n--kinds-C++=+{alias}\n" }, { "path": "Units/parser-cxx.r/export-namespace-alias.d/expected.tags", "content": "mylib\tinput.cpp\t/^export module mylib;$/;\"\tmodule\tproperties:export\nX\tinput.cpp\t/^export namespace X {$/;\"\tnamespace\tproperties:export\ni\tinput.cpp\t/^\t int i;$/;\"\tvariable\tnamespace:X\ttyperef:typename:int\nZ\tinput.cpp\t/^export namespace Z = X;$/;\"\talias\tproperties:export\tname:X\n" }, { "path": "Units/parser-cxx.r/export-namespace-alias.d/input.cpp", "content": "export module mylib;\n\nexport namespace X {\n\t int i;\n}\n\nexport namespace Z = X;\n" }, { "path": "Units/parser-cxx.r/export-namespace-alias.d/validator", "content": "cxx20+module\n" }, { "path": "Units/parser-cxx.r/export-using.d/args.ctags", "content": "--sort=no\n--fields=+K\n--kinds-C++=+MtNp\n--fields-C++=+{properties}\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-cxx.r/export-using.d/expected.tags", "content": "Delta\tinput.cpp\t/^export module Delta;$/;\"\tmodule\troles:def\tproperties:export\nParam\tinput.cpp\t/^export using Param = int;$/;\"\ttypedef\ttyperef:typename:int\troles:def\tproperties:export\nParam\tinput.cpp\t/^export using ::Param;$/;\"\tname\troles:def\tproperties:export\nParam\tinput.cpp\t/^export using ::Param;\t\t\\/\\/ We can declare an object more than twice.$/;\"\tname\troles:def\tproperties:export\nfn\tinput.cpp\t/^export void fn();$/;\"\tprototype\ttyperef:typename:void\troles:def\tproperties:export\n" }, { "path": "Units/parser-cxx.r/export-using.d/input.cpp", "content": "// Derived from https://github.com/universal-ctags/ctags/issues/4003 submitted by @adrianconstantin-leroy.\nexport module Delta;\n\nexport using Param = int;\nexport using ::Param;\nexport using ::Param;\t\t// We can declare an object more than twice.\nexport void fn();\n" }, { "path": "Units/parser-cxx.r/export-using.d/validator", "content": "cxx20+module\n" }, { "path": "Units/parser-cxx.r/extern.d/args.ctags", "content": "--kinds-c++=+px\n--fields-c++=+{properties}" }, { "path": "Units/parser-cxx.r/extern.d/expected.tags", "content": "f\tinput.cpp\t/^extern \"C\" void f(void);$/;\"\tp\ttyperef:typename:void\tfile:\tproperties:extern\ng\tinput.cpp\t/^extern \"C\" void g(void) {}$/;\"\tf\ttyperef:typename:void\tproperties:extern\nh\tinput.cpp\t/^ void h(void);$/;\"\tp\ttyperef:typename:void\tfile:\ni\tinput.cpp\t/^ int i;$/;\"\tv\ttyperef:typename:int\nj\tinput.cpp\t/^ extern int j;$/;\"\tx\ttyperef:typename:int\tproperties:extern\n" }, { "path": "Units/parser-cxx.r/extern.d/input.cpp", "content": "// This was initially reported as bug 931@github reported by Corax26 on\n// 12/05/2016: the extern \"C\" declarations were missing from the ctags output.\n//\n// Additionally this test checks the +{c.properties} field for the \"extern\"\n// property being properly set.\n\nextern \"C\" void f(void);\nextern \"C\" void g(void) {}\n\nextern \"C\"\n{\n // Please note that h() and i have internal linkage (but their name\n // mangling is C-style). h() is just a prototype while i is both\n // a declaration AND a definition of variable.\n void h(void);\n int i;\n\n // j has external linkage (declaration only).\n extern int j;\n}\n" }, { "path": "Units/parser-cxx.r/field-nth.d/args.ctags", "content": "--sort=no\n--fields=+oS\n--kinds-C++=+DzZ\n--fields-C++={template}\n" }, { "path": "Units/parser-cxx.r/field-nth.d/expected.tags", "content": "f\tinput.h\t/^inline void f(int x, int y) {}$/;\"\tf\ttyperef:typename:void\tsignature:(int x,int y)\nx\tinput.h\t/^inline void f(int x, int y) {}$/;\"\tz\tfunction:f\ttyperef:typename:int\tfile:\tnth:0\ny\tinput.h\t/^inline void f(int x, int y) {}$/;\"\tz\tfunction:f\ttyperef:typename:int\tfile:\tnth:1\nX\tinput.h\t/^#define F(X,Y) (X+Y)$/;\"\tD\tmacro:F\tnth:0\nY\tinput.h\t/^#define F(X,Y) (X+Y)$/;\"\tD\tmacro:F\tnth:1\nF\tinput.h\t/^#define F(/;\"\td\tsignature:(X,Y)\nC\tinput.h\t/^class C {};$/;\"\tc\ttemplate:\nT1\tinput.h\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\tnth:0\nT2\tinput.h\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\tnth:1\nI\tinput.h\t/^template$/;\"\tZ\tclass:C\ttyperef:typename:int\tnth:2\nD\tinput.h\t/^class D {$/;\"\tc\ni\tinput.h\t/^\tint i, j;$/;\"\tm\tclass:D\ttyperef:typename:int\tnth:0\nj\tinput.h\t/^\tint i, j;$/;\"\tm\tclass:D\ttyperef:typename:int\tnth:1\nc\tinput.h\t/^\tchar c;$/;\"\tm\tclass:D\ttyperef:typename:char\tnth:2\ncolor\tinput.h\t/^enum color {$/;\"\tg\nred\tinput.h\t/^\tred, green, blue,$/;\"\te\tenum:color\tnth:0\ngreen\tinput.h\t/^\tred, green, blue,$/;\"\te\tenum:color\tnth:1\nblue\tinput.h\t/^\tred, green, blue,$/;\"\te\tenum:color\tnth:2\n" }, { "path": "Units/parser-cxx.r/field-nth.d/input.h", "content": "inline void f(int x, int y) {}\n#define F(X,Y) (X+Y)\n\ntemplate\nclass C {};\n\nclass D {\n\tint i, j;\n\tchar c;\n};\n\nenum color {\n\tred, green, blue,\n};\n" }, { "path": "Units/parser-cxx.r/foreach.d/args.ctags", "content": "--kinds-c++=+pxl\n-D foreach(arg1,...)=for(arg1;;)\n" }, { "path": "Units/parser-cxx.r/foreach.d/expected.tags", "content": "a\tinput.cpp\t/^int a,b;$/;\"\tv\ttyperef:typename:int\nb\tinput.cpp\t/^int a,b;$/;\"\tv\ttyperef:typename:int\nforeach\tinput.cpp\t/^#define foreach(/;\"\td\tfile:\nmain\tinput.cpp\t/^int main(int,char **)$/;\"\tf\ttyperef:typename:int\np\tinput.cpp\t/^\tforeach(char * p,pointers)$/;\"\tl\tfunction:main\ttyperef:typename:char *\tfile:\npointers\tinput.cpp\t/^char * pointers[10];$/;\"\tv\ttyperef:typename:char * [10]\n" }, { "path": "Units/parser-cxx.r/foreach.d/input.cpp", "content": "\n// In real world this would have a (rather complex) implementation.\n// See Q_FOREACH() and foreach() macros in Qt as example.\n#define foreach(_a,_b)\n\nchar * pointers[10];\nint a,b;\n\nint main(int,char **)\n{\n\t\n\t//...\n\t\n\t// p is declared inside foreach() parenthesis.\n\t// pointers is NOT declared here\n\tforeach(char * p,pointers)\n\t{\n\n\t}\n\n\t// This is not a variable declaration.\n\tif(a * b)\n\t{\n\t}\n\n\treturn 0;\n}\n" }, { "path": "Units/parser-cxx.r/func-name-in-parentheses.d/args.ctags", "content": "--sort=no\n--kinds-C=+p\n--kinds-C++=+p\n--fields=+KzS\n" }, { "path": "Units/parser-cxx.r/func-name-in-parentheses.d/expected.tags", "content": "gboolean\tinput.c\t/^typedef boolean gboolean;$/;\"\tkind:typedef\ttyperef:typename:boolean\tfile:\ngchar\tinput.c\t/^typedef char gchar;$/;\"\tkind:typedef\ttyperef:typename:char\tfile:\ng_str_has_prefix\tinput.c\t/^gboolean (g_str_has_prefix) (const gchar *str,$/;\"\tkind:prototype\ttyperef:typename:gboolean\tfile:\tsignature:(const gchar * str,const gchar * prefix)\nI\tinput.c\t/^typedef int I;$/;\"\tkind:typedef\ttyperef:typename:int\tfile:\nfp\tinput.c\t/^I (fp) (void);$/;\"\tkind:prototype\ttyperef:typename:I\tfile:\tsignature:(void)\nfi\tinput.c\t/^I (fi) (void) { return 0; }$/;\"\tkind:function\ttyperef:typename:I\tsignature:(void)\ngp\tinput.c\t/^I* (gp) (void);$/;\"\tkind:prototype\ttyperef:typename:I *\tfile:\tsignature:(void)\ngi\tinput.c\t/^I* (gi) (void) { return NULL; }$/;\"\tkind:function\ttyperef:typename:I *\tsignature:(void)\nPoint\tinput-0.cpp\t/^class Point {$/;\"\tkind:class\tfile:\nx\tinput-0.cpp\t/^ double x, y;$/;\"\tkind:member\tclass:Point\ttyperef:typename:double\tfile:\ny\tinput-0.cpp\t/^ double x, y;$/;\"\tkind:member\tclass:Point\ttyperef:typename:double\tfile:\nmyns\tinput-0.cpp\t/^namespace myns {$/;\"\tkind:namespace\tfile:\ng\tinput-0.cpp\t/^ class Point * (g)();$/;\"\tkind:prototype\tnamespace:myns\ttyperef:class:Point *\tfile:\tsignature:()\nmysubns\tinput-0.cpp\t/^ namespace mysubns {$/;\"\tkind:namespace\tnamespace:myns\tfile:\nh\tinput-0.cpp\t/^ class Point * ((h))();$/;\"\tkind:prototype\tnamespace:myns::mysubns\ttyperef:class:Point *\tfile:\tsignature:()\nf\tinput-0.cpp\t/^class Point * (f)() {$/;\"\tkind:function\ttyperef:class:Point *\tsignature:()\n" }, { "path": "Units/parser-cxx.r/func-name-in-parentheses.d/input-0.cpp", "content": "class Point {\n double x, y;\n};\n\nnamespace myns {\n class Point * (g)();\n namespace mysubns {\n class Point * ((h))();\n };\n};\n\nclass Point * (f)() {\n return nullptr;\n}\n" }, { "path": "Units/parser-cxx.r/func-name-in-parentheses.d/input.c", "content": "typedef boolean gboolean;\ntypedef char gchar;\n\ngboolean (g_str_has_prefix) (const gchar *str,\n const gchar *prefix);\ntypedef int I;\n\nI (fp) (void);\nI (fi) (void) { return 0; }\nI* (gp) (void);\nI* (gi) (void) { return NULL; }\n" }, { "path": "Units/parser-cxx.r/function-return-type-via-macro.d/args.ctags", "content": "--sort=no\n--kinds-C++=fpvx\n--fields=+s\n" }, { "path": "Units/parser-cxx.r/function-return-type-via-macro.d/expected.tags", "content": "PL_ClearArenaPool\tinput.cpp\t/^PR_EXTERN(void) PL_ClearArenaPool(PLArenaPool *pool, PRInt32 pattern);$/;\"\tp\ttyperef:typename:void\tfile:\ndeflateBound\tinput.cpp\t/^GIT_INLINE(size_t) deflateBound(z_streamp stream, size_t s)$/;\"\tf\ttyperef:typename:size_t\nap_os_create_privileged_process\tinput.cpp\t/^AP_DECLARE(apr_status_t) ap_os_create_privileged_process($/;\"\tp\ttyperef:typename:apr_status_t\tfile:\nhandleError\tinput.cpp\t/^LOCAL(struct errRecord *) handleError(z_streamp stream, size_t s) MAY_EXIT$/;\"\tf\ttyperef:struct:errRecord *\n" }, { "path": "Units/parser-cxx.r/function-return-type-via-macro.d/input.cpp", "content": "// Various bugs reported by Ivc.\n\nPR_EXTERN(void) PL_ClearArenaPool(PLArenaPool *pool, PRInt32 pattern);\n\nGIT_INLINE(size_t) deflateBound(z_streamp stream, size_t s)\n{\n\treturn (s + ((s + 7) >> 3) + ((s + 63) >> 6) + 11);\n}\n\nAP_DECLARE(apr_status_t) ap_os_create_privileged_process(\n\tconst request_rec *r,\n\tapr_proc_t *newproc,\n\tconst char *progname,\n\tconst char * const *args,\n\tconst char * const *env,\n\tapr_procattr_t *attr,\n\tapr_pool_t *p);\n\t\nLOCAL(struct errRecord *) handleError(z_streamp stream, size_t s) MAY_EXIT\n{\n\tif (size == 0)\n\t\texit (1);\n\treturn ERR_REC;\n}\n\n" }, { "path": "Units/parser-cxx.r/function-return-types.d/args.ctags", "content": "--sort=no\n--kinds-C++=fpm\n--fields=+te\n--fields-c++=+{template}\n" }, { "path": "Units/parser-cxx.r/function-return-types.d/expected.tags", "content": "p00\tinput.cpp\t/^void p00();$/;\"\tp\ttyperef:typename:void\tfile:\tend:20\np01\tinput.cpp\t/^int p01();$/;\"\tp\ttyperef:typename:int\tfile:\tend:21\np02\tinput.cpp\t/^unsigned int p02();$/;\"\tp\ttyperef:typename:unsigned int\tfile:\tend:22\np03\tinput.cpp\t/^auto p03() -> int;$/;\"\tp\ttyperef:typename:int\tfile:\tend:23\np04\tinput.cpp\t/^int * p04();$/;\"\tp\ttyperef:typename:int *\tfile:\tend:24\np05\tinput.cpp\t/^const unsigned long long int & p05();$/;\"\tp\ttyperef:typename:const unsigned long long int &\tfile:\tend:25\np06\tinput.cpp\t/^static inline int * p06();$/;\"\tp\ttyperef:typename:int *\tfile:\tend:26\np07\tinput.cpp\t/^std::string & p07();$/;\"\tp\ttyperef:typename:std::string &\tfile:\tend:27\np08\tinput.cpp\t/^std::vector * p08();$/;\"\tp\ttyperef:typename:std::vector *\tfile:\tend:28\np09\tinput.cpp\t/^auto p09() -> std::vector ***;$/;\"\tp\ttyperef:typename:std::vector ***\tfile:\tend:29\np10\tinput.cpp\t/^auto p10() -> std::string;$/;\"\tp\ttyperef:typename:std::string\tfile:\tend:30\np11\tinput.cpp\t/^auto p11() -> int (*)(int);$/;\"\tp\ttyperef:typename:int (*)(int)\tfile:\tend:31\np12\tinput.cpp\t/^struct Struct p12();$/;\"\tp\ttyperef:struct:Struct\tfile:\tend:32\np13\tinput.cpp\t/^Struct p13();$/;\"\tp\ttyperef:typename:Struct\tfile:\tend:33\np14\tinput.cpp\t/^union Union p14();$/;\"\tp\ttyperef:union:Union\tfile:\tend:34\np15\tinput.cpp\t/^Union p15();$/;\"\tp\ttyperef:typename:Union\tfile:\tend:35\np15p\tinput.cpp\t/^class Class * p15p();$/;\"\tp\ttyperef:class:Class *\tfile:\tend:36\np16\tinput.cpp\t/^Class & p16();$/;\"\tp\ttyperef:typename:Class &\tfile:\tend:37\np17\tinput.cpp\t/^const enum Enum p17();$/;\"\tp\ttyperef:typename:const enum Enum\tfile:\tend:38\np18\tinput.cpp\t/^Enum p18();$/;\"\tp\ttyperef:typename:Enum\tfile:\tend:39\nf00\tinput.cpp\t/^void f00()$/;\"\tf\ttyperef:typename:void\tend:43\nf01\tinput.cpp\t/^int f01()$/;\"\tf\ttyperef:typename:int\tend:48\nf02\tinput.cpp\t/^unsigned int f02()$/;\"\tf\ttyperef:typename:unsigned int\tend:53\nf03\tinput.cpp\t/^auto f03() -> int$/;\"\tf\ttyperef:typename:int\tend:58\nf04\tinput.cpp\t/^int * f04()$/;\"\tf\ttyperef:typename:int *\tend:63\nf05\tinput.cpp\t/^const unsigned long long int & f05()$/;\"\tf\ttyperef:typename:const unsigned long long int &\tend:69\nf06\tinput.cpp\t/^static inline int * f06()$/;\"\tf\ttyperef:typename:int *\tfile:\tend:74\nf07\tinput.cpp\t/^std::string & f07()$/;\"\tf\ttyperef:typename:std::string &\tend:80\nf08\tinput.cpp\t/^std::vector * f08()$/;\"\tf\ttyperef:typename:std::vector *\tend:85\np09\tinput.cpp\t/^auto p09() -> std::vector ***$/;\"\tf\ttyperef:typename:std::vector ***\tend:90\nf10\tinput.cpp\t/^auto f10() -> std::string$/;\"\tf\ttyperef:typename:std::string\tend:96\nf11\tinput.cpp\t/^auto f11() -> int (*)(int)$/;\"\tf\ttyperef:typename:int (*)(int)\tend:101\nf13\tinput.cpp\t/^template std::vector * f13()$/;\"\tf\ttyperef:typename:std::vector *\tend:106\ttemplate:\nf14\tinput.cpp\t/^template auto f14() -> std::vector *$/;\"\tf\ttyperef:typename:std::vector *\tend:111\ttemplate:\nm00\tinput.cpp\t/^\tvoid m00();$/;\"\tp\tclass:X\ttyperef:typename:void\tfile:\tend:116\nm01\tinput.cpp\t/^\tconstexpr int m01(){ return 0; };$/;\"\tf\tclass:X\ttyperef:typename:int\tfile:\tend:117\nm02\tinput.cpp\t/^\tunsigned int m02();$/;\"\tp\tclass:X\ttyperef:typename:unsigned int\tfile:\tend:118\nm03\tinput.cpp\t/^\tstatic auto m03() -> int;$/;\"\tp\tclass:X\ttyperef:typename:int\tfile:\tend:119\nm04\tinput.cpp\t/^\tint * m04();$/;\"\tp\tclass:X\ttyperef:typename:int *\tfile:\tend:120\nm05\tinput.cpp\t/^\tconst unsigned long long int & m05();$/;\"\tp\tclass:X\ttyperef:typename:const unsigned long long int &\tfile:\tend:121\nm06\tinput.cpp\t/^\tstatic inline int * m06();$/;\"\tp\tclass:X\ttyperef:typename:int *\tfile:\tend:122\nm07\tinput.cpp\t/^\tvirtual std::string & m07();$/;\"\tp\tclass:X\ttyperef:typename:std::string &\tfile:\tend:123\nm08\tinput.cpp\t/^\tstd::vector * m08();$/;\"\tp\tclass:X\ttyperef:typename:std::vector *\tfile:\tend:124\nm09\tinput.cpp\t/^\tauto m09() -> std::vector ***;$/;\"\tp\tclass:X\ttyperef:typename:std::vector ***\tfile:\tend:125\nm10\tinput.cpp\t/^\tvirtual auto m10() const -> std::string;$/;\"\tp\tclass:X\ttyperef:typename:std::string\tfile:\tend:126\nm11\tinput.cpp\t/^\tvirtual auto m11() const -> int (*)(int);$/;\"\tp\tclass:X\ttyperef:typename:int (*)(int)\tfile:\tend:127\n" }, { "path": "Units/parser-cxx.r/function-return-types.d/input.cpp", "content": "#include \n#include \n\nstruct Struct\n{\n};\n\nenum Enum\n{\n};\n\nclass Class\n{\n};\n\nunion Union\n{\n};\n\nvoid p00();\nint p01();\nunsigned int p02();\nauto p03() -> int;\nint * p04();\nconst unsigned long long int & p05();\nstatic inline int * p06();\nstd::string & p07();\nstd::vector * p08();\nauto p09() -> std::vector ***;\nauto p10() -> std::string;\nauto p11() -> int (*)(int);\nstruct Struct p12();\nStruct p13();\nunion Union p14();\nUnion p15();\nclass Class * p15p();\nClass & p16();\nconst enum Enum p17();\nEnum p18();\n\nvoid f00()\n{\n}\n\nint f01()\n{\n\treturn 0;\n}\n\nunsigned int f02()\n{\n\treturn 0;\n}\n\nauto f03() -> int\n{\n\treturn 0;\n}\n\nint * f04()\n{\n\treturn 0;\n}\n\nconst unsigned long long int & f05()\n{\n\tunsigned long long int x;\n\treturn x;\n}\n\nstatic inline int * f06()\n{\n\treturn 0;\n}\n\nstd::string & f07()\n{\n\tstd::string x;\n\treturn x;\n}\n\nstd::vector * f08()\n{\n\treturn 0;\n}\n\nauto p09() -> std::vector ***\n{\n\treturn 0;\n}\n\nauto f10() -> std::string\n{\n\tstd::string x;\n\treturn x;\n}\n\nauto f11() -> int (*)(int)\n{\n\treturn 0;\n}\n\ntemplate std::vector * f13()\n{\n\treturn 0;\n}\n\ntemplate auto f14() -> std::vector *\n{\n\treturn 0;\n}\n\nclass X\n{\npublic:\n\tvoid m00();\n\tconstexpr int m01(){ return 0; };\n\tunsigned int m02();\n\tstatic auto m03() -> int;\n\tint * m04();\n\tconst unsigned long long int & m05();\n\tstatic inline int * m06();\n\tvirtual std::string & m07();\n\tstd::vector * m08();\n\tauto m09() -> std::vector ***;\n\tvirtual auto m10() const -> std::string;\n\tvirtual auto m11() const -> int (*)(int);\n};\n" }, { "path": "Units/parser-cxx.r/function_try_block.d/args.ctags", "content": "--kinds-c++=+pflz\n--fields=+SsKe\n--fields-c++=+{captures}+{properties}\n--sort=no\n" }, { "path": "Units/parser-cxx.r/function_try_block.d/expected.tags", "content": "S\tinput.cxx\t/^struct S {$/;\"\tstruct\tfile:\tend:11\nm\tinput.cxx\t/^ std::string m;$/;\"\tmember\tstruct:S\ttyperef:typename:std::string\tfile:\tend:5\nS\tinput.cxx\t/^ S(const std::string& arg) try : m(arg, 100) {$/;\"\tfunction\tstruct:S\tfile:\tsignature:(const std::string & arg)\tend:10\tproperties:fntryblock\narg\tinput.cxx\t/^ S(const std::string& arg) try : m(arg, 100) {$/;\"\tparameter\tfunction:S::S\ttyperef:typename:const std::string &\tfile:\ne\tinput.cxx\t/^ } catch(const std::exception& e) {$/;\"\tlocal\tfunction:S::S\ttyperef:typename:const std::exception &\tfile:\tend:8\nf\tinput.cxx\t/^int f(int n = 2) try {$/;\"\tfunction\ttyperef:typename:int\tsignature:(int n=2)\tend:20\tproperties:fntryblock\nn\tinput.cxx\t/^int f(int n = 2) try {$/;\"\tparameter\tfunction:f\ttyperef:typename:int\tfile:\nf2\tinput.cxx\t/^int f2() try {$/;\"\tfunction\ttyperef:typename:int\tsignature:()\tend:28\tproperties:fntryblock\nf2v1\tinput.cxx\t/^} catch(SomeKindOfException &f2v1)$/;\"\tlocal\tfunction:f2\ttyperef:typename:SomeKindOfException &\tfile:\tend:23\nf2v2\tinput.cxx\t/^} catch(SomeOtherKindOfException &f2v2)$/;\"\tlocal\tfunction:f2\ttyperef:typename:SomeOtherKindOfException &\tfile:\tend:25\nf3\tinput.cxx\t/^int f3()$/;\"\tfunction\ttyperef:typename:int\tsignature:()\tend:38\nf3v1\tinput.cxx\t/^\t\tint f3v1 = 10;$/;\"\tlocal\tfunction:f3\ttyperef:typename:int\tfile:\tend:34\nf3v2\tinput.cxx\t/^\t} catch(std::exception & f3v2)$/;\"\tlocal\tfunction:f3\ttyperef:typename:std::exception &\tfile:\tend:35\nf4\tinput.cxx\t/^auto f4() -> void try {$/;\"\tfunction\ttyperef:typename:void try\tsignature:()\tend:43\tproperties:fntryblock\n" }, { "path": "Units/parser-cxx.r/function_try_block.d/input.cxx", "content": "/* Taken from\n * http://en.cppreference.com/w/cpp/language/function-try-block */\n\nstruct S {\n std::string m;\n S(const std::string& arg) try : m(arg, 100) {\n std::cout << \"constructed, mn = \" << m << '\\n';\n } catch(const std::exception& e) {\n std::cerr << \"arg=\" << arg << \" failed: \" << e.what() << '\\n';\n } // implicit throw; here\n};\n\nint f(int n = 2) try {\n ++n; // increments the function parameter\n throw n;\n} catch(...) {\n ++n; // n is in scope and still refers to the function parameter\n assert(n == 4);\n return n;\n}\n\nint f2() try {\n} catch(SomeKindOfException &f2v1)\n{\n} catch(SomeOtherKindOfException &f2v2)\n{\n} catch(...) {\n}\n\nint f3()\n{\n\t// This is NOT a function-try-block\n\ttry {\n\t\tint f3v1 = 10;\n\t} catch(std::exception & f3v2)\n\t{\n\t}\n}\n\nauto f4() -> void try {\n} catch(...)\n{\n}" }, { "path": "Units/parser-cxx.r/functions.cpp.d/args.ctags", "content": "--kinds-c++=pfz\n--fields=+Se\n" }, { "path": "Units/parser-cxx.r/functions.cpp.d/expected.tags", "content": "f01\tinput.cpp\t/^int f01(int f01a01,int f01a02)$/;\"\tf\ttyperef:typename:int\tsignature:(int f01a01,int f01a02)\tend:34\nf01a01\tinput.cpp\t/^int f01(int f01a01,int f01a02)$/;\"\tz\tfunction:f01\ttyperef:typename:int\tfile:\nf01a02\tinput.cpp\t/^int f01(int f01a01,int f01a02)$/;\"\tz\tfunction:f01\ttyperef:typename:int\tfile:\nf02\tinput.cpp\t/^unsigned short int * f02(unsigned int & f02a01,...)$/;\"\tf\ttyperef:typename:unsigned short int *\tsignature:(unsigned int & f02a01,...)\tend:39\nf02a01\tinput.cpp\t/^unsigned short int * f02(unsigned int & f02a01,...)$/;\"\tz\tfunction:f02\ttyperef:typename:unsigned int &\tfile:\nf03\tinput.cpp\t/^auto f03(const int & f03a01,void * f03a02) -> const int &$/;\"\tf\ttyperef:typename:const int &\tsignature:(const int & f03a01,void * f03a02)\tend:44\nf03a01\tinput.cpp\t/^auto f03(const int & f03a01,void * f03a02) -> const int &$/;\"\tz\tfunction:f03\ttyperef:typename:const int &\tfile:\nf03a02\tinput.cpp\t/^auto f03(const int & f03a01,void * f03a02) -> const int &$/;\"\tz\tfunction:f03\ttyperef:typename:void *\tfile:\nf04\tinput.cpp\t/^auto f04() -> int (*)(int)$/;\"\tf\ttyperef:typename:int (*)(int)\tsignature:()\tend:49\nf05\tinput.cpp\t/^static inline std::string f05(const int *** f05a01)$/;\"\tf\ttyperef:typename:std::string\tfile:\tsignature:(const int *** f05a01)\tend:54\nf05a01\tinput.cpp\t/^static inline std::string f05(const int *** f05a01)$/;\"\tz\tfunction:f05\ttyperef:typename:const int ***\tfile:\nf06\tinput.cpp\t/^\t\tauto f06(n01::c01 && f06a01) -> type01 *;$/;\"\tp\tnamespace:n01::n02\ttyperef:typename:type01 *\tfile:\tsignature:(n01::c01 && f06a01)\tend:15\nf06\tinput.cpp\t/^auto n01::n02::f06(n01::c01 && f06a01) -> n01::n02::type01 *$/;\"\tf\tclass:n01::n02\ttyperef:typename:n01::n02::type01 *\tsignature:(n01::c01 && f06a01)\tend:59\nf06a01\tinput.cpp\t/^\t\tauto f06(n01::c01 && f06a01) -> type01 *;$/;\"\tz\tprototype:n01::n02::f06\ttyperef:typename:n01::c01 &&\tfile:\nf06a01\tinput.cpp\t/^auto n01::n02::f06(n01::c01 && f06a01) -> n01::n02::type01 *$/;\"\tz\tfunction:n01::n02::f06\ttyperef:typename:n01::c01 &&\tfile:\nf07\tinput.cpp\t/^unsigned int f07(int (*f07a01)(int * x1,int x2),...)$/;\"\tf\ttyperef:typename:unsigned int\tsignature:(int (* f07a01)(int * x1,int x2),...)\tend:64\nf07a01\tinput.cpp\t/^unsigned int f07(int (*f07a01)(int * x1,int x2),...)$/;\"\tz\tfunction:f07\ttyperef:typename:int (*)(int * x1,int x2)\tfile:\nf08\tinput.cpp\t/^void (*f08(void (*)(int *f08a01)))(int *)$/;\"\tf\ttyperef:typename:void (*)(int *)\tsignature:(void (*)(int * f08a01))\tend:69\nf08a01\tinput.cpp\t/^void (*f08(void (*)(int *f08a01)))(int *)$/;\"\tz\tfunction:f08\ttyperef:typename:void (*)(int *)\tfile:\nf09\tinput.cpp\t/^int f09(char *((*f09a01)()))$/;\"\tf\ttyperef:typename:int\tsignature:(char * ((* f09a01)()))\tend:74\nf09a01\tinput.cpp\t/^int f09(char *((*f09a01)()))$/;\"\tz\tfunction:f09\ttyperef:typename:char * ((*)())\tfile:\nf10\tinput.cpp\t/^int f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])$/;\"\tf\ttyperef:typename:int\tsignature:(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])\tend:79\nf10a01\tinput.cpp\t/^int f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])$/;\"\tz\tfunction:f10\ttyperef:typename:int\tfile:\nf10a02\tinput.cpp\t/^int f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])$/;\"\tz\tfunction:f10\ttyperef:typename:int[]\tfile:\nf10a03\tinput.cpp\t/^int f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])$/;\"\tz\tfunction:f10\ttyperef:typename:int[2][3]\tfile:\nf10a04\tinput.cpp\t/^int f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])$/;\"\tz\tfunction:f10\ttyperef:typename:int ()[]\tfile:\nf10a05\tinput.cpp\t/^int f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])$/;\"\tz\tfunction:f10\ttyperef:typename:int ()[][5]\tfile:\np01\tinput.cpp\t/^int p01(int p01a01,int p01a02);$/;\"\tp\ttyperef:typename:int\tfile:\tsignature:(int p01a01,int p01a02)\tend:21\np01a01\tinput.cpp\t/^int p01(int p01a01,int p01a02);$/;\"\tz\tprototype:p01\ttyperef:typename:int\tfile:\np01a02\tinput.cpp\t/^int p01(int p01a01,int p01a02);$/;\"\tz\tprototype:p01\ttyperef:typename:int\tfile:\np02\tinput.cpp\t/^unsigned short int * p02(unsigned int & p02a01,...);$/;\"\tp\ttyperef:typename:unsigned short int *\tfile:\tsignature:(unsigned int & p02a01,...)\tend:22\np02a01\tinput.cpp\t/^unsigned short int * p02(unsigned int & p02a01,...);$/;\"\tz\tprototype:p02\ttyperef:typename:unsigned int &\tfile:\np03\tinput.cpp\t/^auto p03(const int & p03a01,void * p03a02) -> const int &;$/;\"\tp\ttyperef:typename:const int &\tfile:\tsignature:(const int & p03a01,void * p03a02)\tend:23\np03a01\tinput.cpp\t/^auto p03(const int & p03a01,void * p03a02) -> const int &;$/;\"\tz\tprototype:p03\ttyperef:typename:const int &\tfile:\np03a02\tinput.cpp\t/^auto p03(const int & p03a01,void * p03a02) -> const int &;$/;\"\tz\tprototype:p03\ttyperef:typename:void *\tfile:\np04\tinput.cpp\t/^auto p04() -> int (*)(int);$/;\"\tp\ttyperef:typename:int (*)(int)\tfile:\tsignature:()\tend:24\np05\tinput.cpp\t/^static std::string p05(const int *** p05a01);$/;\"\tp\ttyperef:typename:std::string\tfile:\tsignature:(const int *** p05a01)\tend:25\np05a01\tinput.cpp\t/^static std::string p05(const int *** p05a01);$/;\"\tz\tprototype:p05\ttyperef:typename:const int ***\tfile:\np06\tinput.cpp\t/^\t\tauto p06(n01::c01 && p06a01) -> type01 *;$/;\"\tp\tnamespace:n01::n02\ttyperef:typename:type01 *\tfile:\tsignature:(n01::c01 && p06a01)\tend:16\np06\tinput.cpp\t/^auto n01::n02::p06(n01::c01 && p06a01) -> n01::n02::type01 *;$/;\"\tp\tclass:n01::n02\ttyperef:typename:n01::n02::type01 *\tfile:\tsignature:(n01::c01 && p06a01)\tend:26\np06a01\tinput.cpp\t/^\t\tauto p06(n01::c01 && p06a01) -> type01 *;$/;\"\tz\tprototype:n01::n02::p06\ttyperef:typename:n01::c01 &&\tfile:\np06a01\tinput.cpp\t/^auto n01::n02::p06(n01::c01 && p06a01) -> n01::n02::type01 *;$/;\"\tz\tprototype:n01::n02::p06\ttyperef:typename:n01::c01 &&\tfile:\np07\tinput.cpp\t/^unsigned int p07(int (*p07a01)(int * x1,int x2),...);$/;\"\tp\ttyperef:typename:unsigned int\tfile:\tsignature:(int (* p07a01)(int * x1,int x2),...)\tend:27\np07a01\tinput.cpp\t/^unsigned int p07(int (*p07a01)(int * x1,int x2),...);$/;\"\tz\tprototype:p07\ttyperef:typename:int (*)(int * x1,int x2)\tfile:\np08\tinput.cpp\t/^void (*p08(void (*)(int *p08a01)))(int *);$/;\"\tp\ttyperef:typename:void (*)(int *)\tfile:\tsignature:(void (*)(int * p08a01))\tend:28\np08a01\tinput.cpp\t/^void (*p08(void (*)(int *p08a01)))(int *);$/;\"\tz\tprototype:p08\ttyperef:typename:void (*)(int *)\tfile:\nt01\tinput.cpp\t/^template std::unique_ptr t01(T && t01a01)$/;\"\tf\ttyperef:typename:std::unique_ptr\tsignature:(T && t01a01)\tend:85\nt01a01\tinput.cpp\t/^template std::unique_ptr t01(T && t01a01)$/;\"\tz\tfunction:t01\ttyperef:typename:T &&\tfile:\nt02\tinput.cpp\t/^template auto t02(T && t02a01) -> std::unique_ptr$/;\"\tf\ttyperef:typename:std::unique_ptr\tsignature:(T && t02a01)\tend:94\nt02a01\tinput.cpp\t/^template auto t02(T && t02a01) -> std::unique_ptr$/;\"\tz\tfunction:t02\ttyperef:typename:T &&\tfile:\n" }, { "path": "Units/parser-cxx.r/functions.cpp.d/input.cpp", "content": "#include \n#include \n\nnamespace n01\n{\n\tclass c01\n\t{\n\t};\n\n\tnamespace n02\n\t{\n\t\ttypedef unsigned int type01;\n\n\t\t// These declarations are required by C++ standard for the ones below to compile properly\n\t\tauto f06(n01::c01 && f06a01) -> type01 *;\n\t\tauto p06(n01::c01 && p06a01) -> type01 *;\n\t}\n};\n\n// Valid function prototypes\nint p01(int p01a01,int p01a02);\nunsigned short int * p02(unsigned int & p02a01,...);\nauto p03(const int & p03a01,void * p03a02) -> const int &;\nauto p04() -> int (*)(int);\nstatic std::string p05(const int *** p05a01);\nauto n01::n02::p06(n01::c01 && p06a01) -> n01::n02::type01 *;\nunsigned int p07(int (*p07a01)(int * x1,int x2),...);\nvoid (*p08(void (*)(int *p08a01)))(int *);\n\n// Valid function declarations\nint f01(int f01a01,int f01a02)\n{\n\treturn 0;\n}\n\nunsigned short int * f02(unsigned int & f02a01,...)\n{\n\treturn 0;\n}\n\nauto f03(const int & f03a01,void * f03a02) -> const int &\n{\n\treturn 0;\n}\n\nauto f04() -> int (*)(int)\n{\n\treturn 0;\n}\n\nstatic inline std::string f05(const int *** f05a01)\n{\n\treturn std::string();\n}\n\nauto n01::n02::f06(n01::c01 && f06a01) -> n01::n02::type01 *\n{\n\treturn 0;\n}\n\nunsigned int f07(int (*f07a01)(int * x1,int x2),...)\n{\n\treturn 0;\n}\n\nvoid (*f08(void (*)(int *f08a01)))(int *)\n{\n\treturn 0;\n}\n\nint f09(char *((*f09a01)()))\n{\n\treturn 0;\n}\n\nint f10(int f10a01,int f10a02[],int f10a03[2][3],int (f10a04)[],int (f10a05)[][5])\n{\n\treturn 0;\n}\n\n// Valid function templates\ntemplate std::unique_ptr t01(T && t01a01)\n{\n return std::unique_ptr(NULL);\n}\n\n#define MACRO_TEXT \"\"\n\ntemplate auto t02(T && t02a01) -> std::unique_ptr\n{\n\t// throw may look like a prototype, but it isn't\n\tthrow std::string(MACRO_TEXT);\n return std::unique_ptr(NULL);\n}\n\n// Things that might look similar to function prototypes but are NOT function prototypes (but still valid C++)\nstd::string x01(\"test\");\n\n#if NOTVALIDCPP\n\t// This is not really valid C++ because it appears in the wrong context.\n\t// However we simulate the parser being wrong about the current state (it happens).\n\t// This should be NOT marked as a prototype even if found out of a function.\n\tthrow std::string(MACRO_TEXT);\n#endif\n" }, { "path": "Units/parser-cxx.r/ignoring-macro-with-parameters.d/args.ctags", "content": "-I _GLIBCXX_VISIBILITY+\n-I _MY_INT=int\n\n" }, { "path": "Units/parser-cxx.r/ignoring-macro-with-parameters.d/expected.tags", "content": "foo\tinput.hxx\t/^namespace foo _GLIBCXX_VISIBILITY(default)$/;\"\tn\nx\tinput.hxx\t/^ int x;$/;\"\tv\tnamespace:foo\ttyperef:typename:int\ny\tinput.hxx\t/^ _MY_INT y;$/;\"\tv\tnamespace:foo\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/ignoring-macro-with-parameters.d/input.hxx", "content": "namespace foo _GLIBCXX_VISIBILITY(default)\n{\n int x;\n _MY_INT y;\n}\n" }, { "path": "Units/parser-cxx.r/import-4.d/README.md", "content": "https://en.cppreference.com/w/cpp/language/modules\n\n\texport(optional) import module-name attr (optional) ; \t(4)\n" }, { "path": "Units/parser-cxx.r/import-4.d/args.ctags", "content": "--sort=no\n--extras=+rq\n--fields=+r\n--fields-C++=+{properties}\n" }, { "path": "Units/parser-cxx.r/import-4.d/expected.tags", "content": "X\tinput.cpp\t/^import X [[something]];$/;\"\tM\troles:imported\nimport\tinput.cpp\t/^int import;$/;\"\tv\ttyperef:typename:int\troles:def\nX.Y\tinput-0.cpp\t/^import X.Y [[something]];$/;\"\tM\troles:imported\nX\tinput-2.cpp\t/^export import X [[something]];$/;\"\tM\troles:imported\tproperties:export\nX.Y\tinput-3.cpp\t/^export import X.Y [[something]];$/;\"\tM\troles:imported\tproperties:export\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-0.cpp", "content": "import X.Y [[something]];\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-1.cpp", "content": "import;\t\t\t\t// broken input\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-2.cpp", "content": "export import X [[something]];\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-3.cpp", "content": "export import X.Y [[something]];\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-4.cpp", "content": "export import;\t\t\t\t// broken input\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-5.cpp", "content": "import\t\t\t\t// broken input\n" }, { "path": "Units/parser-cxx.r/import-4.d/input-6.cpp", "content": "export import\n" }, { "path": "Units/parser-cxx.r/import-4.d/input.cpp", "content": "import X [[something]];\n\nint import;\n" }, { "path": "Units/parser-cxx.r/import-5.d/README.md", "content": "https://en.cppreference.com/w/cpp/language/modules\n\n\texport(optional) import module-partition attr (optional) ; \t(5)\n" }, { "path": "Units/parser-cxx.r/import-5.d/args.ctags", "content": "--sort=no\n--extras=+rq\n--fields=+r\n--fields-C++=+{properties}\n" }, { "path": "Units/parser-cxx.r/import-5.d/expected.tags", "content": "X\tinput.cpp\t/^import X:P [[something]];$/;\"\tM\troles:partOwner\nP\tinput.cpp\t/^import X:P [[something]];$/;\"\tP\tmodule:X\troles:imported\nX:P\tinput.cpp\t/^import X:P [[something]];$/;\"\tP\tmodule:X\troles:imported\nX.Y\tinput-0.cpp\t/^import X.Y:P [[something]];$/;\"\tM\troles:partOwner\nP\tinput-0.cpp\t/^import X.Y:P [[something]];$/;\"\tP\tmodule:X.Y\troles:imported\nX.Y:P\tinput-0.cpp\t/^import X.Y:P [[something]];$/;\"\tP\tmodule:X.Y\troles:imported\nX\tinput-1.cpp\t/^import X:P.Q [[something]];$/;\"\tM\troles:partOwner\nP.Q\tinput-1.cpp\t/^import X:P.Q [[something]];$/;\"\tP\tmodule:X\troles:imported\nX:P.Q\tinput-1.cpp\t/^import X:P.Q [[something]];$/;\"\tP\tmodule:X\troles:imported\nX.Y\tinput-2.cpp\t/^import X.Y:P.Q [[something]];$/;\"\tM\troles:partOwner\nP.Q\tinput-2.cpp\t/^import X.Y:P.Q [[something]];$/;\"\tP\tmodule:X.Y\troles:imported\nX.Y:P.Q\tinput-2.cpp\t/^import X.Y:P.Q [[something]];$/;\"\tP\tmodule:X.Y\troles:imported\nX\tinput-3.cpp\t/^export import X:P [[something]];$/;\"\tM\troles:partOwner\nP\tinput-3.cpp\t/^export import X:P [[something]];$/;\"\tP\tmodule:X\troles:imported\tproperties:export\nX:P\tinput-3.cpp\t/^export import X:P [[something]];$/;\"\tP\tmodule:X\troles:imported\tproperties:export\nX.Y\tinput-4.cpp\t/^export import X.Y:P [[something]];$/;\"\tM\troles:partOwner\nP\tinput-4.cpp\t/^export import X.Y:P [[something]];$/;\"\tP\tmodule:X.Y\troles:imported\tproperties:export\nX.Y:P\tinput-4.cpp\t/^export import X.Y:P [[something]];$/;\"\tP\tmodule:X.Y\troles:imported\tproperties:export\nX\tinput-5.cpp\t/^export import X:P.Q [[something]];$/;\"\tM\troles:partOwner\nP.Q\tinput-5.cpp\t/^export import X:P.Q [[something]];$/;\"\tP\tmodule:X\troles:imported\tproperties:export\nX:P.Q\tinput-5.cpp\t/^export import X:P.Q [[something]];$/;\"\tP\tmodule:X\troles:imported\tproperties:export\nX\tinput-6.cpp\t/^export import X:P.Q [[something]];$/;\"\tM\troles:partOwner\nP.Q\tinput-6.cpp\t/^export import X:P.Q [[something]];$/;\"\tP\tmodule:X\troles:imported\tproperties:export\nX:P.Q\tinput-6.cpp\t/^export import X:P.Q [[something]];$/;\"\tP\tmodule:X\troles:imported\tproperties:export\nA\tinput-7.cpp\t/^export module A; \\/\\/ primary module interface unit$/;\"\tM\troles:def\tproperties:export\nB\tinput-7.cpp\t/^export import :B; \\/\\/ Hello() is visible when importing 'A'.$/;\"\tP\tmodule:A\troles:imported\tproperties:export\nA:B\tinput-7.cpp\t/^export import :B; \\/\\/ Hello() is visible when importing 'A'.$/;\"\tP\tmodule:A\troles:imported\tproperties:export\nC\tinput-7.cpp\t/^import :C; \\/\\/ WorldImpl() is now visible only for 'A.cpp'.$/;\"\tP\tmodule:A\troles:imported\nA:C\tinput-7.cpp\t/^import :C; \\/\\/ WorldImpl() is now visible only for 'A.cpp'.$/;\"\tP\tmodule:A\troles:imported\nWorld\tinput-7.cpp\t/^export char const* World()$/;\"\tf\ttyperef:typename:char const *\troles:def\tproperties:export\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-0.cpp", "content": "import X.Y:P [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-1.cpp", "content": "import X:P.Q [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-2.cpp", "content": "import X.Y:P.Q [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-3.cpp", "content": "export import X:P [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-4.cpp", "content": "export import X.Y:P [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-5.cpp", "content": "export import X:P.Q [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-6.cpp", "content": "export import X:P.Q [[something]];\n" }, { "path": "Units/parser-cxx.r/import-5.d/input-7.cpp", "content": "// Taken from https://en.cppreference.com/w/cpp/language/modules\n\n/////// A.cpp\nexport module A; // primary module interface unit\n\nexport import :B; // Hello() is visible when importing 'A'.\nimport :C; // WorldImpl() is now visible only for 'A.cpp'.\n// export import :C; // ERROR: Cannot export a module implementation unit.\n\n// World() is visible by any translation unit importing 'A'.\nexport char const* World()\n{\n return WorldImpl();\n}\n" }, { "path": "Units/parser-cxx.r/import-5.d/input.cpp", "content": "import X:P [[something]];\n" }, { "path": "Units/parser-cxx.r/import-6.d/README.md", "content": "https://en.cppreference.com/w/cpp/language/modules\n\n\texport(optional) import header-name attr (optional) ; \t(6)\n" }, { "path": "Units/parser-cxx.r/import-6.d/args.ctags", "content": "--sort=no\n--extras=+rq\n--fields=+r\n--fields-C++=+{properties}\n" }, { "path": "Units/parser-cxx.r/import-6.d/expected.tags", "content": "a.h\tinput.cpp\t/^import [[something]];$/;\"\th\troles:system,imported\nb.h\tinput-0.cpp\t/^import \"b.h\" [[something]];$/;\"\th\troles:local,imported\na.h\tinput-1.cpp\t/^export import [[something]];$/;\"\th\troles:system,imported,exported\nb.h\tinput-2.cpp\t/^export import \"b.h\" [[something]];$/;\"\th\troles:local,imported,exported\n" }, { "path": "Units/parser-cxx.r/import-6.d/input-0.cpp", "content": "import \"b.h\" [[something]];\n" }, { "path": "Units/parser-cxx.r/import-6.d/input-1.cpp", "content": "export import [[something]];\n" }, { "path": "Units/parser-cxx.r/import-6.d/input-2.cpp", "content": "export import \"b.h\" [[something]];\n" }, { "path": "Units/parser-cxx.r/import-6.d/input.cpp", "content": "import [[something]];\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/args.ctags", "content": "--sort=no\n--langmap=c:.h.c\n--kinds-C++=+lz\n--kinds-C=+lz\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/expected.tags", "content": "cs\tinput.h\t/^struct cs {$/;\"\ts\ni\tinput.h\t/^ int i;$/;\"\tm\tstruct:cs\ttyperef:typename:int\nfs\tinput.h\t/^} fs(int x) { struct cs d = {.i = x}; return d;};$/;\"\tf\ttyperef:struct:cs\nx\tinput.h\t/^} fs(int x) { struct cs d = {.i = x}; return d;};$/;\"\tz\tfunction:fs\ttyperef:typename:int\tfile:\nd\tinput.h\t/^} fs(int x) { struct cs d = {.i = x}; return d;};$/;\"\tl\tfunction:fs\ttyperef:struct:cs\tfile:\nce\tinput.h\t/^enum ce {$/;\"\tg\nX\tinput.h\t/^ X,$/;\"\te\tenum:ce\nfe\tinput.h\t/^} fe(void) { return X; }$/;\"\tf\ttyperef:enum:ce\nmain\tinput-0.cpp\t/^int main()$/;\"\tf\ttyperef:typename:int\na0\tinput-0.cpp\t/^ std::vector a0 {1, 2, 30};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na1\tinput-0.cpp\t/^ std::vector a1 {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na2\tinput-0.cpp\t/^ std::vector a2 = {1, 2, 30};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na3\tinput-0.cpp\t/^ std::vector a3 = {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na4\tinput-0.cpp\t/^ std::vector a4 = {1}, a5 = {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na5\tinput-0.cpp\t/^ std::vector a4 = {1}, a5 = {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na6\tinput-0.cpp\t/^ std::vector a6 = {1}, a7 {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na7\tinput-0.cpp\t/^ std::vector a6 = {1}, a7 {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na8\tinput-0.cpp\t/^ std::vector a8 {1}, a9 = {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\na9\tinput-0.cpp\t/^ std::vector a8 {1}, a9 = {1};$/;\"\tl\tfunction:main\ttyperef:typename:std::vector\tfile:\nb\tinput-1.cpp\t/^int b()$/;\"\tf\ttyperef:typename:int\nb0\tinput-1.cpp\t/^ std::vector b0 {1, 2, 30}, b1 {1};$/;\"\tl\tfunction:b\ttyperef:typename:std::vector\tfile:\nb1\tinput-1.cpp\t/^ std::vector b0 {1, 2, 30}, b1 {1};$/;\"\tl\tfunction:b\ttyperef:typename:std::vector\tfile:\nb2\tinput-1.cpp\t/^ std::vector b2 = {1, 2, 30}, b3 = {1};$/;\"\tl\tfunction:b\ttyperef:typename:std::vector\tfile:\nb3\tinput-1.cpp\t/^ std::vector b2 = {1, 2, 30}, b3 = {1};$/;\"\tl\tfunction:b\ttyperef:typename:std::vector\tfile:\nc\tinput-2.cpp\t/^int c()$/;\"\tf\ttyperef:typename:int\nc0\tinput-2.cpp\t/^ std::vector c0 {1, 2, 30}, c1 {1}, c2 = {1, 2, 30}, c3 = {1};$/;\"\tl\tfunction:c\ttyperef:typename:std::vector\tfile:\nc1\tinput-2.cpp\t/^ std::vector c0 {1, 2, 30}, c1 {1}, c2 = {1, 2, 30}, c3 = {1};$/;\"\tl\tfunction:c\ttyperef:typename:std::vector\tfile:\nc2\tinput-2.cpp\t/^ std::vector c0 {1, 2, 30}, c1 {1}, c2 = {1, 2, 30}, c3 = {1};$/;\"\tl\tfunction:c\ttyperef:typename:std::vector\tfile:\nc3\tinput-2.cpp\t/^ std::vector c0 {1, 2, 30}, c1 {1}, c2 = {1, 2, 30}, c3 = {1};$/;\"\tl\tfunction:c\ttyperef:typename:std::vector\tfile:\nd\tinput-3.cpp\t/^int d()$/;\"\tf\ttyperef:typename:int\nD\tinput-3.cpp\t/^ class D {$/;\"\tc\tfunction:d\tfile:\ni\tinput-3.cpp\t/^ int i;$/;\"\tm\tclass:d::D\ttyperef:typename:int\tfile:\nD\tinput-3.cpp\t/^ D( int j,...):i(j){}$/;\"\tf\tclass:d::D\tfile:\nj\tinput-3.cpp\t/^ D( int j,...):i(j){}$/;\"\tz\tfunction:d::D::D\ttyperef:typename:int\tfile:\nf\tinput-3.cpp\t/^ int f(){ return i; }$/;\"\tf\tclass:d::D\ttyperef:typename:int\tfile:\ndx\tinput-3.cpp\t/^ } dx{1};$/;\"\tl\tfunction:d\ttyperef:class:d::D\tfile:\nE\tinput-3.cpp\t/^ class E {$/;\"\tc\tfunction:d\tfile:\nj\tinput-3.cpp\t/^ int j;$/;\"\tm\tclass:d::E\ttyperef:typename:int\tfile:\nE\tinput-3.cpp\t/^ E( int k,...):j(k){}$/;\"\tf\tclass:d::E\tfile:\nk\tinput-3.cpp\t/^ E( int k,...):j(k){}$/;\"\tz\tfunction:d::E::E\ttyperef:typename:int\tfile:\nf\tinput-3.cpp\t/^ int f(){ return j; }$/;\"\tf\tclass:d::E\ttyperef:typename:int\tfile:\ne0\tinput-3.cpp\t/^ } e0 {1, 2, 30}, e1 {1}, e2 = {1, 2, 30}, e3 = {1};$/;\"\tl\tfunction:d\ttyperef:class:d::E\tfile:\ne1\tinput-3.cpp\t/^ } e0 {1, 2, 30}, e1 {1}, e2 = {1, 2, 30}, e3 = {1};$/;\"\tl\tfunction:d\ttyperef:class:d::E\tfile:\ne2\tinput-3.cpp\t/^ } e0 {1, 2, 30}, e1 {1}, e2 = {1, 2, 30}, e3 = {1};$/;\"\tl\tfunction:d\ttyperef:class:d::E\tfile:\ne3\tinput-3.cpp\t/^ } e0 {1, 2, 30}, e1 {1}, e2 = {1, 2, 30}, e3 = {1};$/;\"\tl\tfunction:d\ttyperef:class:d::E\tfile:\nc\tinput-4.cpp\t/^enum c {$/;\"\tg\tfile:\nX\tinput-4.cpp\t/^ X, Y$/;\"\te\tenum:c\tfile:\nY\tinput-4.cpp\t/^ X, Y$/;\"\te\tenum:c\tfile:\nc0\tinput-4.cpp\t/^} c0{X}, c1{Y};$/;\"\tv\ttyperef:enum:c\nc1\tinput-4.cpp\t/^} c0{X}, c1{Y};$/;\"\tv\ttyperef:enum:c\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/input-0.cpp", "content": "#include \nint main()\n{\n std::vector a0 {1, 2, 30};\n std::vector a1 {1};\n std::vector a2 = {1, 2, 30};\n std::vector a3 = {1};\n std::vector a4 = {1}, a5 = {1};\n std::vector a6 = {1}, a7 {1};\n std::vector a8 {1}, a9 = {1};\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/input-1.cpp", "content": "#include \nint b()\n{\n std::vector b0 {1, 2, 30}, b1 {1};\n std::vector b2 = {1, 2, 30}, b3 = {1};\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/input-2.cpp", "content": "#include \nint c()\n{\n std::vector c0 {1, 2, 30}, c1 {1}, c2 = {1, 2, 30}, c3 = {1};\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/input-3.cpp", "content": "int d()\n{\n class D {\n int i;\n public:\n D( int j,...):i(j){}\n int f(){ return i; }\n } dx{1};\n\n class E {\n int j;\n public:\n E( int k,...):j(k){}\n int f(){ return j; }\n } e0 {1, 2, 30}, e1 {1}, e2 = {1, 2, 30}, e3 = {1};\n\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/input-4.cpp", "content": "enum c {\n X, Y\n} c0{X}, c1{Y};\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/input.h", "content": "struct cs {\n int i;\n} fs(int x) { struct cs d = {.i = x}; return d;};\n\nenum ce {\n X,\n} fe(void) { return X; }\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/validator", "content": "c\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/validator-0", "content": "cxx17\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/validator-1", "content": "cxx17\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/validator-2", "content": "cxx17\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/validator-3", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/initializer-list.d/validator-4", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/inline-variables.cpp.d/args.ctags", "content": "--kinds-c++=vm\n--fields-c++=+{properties}\n" }, { "path": "Units/parser-cxx.r/inline-variables.cpp.d/expected.tags", "content": "gv1\tinput.cpp\t/^static inline int gv1;$/;\"\tv\ttyperef:typename:int\tfile:\tproperties:inline,static\ngv2\tinput.cpp\t/^inline int gv2;$/;\"\tv\ttyperef:typename:int\tproperties:inline\nvar1\tinput.cpp\t/^\tstatic inline int var1;$/;\"\tm\tclass:C1\ttyperef:typename:int\tfile:\tproperties:inline,static\nvar2\tinput.cpp\t/^\tinline int var2;$/;\"\tm\tclass:C1\ttyperef:typename:int\tfile:\tproperties:inline\n" }, { "path": "Units/parser-cxx.r/inline-variables.cpp.d/input.cpp", "content": "class C1\n{\npublic:\n\tstatic inline int var1;\n\tinline int var2;\n\t\n\tinline void fn(){};\n};\n\nstatic inline int gv1;\ninline int gv2;\n\n" }, { "path": "Units/parser-cxx.r/instantiation.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/instantiation.d/expected.tags", "content": "X\tinput.hpp\t/^template struct X { };$/;\"\ts\nY\tinput.hpp\t/^template struct Y { };$/;\"\ts\nM\tinput.hpp\t/^#define M /;\"\td\nS\tinput.hpp\t/^struct S {$/;\"\ts\ni\tinput.hpp\t/^\tint i;$/;\"\tm\tstruct:S\ttyperef:typename:int\ny\tinput.hpp\t/^\tY<0> y;$/;\"\tm\tstruct:S\ttyperef:typename:Y<0>\nx0\tinput.hpp\t/^\tX< Y< 1 > > x0;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nx1\tinput.hpp\t/^\tX< Y< 1 + 2 > > x1;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nx2\tinput.hpp\t/^\tX< Y< 1 << 2 > > x2;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nx3\tinput.hpp\t/^\tX< Y< M << 2 > > x3;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nx4\tinput.hpp\t/^\tX< Y< M << M > > x4;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nd\tinput.hpp\t/^\tdouble d;$/;\"\tm\tstruct:S\ttyperef:typename:double\n" }, { "path": "Units/parser-cxx.r/instantiation.d/input.hpp", "content": "// Based on an example in https://cpplover.blogspot.com/2013/12/c03c11_3905.html (in Japanese)\n\ntemplate struct X { };\ntemplate struct Y { };\n#define M 2\nstruct S {\n\tint i;\n\tY<0> y;\n\tX< Y< 1 > > x0;\n\tX< Y< 1 + 2 > > x1;\n\tX< Y< 1 << 2 > > x2;\n\tX< Y< M << 2 > > x3;\n\tX< Y< M << M > > x4;\n\tdouble d;\n};\n" }, { "path": "Units/parser-cxx.r/instantiation.d/validator", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/instantiation2.b/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/instantiation2.b/expected.tags", "content": "X\tinput.hpp\t/^template struct X { };$/;\"\ts\nY\tinput.hpp\t/^template struct Y { };$/;\"\ts\nM\tinput.hpp\t/^#define M /;\"\td\nS\tinput.hpp\t/^struct S {$/;\"\ts\ni\tinput.hpp\t/^\tint i;$/;\"\tm\tstruct:S\ttyperef:typename:int\nx2\tinput.hpp\t/^\tX< Y< 1 >> 2 > > x2;$/;\"\tm\tstruct:S\ttyperef:typename:X>2>>\nx3\tinput.hpp\t/^\tX< Y< M >> 2 > > x3;$/;\"\tm\tstruct:S\ttyperef:typename:X>2>>\nx4\tinput.hpp\t/^\tX< Y< M >> M > > x4;$/;\"\tm\tstruct:S\ttyperef:typename:X>M>>\nx5\tinput.hpp\t/^\tX< Y< 1 < 2 > > x5;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nx6\tinput.hpp\t/^\tX< Y< M < 2 > > x6;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nx7\tinput.hpp\t/^\tX< Y< M < M > > x7;$/;\"\tm\tstruct:S\ttyperef:typename:X>\nd\tinput.hpp\t/^\tdouble d;$/;\"\tm\tstruct:S\ttyperef:typename:double\n" }, { "path": "Units/parser-cxx.r/instantiation2.b/input.hpp", "content": "// Based on an example in https://cpplover.blogspot.com/2013/12/c03c11_3905.html (in Japanese)\n// A C++03 compiler accept this input but a C++11 compiler does not.\ntemplate struct X { };\ntemplate struct Y { };\n#define M 2\nstruct S {\n\tint i;\n\tX< Y< 1 >> 2 > > x2;\n\tX< Y< M >> 2 > > x3;\n\tX< Y< M >> M > > x4;\n\tX< Y< 1 < 2 > > x5;\n\tX< Y< M < 2 > > x6;\n\tX< Y< M < M > > x7;\n /* Too ambiguous even in C++03\n\t---------------------------\n\tX< Y< 1 > 2 > > x8;\n\tX< Y< M > 2 > > x9;\n\tX< Y< M > M > > xa;\t*/\n\tdouble d;\n};\n" }, { "path": "Units/parser-cxx.r/instantiation2.b/validator", "content": "cxx03\n" }, { "path": "Units/parser-cxx.r/iostream.d/args.ctags", "content": "--kinds-c++=+l\n" }, { "path": "Units/parser-cxx.r/iostream.d/expected.tags", "content": "foo\tinput.cpp\t/^void foo (int &x, int y, int z)$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/iostream.d/input.cpp", "content": "#include \nvoid foo (int &x, int y, int z)\n{\n\tstd::cin >> x;\n\tstd::cout << y;\n\tstd::cout << z << endl;\n}\n" }, { "path": "Units/parser-cxx.r/k-and-r.d/args.ctags", "content": "--kinds-c=*\n--sort=no\n" }, { "path": "Units/parser-cxx.r/k-and-r.d/expected.tags", "content": "f00\tinput.c\t/^void f00(a00) int a00; {}$/;\"\tf\na00\tinput.c\t/^void f00(a00) int a00; {}$/;\"\tz\tfunction:f00\ttyperef:typename:int\tfile:\nf01\tinput.c\t/^void f01(a01) int *a01; {}$/;\"\tf\na01\tinput.c\t/^void f01(a01) int *a01; {}$/;\"\tz\tfunction:f01\ttyperef:typename:int *\tfile:\nf10\tinput.c\t/^void f10(a10) struct file *a10; {}$/;\"\tf\na10\tinput.c\t/^void f10(a10) struct file *a10; {}$/;\"\tz\tfunction:f10\ttyperef:struct:file *\tfile:\nf11\tinput.c\t/^void f11(a11, a12) struct file *a11; int a12; {}$/;\"\tf\na11\tinput.c\t/^void f11(a11, a12) struct file *a11; int a12; {}$/;\"\tz\tfunction:f11\ttyperef:struct:file *\tfile:\na12\tinput.c\t/^void f11(a11, a12) struct file *a11; int a12; {}$/;\"\tz\tfunction:f11\ttyperef:typename:int\tfile:\nf12\tinput.c\t/^void f12(a13, a14) int a13; struct file *a14; {}$/;\"\tf\na13\tinput.c\t/^void f12(a13, a14) int a13; struct file *a14; {}$/;\"\tz\tfunction:f12\ttyperef:typename:int\tfile:\na14\tinput.c\t/^void f12(a13, a14) int a13; struct file *a14; {}$/;\"\tz\tfunction:f12\ttyperef:struct:file *\tfile:\nf13\tinput.c\t/^void f13(a15) register struct file *a15; {}$/;\"\tf\na15\tinput.c\t/^void f13(a15) register struct file *a15; {}$/;\"\tz\tfunction:f13\ttyperef:typename:register struct file *\tfile:\nf14\tinput.c\t/^void f14(a16, a17) register struct file *a16; int a17; {}$/;\"\tf\na16\tinput.c\t/^void f14(a16, a17) register struct file *a16; int a17; {}$/;\"\tz\tfunction:f14\ttyperef:typename:register struct file *\tfile:\na17\tinput.c\t/^void f14(a16, a17) register struct file *a16; int a17; {}$/;\"\tz\tfunction:f14\ttyperef:typename:int\tfile:\nf15\tinput.c\t/^void f15(a18, a19) register int a18; struct file *a19; {}$/;\"\tf\na18\tinput.c\t/^void f15(a18, a19) register int a18; struct file *a19; {}$/;\"\tz\tfunction:f15\ttyperef:typename:register int\tfile:\na19\tinput.c\t/^void f15(a18, a19) register int a18; struct file *a19; {}$/;\"\tz\tfunction:f15\ttyperef:struct:file *\tfile:\nf16\tinput.c\t/^void f16(a19_1) const struct file *a19_1; {}$/;\"\tf\na19_1\tinput.c\t/^void f16(a19_1) const struct file *a19_1; {}$/;\"\tz\tfunction:f16\ttyperef:typename:const struct file *\tfile:\nf17\tinput.c\t/^void f17(a19_2, a19_3) const struct file *a19_2; int a19_3; {}$/;\"\tf\na19_2\tinput.c\t/^void f17(a19_2, a19_3) const struct file *a19_2; int a19_3; {}$/;\"\tz\tfunction:f17\ttyperef:typename:const struct file *\tfile:\na19_3\tinput.c\t/^void f17(a19_2, a19_3) const struct file *a19_2; int a19_3; {}$/;\"\tz\tfunction:f17\ttyperef:typename:int\tfile:\nf18\tinput.c\t/^void f18(a19_4, a19_5) const int a19_4; struct file *a19_5; {}$/;\"\tf\na19_4\tinput.c\t/^void f18(a19_4, a19_5) const int a19_4; struct file *a19_5; {}$/;\"\tz\tfunction:f18\ttyperef:typename:const int\tfile:\na19_5\tinput.c\t/^void f18(a19_4, a19_5) const int a19_4; struct file *a19_5; {}$/;\"\tz\tfunction:f18\ttyperef:struct:file *\tfile:\nf20\tinput.c\t/^void f20(a20) union file *a20; {}$/;\"\tf\na20\tinput.c\t/^void f20(a20) union file *a20; {}$/;\"\tz\tfunction:f20\ttyperef:union:file *\tfile:\nf21\tinput.c\t/^void f21(a21, a22) union file *a21; int a22; {}$/;\"\tf\na21\tinput.c\t/^void f21(a21, a22) union file *a21; int a22; {}$/;\"\tz\tfunction:f21\ttyperef:union:file *\tfile:\na22\tinput.c\t/^void f21(a21, a22) union file *a21; int a22; {}$/;\"\tz\tfunction:f21\ttyperef:typename:int\tfile:\nf22\tinput.c\t/^void f22(a23, a24) int a23; union file *a24; {}$/;\"\tf\na23\tinput.c\t/^void f22(a23, a24) int a23; union file *a24; {}$/;\"\tz\tfunction:f22\ttyperef:typename:int\tfile:\na24\tinput.c\t/^void f22(a23, a24) int a23; union file *a24; {}$/;\"\tz\tfunction:f22\ttyperef:union:file *\tfile:\nf30\tinput.c\t/^void f30(a30) enum file *a30; {}$/;\"\tf\na30\tinput.c\t/^void f30(a30) enum file *a30; {}$/;\"\tz\tfunction:f30\ttyperef:enum:file *\tfile:\nf31\tinput.c\t/^void f31(a31, a32) enum file *a31; int a32; {}$/;\"\tf\na31\tinput.c\t/^void f31(a31, a32) enum file *a31; int a32; {}$/;\"\tz\tfunction:f31\ttyperef:enum:file *\tfile:\na32\tinput.c\t/^void f31(a31, a32) enum file *a31; int a32; {}$/;\"\tz\tfunction:f31\ttyperef:typename:int\tfile:\nf32\tinput.c\t/^void f32(a33, a34) int a33; enum file *a34; {}$/;\"\tf\na33\tinput.c\t/^void f32(a33, a34) int a33; enum file *a34; {}$/;\"\tz\tfunction:f32\ttyperef:typename:int\tfile:\na34\tinput.c\t/^void f32(a33, a34) int a33; enum file *a34; {}$/;\"\tz\tfunction:f32\ttyperef:enum:file *\tfile:\nf40\tinput.c\t/^void f40 (a41, a42, a43) struct file a41; union file a42; enum file a43; {}$/;\"\tf\na41\tinput.c\t/^void f40 (a41, a42, a43) struct file a41; union file a42; enum file a43; {}$/;\"\tz\tfunction:f40\ttyperef:struct:file\tfile:\na42\tinput.c\t/^void f40 (a41, a42, a43) struct file a41; union file a42; enum file a43; {}$/;\"\tz\tfunction:f40\ttyperef:union:file\tfile:\na43\tinput.c\t/^void f40 (a41, a42, a43) struct file a41; union file a42; enum file a43; {}$/;\"\tz\tfunction:f40\ttyperef:enum:file\tfile:\n" }, { "path": "Units/parser-cxx.r/k-and-r.d/input.c", "content": "void f00(a00) int a00; {}\nvoid f01(a01) int *a01; {}\n\n/* struct */\nvoid f10(a10) struct file *a10; {}\nvoid f11(a11, a12) struct file *a11; int a12; {}\nvoid f12(a13, a14) int a13; struct file *a14; {}\n\nvoid f13(a15) register struct file *a15; {}\nvoid f14(a16, a17) register struct file *a16; int a17; {}\nvoid f15(a18, a19) register int a18; struct file *a19; {}\n\nvoid f16(a19_1) const struct file *a19_1; {}\nvoid f17(a19_2, a19_3) const struct file *a19_2; int a19_3; {}\nvoid f18(a19_4, a19_5) const int a19_4; struct file *a19_5; {}\n\n/* union */\nvoid f20(a20) union file *a20; {}\nvoid f21(a21, a22) union file *a21; int a22; {}\nvoid f22(a23, a24) int a23; union file *a24; {}\n\n/* enum */\nvoid f30(a30) enum file *a30; {}\nvoid f31(a31, a32) enum file *a31; int a32; {}\nvoid f32(a33, a34) int a33; enum file *a34; {}\n\n/* struct union enum */\nvoid f40 (a41, a42, a43) struct file a41; union file a42; enum file a43; {}\n" }, { "path": "Units/parser-cxx.r/keyword-in-return-type.d/args.ctags", "content": "--sort=no\n--kinds-C++=+p\n" }, { "path": "Units/parser-cxx.r/keyword-in-return-type.d/expected.tags", "content": "a\tinput.cc\t/^struct Class0 * a();$/;\"\tp\ttyperef:struct:Class0 *\tfile:\nb\tinput.cc\t/^struct Class0 * b() { exit(0); }$/;\"\tf\ttyperef:struct:Class0 *\nc\tinput.cc\t/^class Class1 * c();$/;\"\tp\ttyperef:class:Class1 *\tfile:\nd\tinput.cc\t/^class Class1 * d() { exit(0); }$/;\"\tf\ttyperef:class:Class1 *\ne\tinput.cc\t/^union Class1 * e();$/;\"\tp\ttyperef:union:Class1 *\tfile:\nf\tinput.cc\t/^union Class1 * f() { exit(0); }$/;\"\tf\ttyperef:union:Class1 *\n" }, { "path": "Units/parser-cxx.r/keyword-in-return-type.d/input.cc", "content": "struct Class0 * a();\nstruct Class0 * b() { exit(0); }\n\nclass Class1 * c();\nclass Class1 * d() { exit(0); }\n\nunion Class1 * e();\nunion Class1 * f() { exit(0); }\n" }, { "path": "Units/parser-cxx.r/less-than-operator-between-anglebrackets.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/less-than-operator-between-anglebrackets.d/expected.tags", "content": "f0\tinput.cpp\t/^template0)> void f0(void) { }$/;\"\tf\ttyperef:typename:void\nf1\tinput.cpp\t/^template void f1(void) { }$/;\"\tf\ttyperef:typename:void\nf2\tinput.cpp\t/^template void f2(void) { }$/;\"\tf\ttyperef:typename:void\nf3\tinput.cpp\t/^template void f3(void) { }$/;\"\tf\ttyperef:typename:void\nf4\tinput.cpp\t/^template> 10)> void f4(void) { }$/;\"\tf\ttyperef:typename:void\nf5\tinput.cpp\t/^template 10)> void f5(void) { }$/;\"\tf\ttyperef:typename:void\nf6\tinput.cpp\t/^template void f6(void) { }$/;\"\tf\ttyperef:typename:void\nf7\tinput.cpp\t/^template= 10)> void f7(void) { }$/;\"\tf\ttyperef:typename:void\nf8\tinput.cpp\t/^template j)> void f8(void) { }$/;\"\tf\ttyperef:typename:void\nf9\tinput.cpp\t/^template j)> void f9(void) { }$/;\"\tf\ttyperef:typename:void\nf10\tinput.cpp\t/^template j)> void f10(void) { }$/;\"\tf\ttyperef:typename:void\nf11\tinput.cpp\t/^template void f11(void) { }$/;\"\tf\ttyperef:typename:void\nmain\tinput.cpp\t/^int main(void) { return 0; }$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/less-than-operator-between-anglebrackets.d/input.cpp", "content": "/* \"gcc input.cpp -c -std=c++11\" accepts this source code. */\n\ntemplate0)> void f0(void) { }\ntemplate void f1(void) { }\ntemplate void f2(void) { }\ntemplate void f3(void) { }\ntemplate> 10)> void f4(void) { }\ntemplate 10)> void f5(void) { }\ntemplate void f6(void) { }\ntemplate= 10)> void f7(void) { }\ntemplate j)> void f8(void) { }\ntemplate j)> void f9(void) { }\ntemplate j)> void f10(void) { }\ntemplate void f11(void) { }\ntemplate class A;\nint main(void) { return 0; }\n" }, { "path": "Units/parser-cxx.r/member-with-initial-value.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/member-with-initial-value.d/expected.tags", "content": "__anon0afffb470108\tinput.cc\t/^typedef struct {$/;\"\ts\tfile:\ni\tinput.cc\t/^ int i;$/;\"\tm\tstruct:__anon0afffb470108\ttyperef:typename:int\tfile:\nS\tinput.cc\t/^} S;$/;\"\tt\ttyperef:struct:__anon0afffb470108\tfile:\nc\tinput.cc\t/^class c {$/;\"\tc\tfile:\na\tinput.cc\t/^ S a = {0};$/;\"\tm\tclass:c\ttyperef:typename:S\tfile:\ni\tinput.cc\t/^ int i;$/;\"\tm\tclass:c\ttyperef:typename:int\tfile:\nt\tinput.cc\t/^struct t {$/;\"\ts\tfile:\nb\tinput.cc\t/^ S b = {0};$/;\"\tm\tstruct:t\ttyperef:typename:S\tfile:\nj\tinput.cc\t/^ int j;$/;\"\tm\tstruct:t\ttyperef:typename:int\tfile:\nu\tinput.cc\t/^union u {$/;\"\tu\tfile:\nc\tinput.cc\t/^ S c = {0};$/;\"\tm\tunion:u\ttyperef:typename:S\tfile:\nk\tinput.cc\t/^ int k;$/;\"\tm\tunion:u\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/member-with-initial-value.d/input.cc", "content": "typedef struct {\n int i;\n} S;\n\nclass c {\n S a = {0};\n int i;\n};\n\nstruct t {\n S b = {0};\n int j;\n};\n\nunion u {\n S c = {0};\n int k;\n};\n" }, { "path": "Units/parser-cxx.r/modules-1.d/args.ctags", "content": "--sort=no\n--fields=+{typeref}\n--fields-C++=+{properties}\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-cxx.r/modules-1.d/expected.tags", "content": "A\tinput.cpp\t/^export module A; \\/\\/ declares the primary module interface unit for named module 'A'$/;\"\tM\troles:def\tproperties:export\nA\tinput-0.cpp\t/^module A; \\/\\/ declares a module implementation unit for named module 'A'$/;\"\tM\troles:def\nA.B\tinput-1.cpp\t/^export module A.B; \\/\\/ declares the primary module interface unit for named module 'A.B'$/;\"\tM\troles:def\tproperties:export\nA.B\tinput-2.cpp\t/^module A.B; \\/\\/ declares a module implementation unit for named module 'A.B'$/;\"\tM\troles:def\nmodule\tinput-3.cpp\t/^int module;$/;\"\tv\ttyperef:typename:int\troles:def\nmoudle\tinput-4.cpp\t/^void moudle (void)$/;\"\tf\ttyperef:typename:void\troles:def\nmodule\tinput-5.cpp\t/^typedef int module;$/;\"\tt\ttyperef:typename:int\tfile:\troles:def\nM\tinput-5.cpp\t/^typedef module M;$/;\"\tt\ttyperef:typename:module\tfile:\troles:def\nmodule\tinput-6.cpp\t/^struct module$/;\"\ts\tfile:\troles:def\nname\tinput-6.cpp\t/^ const char *name;$/;\"\tm\tstruct:module\ttyperef:typename:const char *\tfile:\troles:def\nC\tinput-7.cpp\t/^export module C;$/;\"\tM\troles:def\tproperties:export\nmoudle\tinput-7.cpp\t/^void moudle(T x)$/;\"\tf\ttyperef:typename:void\troles:def\tproperties:export\nMy.App.ConfigModule\tinput-8.cpp\t/^export module My.App . ConfigModule [[cats::meow(-1,8, \"de\"[1])]] ;$/;\"\tM\troles:def\tproperties:export\nMy.App.AlgoModule\tinput-9.cpp\t/^module My.App . AlgoModule [[cats::meow(-1,8, \"de\"[1])]] ;$/;\"\tM\troles:def\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-0.cpp", "content": "module A; // declares a module implementation unit for named module 'A'\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-1.cpp", "content": "export module A.B; // declares the primary module interface unit for named module 'A.B'\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-2.cpp", "content": "module A.B; // declares a module implementation unit for named module 'A.B'\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-3.cpp", "content": "int module;\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-4.cpp", "content": "void moudle (void)\n{\n}\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-5.cpp", "content": "typedef int module;\ntypedef module M;\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-6.cpp", "content": "struct module\n{\n const char *name;\n};\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-7.cpp", "content": "export module C;\n\nexport template\nvoid moudle(T x)\n{\n return;\n}\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-8.cpp", "content": "// Taken from a comment in https://github.com/universal-ctags/ctags/issues/3932 submitted by @terminatorul\nexport module My.App . ConfigModule [[cats::meow(-1,8, \"de\"[1])]] ;\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input-9.cpp", "content": "// Derived from a comment in https://github.com/universal-ctags/ctags/issues/3932 submitted by @terminatorul\nmodule My.App . AlgoModule [[cats::meow(-1,8, \"de\"[1])]] ;\n" }, { "path": "Units/parser-cxx.r/modules-1.d/input.cpp", "content": "export module A; // declares the primary module interface unit for named module 'A'\n" }, { "path": "Units/parser-cxx.r/modules-1.d/validator", "content": "cxx20+module\n" }, { "path": "Units/parser-cxx.r/modules-1.d/validator-0", "content": "NONE\n" }, { "path": "Units/parser-cxx.r/modules-1.d/validator-2", "content": "NONE\n" }, { "path": "Units/parser-cxx.r/modules-1.d/validator-8", "content": "NONE\n" }, { "path": "Units/parser-cxx.r/modules-1.d/validator-9", "content": "NONE\n" }, { "path": "Units/parser-cxx.r/modules-8.d/args.ctags", "content": "--sort=no\n--extras=+q\n--fields-C++=+{properties}\n" }, { "path": "Units/parser-cxx.r/modules-8.d/expected.tags", "content": "__gmod_a88571800116\tinput.cpp\t/^module;$/;\"\tM\nA\tinput.cpp\t/^export module A;$/;\"\tM\tproperties:export\nprivate\tinput.cpp\t/^module :private;$/;\"\tP\tmodule:A\nA:private\tinput.cpp\t/^module :private;$/;\"\tP\tmodule:A\n__gmod_d9936dbd0116\tinput-0.cpp\t/^module;$/;\"\tM\nB\tinput-0.cpp\t/^export module B;$/;\"\tM\tproperties:export\nprivate\tinput-0.cpp\t/^module :private;$/;\"\tP\tmodule:B\nB:private\tinput-0.cpp\t/^module :private;$/;\"\tP\tmodule:B\n" }, { "path": "Units/parser-cxx.r/modules-8.d/input-0.cpp", "content": "module;\n\nexport module B;\n\nmodule :private;\n" }, { "path": "Units/parser-cxx.r/modules-8.d/input.cpp", "content": "module;\n\nexport module A;\n\nmodule :private;\n" }, { "path": "Units/parser-cxx.r/more-decltypes.d/args.ctags", "content": "--sort=no\n--fields-C++={properties}\n" }, { "path": "Units/parser-cxx.r/more-decltypes.d/expected.tags", "content": "a\tinput.cxx\t/^int a;$/;\"\tv\ttyperef:typename:int\nb\tinput.cxx\t/^decltype(a) b;$/;\"\tv\ttyperef:typename:decltype(a)\nc\tinput.cxx\t/^typeof(a) c;$/;\"\tv\ttyperef:typename:typeof(a)\nd\tinput.cxx\t/^__typeof__(a) d;$/;\"\tv\ttyperef:typename:__typeof__(a)\nd0\tinput.cxx\t/^__typeof(a) d0;$/;\"\tv\ttyperef:typename:__typeof(a)\ne\tinput.cxx\t/^decltype(a) const e = 1;$/;\"\tv\ttyperef:typename:decltype(a) const\nf\tinput.cxx\t/^typeof(a) const f = 2;$/;\"\tv\ttyperef:typename:typeof(a) const\ng\tinput.cxx\t/^__typeof__(a) const g = 3;$/;\"\tv\ttyperef:typename:__typeof__(a) const\ng0\tinput.cxx\t/^__typeof(a) const g0 = 3;$/;\"\tv\ttyperef:typename:__typeof(a) const\nh\tinput.cxx\t/^static decltype(a) const h = 4;$/;\"\tv\ttyperef:typename:decltype(a) const\tfile:\tproperties:static\ni\tinput.cxx\t/^static typeof(a) const i = 5;$/;\"\tv\ttyperef:typename:typeof(a) const\tfile:\tproperties:static\nj\tinput.cxx\t/^static __typeof__(a) const j = 6;$/;\"\tv\ttyperef:typename:__typeof__(a) const\tfile:\tproperties:static\nj0\tinput.cxx\t/^static __typeof(a) const j0 = 6;$/;\"\tv\ttyperef:typename:__typeof(a) const\tfile:\tproperties:static\nk\tinput.cxx\t/^static const decltype(a) k = 7;$/;\"\tv\ttyperef:typename:const decltype(a)\tfile:\tproperties:static\nl\tinput.cxx\t/^static const typeof(a) l = 8;$/;\"\tv\ttyperef:typename:const typeof(a)\tfile:\tproperties:static\nm\tinput.cxx\t/^static const __typeof__(a) m = 9;$/;\"\tv\ttyperef:typename:const __typeof__(a)\tfile:\tproperties:static\nm0\tinput.cxx\t/^static const __typeof(a) m0 = 10;$/;\"\tv\ttyperef:typename:const __typeof(a)\tfile:\tproperties:static\n" }, { "path": "Units/parser-cxx.r/more-decltypes.d/input.cxx", "content": "int a;\n\ndecltype(a) b;\ntypeof(a) c;\n__typeof__(a) d;\n__typeof(a) d0;\n\ndecltype(a) const e = 1;\ntypeof(a) const f = 2;\n__typeof__(a) const g = 3;\n__typeof(a) const g0 = 3;\n\nstatic decltype(a) const h = 4;\nstatic typeof(a) const i = 5;\nstatic __typeof__(a) const j = 6;\nstatic __typeof(a) const j0 = 6;\n\nstatic const decltype(a) k = 7;\nstatic const typeof(a) l = 8;\nstatic const __typeof__(a) m = 9;\nstatic const __typeof(a) m0 = 10;\n" }, { "path": "Units/parser-cxx.r/namespace-alias-in-function.d/args.ctags", "content": "--kinds-C++=+A\n" }, { "path": "Units/parser-cxx.r/namespace-alias-in-function.d/expected.tags", "content": "ABC\tinput.cpp\t/^namespace ABC {$/;\"\tn\tfile:\nX\tinput.cpp\t/^ namespace X = ABC;$/;\"\tA\tfunction:foo\tfile:\tname:ABC\nfoo\tinput.cpp\t/^int foo (void)$/;\"\tf\ttyperef:typename:int\nx\tinput.cpp\t/^ int x = 1;$/;\"\tv\tnamespace:ABC\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/namespace-alias-in-function.d/input.cpp", "content": "namespace ABC {\n int x = 1;\n}\n\nint foo (void)\n{\n namespace X = ABC;\n return X::x;\n}\n" }, { "path": "Units/parser-cxx.r/namespace-and-preprocessor.cpp.d/args.ctags", "content": "--sort=no\n--kinds-C++=*" }, { "path": "Units/parser-cxx.r/namespace-and-preprocessor.cpp.d/expected.tags", "content": "Name\tinput.cpp\t/^\tName {$/;\"\tn\tfile:\n" }, { "path": "Units/parser-cxx.r/namespace-and-preprocessor.cpp.d/input.cpp", "content": "#ifdef SOMETHING\n\tnamespace\n#else\n\tclass\n#endif\n\tName {\n\t};\n\n" }, { "path": "Units/parser-cxx.r/namespace-and-scope.b/args.ctags", "content": "--kinds-C++=*\n--fields=+K\n" }, { "path": "Units/parser-cxx.r/namespace-and-scope.b/expected.tags", "content": "X\tinput.cpp\t/^namespace X {$/;\"\tnamespace\tfile:\nf\tinput.cpp\t/^\tvoid f (void);$/;\"\tprototype\tnamespace:X\tfile:\nf\tinput.cpp\t/^void X::f (void) {}$/;\"\tfunction\tnamespace:X\n" }, { "path": "Units/parser-cxx.r/namespace-and-scope.b/input.cpp", "content": "namespace X {\n\tvoid f (void);\n};\nvoid X::f (void) {}\n" }, { "path": "Units/parser-cxx.r/namespace.cpp.d/args.ctags", "content": "--sort=no\n--fields=+e\n--fields-c++=+{properties}\n--kinds-c++=+A\n" }, { "path": "Units/parser-cxx.r/namespace.cpp.d/expected.tags", "content": "__anon396601200111\tinput.cpp\t/^namespace {$/;\"\tn\tfile:\tend:8\nanon_f\tinput.cpp\t/^\tvoid anon_f() { };$/;\"\tf\tnamespace:__anon396601200111\ttyperef:typename:void\tend:3\n__anon396601200211\tinput.cpp\t/^\tnamespace {$/;\"\tn\tnamespace:__anon396601200111\tfile:\tend:7\nanon_anon_f\tinput.cpp\t/^\t\tvoid anon_anon_f() { };$/;\"\tf\tnamespace:__anon396601200111::__anon396601200211\ttyperef:typename:void\tend:6\na1\tinput.cpp\t/^namespace a1 {$/;\"\tn\tfile:\tend:24\na1_f\tinput.cpp\t/^\tvoid a1_f() { }$/;\"\tf\tnamespace:a1\ttyperef:typename:void\tend:11\na2\tinput.cpp\t/^\tnamespace a2 {$/;\"\tn\tnamespace:a1\tfile:\tend:19\na1_a2_f\tinput.cpp\t/^\t\tvoid a1_a2_f() { }$/;\"\tf\tnamespace:a1::a2\ttyperef:typename:void\tend:14\na3\tinput.cpp\t/^\t\tnamespace a3 {$/;\"\tn\tnamespace:a1::a2\tfile:\tend:18\na1_a2_a3_f\tinput.cpp\t/^\t\t\tvoid a1_a2_a3_f() { };$/;\"\tf\tnamespace:a1::a2::a3\ttyperef:typename:void\tend:17\n__anon396601200311\tinput.cpp\t/^\tnamespace {$/;\"\tn\tnamespace:a1\tfile:\tend:23\na1_anon_f\tinput.cpp\t/^\t\tvoid a1_anon_f() { };$/;\"\tf\tnamespace:a1::__anon396601200311\ttyperef:typename:void\tend:22\nb1\tinput.cpp\t/^namespace b1::b2 {$/;\"\tn\tfile:\tend:32\nb2\tinput.cpp\t/^namespace b1::b2 {$/;\"\tn\tnamespace:b1\tfile:\tend:32\nb1_b2_f\tinput.cpp\t/^\tvoid b1_b2_f() { };$/;\"\tf\tnamespace:b1::b2\ttyperef:typename:void\tend:27\nb3\tinput.cpp\t/^\tnamespace b3::b4 {$/;\"\tn\tnamespace:b1::b2\tfile:\tend:31\nb4\tinput.cpp\t/^\tnamespace b3::b4 {$/;\"\tn\tnamespace:b1::b2::b3\tfile:\tend:31\nb1_b2_b3_b4_f\tinput.cpp\t/^\t\tvoid b1_b2_b3_b4_f() { };$/;\"\tf\tnamespace:b1::b2::b3::b4\ttyperef:typename:void\tend:30\nc1\tinput.cpp\t/^inline namespace c1 {$/;\"\tn\tfile:\tend:38\tproperties:inline\nc2\tinput.cpp\t/^\tnamespace c2 {$/;\"\tn\tnamespace:c1\tfile:\tend:37\nc1_c2_f\tinput.cpp\t/^\t\tvoid c1_c2_f() { };$/;\"\tf\tnamespace:c1::c2\ttyperef:typename:void\tend:36\nd1\tinput.cpp\t/^inline namespace d1::d2 {$/;\"\tn\tfile:\tend:46\tproperties:inline\nd2\tinput.cpp\t/^inline namespace d1::d2 {$/;\"\tn\tnamespace:d1\tfile:\tend:46\tproperties:inline\nd1_d2_f\tinput.cpp\t/^\tvoid d1_d2_f() { };$/;\"\tf\tnamespace:d1::d2\ttyperef:typename:void\tend:41\nd3\tinput.cpp\t/^\tinline namespace d3::d4 {$/;\"\tn\tnamespace:d1::d2\tfile:\tend:45\tproperties:inline\nd4\tinput.cpp\t/^\tinline namespace d3::d4 {$/;\"\tn\tnamespace:d1::d2::d3\tfile:\tend:45\tproperties:inline\nd1_d2_d3_d4_f\tinput.cpp\t/^\t\tvoid d1_d2_d3_d4_f() { }$/;\"\tf\tnamespace:d1::d2::d3::d4\ttyperef:typename:void\tend:44\ne1\tinput.cpp\t/^namespace e1 = a1::a2::a3;$/;\"\tA\tfile:\tname:a1::a2::a3\ne2\tinput.cpp\t/^namespace e2 = b1::b2 __attribute__((abi_tag(\"blah\")));$/;\"\tA\tfile:\tname:b1::b2\nf1\tinput.cpp\t/^namespace f1 _SOME_MACRO(default)$/;\"\tn\tfile:\tend:54\nf2\tinput.cpp\t/^namespace f2::f3 _SOME_MACRO(\"blah\",\"foo\")$/;\"\tn\tfile:\tend:58\nf3\tinput.cpp\t/^namespace f2::f3 _SOME_MACRO(\"blah\",\"foo\")$/;\"\tn\tnamespace:f2\tfile:\tend:58\nz1\tinput.cpp\t/^namespace z1 { };$/;\"\tn\tfile:\tend:60\n" }, { "path": "Units/parser-cxx.r/namespace.cpp.d/input.cpp", "content": "\nnamespace {\n\tvoid anon_f() { };\n\t\n\tnamespace {\n\t\tvoid anon_anon_f() { };\n\t}\n}\n\nnamespace a1 {\n\tvoid a1_f() { }\n\n\tnamespace a2 {\n\t\tvoid a1_a2_f() { }\n\t\t\n\t\tnamespace a3 {\n\t\t\tvoid a1_a2_a3_f() { };\n\t\t}\n\t}\n\t\n\tnamespace {\n\t\tvoid a1_anon_f() { };\n\t}\n}\n\nnamespace b1::b2 {\n\tvoid b1_b2_f() { };\n\n\tnamespace b3::b4 {\n\t\tvoid b1_b2_b3_b4_f() { };\n\t}\n}\n\ninline namespace c1 {\n\tnamespace c2 {\n\t\tvoid c1_c2_f() { };\n\t}\n}\n\ninline namespace d1::d2 {\n\tvoid d1_d2_f() { };\n\t\n\tinline namespace d3::d4 {\n\t\tvoid d1_d2_d3_d4_f() { }\n\t}\n}\n\nnamespace e1 = a1::a2::a3;\n\nnamespace e2 = b1::b2 __attribute__((abi_tag(\"blah\")));\n\nnamespace f1 _SOME_MACRO(default)\n{\n}\n\nnamespace f2::f3 _SOME_MACRO(\"blah\",\"foo\")\n{\n}\n\nnamespace z1 { };\n\n\n" }, { "path": "Units/parser-cxx.r/new-delete.d/args.ctags", "content": "--kinds-c++=*\n--sort=no\n" }, { "path": "Units/parser-cxx.r/new-delete.d/expected.tags", "content": "fn\tinput.cpp\t/^Class fn()$/;\"\tf\ttyperef:typename:Class\n" }, { "path": "Units/parser-cxx.r/new-delete.d/input.cpp", "content": "// Only fn() should be reported here.\nClass fn()\n{\n\tdelete x;\n\tdelete[] x;\n\tnew Class();\n\t(void)new Class();\n\treturn new Class();\n}" }, { "path": "Units/parser-cxx.r/operators.cpp.d/args.ctags", "content": "--kinds-c++=pf\n--sort=no\n" }, { "path": "Units/parser-cxx.r/operators.cpp.d/expected.tags", "content": "operator =\tinput.cpp\t/^\tX & operator = (const X &x)$/;\"\tf\tclass:X\ttyperef:typename:X &\tfile:\noperator ==\tinput.cpp\t/^\tbool operator == (const X &x)$/;\"\tf\tclass:X\ttyperef:typename:bool\tfile:\noperator -=\tinput.cpp\t/^\tinline X & operator-=(const X &x)$/;\"\tf\tclass:X\ttyperef:typename:X &\tfile:\noperator +=\tinput.cpp\t/^\tinline X & operator += (const X &x)$/;\"\tf\tclass:X\ttyperef:typename:X &\tfile:\noperator *=\tinput.cpp\t/^\tX & operator *= (int x);$/;\"\tp\tclass:X\ttyperef:typename:X &\tfile:\noperator *=\tinput.cpp\t/^\tX & operator *= (const X & x);$/;\"\tp\tclass:X\ttyperef:typename:X &\tfile:\noperator &&\tinput.cpp\t/^\tX operator && (const X &a);$/;\"\tp\tclass:X\ttyperef:typename:X\tfile:\noperator /=\tinput.cpp\t/^\tinline void operator \\/= (int)$/;\"\tf\tclass:X\ttyperef:typename:void\tfile:\noperator ()\tinput.cpp\t/^\tinline void *** operator()()$/;\"\tf\tclass:X\ttyperef:typename:void ***\tfile:\noperator ++\tinput.cpp\t/^\tinline X & operator++()$/;\"\tf\tclass:X\ttyperef:typename:X &\tfile:\noperator --\tinput.cpp\t/^\tX & operator--()$/;\"\tf\tclass:X\ttyperef:typename:X &\tfile:\noperator []\tinput.cpp\t/^\tint operator[](int)$/;\"\tf\tclass:X\ttyperef:typename:int\tfile:\noperator []\tinput.cpp\t/^\tint operator[](const X &a) const$/;\"\tf\tclass:X\ttyperef:typename:int\tfile:\noperator *\tinput.cpp\t/^\tinline friend X operator*(const X &a, const X &b)$/;\"\tf\ttyperef:typename:X\tfile:\noperator new\tinput.cpp\t/^\tvoid * operator new(size_t);$/;\"\tp\tclass:X\ttyperef:typename:void *\tfile:\noperator delete\tinput.cpp\t/^\tvoid operator delete(void *);$/;\"\tp\tclass:X\ttyperef:typename:void\tfile:\noperator new[]\tinput.cpp\t/^\tvoid * operator new[](size_t);$/;\"\tp\tclass:X\ttyperef:typename:void *\tfile:\noperator delete[]\tinput.cpp\t/^\tvoid operator delete[](void *);$/;\"\tp\tclass:X\ttyperef:typename:void\tfile:\noperator Type\tinput.cpp\t/^\toperator Type() const;$/;\"\tp\tclass:X\tfile:\noperator <=>\tinput.cpp\t/^\tauto operator<=>(const X&a) const -> decltype(1 <=> 2)$/;\"\tf\tclass:X\ttyperef:typename:decltype(1<=>2)\tfile:\noperator *=\tinput.cpp\t/^X & X::operator *= (int x)$/;\"\tf\tclass:X\ttyperef:typename:X &\noperator *=\tinput.cpp\t/^X & X::operator *= (const X & x)$/;\"\tf\tclass:X\ttyperef:typename:X &\noperator &&\tinput.cpp\t/^X X::operator && (const X &a)$/;\"\tf\tclass:X\ttyperef:typename:X\noperator new\tinput.cpp\t/^void * X::operator new(size_t)$/;\"\tf\tclass:X\ttyperef:typename:void *\noperator delete\tinput.cpp\t/^void X::operator delete(void *)$/;\"\tf\tclass:X\ttyperef:typename:void\noperator new[]\tinput.cpp\t/^void * X::operator new[](size_t)$/;\"\tf\tclass:X\ttyperef:typename:void *\noperator delete[]\tinput.cpp\t/^void X::operator delete[](void *)$/;\"\tf\tclass:X\ttyperef:typename:void\nmain\tinput.cpp\t/^int main(int argc,char ** argv)$/;\"\tf\ttyperef:typename:int\noperator Type\tinput.cpp\t/^X::operator Type() const$/;\"\tf\tclass:X\noperator Eigen::Transform\tinput.cpp\t/^template inline cv::Affine3::operator Eigen::Transform\n#include \n\nclass Type {};\n\nclass X\n{\npublic:\n\tX & operator = (const X &x)\n\t{\n\t\treturn *this;\n\t}\n\t\n\tbool operator == (const X &x)\n\t{\n\t\treturn true;\n\t}\n\t\n\tinline X & operator-=(const X &x)\n\t{\n\t\treturn *this;\n\t}\n\t\n\tinline X & operator += (const X &x)\n\t{\n\t\treturn *this;\n\t}\n\t\n\tX & operator *= (int x);\n\tX & operator *= (const X & x);\n\tX operator && (const X &a);\n\n\tinline void operator /= (int)\n\t{\n\t}\n\t\n\tinline void *** operator()()\n\t{\n\t\treturn 0;\n\t}\n\t\n\tinline X & operator++()\n\t{\n\t\treturn *this;\n\t}\n\n\n\tX & operator--()\n\t{\n\t\treturn *this;\n\t}\n\t\n\tint operator[](int)\n\t{\n\t\treturn 0;\n\t}\n\t\n\tint operator[](const X &a) const\n\t{\n\t\treturn 0;\n\t}\n\t\n\t// This should appear as member of the global namespace\n\tinline friend X operator*(const X &a, const X &b)\n\t{\n\t\treturn X();\n\t}\n\t\n\t// This should NOT appear at all\n\tfriend X operator && (const X &a,const X & b);\n\t\n\tvoid * operator new(size_t);\n\tvoid operator delete(void *);\n\tvoid * operator new[](size_t);\n\tvoid operator delete[](void *);\n\n\toperator Type() const;\n\n\t// requires -std=c++20 to compile\n\tauto operator<=>(const X&a) const -> decltype(1 <=> 2)\n\t{\n\t\treturn std::strong_ordering::less;\n\t}\n};\n\nX & X::operator *= (int x)\n{\n\treturn *this;\n}\n\nX & X::operator *= (const X & x)\n{\n\treturn *this;\n}\n\nX X::operator && (const X &a)\n{\n\treturn *this;\n}\n\nvoid * X::operator new(size_t)\n{\n\treturn NULL;\n}\n\nvoid X::operator delete(void *)\n{\n}\n\nvoid * X::operator new[](size_t)\n{\n\treturn NULL;\n}\n\nvoid X::operator delete[](void *)\n{\n}\n\nint main(int argc,char ** argv)\n{\n\tX x;\n\treturn x[0];\n}\n\nX::operator Type() const\n{\n\treturn Type();\n}\n\n#ifdef DONT_CARE_ABOUT_COMPILATION\n// This doesn't compile because it lacks the necessary definitions. But it's still extracted.\n\ntemplate inline cv::Affine3::operator Eigen::Transform() const\n{\n\tEigen::Transform r;\n\tcv::Mat hdr(4, 4, cv::traits::Type::value, r.matrix().data());\n\tcv::Mat(matrix, false).copyTo(hdr);\n\treturn r;\n}\n\n#endif\n" }, { "path": "Units/parser-cxx.r/out-range-input-for-isspace.d/expected.tags", "content": "main\tinput.cpp\t/^int main() {}$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/out-range-input-for-isspace.d/input.cpp", "content": "extern \"C\"{\n};\n\nint main() {}\n" }, { "path": "Units/parser-cxx.r/partition.d/args.ctags", "content": "--sort=no\n--fields=+{scope}{roles}\n--fields-C++=+{properties}\n--extras=+rq\n" }, { "path": "Units/parser-cxx.r/partition.d/expected.tags", "content": "My.App.ConfigModule\tinput.cpp\t/^export module My.App . ConfigModule: ConfigData. IniSettings ;$/;\"\tM\troles:partOwner\nConfigData.IniSettings\tinput.cpp\t/^export module My.App . ConfigModule: ConfigData. IniSettings ;$/;\"\tP\tscope:module:My.App.ConfigModule\troles:def\tproperties:export\nMy.App.ConfigModule:ConfigData.IniSettings\tinput.cpp\t/^export module My.App . ConfigModule: ConfigData. IniSettings ;$/;\"\tP\tscope:module:My.App.ConfigModule\troles:def\tproperties:export\nMy.App.ConfigModule\tinput-0.cpp\t/^module My.App . ConfigModule: Config.Data. IniSettings ;$/;\"\tM\troles:partOwner\nConfig.Data.IniSettings\tinput-0.cpp\t/^module My.App . ConfigModule: Config.Data. IniSettings ;$/;\"\tP\tscope:module:My.App.ConfigModule\troles:def\nMy.App.ConfigModule:Config.Data.IniSettings\tinput-0.cpp\t/^module My.App . ConfigModule: Config.Data. IniSettings ;$/;\"\tP\tscope:module:My.App.ConfigModule\troles:def\nA\tinput-1.cpp\t/^export module A: ConfigData. IniSettings ;$/;\"\tM\troles:partOwner\nConfigData.IniSettings\tinput-1.cpp\t/^export module A: ConfigData. IniSettings ;$/;\"\tP\tscope:module:A\troles:def\tproperties:export\nA:ConfigData.IniSettings\tinput-1.cpp\t/^export module A: ConfigData. IniSettings ;$/;\"\tP\tscope:module:A\troles:def\tproperties:export\nMy.App.ConfigModule\tinput-2.cpp\t/^export module My.App . ConfigModule: B ;$/;\"\tM\troles:partOwner\nB\tinput-2.cpp\t/^export module My.App . ConfigModule: B ;$/;\"\tP\tscope:module:My.App.ConfigModule\troles:def\tproperties:export\nMy.App.ConfigModule:B\tinput-2.cpp\t/^export module My.App . ConfigModule: B ;$/;\"\tP\tscope:module:My.App.ConfigModule\troles:def\tproperties:export\nMy.App.ConfigModule\tinput-3.cpp\t/^export module My.App . ConfigModule: ;$/;\"\tM\troles:def\tproperties:export\n" }, { "path": "Units/parser-cxx.r/partition.d/input-0.cpp", "content": "module My.App . ConfigModule: Config.Data. IniSettings ;\n" }, { "path": "Units/parser-cxx.r/partition.d/input-1.cpp", "content": "export module A: ConfigData. IniSettings ;\n" }, { "path": "Units/parser-cxx.r/partition.d/input-2.cpp", "content": "export module My.App . ConfigModule: B ;\n" }, { "path": "Units/parser-cxx.r/partition.d/input-3.cpp", "content": "export module My.App . ConfigModule: ;\n" }, { "path": "Units/parser-cxx.r/partition.d/input-4.cpp", "content": "module : Config.Data. IniSettings ; // Illegal syntax\n" }, { "path": "Units/parser-cxx.r/partition.d/input.cpp", "content": "export module My.App . ConfigModule: ConfigData. IniSettings ;\n" }, { "path": "Units/parser-cxx.r/pointer-to-array.d/args.ctags", "content": "--kinds-c=+l\n" }, { "path": "Units/parser-cxx.r/pointer-to-array.d/expected.tags", "content": "arr\tinput.c\t/^ int (*arr)[] = foo();$/;\"\tl\tfunction:main\ttyperef:typename:int (*)[]\tfile:\nbar\tinput.c\t/^int2ptr_func bar = foo;$/;\"\tv\ttyperef:typename:int2ptr_func\nbaz\tinput.c\t/^int2ptr (*baz)(void) = foo;$/;\"\tv\ttyperef:typename:int2ptr (*)(void)\nfoo\tinput.c\t/^static int (*foo(void))[2] {$/;\"\tf\ttyperef:typename:int (*)[2]\tfile:\nfoo_arr\tinput.c\t/^ static int foo_arr[2] = {1, 2};$/;\"\tl\tfunction:foo\ttyperef:typename:int[2]\tfile:\nint2ptr\tinput.c\t/^typedef int (*int2ptr)[2];$/;\"\tt\ttyperef:typename:int (*)[2]\tfile:\nint2ptr_func\tinput.c\t/^typedef int (*(*int2ptr_func)(void))[2];$/;\"\tt\ttyperef:typename:int (* (*)(void))[2]\tfile:\nmain\tinput.c\t/^int main(void) {$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/pointer-to-array.d/input.c", "content": "\n#include \n\ntypedef int (*int2ptr)[2];\ntypedef int (*(*int2ptr_func)(void))[2];\n\nstatic int (*foo(void))[2] {\n static int foo_arr[2] = {1, 2};\n return &foo_arr;\n}\n\nint2ptr (*baz)(void) = foo;\nint2ptr_func bar = foo;\n\nint main(void) {\n int (*arr)[] = foo();\n printf(\"array[0] = %d\\n\", (*arr)[0]);\n printf(\"array[1] = %d\\n\", (*arr)[1]);\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/properties-consteval.d/args.ctags", "content": "--sort=no\n--kinds-c++=*-{parameter}\n--fields=+x\n--fields-c++=+{properties}\n" }, { "path": "Units/parser-cxx.r/properties-consteval.d/expected.tags", "content": "sqr\tinput.cc\t/^consteval int sqr(int n)$/;\"\tf\ttyperef:typename:int\tproperties:consteval\nr\tinput.cc\t/^constexpr int r = sqr(100); \\/\\/ OK$/;\"\tv\ttyperef:typename:int\tproperties:constexpr\nx\tinput.cc\t/^int x = 100;$/;\"\tv\ttyperef:typename:int\nr2\tinput.cc\t/^int r2 = sqr(x); \\/\\/ Error: Call does not produce a constant$/;\"\tv\ttyperef:typename:int\nsqrsqr\tinput.cc\t/^consteval int sqrsqr(int n)$/;\"\tf\ttyperef:typename:int\tproperties:consteval\ndblsqr\tinput.cc\t/^constexpr int dblsqr(int n)$/;\"\tf\ttyperef:typename:int\tproperties:constexpr\nf\tinput.cc\t/^consteval int f() { return 42; }$/;\"\tf\ttyperef:typename:int\tproperties:consteval\ng\tinput.cc\t/^consteval auto g() { return &f; }$/;\"\tf\ttyperef:typename:auto\tproperties:consteval\nh\tinput.cc\t/^consteval int h(int (*p)() = g()) { return p(); }$/;\"\tf\ttyperef:typename:int\tproperties:consteval\n" }, { "path": "Units/parser-cxx.r/properties-consteval.d/input.cc", "content": "// Taken from https://en.cppreference.com/w/cpp/language/consteval\nconsteval int sqr(int n)\n{\n return n*n;\n}\nconstexpr int r = sqr(100); // OK\n \nint x = 100;\nint r2 = sqr(x); // Error: Call does not produce a constant\n \nconsteval int sqrsqr(int n)\n{\n return sqr(sqr(n)); // Not a constant expression at this point, but OK\n}\n \nconstexpr int dblsqr(int n)\n{\n return 2 * sqr(n); // Error: Enclosing function is not consteval\n // and sqr(n) is not a constant\n}\n\nconsteval int f() { return 42; }\nconsteval auto g() { return &f; }\nconsteval int h(int (*p)() = g()) { return p(); }\n\n" }, { "path": "Units/parser-cxx.r/properties-constexpr.d/args.ctags", "content": "--sort=no\n--kinds-c++=*\n--fields=+x\n--fields-c++=+{properties}\n" }, { "path": "Units/parser-cxx.r/properties-constexpr.d/expected.tags", "content": "factorial\tinput.cc\t/^constexpr int factorial(int n)$/;\"\tf\ttyperef:typename:int\tproperties:constexpr\nn\tinput.cc\t/^constexpr int factorial(int n)$/;\"\tz\tfunction:factorial\ttyperef:typename:int\tfile:\nfactorial_cxx14\tinput.cc\t/^constexpr int factorial_cxx14(int n)$/;\"\tf\ttyperef:typename:int\tproperties:constexpr\nn\tinput.cc\t/^constexpr int factorial_cxx14(int n)$/;\"\tz\tfunction:factorial_cxx14\ttyperef:typename:int\tfile:\nres\tinput.cc\t/^ int res = 1;$/;\"\tl\tfunction:factorial_cxx14\ttyperef:typename:int\tfile:\nconststr\tinput.cc\t/^class conststr$/;\"\tc\tfile:\np\tinput.cc\t/^ const char* p;$/;\"\tm\tclass:conststr\ttyperef:typename:const char *\tfile:\nsz\tinput.cc\t/^ std::size_t sz;$/;\"\tm\tclass:conststr\ttyperef:typename:std::size_t\tfile:\nconststr\tinput.cc\t/^ constexpr conststr(const char(&a)[N]): p(a), sz(N - 1) {}$/;\"\tf\tclass:conststr\tfile:\tproperties:constexpr\na\tinput.cc\t/^ constexpr conststr(const char(&a)[N]): p(a), sz(N - 1) {}$/;\"\tz\tfunction:conststr::conststr\ttyperef:typename:const char (&)[N]\tfile:\noperator []\tinput.cc\t/^ constexpr char operator[](std::size_t n) const$/;\"\tf\tclass:conststr\ttyperef:typename:char\tfile:\tproperties:const,constexpr\nn\tinput.cc\t/^ constexpr char operator[](std::size_t n) const$/;\"\tz\tfunction:conststr::operator []\ttyperef:typename:std::size_t\tfile:\nsize\tinput.cc\t/^ constexpr std::size_t size() const { return sz; }$/;\"\tf\tclass:conststr\ttyperef:typename:std::size_t\tfile:\tproperties:const,constexpr\ncountlower\tinput.cc\t/^constexpr std::size_t countlower(conststr s, std::size_t n = 0,$/;\"\tf\ttyperef:typename:std::size_t\tproperties:constexpr\ns\tinput.cc\t/^constexpr std::size_t countlower(conststr s, std::size_t n = 0,$/;\"\tz\tfunction:countlower\ttyperef:typename:conststr\tfile:\nn\tinput.cc\t/^constexpr std::size_t countlower(conststr s, std::size_t n = 0,$/;\"\tz\tfunction:countlower\ttyperef:typename:std::size_t\tfile:\nc\tinput.cc\t/^\t\t\t\t\t std::size_t c = 0)$/;\"\tz\tfunction:countlower\ttyperef:typename:std::size_t\tfile:\nconstN\tinput.cc\t/^struct constN$/;\"\ts\tfile:\nn\tinput.cc\t/^template$/;\"\tZ\tstruct:constN\ttyperef:typename:int\nconstN\tinput.cc\t/^ constN() { std::cout << n << '\\\\n'; }$/;\"\tf\tstruct:constN\tfile:\nmain\tinput.cc\t/^int main()$/;\"\tf\ttyperef:typename:int\nout1\tinput.cc\t/^ constN out1; \\/\\/ computed at compile time$/;\"\tl\tfunction:main\ttyperef:typename:constN\tfile:\nk\tinput.cc\t/^ volatile int k = 8; \\/\\/ disallow optimization using volatile$/;\"\tl\tfunction:main\ttyperef:typename:volatile int\tfile:\nout2\tinput.cc\t/^ constN out2; \\/\\/ implicitly converted to conststr$/;\"\tl\tfunction:main\ttyperef:typename:constN\tfile:\na\tinput.cc\t/^ constexpr int a[12] = {0, 1, 2, 3, 4, 5, 6, 7, 8};$/;\"\tl\tfunction:main\ttyperef:typename:int[12]\tfile:\tproperties:constexpr\nlength_a\tinput.cc\t/^ constexpr int length_a = sizeof(a)\\/sizeof(int); \\/\\/ std::size(a) in C++17,$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\tproperties:constexpr\ni\tinput.cc\t/^ for (int i = 0; i < length_a; ++i)$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-cxx.r/properties-constexpr.d/input.cc", "content": "// Taken from https://en.cppreference.com/w/cpp/language/constexpr\n\n#include \n#include \n\n// C++11 constexpr functions use recursion rather than iteration\nconstexpr int factorial(int n)\n{\n return n <= 1 ? 1 : (n * factorial(n - 1));\n}\n\n// C++14 constexpr functions may use local variables and loops\n#if __cplusplus >= 201402L\nconstexpr int factorial_cxx14(int n)\n{\n int res = 1;\n while (n > 1)\n\tres *= n--;\n return res;\n}\n#endif // C++14\n\n// literal class\nclass conststr\n{\n const char* p;\n std::size_t sz;\npublic:\n template\n constexpr conststr(const char(&a)[N]): p(a), sz(N - 1) {}\n\n // constexpr functions signal errors by throwing exceptions\n // in C++11, they must do so from the conditional operator ?:\n constexpr char operator[](std::size_t n) const\n {\n\treturn n < sz ? p[n] : throw std::out_of_range(\"\");\n }\n\n constexpr std::size_t size() const { return sz; }\n};\n\n// C++11 constexpr functions had to put everything in a single return statement\n// (C++14 doesn't have that requirement)\nconstexpr std::size_t countlower(conststr s, std::size_t n = 0,\n\t\t\t\t\t std::size_t c = 0)\n{\n return n == s.size() ? c :\n\t'a' <= s[n] && s[n] <= 'z' ? countlower(s, n + 1, c + 1) :\n\t\t\t\t countlower(s, n + 1, c);\n}\n\n// output function that requires a compile-time constant, for testing\ntemplate\nstruct constN\n{\n constN() { std::cout << n << '\\n'; }\n};\n\nint main()\n{\n std::cout << \"4! = \" ;\n constN out1; // computed at compile time\n\n volatile int k = 8; // disallow optimization using volatile\n std::cout << k << \"! = \" << factorial(k) << '\\n'; // computed at run time\n\n std::cout << \"the number of lowercase letters in \\\"Hello, world!\\\" is \";\n constN out2; // implicitly converted to conststr\n\n constexpr int a[12] = {0, 1, 2, 3, 4, 5, 6, 7, 8};\n constexpr int length_a = sizeof(a)/sizeof(int); // std::size(a) in C++17,\n\t\t\t\t\t\t // std::ssize(a) in C++20\n std::cout << \"array of length \" << length_a << \" has elements: \";\n for (int i = 0; i < length_a; ++i)\n\tstd::cout << a[i] << \" \";\n}\n" }, { "path": "Units/parser-cxx.r/properties-constinit.d/args.ctags", "content": "--sort=no\n--kinds-c++=*-{parameter}\n--fields=+x\n--fields-c++=+{properties}\n" }, { "path": "Units/parser-cxx.r/properties-constinit.d/expected.tags", "content": "g\tinput.cc\t/^const char *g() { return \"dynamic initialization\"; }$/;\"\tf\ttyperef:typename:const char *\nf\tinput.cc\t/^constexpr const char *f(bool p) { return p ? \"constant initializer\" : g(); }$/;\"\tf\ttyperef:typename:const char *\tproperties:constexpr\nc\tinput.cc\t/^constinit const char *c = f(true); \\/\\/ OK$/;\"\tv\ttyperef:typename:const char *\tproperties:constinit\nx\tinput.cc\t/^extern thread_local constinit int x;$/;\"\tx\ttyperef:typename:int\tproperties:extern,constinit,thread_local\nf\tinput.cc\t/^int f() { return x; } \\/\\/ no check of a guard variable needed$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/properties-constinit.d/input.cc", "content": "// Taken from https://en.cppreference.com/w/cpp/language/constinit\nconst char *g() { return \"dynamic initialization\"; }\nconstexpr const char *f(bool p) { return p ? \"constant initializer\" : g(); }\n\nconstinit const char *c = f(true); // OK\n\nextern thread_local constinit int x;\nint f() { return x; } // no check of a guard variable needed\n" }, { "path": "Units/parser-cxx.r/properties.cpp.d/args.ctags", "content": "--sort=no\n--kinds-c++=*\n--fields=+x\n--fields-c++=+{properties}" }, { "path": "Units/parser-cxx.r/properties.cpp.d/expected.tags", "content": "C01\tinput.cpp\t/^class C01$/;\"\tc\tfile:\nC01\tinput.cpp\t/^\tC01() = default;$/;\"\tp\tclass:C01\tfile:\tproperties:default\nmp01\tinput.cpp\t/^\tstatic int mp01;$/;\"\tm\tclass:C01\ttyperef:typename:int\tfile:\tproperties:static\nmp02\tinput.cpp\t/^\tmutable int mp02;$/;\"\tm\tclass:C01\ttyperef:typename:int\tfile:\tproperties:mutable\nmf01\tinput.cpp\t/^\tvirtual void mf01();$/;\"\tp\tclass:C01\ttyperef:typename:void\tfile:\tproperties:virtual\nmf02\tinput.cpp\t/^\tvirtual void mf02() final;$/;\"\tp\tclass:C01\ttyperef:typename:void\tfile:\tproperties:final,virtual\nC02\tinput.cpp\t/^class C02 : public C01$/;\"\tc\tfile:\nC02\tinput.cpp\t/^\tC02() = delete;$/;\"\tp\tclass:C02\tfile:\tproperties:delete\nC02\tinput.cpp\t/^\texplicit C02(int i)$/;\"\tf\tclass:C02\tfile:\tproperties:explicit\ni\tinput.cpp\t/^\texplicit C02(int i)$/;\"\tz\tfunction:C02::C02\ttyperef:typename:int\tfile:\nmf01\tinput.cpp\t/^\tvoid mf01() override;$/;\"\tp\tclass:C02\ttyperef:typename:void\tfile:\tproperties:override,virtual\nmf03\tinput.cpp\t/^\tvirtual void mf03() = 0;$/;\"\tp\tclass:C02\ttyperef:typename:void\tfile:\tproperties:pure,virtual\nmf04\tinput.cpp\t/^\tvirtual void mf04() final;$/;\"\tp\tclass:C02\ttyperef:typename:void\tfile:\tproperties:final,virtual\nmf05\tinput.cpp\t/^\tstatic inline void mf05()$/;\"\tf\tclass:C02\ttyperef:typename:void\tfile:\tproperties:inline,static\nmf06\tinput.cpp\t/^\tinline void mf06() const;$/;\"\tp\tclass:C02\ttyperef:typename:void\tfile:\tproperties:const,inline\nmf07\tinput.cpp\t/^\tvoid static mf07() volatile;$/;\"\tp\tclass:C02\ttyperef:typename:void\tfile:\tproperties:static,volatile\nv01\tinput.cpp\t/^extern int v01;$/;\"\tx\ttyperef:typename:int\tproperties:extern\nv02\tinput.cpp\t/^static volatile int v02;$/;\"\tv\ttyperef:typename:volatile int\tfile:\tproperties:static\np01\tinput.cpp\t/^static void p01();$/;\"\tp\ttyperef:typename:void\tfile:\tproperties:static\np02\tinput.cpp\t/^extern void p02();$/;\"\tp\ttyperef:typename:void\tfile:\tproperties:extern\nf01\tinput.cpp\t/^static void f01()$/;\"\tf\ttyperef:typename:void\tfile:\tproperties:static\nf02\tinput.cpp\t/^static inline void f02()$/;\"\tf\ttyperef:typename:void\tfile:\tproperties:inline,static\npoint\tinput.cpp\t/^static struct point { float x, y; } p0, p1;$/;\"\ts\tfile:\nx\tinput.cpp\t/^static struct point { float x, y; } p0, p1;$/;\"\tm\tstruct:point\ttyperef:typename:float\tfile:\ny\tinput.cpp\t/^static struct point { float x, y; } p0, p1;$/;\"\tm\tstruct:point\ttyperef:typename:float\tfile:\np0\tinput.cpp\t/^static struct point { float x, y; } p0, p1;$/;\"\tv\ttyperef:struct:point\tfile:\tproperties:static\np1\tinput.cpp\t/^static struct point { float x, y; } p0, p1;$/;\"\tv\ttyperef:struct:point\tfile:\tproperties:static\n" }, { "path": "Units/parser-cxx.r/properties.cpp.d/input.cpp", "content": "\nclass C01\n{\npublic:\n\tC01() = default;\n\n\tstatic int mp01;\n\tmutable int mp02;\n\n\tvirtual void mf01();\n\tvirtual void mf02() final;\n};\n\nclass C02 : public C01\n{\npublic:\n\tC02() = delete;\n\texplicit C02(int i)\n\t{\n\t}\n\t\n\tvoid mf01() override;\n\tvirtual void mf03() = 0;\n\tvirtual void mf04() final;\n\tstatic inline void mf05()\n\t{\n\t}\n\tinline void mf06() const;\n\tvoid static mf07() volatile;\n};\n\nextern int v01;\nstatic volatile int v02;\n\nstatic void p01();\nextern void p02();\n\nstatic void f01()\n{\n}\n\nstatic inline void f02()\n{\n}\n\nstatic struct point { float x, y; } p0, p1;\n" }, { "path": "Units/parser-cxx.r/prototype-starting-from-scope-op.d/args.ctags", "content": "--sort=no\n--C++-kinds=+p\n" }, { "path": "Units/parser-cxx.r/prototype-starting-from-scope-op.d/expected.tags", "content": "bar\tinput.cpp\t/^::std::string bar();$/;\"\tp\ttyperef:typename:::std::string\tfile:\nbaz\tinput.cpp\t/^::std::string baz() { return \"not a prototype\"; }$/;\"\tf\ttyperef:typename:::std::string\n" }, { "path": "Units/parser-cxx.r/prototype-starting-from-scope-op.d/input.cpp", "content": "// Taken from #3693 submitted by @b4n\n#include \n\n::std::string bar();\n::std::string baz() { return \"not a prototype\"; }\n" }, { "path": "Units/parser-cxx.r/rojas.h.d/args.ctags", "content": "--kinds-C++=+p\n" }, { "path": "Units/parser-cxx.r/rojas.h.d/expected.tags", "content": "FFunc\tinput.h\t/^typedef uint32 (*FFunc) (const astruct * pP, int n);$/;\"\tt\ttyperef:typename:uint32 (*)(const astruct * pP,int n)\nFooBar\tinput.h\t/^typedef void * FooBar;$/;\"\tt\ttyperef:typename:void *\nafunc\tinput.h\t/^FooBar * afunc (const char * aparam);$/;\"\tp\ttyperef:typename:FooBar *\nastruct\tinput.h\t/^struct astruct$/;\"\ts\nastruct\tinput.h\t/^typedef struct astruct astruct;$/;\"\tt\ttyperef:struct:astruct\nm_member\tinput.h\t/^ int m_member;$/;\"\tm\tstruct:astruct\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/rojas.h.d/input.h", "content": "/* Problem reported by Emil Rojas on 22 May 2002 */\n/* Fixed by reinitializing statement when either of \"extern\", \"static\", or\n * \"typedef\" keywords are read.\n */\n# ifdef NOT_DEFINED\n typedef unsigned long uint32 //; // remove comment before \";\" to make ctags work\n# endif\n\nextern \"C\" {\n\ntypedef void * FooBar;\nFooBar * afunc (const char * aparam);\nstruct astruct\n{\n int m_member;\n};\ntypedef struct astruct astruct;\ntypedef uint32 (*FFunc) (const astruct * pP, int n);\n\n}\n" }, { "path": "Units/parser-cxx.r/scope-of-using-in-lambda-in-enum.d/args.ctags", "content": "--sort=no\n--extras=+q\n" }, { "path": "Units/parser-cxx.r/scope-of-using-in-lambda-in-enum.d/expected.tags", "content": "e\tinput.cpp\t/^enum e {$/;\"\tg\tfile:\n__anon92a0b9a90102\tinput.cpp\t/^ x = [] {$/;\"\tf\tenum:e\tfile:\nT3\tinput.cpp\t/^ using T3 = int;$/;\"\tt\tfunction:e::__anon92a0b9a90102\ttyperef:typename:int\tfile:\nx\tinput.cpp\t/^ x = [] {$/;\"\te\tenum:e\tfile:\nmain\tinput.cpp\t/^int main(void)$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/scope-of-using-in-lambda-in-enum.d/input.cpp", "content": "enum e {\n x = [] {\n using T3 = int;\n return 1;\n }()\n};\n\n\nint main(void)\n{\n return e::x;\n}\n" }, { "path": "Units/parser-cxx.r/scope-of-using-in-lambda-in-enum.d/validator", "content": "cxx20+module\n" }, { "path": "Units/parser-cxx.r/signature.cpp.d/README", "content": "\n\tint bar (a, b) int a; char b; {}\n\nI wonder how we should do with a, b.\n\n" }, { "path": "Units/parser-cxx.r/signature.cpp.d/args.ctags", "content": "--fields=+S\n--extras=+q\n--kinds-C++=+p\n" }, { "path": "Units/parser-cxx.r/signature.cpp.d/expected.tags", "content": "BAR::bar\tinput.cpp\t/^char *BAR::bar (char *c, double d[]) const {}$/;\"\tf\tclass:BAR\ttyperef:typename:char *\tsignature:(char * c,double d[]) const\nbar\tinput.cpp\t/^char *BAR::bar (char *c, double d[]) const {}$/;\"\tf\tclass:BAR\ttyperef:typename:char *\tsignature:(char * c,double d[]) const\nfoo\tinput.cpp\t/^void foo (int a, char b) {}$/;\"\tf\ttyperef:typename:void\tsignature:(int a,char b)\nfoobar\tinput.cpp\t/^void foobar __ARGS ((int a, char b));$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(int a,char b)\nparams1\tinput.cpp\t/^void params1(const char * c = \"blah\");$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(const char * c=\"blah\")\nparams2\tinput.cpp\t/^void params2(char x = 'x');$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(char x='x')\nparams3\tinput.cpp\t/^void params3(char x = ' ');$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(char x=' ')\nparams4\tinput.cpp\t/^void params4(char x = ',');$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(char x=',')\nparams5\tinput.cpp\t/^void params5(char x = '\\\\n');$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(char x='\\\\n')\nparams6\tinput.cpp\t/^void params6(char x = '\\\\t',int n = 10,const char * v = \"a string with\\\\na newline\");$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(char x='\\\\t',int n=10,const char * v=\"a string with\\\\na newline\")\nparams7\tinput.cpp\t/^void params7(char x = '\t',\t\\/\\/ This is tab char$/;\"\tp\ttyperef:typename:void\tfile:\tsignature:(char x='\\t',float p=3.14,const char * v=\"a string with a tab char:\\t\")\n" }, { "path": "Units/parser-cxx.r/signature.cpp.d/input.cpp", "content": "/* Tests for collection of signature */\n\nvoid foo (int a, char b) {}\n\n/* note that K&R style declarations are not valid in C++ */\n//int bar (a, b) int a; char b; {}\n\nchar *BAR::bar (char *c, double d[]) const {}\n\nvoid foobar __ARGS ((int a, char b));\n\n\nvoid params1(const char * c = \"blah\");\nvoid params2(char x = 'x');\nvoid params3(char x = ' ');\nvoid params4(char x = ',');\nvoid params5(char x = '\\n');\nvoid params6(char x = '\\t',int n = 10,const char * v = \"a string with\\na newline\");\nvoid params7(char x = '\t',\t// This is tab char\n\t float p = 3.14,\n\t const char * v = \"a string with a tab char:\t\"\n\t );\n" }, { "path": "Units/parser-cxx.r/struct-keyword-not-for-defining-struct.d/args.ctags", "content": "--sort=no\n--kinds-C++=+plz\n" }, { "path": "Units/parser-cxx.r/struct-keyword-not-for-defining-struct.d/expected.tags", "content": "Currency\tinput.cc\t/^typedef struct Currency$/;\"\ts\tfile:\nDollar\tinput.cc\t/^ int Dollar;$/;\"\tm\tstruct:Currency\ttyperef:typename:int\tfile:\nCents\tinput.cc\t/^ int Cents;$/;\"\tm\tstruct:Currency\ttyperef:typename:int\tfile:\noperator =\tinput.cc\t/^ struct Currency &operator=(Currency& value)$/;\"\tf\tstruct:Currency\ttyperef:struct:Currency &\tfile:\nvalue\tinput.cc\t/^ struct Currency &operator=(Currency& value)$/;\"\tz\tfunction:Currency::operator =\ttyperef:typename:Currency &\tfile:\ntest\tinput.cc\t/^void test()$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/struct-keyword-not-for-defining-struct.d/input.cc", "content": "// Taken from #2840 submitted by @chongchal\ntypedef struct Currency\n{\n int Dollar;\n int Cents;\n\n struct Currency &operator=(Currency& value)\n {\n Dollar = value.Dollar;\n Cents = value.Cents;\n return *this;\n }\n};\n\nvoid test()\n{\n}\n" }, { "path": "Units/parser-cxx.r/template-member-forward-declaration.d/args.ctags", "content": "--sort=no\n--kinds-C++=m\n" }, { "path": "Units/parser-cxx.r/template-member-forward-declaration.d/expected.tags", "content": "p\tinput.cpp\t/^\tClass *p;$/;\"\tm\tclass:A\ttyperef:typename:Class *\tfile:\na_c_forward\tinput.cpp\t/^\tA a_c_forward;$/;\"\tm\tclass:B\ttyperef:typename:A\tfile:\na_s_forward\tinput.cpp\t/^\tA a_s_forward;$/;\"\tm\tclass:B\ttyperef:typename:A\tfile:\na_u_forward\tinput.cpp\t/^\tA a_u_forward;$/;\"\tm\tclass:B\ttyperef:typename:A\tfile:\n" }, { "path": "Units/parser-cxx.r/template-member-forward-declaration.d/input.cpp", "content": "template \nclass A\n{\npublic:\n\tA() { p = new Class(); }\n\tClass *p;\n};\n\nclass B {\npublic:\n\t// forward declaration okay because only used as pointer in Template\n\tA a_c_forward;\n\tA a_s_forward;\n\tA a_u_forward;\n};\n\n" }, { "path": "Units/parser-cxx.r/template-member-function-pointer-scope.d/args.ctags", "content": "--sort=no\n--fields=+{signature}\n--kinds-C++=+fstz\n" }, { "path": "Units/parser-cxx.r/template-member-function-pointer-scope.d/expected.tags", "content": "TestUtil\tinput.cpp\t/^struct TestUtil {$/;\"\ts\tfile:\nisNull\tinput.cpp\t/^ static bool isNull(const T&) { return false; }$/;\"\tf\tstruct:TestUtil\ttyperef:typename:bool\tfile:\tsignature:(const T &)\n__anon39cbdfcb010d\tinput.cpp\t/^ static bool isNull(const T&) { return false; }$/;\"\tz\tfunction:TestUtil::isNull\ttyperef:typename:const T &\tfile:\nTestUtil\tinput.cpp\t/^struct TestUtil {$/;\"\ts\tfile:\nisNull\tinput.cpp\t/^ static bool isNull(T* f) { return 0 == f; }$/;\"\tf\tstruct:TestUtil\ttyperef:typename:bool\tfile:\tsignature:(T * f)\nf\tinput.cpp\t/^ static bool isNull(T* f) { return 0 == f; }$/;\"\tz\tfunction:TestUtil::isNull\ttyperef:typename:T *\tfile:\nmemtype\tinput.cpp\t/^struct memtype {};$/;\"\ts\tfile:\nklass\tinput.cpp\t/^struct klass {};$/;\"\ts\tfile:\nisNull\tinput.cpp\t/^TestUtil::isNull(const memtype klass::* &f)$/;\"\tf\tclass:TestUtil\ttyperef:typename:bool\tsignature:(const memtype klass::* & f)\nf\tinput.cpp\t/^TestUtil::isNull(const memtype klass::* &f)$/;\"\tz\tfunction:TestUtil::isNull\ttyperef:typename:const memtype klass::* &\tfile:\nHandler\tinput.cpp\t/^struct Handler {$/;\"\ts\tfile:\nprocess\tinput.cpp\t/^ void process(T value) { }$/;\"\tf\tstruct:Handler\ttyperef:typename:void\tfile:\tsignature:(T value)\nvalue\tinput.cpp\t/^ void process(T value) { }$/;\"\tz\tfunction:Handler::process\ttyperef:typename:T\tfile:\nHandler\tinput.cpp\t/^struct Handler {$/;\"\ts\tfile:\nprocess\tinput.cpp\t/^ void process(R (C::*method)()) { }$/;\"\tf\tstruct:Handler\ttyperef:typename:void\tfile:\tsignature:(R (C::* method)())\nmethod\tinput.cpp\t/^ void process(R (C::*method)()) { }$/;\"\tz\tfunction:Handler::process\ttyperef:typename:R (C::*)()\tfile:\nHandler\tinput.cpp\t/^struct Handler {$/;\"\ts\tfile:\nprocess\tinput.cpp\t/^ void process(R (C::*method)(A)) { }$/;\"\tf\tstruct:Handler\ttyperef:typename:void\tfile:\tsignature:(R (C::* method)(A))\nmethod\tinput.cpp\t/^ void process(R (C::*method)(A)) { }$/;\"\tz\tfunction:Handler::process\ttyperef:typename:R (C::*)(A)\tfile:\n" }, { "path": "Units/parser-cxx.r/template-member-function-pointer-scope.d/input.cpp", "content": "// Derived from #4348 submitted by @gaborbernat.\n\n// C++ template specialization that previously triggered scope management crash\n// Test case for issue 4344: assertion failure in cxxScopePushTop\ntemplate \nstruct TestUtil {\n static bool isNull(const T&) { return false; }\n};\n\ntemplate \nstruct TestUtil {\n static bool isNull(T* f) { return 0 == f; }\n};\n\nstruct memtype {};\nstruct klass {};\n\ntemplate <>\ninline\nbool\nTestUtil::isNull(const memtype klass::* &f)\n{\n return 0 == f;\n}\n\n// Additional test cases for complex template specializations\ntemplate \nstruct Handler {\n void process(T value) { }\n};\n\ntemplate \nstruct Handler {\n void process(R (C::*method)()) { }\n};\n\ntemplate \nstruct Handler {\n void process(R (C::*method)(A)) { }\n};\n" }, { "path": "Units/parser-cxx.r/template-member-function-pointer-scope.d/validator", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/args.ctags", "content": "--sort=no\n--kinds-c++=+Z\n--fields-c++={template}{specialization}\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/expected.tags", "content": "Test\tinput.hpp\t/^class Test : public set {$/;\"\tc\ttemplate:,class _Comp1=less>>\n_Comp0\tinput.hpp\t/^ class _Comp0=less,$/;\"\tZ\tclass:Test\ttyperef:meta:class\n_Comp1\tinput.hpp\t/^ class _Comp1=less > >$/;\"\tZ\tclass:Test\ttyperef:meta:class\nxxx\tinput.hpp\t/^ typedef int xxx;$/;\"\tt\tclass:Test\ttyperef:typename:int\nFoo\tinput-0.hpp\t/^class Foo {};$/;\"\tc\ttemplate:\nX\tinput-0.hpp\t/^template $/;\"\tZ\tclass:Foo\ttyperef:meta:typename\nbar\tinput-0.hpp\t/^constexpr Foo bar {};$/;\"\tv\ttyperef:typename:Foo\ttemplate:>\nY\tinput-0.hpp\t/^template >$/;\"\tZ\tvariable:bar\ttyperef:meta:typename\ni\tinput-0.hpp\t/^const int i = 3;$/;\"\tv\ttyperef:typename:const int\nfailure\tinput-1.hpp\t/^class failure {};$/;\"\tc\ttemplate:>\nT\tinput-1.hpp\t/^template >$/;\"\tZ\tclass:failure\ttyperef:meta:class\nHash\tinput-1.hpp\t/^template >$/;\"\tZ\tclass:failure\ttyperef:meta:class\nV\tinput-2.hpp\t/^const int V = 10;$/;\"\tv\ttyperef:typename:const int\nfuncA\tinput-2.hpp\t/^template void funcA(T t)$/;\"\tf\ttyperef:typename:void\ttemplate:\nT\tinput-2.hpp\t/^template void funcA(T t)$/;\"\tZ\tfunction:funcA\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template void funcA(T t)$/;\"\tZ\tfunction:funcA\ttyperef:typename:int\nK\tinput-2.hpp\t/^typedef int K;$/;\"\tt\ttyperef:typename:int\nfuncB\tinput-2.hpp\t/^template void funcB(T t)$/;\"\tf\ttyperef:typename:void\ttemplate:\nT\tinput-2.hpp\t/^template void funcB(T t)$/;\"\tZ\tfunction:funcB\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template void funcB(T t)$/;\"\tZ\tfunction:funcB\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template void funcB(T t)$/;\"\tZ\tfunction:funcB\ttyperef:typename:int\nfuncC\tinput-2.hpp\t/^template K funcC(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:\nT\tinput-2.hpp\t/^template K funcC(T t)$/;\"\tZ\tfunction:funcC\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template K funcC(T t)$/;\"\tZ\tfunction:funcC\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template K funcC(T t)$/;\"\tZ\tfunction:funcC\ttyperef:typename:int\nfuncD\tinput-2.hpp\t/^template> 2)> K funcD(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:>2)>\nT\tinput-2.hpp\t/^template> 2)> K funcD(T t)$/;\"\tZ\tfunction:funcD\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template> 2)> K funcD(T t)$/;\"\tZ\tfunction:funcD\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template> 2)> K funcD(T t)$/;\"\tZ\tfunction:funcD\ttyperef:typename:int\nfuncE\tinput-2.hpp\t/^template> I)> K funcE(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:> I)>\nT\tinput-2.hpp\t/^template> I)> K funcE(T t)$/;\"\tZ\tfunction:funcE\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template> I)> K funcE(T t)$/;\"\tZ\tfunction:funcE\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template> I)> K funcE(T t)$/;\"\tZ\tfunction:funcE\ttyperef:typename:int\nfuncF\tinput-2.hpp\t/^template> L)> K funcF(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:> L)>\nT\tinput-2.hpp\t/^template> L)> K funcF(T t)$/;\"\tZ\tfunction:funcF\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template> L)> K funcF(T t)$/;\"\tZ\tfunction:funcF\ttyperef:typename:int\nL\tinput-2.hpp\t/^template> L)> K funcF(T t)$/;\"\tZ\tfunction:funcF\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template> L)> K funcF(T t)$/;\"\tZ\tfunction:funcF\ttyperef:typename:int\nfuncG\tinput-2.hpp\t/^template> V)> K funcG(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:> V)>\nT\tinput-2.hpp\t/^template> V)> K funcG(T t)$/;\"\tZ\tfunction:funcG\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template> V)> K funcG(T t)$/;\"\tZ\tfunction:funcG\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template> V)> K funcG(T t)$/;\"\tZ\tfunction:funcG\ttyperef:typename:int\nfuncH\tinput-2.hpp\t/^template> V)> K funcH(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:> V)>\nT\tinput-2.hpp\t/^template> V)> K funcH(T t)$/;\"\tZ\tfunction:funcH\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template> V)> K funcH(T t)$/;\"\tZ\tfunction:funcH\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template> V)> K funcH(T t)$/;\"\tZ\tfunction:funcH\ttyperef:typename:int\nfuncI\tinput-2.hpp\t/^template> (1+2))> K funcI(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:> (1+2))>\nT\tinput-2.hpp\t/^template> (1+2))> K funcI(T t)$/;\"\tZ\tfunction:funcI\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template> (1+2))> K funcI(T t)$/;\"\tZ\tfunction:funcI\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template> (1+2))> K funcI(T t)$/;\"\tZ\tfunction:funcI\ttyperef:typename:int\nfuncJ\tinput-2.hpp\t/^template 2)> K funcJ(T t)$/;\"\tf\ttyperef:typename:K\ttemplate:2)>\nT\tinput-2.hpp\t/^template 2)> K funcJ(T t)$/;\"\tZ\tfunction:funcJ\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template 2)> K funcJ(T t)$/;\"\tZ\tfunction:funcJ\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template 2)> K funcJ(T t)$/;\"\tZ\tfunction:funcJ\ttyperef:typename:int\nfuncK\tinput-2.hpp\t/^template I)> K funcK(T t)$/;\"\tf\ttyperef:typename:K\ttemplate: I)>\nT\tinput-2.hpp\t/^template I)> K funcK(T t)$/;\"\tZ\tfunction:funcK\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template I)> K funcK(T t)$/;\"\tZ\tfunction:funcK\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template I)> K funcK(T t)$/;\"\tZ\tfunction:funcK\ttyperef:typename:int\nfuncL\tinput-2.hpp\t/^template L)> K funcL(T t)$/;\"\tf\ttyperef:typename:K\ttemplate: L)>\nT\tinput-2.hpp\t/^template L)> K funcL(T t)$/;\"\tZ\tfunction:funcL\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template L)> K funcL(T t)$/;\"\tZ\tfunction:funcL\ttyperef:typename:int\nL\tinput-2.hpp\t/^template L)> K funcL(T t)$/;\"\tZ\tfunction:funcL\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template L)> K funcL(T t)$/;\"\tZ\tfunction:funcL\ttyperef:typename:int\nfuncO\tinput-2.hpp\t/^template (1+2))> K funcO(T t)$/;\"\tf\ttyperef:typename:K\ttemplate: (1+2))>\nT\tinput-2.hpp\t/^template (1+2))> K funcO(T t)$/;\"\tZ\tfunction:funcO\ttyperef:meta:typename\nI\tinput-2.hpp\t/^template (1+2))> K funcO(T t)$/;\"\tZ\tfunction:funcO\ttyperef:typename:int\nJ\tinput-2.hpp\t/^template (1+2))> K funcO(T t)$/;\"\tZ\tfunction:funcO\ttyperef:typename:unsigned int\nTestStruct\tinput-3.hpp\t/^template struct TestStruct {};$/;\"\ts\ttemplate:\nT\tinput-3.hpp\t/^template struct TestStruct {};$/;\"\tZ\tstruct:TestStruct\ttyperef:meta:typename\nTemplateParameterStruct\tinput-3.hpp\t/^template struct TemplateParameterStruct {};$/;\"\ts\ttemplate:\nT\tinput-3.hpp\t/^template struct TemplateParameterStruct {};$/;\"\tZ\tstruct:TemplateParameterStruct\ttyperef:meta:typename\nParameterStruct\tinput-3.hpp\t/^struct ParameterStruct {};$/;\"\ts\nTestStruct\tinput-3.hpp\t/^template <> struct TestStruct {};$/;\"\ts\ttemplate:<>\tspecialization:\nTestStruct\tinput-3.hpp\t/^template struct TestStruct> {};$/;\"\ts\ttemplate:\tspecialization:>\nP\tinput-3.hpp\t/^template struct TestStruct> {};$/;\"\tZ\tstruct:TestStruct\ttyperef:meta:typename\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/input-0.hpp", "content": "template \nclass Foo {};\n\ntemplate >\nconstexpr Foo bar {};\n\nconst int i = 3;\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/input-1.hpp", "content": "// Derived from issued #2060 submitted by @dmhacker\n#include \ntemplate >\nclass failure {};\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/input-2.hpp", "content": "const int V = 10;\n\ntemplate void funcA(T t)\n{\n}\n\ntypedef int K;\n\ntemplate void funcB(T t)\n{\n}\n\ntemplate K funcC(T t)\n{\n\treturn 0;\n}\n\n// The original comment: This stuff is allowed by C++03\n// template> 2> K funcD(T t)\n// However, the above input is rejected with:\n// error: default template arguments may not be used in function templates\n// without `-std=c++11' or `-std=gnu++11'\ntemplate> 2)> K funcD(T t)\n{\n\treturn 0;\n}\n\ntemplate> I)> K funcE(T t)\n{\n\treturn 0;\n}\n\ntemplate> L)> K funcF(T t)\n{\n\treturn 0;\n}\n\ntemplate> V)> K funcG(T t)\n{\n\treturn 0;\n}\n\ntemplate> V)> K funcH(T t)\n{\n\treturn 0;\n}\n\ntemplate> (1+2))> K funcI(T t)\n{\n\treturn 0;\n}\n\n\n\ntemplate 2)> K funcJ(T t)\n{\n\treturn 0;\n}\n\ntemplate I)> K funcK(T t)\n{\n\treturn 0;\n}\n\ntemplate L)> K funcL(T t)\n{\n\treturn 0;\n}\n\n/*\n\nWithout the knowledge of V these two are too ambiguous.\n\ntemplate V> K funcM(T t)\n{\n\treturn 0;\n}\n\ntemplate V> K funcN(T t)\n{\n\treturn 0;\n}\n*/\n\ntemplate (1+2))> K funcO(T t)\n{\n\treturn 0;\n}\n\n\n\n\n\n\n\n\n\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/input-3.hpp", "content": "// Taken from the issue #2433 submitted by @andrejlevkovitch\n\ntemplate struct TestStruct {};\n\ntemplate struct TemplateParameterStruct {};\n\nstruct ParameterStruct {};\n\ntemplate <> struct TestStruct {};\n\ntemplate struct TestStruct> {};\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/input.hpp", "content": "template ,\n class _Comp1=less > >\nclass Test : public set {\n typedef int xxx;\n};\n// Taken from #1750 submitted by @tuarba.\n" }, { "path": "Units/parser-cxx.r/template-nested-triangle-brackets.d/validator-2", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/template-parameters.d/README", "content": "This reproduced a memory access error.\nSpecify VG=1 when running make for reproducing the original issue.\n\n" }, { "path": "Units/parser-cxx.r/template-parameters.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/template-parameters.d/expected.tags", "content": "B\tinput.h\t/^template class B {$/;\"\tc\na\tinput.h\t/^\tA a;$/;\"\tm\tclass:B\ttyperef:typename:A\nC\tinput.h\t/^template class C {$/;\"\tc\nb\tinput.h\t/^ class B b;$/;\"\tm\tclass:C\ttyperef:class:B\n" }, { "path": "Units/parser-cxx.r/template-parameters.d/input.h", "content": "// -*- c++ -*-\ntemplate class B {\n\tA a;\n};\ntemplate class C {\n class B b;\n};\n" }, { "path": "Units/parser-cxx.r/template-prototype.d/args.ctags", "content": "--sort=no\n--kinds-C++=+pZ\n--fields=+K\n" }, { "path": "Units/parser-cxx.r/template-prototype.d/expected.tags", "content": "f\tinput.cc\t/^template int f (T t);$/;\"\tprototype\ttyperef:typename:int\tfile:\nT\tinput.cc\t/^template int f (T t);$/;\"\ttparam\tprototype:f\ttyperef:meta:class\ng\tinput.cc\t/^template int g (S s) {$/;\"\tfunction\ttyperef:typename:int\nS\tinput.cc\t/^template int g (S s) {$/;\"\ttparam\tfunction:g\ttyperef:meta:class\n" }, { "path": "Units/parser-cxx.r/template-prototype.d/input.cc", "content": "template int f (T t);\ntemplate int g (S s) {\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/template-specializations-including-op.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/template-specializations-including-op.d/expected.tags", "content": "Point\tinput.cpp\t/^struct Point {$/;\"\ts\tfile:\ndistance\tinput.cpp\t/^ int distance(void) {$/;\"\tf\tstruct:Point\ttyperef:typename:int\tfile:\nNS\tinput.cpp\t/^namespace NS {$/;\"\tn\tfile:\nMyReal\tinput.cpp\t/^ using MyReal = float;$/;\"\tt\tnamespace:NS\ttyperef:typename:float\tfile:\nMyVec\tinput.cpp\t/^ using MyVec = T[2];$/;\"\tt\tnamespace:NS\ttyperef:typename:T[2]\tfile:\ndistance\tinput.cpp\t/^int Point::distance(void) { return 1; }$/;\"\tf\tclass:Point\ttyperef:typename:int\ndistance\tinput.cpp\t/^int Point::distance(void) { return 1; }$/;\"\tf\tclass:Point\ttyperef:typename:int\ndistance\tinput.cpp\t/^int Point>::distance(void) { return 1; }$/;\"\tf\tclass:Point\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/template-specializations-including-op.d/input.cpp", "content": "template \nstruct Point {\n int distance(void) {\n return 0;\n }\n};\n\nnamespace NS {\n using MyReal = float;\n template \n using MyVec = T[2];\n};\n\ntemplate<>\nint Point::distance(void) { return 1; }\n\ntemplate<>\nint Point::distance(void) { return 1; }\n\ntemplate<>\nint Point>::distance(void) { return 1; }\n" }, { "path": "Units/parser-cxx.r/template-specializations-including-op.d/validator", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/template-specializations.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n--fields=+sS\n--fields-c++=+{template}{properties}{specialization}\n" }, { "path": "Units/parser-cxx.r/template-specializations.d/expected.tags", "content": "A\tinput.cpp\t/^struct A {$/;\"\ts\tfile:\ttemplate:\nT\tinput.cpp\t/^template$/;\"\tZ\tstruct:A\ttyperef:meta:typename\nf\tinput.cpp\t/^ void f(T); \\/\\/ member, declared in the primary template$/;\"\tp\tstruct:A\ttyperef:typename:void\tfile:\tsignature:(T)\n__anonc12ce61d010d\tinput.cpp\t/^ void f(T); \\/\\/ member, declared in the primary template$/;\"\tz\tprototype:A::f\ttyperef:typename:T\tfile:\nh\tinput.cpp\t/^ void h(T) {} \\/\\/ member, defined in the primary template$/;\"\tf\tstruct:A\ttyperef:typename:void\tfile:\tsignature:(T)\n__anonc12ce61d020d\tinput.cpp\t/^ void h(T) {} \\/\\/ member, defined in the primary template$/;\"\tz\tfunction:A::h\ttyperef:typename:T\tfile:\ng1\tinput.cpp\t/^ template void g1(T, X1); \\/\\/ member template$/;\"\tp\tstruct:A\ttyperef:typename:void\tfile:\tsignature:(T,X1)\ttemplate:\nX1\tinput.cpp\t/^ template void g1(T, X1); \\/\\/ member template$/;\"\tZ\tprototype:A::g1\ttyperef:meta:class\n__anonc12ce61d030d\tinput.cpp\t/^ template void g1(T, X1); \\/\\/ member template$/;\"\tz\tprototype:A::g1\ttyperef:typename:T\tfile:\n__anonc12ce61d040d\tinput.cpp\t/^ template void g1(T, X1); \\/\\/ member template$/;\"\tz\tprototype:A::g1\ttyperef:typename:X1\tfile:\ng2\tinput.cpp\t/^ template void g2(T, X2); \\/\\/ member template$/;\"\tp\tstruct:A\ttyperef:typename:void\tfile:\tsignature:(T,X2)\ttemplate:\nX2\tinput.cpp\t/^ template void g2(T, X2); \\/\\/ member template$/;\"\tZ\tprototype:A::g2\ttyperef:meta:class\n__anonc12ce61d050d\tinput.cpp\t/^ template void g2(T, X2); \\/\\/ member template$/;\"\tz\tprototype:A::g2\ttyperef:typename:T\tfile:\n__anonc12ce61d060d\tinput.cpp\t/^ template void g2(T, X2); \\/\\/ member template$/;\"\tz\tprototype:A::g2\ttyperef:typename:X2\tfile:\nf\tinput.cpp\t/^template<> void A::f(int);$/;\"\tp\tclass:A\ttyperef:typename:void\tfile:\tsignature:(int)\ttemplate:<>\tproperties:scopespecialization,specialization\n__anonc12ce61d070d\tinput.cpp\t/^template<> void A::f(int);$/;\"\tz\tprototype:A::f\ttyperef:typename:int\tfile:\nh\tinput.cpp\t/^template<> void A::h(int) {}$/;\"\tf\tclass:A\ttyperef:typename:void\tsignature:(int)\ttemplate:<>\tproperties:scopespecialization,specialization\n__anonc12ce61d080d\tinput.cpp\t/^template<> void A::h(int) {}$/;\"\tz\tfunction:A::h\ttyperef:typename:int\tfile:\ng1\tinput.cpp\t/^template void A::g1(T, X1) { }$/;\"\tf\tclass:A\ttyperef:typename:void\tsignature:(T,X1)\ttemplate:\tproperties:scopespecialization,specialization\nX1\tinput.cpp\t/^template void A::g1(T, X1) { }$/;\"\tZ\tfunction:A::g1\ttyperef:meta:class\n__anonc12ce61d090d\tinput.cpp\t/^template void A::g1(T, X1) { }$/;\"\tz\tfunction:A::g1\ttyperef:typename:T\tfile:\n__anonc12ce61d0a0d\tinput.cpp\t/^template void A::g1(T, X1) { }$/;\"\tz\tfunction:A::g1\ttyperef:typename:X1\tfile:\ng1\tinput.cpp\t/^template void A::g1(int, X1);$/;\"\tp\tclass:A\ttyperef:typename:void\tfile:\tsignature:(int,X1)\ttemplate:\tproperties:scopespecialization,specialization\nX1\tinput.cpp\t/^template void A::g1(int, X1);$/;\"\tZ\tprototype:A::g1\ttyperef:meta:class\n__anonc12ce61d0b0d\tinput.cpp\t/^template void A::g1(int, X1);$/;\"\tz\tprototype:A::g1\ttyperef:typename:int\tfile:\n__anonc12ce61d0c0d\tinput.cpp\t/^template void A::g1(int, X1);$/;\"\tz\tprototype:A::g1\ttyperef:typename:X1\tfile:\ng2\tinput.cpp\t/^template<> void A::g2(int, char); \\/\\/ for X2 = char$/;\"\tp\tclass:A\ttyperef:typename:void\tfile:\tsignature:(int,char)\ttemplate:<>\tspecialization:\tproperties:scopespecialization,specialization\n__anonc12ce61d0d0d\tinput.cpp\t/^template<> void A::g2(int, char); \\/\\/ for X2 = char$/;\"\tz\tprototype:A::g2\ttyperef:typename:int\tfile:\n__anonc12ce61d0e0d\tinput.cpp\t/^template<> void A::g2(int, char); \\/\\/ for X2 = char$/;\"\tz\tprototype:A::g2\ttyperef:typename:char\tfile:\ng1\tinput.cpp\t/^template<> void A::g1(int, char);$/;\"\tp\tclass:A\ttyperef:typename:void\tfile:\tsignature:(int,char)\ttemplate:<>\tproperties:scopespecialization,specialization\n__anonc12ce61d0f0d\tinput.cpp\t/^template<> void A::g1(int, char);$/;\"\tz\tprototype:A::g1\ttyperef:typename:int\tfile:\n__anonc12ce61d100d\tinput.cpp\t/^template<> void A::g1(int, char);$/;\"\tz\tprototype:A::g1\ttyperef:typename:char\tfile:\nm\tinput.cpp\t/^template void m(X)$/;\"\tf\ttyperef:typename:void\tsignature:(X)\ttemplate:\nX\tinput.cpp\t/^template void m(X)$/;\"\tZ\tfunction:m\ttyperef:meta:typename\n__anonc12ce61d110d\tinput.cpp\t/^template void m(X)$/;\"\tz\tfunction:m\ttyperef:typename:X\tfile:\nm\tinput.cpp\t/^template<> void m(int)$/;\"\tf\ttyperef:typename:void\tsignature:(int)\ttemplate:<>\tspecialization:\tproperties:specialization\n__anonc12ce61d120d\tinput.cpp\t/^template<> void m(int)$/;\"\tz\tfunction:m\ttyperef:typename:int\tfile:\nm\tinput.cpp\t/^template<> void m>(A a)$/;\"\tf\ttyperef:typename:void\tsignature:(A a)\ttemplate:<>\tspecialization:>\tproperties:specialization\na\tinput.cpp\t/^template<> void m>(A a)$/;\"\tz\tfunction:m\ttyperef:typename:A\tfile:\nB\tinput.cpp\t/^struct B { };$/;\"\ts\tfile:\nm\tinput.cpp\t/^template<> void m(B)$/;\"\tf\ttyperef:typename:void\tsignature:(B)\ttemplate:<>\tspecialization:\tproperties:specialization\n__anonc12ce61d130d\tinput.cpp\t/^template<> void m(B)$/;\"\tz\tfunction:m\ttyperef:typename:B\tfile:\nm\tinput.cpp\t/^template<> void m(char)$/;\"\tf\ttyperef:typename:void\tsignature:(char)\ttemplate:<>\tproperties:specialization\n__anonc12ce61d140d\tinput.cpp\t/^template<> void m(char)$/;\"\tz\tfunction:m\ttyperef:typename:char\tfile:\nC\tinput.cpp\t/^class C {};$/;\"\tc\tfile:\ttemplate:\nT1\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nT2\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nI\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:typename:int\nC\tinput.cpp\t/^class C {};$/;\"\tc\tfile:\ttemplate:\tspecialization:\nT\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nI\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:typename:int\nC\tinput.cpp\t/^class C {};$/;\"\tc\tfile:\ttemplate:\tspecialization:\nT\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nT2\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nI\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:typename:int\nC\tinput.cpp\t/^class C {};$/;\"\tc\tfile:\ttemplate:\tspecialization:\nT\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nC\tinput.cpp\t/^class C {};$/;\"\tc\tfile:\ttemplate:\tspecialization:\nX\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nT\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:meta:class\nI\tinput.cpp\t/^template$/;\"\tZ\tclass:C\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/template-specializations.d/input.cpp", "content": "template\nstruct A {\n void f(T); // member, declared in the primary template\n void h(T) {} // member, defined in the primary template\n template void g1(T, X1); // member template\n template void g2(T, X2); // member template\n};\n\n// specialization of a member\ntemplate<> void A::f(int);\n// member specialization OK even if defined in-class\ntemplate<> void A::h(int) {}\n\n// out of class member template definition\ntemplate\ntemplate void A::g1(T, X1) { }\n\n// member template specialization\ntemplate<>\ntemplate void A::g1(int, X1);\n\n// member template specialization\ntemplate<>\ntemplate<> void A::g2(int, char); // for X2 = char\n// same, using template argument deduction (X1 = char)\ntemplate<>\ntemplate<> void A::g1(int, char);\n\ntemplate void m(X)\n{\n}\n\ntemplate<> void m(int)\n{\n}\n\ntemplate<> void m>(A a)\n{\n}\n\n// bug #2181\nstruct B { };\ntemplate<> void m(B)\n{\n}\n\ntemplate<> void m(char)\n{\n}\n\n#if HANDLE_BROKEN_INPUT\n\t// This is broken input. Should *not* be extracted.\n\ttemplate <> void int(int a);\n#endif\n\n\n// Examples from the \"manual\".\n\n// primary template\ntemplate\nclass C {};\n\n//partial specialization where T2 is a pointer to T1\ntemplate\nclass C {};\n\n// partial specialization where T1 is a pointer\ntemplate\nclass C {};\n\n// partial specialization where T1 is int, I is 5, and T2 is a pointer\ntemplate\nclass C {};\n\n// partial specialization where T2 is a pointer\ntemplate\nclass C {};\n" }, { "path": "Units/parser-cxx.r/templates-enable-if.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates-enable-if.d/expected.tags", "content": "A\tinput.cpp\t/^class A$/;\"\tc\tfile:\nf1\tinput.cpp\t/^\t\ttypename std::enable_if<2 << 3,int>::type f1(X x)$/;\"\tf\tclass:A\ttyperef:typename:std::enable_if<2<<3,int>::type\tfile:\ttemplate:\nX\tinput.cpp\t/^\ttemplate $/;\"\tZ\tfunction:A::f1\ttyperef:meta:typename\nx\tinput.cpp\t/^\t\ttypename std::enable_if<2 << 3,int>::type f1(X x)$/;\"\tz\tfunction:A::f1\ttyperef:typename:X\tfile:\nf2\tinput.cpp\t/^\t\ttypename std::enable_if::type f2(X x)$/;\"\tf\tclass:A\ttyperef:typename:std::enable_if::type\tfile:\ttemplate:\nX\tinput.cpp\t/^\ttemplate $/;\"\tZ\tfunction:A::f2\ttyperef:meta:typename\nx\tinput.cpp\t/^\t\ttypename std::enable_if::type f2(X x)$/;\"\tz\tfunction:A::f2\ttyperef:typename:X\tfile:\nB\tinput.cpp\t/^class B$/;\"\tc\tfile:\n" }, { "path": "Units/parser-cxx.r/templates-enable-if.d/input.cpp", "content": "#include \n\nclass A\n{\npublic:\n\ttemplate \n\t\ttypename std::enable_if<2 << 3,int>::type f1(X x)\n\t\t{\n\t\t\treturn (int)x;\n\t\t};\n\t\n\ttemplate \n\t\ttypename std::enable_if::type f2(X x)\n\t\t{\n\t\t\treturn (int)x;\n\t\t};\n};\n\nclass B\n{\n};" }, { "path": "Units/parser-cxx.r/templates-in-labmdas-1.cpp.d/args.ctags", "content": "--kinds-c++=+cfl\n--fields=+SsK\n--fields-c++=+{captures}\n--sort=no\n" }, { "path": "Units/parser-cxx.r/templates-in-labmdas-1.cpp.d/expected.tags", "content": "Bar\tinput.cpp\t/^class Bar$/;\"\tclass\tfile:\nfoo\tinput.cpp\t/^ A foo()$/;\"\tfunction\tclass:Bar\ttyperef:typename:A\tfile:\tsignature:()\nf1\tinput.cpp\t/^int f1()$/;\"\tfunction\ttyperef:typename:int\tsignature:()\nb\tinput.cpp\t/^ Bar b;$/;\"\tlocal\tfunction:f1\ttyperef:typename:Bar\tfile:\nt\tinput.cpp\t/^ auto t = b.template foo();$/;\"\tlocal\tfunction:f1\ttyperef:typename:auto\tfile:\nf2\tinput.cpp\t/^int f2()$/;\"\tfunction\ttyperef:typename:int\tsignature:()\nb\tinput.cpp\t/^ Bar b;$/;\"\tlocal\tfunction:f2\ttyperef:typename:Bar\tfile:\n__anon1763e7850102\tinput.cpp\t/^ auto l = [](auto & p){ return p.template foo();};$/;\"\tfunction\tfunction:f2\tfile:\tsignature:(auto & p)\tcaptures:[]\nl\tinput.cpp\t/^ auto l = [](auto & p){ return p.template foo();};$/;\"\tlocal\tfunction:f2\ttyperef:typename:auto\tfile:\nmain\tinput.cpp\t/^int main()$/;\"\tfunction\ttyperef:typename:int\tsignature:()\n" }, { "path": "Units/parser-cxx.r/templates-in-labmdas-1.cpp.d/input.cpp", "content": "// Bug reported by akrzyz on github.\n\ntemplate\nclass Bar\n{\npublic:\n template \n A foo()\n {\n return A{};\n }\n};\n\nint f1()\n{\n Bar b;\n auto t = b.template foo();\n return t;\n}\n\nint f2()\n{\n Bar b;\n auto l = [](auto & p){ return p.template foo();};\n return l(b);\n}\n\nint main()\n{\n return f1() + f2();\n}\n" }, { "path": "Units/parser-cxx.r/templates-in-labmdas-2.cpp.d/args.ctags", "content": "--kinds-c++=+cfl\n--fields=+SsKe\n--fields-c++=+{template}{captures}\n--sort=no" }, { "path": "Units/parser-cxx.r/templates-in-labmdas-2.cpp.d/expected.tags", "content": "Foo\tinput.cpp\t/^namespace Foo$/;\"\tnamespace\tfile:\tend:10\nbar\tinput.cpp\t/^T bar() $/;\"\tfunction\tnamespace:Foo\ttyperef:typename:T\tsignature:()\tend:9\ttemplate:\nmain\tinput.cpp\t/^int main()$/;\"\tfunction\ttyperef:typename:int\tsignature:()\tend:16\n__anonaa3dc9860102\tinput.cpp\t/^ auto l = []{return Foo::template bar();};$/;\"\tfunction\tfunction:main\tfile:\tend:14\tcaptures:[]\nl\tinput.cpp\t/^ auto l = []{return Foo::template bar();};$/;\"\tlocal\tfunction:main\ttyperef:typename:auto\tfile:\tend:14\n" }, { "path": "Units/parser-cxx.r/templates-in-labmdas-2.cpp.d/input.cpp", "content": "// Bug reported by akrzyz on github.\n\nnamespace Foo\n{\ntemplate \nT bar() \n{\n return T{};\n};\n}\n\nint main()\n{\n auto l = []{return Foo::template bar();};\n return l();\n}\n" }, { "path": "Units/parser-cxx.r/templates.d/args.ctags", "content": "--sort=no\n--extras=+q\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates.d/expected.tags", "content": "zero\tinput.cpp\t/^zero (const T &v1, const T &v2)$/;\"\tf\ttyperef:typename:int\ttemplate:\nT\tinput.cpp\t/^template int $/;\"\tZ\tfunction:zero\ttyperef:meta:typename\nv1\tinput.cpp\t/^zero (const T &v1, const T &v2)$/;\"\tz\tfunction:zero\ttyperef:typename:const T &\tfile:\nv2\tinput.cpp\t/^zero (const T &v1, const T &v2)$/;\"\tz\tfunction:zero\ttyperef:typename:const T &\tfile:\nmin\tinput.cpp\t/^min(const T&v1, const T&v2)$/;\"\tf\ttyperef:typename:T\ttemplate:\nT\tinput.cpp\t/^template inline T $/;\"\tZ\tfunction:min\ttyperef:meta:typename\nv1\tinput.cpp\t/^min(const T&v1, const T&v2)$/;\"\tz\tfunction:min\ttyperef:typename:const T &\tfile:\nv2\tinput.cpp\t/^min(const T&v1, const T&v2)$/;\"\tz\tfunction:min\ttyperef:typename:const T &\tfile:\nItem\tinput.cpp\t/^class Item$/;\"\tc\tfile:\ttemplate:\nType\tinput.cpp\t/^template $/;\"\tZ\tclass:Item\ttyperef:meta:class\nItem::Type\tinput.cpp\t/^template $/;\"\tZ\tclass:Item\ttyperef:meta:class\nItem\tinput.cpp\t/^ Item(const Type &t) : item (t), next (0) { }$/;\"\tf\tclass:Item\tfile:\nItem::Item\tinput.cpp\t/^ Item(const Type &t) : item (t), next (0) { }$/;\"\tf\tclass:Item\tfile:\nt\tinput.cpp\t/^ Item(const Type &t) : item (t), next (0) { }$/;\"\tz\tfunction:Item::Item\ttyperef:typename:const Type &\tfile:\nitem\tinput.cpp\t/^ Type item;$/;\"\tm\tclass:Item\ttyperef:typename:Type\tfile:\nItem::item\tinput.cpp\t/^ Type item;$/;\"\tm\tclass:Item\ttyperef:typename:Type\tfile:\nnext\tinput.cpp\t/^ Item *next;$/;\"\tm\tclass:Item\ttyperef:typename:Item *\tfile:\nItem::next\tinput.cpp\t/^ Item *next;$/;\"\tm\tclass:Item\ttyperef:typename:Item *\tfile:\nconstant\tinput.cpp\t/^template const T constant = T(10.0);/;\"\tv\ttyperef:typename:const T\ttemplate:\nT\tinput.cpp\t/^template const T constant = T(10.0);/;\"\tZ\tvariable:constant\ttyperef:meta:typename\nconstant::T\tinput.cpp\t/^template const T constant = T(10.0);/;\"\tZ\tvariable:constant\ttyperef:meta:typename\n" }, { "path": "Units/parser-cxx.r/templates.d/input.cpp", "content": "template int \nzero (const T &v1, const T &v2)\n{\n return 0;\n}\n\ntemplate inline T \nmin(const T&v1, const T&v2)\n{\n if (v1 < v2)\n return v1;\n else\n return v2;\n}\n\ntemplate \nclass Item\n{\n Item(const Type &t) : item (t), next (0) { }\n Type item;\n Item *next;\n};\n\ntemplate const T constant = T(10.0);" }, { "path": "Units/parser-cxx.r/templates2.d/args.ctags", "content": "--sort=no\n--extras=+q\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates2.d/expected.tags", "content": "foo1\tinput.cpp\t/^auto foo1(const Container & p_container)$/;\"\tf\ttyperef:typename:auto\ttemplate: class Container,class Elem>\nElem\tinput.cpp\t/^template class Container, class Elem>$/;\"\tZ\tfunction:foo1\ttyperef:meta:class\np_container\tinput.cpp\t/^auto foo1(const Container & p_container)$/;\"\tz\tfunction:foo1\ttyperef:typename:const Container &\tfile:\nfoo2\tinput.cpp\t/^auto foo2(const Container & p_container)$/;\"\tf\ttyperef:typename:auto\ttemplate: class Container,class Key,class Elem>\nKey\tinput.cpp\t/^template class Container, class Key, class Elem>$/;\"\tZ\tfunction:foo2\ttyperef:meta:class\nElem\tinput.cpp\t/^template class Container, class Key, class Elem>$/;\"\tZ\tfunction:foo2\ttyperef:meta:class\np_container\tinput.cpp\t/^auto foo2(const Container & p_container)$/;\"\tz\tfunction:foo2\ttyperef:typename:const Container &\tfile:\nbar\tinput.cpp\t/^void bar()$/;\"\tf\ttyperef:typename:void\nmain\tinput.cpp\t/^int main()$/;\"\tf\ttyperef:typename:int\nv\tinput.cpp\t/^ auto v = foo1(std::vector{1,2,3});$/;\"\tl\tfunction:main\ttyperef:typename:auto\tfile:\nm\tinput.cpp\t/^ auto m = foo2(std::map{{1,2}});$/;\"\tl\tfunction:main\ttyperef:typename:auto\tfile:\n" }, { "path": "Units/parser-cxx.r/templates2.d/input.cpp", "content": "/* bug reported by akrzyz on 2016.03.10: no tags were emitted */\n\n#include \n#include \n\ntemplate class Container, class Elem>\nauto foo1(const Container & p_container)\n{\n return Container{};\n}\n\ntemplate class Container, class Key, class Elem>\nauto foo2(const Container & p_container)\n{\n return Container{};\n}\n\nvoid bar()\n{\n}\n\nint main()\n{\n auto v = foo1(std::vector{1,2,3});\n auto m = foo2(std::map{{1,2}});\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/templates3.d/args.ctags", "content": "--sort=no\n--extras=+q\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates3.d/expected.tags", "content": "makeArrayRef\tinput.cpp\t/^makeArrayRef(ValueType (&p_data)[N], SizeType& p_size)$/;\"\tf\ttyperef:typename:boost::disable_if_c>::type\ttemplate:\nValueType\tinput.cpp\t/^template $/;\"\tZ\tfunction:makeArrayRef\ttyperef:meta:typename\nN\tinput.cpp\t/^template $/;\"\tZ\tfunction:makeArrayRef\ttyperef:typename:int\nSizeType\tinput.cpp\t/^template $/;\"\tZ\tfunction:makeArrayRef\ttyperef:meta:typename\np_data\tinput.cpp\t/^makeArrayRef(ValueType (&p_data)[N], SizeType& p_size)$/;\"\tz\tfunction:makeArrayRef\ttyperef:typename:ValueType (&)[N]\tfile:\np_size\tinput.cpp\t/^makeArrayRef(ValueType (&p_data)[N], SizeType& p_size)$/;\"\tz\tfunction:makeArrayRef\ttyperef:typename:SizeType &\tfile:\nfoo\tinput.cpp\t/^void foo()$/;\"\tf\ttyperef:typename:void\n" }, { "path": "Units/parser-cxx.r/templates3.d/input.cpp", "content": "/* bug reported by akrzyz on 2016.03.10: tags for makeArrayRef were not emitted */\n\ntemplate \ntypename boost::disable_if_c >::type\nmakeArrayRef(ValueType (&p_data)[N], SizeType& p_size)\n{\n return ArrayRef(p_data, p_size);\n}\n\nvoid foo()\n{\n}\n\n" }, { "path": "Units/parser-cxx.r/templates4.d/args.ctags", "content": "--sort=no\n--extras=+q\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates4.d/expected.tags", "content": "INT\tinput.cpp\t/^#define INT /;\"\td\tfile:\nx\tinput.cpp\t/^template INT x(void) { return 0; }$/;\"\tf\ttyperef:typename:INT\ttemplate:\ni\tinput.cpp\t/^template INT x(void) { return 0; }$/;\"\tZ\tfunction:x\ttyperef:typename:char\nB\tinput.cpp\t/^template INT x(void) { return 0; }$/;\"\tZ\tfunction:x\ttyperef:typename:bool\n" }, { "path": "Units/parser-cxx.r/templates4.d/input.cpp", "content": "#define INT int\n\ntemplate INT x(void) { return 0; }\n\n" }, { "path": "Units/parser-cxx.r/templates5.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates5.d/expected.tags", "content": "Checks\tinput.cpp\t/^struct Checks$/;\"\ts\tfile:\nCheck\tinput.cpp\t/^\ttemplate static constexpr bool Check()$/;\"\tf\tstruct:Checks\ttyperef:typename:bool\tfile:\ttemplate:\nX\tinput.cpp\t/^\ttemplate static constexpr bool Check()$/;\"\tZ\tfunction:Checks::Check\ttyperef:meta:typename\nS\tinput.cpp\t/^template(),bool>::type = true> cla/;\"\tc\tfile:\ttemplate: (),bool>::type=true>\nA\tinput.cpp\t/^template(),bool>::type = true> cla/;\"\tZ\tclass:S\ttyperef:meta:typename\nfoo\tinput.cpp\t/^\ttemplate void foo(){}$/;\"\tf\tclass:S\ttyperef:typename:void\tfile:\ttemplate:\nU\tinput.cpp\t/^\ttemplate void foo(){}$/;\"\tZ\tfunction:S::foo\ttyperef:meta:typename\nbar\tinput.cpp\t/^template void bar()$/;\"\tf\ttyperef:typename:void\ttemplate:\nT\tinput.cpp\t/^template void bar()$/;\"\tZ\tfunction:bar\ttyperef:meta:typename\ns\tinput.cpp\t/^\tS s;$/;\"\tl\tfunction:bar\ttyperef:typename:S\tfile:\nmarker\tinput.cpp\t/^int marker;$/;\"\tv\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/templates5.d/input.cpp", "content": "// template keyword used as disambiguator for dependent names\n\n#include \n\nstruct Checks\n{\n\ttemplate static constexpr bool Check()\n\t{\n\t\treturn true;\n\t}\n};\n\ntemplate(),bool>::type = true> class S\n{\n\ttemplate void foo(){}\n};\n\ntemplate void bar()\n{\n\tS s;\n\ts.template foo();\n}\n\n// Marker to make sure the parser doesn't bail out before this line.\nint marker;\n" }, { "path": "Units/parser-cxx.r/templates6.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-cxx.r/templates6.d/expected.tags", "content": "X\tinput.hpp\t/^namespace X {$/;\"\tn\nC\tinput.hpp\t/^template class X::C$/;\"\tc\tclass:X\nC\tinput.hpp\t/^ C(void) {$/;\"\tf\tclass:X::C\nD\tinput.hpp\t/^template class D$/;\"\tc\nD\tinput.hpp\t/^ D(void) {$/;\"\tf\tclass:D\nStack\tinput-0.cpp\t/^class Stack$/;\"\tc\tfile:\nsize\tinput-0.cpp\t/^ std::size_t size;$/;\"\tm\tclass:Stack\ttyperef:typename:std::size_t\tfile:\nstack\tinput-0.cpp\t/^ std::vector stack;$/;\"\tm\tclass:Stack\ttyperef:typename:std::vector\tfile:\n~Stack\tinput-0.cpp\t/^ ~Stack(){};$/;\"\tf\tclass:Stack\tfile:\nStack\tinput-0.cpp\t/^ Stack(std::size_t n) {$/;\"\tf\tclass:Stack\tfile:\nmain\tinput-0.cpp\t/^int main() {$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/templates6.d/input-0.cpp", "content": "// Taken from #3390 submitted by @delsner\n#include \n#include \n\ntemplate\nclass Stack\n{\nprivate:\n std::size_t size;\n std::vector stack;\n\npublic:\n ~Stack(){};\n\n // Not recognized by ctags.\n Stack(std::size_t n) {\n size = n;\n std::cout << \"Constructing a `Stack`\\n\";\n }\n};\n\nint main() {\n Stack sf{2};\n return 0;\n}\n" }, { "path": "Units/parser-cxx.r/templates6.d/input.hpp", "content": "namespace X {\ntemplate class C;\n};\n\ntemplate class X::C\n{\npublic:\n C(void) {\n }\n};\n\ntemplate class D\n{\npublic:\n D(void) {\n }\n};\n" }, { "path": "Units/parser-cxx.r/templates6.d/validator", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/templates7.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n--fields-c++=+{template}" }, { "path": "Units/parser-cxx.r/templates7.d/expected.tags", "content": "foo\tinput.hpp\t/^A foo()$/;\"\tf\ttyperef:typename:A\ttemplate:\nA\tinput.hpp\t/^template$/;\"\tZ\tfunction:foo\ttyperef:meta:typename\nB\tinput.hpp\t/^template$/;\"\tZ\tfunction:foo\ttyperef:meta:typename\nbar\tinput.hpp\t/^A& bar(A& a, const B& b)$/;\"\tf\ttyperef:typename:A &\ttemplate:\nA\tinput.hpp\t/^template$/;\"\tZ\tfunction:bar\ttyperef:meta:typename\nB\tinput.hpp\t/^template$/;\"\tZ\tfunction:bar\ttyperef:meta:typename\na\tinput.hpp\t/^A& bar(A& a, const B& b)$/;\"\tz\tfunction:bar\ttyperef:typename:A &\tfile:\nb\tinput.hpp\t/^A& bar(A& a, const B& b)$/;\"\tz\tfunction:bar\ttyperef:typename:const B &\tfile:\n" }, { "path": "Units/parser-cxx.r/templates7.d/input.hpp", "content": "template\nA foo()\n{\n return A();\n}\n\ntemplate\nA& bar(A& a, const B& b)\n{\n return a;\n}" }, { "path": "Units/parser-cxx.r/templates7.d/validator", "content": "cxx11\n" }, { "path": "Units/parser-cxx.r/templates8.d/README", "content": "This is a crash test.\nThe input is invalid as C++ code.\n" }, { "path": "Units/parser-cxx.r/templates8.d/input.cpp", "content": "template \nstruct A\n{\n\tS();\n};\n" }, { "path": "Units/parser-cxx.r/typedef-of-function-ptr-with-macro.d/expected.tags", "content": "a\tinput.cpp\t/^typedef void (WINAPI a) (void);$/;\"\tt\ttyperef:typename:void (WINAPI)(void)\tfile:\nb\tinput.cpp\t/^typedef void (WINAPI* b) (void);$/;\"\tt\ttyperef:typename:void (WINAPI *)(void)\tfile:\n" }, { "path": "Units/parser-cxx.r/typedef-of-function-ptr-with-macro.d/input.cpp", "content": "typedef void (WINAPI a) (void);\ntypedef void (WINAPI* b) (void);\n" }, { "path": "Units/parser-cxx.r/typedefs.cpp.d/args.ctags", "content": "--kinds-c++=t\n--fields=+t\n--sort=no\n" }, { "path": "Units/parser-cxx.r/typedefs.cpp.d/expected.tags", "content": "T001\tinput.cpp\t/^typedef struct AStruct T001;$/;\"\tt\ttyperef:struct:AStruct\tfile:\nT002\tinput.cpp\t/^typedef class AClass T002;$/;\"\tt\ttyperef:class:AClass\tfile:\nT003\tinput.cpp\t/^typedef union AUnion T003;$/;\"\tt\ttyperef:union:AUnion\tfile:\nT004\tinput.cpp\t/^typedef enum AEnum T004;$/;\"\tt\ttyperef:enum:AEnum\tfile:\nT101\tinput.cpp\t/^typedef struct { int a; } T101;$/;\"\tt\ttyperef:struct:__anon0e56f3370108\tfile:\nT102\tinput.cpp\t/^typedef union { int a; int b; } T102;$/;\"\tt\ttyperef:union:__anon0e56f337020a\tfile:\nT103\tinput.cpp\t/^typedef enum { E2 } T103;$/;\"\tt\ttyperef:enum:__anon0e56f3370303\tfile:\nT201\tinput.cpp\t/^typedef int* T201;$/;\"\tt\ttyperef:typename:int *\tfile:\nT202\tinput.cpp\t/^typedef const AClass* * T202;$/;\"\tt\ttyperef:typename:const AClass **\tfile:\nT301\tinput.cpp\t/^typedef int (*T301) (int &,int , AUnion *);$/;\"\tt\ttyperef:typename:int (*)(int &,int,AUnion *)\tfile:\nT302\tinput.cpp\t/^typedef AClass &(* T302)(AClass &);$/;\"\tt\ttyperef:typename:AClass & (*)(AClass &)\tfile:\nT303\tinput.cpp\t/^typedef struct AStruct (*T303)(struct AStruct &);$/;\"\tt\ttyperef:struct:AStruct (*)(struct AStruct &)\tfile:\nT304\tinput.cpp\t/^typedef int (T304)(int);$/;\"\tt\ttyperef:typename:int ()(int)\tfile:\nT305\tinput.cpp\t/^typedef struct AStruct (T305)(int);$/;\"\tt\ttyperef:struct:AStruct ()(int)\tfile:\nT306\tinput.cpp\t/^typedef union AUnion & (T306)(int);$/;\"\tt\ttyperef:union:AUnion & ()(int)\tfile:\nT307\tinput.cpp\t/^typedef AClass (T307)(int);$/;\"\tt\ttyperef:typename:AClass ()(int)\tfile:\nT308\tinput.cpp\t/^typedef enum AEnum (T308)(int);$/;\"\tt\ttyperef:enum:AEnum ()(int)\tfile:\nT309\tinput.cpp\t/^typedef int T309(int);$/;\"\tt\ttyperef:typename:int ()(int)\tfile:\nT310\tinput.cpp\t/^typedef int T310(AUnion *);$/;\"\tt\ttyperef:typename:int ()(AUnion *)\tfile:\nT401\tinput.cpp\t/^typedef int T401 [ 10];$/;\"\tt\ttyperef:typename:int[10]\tfile:\nT501\tinput.cpp\t/^typedef ATemplate1 T501;$/;\"\tt\ttyperef:typename:ATemplate1\tfile:\nT502\tinput.cpp\t/^typedef ATemplate1< unsigned short int> T502;$/;\"\tt\ttyperef:typename:ATemplate1\tfile:\nT503\tinput.cpp\t/^typedef ATemplate1 > T503;$/;\"\tt\ttyperef:typename:ATemplate1>\tfile:\nT504\tinput.cpp\t/^typedef ATemplate1 (*T504)();$/;\"\tt\ttyperef:typename:ATemplate1 (*)()\tfile:\nT601\tinput.cpp\t/^\ttypedef typename Type::iterator1 T601;$/;\"\tt\tclass:Container\ttyperef:typename:Type::iterator1\tfile:\nT602\tinput.cpp\t/^\ttypedef typename Type :: iterator2 T602;$/;\"\tt\tclass:Container\ttyperef:typename:Type::iterator2\tfile:\nT603\tinput.cpp\t/^\ttypedef ATemplate1 T603;$/;\"\tt\tclass:Container\ttyperef:typename:ATemplate1\tfile:\nT604\tinput.cpp\t/^\ttypedef int (*T604)(ATemplate1 &);$/;\"\tt\tclass:Container\ttyperef:typename:int (*)(ATemplate1 &)\tfile:\nT701\tinput.cpp\t/^typedef DECLPOINTER(struct AStruct) T701;$/;\"\tt\tfile:\nT801\tinput.cpp\t/^} T801, *T802;$/;\"\tt\ttyperef:struct:_ABC\tfile:\nT802\tinput.cpp\t/^} T801, *T802;$/;\"\tt\ttyperef:struct:_ABC *\tfile:\nT803\tinput.cpp\t/^typedef int T803, *T804, **T805;$/;\"\tt\ttyperef:typename:int\tfile:\nT804\tinput.cpp\t/^typedef int T803, *T804, **T805;$/;\"\tt\ttyperef:typename:int *\tfile:\nT805\tinput.cpp\t/^typedef int T803, *T804, **T805;$/;\"\tt\ttyperef:typename:int **\tfile:\nT806\tinput.cpp\t/^typedef ATemplate2< ATemplate2< ATemplate1, AClass>, AStruct> T806, **T807;$/;\"\tt\ttyperef:typename:ATemplate2,AClass>,AStruct>\tfile:\nT807\tinput.cpp\t/^typedef ATemplate2< ATemplate2< ATemplate1, AClass>, AStruct> T806, **T807;$/;\"\tt\ttyperef:typename:ATemplate2,AClass>,AStruct> **\tfile:\nT808\tinput.cpp\t/^typedef int T808, *T809, (&T810)(int, int *), T811[10], &T812;$/;\"\tt\ttyperef:typename:int\tfile:\nT809\tinput.cpp\t/^typedef int T808, *T809, (&T810)(int, int *), T811[10], &T812;$/;\"\tt\ttyperef:typename:int *\tfile:\nT810\tinput.cpp\t/^typedef int T808, *T809, (&T810)(int, int *), T811[10], &T812;$/;\"\tt\ttyperef:typename:int (&)(int,int *)\tfile:\nT811\tinput.cpp\t/^typedef int T808, *T809, (&T810)(int, int *), T811[10], &T812;$/;\"\tt\ttyperef:typename:int[10]\tfile:\nT812\tinput.cpp\t/^typedef int T808, *T809, (&T810)(int, int *), T811[10], &T812;$/;\"\tt\ttyperef:typename:int &\tfile:\nT901\tinput.cpp\t/^} T901, *T902;$/;\"\tt\ttyperef:typename:const struct AStruct1\tfile:\nT902\tinput.cpp\t/^} T901, *T902;$/;\"\tt\ttyperef:typename:const struct AStruct1 *\tfile:\nT903\tinput.cpp\t/^typedef const struct AStruct1 T903;$/;\"\tt\ttyperef:typename:const struct AStruct1\tfile:\nT904\tinput.cpp\t/^typedef const struct AStruct1 * T904,* T905;$/;\"\tt\ttyperef:typename:const struct AStruct1 *\tfile:\nT905\tinput.cpp\t/^typedef const struct AStruct1 * T904,* T905;$/;\"\tt\ttyperef:typename:const struct AStruct1 *\tfile:\nT906\tinput.cpp\t/^typedef volatile struct AStruct1 * T906;$/;\"\tt\ttyperef:typename:volatile struct AStruct1 *\tfile:\nT907\tinput.cpp\t/^typedef const enum AEnum T907, &T908;$/;\"\tt\ttyperef:typename:const enum AEnum\tfile:\nT908\tinput.cpp\t/^typedef const enum AEnum T907, &T908;$/;\"\tt\ttyperef:typename:const enum AEnum &\tfile:\n" }, { "path": "Units/parser-cxx.r/typedefs.cpp.d/input.cpp", "content": "// Note that in this file spacing matters: ctags should normalize it.\n\n// Auxiliary declarations\nstruct AStruct {};\nclass AClass {};\nunion AUnion {};\nenum AEnum { E1 };\ntemplate class ATemplate1;\ntemplate class ATemplate2;\n\n// class/struct/union/enum typedefs\ntypedef struct AStruct T001;\ntypedef class AClass T002;\ntypedef union AUnion T003;\ntypedef enum AEnum T004;\n\n// typedefs with anonymous types\ntypedef struct { int a; } T101;\ntypedef union { int a; int b; } T102;\ntypedef enum { E2 } T103;\n\n// plain types, pointers etc\ntypedef int* T201;\ntypedef const AClass* * T202;\n\n// function pointers and functions\ntypedef int (*T301) (int &,int , AUnion *);\ntypedef AClass &(* T302)(AClass &);\ntypedef struct AStruct (*T303)(struct AStruct &);\ntypedef int (T304)(int);\ntypedef struct AStruct (T305)(int);\ntypedef union AUnion & (T306)(int);\ntypedef AClass (T307)(int);\ntypedef enum AEnum (T308)(int);\ntypedef int T309(int);\ntypedef int T310(AUnion *);\n#if 0\n\t// broken input (to make coveralls happy)\n\ttypedef int int(int);\n#endif\n\n// arrays\ntypedef int T401 [ 10];\n\n// stuff containing template instantiations\ntypedef ATemplate1 T501;\ntypedef ATemplate1< unsigned short int> T502;\ntypedef ATemplate1 > T503;\ntypedef ATemplate1 (*T504)();\n\n// typedefs within a class\ntemplate class Container\n{\npublic:\n\ttypedef typename Type::iterator1 T601;\n\ttypedef typename Type :: iterator2 T602;\n\ttypedef ATemplate1 T603;\n\ttypedef int (*T604)(ATemplate1 &);\n};\n\n// This should appear as typedef but have not typeref since we can't resolve macros\n#define DECLPOINTER(name) name *\n\ntypedef DECLPOINTER(struct AStruct) T701;\n\n// Multiple typedefs\ntypedef struct _ABC {\n\tint a;\n\tint b;\n} T801, *T802;\n\ntypedef int T803, *T804, **T805;\ntypedef ATemplate2< ATemplate2< ATemplate1, AClass>, AStruct> T806, **T807;\ntypedef int T808, *T809, (&T810)(int, int *), T811[10], &T812;\n\n// Typedefs with const/volatile prefix\ntypedef const struct AStruct1 {\n\tint a;\n} T901, *T902;\n\ntypedef const struct AStruct1 T903;\ntypedef const struct AStruct1 * T904,* T905;\ntypedef volatile struct AStruct1 * T906;\ntypedef const enum AEnum T907, &T908;\n" }, { "path": "Units/parser-cxx.r/unclosed-angle-bracket.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-cxx.r/unclosed-angle-bracket.d/input.cxx", "content": "class<><{[]{class<\n" }, { "path": "Units/parser-cxx.r/using-in-template.d/args.ctags", "content": "--sort=no\n--kinds-C++=*\n--fields=+stKZ\n--fields-C++=+{template}\n" }, { "path": "Units/parser-cxx.r/using-in-template.d/expected.tags", "content": "V\tinput.cpp\t/^using V = std::vector;$/;\"\ttypedef\ttyperef:typename:std::vector\tfile:\ttemplate:\nT\tinput.cpp\t/^template $/;\"\ttparam\tscope:typedef:V\ttyperef:meta:class\n" }, { "path": "Units/parser-cxx.r/using-in-template.d/input.cpp", "content": "#include \n\ntemplate \nusing V = std::vector;\n" }, { "path": "Units/parser-cxx.r/using.cpp.d/args.ctags", "content": "--fields=+SKr\n--kinds-C++=+pUN\n--extras=+r\n" }, { "path": "Units/parser-cxx.r/using.cpp.d/expected.tags", "content": "A\tinput.cpp\t/^class A$/;\"\tclass\tfile:\troles:def\nB\tinput.cpp\t/^class B : public A$/;\"\tclass\tfile:\troles:def\noperator ()\tinput.cpp\t/^\tusing A::operator();$/;\"\tname\tclass:B\troles:def\noperator ()\tinput.cpp\t/^\tvoid operator ()() {};$/;\"\tfunction\tclass:A\ttyperef:typename:void\tfile:\tsignature:()\troles:def\noperator +\tinput.cpp\t/^\tint operator +(int i) { return i; };$/;\"\tfunction\tclass:A\ttyperef:typename:int\tfile:\tsignature:(int i)\troles:def\noperator +\tinput.cpp\t/^\tusing A::operator+;$/;\"\tname\tclass:B\troles:def\nstd\tinput.cpp\t/^using namespace std;$/;\"\tusing\tfile:\troles:def\nstring\tinput.cpp\t/^#include /;\"\theader\troles:system\nstring\tinput.cpp\t/^using std::string;$/;\"\tname\tfile:\troles:def\ntest\tinput.cpp\t/^\tusing A::test;$/;\"\tname\tclass:B\troles:def\ntest\tinput.cpp\t/^\tvoid test();$/;\"\tprototype\tclass:A\ttyperef:typename:void\tfile:\tsignature:()\troles:def\ntest\tinput.cpp\t/^\tvoid test(x t);$/;\"\tprototype\tclass:B\ttyperef:typename:void\tfile:\tsignature:(x t)\troles:def\nx\tinput.cpp\t/^using x = std::string;$/;\"\ttypedef\ttyperef:typename:std::string\tfile:\troles:def\n" }, { "path": "Units/parser-cxx.r/using.cpp.d/input.cpp", "content": "#include \n\nusing namespace std;\nusing std::string;\nusing x = std::string;\n\nclass A\n{\npublic:\n\tvoid test();\n\tvoid operator ()() {};\n\tint operator +(int i) { return i; };\n};\n\nclass B : public A\n{\npublic:\n\tvoid test(x t);\n\tusing A::test;\n\tusing A::operator();\n\tusing A::operator+;\n};\n" }, { "path": "Units/parser-cxx.r/variable-declarations.cpp.d/args.ctags", "content": "--kinds-c++=lvm\n\n# for testing that the parser can skip __declspec\n--kinds-c++=+d\n--param-CPreProcessor._expand=true\n--fields=+{signature}\n--fields-c++=+{macrodef}\n" }, { "path": "Units/parser-cxx.r/variable-declarations.cpp.d/expected.tags", "content": "MY_API\tinput.cpp\t/^#define MY_API /;\"\td\tfile:\tmacrodef:__declspec(dllexport)\nSIZE\tinput.cpp\t/^#define SIZE /;\"\td\tfile:\tmacrodef:25\nl01\tinput.cpp\t/^\tunsigned short int l01;$/;\"\tl\tfunction:main\ttyperef:typename:unsigned short int\tfile:\nl02\tinput.cpp\t/^\tunsigned long long int * const l02 = NULL, * l03 = NULL;$/;\"\tl\tfunction:main\ttyperef:typename:unsigned long long int * const\tfile:\nl03\tinput.cpp\t/^\tunsigned long long int * const l02 = NULL, * l03 = NULL;$/;\"\tl\tfunction:main\ttyperef:typename:unsigned long long int * const *\tfile:\nl04\tinput.cpp\t/^\tregister int ** l04 = 0;$/;\"\tl\tfunction:main\ttyperef:typename:register int **\tfile:\nl05\tinput.cpp\t/^\tstd::string l05;$/;\"\tl\tfunction:main\ttyperef:typename:std::string\tfile:\nl06\tinput.cpp\t/^\tstd::string l06(\"test\");$/;\"\tl\tfunction:main\ttyperef:typename:std::string\tfile:\nl07\tinput.cpp\t/^\tstd::string l07 = \"test\";$/;\"\tl\tfunction:main\ttyperef:typename:std::string\tfile:\nl08\tinput.cpp\t/^\tconst std::string & l08 = l07, l09 = l07;$/;\"\tl\tfunction:main\ttyperef:typename:const std::string &\tfile:\nl09\tinput.cpp\t/^\tconst std::string & l08 = l07, l09 = l07;$/;\"\tl\tfunction:main\ttyperef:typename:const std::string\tfile:\nl10\tinput.cpp\t/^\tconst void * (*l10)() = NULL;$/;\"\tl\tfunction:main\ttyperef:typename:const void * (*)()\tfile:\nl11\tinput.cpp\t/^\tunsigned long int & (*l11)(void *);$/;\"\tl\tfunction:main\ttyperef:typename:unsigned long int & (*)(void *)\tfile:\nl12\tinput.cpp\t/^\tstd::string & (*l12)(void);$/;\"\tl\tfunction:main\ttyperef:typename:std::string & (*)(void)\tfile:\nl13\tinput.cpp\t/^\tstd::string ** (*l13)(int a,int b);$/;\"\tl\tfunction:main\ttyperef:typename:std::string ** (*)(int a,int b)\tfile:\nl14\tinput.cpp\t/^\tstd::basic_string, std::allocator > l14;$/;\"\tl\tfunction:main\ttyperef:typename:std::basic_string,std::allocator>\tfile:\nl15\tinput.cpp\t/^\tstruct Struct1 l15;$/;\"\tl\tfunction:main\ttyperef:struct:Struct1\tfile:\nl16\tinput.cpp\t/^\tstruct Struct1 * l16, l17, l18[10];$/;\"\tl\tfunction:main\ttyperef:struct:Struct1 *\tfile:\nl17\tinput.cpp\t/^\tstruct Struct1 * l16, l17, l18[10];$/;\"\tl\tfunction:main\ttyperef:struct:Struct1\tfile:\nl18\tinput.cpp\t/^\tstruct Struct1 * l16, l17, l18[10];$/;\"\tl\tfunction:main\ttyperef:struct:Struct1[10]\tfile:\nl19\tinput.cpp\t/^\tStruct1 l19 = {};$/;\"\tl\tfunction:main\ttyperef:typename:Struct1\tfile:\nl20\tinput.cpp\t/^\tstd::string ** l20[SIZE];$/;\"\tl\tfunction:main\ttyperef:typename:std::string ** [25]\tfile:\nl21\tinput.cpp\t/^\tstd::string l21[1 << 2];$/;\"\tl\tfunction:main\ttyperef:typename:std::string[]\tfile:\nl22\tinput.cpp\t/^\tstd::string * l22[SIZE][SIZE];$/;\"\tl\tfunction:main\ttyperef:typename:std::string * [25][25]\tfile:\nl23\tinput.cpp\t/^\tstd::string l23[5][2];$/;\"\tl\tfunction:main\ttyperef:typename:std::string[5][2]\tfile:\nl24\tinput.cpp\t/^\tstd::string * const l24 = 0;$/;\"\tl\tfunction:main\ttyperef:typename:std::string * const\tfile:\nl25\tinput.cpp\t/^\twchar_t l25[] = { L\"кошка\" };$/;\"\tl\tfunction:main\ttyperef:typename:wchar_t[]\tfile:\nl26\tinput.cpp\t/^\twchar_t l26[] { L'к', L'о', L'ш', L'к', L'а', L'\\\\0' };$/;\"\tl\tfunction:main\ttyperef:typename:wchar_t[]\tfile:\nl27\tinput.cpp\t/^\tstd::string l27[] = { std::string(\"one\"),\"two\",{'t', 'h', 'r', 'e', 'e'} };$/;\"\tl\tfunction:main\ttyperef:typename:std::string[]\tfile:\nl28\tinput.cpp\t/^\tint l28 {};$/;\"\tl\tfunction:main\ttyperef:typename:int\tfile:\nl29\tinput.cpp\t/^\tbool l29 { false };$/;\"\tl\tfunction:main\ttyperef:typename:bool\tfile:\nl30\tinput.cpp\t/^\tstd::string * l30{ new std::string(\"test\") };$/;\"\tl\tfunction:main\ttyperef:typename:std::string *\tfile:\nl31\tinput.cpp\t/^\tstd::string * l31(new std::string(\"test\"));$/;\"\tl\tfunction:main\ttyperef:typename:std::string *\tfile:\nl32\tinput.cpp\t/^\tauto l32 = new std::basic_string, std::allocator >;$/;\"\tl\tfunction:main\ttyperef:typename:auto\tfile:\nl32_33_0\tinput.cpp\t/^class MY_API n06 l32_33_0;$/;\"\tv\ttyperef:class:n06\nl32_33_1\tinput.cpp\t/^class __declspec(dllexport) n07 l32_33_1;$/;\"\tv\ttyperef:class:n07\nl33\tinput.cpp\t/^\tvoid (Struct1::*l33)() = NULL;$/;\"\tl\tfunction:anotherFunc\ttyperef:typename:void (Struct1::*)()\tfile:\nl34\tinput.cpp\t/^\tvoid (Struct1::*l34)(int) = NULL;$/;\"\tl\tfunction:anotherFunc\ttyperef:typename:void (Struct1::*)(int)\tfile:\nl35\tinput.cpp\t/^\tdecltype(l36) l35;$/;\"\tl\tfunction:anotherFunc\ttyperef:typename:decltype(l36)\tfile:\nl35\tinput.cpp\t/^\tint (Struct1::*l35)(int) = NULL;$/;\"\tl\tfunction:anotherFunc\ttyperef:typename:int (Struct1::*)(int)\tfile:\nm01\tinput.cpp\t/^\tunsigned int m01;$/;\"\tm\tstruct:Struct1\ttyperef:typename:unsigned int\tfile:\nm02\tinput.cpp\t/^\tstd::string m02;$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string\tfile:\nm03\tinput.cpp\t/^\tstd::string ** m03, m04;$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string **\tfile:\nm04\tinput.cpp\t/^\tstd::string ** m03, m04;$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string\tfile:\nm05\tinput.cpp\t/^\tstd::string & (*m05)(int a,int b);$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string & (*)(int a,int b)\tfile:\nm06\tinput.cpp\t/^\tstd::basic_string, std::allocator > m06[10];$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::basic_string,std::allocator>[10]\tfile:\nm07\tinput.cpp\t/^\tstd::string m07 { \"test\" }; \\/\\/ C++11$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string\tfile:\nm08\tinput.cpp\t/^\tstd::string m08[2] { \"a\", \"b\" };$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string[2]\tfile:\nm09\tinput.cpp\t/^\tint m09 {};$/;\"\tm\tstruct:Struct1\ttyperef:typename:int\tfile:\nm10\tinput.cpp\t/^\tint m10[2][2]{{1, 2}, {3, 4}};$/;\"\tm\tstruct:Struct1\ttyperef:typename:int[2][2]\tfile:\nm11\tinput.cpp\t/^\tstd::array m11 { {1,2,3} };$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::array\tfile:\nm12\tinput.cpp\t/^\tstd::string m12[3] { std::string(\"one\"),\"two\",{'t', 'h', 'r', 'e', 'e'} };$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string[3]\tfile:\nm13\tinput.cpp\t/^\tint m13 {false};$/;\"\tm\tstruct:Struct1\ttyperef:typename:int\tfile:\nm14\tinput.cpp\t/^\tstd::string * m14 { new std::string(\"test\") };$/;\"\tm\tstruct:Struct1\ttyperef:typename:std::string *\tfile:\nm15\tinput.cpp\t/^\tdecltype(int) m15;$/;\"\tm\tstruct:Struct1\ttyperef:typename:decltype(int)\tfile:\nv01\tinput.cpp\t/^} v01, v02[10];$/;\"\tv\ttyperef:struct:Struct1\nv02\tinput.cpp\t/^} v01, v02[10];$/;\"\tv\ttyperef:struct:Struct1[10]\nv03\tinput.cpp\t/^} v03, * v04;$/;\"\tv\ttyperef:enum:Enum1\nv04\tinput.cpp\t/^} v03, * v04;$/;\"\tv\ttyperef:enum:Enum1 *\nv05\tinput.cpp\t/^struct Struct1 v05, * v06 = NULL;$/;\"\tv\ttyperef:struct:Struct1\nv06\tinput.cpp\t/^struct Struct1 v05, * v06 = NULL;$/;\"\tv\ttyperef:struct:Struct1 *\nv07\tinput.cpp\t/^std::string v07(\"test\"), v08(\"test\");$/;\"\tv\ttyperef:typename:std::string\nv08\tinput.cpp\t/^std::string v07(\"test\"), v08(\"test\");$/;\"\tv\ttyperef:typename:std::string\nv09\tinput.cpp\t/^std::basic_string, std::allocator > ** v09;$/;\"\tv\ttyperef:typename:std::basic_string,std::allocator> **\n" }, { "path": "Units/parser-cxx.r/variable-declarations.cpp.d/input.cpp", "content": "#include \n#include \n\n// All the m*, l* and v* are valid variable declarations. The n* are NOT valid declarations.\n\nstruct Struct1\n{\n\tunsigned int m01;\n\tstd::string m02;\n\tstd::string ** m03, m04;\n\tstd::string & (*m05)(int a,int b);\n\tstd::basic_string, std::allocator > m06[10];\n\tstd::string m07 { \"test\" }; // C++11\n\tstd::string m08[2] { \"a\", \"b\" };\n\tint m09 {};\n\tint m10[2][2]{{1, 2}, {3, 4}};\n\tstd::array m11 { {1,2,3} };\n\tstd::string m12[3] { std::string(\"one\"),\"two\",{'t', 'h', 'r', 'e', 'e'} };\n\tint m13 {false};\n\tstd::string * m14 { new std::string(\"test\") };\n\tdecltype(int) m15;\n} v01, v02[10];\n\nenum Enum1\n{\n\tE1\n} v03, * v04;\n\nstruct Struct1 v05, * v06 = NULL;\nstd::string v07(\"test\"), v08(\"test\");\nstd::basic_string, std::allocator > ** v09;\n\nint main(int argc,char ** argv)\n{\n\tunsigned short int l01;\n\tunsigned long long int * const l02 = NULL, * l03 = NULL;\n\tregister int ** l04 = 0;\n\n\tstd::string l05;\n\tstd::string l06(\"test\");\n\tstd::string l07 = \"test\";\n\tconst std::string & l08 = l07, l09 = l07;\n\n\tconst void * (*l10)() = NULL;\n\tunsigned long int & (*l11)(void *);\n\tstd::string & (*l12)(void);\n\tstd::string ** (*l13)(int a,int b);\n\n\tstd::basic_string, std::allocator > l14;\n\n\tstruct Struct1 l15;\n\tstruct Struct1 * l16, l17, l18[10];\n\tStruct1 l19 = {};\n\n#define SIZE 25\n\tstd::string ** l20[SIZE];\n\tstd::string l21[1 << 2];\n\tstd::string * l22[SIZE][SIZE];\n\tstd::string l23[5][2];\n\tstd::string * const l24 = 0;\n\n\twchar_t l25[] = { L\"кошка\" };\n\twchar_t l26[] { L'к', L'о', L'ш', L'к', L'а', L'\\0' };\n\tstd::string l27[] = { std::string(\"one\"),\"two\",{'t', 'h', 'r', 'e', 'e'} };\n\tint l28 {};\n\tbool l29 { false };\n\tstd::string * l30{ new std::string(\"test\") };\n\tstd::string * l31(new std::string(\"test\"));\n\n\tauto l32 = new std::basic_string, std::allocator >;\n\n\treturn 0;\n}\n\n// All of these are NOT valid variable declarations (but still valid C++)\ntypedef struct X n01;\ntypedef unsigned short int n02;\ntypedef enum Enum1 n03;\n\n#define MY_API __declspec(dllexport)\nclass MY_API n04;\n\n// This would be nice: parse inside a block surrounded by ifdef/endif.\n// #ifdef _MSVC\n\tclass __declspec(dllexport) n05;\n// #endif\n\nclass MY_API n06 l32_33_0;\nclass __declspec(dllexport) n07 l32_33_1;\n\n// Note that function parameters are NOT extracted in this test.\n\ntemplate X func(X p1)\n{\n\treturn p1+1;\n}\n\nint anotherFunc(int n06)\n{\n\tfunc(n06);\n\n\tvoid (Struct1::*l33)() = NULL;\n\tvoid (Struct1::*l34)(int) = NULL;\n\tint (Struct1::*l35)(int) = NULL;\n\tdecltype(l36) l35;\n}\n" }, { "path": "Units/parser-cxx.r/variable-templates.d/args.ctags", "content": "--sort=no\n--fields-C++=+{properties}{specialization}{template}\n--kinds-C++=+Z\n" }, { "path": "Units/parser-cxx.r/variable-templates.d/expected.tags", "content": "chip\tinput.cpp\t/^enum chip {$/;\"\tg\tfile:\nA6XX\tinput.cpp\t/^\tA6XX = 6,$/;\"\te\tenum:chip\tfile:\nA7XX\tinput.cpp\t/^\tA7XX = 7,$/;\"\te\tenum:chip\tfile:\nCMD_REGS\tinput.cpp\t/^template int CMD_REGS[] = {};$/;\"\tv\ttyperef:typename:int[]\ttemplate:\nCHIP\tinput.cpp\t/^template int CMD_REGS[] = {};$/;\"\tZ\tvariable:CMD_REGS\ttyperef:typename:chip\nCMD_REGS\tinput.cpp\t/^template<> int CMD_REGS[] = {$/;\"\tv\ttyperef:typename:int[]\tproperties:specialization\ttemplate:<>\tspecialization:\nCMD_REGS\tinput.cpp\t/^template<> int CMD_REGS[][1] = {$/;\"\tv\ttyperef:typename:int[][1]\tproperties:specialization\ttemplate:<>\tspecialization:\nmain\tinput.cpp\t/^int main(void)$/;\"\tf\ttyperef:typename:int\nis_integral_v\tinput-0.cpp\t/^constexpr bool is_integral_v = false;$/;\"\tv\ttyperef:typename:bool\tproperties:constexpr\ttemplate:\nT\tinput-0.cpp\t/^template $/;\"\tZ\tvariable:is_integral_v\ttyperef:meta:class\nis_integral_v\tinput-0.cpp\t/^constexpr bool is_integral_v = true;$/;\"\tv\ttyperef:typename:bool\tproperties:specialization,constexpr\ttemplate:<>\tspecialization:\nmain\tinput-0.cpp\t/^int main()$/;\"\tf\ttyperef:typename:int\nzero\tinput-1.cpp\t/^constexpr T zero = 0;$/;\"\tv\ttyperef:typename:T\tproperties:constexpr\ttemplate:\nT\tinput-1.cpp\t/^template $/;\"\tZ\tvariable:zero\ttyperef:meta:class\nzero\tinput-1.cpp\t/^constexpr T* zero = nullptr;$/;\"\tv\ttyperef:typename:T *\tproperties:specialization,constexpr\ttemplate:\tspecialization:\nT\tinput-1.cpp\t/^template $/;\"\tZ\tvariable:zero\ttyperef:meta:class\nmain\tinput-1.cpp\t/^int main() {$/;\"\tf\ttyperef:typename:int\n" }, { "path": "Units/parser-cxx.r/variable-templates.d/input-0.cpp", "content": "// Taken from https://cpprefjp.github.io/lang/cpp14/variable_templates.html\ntemplate \nconstexpr bool is_integral_v = false;\n\ntemplate <>\nconstexpr bool is_integral_v = true;\n\nint main()\n{\n if (is_integral_v) {}\n}\n" }, { "path": "Units/parser-cxx.r/variable-templates.d/input-1.cpp", "content": "// Taken from https://cpprefjp.github.io/lang/cpp23/generalized_wording_for_partial_specializations.html\n#include \n\ntemplate \nconstexpr T zero = 0;\n\ntemplate \nconstexpr T* zero = nullptr;\n\nint main() {\n int x = zero;\n int* y = zero;\n\n std::cout << x << std::endl;\n std::cout << y << std::endl;\n}\n" }, { "path": "Units/parser-cxx.r/variable-templates.d/input.cpp", "content": "enum chip {\n\tA6XX = 6,\n\tA7XX = 7,\n};\n\ntemplate int CMD_REGS[] = {};\ntemplate<> int CMD_REGS[] = {\n\t0x3,\n};\n\ntemplate<> int CMD_REGS[][1] = {\n {0x4},\n};\n\nint main(void)\n{\n return CMD_REGS[0];\n}\n" }, { "path": "Units/parser-cxx.r/variables-in-control-statements.d/args.ctags", "content": "--kinds-C++=l\n" }, { "path": "Units/parser-cxx.r/variables-in-control-statements.d/expected.tags", "content": "f01\tinput.cpp\t/^\tfor(int f01=0;f01<10;f01++)$/;\"\tl\tfunction:test\ttyperef:typename:int\tfile:\nf02\tinput.cpp\t/^\tfor(int f02 = getUShort(), * f03 = getPointer();f03 < (getPointer() + 10);f03++)$/;\"\tl\tfunction:test\ttyperef:typename:int\tfile:\nf03\tinput.cpp\t/^\tfor(int f02 = getUShort(), * f03 = getPointer();f03 < (getPointer() + 10);f03++)$/;\"\tl\tfunction:test\ttyperef:typename:int *\tfile:\nf04\tinput.cpp\t/^\tfor(int f04=0,f05=5,f06=10;f04<10;f04++)$/;\"\tl\tfunction:test\ttyperef:typename:int\tfile:\nf05\tinput.cpp\t/^\tfor(int f04=0,f05=5,f06=10;f04<10;f04++)$/;\"\tl\tfunction:test\ttyperef:typename:int\tfile:\nf06\tinput.cpp\t/^\tfor(int f04=0,f05=5,f06=10;f04<10;f04++)$/;\"\tl\tfunction:test\ttyperef:typename:int\tfile:\nf07\tinput.cpp\t/^\tfor(std::string f07 = \"test\";;)$/;\"\tl\tfunction:test\ttyperef:typename:std::string\tfile:\nf09\tinput.cpp\t/^\tfor(std::unique_ptr f09 = 0;;)$/;\"\tl\tfunction:test\ttyperef:typename:std::unique_ptr\tfile:\nf10\tinput.cpp\t/^\tfor(std::unique_ptr f10(getPointer());;)$/;\"\tl\tfunction:test\ttyperef:typename:std::unique_ptr\tfile:\nf11\tinput.cpp\t/^\tfor(std::pair f11;;)$/;\"\tl\tfunction:test\ttyperef:typename:std::pair\tfile:\ni01\tinput.cpp\t/^\tif(int i01 = 10 + 20)$/;\"\tl\tfunction:test\ttyperef:typename:int\tfile:\ni02\tinput.cpp\t/^\tif(INT * i02 = 0)$/;\"\tl\tfunction:test\ttyperef:typename:INT *\tfile:\ni03\tinput.cpp\t/^\tif(INT & i03 = n01)$/;\"\tl\tfunction:test\ttyperef:typename:INT &\tfile:\nw01\tinput.cpp\t/^\twhile(unsigned short int w01 = getUShort())$/;\"\tl\tfunction:test\ttyperef:typename:unsigned short int\tfile:\n" }, { "path": "Units/parser-cxx.r/variables-in-control-statements.d/input.cpp", "content": "#include \n#include \n\n// Helpers (should be hidden in ctags output)\n\nunsigned short int getUShort()\n{\n\treturn 10;\n}\n\nint * getPointer()\n{\n\treturn 0;\n}\n\nint n01;\nunsigned short n02;\nint * n03;\n\ntypedef int INT;\n\nint n04()\n{\n\treturn 0;\n}\n\nint n05,n06,n07,n08,n09,n10,n11,n12,n13,n14,n15,n16;\n\ntemplate func(int no){ return no; };\n\n// The real test starts here\n\nvoid test()\n{\n\t// Valid variable declarations inside a for loop control structure\n\tfor(int f01=0;f01<10;f01++)\n\t{\n\t}\n\n\tfor(int f02 = getUShort(), * f03 = getPointer();f03 < (getPointer() + 10);f03++)\n\t{\n\t}\n\n\tfor(int f04=0,f05=5,f06=10;f04<10;f04++)\n\t{\n\t}\n\n\tfor(std::string f07 = \"test\";;)\n\t{\n\t}\n\n\tfor(int f08 : { 1,2,3,4,5 })\n\t{\n\t}\n\n\tfor(std::unique_ptr f09 = 0;;)\n\t{\n\t}\n\n\tfor(std::unique_ptr f10(getPointer());;)\n\t{\n\t}\n\n\tfor(std::pair f11;;)\n\t{\n\t}\n\n\tfor(auto f12 : { 't','e','s','t' })\n\t{\n\t}\n\n\t// Non valid variable declarations inside for\n\tfor(;;)\n\t{\n\t}\n\n\tfor(n01 = 0;n01 < 10;n01++)\n\t{\n\t}\n\n\tfor(n02 = getUShort(), n03 = getPointer();;)\n\t{\n\t}\n\n\tfor(n04();n04();)\n\t{\n\t}\n\n\t// Valid variable declaration inside an if\n\tif(int i01 = 10 + 20)\n\t{\n\t}\n\n\tif(INT * i02 = 0)\n\t{\n\t}\n\n\tif(INT & i03 = n01)\n\t{\n\t}\n\n\t// non valid declarations inside if\n\tif(n05 & n06)\n\t{\n\t}\n\n\tif(n07 * n08)\n\t{\n\t}\n\n\tif(n09 && n10)\n\t{\n\t}\n\n\tif(n11 < n12 || n13 > n14)\n\t{\n\t}\n\n\tif(static_cast(n15) < n14)\n\t{\n\t}\n\n\tif(func(n16))\n\t{\n\t}\n\n\t// Valid variable declarations inside a while\n\twhile(unsigned short int w01 = getUShort())\n\t{\n\t}\n}" }, { "path": "Units/parser-cxx.r/variables-prototypes-2.cpp.d/args.ctags", "content": "--kinds-c++=+plv\n--fields=SKn\n" }, { "path": "Units/parser-cxx.r/variables-prototypes-2.cpp.d/expected.tags", "content": "listOfStrings\tinput.cpp\t/^\tList listOfStrings(argv); \\/\\/ local$/;\"\tlocal\tline:4\nmain\tinput.cpp\t/^int main( int argc, char ** argv )$/;\"\tfunction\tline:1\tsignature:(int argc,char ** argv)\nsample\tinput.cpp\t/^\tString sample(argc); \\/\\/ local$/;\"\tlocal\tline:3\n" }, { "path": "Units/parser-cxx.r/variables-prototypes-2.cpp.d/input.cpp", "content": "int main( int argc, char ** argv )\n{\n\tString sample(argc); // local\n\tList listOfStrings(argv); // local\n\n\tforeach(String * p,listOfStrings) // NOT a prototype\n\t{\n\t\tp->dump(); // NOT a prototype\n\t}\n\n}" }, { "path": "Units/parser-cxx.r/variables-prototypes.cpp.b/args.ctags", "content": "--kinds-c++=+pl\n--fields=+S\n" }, { "path": "Units/parser-cxx.r/variables-prototypes.cpp.b/expected.tags", "content": "A1\tinput.cpp\t/^int A1 = i < 7 ? i : 7;$/;\"\tv\nA2\tinput.cpp\t/^int A2 = 8;$/;\"\tv\nA3\tinput.cpp\t/^int A3 = 9;$/;\"\tv\nA4\tinput.cpp\t/^int A4 = p->data;$/;\"\tv\nA5\tinput.cpp\t/^int A5 = 8;$/;\"\tv\nA6\tinput.cpp\t/^int ( *A6 )( int, char ** ) = &main;$/;\"\tv\nA7\tinput.cpp\t/^int A7( short ( *p )( int ) );$/;\"\tp\tfile:\tsignature:( short ( *p )( int ) )\nB1\tinput.cpp\t/^const char *B1( \"uuu\" ); \\/\\/variable$/;\"\tv\nB2\tinput.cpp\t/^int B2( int ooo, const char* o ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int ooo, const char* o )\nB3\tinput.cpp\t/^int B3( int( 7 ) ); \\/\\/variable$/;\"\tv\nC1\tinput.cpp\t/^int C1( a >> ooo ); \\/\\/variable$/;\"\tv\nC2\tinput.cpp\t/^int C2( int * h ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int * h )\nC3\tinput.cpp\t/^int C3( std::map( 9 ) ); \\/\\/variable$/;\"\tv\nC4\tinput.cpp\t/^int C4( std::map a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( std::map a )\nC5\tinput.cpp\t/^int C5( map & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( map & a )\nC6\tinput.cpp\t/^int C6( ooo & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( ooo & a )\nC7\tinput.cpp\t/^int C7( int & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int & a )\nC8\tinput.cpp\t/^int C8( map a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( map a )\nC9\tinput.cpp\t/^int C9( int a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int a )\nD1\tinput.cpp\t/^ind D1( a * 2 ); \\/\\/variable$/;\"\tv\nD2\tinput.cpp\t/^ind D2( \"a\" * 2 ); \\/\\/variable$/;\"\tv\nD3\tinput.cpp\t/^int D3( *j ); \\/\\/variable$/;\"\tv\nF1\tinput.cpp\t/^int F1( SomeType (*p)( int ) ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( SomeType (*p)( int ) )\nF2\tinput.cpp\t/^SomeType (*F2)( int o ); \\/\\/variable$/;\"\tv\nF3\tinput.cpp\t/^int F3( std::map & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( std::map & a )\nG1\tinput.cpp\t/^int G1( SomeType a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( SomeType a )\nH1\tinput.cpp\t/^char H1( const char *a = \"a\" ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( const char *a = )\nH2\tinput.cpp\t/^int H2(); \\/\\/prototype$/;\"\tp\tfile:\tsignature:()\nH3\tinput.cpp\t/^char H3( double ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( double )\nH4\tinput.cpp\t/^int H4( h u ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( h u )\nP1\tinput.cpp\t/^int (*P1)( int o ); \\/\\/variable$/;\"\tv\nV4\tinput.cpp\t/^int V4( iii( 'o' ) ); \\/\\/variable$/;\"\tv\nV5\tinput.cpp\t/^int V5( iii( o ) ); \\/\\/variable$/;\"\tv\nV6\tinput.cpp\t/^int V6( int (*p)( int ) ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int (*p)( int ) )\nV7\tinput.cpp\t/^int V7( 89 ); \\/\\/variable$/;\"\tv\nV8\tinput.cpp\t/^int V8( ooo ); \\/\\/variable$/;\"\tv\nW1\tinput.cpp\t/^int W1 __ARGS (( int a )){} \\/\\/function$/;\"\tf\tsignature:( int a )\nW2\tinput.cpp\t/^int W2 (( a - 5 ) \\/ 6 ); \\/\\/variable$/;\"\tv\nX1\tinput.cpp\t/^int X1( a.b ); \\/\\/variable$/;\"\tv\nX2\tinput.cpp\t/^int X2( a->b ); \\/\\/variable$/;\"\tv\nX3\tinput.cpp\t/^int X3( NS::a b ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( NS::a b )\nX4\tinput.cpp\t/^int X4( a ^ b ); \\/\\/variable $/;\"\tv\nX5\tinput.cpp\t/^int X5( a ^ 6 ); \\/\\/variable$/;\"\tv\nX6\tinput.cpp\t/^int X6( a | b ); \\/\\/variable$/;\"\tv\nX8\tinput.cpp\t/^int X8( a & b & 2 ); \\/\\/variable$/;\"\tv\nX9\tinput.cpp\t/^int X9( a && b ); \\/\\/variable$/;\"\tv\na1\tinput.cpp\t/^ int a1 = i < 7 ? i : 7;$/;\"\tl\na2\tinput.cpp\t/^ int a2 = 8;$/;\"\tl\na3\tinput.cpp\t/^ int a3 = 9;$/;\"\tl\na4\tinput.cpp\t/^ int a4 = p->data;$/;\"\tl\na5\tinput.cpp\t/^ int a5 = 8;$/;\"\tl\na6\tinput.cpp\t/^ int ( *a6 )( int, char ** ) = &main;$/;\"\tl\na7\tinput.cpp\t/^ int a7( short ( *p )( int ) );$/;\"\tp\tfile:\tsignature:( short ( *p )( int ) )\na8\tinput.cpp\t/^ short a8 = i;$/;\"\tl\nb1\tinput.cpp\t/^ const char *b1( \"uuu\" ); \\/\\/variable$/;\"\tl\nb2\tinput.cpp\t/^ int b2( int ooo, const char* o ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int ooo, const char* o )\nb3\tinput.cpp\t/^ int b3( int( 7 ) ); \\/\\/variable$/;\"\tl\nc1\tinput.cpp\t/^ int c1( a >> ooo ); \\/\\/variable$/;\"\tl\nc2\tinput.cpp\t/^ int c2( int * h ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int * h )\nc3\tinput.cpp\t/^ int c3( std::map( 9 ) ); \\/\\/variable$/;\"\tl\nc4\tinput.cpp\t/^ int c4( std::map a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( std::map a )\nc5\tinput.cpp\t/^ int c5( map & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( map & a )\nc6\tinput.cpp\t/^ int c6( ooo & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( ooo & a )\nc7\tinput.cpp\t/^ int c7( int & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int & a )\nc8\tinput.cpp\t/^ int c8( map a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( map a )\nc9\tinput.cpp\t/^ int c9( int a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int a )\nd1\tinput.cpp\t/^ ind d1( a * 2 ); \\/\\/variable$/;\"\tl\nd2\tinput.cpp\t/^ ind d2( \"a\" * 2 ); \\/\\/variable$/;\"\tl\nd3\tinput.cpp\t/^ int d3( *j ); \\/\\/variable$/;\"\tl\nf1\tinput.cpp\t/^ int f1( SomeType (*p)( int ) ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( SomeType (*p)( int ) )\nf2\tinput.cpp\t/^ SomeType (*f2)( int o ); \\/\\/variable$/;\"\tl\nf3\tinput.cpp\t/^ int f3( std::map & a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( std::map & a )\ng1\tinput.cpp\t/^ int g1( SomeType a ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( SomeType a )\nh1\tinput.cpp\t/^ char h1( const char *a = \"a\" ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( const char *a = )\nh2\tinput.cpp\t/^ int h2(); \\/\\/prototype$/;\"\tp\tfile:\tsignature:()\nh3\tinput.cpp\t/^ char h3( double ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( double )\nh4\tinput.cpp\t/^ int h4( h u ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( h u )\nmain\tinput.cpp\t/^int main( int argc, char ** argv )$/;\"\tf\tsignature:( int argc, char ** argv )\np1\tinput.cpp\t/^ int (*p1)( int o ); \\/\\/variable$/;\"\tl\nv4\tinput.cpp\t/^ int v4( iii( 'o' ) ); \\/\\/variable$/;\"\tl\nv5\tinput.cpp\t/^ int v5( iii( o ) ); \\/\\/variable$/;\"\tl\nv6\tinput.cpp\t/^ int v6( int (*p)( int ) ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int (*p)( int ) )\nv7\tinput.cpp\t/^ int v7( 89 ); \\/\\/variable$/;\"\tl\nv8\tinput.cpp\t/^ int v8( ooo ); \\/\\/variable$/;\"\tl\nw1\tinput.cpp\t/^ int w1 __ARGS (( int a )); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( int a )\nw2\tinput.cpp\t/^ int w2 (( a - 5 ) \\/ 6 ); \\/\\/variable$/;\"\tl\nx1\tinput.cpp\t/^ int x1( a.b ); \\/\\/variable$/;\"\tl\nx2\tinput.cpp\t/^ int x2( a->b ); \\/\\/variable$/;\"\tl\nx3\tinput.cpp\t/^ int x3( NS::a b ); \\/\\/prototype$/;\"\tp\tfile:\tsignature:( NS::a b )\nx4\tinput.cpp\t/^ int x4( a ^ b ); \\/\\/variable $/;\"\tl\nx5\tinput.cpp\t/^ int x5( a ^ 6 ); \\/\\/variable$/;\"\tl\nx6\tinput.cpp\t/^ int x6( a | b ); \\/\\/variable$/;\"\tl\nx8\tinput.cpp\t/^ int x8( a & b & 2 ); \\/\\/variable$/;\"\tl\nx9\tinput.cpp\t/^ int x9( a && b ); \\/\\/variable$/;\"\tl\n" }, { "path": "Units/parser-cxx.r/variables-prototypes.cpp.b/input.cpp", "content": "int main( int argc, char ** argv )\n{\n // 1. Angle brackets handling bug\n // As of now a2, a3 and a4 will be skipped\n\n int a1 = i < 7 ? i : 7;\n int a2 = 8;\n int a3 = 9;\n int a4 = p->data;\n int a5 = 8;\n\n\n // 2. Function pointer decl bug\n // As of now a6 will be skipped\n\n int ( *a6 )( int, char ** ) = &main;\n\n\n // 3. Wrong prototype will be written\n // As of now prototype will be ( SomeType ( p )( int ) )\n\n int a7( short ( *p )( int ) );\n\n\n // 4. DECL_IGNORE bug\n // As of now a8 will be skipped\n\n if ( argc > 0 )\n return 0;\n\n short a8 = i;\n\n\n // 5. Local variables support\n\t// As of now all the identifiers below are either reported as prototypes,\n\t// or not recognized at all\n\t// The comments on the right specify which kind of tag should be generated\n\n const char *b1( \"uuu\" ); //variable\n int b2( int ooo, const char* o ); //prototype\n int b3( int( 7 ) ); //variable\n int c1( a >> ooo ); //variable\n int c2( int * h ); //prototype\n int c3( std::map( 9 ) ); //variable\n int c4( std::map a ); //prototype\n int c5( map & a ); //prototype\n int c6( ooo & a ); //prototype (ambiguous)\n int c7( int & a ); //prototype\n int c8( map a ); //prototype\n int c9( int a ); //prototype\n ind d1( a * 2 ); //variable\n ind d2( \"a\" * 2 ); //variable\n int d3( *j ); //variable\n int f1( SomeType (*p)( int ) ); //prototype\n SomeType (*f2)( int o ); //variable\n int f3( std::map & a ); //prototype\n int g1( SomeType a ); //prototype\n\t// As of now, the signature of h1 will be \"( int a = R )\",\n\t// 'R' is to be replaced by something clearer to denote a\n\t// string literal\n char h1( const char *a = \"a\" ); //prototype\n int h2(); //prototype\n char h3( double ); //prototype\n int h4( h u ); //prototype\n int (*p1)( int o ); //variable\n int v4( iii( 'o' ) ); //variable\n int v5( iii( o ) ); //variable\n int v6( int (*p)( int ) ); //prototype\n int v7( 89 ); //variable\n int v8( ooo ); //variable\n // __ARGS(x) is a compatibility macro which optionally\n\t// expands to x when prototypes are supported, so\n\t// w1 should be parsed as a prototype\n int w1 __ARGS (( int a )); //prototype\n int w2 (( a - 5 ) / 6 ); //variable\n int x1( a.b ); //variable\n int x2( a->b ); //variable\n int x3( NS::a b ); //prototype\n int x4( a ^ b ); //variable \n int x5( a ^ 6 ); //variable\n int x6( a | b ); //variable\n\t// As of now, x7 is not recognized at all; it should\n\t// give a variable tag but it's tricky to get it\n\t// right because of '&' which suggests a prototype,\n\t// so for now let's just ignore it\n //int x7( a & b & c ); //variable\n int x8( a & b & 2 ); //variable\n int x9( a && b ); //variable\n}\n\n/* \n * Below is a copy/paste of the local identifiers above made uppercase,\n * but with a global scope instead.\n */\n\n// 1. Angle brackets handling bug\nint A1 = i < 7 ? i : 7;\nint A2 = 8;\nint A3 = 9;\nint A4 = p->data;\nint A5 = 8;\n\n\n// 2. Function pointer decl bug\nint ( *A6 )( int, char ** ) = &main;\n\n\n// 3. Wrong prototype will be written\nint A7( short ( *p )( int ) );\n\n\n// 4. Global variables support\nconst char *B1( \"uuu\" ); //variable\nint B2( int ooo, const char* o ); //prototype\nint B3( int( 7 ) ); //variable\nint C1( a >> ooo ); //variable\nint C2( int * h ); //prototype\nint C3( std::map( 9 ) ); //variable\nint C4( std::map a ); //prototype\nint C5( map & a ); //prototype\nint C6( ooo & a ); //prototype (ambiguous)\nint C7( int & a ); //prototype\nint C8( map a ); //prototype\nint C9( int a ); //prototype\nind D1( a * 2 ); //variable\nind D2( \"a\" * 2 ); //variable\nint D3( *j ); //variable\nint F1( SomeType (*p)( int ) ); //prototype\nSomeType (*F2)( int o ); //variable\nint F3( std::map & a ); //prototype\nint G1( SomeType a ); //prototype\nchar H1( const char *a = \"a\" ); //prototype\nint H2(); //prototype\nchar H3( double ); //prototype\nint H4( h u ); //prototype\nint (*P1)( int o ); //variable\nint V4( iii( 'o' ) ); //variable\nint V5( iii( o ) ); //variable (ambiguous)\nint V6( int (*p)( int ) ); //prototype\nint V7( 89 ); //variable\nint V8( ooo ); //variable (ambiguous)\nint W1 __ARGS (( int a )){} //function\nint W2 (( a - 5 ) / 6 ); //variable\nint X1( a.b ); //variable\nint X2( a->b ); //variable\nint X3( NS::a b ); //prototype\nint X4( a ^ b ); //variable \nint X5( a ^ 6 ); //variable\nint X6( a | b ); //variable\n//int X7( a & b & c ); //variable\nint X8( a & b & 2 ); //variable\nint X9( a && b ); //variable (ambiguous in C++)\n" }, { "path": "Units/parser-d.r/d-accessmod.d/args.ctags", "content": "--fields=nksSaf\n" }, { "path": "Units/parser-d.r/d-accessmod.d/expected.tags", "content": "!_TAG_FILE_FORMAT\t2\t/extended format; --format=1 will not append ;\" to lines/\n!_TAG_FILE_SORTED\t1\t/0=unsorted, 1=sorted, 2=foldcase/\n!_TAG_PROGRAM_AUTHOR\tDarren Hiebert\t/dhiebert@users.sourceforge.net/\n!_TAG_PROGRAM_NAME\tExuberant Ctags\t//\n!_TAG_PROGRAM_URL\thttps://github.com/fishman/ctags\t/official site/\n!_TAG_PROGRAM_VERSION\tDevelopment\t//\nA\tinput.d\t/^class A$/;\"\tc\tline:4\tfile:\nB\tinput.d\t/^ class B {$/;\"\tc\tline:47\tclass:A\tfile:\taccess:protected\nC\tinput.d\t/^ private class C {$/;\"\tc\tline:54\tclass:A.B\tfile:\taccess:private\nD\tinput.d\t/^ class D {$/;\"\tc\tline:63\tclass:A.B\tfile:\taccess:protected\na\tinput.d\t/^ void a()$/;\"\tf\tline:6\tclass:A\taccess:public\tsignature:()\nb\tinput.d\t/^ private void b()$/;\"\tf\tline:10\tclass:A\tfile:\taccess:private\tsignature:()\nbar\tinput.d\t/^ int bar;$/;\"\tm\tline:91\tfile:\taccess:public\nc\tinput.d\t/^ protected void c()$/;\"\tf\tline:15\tclass:A\taccess:protected\tsignature:()\nd\tinput.d\t/^ void d() $/;\"\tf\tline:23\tclass:A\tfile:\taccess:private\tsignature:()\ne\tinput.d\t/^ void e() $/;\"\tf\tline:26\tclass:A\tfile:\taccess:private\tsignature:()\nf\tinput.d\t/^ void f() $/;\"\tf\tline:33\tclass:A\taccess:public\tsignature:()\nfoo\tinput.d\t/^ int foo;$/;\"\tm\tline:86\tfile:\taccess:private\ng\tinput.d\t/^ void g() $/;\"\tf\tline:36\tclass:A\taccess:public\tsignature:()\nh\tinput.d\t/^ void h()$/;\"\tf\tline:43\tclass:A\taccess:protected\tsignature:()\ni\tinput.d\t/^ void i() {$/;\"\tf\tline:49\tclass:A.B\taccess:public\tsignature:()\nj\tinput.d\t/^ void j() {$/;\"\tf\tline:51\tclass:A.B\taccess:public\tsignature:()\nk\tinput.d\t/^ void k() {$/;\"\tf\tline:56\tclass:A.B.C\taccess:public\tsignature:()\nl\tinput.d\t/^ private void l() {$/;\"\tf\tline:58\tclass:A.B.C\tfile:\taccess:private\tsignature:()\nm\tinput.d\t/^ void m() {$/;\"\tf\tline:65\tclass:A.B.D\taccess:public\tsignature:()\nn\tinput.d\t/^ public void n() {$/;\"\tf\tline:67\tclass:A.B.D\taccess:public\tsignature:()\no\tinput.d\t/^ int o;$/;\"\tm\tline:73\tclass:A\tfile:\taccess:public\np\tinput.d\t/^ int p;$/;\"\tm\tline:75\tclass:A\tfile:\taccess:private\nq\tinput.d\t/^ int q;$/;\"\tm\tline:76\tclass:A\tfile:\taccess:private\nr\tinput.d\t/^ int r;$/;\"\tm\tline:78\tclass:A\tfile:\taccess:protected\ns\tinput.d\t/^ int s;$/;\"\tm\tline:79\tclass:A\tfile:\taccess:protected\nw\tinput.d\t/^ int w;$/;\"\tm\tline:22\tclass:A\tfile:\taccess:private\nx\tinput.d\t/^ protected int x;$/;\"\tm\tline:48\tclass:A.B\tfile:\taccess:protected\ny\tinput.d\t/^ private int y;$/;\"\tm\tline:55\tclass:A.B.C\tfile:\taccess:private\nz\tinput.d\t/^ int z;$/;\"\tm\tline:64\tclass:A.B.D\tfile:\taccess:public\n" }, { "path": "Units/parser-d.r/d-accessmod.d/input.d", "content": "\n\n\nclass A\n{\n void a()\n {\n }\n\n private void b()\n {\n }\n\n\n protected void c()\n {\n }\n\n\n private \n {\n int w;\n void d() \n {\n }\n void e() \n {\n }\n }\n\n public\n {\n void f() \n {\n }\n void g() \n {\n }\n }\n\n protected\n {\n void h()\n {\n }\n\n class B {\n protected int x;\n void i() {\n }\n void j() {\n }\n\n private class C {\n private int y;\n void k() {\n }\n private void l() {\n }\n }\n\n protected {\n class D {\n int z;\n void m() {\n }\n public void n() {\n }\n }\n }\n }\n }\n int o;\n private:\n int p;\n int q;\n protected:\n int r;\n int s;\n}\n\n\n\nprivate\n{\n int foo;\n}\n\npublic\n{\n int bar;\n}\n\n" }, { "path": "Units/parser-d.r/d-size_t-wchar_t-alias.d/expected.tags", "content": "size_t\tinput.d\t/^alias size_t = int;$/;\"\ta\tfile:\nwchar_t\tinput.d\t/^alias wchar_t = int;$/;\"\ta\tfile:\n" }, { "path": "Units/parser-d.r/d-size_t-wchar_t-alias.d/input.d", "content": "\nalias size_t = int;\nalias wchar_t = int;\n" }, { "path": "Units/parser-d.r/simple.d.d/expected.tags", "content": "AliasInt\tinput.d\t/^alias AliasInt = int;$/;\"\ta\tfile:\nCT\tinput.d\t/^\tclass CT(T)$/;\"\tc\tclass:Class\tfile:\nClass\tinput.d\t/^class Class : Interface$/;\"\tc\tfile:\nEnum\tinput.d\t/^enum Enum : int$/;\"\tg\tfile:\nInterface\tinput.d\t/^interface Interface$/;\"\ti\tfile:\nStruct\tinput.d\t/^struct Struct$/;\"\ts\tfile:\nUnion\tinput.d\t/^\tunion Union$/;\"\tu\tstruct:Struct\tfile:\n_bar\tinput.d\t/^\tprivate AliasInt _bar;$/;\"\tm\tclass:Class\tfile:\nattr_anon\tinput.d\t/^@(obj) T attr_anon;$/;\"\tv\nattr_decl\tinput.d\t/^@attr(i) int attr_decl = 1;$/;\"\tv\nbar\tinput.d\t/^\tbar,$/;\"\te\tenum:Enum\tfile:\nbar\tinput.d\t/^\tpublic AliasInt bar()$/;\"\tf\tclass:Class\nconditional\tinput.d\t/^\tT conditional;$/;\"\tv\tfile:\nfoo\tinput.d\t/^\tfoo,$/;\"\te\tenum:Enum\tfile:\ng_inout\tinput.d\t/^inout(int)* g_inout(inout(int)* p) { return p; }$/;\"\tf\nglobalVar\tinput.d\t/^__gshared int globalVar;$/;\"\tv\ni\tinput.d\t/^int i;$/;\"\tv\nmain\tinput.d\t/^void main(string[] args)$/;\"\tf\tfile:\nmember\tinput.d\t/^\t\tT member;$/;\"\tm\tclass:Class.CT\tfile:\nmodulevar\tinput.d\t/^\tint modulevar;$/;\"\tm\tfile:\nobj\tinput.d\t/^Object obj;$/;\"\tv\nout_contract\tinput.d\t/^void out_contract()$/;\"\tf\tfile:\nqar\tinput.d\t/^\t\tint qar;$/;\"\tm\tunion:Struct.Union\tfile:\nquxx\tinput.d\t/^\t\tbool quxx;$/;\"\tm\tunion:Struct.Union\tfile:\ntest.simple\tinput.d\t/^module test.simple;$/;\"\tM\ntfun\tinput.d\t/^\tauto tfun(T)(T v)$/;\"\tf\tclass:Class\nthis\tinput.d\t/^\tpublic this(AliasInt x)$/;\"\tf\tclass:Class\ntoString\tinput.d\t/^\toverride string toString() { return \"\"; }$/;\"\tf\tclass:Class\ntype_con\tinput.d\t/^const(int)* type_con;$/;\"\tv\ntype_imm\tinput.d\t/^immutable(int)* type_imm;$/;\"\tv\ntype_shar\tinput.d\t/^shared(int)[] type_shar;$/;\"\tv\n" }, { "path": "Units/parser-d.r/simple.d.d/input.d", "content": "module test.simple;\n\nimport std.stdio;\n\nalias AliasInt = int;\n\nstruct Struct\n{\n\tunion Union\n\t{\n\t\tbool quxx;\n\t\tint qar;\n\t}\n}\n\nenum Enum : int\n{\n\tfoo,\n\tbar,\n}\n\ninterface Interface\n{\n\tpublic AliasInt bar(); // FIXME prototypes\n}\n\nclass Class : Interface\n{\n\tprivate AliasInt _bar;\n\n\tpublic this(AliasInt x)\n\t{\n\t\tthis._bar = x;\n\t}\n\n\toverride string toString() { return \"\"; }\n\n\tpublic AliasInt bar()\n\t{\n\t\treturn this._bar;\n\t}\n\t\n\tprotected:\n\tauto tfun(T)(T v)\n\t{\n\t\treturn v;\n\t}\n\t\n\tclass CT(T)\n\t{\n\t\tT member;\n\t\tenum missing = T.init; // FIXME\n\t}\n}\n\npublic\n{\n\tint modulevar;\n}\n\nObject obj;\n\nconst(int)* type_con;\nimmutable(int)* type_imm;\ninout(int)* f_inout(inout Object); // FIXME prototypes\ninout(int)* g_inout(inout(int)* p) { return p; }\nshared(int)[] type_shar;\n\nprivate:\nint i;\n\n/+ \nint error;\n +/\n\n@attr(i) int attr_decl = 1;\n@attr(i) attr_decl_infer = 1; // FIXME\n@(obj) T attr_anon;\nvoid attr_post() @attr(obj); // FIXME prototypes\n\nstatic if (is(typeof(__traits(getMember, a, name)) == function))\n\tT conditional;\n\nstatic assert( num < TL.length, \"Name '\"~name~\"' is not found\");\n\n__gshared int globalVar;\n\nvoid out_contract()\nout(r; r > 0) {}\n\nvoid main(string[] args)\nin(args.length > 0)\n{\n\tauto foo = new Class(1337);\n\n\talias string AliasString;\n\tAliasString baz = \"Hello, World!\";\n\n\twritefln(\"%s\", foo.bar());\n}\n" }, { "path": "Units/parser-d.r/templates.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-d.r/templates.d/expected.tags", "content": "Template\tinput.d\t/^template Template(alias a, T...)$/;\"\tT\tfile:\nTemplateAlias\tinput.d\t/^ alias TemplateAlias = a!T;$/;\"\ta\ttemplate:Template\tfile:\nmemb\tinput.d\t/^ int memb;$/;\"\tm\ttemplate:Template\tfile:\nb\tinput.d\t/^Foo!x b;$/;\"\tv\nc\tinput.d\t/^Foo!(x) c;$/;\"\tv\nd\tinput.d\t/^Foo!(x < 2) d;$/;\"\tv\ng\tinput.d\t/^void g(Foo!x) {}$/;\"\tf\neach\tinput.d\t/^template each(alias fun = \"a\")$/;\"\tT\tfile:\nchild\tinput.d\t/^ template child(){}$/;\"\tT\ttemplate:each\tfile:\ntmethod\tinput.d\t/^ void tmethod()(){}$/;\"\tf\ttemplate:each\nImplementLength\tinput.d\t/^mixin ImplementLength!source; \\/\\/ FIXME source too!$/;\"\tX\nsource\tinput.d\t/^mixin ImplementLength!source; \\/\\/ FIXME source too!$/;\"\tX\nIT\tinput.d\t/^interface IT(T){}$/;\"\ti\tfile:\nST\tinput.d\t/^struct ST(T){}$/;\"\ts\tfile:\nUT\tinput.d\t/^union UT(T){}$/;\"\tu\tfile:\n" }, { "path": "Units/parser-d.r/templates.d/input.d", "content": "template Template(alias a, T...)\nif (is(typeof(a)))\n{\nprivate:\n // no parent:\n alias TemplateAlias = a!T;\n int memb;\n}\n\nFoo!x b;\nFoo!(x) c;\nFoo!(x < 2) d;\nvoid f(Foo!x); // FIXME prototypes\nvoid g(Foo!x) {}\n\ntemplate each(alias fun = \"a\")\n{\n template child(){}\n void tmethod()(){}\n}\n\n// FIXME\n/+\nint vt(alias a) = 0; // not parsed\n// parsed as T:\nalias AT(T) = T;\nenum ET(T) = T.init;\n+/\n\nmixin ImplementLength!source; // FIXME source too!\n\n// declaration templates\ninterface IT(T){}\nstruct ST(T){}\nunion UT(T){}\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-with-dtd.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-with-dtd.d/expected.tags", "content": "org.gnome.Terminal.Factory0\tinput.xml\t/^ $/;\"\ti\nCreateInstance\tinput.xml\t/^ $/;\"\tm\tinterface:org.gnome.Terminal.Factory0\noptions\tinput.xml\t/^ $/;\"\ta\tmethod:org.gnome.Terminal.Factory0.CreateInstance\nreceiver\tinput.xml\t/^ $/;\"\ta\tmethod:org.gnome.Terminal.Factory0.CreateInstance\norg.gnome.Terminal.Terminal0\tinput.xml\t/^ $/;\"\ti\nExec\tinput.xml\t/^ $/;\"\tm\tinterface:org.gnome.Terminal.Terminal0\noptions\tinput.xml\t/^ $/;\"\ta\tmethod:org.gnome.Terminal.Terminal0.Exec\narguments\tinput.xml\t/^ $/;\"\ta\tmethod:org.gnome.Terminal.Terminal0.Exec\nChildExited\tinput.xml\t/^ $/;\"\ts\tinterface:org.gnome.Terminal.Terminal0\nexit_code\tinput.xml\t/^ $/;\"\ta\tsignal:org.gnome.Terminal.Terminal0.ChildExited\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-with-dtd.d/features", "content": "xpath\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-with-dtd.d/input.xml", "content": "\n\n\n\n\n \n \n \n \n \n \n \n\n \n \n \n \n \n \n \n \n \n \n \n \n \n \n\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-without-dtd.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-without-dtd.d/expected.tags", "content": "/\tinput.xml\t/^$/;\"\tn\norg.freedesktop.NetworkManager.Device.Ppp\tinput.xml\t/^ $/;\"\ti\tnode:/\nPropertiesChanged\tinput.xml\t/^ $/;\"\ts\tinterface:/.org.freedesktop.NetworkManager.Device.Ppp\nproperties\tinput.xml\t/^ $/;\"\ta\tsignal:/.org.freedesktop.NetworkManager.Device.Ppp.PropertiesChanged\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-without-dtd.d/features", "content": "xpath\n" }, { "path": "Units/parser-dbus-inspect.r/node-as-root-without-dtd.d/input.xml", "content": "\n\n \n \n \n\n \n \n \n \n \n\n" }, { "path": "Units/parser-dbus-inspect.r/simple-dbus-inspect.d/args.ctags", "content": "--fields=+l\n" }, { "path": "Units/parser-dbus-inspect.r/simple-dbus-inspect.d/expected.tags", "content": "ClientAdded\tinput.xml\t/^ $/;\"\ts\tlanguage:DBusIntrospect\tinterface:org.gnome.SessionManager\nSessionName\tinput.xml\t/^ $/;\"\tp\tlanguage:DBusIntrospect\tinterface:org.gnome.SessionManager\nSetenv\tinput.xml\t/^ $/;\"\tm\tlanguage:DBusIntrospect\tinterface:org.gnome.SessionManager\ndoc\tinput.xml\t/^$/;\"\tn\tlanguage:XML\turi:http://www.freedesktop.org/dbus/1.0/doc.dtd\nid\tinput.xml\t/^ $/;\"\ta\tlanguage:DBusIntrospect\tsignal:org.gnome.SessionManager.ClientAdded\norg.gnome.SessionManager\tinput.xml\t/^ $/;\"\ti\tlanguage:DBusIntrospect\nvalue\tinput.xml\t/^ $/;\"\ta\tlanguage:DBusIntrospect\tmethod:org.gnome.SessionManager.Setenv\nvariable\tinput.xml\t/^ $/;\"\ta\tlanguage:DBusIntrospect\tmethod:org.gnome.SessionManager.Setenv\n" }, { "path": "Units/parser-dbus-inspect.r/simple-dbus-inspect.d/features", "content": "xpath\n" }, { "path": "Units/parser-dbus-inspect.r/simple-dbus-inspect.d/input.xml", "content": "\n\n\n \n\n \n\n \n \n \n The variable name\n \n \n \n \n The value\n \n \n \n \n Adds the variable name to the application launch environment with the specified value. May only be used during the Session Manager initialization phase.\n \n \n \n\n \n\n \n \n \n The object path for the added client\n \n \n \n \n Emitted when a client has been added to the session manager.\n \n \n \n \n\n \n\n \n \n \n The name of the session that has been loaded.\n \n \n \n\n\n \n\n" }, { "path": "Units/parser-dbus-service.r/simple.d/README", "content": "The test input is taken from libvirt-dbus-1.4.1-6.fc42.x86_64.\n" }, { "path": "Units/parser-dbus-service.r/simple.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-dbus-service.r/simple.d/expected.tags", "content": "D-BUS Service\tinput.service\t/^[D-BUS Service]$/;\"\ts\troles:def\nName\tinput.service\t/^Name=org.libvirt$/;\"\tk\tsection:D-BUS Service\troles:def\norg.libvirt\tinput.service\t/^Name=org.libvirt$/;\"\tn\troles:def\nExec\tinput.service\t/^Exec=\\/bin\\/false$/;\"\tk\tsection:D-BUS Service\troles:def\nSystemdService\tinput.service\t/^SystemdService=libvirt-dbus.service$/;\"\tk\tsection:D-BUS Service\troles:def\nlibvirt-dbus.service\tinput.service\t/^SystemdService=libvirt-dbus.service$/;\"\tu\troles:foreignlang\n" }, { "path": "Units/parser-dbus-service.r/simple.d/input.service", "content": "[D-BUS Service]\nName=org.libvirt\nExec=/bin/false\nSystemdService=libvirt-dbus.service\n" }, { "path": "Units/parser-dtd.r/colons-in-name.d/args.ctags", "content": "--sort=no\n--fields=+reK\n--extras=+r\n" }, { "path": "Units/parser-dtd.r/colons-in-name.d/expected.tags", "content": "boolean\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:32\naccel:acceleratorlist\tinput.dtd\t/^$/;\"\telement\troles:def\tend:34\naccel:acceleratorlist\tinput.dtd\t/^$/;\"\telement\troles:def\tend:40\naccel:item\tinput.dtd\t/^\n\n\n\n\n\n\n\n\n\n\n\n\n" }, { "path": "Units/parser-dtd.r/condtion.d/args.ctags", "content": "--sort=no\n--fields=+re\n--extras=+r\n" }, { "path": "Units/parser-dtd.r/condtion.d/expected.tags", "content": "x\tinput.dtd\t/^\n]]>\n" }, { "path": "Units/parser-dtd.r/elements.d/args.ctags", "content": "--sort=no\n--fields=+re\n--extras=+r\n" }, { "path": "Units/parser-dtd.r/elements.d/expected.tags", "content": "SUB\tinput.mod\t/^$/;\"\te\troles:def\tend:1\nSUP\tinput.mod\t/^$/;\"\te\troles:def\tend:1\n" }, { "path": "Units/parser-dtd.r/elements.d/input.mod", "content": "\n\t\t\t\t\t\t\t\t \n" }, { "path": "Units/parser-dtd.r/fq.d/args.ctags", "content": "--sort=no\n--extras=+rq\n--fields=+rE\n" }, { "path": "Units/parser-dtd.r/fq.d/expected.tags", "content": "a\tinput.dtd\t/^$/;\"\te\troles:def\na\tinput.dtd\t/^\n\n" }, { "path": "Units/parser-dtd.r/notation.d/expected.tags", "content": "WEB-JSPTAGLIB.1_2\tinput.dtd\t/^\n\n\n" }, { "path": "Units/parser-dtd.r/parameter-entities.d/args.ctags", "content": "--sort=no\n--fields=+reK\n--extras=+r\n" }, { "path": "Units/parser-dtd.r/parameter-entities.d/expected.tags", "content": "id-attr\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:27\ntitle-attr\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:28\nskip-attr\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:29\ndesc-attr\tinput.dtd\t/^$/;\"\telement\troles:def\tend:41\nsmil\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:47\nhead-element\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:49\nhead\tinput.dtd\t/^$/;\"\telement\troles:def\tend:51\nhead\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:52\nid-attr\tinput.dtd\t/^$/;\"\tparameterEntity\telement:head\troles:partOfAttDef\nlayout\tinput.dtd\t/^$/;\"\telement\troles:def\tend:61\nlayout\tinput.dtd\t/^$/;\"\telement\troles:def\tend:75\nregion\tinput.dtd\t/^$/;\"\telement\troles:def\tend:88\nroot-layout\tinput.dtd\t/^$/;\"\telement\troles:def\tend:98\nmeta\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:106\nschedule\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:107\ninline-link\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:108\nassoc-link\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:109\nlink\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:110\ncontainer-content\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:111\nbody-content\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:112\nbody\tinput.dtd\t/^$/;\"\telement\troles:def\tend:114\nbody\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:115\nid-attr\tinput.dtd\t/^$/;\"\tparameterEntity\telement:body\troles:partOfAttDef\nsync-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:141\npar\tinput.dtd\t/^$/;\"\telement\troles:def\tend:142\npar\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:155\nseq\tinput.dtd\t/^$/;\"\telement\troles:def\tend:156\nseq\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:173\nswitch\tinput.dtd\t/^$/;\"\telement\troles:def\tend:174\nswitch\tinput.dtd\t/^$/;\"\tparameterEntity\troles:def\tend:207\nclip-attrs\tinput.dtd\t/^$/;\"\telement\troles:def\tend:213\naudio\tinput.dtd\t/^$/;\"\telement\troles:def\tend:214\nimg\tinput.dtd\t/^$/;\"\telement\troles:def\tend:215\nvideo\tinput.dtd\t/^$/;\"\telement\troles:def\tend:216\ntext\tinput.dtd\t/^$/;\"\telement\troles:def\tend:217\ntextstream\tinput.dtd\t/^$/;\"\telement\troles:def\tend:218\nanimation\tinput.dtd\t/^$/;\"\telement\troles:def\tend:219\nref\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:221\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:ref\troles:partOfAttDef\nclip-attrs\tinput.dtd\t/^$/;\"\tparameterEntity\telement:ref\troles:partOfAttDef\naudio\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:222\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:audio\troles:partOfAttDef\nclip-attrs\tinput.dtd\t/^$/;\"\tparameterEntity\telement:audio\troles:partOfAttDef\nvideo\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:223\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:video\troles:partOfAttDef\nclip-attrs\tinput.dtd\t/^$/;\"\tparameterEntity\telement:video\troles:partOfAttDef\nanimation\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:224\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:animation\troles:partOfAttDef\nclip-attrs\tinput.dtd\t/^$/;\"\tparameterEntity\telement:animation\troles:partOfAttDef\ntextstream\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:225\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:textstream\troles:partOfAttDef\nclip-attrs\tinput.dtd\t/^$/;\"\tparameterEntity\telement:textstream\troles:partOfAttDef\ntext\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:226\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:text\troles:partOfAttDef\nimg\tinput.dtd\t/^$/;\"\telement\troles:attOwner\tend:227\nmo-attributes\tinput.dtd\t/^$/;\"\tparameterEntity\telement:img\troles:partOfAttDef\nsmil-link-attributes\tinput.dtd\t/^$/;\"\telement\troles:def\tend:240\na\tinput.dtd\t/^$/;\"\telement\troles:def\tend:247\nanchor\tinput.dtd\t/^\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n" }, { "path": "Units/parser-dtd.r/simple-dtd.d/args.ctags", "content": "--sort=no\n--fields=+reK\n--extras=+r\n" }, { "path": "Units/parser-dtd.r/simple-dtd.d/expected.tags", "content": "resource-agent\tinput.dtd\t/^$/;\"\telement\troles:def\tend:5\nresource-agent\tinput.dtd\t/^$/;\"\tattribute\telement:resource-agent\troles:def\nversion\tinput.dtd\t/^$/;\"\telement\troles:def\tend:10\nparameters\tinput.dtd\t/^$/;\"\telement\troles:def\tend:12\nactions\tinput.dtd\t/^$/;\"\telement\troles:def\tend:14\nparameter\tinput.dtd\t/^$/;\"\telement\troles:def\tend:16\nparameter\tinput.dtd\t/^$/;\"\tattribute\telement:parameter\troles:def\nlongdesc\tinput.dtd\t/^$/;\"\telement\troles:def\tend:22\nlongdesc\tinput.dtd\t/^$/;\"\tattribute\telement:longdesc\troles:def\nshortdesc\tinput.dtd\t/^$/;\"\telement\troles:def\tend:26\nshortdesc\tinput.dtd\t/^$/;\"\tattribute\telement:shortdesc\troles:def\ncontent\tinput.dtd\t/^$/;\"\telement\troles:def\tend:30\ncontent\tinput.dtd\t/^$/;\"\tattribute\telement:content\troles:def\naction\tinput.dtd\t/^$/;\"\telement\troles:def\tend:35\naction\tinput.dtd\t/^$/;\"\tattribute\telement:action\troles:def\n" }, { "path": "Units/parser-dtd.r/simple-dtd.d/input.dtd", "content": "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n" }, { "path": "Units/parser-dts.r/dts-core-dump.d/input.dts", "content": "m{" }, { "path": "Units/parser-dts.r/dts-fq-core-dump.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-dts.r/dts-fq-core-dump.d/args.ctags", "content": "--extras=+q\n" }, { "path": "Units/parser-dts.r/dts-fq-core-dump.d/input.dts", "content": "m{" }, { "path": "Units/parser-dts.r/dts-fq-without-scope-field.d/README", "content": "This test case verifies a corner use case of Cork based automatic full\nqualified tag generator(FQgen).\n\nFQgen caches scope informations built just before emitting it as value\nfor scope fields. Therefore when --field=-s(disabling scope field) is\ngiven, FQ tags were not generated.\n" }, { "path": "Units/parser-dts.r/dts-fq-without-scope-field.d/args.ctags", "content": "--fields=+r-s\n--extras=+rq\n" }, { "path": "Units/parser-dts.r/dts-fq-without-scope-field.d/expected.tags", "content": "0x00\tinput.dts\t/^\t phandle = <0x00>;$/;\"\tp\troles:def\nbar\tinput.dts\t/^#define bar /;\"\td\tfile:\troles:def\nbar\tinput.dts\t/^#undef bar$/;\"\td\tfile:\troles:undef\nfoo.dtsi\tinput.dts\t/^#include \"foo.dtsi\"/;\"\th\troles:local\nlabel\tinput.dts\t/^label: test {$/;\"\tl\troles:def\nlabel.0x00\tinput.dts\t/^\t phandle = <0x00>;$/;\"\tp\troles:def\nlabel.label2\tinput.dts\t/^\t label2: chosen { } ;$/;\"\tl\troles:def\nlabel2\tinput.dts\t/^\t label2: chosen { } ;$/;\"\tl\troles:def\n" }, { "path": "Units/parser-dts.r/dts-fq-without-scope-field.d/input.dts", "content": "/dts-v1/;\n\n#include \"foo.dtsi\"\n#define bar 98\n\nlabel: test {\n dummy {\n\t label2: chosen { } ;\n\t phandle = <0x00>;\n };\n};\n#undef bar\n" }, { "path": "Units/parser-dts.r/dts-simple.d/args.ctags", "content": "--fields=+Zrl\n--extras=+rq\n" }, { "path": "Units/parser-dts.r/dts-simple.d/expected.tags", "content": "0x00\tinput.dts\t/^\t phandle = <0x00>;$/;\"\tp\tlanguage:DTS\tscope:label:label\troles:def\nbar\tinput.dts\t/^#define bar /;\"\td\tlanguage:CPreProcessor\tfile:\troles:def\nbar\tinput.dts\t/^#undef bar$/;\"\td\tlanguage:CPreProcessor\tfile:\troles:undef\nfoo.dtsi\tinput.dts\t/^#include \"foo.dtsi\"/;\"\th\tlanguage:CPreProcessor\troles:local\nlabel\tinput.dts\t/^label: test {$/;\"\tl\tlanguage:DTS\troles:def\nlabel.0x00\tinput.dts\t/^\t phandle = <0x00>;$/;\"\tp\tlanguage:DTS\tscope:label:label\troles:def\nlabel.label2\tinput.dts\t/^\t label2: chosen { } ;$/;\"\tl\tlanguage:DTS\tscope:label:label\troles:def\nlabel2\tinput.dts\t/^\t label2: chosen { } ;$/;\"\tl\tlanguage:DTS\tscope:label:label\troles:def\n" }, { "path": "Units/parser-dts.r/dts-simple.d/input.dts", "content": "/dts-v1/;\n\n#include \"foo.dtsi\"\n#define bar 98\n\nlabel: test {\n dummy {\n\t label2: chosen { } ;\n\t phandle = <0x00>;\n };\n};\n#undef bar\n" }, { "path": "Units/parser-eiffel.r/aliases.e.d/expected.tags", "content": "<\tinput.e\t/^\ta alias \"<\", b (other: like Current): BOOLEAN$/;\"\tf\tclass:ALIASES\nALIASES\tinput.e\t/^class ALIASES$/;\"\tc\n^\tinput.e\t/^\tyor alias \"^\", zor (other: like Current): INTEGER$/;\"\tf\tclass:ALIASES\na\tinput.e\t/^\ta alias \"<\", b (other: like Current): BOOLEAN$/;\"\tf\tclass:ALIASES\nattribute_a\tinput.e\t/^\tattribute_a, attribute_b: INTEGER$/;\"\tf\tclass:ALIASES\nattribute_b\tinput.e\t/^\tattribute_a, attribute_b: INTEGER$/;\"\tf\tclass:ALIASES\nb\tinput.e\t/^\ta alias \"<\", b (other: like Current): BOOLEAN$/;\"\tf\tclass:ALIASES\nconstant_a\tinput.e\t/^\tconstant_a, constant_b: INTEGER = 1$/;\"\tf\tclass:ALIASES\nconstant_b\tinput.e\t/^\tconstant_a, constant_b: INTEGER = 1$/;\"\tf\tclass:ALIASES\nfunction1a\tinput.e\t/^\tfunction1a, function1b (one: DOUBLE): DOUBLE$/;\"\tf\tclass:ALIASES\nfunction1b\tinput.e\t/^\tfunction1a, function1b (one: DOUBLE): DOUBLE$/;\"\tf\tclass:ALIASES\nprocedure1a\tinput.e\t/^\tprocedure1a, procedure1b (one: DOUBLE)$/;\"\tf\tclass:ALIASES\nprocedure1b\tinput.e\t/^\tprocedure1a, procedure1b (one: DOUBLE)$/;\"\tf\tclass:ALIASES\nyor\tinput.e\t/^\tyor alias \"^\", zor (other: like Current): INTEGER$/;\"\tf\tclass:ALIASES\nzor\tinput.e\t/^\tyor alias \"^\", zor (other: like Current): INTEGER$/;\"\tf\tclass:ALIASES\n" }, { "path": "Units/parser-eiffel.r/aliases.e.d/input.e", "content": "class ALIASES\n\nfeature -- One\n\n\tattribute_a, attribute_b: INTEGER\n\n\tconstant_a, constant_b: INTEGER = 1\n\nfeature -- Two\n\n\tfunction1a, function1b (one: DOUBLE): DOUBLE\n\t\tdo\n\t\tend\n\nfeature -- Three\n\n\tprocedure1a, procedure1b (one: DOUBLE)\n\t\tdo\n\t\tend\n\n\ta alias \"<\", b (other: like Current): BOOLEAN\n\t\tdo\n\t\tend\n\n\tyor alias \"^\", zor (other: like Current): INTEGER\n\t\tdo\n\t\tend\n\nend\n" }, { "path": "Units/parser-eiffel.r/attributes.e.d/expected.tags", "content": "ATTRIBUTES\tinput.e\t/^expanded class ATTRIBUTES$/;\"\tc\nanchored\tinput.e\t/^\tanchored: like one$/;\"\tf\tclass:ATTRIBUTES\nattribute_full\tinput.e\t/^\tattribute_full: STRING$/;\"\tf\tclass:ATTRIBUTES\nattribute_short\tinput.e\t/^\tattribute_short: STRING$/;\"\tf\tclass:ATTRIBUTES\neight\tinput.e\t/^\teight: DOUBLE = 2.0$/;\"\tf\tclass:ATTRIBUTES\nfinal_feature\tinput.e\t/^\tfinal_feature$/;\"\tf\tclass:ATTRIBUTES\nfive\tinput.e\t/^\tfive, six: INTEGER = unique$/;\"\tf\tclass:ATTRIBUTES\nfour\tinput.e\t/^\tfour: DOUBLE$/;\"\tf\tclass:ATTRIBUTES\nnine\tinput.e\t/^\tnine: STRING = \"abc\"$/;\"\tf\tclass:ATTRIBUTES\none\tinput.e\t/^\tone: INTEGER$/;\"\tf\tclass:ATTRIBUTES\nseven\tinput.e\t/^\tseven: INTEGER = 1$/;\"\tf\tclass:ATTRIBUTES\nsix\tinput.e\t/^\tfive, six: INTEGER = unique$/;\"\tf\tclass:ATTRIBUTES\nthree\tinput.e\t/^\tthree: HASH_TABLE [ARRAY [DOUBLE], STRING]$/;\"\tf\tclass:ATTRIBUTES\ntwo\tinput.e\t/^\ttwo: ARRAY [STRING]$/;\"\tf\tclass:ATTRIBUTES\n" }, { "path": "Units/parser-eiffel.r/attributes.e.d/input.e", "content": "expanded class ATTRIBUTES\n\nfeature\n\n\tone: INTEGER\n\t\t\t-- Header comment\n\n\ttwo: ARRAY [STRING]\n\t\t\t-- Header comment\n\n\tthree: HASH_TABLE [ARRAY [DOUBLE], STRING]\n\t\t\t-- Header comment\n\n\tfour: DOUBLE\n\t\t\t-- Header comment\n\n\tfive, six: INTEGER = unique\n\t\t\t-- Header comment\n\n\tseven: INTEGER = 1\n\t\t\t-- Header comment\n\n\teight: DOUBLE = 2.0\n\t\t\t-- Header comment\n\n\tnine: STRING = \"abc\"\n\t\t\t-- Header comment\n\n\tanchored: like one\n\t\t\t-- Header comment\n\n\tattribute_short: STRING\n\t\t\t-- Header comment\n\t\tattribute\n\t\tend\n\n\tattribute_full: STRING\n\t\t\t-- Header comment\n\t\tnote\n\t\tobsolete\n\t\t\t\"Obsolete message\"\n\t\trequire\n\t\tlocal\n\t\tattribute\n\t\t\t-- Implementation\n\t\tensure\n\t\trescue\n\t\tend\n\n\tfinal_feature\n\t\tdo\n\t\tend\n\nend\n" }, { "path": "Units/parser-eiffel.r/class.e.d/expected.tags", "content": "//\tinput.e\t/^\t\t\tinfix \"\\/\" as infix \"\\/\\/\"$/;\"\tf\tclass:UBER_CLASS\nUBER_CLASS\tinput.e\t/^deferred class UBER_CLASS [G -> CONSTRAINT] obsolete \"message\"$/;\"\tc\nguard\tinput.e\t/^\tguard: INTEGER$/;\"\tf\tclass:UBER_CLASS\nmake\tinput.e\t/^\tmake$/;\"\tf\tclass:UBER_CLASS\nmake2\tinput.e\t/^\tmake2$/;\"\tf\tclass:UBER_CLASS\nmake3\tinput.e\t/^\tmake3$/;\"\tf\tclass:UBER_CLASS\nmy_generating_type\tinput.e\t/^\t\t\tgenerating_type as my_generating_type,$/;\"\tf\tclass:UBER_CLASS\nmy_generator\tinput.e\t/^\t\t\tgenerator as my_generator,$/;\"\tf\tclass:UBER_CLASS\nprocedure_full\tinput.e\t/^\tprocedure_full$/;\"\tf\tclass:UBER_CLASS\n" }, { "path": "Units/parser-eiffel.r/class.e.d/input.e", "content": "note\n\n\tdescription: \"Try everything\"\n\ndeferred class UBER_CLASS [G -> CONSTRAINT] obsolete \"message\"\n\ninherit\n\n\tANY\n\t\trename\n\t\t\tgenerator as my_generator,\n\t\t\tgenerating_type as my_generating_type,\n\t\t\tinfix \"/\" as infix \"//\"\n\t\texport\n\t\t\t{NONE} my_generator, my_generating_type;\n\t\t\t{ANY} same_type\n\t\tundefine\n\t\t\tis_equal\n\t\tredefine\n\t\t\tconforms_to\n\t\tselect\n\t\t\tconsitent\n\t\tend\n\n\tLINKED_LIST [G]\n\t\texport {NONE}\n\t\t\tall\n\t\tend\n\ncreate\n\n\tmake, make2\n\ncreate {SOMETHING}\n\n\tmake3\n\nfeature -- Initialization\n\n\tmake\n\t\tdo\n\t\tend\n\n\tmake2\n\t\tdo\n\t\tend\n\n\tmake3\n\t\tdo\n\t\tend\n\nfeature {ANY, NONE} -- Feature clause comment\n\n\tprocedure_full\n\t\trequire else\n\t\tlocal\n\t\tdo\n\t\tensure then\n\t\trescue\n\t\tend\n\n\tguard: INTEGER\n\ninvariant\n\n\tlabel: condition\n\nnote\n\n\tlicense: \"May not be used for any purpose\"\n\nend\n" }, { "path": "Units/parser-eiffel.r/deprecated-syntax.e.d/README", "content": "Currently (July 2016) the keywords \"indexing\", \"is\", and \"creation\" are all\ndeprecated in both the Eiffel Software and Liberty Eiffel dialects.\n\nThe \"infix\" and \"prefix\" keywords are deprecated by Eiffel Software. Liberty\nEiffel currently still supports them alongside \"alias\" though this is expected\nto change in the near future.\n" }, { "path": "Units/parser-eiffel.r/deprecated-syntax.e.d/expected.tags", "content": "+\tinput.e\t/^\tprefix \"+\": like Current$/;\"\tf\tclass:DEPRECATED_SYNTAX_TEST\n//\tinput.e\t/^\t\t\tinfix \"\\/\" as infix \"\\/\\/\"$/;\"\tf\tclass:DEPRECATED_SYNTAX_TEST\n<\tinput.e\t/^\tinfix \"<\" (other: like Current): BOOLEAN$/;\"\tf\tclass:DEPRECATED_SYNTAX_TEST\nDEPRECATED_SYNTAX_TEST\tinput.e\t/^\tDEPRECATED_SYNTAX_TEST$/;\"\tc\nfeature1\tinput.e\t/^\tfeature1 is$/;\"\tf\tclass:DEPRECATED_SYNTAX_TEST\nfeature2\tinput.e\t/^\tfeature2: INTEGER is 42$/;\"\tf\tclass:DEPRECATED_SYNTAX_TEST\nmake\tinput.e\t/^\tmake is$/;\"\tf\tclass:DEPRECATED_SYNTAX_TEST\n" }, { "path": "Units/parser-eiffel.r/deprecated-syntax.e.d/input.e", "content": "indexing\n\tlabel1: \"value\"\n\nclass\n\tDEPRECATED_SYNTAX_TEST\n\ninherit\n\tANY\n\t\trename\n\t\t\tinfix \"/\" as infix \"//\"\n\t\tend\ncreation\n\tmake\n\nfeature\n\tmake is\n\t\tdo\n\t\tend\n\n\tfeature1 is\n\t\t\t-- Header comment\n\t\tindexing\n\t\tobsolete\n\t\t\t\"Obsolete message\"\n\t\trequire\n\t\tlocal\n\t\tdo\n\t\tend\n\n\tfeature2: INTEGER is 42\n\n\tinfix \"<\" (other: like Current): BOOLEAN\n\t\tdo\n\t\tend\n\n\tprefix \"+\": like Current\n\t\tdo\n\t\tend\n\nindexing\n\tlabel2: \"value\"\nend\n" }, { "path": "Units/parser-eiffel.r/functions.e.d/expected.tags", "content": "+\tinput.e\t/^\tprefix_alias alias \"+\": like Current$/;\"\tf\tclass:FUNCTIONS\n<\tinput.e\t/^\tinfix_alias alias \"<\" (other: like Current): BOOLEAN$/;\"\tf\tclass:FUNCTIONS\nFUNCTIONS\tinput.e\t/^deferred class FUNCTIONS$/;\"\tc\nfunction0\tinput.e\t/^\tfunction0: INTEGER$/;\"\tf\tclass:FUNCTIONS\nfunction1\tinput.e\t/^\tfunction1 (one: STRING)$/;\"\tf\tclass:FUNCTIONS\nfunction2\tinput.e\t/^\tfunction2 (one: INTEGER; two: STRING): INTEGER$/;\"\tf\tclass:FUNCTIONS\nfunction_anchored\tinput.e\t/^\tfunction_anchored: like function0$/;\"\tf\tclass:FUNCTIONS\nfunction_full\tinput.e\t/^\tfunction_full (one: STRING)$/;\"\tf\tclass:FUNCTIONS\ninfix_alias\tinput.e\t/^\tinfix_alias alias \"<\" (other: like Current): BOOLEAN$/;\"\tf\tclass:FUNCTIONS\nprefix_alias\tinput.e\t/^\tprefix_alias alias \"+\": like Current$/;\"\tf\tclass:FUNCTIONS\n" }, { "path": "Units/parser-eiffel.r/functions.e.d/input.e", "content": "deferred class FUNCTIONS\n\nfeature -- One\n\n\tfunction0: INTEGER\n\t\tdo\n\t\tend\n\nfeature -- Two\n\n\tfunction1 (one: STRING)\n\t\tonce\n\t\tend\n\n\tfunction2 (one: INTEGER; two: STRING): INTEGER\n\t\tdeferred\n\t\tend\n\n\tfunction_anchored: like function0\n\t\tdo\n\t\tend\n\n\tfunction_full (one: STRING)\n\t\t\t-- header comment\n\t\tnote\n\t\tobsolete\n\t\t\t\"Obsolete message\"\n\t\trequire\n\t\tlocal\n\t\tdo\n\t\t\t-- Implementation\n\t\tensure\n\t\trescue\n\t\tend\n\n\tinfix_alias alias \"<\" (other: like Current): BOOLEAN\n\t\tdo\n\t\tend\n\n\tprefix_alias alias \"+\": like Current\n\t\tdo\n\t\tend\n\nend\n" }, { "path": "Units/parser-eiffel.r/inherit-rename.e.d/expected.tags", "content": "INHERIT_RENAME_TEST\tinput.e\t/^class INHERIT_RENAME_TEST$/;\"\tc\nfeat2\tinput.e\t/^ feat1 as feat2$/;\"\tf\tclass:INHERIT_RENAME_TEST\nfeat4\tinput.e\t/^ feat3 as feat4$/;\"\tf\tclass:INHERIT_RENAME_TEST\n" }, { "path": "Units/parser-eiffel.r/inherit-rename.e.d/input.e", "content": "class INHERIT_RENAME_TEST\n\ninherit\n\n FOO\n rename\n feat1 as feat2\n end\n\ninsert\n\n BAR\n rename\n feat3 as feat4\n end\n\nend\n" }, { "path": "Units/parser-eiffel.r/local-kind.e.d/args.ctags", "content": "--kinds-Eiffel=+l\n" }, { "path": "Units/parser-eiffel.r/local-kind.e.d/expected.tags", "content": "LOCAL_KIND_TEST\tinput.e\t/^class LOCAL_KIND_TEST$/;\"\tc\nc\tinput.e\t/^ s: STRING; c: CHARACTER$/;\"\tl\tfeature:LOCAL_KIND_TEST.feature1\tfile:\nfeature1\tinput.e\t/^ feature1$/;\"\tf\tclass:LOCAL_KIND_TEST\ni\tinput.e\t/^ i: INTEGER$/;\"\tl\tfeature:LOCAL_KIND_TEST.feature1\tfile:\nj\tinput.e\t/^ j, k: INTEGER$/;\"\tl\tfeature:LOCAL_KIND_TEST.feature1\tfile:\nk\tinput.e\t/^ j, k: INTEGER$/;\"\tl\tfeature:LOCAL_KIND_TEST.feature1\tfile:\ns\tinput.e\t/^ s: STRING; c: CHARACTER$/;\"\tl\tfeature:LOCAL_KIND_TEST.feature1\tfile:\n" }, { "path": "Units/parser-eiffel.r/local-kind.e.d/input.e", "content": "class LOCAL_KIND_TEST\n\nfeature\n\n feature1\n local\n i: INTEGER\n j, k: INTEGER\n s: STRING; c: CHARACTER\n do\n end\n\nend\n" }, { "path": "Units/parser-eiffel.r/note.e.d/expected.tags", "content": "NOTE_\tinput.e\t/^class NOTE_$/;\"\tc\n" }, { "path": "Units/parser-eiffel.r/note.e.d/input.e", "content": "note\n\n\tdescription: \"A simple description\"\n\nclass NOTE_\n\nnote\n\n\tlicense: \"Eiffel Forum License, version 1\"\n\nend\n" }, { "path": "Units/parser-eiffel.r/obsolete.e.d/expected.tags", "content": "OBSOLETE_\tinput.e\t/^class OBSOLETE_ obsolete \"Use a different one\"$/;\"\tc\nobsolete_attribute\tinput.e\t/^\tobsolete_attribute: INTEGER obsolete \"Use something else\"$/;\"\tf\tclass:OBSOLETE_\nobsolete_function\tinput.e\t/^\tobsolete_function (one: INTEGER): INTEGER obsolete \"Use something else\"$/;\"\tf\tclass:OBSOLETE_\nobsolete_procedure\tinput.e\t/^\tobsolete_procedure (one: INTEGER) obsolete \"Use something else\"$/;\"\tf\tclass:OBSOLETE_\n" }, { "path": "Units/parser-eiffel.r/obsolete.e.d/input.e", "content": "class OBSOLETE_ obsolete \"Use a different one\"\n\nfeature\n\n\tobsolete_attribute: INTEGER obsolete \"Use something else\"\n\t\tattribute\n\t\tend\n\n\tobsolete_function (one: INTEGER): INTEGER obsolete \"Use something else\"\n\t\tdo\n\t\tend\n\n\tobsolete_procedure (one: INTEGER) obsolete \"Use something else\"\n\t\tdo\n\t\tend\n\nend\n" }, { "path": "Units/parser-eiffel.r/procedures.e.d/expected.tags", "content": "PROCEDURES\tinput.e\t/^deferred class PROCEDURES$/;\"\tc\nprocedure0\tinput.e\t/^\tprocedure0$/;\"\tf\tclass:PROCEDURES\nprocedure1\tinput.e\t/^\tprocedure1 (one: STRING)$/;\"\tf\tclass:PROCEDURES\nprocedure2\tinput.e\t/^\tprocedure2 (one: INTEGER; two: STRING)$/;\"\tf\tclass:PROCEDURES\nprocedure_full\tinput.e\t/^\tprocedure_full (one: STRING)$/;\"\tf\tclass:PROCEDURES\n" }, { "path": "Units/parser-eiffel.r/procedures.e.d/input.e", "content": "deferred class PROCEDURES\n\nfeature -- One\n\n\tprocedure0\n\t\tdo\n\t\tend\n\nfeature -- Two\n\n\tprocedure1 (one: STRING)\n\t\tonce\n\t\tend\n\n\tprocedure2 (one: INTEGER; two: STRING)\n\t\tdeferred\n\t\tend\n\n\tprocedure_full (one: STRING)\n\t\t\t-- header comment\n\t\tnote\n\t\tobsolete\n\t\t\t\"Obsolete message\"\n\t\trequire\n\t\tlocal\n\t\tdo\n\t\t\t-- Implementation\n\t\tensure\n\t\trescue\n\t\tend\n\nend\n" }, { "path": "Units/parser-eiffel.r/verbatim.e.d/expected.tags", "content": "VERBATIM\tinput.e\t/^class VERBATIM$/;\"\tc\nconstant\tinput.e\t/^\tconstant: STRING = \"[$/;\"\tf\tclass:VERBATIM\ncpp_query\tinput.e\t/^\tcpp_query (obj: FX_OBJECT; app: POINTER): POINTER$/;\"\tf\tclass:VERBATIM\tfile:\ntail_attribute\tinput.e\t/^\ttail_attribute: INTEGER$/;\"\tf\tclass:VERBATIM\tfile:\n" }, { "path": "Units/parser-eiffel.r/verbatim.e.d/input.e", "content": "note\n\n\tdescription: \"[\n\t\tThis is a verbatim string.\n\t\t]\"\n\nclass VERBATIM\n\nfeature -- Sample\n\n\tconstant: STRING = \"[\n\t\t\tVertbatim constant\n\t\t\t]\"\n\nfeature {NONE} -- Implementation\n\n\tcpp_query (obj: FX_OBJECT; app: POINTER): POINTER\n\t\t\t-- Header comment\n\t\texternal \"[\n\t\t\tC++ [ClassName %\"EFXVisual.h%\"]\n\t\t\t(EIF_OBJECT, FXApp*): void*\n\t\t\t]\"\n\t\tend\n\n\ttail_attribute: INTEGER\n\nnote\n\n\tlibrary: \"[\n\t\t\tEiffelBase: Library of reusable components for Eiffel.\n\t\t\t]\"\n\n\nend\n" }, { "path": "Units/parser-elixir.r/elixir-callbacks.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-callbacks.d/expected.tags", "content": "CallbackModule\tinput.ex\t/^defmodule CallbackModule do$/;\"\tmodule\nnew_callback\tinput.ex\t/^ @callback new_callback() :: integer$/;\"\tcallback\tmodule:CallbackModule\nold_callback\tinput.ex\t/^ defcallback old_callback(info :: integer) :: integer$/;\"\tcallback\tmodule:CallbackModule\n" }, { "path": "Units/parser-elixir.r/elixir-callbacks.d/input.ex", "content": "defmodule CallbackModule do\n use Behaviour\n # This is the new callback syntax\n @callback new_callback() :: integer\n\n # This is the old (deprecated) callback syntax\n defcallback old_callback(info :: integer) :: integer\nend\n" }, { "path": "Units/parser-elixir.r/elixir-exceptions.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-exceptions.d/expected.tags", "content": "ModuleError\tinput.ex\t/^defmodule ModuleError do$/;\"\tmodule\nModuleError\tinput.ex\t/^ defexception [:message]$/;\"\texception\tmodule:ModuleError\nexception\tinput.ex\t/^ def exception(value) do$/;\"\tfunction\tmodule:ModuleError\taccess:public\n" }, { "path": "Units/parser-elixir.r/elixir-exceptions.d/input.ex", "content": "defmodule ModuleError do\n defexception [:message]\n\n @impl true\n def exception(value) do\n msg = \"did not get what was expected, got: #{inspect(value)}\"\n %ModuleError{message: msg}\n end\nend\n" }, { "path": "Units/parser-elixir.r/elixir-functions.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-functions.d/expected.tags", "content": "FunctionModule\tinput.ex\t/^defmodule FunctionModule do$/;\"\tmodule\none_liner_func\tinput.ex\t/^ def one_liner_func, do: :baz$/;\"\tfunction\tmodule:FunctionModule\taccess:public\nfunc_no_params\tinput.ex\t/^ def func_no_params do$/;\"\tfunction\tmodule:FunctionModule\taccess:public\nfunc_head\tinput.ex\t/^ def func_head(string1, string2 \\\\\\\\ nil, separator \\\\\\\\ \" \")$/;\"\tfunction\tmodule:FunctionModule\taccess:public\nfunc_one_arity\tinput.ex\t/^ def func_one_arity(string1, nil, _separator) do$/;\"\tfunction\tmodule:FunctionModule\taccess:public\nnormal_func\tinput.ex\t/^ def normal_func(string1, string2, separator) do$/;\"\tfunction\tmodule:FunctionModule\taccess:public\nprivate_func\tinput.ex\t/^ defp private_func(a), do: a <> \" alone\"$/;\"\tfunction\tmodule:FunctionModule\taccess:private\nprivate_func_no_params\tinput.ex\t/^ defp private_func_no_params do$/;\"\tfunction\tmodule:FunctionModule\taccess:private\nfunction_with_comma\tinput.ex\t/^ def function_with_comma,$/;\"\tfunction\tmodule:FunctionModule\taccess:public\n" }, { "path": "Units/parser-elixir.r/elixir-functions.d/input.ex", "content": "defmodule FunctionModule do\n def one_liner_func, do: :baz\n\n def func_no_params do\n #\n end\n\n # Function head\n def func_head(string1, string2 \\\\ nil, separator \\\\ \" \")\n\n # Function with 1 arity\n def func_one_arity(string1, nil, _separator) do\n private_function(string1)\n end\n\n # Normal function\n def normal_func(string1, string2, separator) do\n string1 <> separator <> string2\n end\n\n # Private function\n defp private_func(a), do: a <> \" alone\"\n\n defp private_func_no_params do\n #\n end\n\n def function_with_comma,\n do: :some_constant\nend\n" }, { "path": "Units/parser-elixir.r/elixir-macros.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-macros.d/expected.tags", "content": "MacroModule\tinput.ex\t/^defmodule MacroModule do$/;\"\tmodule\nmacro\tinput.ex\t/^ defmacro macro(expr, opts) do$/;\"\tmacro\tmodule:MacroModule\taccess:public\nmacro_no_params\tinput.ex\t/^ defmacro macro_no_params do$/;\"\tmacro\tmodule:MacroModule\taccess:public\nprivate_macro\tinput.ex\t/^ defmacrop private_macro(expr, opts) do$/;\"\tmacro\tmodule:MacroModule\taccess:private\nprivate_macro_no_params\tinput.ex\t/^ defmacrop private_macro_no_params do$/;\"\tmacro\tmodule:MacroModule\taccess:private\n" }, { "path": "Units/parser-elixir.r/elixir-macros.d/input.ex", "content": "defmodule MacroModule do\n defmacro macro(expr, opts) do\n #\n end\n\n defmacro macro_no_params do\n #\n end\n\n defmacrop private_macro(expr, opts) do\n #\n end\n\n defmacrop private_macro_no_params do\n #\n end\nend\n" }, { "path": "Units/parser-elixir.r/elixir-modules.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-modules.d/expected.tags", "content": "Foo\tinput.ex\t/^defmodule Foo do$/;\"\tmodule\nBar\tinput.ex\t/^defmodule Foo.Bar do$/;\"\tmodule\nBaz\tinput.ex\t/^ defmodule Baz do$/;\"\tmodule\n" }, { "path": "Units/parser-elixir.r/elixir-modules.d/input.ex", "content": "defmodule Foo do\nend\n\ndefmodule Foo.Bar do\n defmodule Baz do\n end\nend\n" }, { "path": "Units/parser-elixir.r/elixir-records.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-records.d/expected.tags", "content": "RecordsModule\tinput.ex\t/^defmodule RecordsModule do$/;\"\tmodule\nuser1\tinput.ex\t/^ Record.defrecord(:user1, name: \"megan\", age: \"25\")$/;\"\trecord\tmodule:RecordsModule\taccess:public\nuser2\tinput.ex\t/^ Record.defrecordp :user2, name: \"ivan\", age: \"23\"$/;\"\trecord\tmodule:RecordsModule\taccess:private\n" }, { "path": "Units/parser-elixir.r/elixir-records.d/input.ex", "content": "defmodule RecordsModule do\n require Record\n Record.defrecord(:user1, name: \"megan\", age: \"25\")\n Record.defrecordp :user2, name: \"ivan\", age: \"23\"\n # This is not a typo but an intentional bad test, used to test the parser\n Record.defrecordp:bad, name: \"ivan\", age: \"23\"\nend\n" }, { "path": "Units/parser-elixir.r/elixir-sign-operators.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-sign-operators.d/expected.tags", "content": "OperatorModule\tinput.ex\t/^defmodule OperatorModule do$/;\"\tmodule\n+\tinput.ex\t/^ def a + b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n-\tinput.ex\t/^ def a - b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n*\tinput.ex\t/^ def a * b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n/\tinput.ex\t/^ def a \\/ b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n=\tinput.ex\t/^ def a = b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n.\tinput.ex\t/^ def a . b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n|\tinput.ex\t/^ def a | b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n|||\tinput.ex\t/^ def _ ||| b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n&&&\tinput.ex\t/^ def a &&& _, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n<<<\tinput.ex\t/^ def a <<< b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n>>>\tinput.ex\t/^ defp a >>> b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n<<~\tinput.ex\t/^ defp _ <<~ _, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n~>>\tinput.ex\t/^ defp a ~>> b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n<~\tinput.ex\t/^ defmacro a <~ b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n~>\tinput.ex\t/^ defmacro _ ~> b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n<~>\tinput.ex\t/^ defmacro a <~> _, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n<|>\tinput.ex\t/^ defmacrop a <|> b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n^^^\tinput.ex\t/^ defmacrop _ ^^^ _, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n~~~\tinput.ex\t/^ defmacrop a ~~~ b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n" }, { "path": "Units/parser-elixir.r/elixir-sign-operators.d/input.ex", "content": "defmodule OperatorModule do\n def a + b, do: max(a, b)\n def a - b, do: max(a, b)\n def a * b, do: max(a, b)\n def a / b, do: max(a, b)\n def a = b, do: max(a, b)\n def a . b, do: max(a, b)\n\n # The 13 operators bellow are ALL the operators that Elixir is CAPABLE of\n # parsing and are not used by default, so the user can\n def a | b, do: max(a, b)\n def _ ||| b, do: max(a, b)\n def a &&& _, do: max(a, b)\n def a <<< b, do: max(a, b)\n defp a >>> b, do: max(a, b)\n defp _ <<~ _, do: max(a, b)\n defp a ~>> b, do: max(a, b)\n defmacro a <~ b, do: max(a, b)\n defmacro _ ~> b, do: max(a, b)\n defmacro a <~> _, do: max(a, b)\n defmacrop a <|> b, do: max(a, b)\n defmacrop _ ^^^ _, do: max(a, b)\n defmacrop a ~~~ b, do: max(a, b)\nend\n" }, { "path": "Units/parser-elixir.r/elixir-simple.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-simple.d/expected.tags", "content": "MyList\tinput.ex\t/^defmodule MyList do$/;\"\tmodule\nreverse\tinput.ex\t/^ defdelegate reverse(list), to: Enum$/;\"\tdelegate\tmodule:MyList\nother_reverse\tinput.ex\t/^ defdelegate other_reverse(list), to: Enum, as: :reverse$/;\"\tdelegate\tmodule:MyList\nSize\tinput.ex\t/^defprotocol Size do$/;\"\tprotocol\nsize\tinput.ex\t/^ def size(data)$/;\"\tfunction\tprotocol:Size\taccess:public\nMyGuards\tinput.ex\t/^defmodule Integer.MyGuards do$/;\"\tmodule\nis_even\tinput.ex\t/^ defguard is_even(value) when is_integer(value) and rem(value, 2) == 0$/;\"\tguard\tmodule:MyGuards\taccess:public\nis_odd\tinput.ex\t/^ defguardp is_odd(value) when is_integer(value) and rem(value, 2) != 0$/;\"\tguard\tmodule:MyGuards\taccess:private\nSize\tinput.ex\t/^defimpl Size, for: BitString do$/;\"\timplementation\tmodule:MyGuards\nsize\tinput.ex\t/^ def size(binary), do: byte_size(binary)$/;\"\tfunction\tmodule:MyGuards\taccess:public\n" }, { "path": "Units/parser-elixir.r/elixir-simple.d/input.ex", "content": "# Most of this code is taken from the official Elixir documentation.\n# With comments and modifications\n# by Ivan Gonzalez Polanco \n#\n# This code doesn't compile, since it's supposed to test de ctags elixir\n# parser, not the elixir elixir parser.\n\n#\n# d delegates (defdelegate ...)\n#\ndefmodule MyList do\n defdelegate reverse(list), to: Enum\n defdelegate other_reverse(list), to: Enum, as: :reverse\nend\n\n#\n# p protocols (defprotocol ...)\n#\ndefprotocol Size do\n @doc \"Calculates the size (and not the length!) of a data structure\"\n def size(data)\nend\n\n#\n# g guards (defguard ...)\n#\ndefmodule Integer.MyGuards do\n defguard is_even(value) when is_integer(value) and rem(value, 2) == 0\n defguardp is_odd(value) when is_integer(value) and rem(value, 2) != 0\nend\n\n#\n# i implementations (defimpl ...)\n#\ndefimpl Size, for: BitString do\n def size(binary), do: byte_size(binary)\nend\n" }, { "path": "Units/parser-elixir.r/elixir-tests.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-tests.d/expected.tags", "content": "TestModule\tinput.ex\t/^defmodule TestModule do$/;\"\tmodule\ngood with spaces\tinput.ex\t/^ test \"good with spaces\" do$/;\"\ttest\tmodule:TestModule\ngood with parens\tinput.ex\t/^ test(\"good with parens\") do$/;\"\ttest\tmodule:TestModule\n" }, { "path": "Units/parser-elixir.r/elixir-tests.d/input.ex", "content": "defmodule TestModule do\n use ExUnit.Case, async: true\n\n test \"good with spaces\" do\n assert 1 + 1 == 2\n end\n\n test(\"good with parens\") do\n assert 1 + 1 == 2\n end\n test\"bad without spaces\" do\n assert 1 + 1 == 2\n end\n\n test \"bad without 'do' word\"\n assert 1 + 1 == 2\n end\n\n test 'bad with single quotes' do\n assert 1 + 1 == 2\n end\nend\n" }, { "path": "Units/parser-elixir.r/elixir-types.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-types.d/expected.tags", "content": "TypeModule\tinput.ex\t/^defmodule TypeModule do$/;\"\tmodule\nt\tinput.ex\t/^ @opaque t :: pid$/;\"\ttype\tmodule:TypeModule\taccess:public\ncredentials\tinput.ex\t/^ @type credentials :: {atom, password}$/;\"\ttype\tmodule:TypeModule\taccess:public\npassword\tinput.ex\t/^ @typep password :: binary$/;\"\ttype\tmodule:TypeModule\taccess:private\n" }, { "path": "Units/parser-elixir.r/elixir-types.d/input.ex", "content": "defmodule TypeModule do\n @opaque t :: pid\n\n @type credentials :: {atom, password}\n\n @typep password :: binary\nend\n" }, { "path": "Units/parser-elixir.r/elixir-word-operators.d/args.ctags", "content": "--sort=no\n--fields=+Ka\n" }, { "path": "Units/parser-elixir.r/elixir-word-operators.d/expected.tags", "content": "OperatorModule\tinput.ex\t/^defmodule OperatorModule do$/;\"\tmodule\nand\tinput.ex\t/^ def a and b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\nor\tinput.ex\t/^ def a or b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\nnot\tinput.ex\t/^ defp a not b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\nin\tinput.ex\t/^ defmacro a in b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\nnot in\tinput.ex\t/^ defmacrop a not in b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\nwhen\tinput.ex\t/^ defmacrop a when b, do: max(a, b)$/;\"\toperator\tmodule:OperatorModule\n" }, { "path": "Units/parser-elixir.r/elixir-word-operators.d/input.ex", "content": "defmodule OperatorModule do\n def a and b, do: max(a, b)\n def a or b, do: max(a, b)\n defp a not b, do: max(a, b)\n defmacro a in b, do: max(a, b)\n defmacrop a not in b, do: max(a, b)\n defmacrop a when b, do: max(a, b)\nend\n" }, { "path": "Units/parser-elm.r/elm-aliases.d/args.ctags", "content": "--sort=no\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-aliases.d/expected.tags", "content": "MyAlias1\tinput.elm\t/^type alias MyAlias1 = String$/;\"\ta\troles:def\nMyAlias2\tinput.elm\t/^type alias MyAlias2 =$/;\"\ta\troles:def\nMyAlias3\tinput.elm\t/^ MyAlias3$/;\"\ta\troles:def\n" }, { "path": "Units/parser-elm.r/elm-aliases.d/input.elm", "content": "type alias MyAlias1 = String\n\ntype alias MyAlias2 =\n String\n\ntype\n alias\n MyAlias3\n =\n { x:Float, y:Float }\n\n" }, { "path": "Units/parser-elm.r/elm-bad-lines.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-bad-lines.d/expected.tags", "content": "Input\tinput.elm\t/^import Input exposing (..)$/;\"\tm\troles:imported\ninput1a\tinput-1.elm\t/^input1a = 1$/;\"\tf\troles:def\ninput1b\tinput-1.elm\t/^input1b = 2$/;\"\tf\ttyperef:typename:Int\troles:def\ninput2b\tinput-2.elm\t/^input2b = 1$/;\"\tf\troles:def\ninput2c\tinput-2.elm\t/^input2c = 3$/;\"\tf\troles:def\nmodule2d\tinput-2.elm\t/^module2d = 4$/;\"\tf\troles:def\ninput3b\tinput-3.elm\t/^input3b = 1$/;\"\tf\troles:def\ninput3d\tinput-3.elm\t/^input3d = 1$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-bad-lines.d/input-1.elm", "content": "type alias Input1a *= ConsA\n\ninput1a = 1\n\ntype alias Input1b *= ConsB\n\ninput1b : Int\ninput1b = 2\n" }, { "path": "Units/parser-elm.r/elm-bad-lines.d/input-2.elm", "content": "type Input2a = Cons2A1 | Cons2A2 *\n\ninput2b = 1\n\nmodule = 2\n\ninput2c = 3\n\nmodule2d = 4\n" }, { "path": "Units/parser-elm.r/elm-bad-lines.d/input-3.elm", "content": "-- Should be able to ignore a function where only part of the body\n-- parses successfully\n\ninput3a i3_1 i3_2 =\n (]? x &&\n\ninput3b = 1\n\ninput3c i3_1 i3_2 =\n (]? x &&\n\ninput3d = 1\n\n" }, { "path": "Units/parser-elm.r/elm-bad-lines.d/input.elm", "content": "import Input exposinx?*\n\nimport Input exposing (..)\n" }, { "path": "Units/parser-elm.r/elm-case-statements.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-case-statements.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a1 a2 =$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB b1 =$/;\"\tf\troles:def\nfuncC\tinput.elm\t/^funcC c1 c2 =$/;\"\tf\troles:def\nc2\tinput.elm\t/^ c2 = 2$/;\"\tf\tfunction:funcC\troles:def\nc3\tinput.elm\t/^ c3 = 3$/;\"\tf\tfunction:funcC\troles:def\nfuncD\tinput.elm\t/^funcD str =$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-case-statements.d/input.elm", "content": "-- A function with a case statement\n\n-- The code below won't compile, but it is\n-- syntactically correct\n\nfuncA a1 a2 =\n case (complex ex pression + 12) of\n \"Literal\" ->\n a + b\n 'l' ->\n Cons a b\n Cons a b ->\n a +\n b\n _ ->\n False\n\n-- Check we can still read a simple function\n\nfuncB b1 =\n True\n\n-- Can we catch functions defined inside case statements?\n\nfuncC c1 c2 =\n case (complex ex pression + 12) of\n \"Literal\" ->\n let\n c2 = 2\n c3 = 3\n in\n c2 + c3\n _ -> False\n\n-- This previously exposed a bug...\n\nfuncD str =\n case str of\n Just c1 ->\n c1 / 255\n _ ->\n 0\n\n" }, { "path": "Units/parser-elm.r/elm-comments.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-comments.d/expected.tags", "content": "f\tinput.elm\t/^f = 6 {- another comment -}$/;\"\tf\troles:def\nh\tinput.elm\t/^h = 9$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-comments.d/input.elm", "content": "-- a = 1\n\n{- b = 2 -}\n\n{-\nc = 3\n-}\n\n{-* d = 4 -}\n\n{-*\ne = 5\n -}\n\n{- some comment -}\nf = 6 {- another comment -}\n\n -- This should be ignored\n\n-- This next line is not top level\n{- so should continue the above -} + 1\n\n-- A top level statement\n\nh = 9\n\n{-\ncomment\n {- nested comment -}\ni = 9\n-}\n" }, { "path": "Units/parser-elm.r/elm-complex-types.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r-t\n" }, { "path": "Units/parser-elm.r/elm-complex-types.d/expected.tags", "content": "A\tinput.elm\t/^type A = ACons { x : Float, y : Float }$/;\"\tt\troles:def\nACons\tinput.elm\t/^type A = ACons { x : Float, y : Float }$/;\"\tc\ttype:A\troles:def\nB\tinput.elm\t/^type B$/;\"\tt\troles:def\nB1Cons\tinput.elm\t/^ = B1Cons$/;\"\tc\ttype:B\troles:def\nB2Cons\tinput.elm\t/^ | B2Cons String Integer$/;\"\tc\ttype:B\troles:def\nB3Cons\tinput.elm\t/^ | B3Cons$/;\"\tc\ttype:B\troles:def\nC\tinput.elm\t/^type C=CCons{x:Float,y:Float}$/;\"\tt\troles:def\nCCons\tinput.elm\t/^type C=CCons{x:Float,y:Float}$/;\"\tc\ttype:C\troles:def\nD\tinput.elm\t/^type D = DCons (String, Float, {x:String, y:Float})$/;\"\tt\troles:def\nDCons\tinput.elm\t/^type D = DCons (String, Float, {x:String, y:Float})$/;\"\tc\ttype:D\troles:def\nE\tinput.elm\t/^type E$/;\"\tt\troles:def\nE1Cons\tinput.elm\t/^ = E1Cons {}$/;\"\tc\ttype:E\troles:def\nE2Cons\tinput.elm\t/^ | E2Cons ()$/;\"\tc\ttype:E\troles:def\nF\tinput.elm\t/^type F$/;\"\tt\troles:def\nF1Cons\tinput.elm\t/^ = F1Cons (String -> Int)$/;\"\tc\ttype:F\troles:def\nF2Cons\tinput.elm\t/^ | F2Cons (Float -> String -> (String -> {x:Float, y:Float}))$/;\"\tc\ttype:F\troles:def\nF3Cons\tinput.elm\t/^ | F3Cons$/;\"\tc\ttype:F\troles:def\nG\tinput.elm\t/^type G a$/;\"\tt\troles:def\nG1Cons\tinput.elm\t/^ = G1Cons a Int$/;\"\tc\ttype:G\troles:def\nG2Cons\tinput.elm\t/^ | G2Cons { a | name : String}$/;\"\tc\ttype:G\troles:def\n" }, { "path": "Units/parser-elm.r/elm-complex-types.d/input.elm", "content": "-- A type with a record spec\n\ntype A = ACons { x : Float, y : Float }\n\n-- A type with more complex spec\n\ntype B\n = B1Cons\n { x : Float\n , y : Float\n }\n | B2Cons String Integer\n | B3Cons\n\n-- With a lack of spacing\n\ntype C=CCons{x:Float,y:Float}\n\n-- Tuples\n\ntype D = DCons (String, Float, {x:String, y:Float})\n\n-- Empty records and tuples\n\ntype E\n = E1Cons {}\n | E2Cons ()\n\n-- With functions as type specifications\n\ntype F\n = F1Cons (String -> Int)\n | F2Cons (Float -> String -> (String -> {x:Float, y:Float}))\n | F3Cons\n\n-- With vertical bars within the type\n\ntype G a\n = G1Cons a Int\n | G2Cons { a | name : String}\n" }, { "path": "Units/parser-elm.r/elm-constructor-signatures.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-constructor-signatures.d/expected.tags", "content": "B\tinput.elm\t/^type B$/;\"\tt\troles:def\nB1Cons\tinput.elm\t/^ = B1Cons$/;\"\tc\ttype:B\ttyperef:typename:{ x : Float , y : Float } -> B\troles:def\nB2Cons\tinput.elm\t/^ | B2Cons String Integer$/;\"\tc\ttype:B\ttyperef:typename:String -> Integer -> B\troles:def\nB3Cons\tinput.elm\t/^ | B3Cons$/;\"\tc\ttype:B\ttyperef:typename:B\troles:def\n" }, { "path": "Units/parser-elm.r/elm-constructor-signatures.d/input.elm", "content": "type B\n = B1Cons\n { x : Float\n , y : Float\n }\n | B2Cons String Integer\n | B3Cons\n" }, { "path": "Units/parser-elm.r/elm-expressions.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-expressions.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA =$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB = (\\\\b1 b2 b3 -> 42)$/;\"\tf\troles:def\nfuncC\tinput.elm\t/^funcC =$/;\"\tf\troles:def\nfuncD\tinput.elm\t/^funcD =$/;\"\tf\troles:def\nfuncE\tinput.elm\t/^funcE e1 e2 =$/;\"\tf\troles:def\nfuncF\tinput.elm\t/^funcF = []$/;\"\tf\troles:def\nfuncG\tinput.elm\t/^funcG =$/;\"\tf\troles:def\nfuncH\tinput.elm\t/^funcH h =$/;\"\tf\troles:def\nfuncI\tinput.elm\t/^funcI i1 i2 =$/;\"\tf\troles:def\nfuncJ1\tinput.elm\t/^funcJ1 =$/;\"\tf\troles:def\nfuncJ2\tinput.elm\t/^funcJ2 =$/;\"\tf\troles:def\nfuncJ3\tinput.elm\t/^funcJ3 =$/;\"\tf\troles:def\nfuncJ4\tinput.elm\t/^funcJ4 =$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-expressions.d/input.elm", "content": "-- Expressions with parentheses\n\nfuncA =\n (23 + 34)\n\n-- Anonymous functions\n\nfuncB = (\\b1 b2 b3 -> 42)\n\n-- Allow us to call constructors as functions\n\nfuncC =\n Cons a b\n\n-- Allow us to functions and constructors using their module names\n\nfuncD =\n (List.Deep.Cons a b) + (Main.add a b)\n\n-- Basic lists\n\nfuncE e1 e2 =\n e1 :: [e2, e1 + e2]\n\n-- Empty lists\n\nfuncF = []\n\n-- Tuples, including an empty tuple\n\nfuncG =\n (12, 0x034, ('a')) ++ ()\n\n-- Record names as function calls\n\nfuncH h =\n (3) + (.age h.family.person)\n\n-- Binary operators as function calls\n\nfuncI i1 i2 =\n (++) (i1 // i2) 99\n\n-- Records\n\nfuncJ1 =\n {x = 2 , y = 3 , z = 4}\n\nfuncJ2 =\n { point | x = point.x + 1 , y = Cons a b }\n\nfuncJ3 =\n {}\n\n-- Record with spaces\n\nfuncJ4 =\n { model\n | width = width\n }\n" }, { "path": "Units/parser-elm.r/elm-functions.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-functions.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a1 a2 = a1 + a2$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB b =$/;\"\tf\troles:def\nfuncC\tinput.elm\t/^funcC = 2 + 1$/;\"\tf\troles:def\nfuncD\tinput.elm\t/^funcD d1$/;\"\tf\troles:def\nfuncE\tinput.elm\t/^funcE=2$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-functions.d/input.elm", "content": "-- Simple function with some parameters.\n\nfuncA a1 a2 = a1 + a2\n\n-- Function over multiple lines\n\nfuncB b =\n b + 1\n\n-- Function with no parameter\n\nfuncC = 2 + 1\n\n-- Function with whitespace - ideally this will be stripped in the type description\n\nfuncD d1\n d2 = d1 + d2\n\n-- Function with no whitespace after the name\n\nfuncE=2\n\n" }, { "path": "Units/parser-elm.r/elm-if-then-else.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-if-then-else.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a1 a2 =$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB b1 =$/;\"\tf\troles:def\nfuncC\tinput.elm\t/^funcC c1 c2 =$/;\"\tf\troles:def\nc2\tinput.elm\t/^ c2 = 2$/;\"\tf\tfunction:funcC\troles:def\nc3\tinput.elm\t/^ c3 = 3$/;\"\tf\tfunction:funcC\troles:def\n" }, { "path": "Units/parser-elm.r/elm-if-then-else.d/input.elm", "content": "-- A function with an if/then/else statement\n\n-- The code below won't compile, but it is\n-- syntactically correct\n\nfuncA a1 a2 =\n if (complex ex pression + 12) == \"Literal\"\n then\n a + b\n else\n a +\n b\n\n-- Check we can still read a simple function?\n\nfuncB b1 =\n True\n\n-- Can we catch functions defined inside if statements?\n\nfuncC c1 c2 =\n if (complex ex pression + 12) == \"Literal\"\n then\n let\n c2 = 2\n c3 = 3\n in\n c2 + c3\n else\n a +\n b\n" }, { "path": "Units/parser-elm.r/elm-imports.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r-t\n" }, { "path": "Units/parser-elm.r/elm-imports.d/expected.tags", "content": "SomeMod\tinput.elm\t/^module SomeMod exposing (..)$/;\"\tm\troles:def\nPlainImport\tinput.elm\t/^import PlainImport$/;\"\tm\troles:imported\nMyMod\tinput.elm\t/^import MyMod exposing$/;\"\tm\troles:imported\nmap\tinput.elm\t/^ ( map, foldl$/;\"\tf\tmodule:MyMod\troles:exposed\nfoldl\tinput.elm\t/^ ( map, foldl$/;\"\tf\tmodule:MyMod\troles:exposed\nMaybe\tinput.elm\t/^ , Maybe, Possibly$/;\"\tt\tmodule:MyMod\troles:exposed\nPossibly\tinput.elm\t/^ , Maybe, Possibly$/;\"\tt\tmodule:MyMod\troles:exposed\nResult\tinput.elm\t/^ , Result(..)$/;\"\tt\tmodule:MyMod\troles:exposed\nMyList\tinput.elm\t/^ , MyList(Empty), Tree(Node, Value, Special) )$/;\"\tt\tmodule:MyMod\troles:exposed\nEmpty\tinput.elm\t/^ , MyList(Empty), Tree(Node, Value, Special) )$/;\"\tc\ttype:MyMod.MyList\troles:exposed\nTree\tinput.elm\t/^ , MyList(Empty), Tree(Node, Value, Special) )$/;\"\tt\tmodule:MyMod\troles:exposed\nNode\tinput.elm\t/^ , MyList(Empty), Tree(Node, Value, Special) )$/;\"\tc\ttype:MyMod.Tree\troles:exposed\nValue\tinput.elm\t/^ , MyList(Empty), Tree(Node, Value, Special) )$/;\"\tc\ttype:MyMod.Tree\troles:exposed\nSpecial\tinput.elm\t/^ , MyList(Empty), Tree(Node, Value, Special) )$/;\"\tc\ttype:MyMod.Tree\troles:exposed\notherMod\tinput.elm\t/^import otherMod exposing (Coin)$/;\"\tm\troles:imported\nCoin\tinput.elm\t/^import otherMod exposing (Coin)$/;\"\tt\tmodule:otherMod\troles:exposed\nDotted.name.Here\tinput.elm\t/^import Dotted.name.Here exposing (Dot(Cons))$/;\"\tm\troles:imported\nDot\tinput.elm\t/^import Dotted.name.Here exposing (Dot(Cons))$/;\"\tt\tmodule:Dotted.name.Here\troles:exposed\nCons\tinput.elm\t/^import Dotted.name.Here exposing (Dot(Cons))$/;\"\tc\ttype:Dotted.name.Here.Dot\troles:exposed\nfunc\tinput.elm\t/^func x =$/;\"\tf\tmodule:SomeMod\troles:def\nString\tinput-1.elm\t/^import String$/;\"\tm\troles:imported\nA\tinput-1.elm\t/^type A = B$/;\"\tt\troles:def\nB\tinput-1.elm\t/^type A = B$/;\"\tc\ttype:A\troles:def\n" }, { "path": "Units/parser-elm.r/elm-imports.d/input-1.elm", "content": "import String\n\ntype A = B\n" }, { "path": "Units/parser-elm.r/elm-imports.d/input.elm", "content": "module SomeMod exposing (..)\n\nimport PlainImport\n\nimport MyMod exposing\n ( map, foldl\n , Maybe, Possibly\n , Result(..)\n , MyList(Empty), Tree(Node, Value, Special) )\n\n-- Allow a bit of looseness in module naming, even though the\n-- compiler will reject it\n\nimport otherMod exposing (Coin)\n\n-- Allow a dotted module name\n\nimport Dotted.name.Here exposing (Dot(Cons))\n\nfunc x =\n 42 + 24\n" }, { "path": "Units/parser-elm.r/elm-just-comments.d/expected.tags", "content": "" }, { "path": "Units/parser-elm.r/elm-just-comments.d/input.elm", "content": "-- a = 1\n\n{- b = 2 -}\n\n{-\nc = 3\n-}\n\n{-* d = 4 -}\n\n{-*\ne = 5\n -}\n\n{- comment -} {- another comment -}\n\n{-\ncomment\n {- nested comment -}\ng = 7\n-}\n" }, { "path": "Units/parser-elm.r/elm-let-in.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-let-in.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA =$/;\"\tf\troles:def\na1\tinput.elm\t/^ a1 = 1$/;\"\tf\tfunction:funcA\troles:def\na2\tinput.elm\t/^ a2 x y = x + y$/;\"\tf\tfunction:funcA\troles:def\nfuncB\tinput.elm\t/^funcB b =$/;\"\tf\troles:def\nb1\tinput.elm\t/^ b1 =$/;\"\tf\tfunction:funcB\troles:def\nb2\tinput.elm\t/^ b2 x y =$/;\"\tf\tfunction:funcB\troles:def\nb3\tinput.elm\t/^ b3 x y =$/;\"\tf\tfunction:funcB\troles:def\nb4\tinput.elm\t/^ b4 v w =$/;\"\tf\tfunction:funcB\troles:def\nb5\tinput.elm\t/^ b5 i j = i + j$/;\"\tf\tfunction:funcB\troles:def\nfuncC\tinput.elm\t/^funcC =$/;\"\tf\troles:def\nc1\tinput.elm\t/^ c1 = 1$/;\"\tf\tfunction:funcC\troles:def\nc2\tinput.elm\t/^ c2 x y = x + y$/;\"\tf\tfunction:funcC\troles:def\n" }, { "path": "Units/parser-elm.r/elm-let-in.d/input.elm", "content": "-- Basic let/in block\n\nfuncA =\n let\n a1 = 1\n a2 x y = x + y\n in\n a1 << a2\n\n-- Nested let/in blocks\n\nfuncB b =\n let\n b1 =\n let\n b2 x y =\n let\n b3 x y =\n x * y\n b4 v w =\n v * w\n in\n b3 b2 99\n in\n (flip << b2) 77\n b5 i j = i + j\n in\n b1 b\n\n-- Let/in block with type annotation\n\nfuncC =\n let\n c1 : Int\n c1 = 1\n\n c2 : Int Float -> Something\n c2 x y = x + y\n in\n c1 << c2\n" }, { "path": "Units/parser-elm.r/elm-modules.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-modules.d/expected.tags", "content": "Amodule\tinput.elm\t/^module Amodule exposing (expo)$/;\"\tm\troles:def\nsomeFunc\tinput.elm\t/^someFunc a =$/;\"\tf\tmodule:Amodule\troles:def\nA1module\tinput-1.elm\t/^module A1module exposing (expo)$/;\"\tm\troles:def\nsomeFunc1\tinput-1.elm\t/^someFunc1 a =$/;\"\tf\tmodule:A1module\troles:def\nexpo\tinput-1.elm\t/^expo a =$/;\"\tf\tmodule:A1module\troles:def\nA2_1\tinput-2.elm\t/^module A2_1 exposing (expo)$/;\"\tm\troles:def\nfunc2_1\tinput-2.elm\t/^func2_1 a =$/;\"\tf\tmodule:A2_1\troles:def\nfunc2_2\tinput-2.elm\t/^func2_2 a =$/;\"\tf\tmodule:A2_1\troles:def\nA3Module\tinput-3.elm\t/^module A3Module exposing$/;\"\tm\troles:def\na4Module\tinput-4.elm\t/^module a4Module exposing (..)$/;\"\tm\troles:def\na5.Module.Deep\tinput-5.elm\t/^module a5.Module.Deep exposing (..)$/;\"\tm\troles:def\n" }, { "path": "Units/parser-elm.r/elm-modules.d/input-1.elm", "content": "module A1module exposing (expo)\n\nsomeFunc1 a =\n 42 + 24 \n\nexpo a =\n 42 + 24\n" }, { "path": "Units/parser-elm.r/elm-modules.d/input-2.elm", "content": "{- Only the first module declaration should be recognised -}\n\nmodule A2_1 exposing (expo)\n\nmodule A2_2 exposing (expo)\n\nfunc2_1 a =\n 42 + 24\n\nmodule A2_3 exposing (expo)\n\nfunc2_2 a =\n 42 + 24\n\n" }, { "path": "Units/parser-elm.r/elm-modules.d/input-3.elm", "content": "-- Should be able to parse multiple exposed items in a module declaration\n\nmodule A3Module exposing\n ( map, foldl\n , Maybe, Possibly\n , Result(..)\n , MyList(Empty), Tree(Node, Value, Special) )\n\n" }, { "path": "Units/parser-elm.r/elm-modules.d/input-4.elm", "content": "-- Be relaxed about module name capitalisation\n\nmodule a4Module exposing (..)\n" }, { "path": "Units/parser-elm.r/elm-modules.d/input-5.elm", "content": "-- Be relaxed about module name capitalisation\n\nmodule a5.Module.Deep exposing (..)\n" }, { "path": "Units/parser-elm.r/elm-modules.d/input.elm", "content": "module Amodule exposing (expo)\n\nsomeFunc a =\n 42 + 24\n" }, { "path": "Units/parser-elm.r/elm-multiline-strings.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-multiline-strings.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a1 a2 = a1 + a2$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB b =$/;\"\tf\troles:def\nfuncD\tinput.elm\t/^funcD d1 =$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-multiline-strings.d/input.elm", "content": "-- We should be able to parse this function\n\nfuncA a1 a2 = a1 + a2\n\n-- We should get only funcB, not funcC\n\nfuncB b =\n b + \"\"\"This is a multiline\nstring, which ends after\n\nfuncC = 3\n\"\"\"\n\nfuncD d1 =\n (d1 + 34)\n\n-- The end\n" }, { "path": "Units/parser-elm.r/elm-namespaces.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-namespaces.d/expected.tags", "content": "A1Mod\tinput.elm\t/^module A1Mod exposing (..)$/;\"\tm\troles:def\nA1NameSpace\tinput.elm\t/^import A1Import as A1NameSpace exposing (a1ImpFunc)$/;\"\tn\tmodule:A1Mod\troles:def\tmoduleName:A1Import\nA1Import\tinput.elm\t/^import A1Import as A1NameSpace exposing (a1ImpFunc)$/;\"\tm\troles:imported\na1ImpFunc\tinput.elm\t/^import A1Import as A1NameSpace exposing (a1ImpFunc)$/;\"\tf\tmodule:A1Import\troles:exposed\nfunc\tinput.elm\t/^func a1 =$/;\"\tf\tmodule:A1Mod\troles:def\n" }, { "path": "Units/parser-elm.r/elm-namespaces.d/input.elm", "content": "module A1Mod exposing (..)\n\nimport A1Import as A1NameSpace exposing (a1ImpFunc)\n\nfunc a1 =\n 42 + 24\n" }, { "path": "Units/parser-elm.r/elm-optlist-compatibility.d/README.md", "content": "This directory contains the tests from the previous Elm parser, which used\nthe optlib parser. The tests are included to here to check compatibility.\nHowever, the output from this PEG parser (and hence the contents of\nexpected.tags) is enhanced.\n" }, { "path": "Units/parser-elm.r/elm-optlist-compatibility.d/args.ctags", "content": "--sort=no\n--fields=+r-t\n--extras=+r\n" }, { "path": "Units/parser-elm.r/elm-optlist-compatibility.d/expected.tags", "content": "Main\tinput.elm\t/^port module Main exposing (..)$/;\"\tm\troles:def\nList\tinput.elm\t/^import List$/;\"\tm\troles:imported\nMaybe\tinput.elm\t/^import Maybe exposing (withDefault)$/;\"\tm\troles:imported\nwithDefault\tinput.elm\t/^import Maybe exposing (withDefault)$/;\"\tf\tmodule:Maybe\troles:exposed\nJe\tinput.elm\t/^import Json.Encode as Je$/;\"\tn\tmodule:Main\troles:def\tmoduleName:Json.Encode\nJson.Encode\tinput.elm\t/^import Json.Encode as Je$/;\"\tm\troles:imported\nThing\tinput.elm\t/^type Thing$/;\"\tt\tmodule:Main\troles:def\nOne\tinput.elm\t/^ = One$/;\"\tc\ttype:Main.Thing\troles:def\nTwo\tinput.elm\t/^ | Two Int$/;\"\tc\ttype:Main.Thing\troles:def\nParam\tinput.elm\t/^type Param a$/;\"\tt\tmodule:Main\troles:def\nCons\tinput.elm\t/^ = Cons a$/;\"\tc\ttype:Main.Param\troles:def\nOther\tinput.elm\t/^ | Other a$/;\"\tc\ttype:Main.Param\troles:def\nNum\tinput.elm\t/^type alias Num =$/;\"\ta\tmodule:Main\troles:def\noutward\tinput.elm\t/^port outward : String -> Cmd a$/;\"\tp\tmodule:Main\troles:def\ninward\tinput.elm\t/^port inward : (b -> a) -> Sub a$/;\"\tp\tmodule:Main\troles:def\nfoo\tinput.elm\t/^foo a =$/;\"\tf\tmodule:Main\troles:def\nbar\tinput.elm\t/^bar =$/;\"\tf\tmodule:Main\troles:def\nbas\tinput.elm\t/^ bas =$/;\"\tf\tfunction:Main.bar\troles:def\n" }, { "path": "Units/parser-elm.r/elm-optlist-compatibility.d/input.elm", "content": "port module Main exposing (..)\n\nimport List\nimport Maybe exposing (withDefault)\nimport Json.Encode as Je\n\n\ntype Thing\n = One\n | Two Int\n\n\ntype Param a\n = Cons a\n | Other a\n\n\ntype alias Num =\n Int\n\n\nport outward : String -> Cmd a\n\n\nport inward : (b -> a) -> Sub a\n\n\nfoo : Int -> Int\nfoo a =\n a + 1\n\n\nbar =\n let\n bas =\n 1\n in\n bas\n" }, { "path": "Units/parser-elm.r/elm-parameter-capture.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+rS\n" }, { "path": "Units/parser-elm.r/elm-parameter-capture.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a1 a2 =$/;\"\tf\tsignature:a1 a2\troles:def\nfuncB\tinput.elm\t/^funcB b1$/;\"\tf\ttyperef:typename:Int -> Int -> Int\tsignature:b1 b2\troles:def\nfuncC\tinput.elm\t/^funcC (c1, c2) {c3} (C4Cons c4 c5) =$/;\"\tf\tsignature:(c1, c2) {c3} (C4Cons c4 c5)\troles:def\nfuncD\tinput.elm\t/^funcD = 4$/;\"\tf\tsignature:\troles:def\nfuncE\tinput.elm\t/^funcE=5$/;\"\tf\tsignature:\troles:def\nfuncF1\tinput.elm\t/^funcF1 =$/;\"\tf\tsignature:\troles:def\nfuncF2\tinput.elm\t/^ funcF2 f1 f2 = 6$/;\"\tf\tfunction:funcF1\tsignature:f1 f2\troles:def\n" }, { "path": "Units/parser-elm.r/elm-parameter-capture.d/input.elm", "content": "-- Simple paramaeters\n\nfuncA a1 a2 =\n a1 + a2\n\n-- With extra whitespace and type annotation\n\nfuncB : Int -> Int -> Int\nfuncB b1\n b2\n =\n b1 + b2\n\n-- Complex parameters\n\nfuncC (c1, c2) {c3} (C4Cons c4 c5) =\n c1 + c2\n\n-- No parameters\n\nfuncD = 4\n\n-- No whitespace\n\nfuncE=5\n\n-- Functions inside let/in block\n\nfuncF1 =\n let\n funcF2 f1 f2 = 6\n in\n 6\n" }, { "path": "Units/parser-elm.r/elm-parameter-patterns.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-parameter-patterns.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA (a1, _, a2) =$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB (b1, b2) (b3, b4) =$/;\"\tf\troles:def\nfuncC\tinput.elm\t/^funcC {c1} {c2, c3} =$/;\"\tf\troles:def\nfuncD\tinput.elm\t/^funcD (D1Cons a b) (D2Cons a b, D3Cons a b) =$/;\"\tf\troles:def\nfuncE\tinput.elm\t/^funcE (D1Cons {a, b} c) d =$/;\"\tf\troles:def\nfuncF\tinput.elm\t/^funcF (D1Cons ({a, b} as ab) c) (d as d2) =$/;\"\tf\troles:def\nfuncG\tinput.elm\t/^funcG =$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-parameter-patterns.d/input.elm", "content": "-- Patterns can be found at https://elmprogramming.com/pattern-matching.html\n\n-- Simple tuple\n\nfuncA (a1, _, a2) =\n a1 + a2\n\n-- Multiple tuples\n\nfuncB (b1, b2) (b3, b4) =\n b1 + b2\n\n-- Records with named fields\n\nfuncC {c1} {c2, c3} =\n c1 + c2 + c3\n\n-- Constructor patterns\n \nfuncD (D1Cons a b) (D2Cons a b, D3Cons a b) =\n b + 1\n\n-- Combining the above\n \nfuncE (D1Cons {a, b} c) d =\n c + 1\n\n-- Using 'as' clauses\n \nfuncF (D1Cons ({a, b} as ab) c) (d as d2) =\n c + 1\n\n-- Make sure complex parameters can be used in anonymous functions\n\nfuncG =\n (\\ (D1Cons {a, b} c) d -> a + b + c + d)\n" }, { "path": "Units/parser-elm.r/elm-ports.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-ports.d/expected.tags", "content": "Main\tinput.elm\t/^port module Main exposing (..)$/;\"\tm\troles:def\noutgoing\tinput.elm\t/^port outgoing : Enc.Value -> Cmd msg$/;\"\tp\tmodule:Main\ttyperef:typename:Enc.Value -> Cmd msg\troles:def\nincoming\tinput.elm\t/^port incoming : (Enc.Value -> msg) -> Sub msg$/;\"\tp\tmodule:Main\ttyperef:typename:(Enc.Value -> msg) -> Sub msg\troles:def\n" }, { "path": "Units/parser-elm.r/elm-ports.d/input.elm", "content": "port module Main exposing (..)\n\nport outgoing : Enc.Value -> Cmd msg\n\nport incoming : (Enc.Value -> msg) -> Sub msg\n\n" }, { "path": "Units/parser-elm.r/elm-single-expressions.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-single-expressions.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a1 a2 =$/;\"\tf\troles:def\nfuncB\tinput.elm\t/^funcB b1 b2 =$/;\"\tf\troles:def\nfuncC\tinput.elm\t/^funcC c1 =$/;\"\tf\troles:def\nfuncD\tinput.elm\t/^funcD d1 d2 =$/;\"\tf\troles:def\nfuncE\tinput.elm\t/^funcE e1 =$/;\"\tf\troles:def\nfuncF\tinput.elm\t/^funcF f1 =$/;\"\tf\troles:def\nfuncG\tinput.elm\t/^funcG g1 =$/;\"\tf\troles:def\nfuncH\tinput.elm\t/^funcH h1 =$/;\"\tf\troles:def\nfuncI\tinput.elm\t/^funcI i1 =$/;\"\tf\troles:def\n" }, { "path": "Units/parser-elm.r/elm-single-expressions.d/input.elm", "content": "-- Binary operators and decimals\n\nfuncA a1 a2 =\n a1 + a2 - 3.3 * 3e-3 / .1\n\n-- More binary operators\n\nfuncB b1 b2 =\n b1 |> b2 >> 3.3 /= 4 + 5\n\n-- Hex numbers\n\nfuncC c1 =\n 0xfa0 /= 0xFAE0\n\n-- Parentheses\n\nfuncD d1 d2 =\n (3e4 + (5^7 - 0xe) // .2)\n\n-- Call prefix functions\n\nfuncE e1 =\n e1 + myFunc 3 4 + 5\n\n-- Multiline strings\n\nfuncF f1 =\n f1 ++ \"\"\"This is a multiline\nstring, which ends after\nthis line\n\"\"\"\n\n-- Strings\n\nfuncG g1 =\n \"Double q\\\"uote, \\n, etc\" ++\n \"uni\\u{04FA2}code\"\n\n-- Characters\n\nfuncH h1 =\n 'D' ++ '\\\"' ++ '\\'' ++ '\\n' ++\n '\\u{04FA2}'\n\n-- Anonymous functions\n\nfuncI i1 =\n (\\ x y z -> x+y - z)\n\n" }, { "path": "Units/parser-elm.r/elm-type-annotations.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-elm.r/elm-type-annotations.d/expected.tags", "content": "funcA\tinput.elm\t/^funcA a = 1$/;\"\tf\ttyperef:typename:Int -> Float -> Float\troles:def\nfuncB\tinput.elm\t/^funcB b =$/;\"\tf\ttyperef:typename:String -> Float\troles:def\nfuncC\tinput.elm\t/^funcC c = 3$/;\"\tf\ttyperef:typename:Int -> {c: String}\troles:def\nfuncD\tinput.elm\t/^funcD = 4$/;\"\tf\ttyperef:typename:(Int, Int) -> String\troles:def\nfuncE\tinput.elm\t/^funcE = 5$/;\"\tf\ttyperef:typename:Float -> (Int -> Int -> Int -> String)\troles:def\nfuncF\tinput.elm\t/^funcF = 6$/;\"\tf\ttyperef:typename:String -> {- Old ->-} Int\troles:def\nfuncG\tinput.elm\t/^funcG = 7$/;\"\tf\ttyperef:typename:G.Int -> G.Other\troles:def\nfuncH\tinput.elm\t/^funcH h =$/;\"\tf\ttyperef:typename:Int -> Int\troles:def\nh2\tinput.elm\t/^ h2 = 34$/;\"\tf\tfunction:funcH\troles:def\n" }, { "path": "Units/parser-elm.r/elm-type-annotations.d/input.elm", "content": "-- Simple function with a type annotation\n\nfuncA : Int -> Float -> Float\nfuncA a = 1\n\n-- Type annotation over multiple lines\n\nfuncB :\n String ->\n Float\nfuncB b =\n b + 1\n\n-- Function with a record in the type annotation\n\nfuncC : Int -> {c: String}\nfuncC c = 3\n\n-- Function with a tuple in the type annotation\n\nfuncD : (Int, Int) -> String\n\nfuncD = 4\n\n-- Functions in the type annotation\n\nfuncE : Float -> (Int -> Int -> Int -> String)\n\nfuncE = 5\n\n-- Comments in the type annotation\n\nfuncF : -- Comment\n String -> {- Old ->-} Int {-- End--}\nfuncF = 6\n\n-- Dotted types in the type annotation\n\nfuncG : G.Int -> G.Other\nfuncG = 7\n\n-- Functions with type annotations should provide scope\n\nfuncH : Int -> Int\nfuncH h =\n let\n h2 = 34\n in\n h + h2\n" }, { "path": "Units/parser-elm.r/elm-types.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r-t\n" }, { "path": "Units/parser-elm.r/elm-types.d/expected.tags", "content": "Apple\tinput.elm\t/^type Apple = Cox | Braeburn$/;\"\tt\troles:def\nCox\tinput.elm\t/^type Apple = Cox | Braeburn$/;\"\tc\ttype:Apple\troles:def\nBraeburn\tinput.elm\t/^type Apple = Cox | Braeburn$/;\"\tc\ttype:Apple\troles:def\nBox\tinput.elm\t/^type Box a = Cardboard a | Wooden$/;\"\tt\troles:def\nCardboard\tinput.elm\t/^type Box a = Cardboard a | Wooden$/;\"\tc\ttype:Box\troles:def\nWooden\tinput.elm\t/^type Box a = Cardboard a | Wooden$/;\"\tc\ttype:Box\troles:def\nClog\tinput.elm\t/^type Clog a b = Dutch | English$/;\"\tt\troles:def\nDutch\tinput.elm\t/^type Clog a b = Dutch | English$/;\"\tc\ttype:Clog\troles:def\nEnglish\tinput.elm\t/^type Clog a b = Dutch | English$/;\"\tc\ttype:Clog\troles:def\nDType\tinput.elm\t/^type DType$/;\"\tt\troles:def\nD1Cons\tinput.elm\t/^ = D1Cons { x : String, y:Maybe Int}$/;\"\tc\ttype:DType\troles:def\nD2Cons\tinput.elm\t/^ | D2Cons Float Float Clog$/;\"\tc\ttype:DType\troles:def\nTypesTwo\tinput-1.elm\t/^module TypesTwo exposing (..)$/;\"\tm\troles:def\nT2a\tinput-1.elm\t/^type T2a = T2a_1 | T2a_2$/;\"\tt\tmodule:TypesTwo\troles:def\nT2a_1\tinput-1.elm\t/^type T2a = T2a_1 | T2a_2$/;\"\tc\ttype:TypesTwo.T2a\troles:def\nT2a_2\tinput-1.elm\t/^type T2a = T2a_1 | T2a_2$/;\"\tc\ttype:TypesTwo.T2a\troles:def\nfuncT2\tinput-1.elm\t/^funcT2 = \"T2\"$/;\"\tf\tmodule:TypesTwo\troles:def\nT2b\tinput-1.elm\t/^type T2b = T2b_1 | T2b_2$/;\"\tt\tmodule:TypesTwo\troles:def\nT2b_1\tinput-1.elm\t/^type T2b = T2b_1 | T2b_2$/;\"\tc\ttype:TypesTwo.T2b\troles:def\nT2b_2\tinput-1.elm\t/^type T2b = T2b_1 | T2b_2$/;\"\tc\ttype:TypesTwo.T2b\troles:def\n" }, { "path": "Units/parser-elm.r/elm-types.d/input-1.elm", "content": "-- This is to check scoping still works okay\n\nmodule TypesTwo exposing (..)\n\ntype T2a = T2a_1 | T2a_2\n\nfuncT2 = \"T2\"\n\ntype T2b = T2b_1 | T2b_2\n" }, { "path": "Units/parser-elm.r/elm-types.d/input.elm", "content": "type Apple = Cox | Braeburn\n\n-- Parameterised types\n\ntype Box a = Cardboard a | Wooden\n\ntype Clog a b = Dutch | English\n\n-- Constructors with types\n\ntype DType\n = D1Cons { x : String, y:Maybe Int}\n | D2Cons Float Float Clog\n" }, { "path": "Units/parser-emacsLisp.r/definitions.d/args.ctags", "content": "--fields=+K\n" }, { "path": "Units/parser-emacsLisp.r/definitions.d/expected.tags", "content": "a0\tinput.el\t/^(defun a0 (n) (+ 1 n))$/;\"\tfunction\nb0\tinput.el\t/^(defvar b0 3)$/;\"\tvariable\nc0\tinput.el\t/^(defconstant c0 5)$/;\"\tunknown\tdefiner:defconstant\ndefunknown0\tinput.el\t/^(defmacro defunknown0 (s)$/;\"\tmacro\ndefunknown1\tinput.el\t/^(defmacro* defunknown1 (s)$/;\"\tmacro\ne0\tinput.el\t/^(defalias 'e0 'a0)$/;\"\talias\nf0\tinput.el\t/^(defvaralias 'f0 'b0)$/;\"\tvaralias\ng0\tinput.el\t/^(defsubst g0 () nil)$/;\"\tsubst\nh0\tinput.el\t/^(define-error 'h0 (purecopy \"TEST\"))$/;\"\terror\nh1\tinput.el\t/^(define-error (quote h1) (purecopy \"TEST\"))$/;\"\terror\ni0\tinput.el\t/^(define-minor-mode i0 \"DOC\")$/;\"\tminorMode\nj0\tinput.el\t/^(define-derived-mode j0 nil \"TEST\")$/;\"\tderivedMode\nk0\tinput.el\t/^(defcustom k0 t$/;\"\tcustom\nl0\tinput.el\t/^(defgroup l0 nil \"DOC\" :group 'editing)$/;\"\tgroup\nm0\tinput.el\t/^(defface m0$/;\"\tface\nn0\tinput.el\t/^(deftheme n0 \"DOC\")$/;\"\ttheme\no0\tinput.el\t/^(defvar-local o0 1)$/;\"\tvariable\np0\tinput.el\t/^(define-globalized-minor-mode p0$/;\"\tminorMode\nq0\tinput.el\t/^(define-obsolete-function-alias 'q0 'f0)$/;\"\talias\nr0\tinput.el\t/^(define-global-minor-mode r0$/;\"\tminorMode\ns0\tinput.el\t/^(define-inline s0 (n)$/;\"\tinline\nt0\tinput.el\t/^(defun* t0 (n)$/;\"\tfunction\nu0\tinput.el\t/^(defsubst* u0 () nil)$/;\"\tsubst\n" }, { "path": "Units/parser-emacsLisp.r/definitions.d/input.el", "content": "(defun a0 (n) (+ 1 n))\n\n(defvar b0 3)\n\n(defconstant c0 5)\n\n(defmacro defunknown0 (s)\n `(defconstant ,s 'unknown))\n\n(defalias 'e0 'a0)\n\n(defvaralias 'f0 'b0)\n\n(defsubst g0 () nil)\n\n(define-error 'h0 (purecopy \"TEST\"))\n(define-error (quote h1) (purecopy \"TEST\"))\n\n(define-minor-mode i0 \"DOC\")\n\n(define-derived-mode j0 nil \"TEST\")\n\n(defcustom k0 t\n \"doc\"\n :type 'number\n :group 'l0\n :version \"22.1\")\n\n(defgroup l0 nil \"DOC\" :group 'editing)\n\n(defface m0\n '((t (:inherit region)))\n \"DOC\"\n :group 'l0\n :version \"22.1\")\n\n(deftheme n0 \"DOC\")\n\n(condition-case nil\n(define-key dont-capture-me-map \"m\" 'ctags)\n(error nil))\n\n(defvar-local o0 1)\n\n\n(define-globalized-minor-mode p0\n visual-line-mode turn-on-visual-line-mode)\n\n(define-obsolete-function-alias 'q0 'f0)\n\n(define-global-minor-mode r0\n subword-mode turn-on-subword-mode)\n\n(define-inline s0 (n)\n (+ n 1))\n\n(defun* t0 (n)\n (+ n 1))\n\n(defmacro* defunknown1 (s)\n `(defconstant ,s 'unknown))\n\n(defsubst* u0 () nil)\n\n" }, { "path": "Units/parser-emacsLisp.r/misleading-names.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-emacsLisp.r/misleading-names.d/expected.tags", "content": "a\tinput.el\t/^(defvar a)$/;\"\tv\nb\tinput.el\t/^(defvar b)$/;\"\tv\n" }, { "path": "Units/parser-emacsLisp.r/misleading-names.d/input.el", "content": "(defvar a)\n\n;; ctags should not tag 'x':\n(default x)\n(definition y0)\n(definitionz y1)\n\n(defvar b)\n" }, { "path": "Units/parser-emacsLisp.r/newline.b/expected.tags", "content": "f\tinput.el\t/^ f () 1)$/;\"\tf\n" }, { "path": "Units/parser-emacsLisp.r/newline.b/input.el", "content": "(defun\n f () 1)\n" }, { "path": "Units/parser-emacsLisp.r/simple-emacsLisp.d/README", "content": "The input is taken from simple.el of GNU Emacs. I didn't check all\nthe entries of expected.tags because it has so many entires. However,\nI put this to our git repository because there are so various def* in\nsimple.el. So when we change the code of EmacsLisp parser, this test\ncase may notify something useful.\n" }, { "path": "Units/parser-emacsLisp.r/simple-emacsLisp.d/args.ctags", "content": "--sort=no\n--fields=+K\n" }, { "path": "Units/parser-emacsLisp.r/simple-emacsLisp.d/expected.tags", "content": "compilation-current-error\tinput.el\t/^(defvar compilation-current-error)$/;\"\tvariable\ncompilation-context-lines\tinput.el\t/^(defvar compilation-context-lines)$/;\"\tvariable\nshell-command-dont-erase-buffer\tinput.el\t/^(defcustom shell-command-dont-erase-buffer nil$/;\"\tcustom\nshell-command-saved-pos\tinput.el\t/^(defvar shell-command-saved-pos nil$/;\"\tvariable\nidle-update-delay\tinput.el\t/^(defcustom idle-update-delay 0.5$/;\"\tcustom\nkilling\tinput.el\t/^(defgroup killing nil$/;\"\tgroup\nparen-matching\tinput.el\t/^(defgroup paren-matching nil$/;\"\tgroup\nnext-error\tinput.el\t/^(defgroup next-error nil$/;\"\tgroup\nnext-error\tinput.el\t/^(defface next-error$/;\"\tface\nnext-error-highlight\tinput.el\t/^(defcustom next-error-highlight 0.5$/;\"\tcustom\nnext-error-highlight-no-select\tinput.el\t/^(defcustom next-error-highlight-no-select 0.5$/;\"\tcustom\nnext-error-recenter\tinput.el\t/^(defcustom next-error-recenter nil$/;\"\tcustom\nnext-error-hook\tinput.el\t/^(defcustom next-error-hook nil$/;\"\tcustom\nnext-error-highlight-timer\tinput.el\t/^(defvar next-error-highlight-timer nil)$/;\"\tvariable\nnext-error-overlay-arrow-position\tinput.el\t/^(defvar next-error-overlay-arrow-position nil)$/;\"\tvariable\nnext-error-last-buffer\tinput.el\t/^(defvar next-error-last-buffer nil$/;\"\tvariable\nnext-error-function\tinput.el\t/^(defvar next-error-function nil$/;\"\tvariable\nnext-error-move-function\tinput.el\t/^(defvar next-error-move-function nil$/;\"\tvariable\nnext-error-buffer-p\tinput.el\t/^(defsubst next-error-buffer-p (buffer$/;\"\tsubst\nnext-error-find-buffer\tinput.el\t/^(defun next-error-find-buffer (&optional avoid-current$/;\"\tfunction\nnext-error\tinput.el\t/^(defun next-error (&optional arg reset)$/;\"\tfunction\nnext-error-internal\tinput.el\t/^(defun next-error-internal ()$/;\"\tfunction\ngoto-next-locus\tinput.el\t/^(defalias 'goto-next-locus 'next-error)$/;\"\talias\nnext-match\tinput.el\t/^(defalias 'next-match 'next-error)$/;\"\talias\nprevious-error\tinput.el\t/^(defun previous-error (&optional n)$/;\"\tfunction\nfirst-error\tinput.el\t/^(defun first-error (&optional n)$/;\"\tfunction\nnext-error-no-select\tinput.el\t/^(defun next-error-no-select (&optional n)$/;\"\tfunction\nprevious-error-no-select\tinput.el\t/^(defun previous-error-no-select (&optional n)$/;\"\tfunction\nnext-error-follow-last-line\tinput.el\t/^(defvar next-error-follow-last-line nil)$/;\"\tvariable\nnext-error-follow-minor-mode\tinput.el\t/^(define-minor-mode next-error-follow-minor-mode$/;\"\tminorMode\nnext-error-follow-mode-post-command-hook\tinput.el\t/^(defun next-error-follow-mode-post-command-hook ()$/;\"\tfunction\nfundamental-mode\tinput.el\t/^(defun fundamental-mode ()$/;\"\tfunction\nspecial-mode-map\tinput.el\t/^(defvar special-mode-map$/;\"\tvariable\nspecial-mode\tinput.el\t/^(define-derived-mode special-mode nil \"Special\"$/;\"\tderivedMode\nself-insert-uses-region-functions\tinput.el\t/^(defvar self-insert-uses-region-functions nil$/;\"\tvariable\nhard-newline\tinput.el\t/^(defvar hard-newline (propertize \"\\\\n\" 'hard t 'rear-nonsticky '(hard))$/;\"\tvariable\nnewline\tinput.el\t/^(defun newline (&optional arg interactive)$/;\"\tfunction\nset-hard-newline-properties\tinput.el\t/^(defun set-hard-newline-properties (from to)$/;\"\tfunction\nopen-line\tinput.el\t/^(defun open-line (n)$/;\"\tfunction\nsplit-line\tinput.el\t/^(defun split-line (&optional arg)$/;\"\tfunction\ndelete-indentation\tinput.el\t/^(defun delete-indentation (&optional arg)$/;\"\tfunction\njoin-line\tinput.el\t/^(defalias 'join-line #'delete-indentation) ; easier to find$/;\"\talias\ndelete-blank-lines\tinput.el\t/^(defun delete-blank-lines ()$/;\"\tfunction\ndelete-trailing-lines\tinput.el\t/^(defcustom delete-trailing-lines t$/;\"\tcustom\nregion-modifiable-p\tinput.el\t/^(defun region-modifiable-p (start end)$/;\"\tfunction\ndelete-trailing-whitespace\tinput.el\t/^(defun delete-trailing-whitespace (&optional start end)$/;\"\tfunction\nnewline-and-indent\tinput.el\t/^(defun newline-and-indent ()$/;\"\tfunction\nreindent-then-newline-and-indent\tinput.el\t/^(defun reindent-then-newline-and-indent ()$/;\"\tfunction\nread-quoted-char-radix\tinput.el\t/^(defcustom read-quoted-char-radix 8$/;\"\tcustom\nread-quoted-char\tinput.el\t/^(defun read-quoted-char (&optional prompt)$/;\"\tfunction\nquoted-insert\tinput.el\t/^(defun quoted-insert (arg)$/;\"\tfunction\nforward-to-indentation\tinput.el\t/^(defun forward-to-indentation (&optional arg)$/;\"\tfunction\nbackward-to-indentation\tinput.el\t/^(defun backward-to-indentation (&optional arg)$/;\"\tfunction\nback-to-indentation\tinput.el\t/^(defun back-to-indentation ()$/;\"\tfunction\nfixup-whitespace\tinput.el\t/^(defun fixup-whitespace ()$/;\"\tfunction\ndelete-horizontal-space\tinput.el\t/^(defun delete-horizontal-space (&optional backward-only)$/;\"\tfunction\njust-one-space\tinput.el\t/^(defun just-one-space (&optional n)$/;\"\tfunction\ncycle-spacing--context\tinput.el\t/^(defvar cycle-spacing--context nil$/;\"\tvariable\ncycle-spacing\tinput.el\t/^(defun cycle-spacing (&optional n preserve-nl-back mode)$/;\"\tfunction\nbeginning-of-buffer\tinput.el\t/^(defun beginning-of-buffer (&optional arg)$/;\"\tfunction\nend-of-buffer\tinput.el\t/^(defun end-of-buffer (&optional arg)$/;\"\tfunction\ndelete-active-region\tinput.el\t/^(defcustom delete-active-region t$/;\"\tcustom\nregion-extract-function\tinput.el\t/^(defvar region-extract-function$/;\"\tvariable\nregion-insert-function\tinput.el\t/^(defvar region-insert-function$/;\"\tvariable\ndelete-backward-char\tinput.el\t/^(defun delete-backward-char (n &optional killflag)$/;\"\tfunction\ndelete-forward-char\tinput.el\t/^(defun delete-forward-char (n &optional killflag)$/;\"\tfunction\nmark-whole-buffer\tinput.el\t/^(defun mark-whole-buffer ()$/;\"\tfunction\ngoto-line\tinput.el\t/^(defun goto-line (line &optional buffer)$/;\"\tfunction\ncount-words-region\tinput.el\t/^(defun count-words-region (start end &optional arg)$/;\"\tfunction\ncount-words\tinput.el\t/^(defun count-words (start end)$/;\"\tfunction\ncount-words--buffer-message\tinput.el\t/^(defun count-words--buffer-message ()$/;\"\tfunction\ncount-words--message\tinput.el\t/^(defun count-words--message (str start end)$/;\"\tfunction\ncount-lines-region\tinput.el\t/^(define-obsolete-function-alias 'count-lines-region 'count-words-region \"24.1\")$/;\"\talias\nwhat-line\tinput.el\t/^(defun what-line ()$/;\"\tfunction\ncount-lines\tinput.el\t/^(defun count-lines (start end)$/;\"\tfunction\nline-number-at-pos\tinput.el\t/^(defun line-number-at-pos (&optional pos absolute)$/;\"\tfunction\nwhat-cursor-position\tinput.el\t/^(defun what-cursor-position (&optional detail)$/;\"\tfunction\nread-expression-map\tinput.el\t/^(defvar read-expression-map$/;\"\tvariable\nread-minibuffer\tinput.el\t/^(defun read-minibuffer (prompt &optional initial-contents)$/;\"\tfunction\neval-minibuffer\tinput.el\t/^(defun eval-minibuffer (prompt &optional initial-contents)$/;\"\tfunction\nminibuffer-completing-symbol\tinput.el\t/^(defvar minibuffer-completing-symbol nil$/;\"\tvariable\nminibuffer-default\tinput.el\t/^(defvar minibuffer-default nil$/;\"\tvariable\neval-expression-print-level\tinput.el\t/^(defcustom eval-expression-print-level 4$/;\"\tcustom\neval-expression-print-length\tinput.el\t/^(defcustom eval-expression-print-length 12$/;\"\tcustom\neval-expression-debug-on-error\tinput.el\t/^(defcustom eval-expression-debug-on-error t$/;\"\tcustom\neval-expression-print-maximum-character\tinput.el\t/^(defcustom eval-expression-print-maximum-character 127$/;\"\tcustom\neval-expression-print-format\tinput.el\t/^(defun eval-expression-print-format (value)$/;\"\tfunction\neval-expression-minibuffer-setup-hook\tinput.el\t/^(defvar eval-expression-minibuffer-setup-hook nil$/;\"\tvariable\nread--expression\tinput.el\t/^(defun read--expression (prompt &optional initial-contents)$/;\"\tfunction\neval-expression-get-print-arguments\tinput.el\t/^(defun eval-expression-get-print-arguments (prefix-argument)$/;\"\tfunction\neval-expression\tinput.el\t/^(defun eval-expression (exp &optional insert-value no-truncate char-print-limit)$/;\"\tfunction\nedit-and-eval-command\tinput.el\t/^(defun edit-and-eval-command (prompt command)$/;\"\tfunction\nrepeat-complex-command\tinput.el\t/^(defun repeat-complex-command (arg)$/;\"\tfunction\nextended-command-history\tinput.el\t/^(defvar extended-command-history nil)$/;\"\tvariable\nexecute-extended-command--last-typed\tinput.el\t/^(defvar execute-extended-command--last-typed nil)$/;\"\tvariable\nread-extended-command\tinput.el\t/^(defun read-extended-command ()$/;\"\tfunction\nsuggest-key-bindings\tinput.el\t/^(defcustom suggest-key-bindings t$/;\"\tcustom\nextended-command-suggest-shorter\tinput.el\t/^(defcustom extended-command-suggest-shorter t$/;\"\tcustom\nexecute-extended-command--shorter-1\tinput.el\t/^(defun execute-extended-command--shorter-1 (name length)$/;\"\tfunction\nexecute-extended-command--shorter\tinput.el\t/^(defun execute-extended-command--shorter (name typed)$/;\"\tfunction\nexecute-extended-command\tinput.el\t/^(defun execute-extended-command (prefixarg &optional command-name typed)$/;\"\tfunction\ncommand-execute\tinput.el\t/^(defun command-execute (cmd &optional record-flag keys special)$/;\"\tfunction\nminibuffer-history\tinput.el\t/^(defvar minibuffer-history nil$/;\"\tvariable\nminibuffer-history-sexp-flag\tinput.el\t/^(defvar minibuffer-history-sexp-flag nil$/;\"\tvariable\nminibuffer-history-search-history\tinput.el\t/^(defvar minibuffer-history-search-history nil)$/;\"\tvariable\nminibuffer-text-before-history\tinput.el\t/^(defvar minibuffer-text-before-history nil$/;\"\tvariable\nminibuffer-history-initialize\tinput.el\t/^(defun minibuffer-history-initialize ()$/;\"\tfunction\nminibuffer-avoid-prompt\tinput.el\t/^(defun minibuffer-avoid-prompt (_new _old)$/;\"\tfunction\nminibuffer-history-case-insensitive-variables\tinput.el\t/^(defcustom minibuffer-history-case-insensitive-variables nil$/;\"\tcustom\nprevious-matching-history-element\tinput.el\t/^(defun previous-matching-history-element (regexp n)$/;\"\tfunction\nnext-matching-history-element\tinput.el\t/^(defun next-matching-history-element (regexp n)$/;\"\tfunction\nminibuffer-temporary-goal-position\tinput.el\t/^(defvar minibuffer-temporary-goal-position nil)$/;\"\tvariable\nminibuffer-default-add-function\tinput.el\t/^(defvar minibuffer-default-add-function 'minibuffer-default-add-completions$/;\"\tvariable\nminibuffer-default-add-done\tinput.el\t/^(defvar minibuffer-default-add-done nil$/;\"\tvariable\nminibuffer-default-add-completions\tinput.el\t/^(defun minibuffer-default-add-completions ()$/;\"\tfunction\ngoto-history-element\tinput.el\t/^(defun goto-history-element (nabs)$/;\"\tfunction\nnext-history-element\tinput.el\t/^(defun next-history-element (n)$/;\"\tfunction\nprevious-history-element\tinput.el\t/^(defun previous-history-element (n)$/;\"\tfunction\nnext-line-or-history-element\tinput.el\t/^(defun next-line-or-history-element (&optional arg)$/;\"\tfunction\nprevious-line-or-history-element\tinput.el\t/^(defun previous-line-or-history-element (&optional arg)$/;\"\tfunction\nnext-complete-history-element\tinput.el\t/^(defun next-complete-history-element (n)$/;\"\tfunction\nprevious-complete-history-element\tinput.el\t/^(defun previous-complete-history-element (n)$/;\"\tfunction\nminibuffer-prompt-width\tinput.el\t/^(defun minibuffer-prompt-width ()$/;\"\tfunction\nminibuffer-history-isearch-message-overlay\tinput.el\t/^(defvar minibuffer-history-isearch-message-overlay)$/;\"\tvariable\nminibuffer-history-isearch-setup\tinput.el\t/^(defun minibuffer-history-isearch-setup ()$/;\"\tfunction\nminibuffer-history-isearch-end\tinput.el\t/^(defun minibuffer-history-isearch-end ()$/;\"\tfunction\nminibuffer-history-isearch-search\tinput.el\t/^(defun minibuffer-history-isearch-search ()$/;\"\tfunction\nminibuffer-history-isearch-message\tinput.el\t/^(defun minibuffer-history-isearch-message (&optional c-q-hack ellipsis)$/;\"\tfunction\nminibuffer-history-isearch-wrap\tinput.el\t/^(defun minibuffer-history-isearch-wrap ()$/;\"\tfunction\nminibuffer-history-isearch-push-state\tinput.el\t/^(defun minibuffer-history-isearch-push-state ()$/;\"\tfunction\nminibuffer-history-isearch-pop-state\tinput.el\t/^(defun minibuffer-history-isearch-pop-state (_cmd hist-pos)$/;\"\tfunction\nadvertised-undo\tinput.el\t/^(define-obsolete-function-alias 'advertised-undo 'undo \"23.2\")$/;\"\talias\nundo-equiv-table\tinput.el\t/^(defconst undo-equiv-table (make-hash-table :test 'eq :weakness t)$/;\"\tconst\nundo-in-region\tinput.el\t/^(defvar undo-in-region nil$/;\"\tvariable\nundo-no-redo\tinput.el\t/^(defvar undo-no-redo nil$/;\"\tvariable\npending-undo-list\tinput.el\t/^(defvar pending-undo-list nil$/;\"\tvariable\nundo\tinput.el\t/^(defun undo (&optional arg)$/;\"\tfunction\nbuffer-disable-undo\tinput.el\t/^(defun buffer-disable-undo (&optional buffer)$/;\"\tfunction\nundo-only\tinput.el\t/^(defun undo-only (&optional arg)$/;\"\tfunction\nundo-in-progress\tinput.el\t/^(defvar undo-in-progress nil$/;\"\tvariable\nundo-more\tinput.el\t/^(defun undo-more (n)$/;\"\tfunction\nprimitive-undo\tinput.el\t/^(defun primitive-undo (n list)$/;\"\tfunction\nundo-copy-list\tinput.el\t/^(defun undo-copy-list (list)$/;\"\tfunction\nundo-copy-list-1\tinput.el\t/^(defun undo-copy-list-1 (elt)$/;\"\tfunction\nundo-start\tinput.el\t/^(defun undo-start (&optional beg end)$/;\"\tfunction\nundo-make-selective-list\tinput.el\t/^(defun undo-make-selective-list (start end)$/;\"\tfunction\nundo-elt-in-region\tinput.el\t/^(defun undo-elt-in-region (undo-elt start end)$/;\"\tfunction\nundo-elt-crosses-region\tinput.el\t/^(defun undo-elt-crosses-region (undo-elt start end)$/;\"\tfunction\nundo-adjust-elt\tinput.el\t/^(defun undo-adjust-elt (elt deltas)$/;\"\tfunction\nundo-adjust-beg-end\tinput.el\t/^(defun undo-adjust-beg-end (beg end deltas)$/;\"\tfunction\nundo-adjust-pos\tinput.el\t/^(defun undo-adjust-pos (pos deltas &optional use-<)$/;\"\tfunction\nundo-delta\tinput.el\t/^(defun undo-delta (undo-elt)$/;\"\tfunction\nundo-auto--last-boundary-cause\tinput.el\t/^(defvar-local undo-auto--last-boundary-cause nil$/;\"\tvariable\nundo-auto-current-boundary-timer\tinput.el\t/^(defvar undo-auto-current-boundary-timer nil$/;\"\tvariable\nundo-auto--this-command-amalgamating\tinput.el\t/^(defvar undo-auto--this-command-amalgamating nil$/;\"\tvariable\nundo-auto--needs-boundary-p\tinput.el\t/^(defun undo-auto--needs-boundary-p ()$/;\"\tfunction\nundo-auto--last-boundary-amalgamating-number\tinput.el\t/^(defun undo-auto--last-boundary-amalgamating-number ()$/;\"\tfunction\nundo-auto--ensure-boundary\tinput.el\t/^(defun undo-auto--ensure-boundary (cause)$/;\"\tfunction\nundo-auto--boundaries\tinput.el\t/^(defun undo-auto--boundaries (cause)$/;\"\tfunction\nundo-auto--boundary-timer\tinput.el\t/^(defun undo-auto--boundary-timer ()$/;\"\tfunction\nundo-auto--boundary-ensure-timer\tinput.el\t/^(defun undo-auto--boundary-ensure-timer ()$/;\"\tfunction\nundo-auto--undoably-changed-buffers\tinput.el\t/^(defvar undo-auto--undoably-changed-buffers nil$/;\"\tvariable\nundo-auto--add-boundary\tinput.el\t/^(defun undo-auto--add-boundary ()$/;\"\tfunction\nundo-auto-amalgamate\tinput.el\t/^(defun undo-auto-amalgamate ()$/;\"\tfunction\nundo-auto--undoable-change\tinput.el\t/^(defun undo-auto--undoable-change ()$/;\"\tfunction\nundo-amalgamate-change-group\tinput.el\t/^(defun undo-amalgamate-change-group (handle)$/;\"\tfunction\nundo-ask-before-discard\tinput.el\t/^(defcustom undo-ask-before-discard nil$/;\"\tcustom\nundo-extra-outer-limit\tinput.el\t/^(defvar undo-extra-outer-limit nil$/;\"\tvariable\nundo-outer-limit-truncate\tinput.el\t/^(defun undo-outer-limit-truncate (size)$/;\"\tfunction\npassword-word-equivalents\tinput.el\t/^(defcustom password-word-equivalents$/;\"\tcustom\nshell-command-history\tinput.el\t/^(defvar shell-command-history nil$/;\"\tvariable\nshell-command-switch\tinput.el\t/^(defvar shell-command-switch (purecopy \"-c\")$/;\"\tvariable\nshell-command-default-error-buffer\tinput.el\t/^(defvar shell-command-default-error-buffer nil$/;\"\tvariable\nminibuffer-default-add-shell-commands\tinput.el\t/^(defun minibuffer-default-add-shell-commands ()$/;\"\tfunction\nminibuffer-local-shell-command-map\tinput.el\t/^(defvar minibuffer-local-shell-command-map$/;\"\tvariable\nread-shell-command\tinput.el\t/^(defun read-shell-command (prompt &optional initial-contents hist &rest args)$/;\"\tfunction\nasync-shell-command-buffer\tinput.el\t/^(defcustom async-shell-command-buffer 'confirm-new-buffer$/;\"\tcustom\nasync-shell-command-display-buffer\tinput.el\t/^(defcustom async-shell-command-display-buffer t$/;\"\tcustom\nshell-command--save-pos-or-erase\tinput.el\t/^(defun shell-command--save-pos-or-erase ()$/;\"\tfunction\nshell-command--set-point-after-cmd\tinput.el\t/^(defun shell-command--set-point-after-cmd (&optional buffer)$/;\"\tfunction\nasync-shell-command\tinput.el\t/^(defun async-shell-command (command &optional output-buffer error-buffer)$/;\"\tfunction\nshell-command\tinput.el\t/^(defun shell-command (command &optional output-buffer error-buffer)$/;\"\tfunction\ndisplay-message-or-buffer\tinput.el\t/^(defun display-message-or-buffer (message &optional buffer-name action frame)$/;\"\tfunction\nshell-command-sentinel\tinput.el\t/^(defun shell-command-sentinel (process signal)$/;\"\tfunction\nshell-command-on-region\tinput.el\t/^(defun shell-command-on-region (start end command$/;\"\tfunction\nshell-command-to-string\tinput.el\t/^(defun shell-command-to-string (command)$/;\"\tfunction\nprocess-file\tinput.el\t/^(defun process-file (program &optional infile buffer display &rest args)$/;\"\tfunction\nprocess-file-side-effects\tinput.el\t/^(defvar process-file-side-effects t$/;\"\tvariable\nstart-file-process\tinput.el\t/^(defun start-file-process (name buffer program &rest program-args)$/;\"\tfunction\ntabulated-list-format\tinput.el\t/^(defvar tabulated-list-format)$/;\"\tvariable\ntabulated-list-entries\tinput.el\t/^(defvar tabulated-list-entries)$/;\"\tvariable\ntabulated-list-sort-key\tinput.el\t/^(defvar tabulated-list-sort-key)$/;\"\tvariable\nprocess-menu-query-only\tinput.el\t/^(defvar process-menu-query-only nil)$/;\"\tvariable\nprocess-menu-mode-map\tinput.el\t/^(defvar process-menu-mode-map$/;\"\tvariable\nprocess-menu-mode\tinput.el\t/^(define-derived-mode process-menu-mode tabulated-list-mode \"Process Menu\"$/;\"\tderivedMode\nprocess-menu-delete-process\tinput.el\t/^(defun process-menu-delete-process ()$/;\"\tfunction\nlist-processes--refresh\tinput.el\t/^(defun list-processes--refresh ()$/;\"\tfunction\nprocess-menu-visit-buffer\tinput.el\t/^(defun process-menu-visit-buffer (button)$/;\"\tfunction\nlist-processes\tinput.el\t/^(defun list-processes (&optional query-only buffer)$/;\"\tfunction\ninternal-echo-keystrokes-prefix\tinput.el\t/^(defun internal-echo-keystrokes-prefix ()$/;\"\tfunction\nprefix-command-echo-keystrokes-functions\tinput.el\t/^(defvar prefix-command-echo-keystrokes-functions nil$/;\"\tvariable\nprefix-command-update\tinput.el\t/^(defun prefix-command-update ()$/;\"\tfunction\nprefix-command-preserve-state-hook\tinput.el\t/^(defvar prefix-command-preserve-state-hook nil$/;\"\tvariable\nprefix-command-preserve-state\tinput.el\t/^(defun prefix-command-preserve-state ()$/;\"\tfunction\nreset-this-command-lengths\tinput.el\t/^(defun reset-this-command-lengths ()$/;\"\tfunction\nuniversal-argument--description\tinput.el\t/^(defun universal-argument--description ()$/;\"\tfunction\nuniversal-argument--preserve\tinput.el\t/^(defun universal-argument--preserve ()$/;\"\tfunction\nuniversal-argument-map\tinput.el\t/^(defvar universal-argument-map$/;\"\tvariable\nuniversal-argument--mode\tinput.el\t/^(defun universal-argument--mode ()$/;\"\tfunction\nuniversal-argument\tinput.el\t/^(defun universal-argument ()$/;\"\tfunction\nuniversal-argument-more\tinput.el\t/^(defun universal-argument-more (arg)$/;\"\tfunction\nnegative-argument\tinput.el\t/^(defun negative-argument (arg)$/;\"\tfunction\ndigit-argument\tinput.el\t/^(defun digit-argument (arg)$/;\"\tfunction\nfilter-buffer-substring-functions\tinput.el\t/^(defvar filter-buffer-substring-functions nil$/;\"\tvariable\nfilter-buffer-substring-function\tinput.el\t/^(defvar filter-buffer-substring-function #'buffer-substring--filter$/;\"\tvariable\nbuffer-substring-filters\tinput.el\t/^(defvar buffer-substring-filters nil$/;\"\tvariable\nfilter-buffer-substring\tinput.el\t/^(defun filter-buffer-substring (beg end &optional delete)$/;\"\tfunction\nbuffer-substring--filter\tinput.el\t/^(defun buffer-substring--filter (beg end &optional delete)$/;\"\tfunction\ninterprogram-cut-function\tinput.el\t/^(defvar interprogram-cut-function #'gui-select-text$/;\"\tvariable\ninterprogram-paste-function\tinput.el\t/^(defvar interprogram-paste-function #'gui-selection-value$/;\"\tvariable\nkill-ring\tinput.el\t/^(defvar kill-ring nil$/;\"\tvariable\nkill-ring-max\tinput.el\t/^(defcustom kill-ring-max 60$/;\"\tcustom\nkill-ring-yank-pointer\tinput.el\t/^(defvar kill-ring-yank-pointer nil$/;\"\tvariable\nsave-interprogram-paste-before-kill\tinput.el\t/^(defcustom save-interprogram-paste-before-kill nil$/;\"\tcustom\nkill-do-not-save-duplicates\tinput.el\t/^(defcustom kill-do-not-save-duplicates nil$/;\"\tcustom\nkill-new\tinput.el\t/^(defun kill-new (string &optional replace)$/;\"\tfunction\nkill-append-merge-undo\tinput.el\t/^(defcustom kill-append-merge-undo nil$/;\"\tcustom\nkill-append\tinput.el\t/^(defun kill-append (string before-p)$/;\"\tfunction\nyank-pop-change-selection\tinput.el\t/^(defcustom yank-pop-change-selection nil$/;\"\tcustom\ncurrent-kill\tinput.el\t/^(defun current-kill (n &optional do-not-move)$/;\"\tfunction\nkill-read-only-ok\tinput.el\t/^(defcustom kill-read-only-ok nil$/;\"\tcustom\nkill-region\tinput.el\t/^(defun kill-region (beg end &optional region)$/;\"\tfunction\ncopy-region-as-kill\tinput.el\t/^(defun copy-region-as-kill (beg end &optional region)$/;\"\tfunction\nkill-ring-save\tinput.el\t/^(defun kill-ring-save (beg end &optional region)$/;\"\tfunction\nindicate-copied-region\tinput.el\t/^(defun indicate-copied-region (&optional message-len)$/;\"\tfunction\nappend-next-kill\tinput.el\t/^(defun append-next-kill (&optional interactive)$/;\"\tfunction\nbidi-directional-controls-chars\tinput.el\t/^(defvar bidi-directional-controls-chars \"\\\\x202a-\\\\x202e\\\\x2066-\\\\x2069\"$/;\"\tvariable\nbidi-directional-non-controls-chars\tinput.el\t/^(defvar bidi-directional-non-controls-chars \"^\\\\x202a-\\\\x202e\\\\x2066-\\\\x2069\"$/;\"\tvariable\nsqueeze-bidi-context-1\tinput.el\t/^(defun squeeze-bidi-context-1 (from to category replacement)$/;\"\tfunction\nsqueeze-bidi-context\tinput.el\t/^(defun squeeze-bidi-context (from to)$/;\"\tfunction\nline-substring-with-bidi-context\tinput.el\t/^(defun line-substring-with-bidi-context (start end &optional no-properties)$/;\"\tfunction\nbuffer-substring-with-bidi-context\tinput.el\t/^(defun buffer-substring-with-bidi-context (start end &optional no-properties)$/;\"\tfunction\nyank-handled-properties\tinput.el\t/^(defcustom yank-handled-properties$/;\"\tcustom\nyank-excluded-properties\tinput.el\t/^(defcustom yank-excluded-properties$/;\"\tcustom\nyank-window-start\tinput.el\t/^(defvar yank-window-start nil)$/;\"\tvariable\nyank-undo-function\tinput.el\t/^(defvar yank-undo-function nil$/;\"\tvariable\nyank-pop\tinput.el\t/^(defun yank-pop (&optional arg)$/;\"\tfunction\nyank\tinput.el\t/^(defun yank (&optional arg)$/;\"\tfunction\nrotate-yank-pointer\tinput.el\t/^(defun rotate-yank-pointer (arg)$/;\"\tfunction\nkill-forward-chars\tinput.el\t/^(defun kill-forward-chars (arg)$/;\"\tfunction\nkill-backward-chars\tinput.el\t/^(defun kill-backward-chars (arg)$/;\"\tfunction\nbackward-delete-char-untabify-method\tinput.el\t/^(defcustom backward-delete-char-untabify-method 'untabify$/;\"\tcustom\nbackward-delete-char-untabify\tinput.el\t/^(defun backward-delete-char-untabify (arg &optional killp)$/;\"\tfunction\nzap-to-char\tinput.el\t/^(defun zap-to-char (arg char)$/;\"\tfunction\nkill-whole-line\tinput.el\t/^(defcustom kill-whole-line nil$/;\"\tcustom\nkill-line\tinput.el\t/^(defun kill-line (&optional arg)$/;\"\tfunction\nkill-whole-line\tinput.el\t/^(defun kill-whole-line (&optional arg)$/;\"\tfunction\nforward-visible-line\tinput.el\t/^(defun forward-visible-line (arg)$/;\"\tfunction\nend-of-visible-line\tinput.el\t/^(defun end-of-visible-line ()$/;\"\tfunction\nkill-current-buffer\tinput.el\t/^(defun kill-current-buffer ()$/;\"\tfunction\ninsert-buffer\tinput.el\t/^(defun insert-buffer (buffer)$/;\"\tfunction\nappend-to-buffer\tinput.el\t/^(defun append-to-buffer (buffer start end)$/;\"\tfunction\nprepend-to-buffer\tinput.el\t/^(defun prepend-to-buffer (buffer start end)$/;\"\tfunction\ncopy-to-buffer\tinput.el\t/^(defun copy-to-buffer (buffer start end)$/;\"\tfunction\nmark-inactive\tinput.el\t/^(define-error 'mark-inactive (purecopy \"The mark is not active now\"))$/;\"\terror\nactivate-mark-hook\tinput.el\t/^(defvar activate-mark-hook nil$/;\"\tvariable\ndeactivate-mark-hook\tinput.el\t/^(defvar deactivate-mark-hook nil$/;\"\tvariable\nmark\tinput.el\t/^(defun mark (&optional force)$/;\"\tfunction\ndeactivate-mark\tinput.el\t/^(defun deactivate-mark (&optional force)$/;\"\tfunction\nactivate-mark\tinput.el\t/^(defun activate-mark (&optional no-tmm)$/;\"\tfunction\nset-mark\tinput.el\t/^(defun set-mark (pos)$/;\"\tfunction\nsave-mark-and-excursion--save\tinput.el\t/^(defun save-mark-and-excursion--save ()$/;\"\tfunction\nsave-mark-and-excursion--restore\tinput.el\t/^(defun save-mark-and-excursion--restore (saved-mark-info)$/;\"\tfunction\nsave-mark-and-excursion\tinput.el\t/^(defmacro save-mark-and-excursion (&rest body)$/;\"\tmacro\nuse-empty-active-region\tinput.el\t/^(defcustom use-empty-active-region nil$/;\"\tcustom\nuse-region-p\tinput.el\t/^(defun use-region-p ()$/;\"\tfunction\nregion-active-p\tinput.el\t/^(defun region-active-p ()$/;\"\tfunction\nregion-bounds\tinput.el\t/^(defun region-bounds ()$/;\"\tfunction\nregion-noncontiguous-p\tinput.el\t/^(defun region-noncontiguous-p ()$/;\"\tfunction\nredisplay-unhighlight-region-function\tinput.el\t/^(defvar redisplay-unhighlight-region-function$/;\"\tvariable\nredisplay-highlight-region-function\tinput.el\t/^(defvar redisplay-highlight-region-function$/;\"\tvariable\nredisplay--update-region-highlight\tinput.el\t/^(defun redisplay--update-region-highlight (window)$/;\"\tfunction\npre-redisplay-functions\tinput.el\t/^(defvar pre-redisplay-functions (list #'redisplay--update-region-highlight)$/;\"\tvariable\nredisplay--pre-redisplay-functions\tinput.el\t/^(defun redisplay--pre-redisplay-functions (windows)$/;\"\tfunction\nmark-ring\tinput.el\t/^(defvar-local mark-ring nil$/;\"\tvariable\nmark-ring-max\tinput.el\t/^(defcustom mark-ring-max 16$/;\"\tcustom\nglobal-mark-ring\tinput.el\t/^(defvar global-mark-ring nil$/;\"\tvariable\nglobal-mark-ring-max\tinput.el\t/^(defcustom global-mark-ring-max 16$/;\"\tcustom\npop-to-mark-command\tinput.el\t/^(defun pop-to-mark-command ()$/;\"\tfunction\npush-mark-command\tinput.el\t/^(defun push-mark-command (arg &optional nomsg)$/;\"\tfunction\nset-mark-command-repeat-pop\tinput.el\t/^(defcustom set-mark-command-repeat-pop nil$/;\"\tcustom\nset-mark-command\tinput.el\t/^(defun set-mark-command (arg)$/;\"\tfunction\npush-mark\tinput.el\t/^(defun push-mark (&optional location nomsg activate)$/;\"\tfunction\npop-mark\tinput.el\t/^(defun pop-mark ()$/;\"\tfunction\nexchange-dot-and-mark\tinput.el\t/^(define-obsolete-function-alias 'exchange-dot-and-mark$/;\"\talias\nexchange-point-and-mark\tinput.el\t/^(defun exchange-point-and-mark (&optional arg)$/;\"\tfunction\nshift-select-mode\tinput.el\t/^(defcustom shift-select-mode t$/;\"\tcustom\nhandle-shift-selection\tinput.el\t/^(defun handle-shift-selection ()$/;\"\tfunction\ntransient-mark-mode\tinput.el\t/^(define-minor-mode transient-mark-mode$/;\"\tminorMode\nwiden-automatically\tinput.el\t/^(defvar widen-automatically t$/;\"\tvariable\nnon-essential\tinput.el\t/^(defvar non-essential nil$/;\"\tvariable\npop-global-mark\tinput.el\t/^(defun pop-global-mark ()$/;\"\tfunction\nnext-line-add-newlines\tinput.el\t/^(defcustom next-line-add-newlines nil$/;\"\tcustom\nnext-line\tinput.el\t/^(defun next-line (&optional arg try-vscroll)$/;\"\tfunction\nprevious-line\tinput.el\t/^(defun previous-line (&optional arg try-vscroll)$/;\"\tfunction\ntrack-eol\tinput.el\t/^(defcustom track-eol nil$/;\"\tcustom\ngoal-column\tinput.el\t/^(defcustom goal-column nil$/;\"\tcustom\ntemporary-goal-column\tinput.el\t/^(defvar temporary-goal-column 0$/;\"\tvariable\nlast--line-number-width\tinput.el\t/^(defvar last--line-number-width 0$/;\"\tvariable\nline-move-ignore-invisible\tinput.el\t/^(defcustom line-move-ignore-invisible t$/;\"\tcustom\nline-move-visual\tinput.el\t/^(defcustom line-move-visual t$/;\"\tcustom\ndefault-font-height\tinput.el\t/^(defun default-font-height ()$/;\"\tfunction\ndefault-font-width\tinput.el\t/^(defun default-font-width ()$/;\"\tfunction\ndefault-line-height\tinput.el\t/^(defun default-line-height ()$/;\"\tfunction\nwindow-screen-lines\tinput.el\t/^(defun window-screen-lines ()$/;\"\tfunction\nline-move-partial\tinput.el\t/^(defun line-move-partial (arg noerror &optional _to-end)$/;\"\tfunction\nline-move\tinput.el\t/^(defun line-move (arg &optional noerror _to-end try-vscroll)$/;\"\tfunction\nline-move-visual\tinput.el\t/^(defun line-move-visual (arg &optional noerror)$/;\"\tfunction\nline-move-1\tinput.el\t/^(defun line-move-1 (arg &optional noerror _to-end)$/;\"\tfunction\nline-move-finish\tinput.el\t/^(defun line-move-finish (column opoint forward)$/;\"\tfunction\nline-move-to-column\tinput.el\t/^(defun line-move-to-column (col)$/;\"\tfunction\nmove-end-of-line\tinput.el\t/^(defun move-end-of-line (arg)$/;\"\tfunction\nmove-beginning-of-line\tinput.el\t/^(defun move-beginning-of-line (arg)$/;\"\tfunction\nset-goal-column\tinput.el\t/^(defun set-goal-column (arg)$/;\"\tfunction\nend-of-visual-line\tinput.el\t/^(defun end-of-visual-line (&optional n)$/;\"\tfunction\nbeginning-of-visual-line\tinput.el\t/^(defun beginning-of-visual-line (&optional n)$/;\"\tfunction\nkill-visual-line\tinput.el\t/^(defun kill-visual-line (&optional arg)$/;\"\tfunction\nnext-logical-line\tinput.el\t/^(defun next-logical-line (&optional arg try-vscroll)$/;\"\tfunction\nprevious-logical-line\tinput.el\t/^(defun previous-logical-line (&optional arg try-vscroll)$/;\"\tfunction\nvisual-line\tinput.el\t/^(defgroup visual-line nil$/;\"\tgroup\nvisual-line-mode-map\tinput.el\t/^(defvar visual-line-mode-map$/;\"\tvariable\nvisual-line-fringe-indicators\tinput.el\t/^(defcustom visual-line-fringe-indicators '(nil nil)$/;\"\tcustom\nvisual-line--saved-state\tinput.el\t/^(defvar visual-line--saved-state nil)$/;\"\tvariable\nvisual-line-mode\tinput.el\t/^(define-minor-mode visual-line-mode$/;\"\tminorMode\nturn-on-visual-line-mode\tinput.el\t/^(defun turn-on-visual-line-mode ()$/;\"\tfunction\nglobal-visual-line-mode\tinput.el\t/^(define-globalized-minor-mode global-visual-line-mode$/;\"\tminorMode\ntranspose-chars\tinput.el\t/^(defun transpose-chars (arg)$/;\"\tfunction\ntranspose-words\tinput.el\t/^(defun transpose-words (arg)$/;\"\tfunction\ntranspose-sexps\tinput.el\t/^(defun transpose-sexps (arg)$/;\"\tfunction\ntranspose-lines\tinput.el\t/^(defun transpose-lines (arg)$/;\"\tfunction\ntranspose-subr\tinput.el\t/^(defun transpose-subr (mover arg &optional special)$/;\"\tfunction\ntranspose-subr-1\tinput.el\t/^(defun transpose-subr-1 (pos1 pos2)$/;\"\tfunction\nbackward-word\tinput.el\t/^(defun backward-word (&optional arg)$/;\"\tfunction\nmark-word\tinput.el\t/^(defun mark-word (&optional arg allow-extend)$/;\"\tfunction\nkill-word\tinput.el\t/^(defun kill-word (arg)$/;\"\tfunction\nbackward-kill-word\tinput.el\t/^(defun backward-kill-word (arg)$/;\"\tfunction\ncurrent-word\tinput.el\t/^(defun current-word (&optional strict really-word)$/;\"\tfunction\nfill-prefix\tinput.el\t/^(defcustom fill-prefix nil$/;\"\tcustom\nauto-fill-inhibit-regexp\tinput.el\t/^(defcustom auto-fill-inhibit-regexp nil$/;\"\tcustom\ndo-auto-fill\tinput.el\t/^(defun do-auto-fill ()$/;\"\tfunction\ncomment-line-break-function\tinput.el\t/^(defvar comment-line-break-function 'comment-indent-new-line$/;\"\tvariable\ndefault-indent-new-line\tinput.el\t/^(defun default-indent-new-line (&optional soft)$/;\"\tfunction\ninternal-auto-fill\tinput.el\t/^(defun internal-auto-fill ()$/;\"\tfunction\nnormal-auto-fill-function\tinput.el\t/^(defvar normal-auto-fill-function 'do-auto-fill$/;\"\tvariable\nauto-fill-mode\tinput.el\t/^(define-minor-mode auto-fill-mode$/;\"\tminorMode\nauto-fill-function\tinput.el\t/^(defun auto-fill-function ()$/;\"\tfunction\nturn-on-auto-fill\tinput.el\t/^(defun turn-on-auto-fill ()$/;\"\tfunction\nturn-off-auto-fill\tinput.el\t/^(defun turn-off-auto-fill ()$/;\"\tfunction\nset-fill-column\tinput.el\t/^(defun set-fill-column (arg)$/;\"\tfunction\nset-selective-display\tinput.el\t/^(defun set-selective-display (arg)$/;\"\tfunction\nindicate-unused-lines\tinput.el\t/^(defvaralias 'indicate-unused-lines 'indicate-empty-lines)$/;\"\tvaralias\ntoggle-truncate-lines\tinput.el\t/^(defun toggle-truncate-lines (&optional arg)$/;\"\tfunction\ntoggle-word-wrap\tinput.el\t/^(defun toggle-word-wrap (&optional arg)$/;\"\tfunction\noverwrite-mode-textual\tinput.el\t/^(defvar overwrite-mode-textual (purecopy \" Ovwrt\")$/;\"\tvariable\noverwrite-mode-binary\tinput.el\t/^(defvar overwrite-mode-binary (purecopy \" Bin Ovwrt\")$/;\"\tvariable\noverwrite-mode\tinput.el\t/^(define-minor-mode overwrite-mode$/;\"\tminorMode\nbinary-overwrite-mode\tinput.el\t/^(define-minor-mode binary-overwrite-mode$/;\"\tminorMode\nline-number-mode\tinput.el\t/^(define-minor-mode line-number-mode$/;\"\tminorMode\ncolumn-number-mode\tinput.el\t/^(define-minor-mode column-number-mode$/;\"\tminorMode\nsize-indication-mode\tinput.el\t/^(define-minor-mode size-indication-mode$/;\"\tminorMode\nauto-save-mode\tinput.el\t/^(define-minor-mode auto-save-mode$/;\"\tminorMode\nparen-blinking\tinput.el\t/^(defgroup paren-blinking nil$/;\"\tgroup\nblink-matching-paren\tinput.el\t/^(defcustom blink-matching-paren t$/;\"\tcustom\nblink-matching-paren-on-screen\tinput.el\t/^(defcustom blink-matching-paren-on-screen t$/;\"\tcustom\nblink-matching-paren-distance\tinput.el\t/^(defcustom blink-matching-paren-distance (* 100 1024)$/;\"\tcustom\nblink-matching-delay\tinput.el\t/^(defcustom blink-matching-delay 1$/;\"\tcustom\nblink-matching-paren-dont-ignore-comments\tinput.el\t/^(defcustom blink-matching-paren-dont-ignore-comments nil$/;\"\tcustom\nblink-matching-check-mismatch\tinput.el\t/^(defun blink-matching-check-mismatch (start end)$/;\"\tfunction\nblink-matching-check-function\tinput.el\t/^(defvar blink-matching-check-function #'blink-matching-check-mismatch$/;\"\tvariable\nblink-matching--overlay\tinput.el\t/^(defvar blink-matching--overlay$/;\"\tvariable\nblink-matching-open\tinput.el\t/^(defun blink-matching-open ()$/;\"\tfunction\nblink-paren-function\tinput.el\t/^(defvar blink-paren-function 'blink-matching-open$/;\"\tvariable\nblink-paren-post-self-insert-function\tinput.el\t/^(defun blink-paren-post-self-insert-function ()$/;\"\tfunction\nkeyboard-quit\tinput.el\t/^(defun keyboard-quit ()$/;\"\tfunction\nbuffer-quit-function\tinput.el\t/^(defvar buffer-quit-function nil$/;\"\tvariable\nkeyboard-escape-quit\tinput.el\t/^(defun keyboard-escape-quit ()$/;\"\tfunction\nplay-sound-file\tinput.el\t/^(defun play-sound-file (file &optional volume device)$/;\"\tfunction\nread-mail-command\tinput.el\t/^(defcustom read-mail-command 'rmail$/;\"\tcustom\nmail-user-agent\tinput.el\t/^(defcustom mail-user-agent 'message-user-agent$/;\"\tcustom\ncompose-mail-user-agent-warnings\tinput.el\t/^(defcustom compose-mail-user-agent-warnings t$/;\"\tcustom\nrfc822-goto-eoh\tinput.el\t/^(defun rfc822-goto-eoh ()$/;\"\tfunction\nmail-encode-mml\tinput.el\t/^(defvar mail-encode-mml nil$/;\"\tvariable\ncompose-mail\tinput.el\t/^(defun compose-mail (&optional to subject other-headers continue$/;\"\tfunction\ncompose-mail-other-window\tinput.el\t/^(defun compose-mail-other-window (&optional to subject other-headers continue$/;\"\tfunction\ncompose-mail-other-frame\tinput.el\t/^(defun compose-mail-other-frame (&optional to subject other-headers continue$/;\"\tfunction\nset-variable-value-history\tinput.el\t/^(defvar set-variable-value-history nil$/;\"\tvariable\nset-variable\tinput.el\t/^(defun set-variable (variable value &optional make-local)$/;\"\tfunction\ncompletion-list-mode-map\tinput.el\t/^(defvar completion-list-mode-map$/;\"\tvariable\ncompletion-reference-buffer\tinput.el\t/^(defvar completion-reference-buffer nil$/;\"\tvariable\ncompletion-no-auto-exit\tinput.el\t/^(defvar completion-no-auto-exit nil$/;\"\tvariable\ncompletion-base-position\tinput.el\t/^(defvar completion-base-position nil$/;\"\tvariable\ncompletion-list-insert-choice-function\tinput.el\t/^(defvar completion-list-insert-choice-function #'completion--replace$/;\"\tvariable\ncompletion-base-size\tinput.el\t/^(defvar completion-base-size nil$/;\"\tvariable\ndelete-completion-window\tinput.el\t/^(defun delete-completion-window ()$/;\"\tfunction\nprevious-completion\tinput.el\t/^(defun previous-completion (n)$/;\"\tfunction\nnext-completion\tinput.el\t/^(defun next-completion (n)$/;\"\tfunction\nchoose-completion\tinput.el\t/^(defun choose-completion (&optional event)$/;\"\tfunction\nchoose-completion-guess-base-position\tinput.el\t/^(defun choose-completion-guess-base-position (string)$/;\"\tfunction\nchoose-completion-delete-max-match\tinput.el\t/^(defun choose-completion-delete-max-match (string)$/;\"\tfunction\nchoose-completion-string-functions\tinput.el\t/^(defvar choose-completion-string-functions nil$/;\"\tvariable\nchoose-completion-string\tinput.el\t/^(defun choose-completion-string (choice &optional$/;\"\tfunction\ncompletion-list-mode\tinput.el\t/^(define-derived-mode completion-list-mode nil \"Completion List\"$/;\"\tderivedMode\ncompletion-list-mode-finish\tinput.el\t/^(defun completion-list-mode-finish ()$/;\"\tfunction\ncompletion-show-help\tinput.el\t/^(defcustom completion-show-help t$/;\"\tcustom\ncompletion-setup-function\tinput.el\t/^(defun completion-setup-function ()$/;\"\tfunction\nswitch-to-completions\tinput.el\t/^(defun switch-to-completions ()$/;\"\tfunction\nevent-apply-alt-modifier\tinput.el\t/^(defun event-apply-alt-modifier (_ignore-prompt)$/;\"\tfunction\nevent-apply-super-modifier\tinput.el\t/^(defun event-apply-super-modifier (_ignore-prompt)$/;\"\tfunction\nevent-apply-hyper-modifier\tinput.el\t/^(defun event-apply-hyper-modifier (_ignore-prompt)$/;\"\tfunction\nevent-apply-shift-modifier\tinput.el\t/^(defun event-apply-shift-modifier (_ignore-prompt)$/;\"\tfunction\nevent-apply-control-modifier\tinput.el\t/^(defun event-apply-control-modifier (_ignore-prompt)$/;\"\tfunction\nevent-apply-meta-modifier\tinput.el\t/^(defun event-apply-meta-modifier (_ignore-prompt)$/;\"\tfunction\nevent-apply-modifier\tinput.el\t/^(defun event-apply-modifier (event symbol lshiftby prefix)$/;\"\tfunction\nclone-buffer-hook\tinput.el\t/^(defvar clone-buffer-hook nil$/;\"\tvariable\nclone-indirect-buffer-hook\tinput.el\t/^(defvar clone-indirect-buffer-hook nil$/;\"\tvariable\nclone-process\tinput.el\t/^(defun clone-process (process &optional newname)$/;\"\tfunction\nclone-buffer\tinput.el\t/^(defun clone-buffer (&optional newname display-flag)$/;\"\tfunction\nclone-indirect-buffer\tinput.el\t/^(defun clone-indirect-buffer (newname display-flag &optional norecord)$/;\"\tfunction\nclone-indirect-buffer-other-window\tinput.el\t/^(defun clone-indirect-buffer-other-window (newname display-flag &optional norecord)$/;\"\tfunction\nnormal-erase-is-backspace\tinput.el\t/^(defcustom normal-erase-is-backspace 'maybe$/;\"\tcustom\nnormal-erase-is-backspace-setup-frame\tinput.el\t/^(defun normal-erase-is-backspace-setup-frame (&optional frame)$/;\"\tfunction\nnormal-erase-is-backspace-mode\tinput.el\t/^(define-minor-mode normal-erase-is-backspace-mode$/;\"\tminorMode\nvis-mode-saved-buffer-invisibility-spec\tinput.el\t/^(defvar vis-mode-saved-buffer-invisibility-spec nil$/;\"\tvariable\nread-only-mode\tinput.el\t/^(define-minor-mode read-only-mode$/;\"\tminorMode\nvisible-mode\tinput.el\t/^(define-minor-mode visible-mode$/;\"\tminorMode\nmessages-buffer-mode-map\tinput.el\t/^(defvar messages-buffer-mode-map$/;\"\tvariable\nmessages-buffer-mode\tinput.el\t/^(define-derived-mode messages-buffer-mode special-mode \"Messages\"$/;\"\tderivedMode\nmessages-buffer\tinput.el\t/^(defun messages-buffer ()$/;\"\tfunction\nbad-packages-alist\tinput.el\t/^(defconst bad-packages-alist$/;\"\tconst\nbad-package-check\tinput.el\t/^(defun bad-package-check (package)$/;\"\tfunction\ndefine-alternatives\tinput.el\t/^(defmacro define-alternatives (command &rest customizations)$/;\"\tmacro\nupcase-dwim\tinput.el\t/^(defun upcase-dwim (arg)$/;\"\tfunction\ndowncase-dwim\tinput.el\t/^(defun downcase-dwim (arg)$/;\"\tfunction\ncapitalize-dwim\tinput.el\t/^(defun capitalize-dwim (arg)$/;\"\tfunction\n" }, { "path": "Units/parser-emacsLisp.r/simple-emacsLisp.d/input.el", "content": ";;; simple.el --- basic editing commands for Emacs -*- lexical-binding: t -*-\n\n;; Copyright (C) 1985-1987, 1993-2018 Free Software Foundation, Inc.\n\n;; Maintainer: emacs-devel@gnu.org\n;; Keywords: internal\n;; Package: emacs\n\n;; This file is part of GNU Emacs.\n\n;; GNU Emacs is free software: you can redistribute it and/or modify\n;; it under the terms of the GNU General Public License as published by\n;; the Free Software Foundation, either version 3 of the License, or\n;; (at your option) any later version.\n\n;; GNU Emacs is distributed in the hope that it will be useful,\n;; but WITHOUT ANY WARRANTY; without even the implied warranty of\n;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n;; GNU General Public License for more details.\n\n;; You should have received a copy of the GNU General Public License\n;; along with GNU Emacs. If not, see .\n\n;;; Commentary:\n\n;; A grab-bag of basic Emacs commands not specifically related to some\n;; major mode or to file-handling.\n\n;;; Code:\n\n(eval-when-compile (require 'cl-lib))\n\n(declare-function widget-convert \"wid-edit\" (type &rest args))\n(declare-function shell-mode \"shell\" ())\n\n;;; From compile.el\n(defvar compilation-current-error)\n(defvar compilation-context-lines)\n\n(defcustom shell-command-dont-erase-buffer nil\n \"If non-nil, output buffer is not erased between shell commands.\nAlso, a non-nil value sets the point in the output buffer\nonce the command completes.\nThe value `beg-last-out' sets point at the beginning of the output,\n`end-last-out' sets point at the end of the buffer, `save-point'\nrestores the buffer position before the command.\"\n :type '(choice\n (const :tag \"Erase buffer\" nil)\n (const :tag \"Set point to beginning of last output\" beg-last-out)\n (const :tag \"Set point to end of last output\" end-last-out)\n (const :tag \"Save point\" save-point))\n :group 'shell\n :version \"26.1\")\n\n(defvar shell-command-saved-pos nil\n \"Record of point positions in output buffers after command completion.\nThe value is an alist whose elements are of the form (BUFFER . POS),\nwhere BUFFER is the output buffer, and POS is the point position\nin BUFFER once the command finishes.\nThis variable is used when `shell-command-dont-erase-buffer' is non-nil.\")\n\n(defcustom idle-update-delay 0.5\n \"Idle time delay before updating various things on the screen.\nVarious Emacs features that update auxiliary information when point moves\nwait this many seconds after Emacs becomes idle before doing an update.\"\n :type 'number\n :group 'display\n :version \"22.1\")\n\n(defgroup killing nil\n \"Killing and yanking commands.\"\n :group 'editing)\n\n(defgroup paren-matching nil\n \"Highlight (un)matching of parens and expressions.\"\n :group 'matching)\n\f\n;;; next-error support framework\n\n(defgroup next-error nil\n \"`next-error' support framework.\"\n :group 'compilation\n :version \"22.1\")\n\n(defface next-error\n '((t (:inherit region)))\n \"Face used to highlight next error locus.\"\n :group 'next-error\n :version \"22.1\")\n\n(defcustom next-error-highlight 0.5\n \"Highlighting of locations in selected source buffers.\nIf a number, highlight the locus in `next-error' face for the given time\nin seconds, or until the next command is executed.\nIf t, highlight the locus until the next command is executed, or until\nsome other locus replaces it.\nIf nil, don't highlight the locus in the source buffer.\nIf `fringe-arrow', indicate the locus by the fringe arrow\nindefinitely until some other locus replaces it.\"\n :type '(choice (number :tag \"Highlight for specified time\")\n (const :tag \"Semipermanent highlighting\" t)\n (const :tag \"No highlighting\" nil)\n (const :tag \"Fringe arrow\" fringe-arrow))\n :group 'next-error\n :version \"22.1\")\n\n(defcustom next-error-highlight-no-select 0.5\n \"Highlighting of locations in `next-error-no-select'.\nIf number, highlight the locus in `next-error' face for given time in seconds.\nIf t, highlight the locus indefinitely until some other locus replaces it.\nIf nil, don't highlight the locus in the source buffer.\nIf `fringe-arrow', indicate the locus by the fringe arrow\nindefinitely until some other locus replaces it.\"\n :type '(choice (number :tag \"Highlight for specified time\")\n (const :tag \"Semipermanent highlighting\" t)\n (const :tag \"No highlighting\" nil)\n (const :tag \"Fringe arrow\" fringe-arrow))\n :group 'next-error\n :version \"22.1\")\n\n(defcustom next-error-recenter nil\n \"Display the line in the visited source file recentered as specified.\nIf non-nil, the value is passed directly to `recenter'.\"\n :type '(choice (integer :tag \"Line to recenter to\")\n (const :tag \"Center of window\" (4))\n (const :tag \"No recentering\" nil))\n :group 'next-error\n :version \"23.1\")\n\n(defcustom next-error-hook nil\n \"List of hook functions run by `next-error' after visiting source file.\"\n :type 'hook\n :group 'next-error)\n\n(defvar next-error-highlight-timer nil)\n\n(defvar next-error-overlay-arrow-position nil)\n(put 'next-error-overlay-arrow-position 'overlay-arrow-string (purecopy \"=>\"))\n(add-to-list 'overlay-arrow-variable-list 'next-error-overlay-arrow-position)\n\n(defvar next-error-last-buffer nil\n \"The most recent `next-error' buffer.\nA buffer becomes most recent when its compilation, grep, or\nsimilar mode is started, or when it is used with \\\\[next-error]\nor \\\\[compile-goto-error].\")\n\n(defvar next-error-function nil\n \"Function to use to find the next error in the current buffer.\nThe function is called with 2 parameters:\nARG is an integer specifying by how many errors to move.\nRESET is a boolean which, if non-nil, says to go back to the beginning\nof the errors before moving.\nMajor modes providing compile-like functionality should set this variable\nto indicate to `next-error' that this is a candidate buffer and how\nto navigate in it.\")\n(make-variable-buffer-local 'next-error-function)\n\n(defvar next-error-move-function nil\n \"Function to use to move to an error locus.\nIt takes two arguments, a buffer position in the error buffer\nand a buffer position in the error locus buffer.\nThe buffer for the error locus should already be current.\nnil means use goto-char using the second argument position.\")\n(make-variable-buffer-local 'next-error-move-function)\n\n(defsubst next-error-buffer-p (buffer\n\t\t\t &optional avoid-current\n\t\t\t extra-test-inclusive\n\t\t\t extra-test-exclusive)\n \"Return non-nil if BUFFER is a `next-error' capable buffer.\nIf AVOID-CURRENT is non-nil, and BUFFER is the current buffer,\nreturn nil.\n\nThe function EXTRA-TEST-INCLUSIVE, if non-nil, is called if\nBUFFER would not normally qualify. If it returns non-nil, BUFFER\nis considered `next-error' capable, anyway, and the function\nreturns non-nil.\n\nThe function EXTRA-TEST-EXCLUSIVE, if non-nil, is called if the\nbuffer would normally qualify. If it returns nil, BUFFER is\nrejected, and the function returns nil.\"\n (and (buffer-name buffer)\t\t;First make sure it's live.\n (not (and avoid-current (eq buffer (current-buffer))))\n (with-current-buffer buffer\n\t (if next-error-function ; This is the normal test.\n\t ;; Optionally reject some buffers.\n\t (if extra-test-exclusive\n\t\t (funcall extra-test-exclusive)\n\t t)\n\t ;; Optionally accept some other buffers.\n\t (and extra-test-inclusive\n\t\t(funcall extra-test-inclusive))))))\n\n(defun next-error-find-buffer (&optional avoid-current\n\t\t\t\t\t extra-test-inclusive\n\t\t\t\t\t extra-test-exclusive)\n \"Return a `next-error' capable buffer.\n\nIf AVOID-CURRENT is non-nil, treat the current buffer\nas an absolute last resort only.\n\nThe function EXTRA-TEST-INCLUSIVE, if non-nil, is called in each buffer\nthat normally would not qualify. If it returns t, the buffer\nin question is treated as usable.\n\nThe function EXTRA-TEST-EXCLUSIVE, if non-nil, is called in each buffer\nthat would normally be considered usable. If it returns nil,\nthat buffer is rejected.\"\n (or\n ;; 1. If one window on the selected frame displays such buffer, return it.\n (let ((window-buffers\n (delete-dups\n (delq nil (mapcar (lambda (w)\n (if (next-error-buffer-p\n\t\t\t\t (window-buffer w)\n avoid-current\n extra-test-inclusive extra-test-exclusive)\n (window-buffer w)))\n (window-list))))))\n (if (eq (length window-buffers) 1)\n (car window-buffers)))\n ;; 2. If next-error-last-buffer is an acceptable buffer, use that.\n (if (and next-error-last-buffer\n (next-error-buffer-p next-error-last-buffer avoid-current\n extra-test-inclusive extra-test-exclusive))\n next-error-last-buffer)\n ;; 3. If the current buffer is acceptable, choose it.\n (if (next-error-buffer-p (current-buffer) avoid-current\n\t\t\t extra-test-inclusive extra-test-exclusive)\n (current-buffer))\n ;; 4. Look for any acceptable buffer.\n (let ((buffers (buffer-list)))\n (while (and buffers\n (not (next-error-buffer-p\n\t\t (car buffers) avoid-current\n\t\t extra-test-inclusive extra-test-exclusive)))\n (setq buffers (cdr buffers)))\n (car buffers))\n ;; 5. Use the current buffer as a last resort if it qualifies,\n ;; even despite AVOID-CURRENT.\n (and avoid-current\n\t(next-error-buffer-p (current-buffer) nil\n\t\t\t extra-test-inclusive extra-test-exclusive)\n\t(progn\n\t (message \"This is the only buffer with error message locations\")\n\t (current-buffer)))\n ;; 6. Give up.\n (error \"No buffers contain error message locations\")))\n\n(defun next-error (&optional arg reset)\n \"Visit next `next-error' message and corresponding source code.\n\nIf all the error messages parsed so far have been processed already,\nthe message buffer is checked for new ones.\n\nA prefix ARG specifies how many error messages to move;\nnegative means move back to previous error messages.\nJust \\\\[universal-argument] as a prefix means reparse the error message buffer\nand start at the first error.\n\nThe RESET argument specifies that we should restart from the beginning.\n\n\\\\[next-error] normally uses the most recently started\ncompilation, grep, or occur buffer. It can also operate on any\nbuffer with output from the \\\\[compile], \\\\[grep] commands, or,\nmore generally, on any buffer in Compilation mode or with\nCompilation Minor mode enabled, or any buffer in which\n`next-error-function' is bound to an appropriate function.\nTo specify use of a particular buffer for error messages, type\n\\\\[next-error] in that buffer when it is the only one displayed\nin the current frame.\n\nOnce \\\\[next-error] has chosen the buffer for error messages, it\nruns `next-error-hook' with `run-hooks', and stays with that buffer\nuntil you use it in some other buffer which uses Compilation mode\nor Compilation Minor mode.\n\nTo control which errors are matched, customize the variable\n`compilation-error-regexp-alist'.\"\n (interactive \"P\")\n (if (consp arg) (setq reset t arg nil))\n (when (setq next-error-last-buffer (next-error-find-buffer))\n ;; we know here that next-error-function is a valid symbol we can funcall\n (with-current-buffer next-error-last-buffer\n (funcall next-error-function (prefix-numeric-value arg) reset)\n (when next-error-recenter\n (recenter next-error-recenter))\n (run-hooks 'next-error-hook))))\n\n(defun next-error-internal ()\n \"Visit the source code corresponding to the `next-error' message at point.\"\n (setq next-error-last-buffer (current-buffer))\n ;; we know here that next-error-function is a valid symbol we can funcall\n (with-current-buffer next-error-last-buffer\n (funcall next-error-function 0 nil)\n (when next-error-recenter\n (recenter next-error-recenter))\n (run-hooks 'next-error-hook)))\n\n(defalias 'goto-next-locus 'next-error)\n(defalias 'next-match 'next-error)\n\n(defun previous-error (&optional n)\n \"Visit previous `next-error' message and corresponding source code.\n\nPrefix arg N says how many error messages to move backwards (or\nforwards, if negative).\n\nThis operates on the output from the \\\\[compile] and \\\\[grep] commands.\"\n (interactive \"p\")\n (next-error (- (or n 1))))\n\n(defun first-error (&optional n)\n \"Restart at the first error.\nVisit corresponding source code.\nWith prefix arg N, visit the source code of the Nth error.\nThis operates on the output from the \\\\[compile] command, for instance.\"\n (interactive \"p\")\n (next-error n t))\n\n(defun next-error-no-select (&optional n)\n \"Move point to the next error in the `next-error' buffer and highlight match.\nPrefix arg N says how many error messages to move forwards (or\nbackwards, if negative).\nFinds and highlights the source line like \\\\[next-error], but does not\nselect the source buffer.\"\n (interactive \"p\")\n (let ((next-error-highlight next-error-highlight-no-select))\n (next-error n))\n (pop-to-buffer next-error-last-buffer))\n\n(defun previous-error-no-select (&optional n)\n \"Move point to the previous error in the `next-error' buffer and highlight match.\nPrefix arg N says how many error messages to move backwards (or\nforwards, if negative).\nFinds and highlights the source line like \\\\[previous-error], but does not\nselect the source buffer.\"\n (interactive \"p\")\n (next-error-no-select (- (or n 1))))\n\n;; Internal variable for `next-error-follow-mode-post-command-hook'.\n(defvar next-error-follow-last-line nil)\n\n(define-minor-mode next-error-follow-minor-mode\n \"Minor mode for compilation, occur and diff modes.\nWith a prefix argument ARG, enable mode if ARG is positive, and\ndisable it otherwise. If called from Lisp, enable mode if ARG is\nomitted or nil.\nWhen turned on, cursor motion in the compilation, grep, occur or diff\nbuffer causes automatic display of the corresponding source code location.\"\n :group 'next-error :init-value nil :lighter \" Fol\"\n (if (not next-error-follow-minor-mode)\n (remove-hook 'post-command-hook 'next-error-follow-mode-post-command-hook t)\n (add-hook 'post-command-hook 'next-error-follow-mode-post-command-hook nil t)\n (make-local-variable 'next-error-follow-last-line)))\n\n;; Used as a `post-command-hook' by `next-error-follow-mode'\n;; for the *Compilation* *grep* and *Occur* buffers.\n(defun next-error-follow-mode-post-command-hook ()\n (unless (equal next-error-follow-last-line (line-number-at-pos))\n (setq next-error-follow-last-line (line-number-at-pos))\n (condition-case nil\n\t(let ((compilation-context-lines nil))\n\t (setq compilation-current-error (point))\n\t (next-error-no-select 0))\n (error t))))\n\n\f\n;;;\n\n(defun fundamental-mode ()\n \"Major mode not specialized for anything in particular.\nOther major modes are defined by comparison with this one.\"\n (interactive)\n (kill-all-local-variables)\n (run-mode-hooks))\n\n;; Special major modes to view specially formatted data rather than files.\n\n(defvar special-mode-map\n (let ((map (make-sparse-keymap)))\n (suppress-keymap map)\n (define-key map \"q\" 'quit-window)\n (define-key map \" \" 'scroll-up-command)\n (define-key map [?\\S-\\ ] 'scroll-down-command)\n (define-key map \"\\C-?\" 'scroll-down-command)\n (define-key map \"?\" 'describe-mode)\n (define-key map \"h\" 'describe-mode)\n (define-key map \">\" 'end-of-buffer)\n (define-key map \"<\" 'beginning-of-buffer)\n (define-key map \"g\" 'revert-buffer)\n map))\n\n(put 'special-mode 'mode-class 'special)\n(define-derived-mode special-mode nil \"Special\"\n \"Parent major mode from which special major modes should inherit.\"\n (setq buffer-read-only t))\n\n;; Making and deleting lines.\n\n(defvar self-insert-uses-region-functions nil\n \"Special hook to tell if `self-insert-command' will use the region.\nIt must be called via `run-hook-with-args-until-success' with no arguments.\n\nIf any function on this hook returns a non-nil value, `delete-selection-mode'\nwill act on that value (see `delete-selection-helper'), and will\nusually delete the region. If all the functions on this hook return\nnil, it is an indiction that `self-insert-command' needs the region\nuntouched by `delete-selection-mode', and will itself do whatever is\nappropriate with the region.\nAny function on `post-self-insert-hook' which act on the region should\nadd a function to this hook so that `delete-selection-mode' could\nrefrain from deleting the region before `post-self-insert-hook'\nfunctions are called.\nThis hook is run by `delete-selection-uses-region-p', which see.\")\n\n(defvar hard-newline (propertize \"\\n\" 'hard t 'rear-nonsticky '(hard))\n \"Propertized string representing a hard newline character.\")\n\n(defun newline (&optional arg interactive)\n \"Insert a newline, and move to left margin of the new line if it's blank.\nIf option `use-hard-newlines' is non-nil, the newline is marked with the\ntext-property `hard'.\nWith ARG, insert that many newlines.\n\nIf `electric-indent-mode' is enabled, this indents the final new line\nthat it adds, and reindents the preceding line. To just insert\na newline, use \\\\[electric-indent-just-newline].\n\nCalls `auto-fill-function' if the current column number is greater\nthan the value of `fill-column' and ARG is nil.\nA non-nil INTERACTIVE argument means to run the `post-self-insert-hook'.\"\n (interactive \"*P\\np\")\n (barf-if-buffer-read-only)\n ;; Call self-insert so that auto-fill, abbrev expansion etc. happens.\n ;; Set last-command-event to tell self-insert what to insert.\n (let* ((was-page-start (and (bolp) (looking-at page-delimiter)))\n (beforepos (point))\n (last-command-event ?\\n)\n ;; Don't auto-fill if we have a numeric argument.\n (auto-fill-function (if arg nil auto-fill-function))\n (arg (prefix-numeric-value arg))\n (postproc\n ;; Do the rest in post-self-insert-hook, because we want to do it\n ;; *before* other functions on that hook.\n (lambda ()\n ;; Mark the newline(s) `hard'.\n (if use-hard-newlines\n (set-hard-newline-properties\n (- (point) arg) (point)))\n ;; If the newline leaves the previous line blank, and we\n ;; have a left margin, delete that from the blank line.\n (save-excursion\n (goto-char beforepos)\n (beginning-of-line)\n (and (looking-at \"[ \\t]$\")\n (> (current-left-margin) 0)\n (delete-region (point)\n (line-end-position))))\n ;; Indent the line after the newline, except in one case:\n ;; when we added the newline at the beginning of a line which\n ;; starts a page.\n (or was-page-start\n (move-to-left-margin nil t)))))\n (if (not interactive)\n\t;; FIXME: For non-interactive uses, many calls actually\n\t;; just want (insert \"\\n\"), so maybe we should do just\n\t;; that, so as to avoid the risk of filling or running\n\t;; abbrevs unexpectedly.\n\t(let ((post-self-insert-hook (list postproc)))\n\t (self-insert-command arg))\n (unwind-protect\n\t (progn\n\t (add-hook 'post-self-insert-hook postproc nil t)\n\t (self-insert-command arg))\n\t;; We first used let-binding to protect the hook, but that\n\t;; was naive since add-hook affects the symbol-default\n\t;; value of the variable, whereas the let-binding might\n\t;; only protect the buffer-local value.\n\t(remove-hook 'post-self-insert-hook postproc t))))\n nil)\n\n(defun set-hard-newline-properties (from to)\n (let ((sticky (get-text-property from 'rear-nonsticky)))\n (put-text-property from to 'hard 't)\n ;; If rear-nonsticky is not \"t\", add 'hard to rear-nonsticky list\n (if (and (listp sticky) (not (memq 'hard sticky)))\n\t(put-text-property from (point) 'rear-nonsticky\n\t\t\t (cons 'hard sticky)))))\n\n(defun open-line (n)\n \"Insert a newline and leave point before it.\nIf there is a fill prefix and/or a `left-margin', insert them on\nthe new line if the line would have been blank.\nWith arg N, insert N newlines.\"\n (interactive \"*p\")\n (let* ((do-fill-prefix (and fill-prefix (bolp)))\n\t (do-left-margin (and (bolp) (> (current-left-margin) 0)))\n\t (loc (point-marker))\n ;; Don't expand an abbrev before point.\n\t (abbrev-mode nil))\n (newline n)\n (goto-char loc)\n (while (> n 0)\n (cond ((bolp)\n\t (if do-left-margin (indent-to (current-left-margin)))\n\t (if do-fill-prefix (insert-and-inherit fill-prefix))))\n (forward-line 1)\n (setq n (1- n)))\n (goto-char loc)\n ;; Necessary in case a margin or prefix was inserted.\n (end-of-line)))\n\n(defun split-line (&optional arg)\n \"Split current line, moving portion beyond point vertically down.\nIf the current line starts with `fill-prefix', insert it on the new\nline as well. With prefix ARG, don't insert `fill-prefix' on new line.\n\nWhen called from Lisp code, ARG may be a prefix string to copy.\"\n (interactive \"*P\")\n (skip-chars-forward \" \\t\")\n (let* ((col (current-column))\n\t (pos (point))\n\t ;; What prefix should we check for (nil means don't).\n\t (prefix (cond ((stringp arg) arg)\n\t\t (arg nil)\n\t\t (t fill-prefix)))\n\t ;; Does this line start with it?\n\t (have-prfx (and prefix\n\t\t\t (save-excursion\n\t\t\t (beginning-of-line)\n\t\t\t (looking-at (regexp-quote prefix))))))\n (newline 1)\n (if have-prfx (insert-and-inherit prefix))\n (indent-to col 0)\n (goto-char pos)))\n\n(defun delete-indentation (&optional arg)\n \"Join this line to previous and fix up whitespace at join.\nIf there is a fill prefix, delete it from the beginning of this line.\nWith argument, join this line to following line.\"\n (interactive \"*P\")\n (beginning-of-line)\n (if arg (forward-line 1))\n (if (eq (preceding-char) ?\\n)\n (progn\n\t(delete-region (point) (1- (point)))\n\t;; If the second line started with the fill prefix,\n\t;; delete the prefix.\n\t(if (and fill-prefix\n\t\t (<= (+ (point) (length fill-prefix)) (point-max))\n\t\t (string= fill-prefix\n\t\t\t (buffer-substring (point)\n\t\t\t\t\t (+ (point) (length fill-prefix)))))\n\t (delete-region (point) (+ (point) (length fill-prefix))))\n\t(fixup-whitespace))))\n\n(defalias 'join-line #'delete-indentation) ; easier to find\n\n(defun delete-blank-lines ()\n \"On blank line, delete all surrounding blank lines, leaving just one.\nOn isolated blank line, delete that one.\nOn nonblank line, delete any immediately following blank lines.\"\n (interactive \"*\")\n (let (thisblank singleblank)\n (save-excursion\n (beginning-of-line)\n (setq thisblank (looking-at \"[ \\t]*$\"))\n ;; Set singleblank if there is just one blank line here.\n (setq singleblank\n\t (and thisblank\n\t\t (not (looking-at \"[ \\t]*\\n[ \\t]*$\"))\n\t\t (or (bobp)\n\t\t (progn (forward-line -1)\n\t\t\t (not (looking-at \"[ \\t]*$\")))))))\n ;; Delete preceding blank lines, and this one too if it's the only one.\n (if thisblank\n\t(progn\n\t (beginning-of-line)\n\t (if singleblank (forward-line 1))\n\t (delete-region (point)\n\t\t\t (if (re-search-backward \"[^ \\t\\n]\" nil t)\n\t\t\t (progn (forward-line 1) (point))\n\t\t\t (point-min)))))\n ;; Delete following blank lines, unless the current line is blank\n ;; and there are no following blank lines.\n (if (not (and thisblank singleblank))\n\t(save-excursion\n\t (end-of-line)\n\t (forward-line 1)\n\t (delete-region (point)\n\t\t\t (if (re-search-forward \"[^ \\t\\n]\" nil t)\n\t\t\t (progn (beginning-of-line) (point))\n\t\t\t (point-max)))))\n ;; Handle the special case where point is followed by newline and eob.\n ;; Delete the line, leaving point at eob.\n (if (looking-at \"^[ \\t]*\\n\\\\'\")\n\t(delete-region (point) (point-max)))))\n\n(defcustom delete-trailing-lines t\n \"If non-nil, \\\\[delete-trailing-whitespace] deletes trailing lines.\nTrailing lines are deleted only if `delete-trailing-whitespace'\nis called on the entire buffer (rather than an active region).\"\n :type 'boolean\n :group 'editing\n :version \"24.3\")\n\n(defun region-modifiable-p (start end)\n \"Return non-nil if the region contains no read-only text.\"\n (and (not (get-text-property start 'read-only))\n (eq end (next-single-property-change start 'read-only nil end))))\n\n(defun delete-trailing-whitespace (&optional start end)\n \"Delete trailing whitespace between START and END.\nIf called interactively, START and END are the start/end of the\nregion if the mark is active, or of the buffer's accessible\nportion if the mark is inactive.\n\nThis command deletes whitespace characters after the last\nnon-whitespace character in each line between START and END. It\ndoes not consider formfeed characters to be whitespace.\n\nIf this command acts on the entire buffer (i.e. if called\ninteractively with the mark inactive, or called from Lisp with\nEND nil), it also deletes all trailing lines at the end of the\nbuffer if the variable `delete-trailing-lines' is non-nil.\"\n (interactive (progn\n (barf-if-buffer-read-only)\n (if (use-region-p)\n (list (region-beginning) (region-end))\n (list nil nil))))\n (save-match-data\n (save-excursion\n (let ((end-marker (and end (copy-marker end))))\n (goto-char (or start (point-min)))\n (with-syntax-table (make-syntax-table (syntax-table))\n ;; Don't delete formfeeds, even if they are considered whitespace.\n (modify-syntax-entry ?\\f \"_\")\n (while (re-search-forward \"\\\\s-$\" end-marker t)\n (skip-syntax-backward \"-\" (line-beginning-position))\n (let ((b (point)) (e (match-end 0)))\n (when (region-modifiable-p b e)\n (delete-region b e)))))\n (if end\n (set-marker end-marker nil)\n ;; Delete trailing empty lines.\n (and delete-trailing-lines\n ;; Really the end of buffer.\n (= (goto-char (point-max)) (1+ (buffer-size)))\n (<= (skip-chars-backward \"\\n\") -2)\n (region-modifiable-p (1+ (point)) (point-max))\n (delete-region (1+ (point)) (point-max)))))))\n ;; Return nil for the benefit of `write-file-functions'.\n nil)\n\n(defun newline-and-indent ()\n \"Insert a newline, then indent according to major mode.\nIndentation is done using the value of `indent-line-function'.\nIn programming language modes, this is the same as TAB.\nIn some text modes, where TAB inserts a tab, this command indents to the\ncolumn specified by the function `current-left-margin'.\"\n (interactive \"*\")\n (delete-horizontal-space t)\n (newline nil t)\n (indent-according-to-mode))\n\n(defun reindent-then-newline-and-indent ()\n \"Reindent current line, insert newline, then indent the new line.\nIndentation of both lines is done according to the current major mode,\nwhich means calling the current value of `indent-line-function'.\nIn programming language modes, this is the same as TAB.\nIn some text modes, where TAB inserts a tab, this indents to the\ncolumn specified by the function `current-left-margin'.\"\n (interactive \"*\")\n (let ((pos (point)))\n ;; Be careful to insert the newline before indenting the line.\n ;; Otherwise, the indentation might be wrong.\n (newline)\n (save-excursion\n (goto-char pos)\n ;; We are at EOL before the call to indent-according-to-mode, and\n ;; after it we usually are as well, but not always. We tried to\n ;; address it with `save-excursion' but that uses a normal marker\n ;; whereas we need `move after insertion', so we do the save/restore\n ;; by hand.\n (setq pos (copy-marker pos t))\n (indent-according-to-mode)\n (goto-char pos)\n ;; Remove the trailing white-space after indentation because\n ;; indentation may introduce the whitespace.\n (delete-horizontal-space t))\n (indent-according-to-mode)))\n\n(defcustom read-quoted-char-radix 8\n \"Radix for \\\\[quoted-insert] and other uses of `read-quoted-char'.\nLegitimate radix values are 8, 10 and 16.\"\n :type '(choice (const 8) (const 10) (const 16))\n :group 'editing-basics)\n\n(defun read-quoted-char (&optional prompt)\n \"Like `read-char', but do not allow quitting.\nAlso, if the first character read is an octal digit,\nwe read any number of octal digits and return the\nspecified character code. Any nondigit terminates the sequence.\nIf the terminator is RET, it is discarded;\nany other terminator is used itself as input.\n\nThe optional argument PROMPT specifies a string to use to prompt the user.\nThe variable `read-quoted-char-radix' controls which radix to use\nfor numeric input.\"\n (let ((message-log-max nil)\n\t(help-events (delq nil (mapcar (lambda (c) (unless (characterp c) c))\n\t\t\t\t help-event-list)))\n\tdone (first t) (code 0) char translated)\n (while (not done)\n (let ((inhibit-quit first)\n\t ;; Don't let C-h or other help chars get the help\n\t ;; message--only help function keys. See bug#16617.\n\t (help-char nil)\n\t (help-event-list help-events)\n\t (help-form\n\t \"Type the special character you want to use,\nor the octal character code.\nRET terminates the character code and is discarded;\nany other non-digit terminates the character code and is then used as input.\"))\n\t(setq char (read-event (and prompt (format \"%s-\" prompt)) t))\n\t(if inhibit-quit (setq quit-flag nil)))\n ;; Translate TAB key into control-I ASCII character, and so on.\n ;; Note: `read-char' does it using the `ascii-character' property.\n ;; We tried using read-key instead, but that disables the keystroke\n ;; echo produced by 'C-q', see bug#24635.\n (let ((translation (lookup-key local-function-key-map (vector char))))\n\t(setq translated (if (arrayp translation)\n\t\t\t (aref translation 0)\n\t\t\t char)))\n (if (integerp translated)\n\t (setq translated (char-resolve-modifiers translated)))\n (cond ((null translated))\n\t ((not (integerp translated))\n\t (setq unread-command-events (list char)\n\t\t done t))\n\t ((/= (logand translated ?\\M-\\^@) 0)\n\t ;; Turn a meta-character into a character with the 0200 bit set.\n\t (setq code (logior (logand translated (lognot ?\\M-\\^@)) 128)\n\t\t done t))\n\t ((and (<= ?0 translated)\n (< translated (+ ?0 (min 10 read-quoted-char-radix))))\n\t (setq code (+ (* code read-quoted-char-radix) (- translated ?0)))\n\t (and prompt (setq prompt (message \"%s %c\" prompt translated))))\n\t ((and (<= ?a (downcase translated))\n\t\t (< (downcase translated)\n (+ ?a -10 (min 36 read-quoted-char-radix))))\n\t (setq code (+ (* code read-quoted-char-radix)\n\t\t\t (+ 10 (- (downcase translated) ?a))))\n\t (and prompt (setq prompt (message \"%s %c\" prompt translated))))\n\t ((and (not first) (eq translated ?\\C-m))\n\t (setq done t))\n\t ((not first)\n\t (setq unread-command-events (list char)\n\t\t done t))\n\t (t (setq code translated\n\t\t done t)))\n (setq first nil))\n code))\n\n(defun quoted-insert (arg)\n \"Read next input character and insert it.\nThis is useful for inserting control characters.\nWith argument, insert ARG copies of the character.\n\nIf the first character you type after this command is an octal digit,\nyou should type a sequence of octal digits which specify a character code.\nAny nondigit terminates the sequence. If the terminator is a RET,\nit is discarded; any other terminator is used itself as input.\nThe variable `read-quoted-char-radix' specifies the radix for this feature;\nset it to 10 or 16 to use decimal or hex instead of octal.\n\nIn overwrite mode, this function inserts the character anyway, and\ndoes not handle octal digits specially. This means that if you use\noverwrite as your normal editing mode, you can use this function to\ninsert characters when necessary.\n\nIn binary overwrite mode, this function does overwrite, and octal\ndigits are interpreted as a character code. This is intended to be\nuseful for editing binary files.\"\n (interactive \"*p\")\n (let* ((char\n\t ;; Avoid \"obsolete\" warnings for translation-table-for-input.\n\t (with-no-warnings\n\t (let (translation-table-for-input input-method-function)\n\t (if (or (not overwrite-mode)\n\t\t (eq overwrite-mode 'overwrite-mode-binary))\n\t\t (read-quoted-char)\n\t\t(read-char))))))\n ;; This used to assume character codes 0240 - 0377 stand for\n ;; characters in some single-byte character set, and converted them\n ;; to Emacs characters. But in 23.1 this feature is deprecated\n ;; in favor of inserting the corresponding Unicode characters.\n ;; (if (and enable-multibyte-characters\n ;; (>= char ?\\240)\n ;; (<= char ?\\377))\n ;; (setq char (unibyte-char-to-multibyte char)))\n (unless (characterp char)\n (user-error \"%s is not a valid character\"\n\t\t (key-description (vector char))))\n (if (> arg 0)\n\t(if (eq overwrite-mode 'overwrite-mode-binary)\n\t (delete-char arg)))\n (while (> arg 0)\n (insert-and-inherit char)\n (setq arg (1- arg)))))\n\n(defun forward-to-indentation (&optional arg)\n \"Move forward ARG lines and position at first nonblank character.\"\n (interactive \"^p\")\n (forward-line (or arg 1))\n (skip-chars-forward \" \\t\"))\n\n(defun backward-to-indentation (&optional arg)\n \"Move backward ARG lines and position at first nonblank character.\"\n (interactive \"^p\")\n (forward-line (- (or arg 1)))\n (skip-chars-forward \" \\t\"))\n\n(defun back-to-indentation ()\n \"Move point to the first non-whitespace character on this line.\"\n (interactive \"^\")\n (beginning-of-line 1)\n (skip-syntax-forward \" \" (line-end-position))\n ;; Move back over chars that have whitespace syntax but have the p flag.\n (backward-prefix-chars))\n\n(defun fixup-whitespace ()\n \"Fixup white space between objects around point.\nLeave one space or none, according to the context.\"\n (interactive \"*\")\n (save-excursion\n (delete-horizontal-space)\n (if (or (looking-at \"^\\\\|$\\\\|\\\\s)\")\n\t (save-excursion (forward-char -1)\n\t\t\t (looking-at \"$\\\\|\\\\s(\\\\|\\\\s'\")))\n\tnil\n (insert ?\\s))))\n\n(defun delete-horizontal-space (&optional backward-only)\n \"Delete all spaces and tabs around point.\nIf BACKWARD-ONLY is non-nil, only delete them before point.\"\n (interactive \"*P\")\n (let ((orig-pos (point)))\n (delete-region\n (if backward-only\n\t orig-pos\n (progn\n\t (skip-chars-forward \" \\t\")\n\t (constrain-to-field nil orig-pos t)))\n (progn\n (skip-chars-backward \" \\t\")\n (constrain-to-field nil orig-pos)))))\n\n(defun just-one-space (&optional n)\n \"Delete all spaces and tabs around point, leaving one space (or N spaces).\nIf N is negative, delete newlines as well, leaving -N spaces.\nSee also `cycle-spacing'.\"\n (interactive \"*p\")\n (cycle-spacing n nil 'single-shot))\n\n(defvar cycle-spacing--context nil\n \"Store context used in consecutive calls to `cycle-spacing' command.\nThe first time `cycle-spacing' runs, it saves in this variable:\nits N argument, the original point position, and the original spacing\naround point.\")\n\n(defun cycle-spacing (&optional n preserve-nl-back mode)\n \"Manipulate whitespace around point in a smart way.\nIn interactive use, this function behaves differently in successive\nconsecutive calls.\n\nThe first call in a sequence acts like `just-one-space'.\nIt deletes all spaces and tabs around point, leaving one space\n\\(or N spaces). N is the prefix argument. If N is negative,\nit deletes newlines as well, leaving -N spaces.\n\\(If PRESERVE-NL-BACK is non-nil, it does not delete newlines before point.)\n\nThe second call in a sequence deletes all spaces.\n\nThe third call in a sequence restores the original whitespace (and point).\n\nIf MODE is `single-shot', it only performs the first step in the sequence.\nIf MODE is `fast' and the first step would not result in any change\n\\(i.e., there are exactly (abs N) spaces around point),\nthe function goes straight to the second step.\n\nRepeatedly calling the function with different values of N starts a\nnew sequence each time.\"\n (interactive \"*p\")\n (let ((orig-pos\t (point))\n\t(skip-characters (if (and n (< n 0)) \" \\t\\n\\r\" \" \\t\"))\n\t(num\t\t (abs (or n 1))))\n (skip-chars-backward (if preserve-nl-back \" \\t\" skip-characters))\n (constrain-to-field nil orig-pos)\n (cond\n ;; Command run for the first time, single-shot mode or different argument\n ((or (eq 'single-shot mode)\n\t (not (equal last-command this-command))\n\t (not cycle-spacing--context)\n\t (not (eq (car cycle-spacing--context) n)))\n (let* ((start (point))\n\t (num (- num (skip-chars-forward \" \" (+ num (point)))))\n\t (mid (point))\n\t (end (progn\n\t\t (skip-chars-forward skip-characters)\n\t\t (constrain-to-field nil orig-pos t))))\n\t(setq cycle-spacing--context ;; Save for later.\n\t ;; Special handling for case where there was no space at all.\n\t (unless (= start end)\n (cons n (cons orig-pos (buffer-substring start (point))))))\n\t;; If this run causes no change in buffer content, delete all spaces,\n\t;; otherwise delete all excess spaces.\n\t(delete-region (if (and (eq mode 'fast) (zerop num) (= mid end))\n\t\t\t start mid) end)\n (insert (make-string num ?\\s))))\n\n ;; Command run for the second time.\n ((not (equal orig-pos (point)))\n (delete-region (point) orig-pos))\n\n ;; Command run for the third time.\n (t\n (insert (cddr cycle-spacing--context))\n (goto-char (cadr cycle-spacing--context))\n (setq cycle-spacing--context nil)))))\n\f\n(defun beginning-of-buffer (&optional arg)\n \"Move point to the beginning of the buffer.\nWith numeric arg N, put point N/10 of the way from the beginning.\nIf the buffer is narrowed, this command uses the beginning of the\naccessible part of the buffer.\n\nPush mark at previous position, unless either a \\\\[universal-argument] prefix\nis supplied, or Transient Mark mode is enabled and the mark is active.\"\n (declare (interactive-only \"use `(goto-char (point-min))' instead.\"))\n (interactive \"^P\")\n (or (consp arg)\n (region-active-p)\n (push-mark))\n (let ((size (- (point-max) (point-min))))\n (goto-char (if (and arg (not (consp arg)))\n\t\t (+ (point-min)\n\t\t (if (> size 10000)\n\t\t\t ;; Avoid overflow for large buffer sizes!\n\t\t\t (* (prefix-numeric-value arg)\n\t\t\t (/ size 10))\n\t\t\t(/ (+ 10 (* size (prefix-numeric-value arg))) 10)))\n\t\t (point-min))))\n (if (and arg (not (consp arg))) (forward-line 1)))\n\n(defun end-of-buffer (&optional arg)\n \"Move point to the end of the buffer.\nWith numeric arg N, put point N/10 of the way from the end.\nIf the buffer is narrowed, this command uses the end of the\naccessible part of the buffer.\n\nPush mark at previous position, unless either a \\\\[universal-argument] prefix\nis supplied, or Transient Mark mode is enabled and the mark is active.\"\n (declare (interactive-only \"use `(goto-char (point-max))' instead.\"))\n (interactive \"^P\")\n (or (consp arg) (region-active-p) (push-mark))\n (let ((size (- (point-max) (point-min))))\n (goto-char (if (and arg (not (consp arg)))\n\t\t (- (point-max)\n\t\t (if (> size 10000)\n\t\t\t ;; Avoid overflow for large buffer sizes!\n\t\t\t (* (prefix-numeric-value arg)\n\t\t\t (/ size 10))\n\t\t\t(/ (* size (prefix-numeric-value arg)) 10)))\n\t\t (point-max))))\n ;; If we went to a place in the middle of the buffer,\n ;; adjust it to the beginning of a line.\n (cond ((and arg (not (consp arg))) (forward-line 1))\n\t((and (eq (current-buffer) (window-buffer))\n (> (point) (window-end nil t)))\n\t ;; If the end of the buffer is not already on the screen,\n\t ;; then scroll specially to put it near, but not at, the bottom.\n\t (overlay-recenter (point))\n\t (recenter -3))))\n\n(defcustom delete-active-region t\n \"Whether single-char deletion commands delete an active region.\nThis has an effect only if Transient Mark mode is enabled, and\naffects `delete-forward-char' and `delete-backward-char', though\nnot `delete-char'.\n\nIf the value is the symbol `kill', the active region is killed\ninstead of deleted.\"\n :type '(choice (const :tag \"Delete active region\" t)\n (const :tag \"Kill active region\" kill)\n (const :tag \"Do ordinary deletion\" nil))\n :group 'killing\n :version \"24.1\")\n\n(defvar region-extract-function\n (lambda (method)\n (when (region-beginning)\n (cond\n ((eq method 'bounds)\n (list (cons (region-beginning) (region-end))))\n ((eq method 'delete-only)\n (delete-region (region-beginning) (region-end)))\n (t\n (filter-buffer-substring (region-beginning) (region-end) method)))))\n \"Function to get the region's content.\nCalled with one argument METHOD which can be:\n- nil: return the content as a string.\n- `delete-only': delete the region; the return value is undefined.\n- `bounds': return the boundaries of the region as a list of cons\n cells of the form (START . END).\n- anything else: delete the region and return its content\n as a string, after filtering it with `filter-buffer-substring', which\n is called with METHOD as its 3rd argument.\")\n\n(defvar region-insert-function\n (lambda (lines)\n (let ((first t))\n (while lines\n (or first\n (insert ?\\n))\n (insert-for-yank (car lines))\n (setq lines (cdr lines)\n first nil))))\n \"Function to insert the region's content.\nCalled with one argument LINES.\nInsert the region as a list of lines.\")\n\n(defun delete-backward-char (n &optional killflag)\n \"Delete the previous N characters (following if N is negative).\nIf Transient Mark mode is enabled, the mark is active, and N is 1,\ndelete the text in the region and deactivate the mark instead.\nTo disable this, set option `delete-active-region' to nil.\n\nOptional second arg KILLFLAG, if non-nil, means to kill (save in\nkill ring) instead of delete. Interactively, N is the prefix\narg, and KILLFLAG is set if N is explicitly specified.\n\nWhen killing, the killed text is filtered by\n`filter-buffer-substring' before it is saved in the kill ring, so\nthe actual saved text might be different from what was killed.\n\nIn Overwrite mode, single character backward deletion may replace\ntabs with spaces so as to back over columns, unless point is at\nthe end of the line.\"\n (declare (interactive-only delete-char))\n (interactive \"p\\nP\")\n (unless (integerp n)\n (signal 'wrong-type-argument (list 'integerp n)))\n (cond ((and (use-region-p)\n\t delete-active-region\n\t (= n 1))\n\t ;; If a region is active, kill or delete it.\n\t (if (eq delete-active-region 'kill)\n\t (kill-region (region-beginning) (region-end) 'region)\n (funcall region-extract-function 'delete-only)))\n\t;; In Overwrite mode, maybe untabify while deleting\n\t((null (or (null overwrite-mode)\n\t\t (<= n 0)\n\t\t (memq (char-before) '(?\\t ?\\n))\n\t\t (eobp)\n\t\t (eq (char-after) ?\\n)))\n\t (let ((ocol (current-column)))\n (delete-char (- n) killflag)\n\t (save-excursion\n\t (insert-char ?\\s (- ocol (current-column)) nil))))\n\t;; Otherwise, do simple deletion.\n\t(t (delete-char (- n) killflag))))\n\n(defun delete-forward-char (n &optional killflag)\n \"Delete the following N characters (previous if N is negative).\nIf Transient Mark mode is enabled, the mark is active, and N is 1,\ndelete the text in the region and deactivate the mark instead.\nTo disable this, set variable `delete-active-region' to nil.\n\nOptional second arg KILLFLAG non-nil means to kill (save in kill\nring) instead of delete. Interactively, N is the prefix arg, and\nKILLFLAG is set if N was explicitly specified.\n\nWhen killing, the killed text is filtered by\n`filter-buffer-substring' before it is saved in the kill ring, so\nthe actual saved text might be different from what was killed.\"\n (declare (interactive-only delete-char))\n (interactive \"p\\nP\")\n (unless (integerp n)\n (signal 'wrong-type-argument (list 'integerp n)))\n (cond ((and (use-region-p)\n\t delete-active-region\n\t (= n 1))\n\t ;; If a region is active, kill or delete it.\n\t (if (eq delete-active-region 'kill)\n\t (kill-region (region-beginning) (region-end) 'region)\n\t (funcall region-extract-function 'delete-only)))\n\n\t;; Otherwise, do simple deletion.\n\t(t (delete-char n killflag))))\n\n(defun mark-whole-buffer ()\n \"Put point at beginning and mark at end of buffer.\nIf narrowing is in effect, only uses the accessible part of the buffer.\nYou probably should not use this function in Lisp programs;\nit is usually a mistake for a Lisp function to use any subroutine\nthat uses or sets the mark.\"\n (declare (interactive-only t))\n (interactive)\n (push-mark)\n (push-mark (point-max) nil t)\n ;; This is really `point-min' in most cases, but if we're in the\n ;; minibuffer, this is at the end of the prompt.\n (goto-char (minibuffer-prompt-end)))\n\f\n\n;; Counting lines, one way or another.\n\n(defun goto-line (line &optional buffer)\n \"Go to LINE, counting from line 1 at beginning of buffer.\nIf called interactively, a numeric prefix argument specifies\nLINE; without a numeric prefix argument, read LINE from the\nminibuffer.\n\nIf optional argument BUFFER is non-nil, switch to that buffer and\nmove to line LINE there. If called interactively with \\\\[universal-argument]\nas argument, BUFFER is the most recently selected other buffer.\n\nPrior to moving point, this function sets the mark (without\nactivating it), unless Transient Mark mode is enabled and the\nmark is already active.\n\nThis function is usually the wrong thing to use in a Lisp program.\nWhat you probably want instead is something like:\n (goto-char (point-min))\n (forward-line (1- N))\nIf at all possible, an even better solution is to use char counts\nrather than line counts.\"\n (declare (interactive-only forward-line))\n (interactive\n (if (and current-prefix-arg (not (consp current-prefix-arg)))\n (list (prefix-numeric-value current-prefix-arg))\n ;; Look for a default, a number in the buffer at point.\n (let* ((default\n\t (save-excursion\n\t\t(skip-chars-backward \"0-9\")\n\t\t(if (looking-at \"[0-9]\")\n\t\t (string-to-number\n\t\t (buffer-substring-no-properties\n\t\t (point)\n\t\t (progn (skip-chars-forward \"0-9\")\n\t\t\t (point)))))))\n\t ;; Decide if we're switching buffers.\n\t (buffer\n\t (if (consp current-prefix-arg)\n\t\t (other-buffer (current-buffer) t)))\n\t (buffer-prompt\n\t (if buffer\n\t\t (concat \" in \" (buffer-name buffer))\n\t \"\")))\n ;; Read the argument, offering that number (if any) as default.\n (list (read-number (format \"Goto line%s: \" buffer-prompt)\n (list default (line-number-at-pos)))\n\t buffer))))\n ;; Switch to the desired buffer, one way or another.\n (if buffer\n (let ((window (get-buffer-window buffer)))\n\t(if window (select-window window)\n\t (switch-to-buffer-other-window buffer))))\n ;; Leave mark at previous position\n (or (region-active-p) (push-mark))\n ;; Move to the specified line number in that buffer.\n (save-restriction\n (widen)\n (goto-char (point-min))\n (if (eq selective-display t)\n\t(re-search-forward \"[\\n\\C-m]\" nil 'end (1- line))\n (forward-line (1- line)))))\n\n(defun count-words-region (start end &optional arg)\n \"Count the number of words in the region.\nIf called interactively, print a message reporting the number of\nlines, words, and characters in the region (whether or not the\nregion is active); with prefix ARG, report for the entire buffer\nrather than the region.\n\nIf called from Lisp, return the number of words between positions\nSTART and END.\"\n (interactive (if current-prefix-arg\n\t\t (list nil nil current-prefix-arg)\n\t\t (list (region-beginning) (region-end) nil)))\n (cond ((not (called-interactively-p 'any))\n\t (count-words start end))\n\t(arg\n\t (count-words--buffer-message))\n\t(t\n\t (count-words--message \"Region\" start end))))\n\n(defun count-words (start end)\n \"Count words between START and END.\nIf called interactively, START and END are normally the start and\nend of the buffer; but if the region is active, START and END are\nthe start and end of the region. Print a message reporting the\nnumber of lines, words, and chars.\n\nIf called from Lisp, return the number of words between START and\nEND, without printing any message.\"\n (interactive (list nil nil))\n (cond ((not (called-interactively-p 'any))\n\t (let ((words 0))\n\t (save-excursion\n\t (save-restriction\n\t (narrow-to-region start end)\n\t (goto-char (point-min))\n\t (while (forward-word-strictly 1)\n\t\t (setq words (1+ words)))))\n\t words))\n\t((use-region-p)\n\t (call-interactively 'count-words-region))\n\t(t\n\t (count-words--buffer-message))))\n\n(defun count-words--buffer-message ()\n (count-words--message\n (if (buffer-narrowed-p) \"Narrowed part of buffer\" \"Buffer\")\n (point-min) (point-max)))\n\n(defun count-words--message (str start end)\n (let ((lines (count-lines start end))\n\t(words (count-words start end))\n\t(chars (- end start)))\n (message \"%s has %d line%s, %d word%s, and %d character%s.\"\n\t str\n\t lines (if (= lines 1) \"\" \"s\")\n\t words (if (= words 1) \"\" \"s\")\n\t chars (if (= chars 1) \"\" \"s\"))))\n\n(define-obsolete-function-alias 'count-lines-region 'count-words-region \"24.1\")\n\n(defun what-line ()\n \"Print the current buffer line number and narrowed line number of point.\"\n (interactive)\n (let ((start (point-min))\n\t(n (line-number-at-pos)))\n (if (= start 1)\n\t(message \"Line %d\" n)\n (save-excursion\n\t(save-restriction\n\t (widen)\n\t (message \"line %d (narrowed line %d)\"\n\t\t (+ n (line-number-at-pos start) -1) n))))))\n\n(defun count-lines (start end)\n \"Return number of lines between START and END.\nThis is usually the number of newlines between them,\nbut can be one more if START is not equal to END\nand the greater of them is not at the start of a line.\"\n (save-excursion\n (save-restriction\n (narrow-to-region start end)\n (goto-char (point-min))\n (if (eq selective-display t)\n\t (save-match-data\n\t (let ((done 0))\n (while (re-search-forward \"[\\n\\C-m]\" nil t 40)\n (setq done (+ 40 done)))\n (while (re-search-forward \"[\\n\\C-m]\" nil t 1)\n (setq done (+ 1 done)))\n (goto-char (point-max))\n (if (and (/= start end)\n\t\t (not (bolp)))\n\t\t (1+ done)\n\t\tdone)))\n\t(- (buffer-size) (forward-line (buffer-size)))))))\n\n(defun line-number-at-pos (&optional pos absolute)\n \"Return buffer line number at position POS.\nIf POS is nil, use current buffer location.\n\nIf ABSOLUTE is nil, the default, counting starts\nat (point-min), so the value refers to the contents of the\naccessible portion of the (potentially narrowed) buffer. If\nABSOLUTE is non-nil, ignore any narrowing and return the\nabsolute line number.\"\n (save-restriction\n (when absolute\n (widen))\n (let ((opoint (or pos (point))) start)\n (save-excursion\n (goto-char (point-min))\n (setq start (point))\n (goto-char opoint)\n (forward-line 0)\n (1+ (count-lines start (point)))))))\n\n(defun what-cursor-position (&optional detail)\n \"Print info on cursor position (on screen and within buffer).\nAlso describe the character after point, and give its character code\nin octal, decimal and hex.\n\nFor a non-ASCII multibyte character, also give its encoding in the\nbuffer's selected coding system if the coding system encodes the\ncharacter safely. If the character is encoded into one byte, that\ncode is shown in hex. If the character is encoded into more than one\nbyte, just \\\"...\\\" is shown.\n\nIn addition, with prefix argument, show details about that character\nin *Help* buffer. See also the command `describe-char'.\"\n (interactive \"P\")\n (let* ((char (following-char))\n\t (bidi-fixer\n\t ;; If the character is one of LRE, LRO, RLE, RLO, it will\n\t ;; start a directional embedding, which could completely\n\t ;; disrupt the rest of the line (e.g., RLO will display the\n\t ;; rest of the line right-to-left). So we put an invisible\n\t ;; PDF character after these characters, to end the\n\t ;; embedding, which eliminates any effects on the rest of\n\t ;; the line. For RLE and RLO we also append an invisible\n\t ;; LRM, to avoid reordering the following numerical\n\t ;; characters. For LRI/RLI/FSI we append a PDI.\n\t (cond ((memq char '(?\\x202a ?\\x202d))\n\t\t (propertize (string ?\\x202c) 'invisible t))\n\t\t((memq char '(?\\x202b ?\\x202e))\n\t\t (propertize (string ?\\x202c ?\\x200e) 'invisible t))\n\t\t((memq char '(?\\x2066 ?\\x2067 ?\\x2068))\n\t\t (propertize (string ?\\x2069) 'invisible t))\n\t\t;; Strong right-to-left characters cause reordering of\n\t\t;; the following numerical characters which show the\n\t\t;; codepoint, so append LRM to countermand that.\n\t\t((memq (get-char-code-property char 'bidi-class) '(R AL))\n\t\t (propertize (string ?\\x200e) 'invisible t))\n\t\t(t\n\t\t \"\")))\n\t (beg (point-min))\n\t (end (point-max))\n (pos (point))\n\t (total (buffer-size))\n\t (percent (round (* 100.0 (1- pos)) (max 1 total)))\n\t (hscroll (if (= (window-hscroll) 0)\n\t\t \"\"\n\t\t (format \" Hscroll=%d\" (window-hscroll))))\n\t (col (current-column)))\n (if (= pos end)\n\t(if (or (/= beg 1) (/= end (1+ total)))\n\t (message \"point=%d of %d (%d%%) <%d-%d> column=%d%s\"\n\t\t pos total percent beg end col hscroll)\n\t (message \"point=%d of %d (EOB) column=%d%s\"\n\t\t pos total col hscroll))\n (let ((coding buffer-file-coding-system)\n\t encoded encoding-msg display-prop under-display)\n\t(if (or (not coding)\n\t\t(eq (coding-system-type coding) t))\n\t (setq coding (default-value 'buffer-file-coding-system)))\n\t(if (eq (char-charset char) 'eight-bit)\n\t (setq encoding-msg\n\t\t (format \"(%d, #o%o, #x%x, raw-byte)\" char char char))\n\t ;; Check if the character is displayed with some `display'\n\t ;; text property. In that case, set under-display to the\n\t ;; buffer substring covered by that property.\n\t (setq display-prop (get-char-property pos 'display))\n\t (if display-prop\n\t (let ((to (or (next-single-char-property-change pos 'display)\n\t\t\t (point-max))))\n\t\t(if (< to (+ pos 4))\n\t\t (setq under-display \"\")\n\t\t (setq under-display \"...\"\n\t\t\tto (+ pos 4)))\n\t\t(setq under-display\n\t\t (concat (buffer-substring-no-properties pos to)\n\t\t\t under-display)))\n\t (setq encoded (and (>= char 128) (encode-coding-char char coding))))\n\t (setq encoding-msg\n\t\t(if display-prop\n\t\t (if (not (stringp display-prop))\n\t\t\t(format \"(%d, #o%o, #x%x, part of display \\\"%s\\\")\"\n\t\t\t\tchar char char under-display)\n\t\t (format \"(%d, #o%o, #x%x, part of display \\\"%s\\\"->\\\"%s\\\")\"\n\t\t\t char char char under-display display-prop))\n\t\t (if encoded\n\t\t (format \"(%d, #o%o, #x%x, file %s)\"\n\t\t\t char char char\n\t\t\t (if (> (length encoded) 1)\n\t\t\t\t \"...\"\n\t\t\t\t(encoded-string-description encoded coding)))\n\t\t (format \"(%d, #o%o, #x%x)\" char char char)))))\n\t(if detail\n\t ;; We show the detailed information about CHAR.\n\t (describe-char (point)))\n\t(if (or (/= beg 1) (/= end (1+ total)))\n\t (message \"Char: %s%s %s point=%d of %d (%d%%) <%d-%d> column=%d%s\"\n\t\t (if (< char 256)\n\t\t\t (single-key-description char)\n\t\t (buffer-substring-no-properties (point) (1+ (point))))\n\t\t bidi-fixer\n\t\t encoding-msg pos total percent beg end col hscroll)\n\t (message \"Char: %s%s %s point=%d of %d (%d%%) column=%d%s\"\n\t\t (if enable-multibyte-characters\n\t\t (if (< char 128)\n\t\t\t (single-key-description char)\n\t\t\t (buffer-substring-no-properties (point) (1+ (point))))\n\t\t (single-key-description char))\n\t\t bidi-fixer encoding-msg pos total percent col hscroll))))))\n\f\n;; Initialize read-expression-map. It is defined at C level.\n(defvar read-expression-map\n (let ((m (make-sparse-keymap)))\n (define-key m \"\\M-\\t\" 'completion-at-point)\n ;; Might as well bind TAB to completion, since inserting a TAB char is\n ;; much too rarely useful.\n (define-key m \"\\t\" 'completion-at-point)\n (set-keymap-parent m minibuffer-local-map)\n m))\n\n(defun read-minibuffer (prompt &optional initial-contents)\n \"Return a Lisp object read using the minibuffer, unevaluated.\nPrompt with PROMPT. If non-nil, optional second arg INITIAL-CONTENTS\nis a string to insert in the minibuffer before reading.\n\\(INITIAL-CONTENTS can also be a cons of a string and an integer.\nSuch arguments are used as in `read-from-minibuffer'.)\"\n ;; Used for interactive spec `x'.\n (read-from-minibuffer prompt initial-contents minibuffer-local-map\n t 'minibuffer-history))\n\n(defun eval-minibuffer (prompt &optional initial-contents)\n \"Return value of Lisp expression read using the minibuffer.\nPrompt with PROMPT. If non-nil, optional second arg INITIAL-CONTENTS\nis a string to insert in the minibuffer before reading.\n\\(INITIAL-CONTENTS can also be a cons of a string and an integer.\nSuch arguments are used as in `read-from-minibuffer'.)\"\n ;; Used for interactive spec `X'.\n (eval (read--expression prompt initial-contents)))\n\n(defvar minibuffer-completing-symbol nil\n \"Non-nil means completing a Lisp symbol in the minibuffer.\")\n(make-obsolete-variable 'minibuffer-completing-symbol nil \"24.1\" 'get)\n\n(defvar minibuffer-default nil\n \"The current default value or list of default values in the minibuffer.\nThe functions `read-from-minibuffer' and `completing-read' bind\nthis variable locally.\")\n\n(defcustom eval-expression-print-level 4\n \"Value for `print-level' while printing value in `eval-expression'.\nA value of nil means no limit.\"\n :group 'lisp\n :type '(choice (const :tag \"No Limit\" nil) integer)\n :version \"21.1\")\n\n(defcustom eval-expression-print-length 12\n \"Value for `print-length' while printing value in `eval-expression'.\nA value of nil means no limit.\"\n :group 'lisp\n :type '(choice (const :tag \"No Limit\" nil) integer)\n :version \"21.1\")\n\n(defcustom eval-expression-debug-on-error t\n \"If non-nil set `debug-on-error' to t in `eval-expression'.\nIf nil, don't change the value of `debug-on-error'.\"\n :group 'lisp\n :type 'boolean\n :version \"21.1\")\n\n(defcustom eval-expression-print-maximum-character 127\n \"The largest integer that will be displayed as a character.\nThis affects printing by `eval-expression' (via\n`eval-expression-print-format').\"\n :group 'lisp\n :type 'integer\n :version \"26.1\")\n\n(defun eval-expression-print-format (value)\n \"If VALUE in an integer, return a specially formatted string.\nThis string will typically look like \\\" (#o1, #x1, ?\\\\C-a)\\\".\nIf VALUE is not an integer, nil is returned.\nThis function is used by commands like `eval-expression' that\ndisplay the result of expression evaluation.\"\n (when (integerp value)\n (let ((char-string\n (and (characterp value)\n (<= value eval-expression-print-maximum-character)\n (char-displayable-p value)\n (prin1-char value))))\n (if char-string\n (format \" (#o%o, #x%x, %s)\" value value char-string)\n (format \" (#o%o, #x%x)\" value value)))))\n\n(defvar eval-expression-minibuffer-setup-hook nil\n \"Hook run by `eval-expression' when entering the minibuffer.\")\n\n(defun read--expression (prompt &optional initial-contents)\n (let ((minibuffer-completing-symbol t))\n (minibuffer-with-setup-hook\n (lambda ()\n ;; FIXME: call emacs-lisp-mode?\n (add-function :before-until (local 'eldoc-documentation-function)\n #'elisp-eldoc-documentation-function)\n (eldoc-mode 1)\n (add-hook 'completion-at-point-functions\n #'elisp-completion-at-point nil t)\n (run-hooks 'eval-expression-minibuffer-setup-hook))\n (read-from-minibuffer prompt initial-contents\n read-expression-map t\n 'read-expression-history))))\n\n(defun eval-expression-get-print-arguments (prefix-argument)\n \"Get arguments for commands that print an expression result.\nReturns a list (INSERT-VALUE NO-TRUNCATE CHAR-PRINT-LIMIT)\nbased on PREFIX-ARG. This function determines the interpretation\nof the prefix argument for `eval-expression' and\n`eval-last-sexp'.\"\n (let ((num (prefix-numeric-value prefix-argument)))\n (list (not (memq prefix-argument '(- nil)))\n (= num 0)\n (cond ((not (memq prefix-argument '(0 -1 - nil))) nil)\n ((= num -1) most-positive-fixnum)\n (t eval-expression-print-maximum-character)))))\n\n;; We define this, rather than making `eval' interactive,\n;; for the sake of completion of names like eval-region, eval-buffer.\n(defun eval-expression (exp &optional insert-value no-truncate char-print-limit)\n \"Evaluate EXP and print value in the echo area.\nWhen called interactively, read an Emacs Lisp expression and\nevaluate it. Value is also consed on to front of the variable\n`values'. Optional argument INSERT-VALUE non-nil (interactively,\nwith a non `-' prefix argument) means insert the result into the\ncurrent buffer instead of printing it in the echo area.\n\nNormally, this function truncates long output according to the\nvalue of the variables `eval-expression-print-length' and\n`eval-expression-print-level'. When NO-TRUNCATE is\nnon-nil (interactively, with a prefix argument of zero), however,\nthere is no such truncation.\n\nIf the resulting value is an integer, and CHAR-PRINT-LIMIT is\nnon-nil (interactively, unless given a positive prefix argument)\nit will be printed in several additional formats (octal,\nhexadecimal, and character). The character format is only used\nif the value is below CHAR-PRINT-LIMIT (interactively, if the\nprefix argument is -1 or the value is below\n`eval-expression-print-maximum-character').\n\nRuns the hook `eval-expression-minibuffer-setup-hook' on entering the\nminibuffer.\n\nIf `eval-expression-debug-on-error' is non-nil, which is the default,\nthis command arranges for all errors to enter the debugger.\"\n (interactive\n (cons (read--expression \"Eval: \")\n (eval-expression-get-print-arguments current-prefix-arg)))\n\n (if (null eval-expression-debug-on-error)\n (push (eval exp lexical-binding) values)\n (let ((old-value (make-symbol \"t\")) new-value)\n ;; Bind debug-on-error to something unique so that we can\n ;; detect when evalled code changes it.\n (let ((debug-on-error old-value))\n\t(push (eval (macroexpand-all exp) lexical-binding) values)\n\t(setq new-value debug-on-error))\n ;; If evalled code has changed the value of debug-on-error,\n ;; propagate that change to the global binding.\n (unless (eq old-value new-value)\n\t(setq debug-on-error new-value))))\n\n (let ((print-length (unless no-truncate eval-expression-print-length))\n (print-level (unless no-truncate eval-expression-print-level))\n (eval-expression-print-maximum-character char-print-limit)\n (deactivate-mark))\n (let ((out (if insert-value (current-buffer) t)))\n (prog1\n (prin1 (car values) out)\n (let ((str (and char-print-limit\n (eval-expression-print-format (car values)))))\n (when str (princ str out)))))))\n\n(defun edit-and-eval-command (prompt command)\n \"Prompting with PROMPT, let user edit COMMAND and eval result.\nCOMMAND is a Lisp expression. Let user edit that expression in\nthe minibuffer, then read and evaluate the result.\"\n (let ((command\n\t (let ((print-level nil)\n\t (minibuffer-history-sexp-flag (1+ (minibuffer-depth))))\n\t (unwind-protect\n\t (read-from-minibuffer prompt\n\t\t\t\t (prin1-to-string command)\n\t\t\t\t read-expression-map t\n\t\t\t\t 'command-history)\n\t ;; If command was added to command-history as a string,\n\t ;; get rid of that. We want only evaluable expressions there.\n\t (if (stringp (car command-history))\n\t\t (setq command-history (cdr command-history)))))))\n\n ;; If command to be redone does not match front of history,\n ;; add it to the history.\n (or (equal command (car command-history))\n\t(setq command-history (cons command command-history)))\n (eval command)))\n\n(defun repeat-complex-command (arg)\n \"Edit and re-evaluate last complex command, or ARGth from last.\nA complex command is one which used the minibuffer.\nThe command is placed in the minibuffer as a Lisp form for editing.\nThe result is executed, repeating the command as changed.\nIf the command has been changed or is not the most recent previous\ncommand it is added to the front of the command history.\nYou can use the minibuffer history commands \\\n\\\\\\\\[next-history-element] and \\\\[previous-history-element]\nto get different commands to edit and resubmit.\"\n (interactive \"p\")\n (let ((elt (nth (1- arg) command-history))\n\tnewcmd)\n (if elt\n\t(progn\n\t (setq newcmd\n\t\t(let ((print-level nil)\n\t\t (minibuffer-history-position arg)\n\t\t (minibuffer-history-sexp-flag (1+ (minibuffer-depth))))\n\t\t (unwind-protect\n\t\t (read-from-minibuffer\n\t\t \"Redo: \" (prin1-to-string elt) read-expression-map t\n\t\t (cons 'command-history arg))\n\n\t\t ;; If command was added to command-history as a\n\t\t ;; string, get rid of that. We want only\n\t\t ;; evaluable expressions there.\n\t\t (if (stringp (car command-history))\n\t\t\t(setq command-history (cdr command-history))))))\n\n\t ;; If command to be redone does not match front of history,\n\t ;; add it to the history.\n\t (or (equal newcmd (car command-history))\n\t (setq command-history (cons newcmd command-history)))\n (apply #'funcall-interactively\n\t\t (car newcmd)\n\t\t (mapcar (lambda (e) (eval e t)) (cdr newcmd))))\n (if command-history\n\t (error \"Argument %d is beyond length of command history\" arg)\n\t(error \"There are no previous complex commands to repeat\")))))\n\n\n(defvar extended-command-history nil)\n(defvar execute-extended-command--last-typed nil)\n\n(defun read-extended-command ()\n \"Read command name to invoke in `execute-extended-command'.\"\n (minibuffer-with-setup-hook\n (lambda ()\n (add-hook 'post-self-insert-hook\n (lambda ()\n (setq execute-extended-command--last-typed\n (minibuffer-contents)))\n nil 'local)\n\t(set (make-local-variable 'minibuffer-default-add-function)\n\t (lambda ()\n\t ;; Get a command name at point in the original buffer\n\t ;; to propose it after M-n.\n\t (with-current-buffer (window-buffer (minibuffer-selected-window))\n\t\t (and (commandp (function-called-at-point))\n\t\t (format \"%S\" (function-called-at-point)))))))\n ;; Read a string, completing from and restricting to the set of\n ;; all defined commands. Don't provide any initial input.\n ;; Save the command read on the extended-command history list.\n (completing-read\n (concat (cond\n\t ((eq current-prefix-arg '-) \"- \")\n\t ((and (consp current-prefix-arg)\n\t\t (eq (car current-prefix-arg) 4)) \"C-u \")\n\t ((and (consp current-prefix-arg)\n\t\t (integerp (car current-prefix-arg)))\n\t (format \"%d \" (car current-prefix-arg)))\n\t ((integerp current-prefix-arg)\n\t (format \"%d \" current-prefix-arg)))\n\t ;; This isn't strictly correct if `execute-extended-command'\n\t ;; is bound to anything else (e.g. [menu]).\n\t ;; It could use (key-description (this-single-command-keys)),\n\t ;; but actually a prompt other than \"M-x\" would be confusing,\n\t ;; because \"M-x\" is a well-known prompt to read a command\n\t ;; and it serves as a shorthand for \"Extended command: \".\n\t \"M-x \")\n (lambda (string pred action)\n (let ((pred\n (if (memq action '(nil t))\n ;; Exclude obsolete commands from completions.\n (lambda (sym)\n (and (funcall pred sym)\n (or (equal string (symbol-name sym))\n (not (get sym 'byte-obsolete-info)))))\n pred)))\n (complete-with-action action obarray string pred)))\n #'commandp t nil 'extended-command-history)))\n\n(defcustom suggest-key-bindings t\n \"Non-nil means show the equivalent key-binding when M-x command has one.\nThe value can be a length of time to show the message for.\nIf the value is non-nil and not a number, we wait 2 seconds.\"\n :group 'keyboard\n :type '(choice (const :tag \"off\" nil)\n (integer :tag \"time\" 2)\n (other :tag \"on\")))\n\n(defcustom extended-command-suggest-shorter t\n \"If non-nil, show a shorter M-x invocation when there is one.\"\n :group 'keyboard\n :type 'boolean\n :version \"26.1\")\n\n(defun execute-extended-command--shorter-1 (name length)\n (cond\n ((zerop length) (list \"\"))\n ((equal name \"\") nil)\n (t\n (nconc (mapcar (lambda (s) (concat (substring name 0 1) s))\n (execute-extended-command--shorter-1\n (substring name 1) (1- length)))\n (when (string-match \"\\\\`\\\\(-\\\\)?[^-]*\" name)\n (execute-extended-command--shorter-1\n (substring name (match-end 0)) length))))))\n\n(defun execute-extended-command--shorter (name typed)\n (let ((candidates '())\n (max (length typed))\n (len 1)\n binding)\n (while (and (not binding)\n (progn\n (unless candidates\n (setq len (1+ len))\n (setq candidates (execute-extended-command--shorter-1\n name len)))\n ;; Don't show the help message if the binding isn't\n ;; significantly shorter than the M-x command the user typed.\n (< len (- max 5))))\n (input-pending-p) ;Dummy call to trigger input-processing, bug#23002.\n (let ((candidate (pop candidates)))\n (when (equal name\n (car-safe (completion-try-completion\n candidate obarray 'commandp len)))\n (setq binding candidate))))\n binding))\n\n(defun execute-extended-command (prefixarg &optional command-name typed)\n ;; Based on Fexecute_extended_command in keyboard.c of Emacs.\n ;; Aaron S. Hawley 2009-08-24\n \"Read a command name, then read the arguments and call the command.\nTo pass a prefix argument to the command you are\ninvoking, give a prefix argument to `execute-extended-command'.\"\n (declare (interactive-only command-execute))\n ;; FIXME: Remember the actual text typed by the user before completion,\n ;; so that we don't later on suggest the same shortening.\n (interactive\n (let ((execute-extended-command--last-typed nil))\n (list current-prefix-arg\n (read-extended-command)\n execute-extended-command--last-typed)))\n ;; Emacs<24 calling-convention was with a single `prefixarg' argument.\n (unless command-name\n (let ((current-prefix-arg prefixarg) ; for prompt\n (execute-extended-command--last-typed nil))\n (setq command-name (read-extended-command))\n (setq typed execute-extended-command--last-typed)))\n (let* ((function (and (stringp command-name) (intern-soft command-name)))\n (binding (and suggest-key-bindings\n\t\t (not executing-kbd-macro)\n\t\t (where-is-internal function overriding-local-map t))))\n (unless (commandp function)\n (error \"`%s' is not a valid command name\" command-name))\n ;; Some features, such as novice.el, rely on this-command-keys\n ;; including M-x COMMAND-NAME RET.\n (set--this-command-keys (concat \"\\M-x\" (symbol-name function) \"\\r\"))\n (setq this-command function)\n ;; Normally `real-this-command' should never be changed, but here we really\n ;; want to pretend that M-x RET is nothing more than a \"key\n ;; binding\" for , so the command the user really wanted to run is\n ;; `function' and not `execute-extended-command'. The difference is\n ;; visible in cases such as M-x RET and then C-x z (bug#11506).\n (setq real-this-command function)\n (let ((prefix-arg prefixarg))\n (command-execute function 'record))\n ;; If enabled, show which key runs this command.\n ;; But first wait, and skip the message if there is input.\n (let* ((waited\n ;; If this command displayed something in the echo area;\n ;; wait a few seconds, then display our suggestion message.\n ;; FIXME: Wait *after* running post-command-hook!\n ;; FIXME: Don't wait if execute-extended-command--shorter won't\n ;; find a better answer anyway!\n (when suggest-key-bindings\n (sit-for (cond\n ((zerop (length (current-message))) 0)\n ((numberp suggest-key-bindings) suggest-key-bindings)\n (t 2))))))\n (when (and waited (not (consp unread-command-events)))\n (unless (or (not extended-command-suggest-shorter)\n binding executing-kbd-macro (not (symbolp function))\n (<= (length (symbol-name function)) 2))\n ;; There's no binding for CMD. Let's try and find the shortest\n ;; string to use in M-x.\n ;; FIXME: Can be slow. Cache it maybe?\n (while-no-input\n (setq binding (execute-extended-command--shorter\n (symbol-name function) typed))))\n (when binding\n (with-temp-message\n (format-message \"You can run the command `%s' with %s\"\n function\n (if (stringp binding)\n (concat \"M-x \" binding \" RET\")\n (key-description binding)))\n (sit-for (if (numberp suggest-key-bindings)\n suggest-key-bindings\n 2))))))))\n\n(defun command-execute (cmd &optional record-flag keys special)\n ;; BEWARE: Called directly from the C code.\n \"Execute CMD as an editor command.\nCMD must be a symbol that satisfies the `commandp' predicate.\nOptional second arg RECORD-FLAG non-nil\nmeans unconditionally put this command in the variable `command-history'.\nOtherwise, that is done only if an arg is read using the minibuffer.\nThe argument KEYS specifies the value to use instead of (this-command-keys)\nwhen reading the arguments; if it is nil, (this-command-keys) is used.\nThe argument SPECIAL, if non-nil, means that this command is executing\na special event, so ignore the prefix argument and don't clear it.\"\n (setq debug-on-next-call nil)\n (let ((prefixarg (unless special\n ;; FIXME: This should probably be done around\n ;; pre-command-hook rather than here!\n (prog1 prefix-arg\n (setq current-prefix-arg prefix-arg)\n (setq prefix-arg nil)\n (when current-prefix-arg\n (prefix-command-update))))))\n (if (and (symbolp cmd)\n (get cmd 'disabled)\n disabled-command-function)\n ;; FIXME: Weird calling convention!\n (run-hooks 'disabled-command-function)\n (let ((final cmd))\n (while\n (progn\n (setq final (indirect-function final))\n (if (autoloadp final)\n (setq final (autoload-do-load final cmd)))))\n (cond\n ((arrayp final)\n ;; If requested, place the macro in the command history. For\n ;; other sorts of commands, call-interactively takes care of this.\n (when record-flag\n (push `(execute-kbd-macro ,final ,prefixarg) command-history)\n ;; Don't keep command history around forever.\n (when (and (numberp history-length) (> history-length 0))\n (let ((cell (nthcdr history-length command-history)))\n (if (consp cell) (setcdr cell nil)))))\n (execute-kbd-macro final prefixarg))\n (t\n ;; Pass `cmd' rather than `final', for the backtrace's sake.\n (prog1 (call-interactively cmd record-flag keys)\n (when (and (symbolp cmd)\n (get cmd 'byte-obsolete-info)\n (not (get cmd 'command-execute-obsolete-warned)))\n (put cmd 'command-execute-obsolete-warned t)\n (message \"%s\" (macroexp--obsolete-warning\n cmd (get cmd 'byte-obsolete-info) \"command\"))))))))))\n\f\n(defvar minibuffer-history nil\n \"Default minibuffer history list.\nThis is used for all minibuffer input\nexcept when an alternate history list is specified.\n\nMaximum length of the history list is determined by the value\nof `history-length', which see.\")\n(defvar minibuffer-history-sexp-flag nil\n \"Control whether history list elements are expressions or strings.\nIf the value of this variable equals current minibuffer depth,\nthey are expressions; otherwise they are strings.\n\\(That convention is designed to do the right thing for\nrecursive uses of the minibuffer.)\")\n(setq minibuffer-history-variable 'minibuffer-history)\n(setq minibuffer-history-position nil) ;; Defvar is in C code.\n(defvar minibuffer-history-search-history nil)\n\n(defvar minibuffer-text-before-history nil\n \"Text that was in this minibuffer before any history commands.\nThis is nil if there have not yet been any history commands\nin this use of the minibuffer.\")\n\n(add-hook 'minibuffer-setup-hook 'minibuffer-history-initialize)\n\n(defun minibuffer-history-initialize ()\n (setq minibuffer-text-before-history nil))\n\n(defun minibuffer-avoid-prompt (_new _old)\n \"A point-motion hook for the minibuffer, that moves point out of the prompt.\"\n (declare (obsolete cursor-intangible-mode \"25.1\"))\n (constrain-to-field nil (point-max)))\n\n(defcustom minibuffer-history-case-insensitive-variables nil\n \"Minibuffer history variables for which matching should ignore case.\nIf a history variable is a member of this list, then the\n\\\\[previous-matching-history-element] and \\\\[next-matching-history-element]\\\n commands ignore case when searching it, regardless of `case-fold-search'.\"\n :type '(repeat variable)\n :group 'minibuffer)\n\n(defun previous-matching-history-element (regexp n)\n \"Find the previous history element that matches REGEXP.\n\\(Previous history elements refer to earlier actions.)\nWith prefix argument N, search for Nth previous match.\nIf N is negative, find the next or Nth next match.\nNormally, history elements are matched case-insensitively if\n`case-fold-search' is non-nil, but an uppercase letter in REGEXP\nmakes the search case-sensitive.\nSee also `minibuffer-history-case-insensitive-variables'.\"\n (interactive\n (let* ((enable-recursive-minibuffers t)\n\t (regexp (read-from-minibuffer \"Previous element matching (regexp): \"\n\t\t\t\t\tnil\n\t\t\t\t\tminibuffer-local-map\n\t\t\t\t\tnil\n\t\t\t\t\t'minibuffer-history-search-history\n\t\t\t\t\t(car minibuffer-history-search-history))))\n ;; Use the last regexp specified, by default, if input is empty.\n (list (if (string= regexp \"\")\n\t (if minibuffer-history-search-history\n\t\t (car minibuffer-history-search-history)\n\t\t (user-error \"No previous history search regexp\"))\n\t regexp)\n\t (prefix-numeric-value current-prefix-arg))))\n (unless (zerop n)\n (if (and (zerop minibuffer-history-position)\n\t (null minibuffer-text-before-history))\n\t(setq minibuffer-text-before-history\n\t (minibuffer-contents-no-properties)))\n (let ((history (symbol-value minibuffer-history-variable))\n\t (case-fold-search\n\t (if (isearch-no-upper-case-p regexp t) ; assume isearch.el is dumped\n\t ;; On some systems, ignore case for file names.\n\t (if (memq minibuffer-history-variable\n\t\t\t minibuffer-history-case-insensitive-variables)\n\t\t t\n\t\t ;; Respect the user's setting for case-fold-search:\n\t\t case-fold-search)\n\t nil))\n\t prevpos\n\t match-string\n\t match-offset\n\t (pos minibuffer-history-position))\n (while (/= n 0)\n\t(setq prevpos pos)\n\t(setq pos (min (max 1 (+ pos (if (< n 0) -1 1))) (length history)))\n\t(when (= pos prevpos)\n\t (user-error (if (= pos 1)\n \"No later matching history item\"\n \"No earlier matching history item\")))\n\t(setq match-string\n\t (if (eq minibuffer-history-sexp-flag (minibuffer-depth))\n\t\t (let ((print-level nil))\n\t\t (prin1-to-string (nth (1- pos) history)))\n\t\t(nth (1- pos) history)))\n\t(setq match-offset\n\t (if (< n 0)\n\t\t (and (string-match regexp match-string)\n\t\t (match-end 0))\n\t\t(and (string-match (concat \".*\\\\(\" regexp \"\\\\)\") match-string)\n\t\t (match-beginning 1))))\n\t(when match-offset\n\t (setq n (+ n (if (< n 0) 1 -1)))))\n (setq minibuffer-history-position pos)\n (goto-char (point-max))\n (delete-minibuffer-contents)\n (insert match-string)\n (goto-char (+ (minibuffer-prompt-end) match-offset))))\n (if (memq (car (car command-history)) '(previous-matching-history-element\n\t\t\t\t\t next-matching-history-element))\n (setq command-history (cdr command-history))))\n\n(defun next-matching-history-element (regexp n)\n \"Find the next history element that matches REGEXP.\n\\(The next history element refers to a more recent action.)\nWith prefix argument N, search for Nth next match.\nIf N is negative, find the previous or Nth previous match.\nNormally, history elements are matched case-insensitively if\n`case-fold-search' is non-nil, but an uppercase letter in REGEXP\nmakes the search case-sensitive.\"\n (interactive\n (let* ((enable-recursive-minibuffers t)\n\t (regexp (read-from-minibuffer \"Next element matching (regexp): \"\n\t\t\t\t\tnil\n\t\t\t\t\tminibuffer-local-map\n\t\t\t\t\tnil\n\t\t\t\t\t'minibuffer-history-search-history\n \t\t\t\t\t(car minibuffer-history-search-history))))\n ;; Use the last regexp specified, by default, if input is empty.\n (list (if (string= regexp \"\")\n\t (if minibuffer-history-search-history\n\t\t (car minibuffer-history-search-history)\n\t\t (user-error \"No previous history search regexp\"))\n\t regexp)\n\t (prefix-numeric-value current-prefix-arg))))\n (previous-matching-history-element regexp (- n)))\n\n(defvar minibuffer-temporary-goal-position nil)\n\n(defvar minibuffer-default-add-function 'minibuffer-default-add-completions\n \"Function run by `goto-history-element' before consuming default values.\nThis is useful to dynamically add more elements to the list of default values\nwhen `goto-history-element' reaches the end of this list.\nBefore calling this function `goto-history-element' sets the variable\n`minibuffer-default-add-done' to t, so it will call this function only\nonce. In special cases, when this function needs to be called more\nthan once, it can set `minibuffer-default-add-done' to nil explicitly,\noverriding the setting of this variable to t in `goto-history-element'.\")\n\n(defvar minibuffer-default-add-done nil\n \"When nil, add more elements to the end of the list of default values.\nThe value nil causes `goto-history-element' to add more elements to\nthe list of defaults when it reaches the end of this list. It does\nthis by calling a function defined by `minibuffer-default-add-function'.\")\n\n(make-variable-buffer-local 'minibuffer-default-add-done)\n\n(defun minibuffer-default-add-completions ()\n \"Return a list of all completions without the default value.\nThis function is used to add all elements of the completion table to\nthe end of the list of defaults just after the default value.\"\n (let ((def minibuffer-default)\n\t(all (all-completions \"\"\n\t\t\t minibuffer-completion-table\n\t\t\t minibuffer-completion-predicate)))\n (if (listp def)\n\t(append def all)\n (cons def (delete def all)))))\n\n(defun goto-history-element (nabs)\n \"Puts element of the minibuffer history in the minibuffer.\nThe argument NABS specifies the absolute history position.\"\n (interactive \"p\")\n (when (and (not minibuffer-default-add-done)\n\t (functionp minibuffer-default-add-function)\n\t (< nabs (- (if (listp minibuffer-default)\n\t\t\t (length minibuffer-default)\n\t\t\t 1))))\n (setq minibuffer-default-add-done t\n\t minibuffer-default (funcall minibuffer-default-add-function)))\n (let ((minimum (if minibuffer-default\n\t\t (- (if (listp minibuffer-default)\n\t\t\t (length minibuffer-default)\n\t\t\t 1))\n\t\t 0))\n\telt minibuffer-returned-to-present)\n (if (and (zerop minibuffer-history-position)\n\t (null minibuffer-text-before-history))\n\t(setq minibuffer-text-before-history\n\t (minibuffer-contents-no-properties)))\n (if (< nabs minimum)\n\t(user-error (if minibuffer-default\n \"End of defaults; no next item\"\n \"End of history; no default available\")))\n (if (> nabs (if (listp (symbol-value minibuffer-history-variable))\n (length (symbol-value minibuffer-history-variable))\n 0))\n\t(user-error \"Beginning of history; no preceding item\"))\n (unless (memq last-command '(next-history-element\n\t\t\t\t previous-history-element))\n (let ((prompt-end (minibuffer-prompt-end)))\n\t(set (make-local-variable 'minibuffer-temporary-goal-position)\n\t (cond ((<= (point) prompt-end) prompt-end)\n\t\t ((eobp) nil)\n\t\t (t (point))))))\n (goto-char (point-max))\n (delete-minibuffer-contents)\n (setq minibuffer-history-position nabs)\n (cond ((< nabs 0)\n\t (setq elt (if (listp minibuffer-default)\n\t\t\t (nth (1- (abs nabs)) minibuffer-default)\n\t\t minibuffer-default)))\n\t ((= nabs 0)\n\t (setq elt (or minibuffer-text-before-history \"\"))\n\t (setq minibuffer-returned-to-present t)\n\t (setq minibuffer-text-before-history nil))\n\t (t (setq elt (nth (1- minibuffer-history-position)\n\t\t\t (symbol-value minibuffer-history-variable)))))\n (insert\n (if (and (eq minibuffer-history-sexp-flag (minibuffer-depth))\n\t (not minibuffer-returned-to-present))\n\t (let ((print-level nil))\n\t (prin1-to-string elt))\n elt))\n (goto-char (or minibuffer-temporary-goal-position (point-max)))))\n\n(defun next-history-element (n)\n \"Puts next element of the minibuffer history in the minibuffer.\nWith argument N, it uses the Nth following element.\"\n (interactive \"p\")\n (or (zerop n)\n (goto-history-element (- minibuffer-history-position n))))\n\n(defun previous-history-element (n)\n \"Puts previous element of the minibuffer history in the minibuffer.\nWith argument N, it uses the Nth previous element.\"\n (interactive \"p\")\n (or (zerop n)\n (goto-history-element (+ minibuffer-history-position n))))\n\n(defun next-line-or-history-element (&optional arg)\n \"Move cursor vertically down ARG lines, or to the next history element.\nWhen point moves over the bottom line of multi-line minibuffer, puts ARGth\nnext element of the minibuffer history in the minibuffer.\"\n (interactive \"^p\")\n (or arg (setq arg 1))\n (let* ((old-point (point))\n ;; Don't add newlines if they have the mode enabled globally.\n (next-line-add-newlines nil)\n\t ;; Remember the original goal column of possibly multi-line input\n\t ;; excluding the length of the prompt on the first line.\n\t (prompt-end (minibuffer-prompt-end))\n\t (old-column (unless (and (eolp) (> (point) prompt-end))\n\t\t (if (= (line-number-at-pos) 1)\n\t\t\t (max (- (current-column) (1- prompt-end)) 0)\n\t\t\t (current-column)))))\n (condition-case nil\n\t(with-no-warnings\n\t (next-line arg))\n (end-of-buffer\n ;; Restore old position since `line-move-visual' moves point to\n ;; the end of the line when it fails to go to the next line.\n (goto-char old-point)\n (next-history-element arg)\n ;; Reset `temporary-goal-column' because a correct value is not\n ;; calculated when `next-line' above fails by bumping against\n ;; the bottom of the minibuffer (bug#22544).\n (setq temporary-goal-column 0)\n ;; Restore the original goal column on the last line\n ;; of possibly multi-line input.\n (goto-char (point-max))\n (when old-column\n\t (if (= (line-number-at-pos) 1)\n\t (move-to-column (+ old-column (1- (minibuffer-prompt-end))))\n\t (move-to-column old-column)))))))\n\n(defun previous-line-or-history-element (&optional arg)\n \"Move cursor vertically up ARG lines, or to the previous history element.\nWhen point moves over the top line of multi-line minibuffer, puts ARGth\nprevious element of the minibuffer history in the minibuffer.\"\n (interactive \"^p\")\n (or arg (setq arg 1))\n (let* ((old-point (point))\n\t ;; Remember the original goal column of possibly multi-line input\n\t ;; excluding the length of the prompt on the first line.\n\t (prompt-end (minibuffer-prompt-end))\n\t (old-column (unless (and (eolp) (> (point) prompt-end))\n\t\t (if (= (line-number-at-pos) 1)\n\t\t\t (max (- (current-column) (1- prompt-end)) 0)\n\t\t\t (current-column)))))\n (condition-case nil\n\t(with-no-warnings\n\t (previous-line arg))\n (beginning-of-buffer\n ;; Restore old position since `line-move-visual' moves point to\n ;; the beginning of the line when it fails to go to the previous line.\n (goto-char old-point)\n (previous-history-element arg)\n ;; Reset `temporary-goal-column' because a correct value is not\n ;; calculated when `previous-line' above fails by bumping against\n ;; the top of the minibuffer (bug#22544).\n (setq temporary-goal-column 0)\n ;; Restore the original goal column on the first line\n ;; of possibly multi-line input.\n (goto-char (minibuffer-prompt-end))\n (if old-column\n\t (if (= (line-number-at-pos) 1)\n\t (move-to-column (+ old-column (1- (minibuffer-prompt-end))))\n\t (move-to-column old-column))\n\t ;; Put the cursor at the end of the visual line instead of the\n\t ;; logical line, so the next `previous-line-or-history-element'\n\t ;; would move to the previous history element, not to a possible upper\n\t ;; visual line from the end of logical line in `line-move-visual' mode.\n\t (end-of-visual-line)\n\t ;; Since `end-of-visual-line' puts the cursor at the beginning\n\t ;; of the next visual line, move it one char back to the end\n\t ;; of the first visual line (bug#22544).\n\t (unless (eolp) (backward-char 1)))))))\n\n(defun next-complete-history-element (n)\n \"Get next history element which completes the minibuffer before the point.\nThe contents of the minibuffer after the point are deleted, and replaced\nby the new completion.\"\n (interactive \"p\")\n (let ((point-at-start (point)))\n (next-matching-history-element\n (concat\n \"^\" (regexp-quote (buffer-substring (minibuffer-prompt-end) (point))))\n n)\n ;; next-matching-history-element always puts us at (point-min).\n ;; Move to the position we were at before changing the buffer contents.\n ;; This is still sensible, because the text before point has not changed.\n (goto-char point-at-start)))\n\n(defun previous-complete-history-element (n)\n \"\\\nGet previous history element which completes the minibuffer before the point.\nThe contents of the minibuffer after the point are deleted, and replaced\nby the new completion.\"\n (interactive \"p\")\n (next-complete-history-element (- n)))\n\n;; For compatibility with the old subr of the same name.\n(defun minibuffer-prompt-width ()\n \"Return the display width of the minibuffer prompt.\nReturn 0 if current buffer is not a minibuffer.\"\n ;; Return the width of everything before the field at the end of\n ;; the buffer; this should be 0 for normal buffers.\n (1- (minibuffer-prompt-end)))\n\f\n;; isearch minibuffer history\n(add-hook 'minibuffer-setup-hook 'minibuffer-history-isearch-setup)\n\n(defvar minibuffer-history-isearch-message-overlay)\n(make-variable-buffer-local 'minibuffer-history-isearch-message-overlay)\n\n(defun minibuffer-history-isearch-setup ()\n \"Set up a minibuffer for using isearch to search the minibuffer history.\nIntended to be added to `minibuffer-setup-hook'.\"\n (set (make-local-variable 'isearch-search-fun-function)\n 'minibuffer-history-isearch-search)\n (set (make-local-variable 'isearch-message-function)\n 'minibuffer-history-isearch-message)\n (set (make-local-variable 'isearch-wrap-function)\n 'minibuffer-history-isearch-wrap)\n (set (make-local-variable 'isearch-push-state-function)\n 'minibuffer-history-isearch-push-state)\n (add-hook 'isearch-mode-end-hook 'minibuffer-history-isearch-end nil t))\n\n(defun minibuffer-history-isearch-end ()\n \"Clean up the minibuffer after terminating isearch in the minibuffer.\"\n (if minibuffer-history-isearch-message-overlay\n (delete-overlay minibuffer-history-isearch-message-overlay)))\n\n(defun minibuffer-history-isearch-search ()\n \"Return the proper search function, for isearch in minibuffer history.\"\n (lambda (string bound noerror)\n (let ((search-fun\n\t ;; Use standard functions to search within minibuffer text\n\t (isearch-search-fun-default))\n\t found)\n ;; Avoid lazy-highlighting matches in the minibuffer prompt when\n ;; searching forward. Lazy-highlight calls this lambda with the\n ;; bound arg, so skip the minibuffer prompt.\n (if (and bound isearch-forward (< (point) (minibuffer-prompt-end)))\n\t (goto-char (minibuffer-prompt-end)))\n (or\n ;; 1. First try searching in the initial minibuffer text\n (funcall search-fun string\n\t\t(if isearch-forward bound (minibuffer-prompt-end))\n\t\tnoerror)\n ;; 2. If the above search fails, start putting next/prev history\n ;; elements in the minibuffer successively, and search the string\n ;; in them. Do this only when bound is nil (i.e. not while\n ;; lazy-highlighting search strings in the current minibuffer text).\n (unless bound\n\t (condition-case nil\n\t (progn\n\t (while (not found)\n\t\t (cond (isearch-forward\n\t\t\t(next-history-element 1)\n\t\t\t(goto-char (minibuffer-prompt-end)))\n\t\t (t\n\t\t\t(previous-history-element 1)\n\t\t\t(goto-char (point-max))))\n\t\t (setq isearch-barrier (point) isearch-opoint (point))\n\t\t ;; After putting the next/prev history element, search\n\t\t ;; the string in them again, until next-history-element\n\t\t ;; or previous-history-element raises an error at the\n\t\t ;; beginning/end of history.\n\t\t (setq found (funcall search-fun string\n\t\t\t\t (unless isearch-forward\n\t\t\t\t\t;; For backward search, don't search\n\t\t\t\t\t;; in the minibuffer prompt\n\t\t\t\t\t(minibuffer-prompt-end))\n\t\t\t\t noerror)))\n\t ;; Return point of the new search result\n\t (point))\n\t ;; Return nil when next(prev)-history-element fails\n\t (error nil)))))))\n\n(defun minibuffer-history-isearch-message (&optional c-q-hack ellipsis)\n \"Display the minibuffer history search prompt.\nIf there are no search errors, this function displays an overlay with\nthe isearch prompt which replaces the original minibuffer prompt.\nOtherwise, it displays the standard isearch message returned from\nthe function `isearch-message'.\"\n (if (not (and (minibufferp) isearch-success (not isearch-error)))\n ;; Use standard function `isearch-message' when not in the minibuffer,\n ;; or search fails, or has an error (like incomplete regexp).\n ;; This function overwrites minibuffer text with isearch message,\n ;; so it's possible to see what is wrong in the search string.\n (isearch-message c-q-hack ellipsis)\n ;; Otherwise, put the overlay with the standard isearch prompt over\n ;; the initial minibuffer prompt.\n (if (overlayp minibuffer-history-isearch-message-overlay)\n\t(move-overlay minibuffer-history-isearch-message-overlay\n\t\t (point-min) (minibuffer-prompt-end))\n (setq minibuffer-history-isearch-message-overlay\n\t (make-overlay (point-min) (minibuffer-prompt-end)))\n (overlay-put minibuffer-history-isearch-message-overlay 'evaporate t))\n (overlay-put minibuffer-history-isearch-message-overlay\n\t\t 'display (isearch-message-prefix c-q-hack ellipsis))\n ;; And clear any previous isearch message.\n (message \"\")))\n\n(defun minibuffer-history-isearch-wrap ()\n \"Wrap the minibuffer history search when search fails.\nMove point to the first history element for a forward search,\nor to the last history element for a backward search.\"\n ;; When `minibuffer-history-isearch-search' fails on reaching the\n ;; beginning/end of the history, wrap the search to the first/last\n ;; minibuffer history element.\n (if isearch-forward\n (goto-history-element (length (symbol-value minibuffer-history-variable)))\n (goto-history-element 0))\n (setq isearch-success t)\n (goto-char (if isearch-forward (minibuffer-prompt-end) (point-max))))\n\n(defun minibuffer-history-isearch-push-state ()\n \"Save a function restoring the state of minibuffer history search.\nSave `minibuffer-history-position' to the additional state parameter\nin the search status stack.\"\n (let ((pos minibuffer-history-position))\n (lambda (cmd)\n (minibuffer-history-isearch-pop-state cmd pos))))\n\n(defun minibuffer-history-isearch-pop-state (_cmd hist-pos)\n \"Restore the minibuffer history search state.\nGo to the history element by the absolute history position HIST-POS.\"\n (goto-history-element hist-pos))\n\n\f\n;Put this on C-x u, so we can force that rather than C-_ into startup msg\n(define-obsolete-function-alias 'advertised-undo 'undo \"23.2\")\n\n(defconst undo-equiv-table (make-hash-table :test 'eq :weakness t)\n \"Table mapping redo records to the corresponding undo one.\nA redo record for undo-in-region maps to t.\nA redo record for ordinary undo maps to the following (earlier) undo.\")\n\n(defvar undo-in-region nil\n \"Non-nil if `pending-undo-list' is not just a tail of `buffer-undo-list'.\")\n\n(defvar undo-no-redo nil\n \"If t, `undo' doesn't go through redo entries.\")\n\n(defvar pending-undo-list nil\n \"Within a run of consecutive undo commands, list remaining to be undone.\nIf t, we undid all the way to the end of it.\")\n\n(defun undo (&optional arg)\n \"Undo some previous changes.\nRepeat this command to undo more changes.\nA numeric ARG serves as a repeat count.\n\nIn Transient Mark mode when the mark is active, only undo changes within\nthe current region. Similarly, when not in Transient Mark mode, just \\\\[universal-argument]\nas an argument limits undo to changes within the current region.\"\n (interactive \"*P\")\n ;; Make last-command indicate for the next command that this was an undo.\n ;; That way, another undo will undo more.\n ;; If we get to the end of the undo history and get an error,\n ;; another undo command will find the undo history empty\n ;; and will get another error. To begin undoing the undos,\n ;; you must type some other command.\n (let* ((modified (buffer-modified-p))\n\t ;; For an indirect buffer, look in the base buffer for the\n\t ;; auto-save data.\n\t (base-buffer (or (buffer-base-buffer) (current-buffer)))\n\t (recent-save (with-current-buffer base-buffer\n\t\t\t(recent-auto-save-p)))\n\t message)\n ;; If we get an error in undo-start,\n ;; the next command should not be a \"consecutive undo\".\n ;; So set `this-command' to something other than `undo'.\n (setq this-command 'undo-start)\n\n (unless (and (eq last-command 'undo)\n\t\t (or (eq pending-undo-list t)\n\t\t ;; If something (a timer or filter?) changed the buffer\n\t\t ;; since the previous command, don't continue the undo seq.\n\t\t (let ((list buffer-undo-list))\n\t\t (while (eq (car list) nil)\n\t\t\t (setq list (cdr list)))\n\t\t ;; If the last undo record made was made by undo\n\t\t ;; it shows nothing else happened in between.\n\t\t (gethash list undo-equiv-table))))\n (setq undo-in-region\n\t (or (region-active-p) (and arg (not (numberp arg)))))\n (if undo-in-region\n\t (undo-start (region-beginning) (region-end))\n\t(undo-start))\n ;; get rid of initial undo boundary\n (undo-more 1))\n ;; If we got this far, the next command should be a consecutive undo.\n (setq this-command 'undo)\n ;; Check to see whether we're hitting a redo record, and if\n ;; so, ask the user whether she wants to skip the redo/undo pair.\n (let ((equiv (gethash pending-undo-list undo-equiv-table)))\n (or (eq (selected-window) (minibuffer-window))\n\t (setq message (format \"%s%s!\"\n (if (or undo-no-redo (not equiv))\n \"Undo\" \"Redo\")\n (if undo-in-region \" in region\" \"\"))))\n (when (and (consp equiv) undo-no-redo)\n\t;; The equiv entry might point to another redo record if we have done\n\t;; undo-redo-undo-redo-... so skip to the very last equiv.\n\t(while (let ((next (gethash equiv undo-equiv-table)))\n\t\t (if next (setq equiv next))))\n\t(setq pending-undo-list equiv)))\n (undo-more\n (if (numberp arg)\n\t (prefix-numeric-value arg)\n 1))\n ;; Record the fact that the just-generated undo records come from an\n ;; undo operation--that is, they are redo records.\n ;; In the ordinary case (not within a region), map the redo\n ;; record to the following undos.\n ;; I don't know how to do that in the undo-in-region case.\n (let ((list buffer-undo-list))\n ;; Strip any leading undo boundaries there might be, like we do\n ;; above when checking.\n (while (eq (car list) nil)\n\t(setq list (cdr list)))\n (puthash list\n ;; Prevent identity mapping. This can happen if\n ;; consecutive nils are erroneously in undo list.\n (if (or undo-in-region (eq list pending-undo-list))\n t\n pending-undo-list)\n\t undo-equiv-table))\n ;; Don't specify a position in the undo record for the undo command.\n ;; Instead, undoing this should move point to where the change is.\n (let ((tail buffer-undo-list)\n\t (prev nil))\n (while (car tail)\n\t(when (integerp (car tail))\n\t (let ((pos (car tail)))\n\t (if prev\n\t\t(setcdr prev (cdr tail))\n\t (setq buffer-undo-list (cdr tail)))\n\t (setq tail (cdr tail))\n\t (while (car tail)\n\t (if (eq pos (car tail))\n\t\t (if prev\n\t\t (setcdr prev (cdr tail))\n\t\t (setq buffer-undo-list (cdr tail)))\n\t\t(setq prev tail))\n\t (setq tail (cdr tail)))\n\t (setq tail nil)))\n\t(setq prev tail tail (cdr tail))))\n ;; Record what the current undo list says,\n ;; so the next command can tell if the buffer was modified in between.\n (and modified (not (buffer-modified-p))\n\t (with-current-buffer base-buffer\n\t (delete-auto-save-file-if-necessary recent-save)))\n ;; Display a message announcing success.\n (if message\n\t(message \"%s\" message))))\n\n(defun buffer-disable-undo (&optional buffer)\n \"Make BUFFER stop keeping undo information.\nNo argument or nil as argument means do this for the current buffer.\"\n (interactive)\n (with-current-buffer (if buffer (get-buffer buffer) (current-buffer))\n (setq buffer-undo-list t)))\n\n(defun undo-only (&optional arg)\n \"Undo some previous changes.\nRepeat this command to undo more changes.\nA numeric ARG serves as a repeat count.\nContrary to `undo', this will not redo a previous undo.\"\n (interactive \"*p\")\n (let ((undo-no-redo t)) (undo arg)))\n\n(defvar undo-in-progress nil\n \"Non-nil while performing an undo.\nSome change-hooks test this variable to do something different.\")\n\n(defun undo-more (n)\n \"Undo back N undo-boundaries beyond what was already undone recently.\nCall `undo-start' to get ready to undo recent changes,\nthen call `undo-more' one or more times to undo them.\"\n (or (listp pending-undo-list)\n (user-error (concat \"No further undo information\"\n (and undo-in-region \" for region\"))))\n (let ((undo-in-progress t))\n ;; Note: The following, while pulling elements off\n ;; `pending-undo-list' will call primitive change functions which\n ;; will push more elements onto `buffer-undo-list'.\n (setq pending-undo-list (primitive-undo n pending-undo-list))\n (if (null pending-undo-list)\n\t(setq pending-undo-list t))))\n\n(defun primitive-undo (n list)\n \"Undo N records from the front of the list LIST.\nReturn what remains of the list.\"\n\n ;; This is a good feature, but would make undo-start\n ;; unable to do what is expected.\n ;;(when (null (car (list)))\n ;; ;; If the head of the list is a boundary, it is the boundary\n ;; ;; preceding this command. Get rid of it and don't count it.\n ;; (setq list (cdr list))))\n\n (let ((arg n)\n ;; In a writable buffer, enable undoing read-only text that is\n ;; so because of text properties.\n (inhibit-read-only t)\n ;; Don't let `intangible' properties interfere with undo.\n (inhibit-point-motion-hooks t)\n ;; We use oldlist only to check for EQ. ++kfs\n (oldlist buffer-undo-list)\n (did-apply nil)\n (next nil))\n (while (> arg 0)\n (while (setq next (pop list)) ;Exit inner loop at undo boundary.\n ;; Handle an integer by setting point to that value.\n (pcase next\n ((pred integerp) (goto-char next))\n ;; Element (t . TIME) records previous modtime.\n ;; Preserve any flag of NONEXISTENT_MODTIME_NSECS or\n ;; UNKNOWN_MODTIME_NSECS.\n (`(t . ,time)\n ;; If this records an obsolete save\n ;; (not matching the actual disk file)\n ;; then don't mark unmodified.\n (when (or (equal time (visited-file-modtime))\n (and (consp time)\n (equal (list (car time) (cdr time))\n (visited-file-modtime))))\n (when (fboundp 'unlock-buffer)\n (unlock-buffer))\n (set-buffer-modified-p nil)))\n ;; Element (nil PROP VAL BEG . END) is property change.\n (`(nil . ,(or `(,prop ,val ,beg . ,end) pcase--dontcare))\n (when (or (> (point-min) beg) (< (point-max) end))\n (error \"Changes to be undone are outside visible portion of buffer\"))\n (put-text-property beg end prop val))\n ;; Element (BEG . END) means range was inserted.\n (`(,(and beg (pred integerp)) . ,(and end (pred integerp)))\n ;; (and `(,beg . ,end) `(,(pred integerp) . ,(pred integerp)))\n ;; Ideally: `(,(pred integerp beg) . ,(pred integerp end))\n (when (or (> (point-min) beg) (< (point-max) end))\n (error \"Changes to be undone are outside visible portion of buffer\"))\n ;; Set point first thing, so that undoing this undo\n ;; does not send point back to where it is now.\n (goto-char beg)\n (delete-region beg end))\n ;; Element (apply FUN . ARGS) means call FUN to undo.\n (`(apply . ,fun-args)\n (let ((currbuff (current-buffer)))\n (if (integerp (car fun-args))\n ;; Long format: (apply DELTA START END FUN . ARGS).\n (pcase-let* ((`(,delta ,start ,end ,fun . ,args) fun-args)\n (start-mark (copy-marker start nil))\n (end-mark (copy-marker end t)))\n (when (or (> (point-min) start) (< (point-max) end))\n (error \"Changes to be undone are outside visible portion of buffer\"))\n (apply fun args) ;; Use `save-current-buffer'?\n ;; Check that the function did what the entry\n ;; said it would do.\n (unless (and (= start start-mark)\n (= (+ delta end) end-mark))\n (error \"Changes to be undone by function different than announced\"))\n (set-marker start-mark nil)\n (set-marker end-mark nil))\n (apply fun-args))\n (unless (eq currbuff (current-buffer))\n (error \"Undo function switched buffer\"))\n (setq did-apply t)))\n ;; Element (STRING . POS) means STRING was deleted.\n (`(,(and string (pred stringp)) . ,(and pos (pred integerp)))\n (let ((valid-marker-adjustments nil)\n (apos (abs pos)))\n (when (or (< apos (point-min)) (> apos (point-max)))\n (error \"Changes to be undone are outside visible portion of buffer\"))\n ;; Check that marker adjustments which were recorded\n ;; with the (STRING . POS) record are still valid, ie\n ;; the markers haven't moved. We check their validity\n ;; before reinserting the string so as we don't need to\n ;; mind marker insertion-type.\n (while (and (markerp (car-safe (car list)))\n (integerp (cdr-safe (car list))))\n (let* ((marker-adj (pop list))\n (m (car marker-adj)))\n (and (eq (marker-buffer m) (current-buffer))\n (= apos m)\n (push marker-adj valid-marker-adjustments))))\n ;; Insert string and adjust point\n (if (< pos 0)\n (progn\n (goto-char (- pos))\n (insert string))\n (goto-char pos)\n (insert string)\n (goto-char pos))\n ;; Adjust the valid marker adjustments\n (dolist (adj valid-marker-adjustments)\n ;; Insert might have invalidated some of the markers\n ;; via modification hooks. Update only the currently\n ;; valid ones (bug#25599).\n (if (marker-buffer (car adj))\n (set-marker (car adj)\n (- (car adj) (cdr adj)))))))\n ;; (MARKER . OFFSET) means a marker MARKER was adjusted by OFFSET.\n (`(,(and marker (pred markerp)) . ,(and offset (pred integerp)))\n (warn \"Encountered %S entry in undo list with no matching (TEXT . POS) entry\"\n next)\n ;; Even though these elements are not expected in the undo\n ;; list, adjust them to be conservative for the 24.4\n ;; release. (Bug#16818)\n (when (marker-buffer marker)\n (set-marker marker\n (- marker offset)\n (marker-buffer marker))))\n (_ (error \"Unrecognized entry in undo list %S\" next))))\n (setq arg (1- arg)))\n ;; Make sure an apply entry produces at least one undo entry,\n ;; so the test in `undo' for continuing an undo series\n ;; will work right.\n (if (and did-apply\n (eq oldlist buffer-undo-list))\n (setq buffer-undo-list\n (cons (list 'apply 'cdr nil) buffer-undo-list))))\n list)\n\n;; Deep copy of a list\n(defun undo-copy-list (list)\n \"Make a copy of undo list LIST.\"\n (mapcar 'undo-copy-list-1 list))\n\n(defun undo-copy-list-1 (elt)\n (if (consp elt)\n (cons (car elt) (undo-copy-list-1 (cdr elt)))\n elt))\n\n(defun undo-start (&optional beg end)\n \"Set `pending-undo-list' to the front of the undo list.\nThe next call to `undo-more' will undo the most recently made change.\nIf BEG and END are specified, then only undo elements\nthat apply to text between BEG and END are used; other undo elements\nare ignored. If BEG and END are nil, all undo elements are used.\"\n (if (eq buffer-undo-list t)\n (user-error \"No undo information in this buffer\"))\n (setq pending-undo-list\n\t(if (and beg end (not (= beg end)))\n\t (undo-make-selective-list (min beg end) (max beg end))\n\t buffer-undo-list)))\n\n;; The positions given in elements of the undo list are the positions\n;; as of the time that element was recorded to undo history. In\n;; general, subsequent buffer edits render those positions invalid in\n;; the current buffer, unless adjusted according to the intervening\n;; undo elements.\n;;\n;; Undo in region is a use case that requires adjustments to undo\n;; elements. It must adjust positions of elements in the region based\n;; on newer elements not in the region so as they may be correctly\n;; applied in the current buffer. undo-make-selective-list\n;; accomplishes this with its undo-deltas list of adjustments. An\n;; example undo history from oldest to newest:\n;;\n;; buf pos:\n;; 123456789 buffer-undo-list undo-deltas\n;; --------- ---------------- -----------\n;; aaa (1 . 4) (1 . -3)\n;; aaba (3 . 4) N/A (in region)\n;; ccaaba (1 . 3) (1 . -2)\n;; ccaabaddd (7 . 10) (7 . -3)\n;; ccaabdd (\"ad\" . 6) (6 . 2)\n;; ccaabaddd (6 . 8) (6 . -2)\n;; | |<-- region: \"caab\", from 2 to 6\n;;\n;; When the user starts a run of undos in region,\n;; undo-make-selective-list is called to create the full list of in\n;; region elements. Each element is adjusted forward chronologically\n;; through undo-deltas to determine if it is in the region.\n;;\n;; In the above example, the insertion of \"b\" is (3 . 4) in the\n;; buffer-undo-list. The undo-delta (1 . -2) causes (3 . 4) to become\n;; (5 . 6). The next three undo-deltas cause no adjustment, so (5\n;; . 6) is assessed as in the region and placed in the selective list.\n;; Notably, the end of region itself adjusts from \"2 to 6\" to \"2 to 5\"\n;; due to the selected element. The \"b\" insertion is the only element\n;; fully in the region, so in this example undo-make-selective-list\n;; returns (nil (5 . 6)).\n;;\n;; The adjustment of the (7 . 10) insertion of \"ddd\" shows an edge\n;; case. It is adjusted through the undo-deltas: ((6 . 2) (6 . -2)).\n;; Normally an undo-delta of (6 . 2) would cause positions after 6 to\n;; adjust by 2. However, they shouldn't adjust to less than 6, so (7\n;; . 10) adjusts to (6 . 8) due to the first undo delta.\n;;\n;; More interesting is how to adjust the \"ddd\" insertion due to the\n;; next undo-delta: (6 . -2), corresponding to reinsertion of \"ad\".\n;; If the reinsertion was a manual retyping of \"ad\", then the total\n;; adjustment should be (7 . 10) -> (6 . 8) -> (8 . 10). However, if\n;; the reinsertion was due to undo, one might expect the first \"d\"\n;; character would again be a part of the \"ddd\" text, meaning its\n;; total adjustment would be (7 . 10) -> (6 . 8) -> (7 . 10).\n;;\n;; undo-make-selective-list assumes in this situation that \"ad\" was a\n;; new edit, even if it was inserted because of an undo.\n;; Consequently, if the user undos in region \"8 to 10\" of the\n;; \"ccaabaddd\" buffer, they could be surprised that it becomes\n;; \"ccaabad\", as though the first \"d\" became detached from the\n;; original \"ddd\" insertion. This quirk is a FIXME.\n\n(defun undo-make-selective-list (start end)\n \"Return a list of undo elements for the region START to END.\nThe elements come from `buffer-undo-list', but we keep only the\nelements inside this region, and discard those outside this\nregion. The elements' positions are adjusted so as the returned\nlist can be applied to the current buffer.\"\n (let ((ulist buffer-undo-list)\n ;; A list of position adjusted undo elements in the region.\n (selective-list (list nil))\n ;; A list of undo-deltas for out of region undo elements.\n undo-deltas\n undo-elt)\n (while ulist\n (when undo-no-redo\n (while (gethash ulist undo-equiv-table)\n (setq ulist (gethash ulist undo-equiv-table))))\n (setq undo-elt (car ulist))\n (cond\n ((null undo-elt)\n ;; Don't put two nils together in the list\n (when (car selective-list)\n (push nil selective-list)))\n ((and (consp undo-elt) (eq (car undo-elt) t))\n ;; This is a \"was unmodified\" element. Keep it\n ;; if we have kept everything thus far.\n (when (not undo-deltas)\n (push undo-elt selective-list)))\n ;; Skip over marker adjustments, instead relying\n ;; on finding them after (TEXT . POS) elements\n ((markerp (car-safe undo-elt))\n nil)\n (t\n (let ((adjusted-undo-elt (undo-adjust-elt undo-elt\n undo-deltas)))\n (if (undo-elt-in-region adjusted-undo-elt start end)\n (progn\n (setq end (+ end (cdr (undo-delta adjusted-undo-elt))))\n (push adjusted-undo-elt selective-list)\n ;; Keep (MARKER . ADJUSTMENT) if their (TEXT . POS) was\n ;; kept. primitive-undo may discard them later.\n (when (and (stringp (car-safe adjusted-undo-elt))\n (integerp (cdr-safe adjusted-undo-elt)))\n (let ((list-i (cdr ulist)))\n (while (markerp (car-safe (car list-i)))\n (push (pop list-i) selective-list)))))\n (let ((delta (undo-delta undo-elt)))\n (when (/= 0 (cdr delta))\n (push delta undo-deltas)))))))\n (pop ulist))\n (nreverse selective-list)))\n\n(defun undo-elt-in-region (undo-elt start end)\n \"Determine whether UNDO-ELT falls inside the region START ... END.\nIf it crosses the edge, we return nil.\n\nGenerally this function is not useful for determining\nwhether (MARKER . ADJUSTMENT) undo elements are in the region,\nbecause markers can be arbitrarily relocated. Instead, pass the\nmarker adjustment's corresponding (TEXT . POS) element.\"\n (cond ((integerp undo-elt)\n\t (and (>= undo-elt start)\n\t (<= undo-elt end)))\n\t((eq undo-elt nil)\n\t t)\n\t((atom undo-elt)\n\t nil)\n\t((stringp (car undo-elt))\n\t ;; (TEXT . POSITION)\n\t (and (>= (abs (cdr undo-elt)) start)\n\t (<= (abs (cdr undo-elt)) end)))\n\t((and (consp undo-elt) (markerp (car undo-elt)))\n\t ;; (MARKER . ADJUSTMENT)\n (<= start (car undo-elt) end))\n\t((null (car undo-elt))\n\t ;; (nil PROPERTY VALUE BEG . END)\n\t (let ((tail (nthcdr 3 undo-elt)))\n\t (and (>= (car tail) start)\n\t\t(<= (cdr tail) end))))\n\t((integerp (car undo-elt))\n\t ;; (BEGIN . END)\n\t (and (>= (car undo-elt) start)\n\t (<= (cdr undo-elt) end)))))\n\n(defun undo-elt-crosses-region (undo-elt start end)\n \"Test whether UNDO-ELT crosses one edge of that region START ... END.\nThis assumes we have already decided that UNDO-ELT\nis not *inside* the region START...END.\"\n (declare (obsolete nil \"25.1\"))\n (cond ((atom undo-elt) nil)\n\t((null (car undo-elt))\n\t ;; (nil PROPERTY VALUE BEG . END)\n\t (let ((tail (nthcdr 3 undo-elt)))\n\t (and (< (car tail) end)\n\t\t(> (cdr tail) start))))\n\t((integerp (car undo-elt))\n\t ;; (BEGIN . END)\n\t (and (< (car undo-elt) end)\n\t (> (cdr undo-elt) start)))))\n\n(defun undo-adjust-elt (elt deltas)\n \"Return adjustment of undo element ELT by the undo DELTAS\nlist.\"\n (pcase elt\n ;; POSITION\n ((pred integerp)\n (undo-adjust-pos elt deltas))\n ;; (BEG . END)\n (`(,(and beg (pred integerp)) . ,(and end (pred integerp)))\n (undo-adjust-beg-end beg end deltas))\n ;; (TEXT . POSITION)\n (`(,(and text (pred stringp)) . ,(and pos (pred integerp)))\n (cons text (* (if (< pos 0) -1 1)\n (undo-adjust-pos (abs pos) deltas))))\n ;; (nil PROPERTY VALUE BEG . END)\n (`(nil . ,(or `(,prop ,val ,beg . ,end) pcase--dontcare))\n `(nil ,prop ,val . ,(undo-adjust-beg-end beg end deltas)))\n ;; (apply DELTA START END FUN . ARGS)\n ;; FIXME\n ;; All others return same elt\n (_ elt)))\n\n;; (BEG . END) can adjust to the same positions, commonly when an\n;; insertion was undone and they are out of region, for example:\n;;\n;; buf pos:\n;; 123456789 buffer-undo-list undo-deltas\n;; --------- ---------------- -----------\n;; [...]\n;; abbaa (2 . 4) (2 . -2)\n;; aaa (\"bb\" . 2) (2 . 2)\n;; [...]\n;;\n;; \"bb\" insertion (2 . 4) adjusts to (2 . 2) because of the subsequent\n;; undo. Further adjustments to such an element should be the same as\n;; for (TEXT . POSITION) elements. The options are:\n;;\n;; 1: POSITION adjusts using <= (use-< nil), resulting in behavior\n;; analogous to marker insertion-type t.\n;;\n;; 2: POSITION adjusts using <, resulting in behavior analogous to\n;; marker insertion-type nil.\n;;\n;; There was no strong reason to prefer one or the other, except that\n;; the first is more consistent with prior undo in region behavior.\n(defun undo-adjust-beg-end (beg end deltas)\n \"Return cons of adjustments to BEG and END by the undo DELTAS\nlist.\"\n (let ((adj-beg (undo-adjust-pos beg deltas)))\n ;; Note: option 2 above would be like (cons (min ...) adj-end)\n (cons adj-beg\n (max adj-beg (undo-adjust-pos end deltas t)))))\n\n(defun undo-adjust-pos (pos deltas &optional use-<)\n \"Return adjustment of POS by the undo DELTAS list, comparing\nwith < or <= based on USE-<.\"\n (dolist (d deltas pos)\n (when (if use-<\n (< (car d) pos)\n (<= (car d) pos))\n (setq pos\n ;; Don't allow pos to become less than the undo-delta\n ;; position. This edge case is described in the overview\n ;; comments.\n (max (car d) (- pos (cdr d)))))))\n\n;; Return the first affected buffer position and the delta for an undo element\n;; delta is defined as the change in subsequent buffer positions if we *did*\n;; the undo.\n(defun undo-delta (undo-elt)\n (if (consp undo-elt)\n (cond ((stringp (car undo-elt))\n\t ;; (TEXT . POSITION)\n\t (cons (abs (cdr undo-elt)) (length (car undo-elt))))\n\t ((integerp (car undo-elt))\n\t ;; (BEGIN . END)\n\t (cons (car undo-elt) (- (car undo-elt) (cdr undo-elt))))\n\t (t\n\t '(0 . 0)))\n '(0 . 0)))\n\n;;; Default undo-boundary addition\n;;\n;; This section adds a new undo-boundary at either after a command is\n;; called or in some cases on a timer called after a change is made in\n;; any buffer.\n(defvar-local undo-auto--last-boundary-cause nil\n \"Describe the cause of the last undo-boundary.\n\nIf `explicit', the last boundary was caused by an explicit call to\n`undo-boundary', that is one not called by the code in this\nsection.\n\nIf it is equal to `timer', then the last boundary was inserted\nby `undo-auto--boundary-timer'.\n\nIf it is equal to `command', then the last boundary was inserted\nautomatically after a command, that is by the code defined in\nthis section.\n\nIf it is equal to a list, then the last boundary was inserted by\nan amalgamating command. The car of the list is the number of\ntimes an amalgamating command has been called, and the cdr are the\nbuffers that were changed during the last command.\")\n\n(defvar undo-auto-current-boundary-timer nil\n \"Current timer which will run `undo-auto--boundary-timer' or nil.\n\nIf set to non-nil, this will effectively disable the timer.\")\n\n(defvar undo-auto--this-command-amalgamating nil\n \"Non-nil if `this-command' should be amalgamated.\nThis variable is set to nil by `undo-auto--boundaries' and is set\nby `undo-auto-amalgamate'.\" )\n\n(defun undo-auto--needs-boundary-p ()\n \"Return non-nil if `buffer-undo-list' needs a boundary at the start.\"\n (car-safe buffer-undo-list))\n\n(defun undo-auto--last-boundary-amalgamating-number ()\n \"Return the number of amalgamating last commands or nil.\nAmalgamating commands are, by default, either\n`self-insert-command' and `delete-char', but can be any command\nthat calls `undo-auto-amalgamate'.\"\n (car-safe undo-auto--last-boundary-cause))\n\n(defun undo-auto--ensure-boundary (cause)\n \"Add an `undo-boundary' to the current buffer if needed.\nREASON describes the reason that the boundary is being added; see\n`undo-auto--last-boundary' for more information.\"\n (when (and\n (undo-auto--needs-boundary-p))\n (let ((last-amalgamating\n (undo-auto--last-boundary-amalgamating-number)))\n (undo-boundary)\n (setq undo-auto--last-boundary-cause\n (if (eq 'amalgamate cause)\n (cons\n (if last-amalgamating (1+ last-amalgamating) 0)\n undo-auto--undoably-changed-buffers)\n cause)))))\n\n(defun undo-auto--boundaries (cause)\n \"Check recently changed buffers and add a boundary if necessary.\nREASON describes the reason that the boundary is being added; see\n`undo-last-boundary' for more information.\"\n ;; (Bug #23785) All commands should ensure that there is an undo\n ;; boundary whether they have changed the current buffer or not.\n (when (eq cause 'command)\n (add-to-list 'undo-auto--undoably-changed-buffers (current-buffer)))\n (dolist (b undo-auto--undoably-changed-buffers)\n (when (buffer-live-p b)\n (with-current-buffer b\n (undo-auto--ensure-boundary cause))))\n (setq undo-auto--undoably-changed-buffers nil))\n\n(defun undo-auto--boundary-timer ()\n \"Timer function run by `undo-auto-current-boundary-timer'.\"\n (setq undo-auto-current-boundary-timer nil)\n (undo-auto--boundaries 'timer))\n\n(defun undo-auto--boundary-ensure-timer ()\n \"Ensure that the `undo-auto-current-boundary-timer' is set.\"\n (unless undo-auto-current-boundary-timer\n (setq undo-auto-current-boundary-timer\n (run-at-time 10 nil #'undo-auto--boundary-timer))))\n\n(defvar undo-auto--undoably-changed-buffers nil\n \"List of buffers that have changed recently.\n\nThis list is maintained by `undo-auto--undoable-change' and\n`undo-auto--boundaries' and can be affected by changes to their\ndefault values.\")\n\n(defun undo-auto--add-boundary ()\n \"Add an `undo-boundary' in appropriate buffers.\"\n (undo-auto--boundaries\n (let ((amal undo-auto--this-command-amalgamating))\n (setq undo-auto--this-command-amalgamating nil)\n (if amal\n 'amalgamate\n 'command))))\n\n(defun undo-auto-amalgamate ()\n \"Amalgamate undo if necessary.\nThis function can be called before an amalgamating command. It\nremoves the previous `undo-boundary' if a series of such calls\nhave been made. By default `self-insert-command' and\n`delete-char' are the only amalgamating commands, although this\nfunction could be called by any command wishing to have this\nbehavior.\"\n (let ((last-amalgamating-count\n (undo-auto--last-boundary-amalgamating-number)))\n (setq undo-auto--this-command-amalgamating t)\n (when\n last-amalgamating-count\n (if\n (and\n (< last-amalgamating-count 20)\n (eq this-command last-command))\n ;; Amalgamate all buffers that have changed.\n (dolist (b (cdr undo-auto--last-boundary-cause))\n (when (buffer-live-p b)\n (with-current-buffer\n b\n (when\n ;; The head of `buffer-undo-list' is nil.\n ;; `car-safe' doesn't work because\n ;; `buffer-undo-list' need not be a list!\n (and (listp buffer-undo-list)\n (not (car buffer-undo-list)))\n (setq buffer-undo-list\n (cdr buffer-undo-list))))))\n (setq undo-auto--last-boundary-cause 0)))))\n\n(defun undo-auto--undoable-change ()\n \"Called after every undoable buffer change.\"\n (add-to-list 'undo-auto--undoably-changed-buffers (current-buffer))\n (undo-auto--boundary-ensure-timer))\n;; End auto-boundary section\n\n(defun undo-amalgamate-change-group (handle)\n \"Amalgamate changes in change-group since HANDLE.\nRemove all undo boundaries between the state of HANDLE and now.\nHANDLE is as returned by `prepare-change-group'.\"\n (dolist (elt handle)\n (with-current-buffer (car elt)\n (setq elt (cdr elt))\n (when (consp buffer-undo-list)\n (let ((old-car (car-safe elt))\n (old-cdr (cdr-safe elt)))\n (unwind-protect\n (progn\n ;; Temporarily truncate the undo log at ELT.\n (when (consp elt)\n (setcar elt t) (setcdr elt nil))\n (when\n (or (null elt) ;The undo-log was empty.\n ;; `elt' is still in the log: normal case.\n (eq elt (last buffer-undo-list))\n ;; `elt' is not in the log any more, but that's because\n ;; the log is \"all new\", so we should remove all\n ;; boundaries from it.\n (not (eq (last buffer-undo-list) (last old-cdr))))\n (cl-callf (lambda (x) (delq nil x))\n (if (car buffer-undo-list)\n buffer-undo-list\n ;; Preserve the undo-boundaries at either ends of the\n ;; change-groups.\n (cdr buffer-undo-list)))))\n ;; Reset the modified cons cell ELT to its original content.\n (when (consp elt)\n (setcar elt old-car)\n (setcdr elt old-cdr))))))))\n\n\n(defcustom undo-ask-before-discard nil\n \"If non-nil ask about discarding undo info for the current command.\nNormally, Emacs discards the undo info for the current command if\nit exceeds `undo-outer-limit'. But if you set this option\nnon-nil, it asks in the echo area whether to discard the info.\nIf you answer no, there is a slight risk that Emacs might crash, so\nonly do it if you really want to undo the command.\n\nThis option is mainly intended for debugging. You have to be\ncareful if you use it for other purposes. Garbage collection is\ninhibited while the question is asked, meaning that Emacs might\nleak memory. So you should make sure that you do not wait\nexcessively long before answering the question.\"\n :type 'boolean\n :group 'undo\n :version \"22.1\")\n\n(defvar undo-extra-outer-limit nil\n \"If non-nil, an extra level of size that's ok in an undo item.\nWe don't ask the user about truncating the undo list until the\ncurrent item gets bigger than this amount.\n\nThis variable only matters if `undo-ask-before-discard' is non-nil.\")\n(make-variable-buffer-local 'undo-extra-outer-limit)\n\n;; When the first undo batch in an undo list is longer than\n;; undo-outer-limit, this function gets called to warn the user that\n;; the undo info for the current command was discarded. Garbage\n;; collection is inhibited around the call, so it had better not do a\n;; lot of consing.\n(setq undo-outer-limit-function 'undo-outer-limit-truncate)\n(defun undo-outer-limit-truncate (size)\n (if undo-ask-before-discard\n (when (or (null undo-extra-outer-limit)\n\t\t(> size undo-extra-outer-limit))\n\t;; Don't ask the question again unless it gets even bigger.\n\t;; This applies, in particular, if the user quits from the question.\n\t;; Such a quit quits out of GC, but something else will call GC\n\t;; again momentarily. It will call this function again,\n\t;; but we don't want to ask the question again.\n\t(setq undo-extra-outer-limit (+ size 50000))\n\t(if (let (use-dialog-box track-mouse executing-kbd-macro )\n\t (yes-or-no-p (format-message\n \"Buffer `%s' undo info is %d bytes long; discard it? \"\n (buffer-name) size)))\n\t (progn (setq buffer-undo-list nil)\n\t\t (setq undo-extra-outer-limit nil)\n\t\t t)\n\t nil))\n (display-warning '(undo discard-info)\n\t\t (concat\n\t\t (format-message\n \"Buffer `%s' undo info was %d bytes long.\\n\"\n (buffer-name) size)\n\t\t \"The undo info was discarded because it exceeded \\\n`undo-outer-limit'.\n\nThis is normal if you executed a command that made a huge change\nto the buffer. In that case, to prevent similar problems in the\nfuture, set `undo-outer-limit' to a value that is large enough to\ncover the maximum size of normal changes you expect a single\ncommand to make, but not so large that it might exceed the\nmaximum memory allotted to Emacs.\n\nIf you did not execute any such command, the situation is\nprobably due to a bug and you should report it.\n\nYou can disable the popping up of this buffer by adding the entry\n\\(undo discard-info) to the user option `warning-suppress-types',\nwhich is defined in the `warnings' library.\\n\")\n\t\t :warning)\n (setq buffer-undo-list nil)\n t))\n\f\n(defcustom password-word-equivalents\n '(\"password\" \"passcode\" \"passphrase\" \"pass phrase\"\n ; These are sorted according to the GNU en_US locale.\n \"암호\"\t\t; ko\n \"パスワード\"\t; ja\n \"ପ୍ରବେଶ ସଙ୍କେତ\"\t; or\n \"ពាក្យសម្ងាត់\"\t\t; km\n \"adgangskode\"\t; da\n \"contraseña\"\t; es\n \"contrasenya\"\t; ca\n \"geslo\"\t\t; sl\n \"hasło\"\t\t; pl\n \"heslo\"\t\t; cs, sk\n \"iphasiwedi\"\t; zu\n \"jelszó\"\t\t; hu\n \"lösenord\"\t\t; sv\n \"lozinka\"\t\t; hr, sr\n \"mật khẩu\"\t\t; vi\n \"mot de passe\"\t; fr\n \"parola\"\t\t; tr\n \"pasahitza\"\t\t; eu\n \"passord\"\t\t; nb\n \"passwort\"\t\t; de\n \"pasvorto\"\t\t; eo\n \"salasana\"\t\t; fi\n \"senha\"\t\t; pt\n \"slaptažodis\"\t; lt\n \"wachtwoord\"\t; nl\n \"كلمة السر\"\t\t; ar\n \"ססמה\"\t\t; he\n \"лозинка\"\t\t; sr\n \"пароль\"\t\t; kk, ru, uk\n \"गुप्तशब्द\"\t\t; mr\n \"शब्दकूट\"\t\t; hi\n \"પાસવર્ડ\"\t\t; gu\n \"సంకేతపదము\"\t\t; te\n \"ਪਾਸਵਰਡ\"\t\t; pa\n \"ಗುಪ್ತಪದ\"\t\t; kn\n \"கடவுச்சொல்\"\t\t; ta\n \"അടയാളവാക്ക്\"\t\t; ml\n \"গুপ্তশব্দ\"\t\t; as\n \"পাসওয়ার্ড\"\t\t; bn_IN\n \"රහස්පදය\"\t\t; si\n \"密码\"\t\t; zh_CN\n \"密碼\"\t\t; zh_TW\n )\n \"List of words equivalent to \\\"password\\\".\nThis is used by Shell mode and other parts of Emacs to recognize\npassword prompts, including prompts in languages other than\nEnglish. Different case choices should not be assumed to be\nincluded; callers should bind `case-fold-search' to t.\"\n :type '(repeat string)\n :version \"24.4\"\n :group 'processes)\n\n(defvar shell-command-history nil\n \"History list for some commands that read shell commands.\n\nMaximum length of the history list is determined by the value\nof `history-length', which see.\")\n\n(defvar shell-command-switch (purecopy \"-c\")\n \"Switch used to have the shell execute its command line argument.\")\n\n(defvar shell-command-default-error-buffer nil\n \"Buffer name for `shell-command' and `shell-command-on-region' error output.\nThis buffer is used when `shell-command' or `shell-command-on-region'\nis run interactively. A value of nil means that output to stderr and\nstdout will be intermixed in the output stream.\")\n\n(declare-function mailcap-file-default-commands \"mailcap\" (files))\n(declare-function dired-get-filename \"dired\" (&optional localp no-error-if-not-filep))\n\n(defun minibuffer-default-add-shell-commands ()\n \"Return a list of all commands associated with the current file.\nThis function is used to add all related commands retrieved by `mailcap'\nto the end of the list of defaults just after the default value.\"\n (interactive)\n (let* ((filename (if (listp minibuffer-default)\n\t\t (car minibuffer-default)\n\t\t minibuffer-default))\n\t (commands (and filename (require 'mailcap nil t)\n\t\t\t(mailcap-file-default-commands (list filename)))))\n (setq commands (mapcar (lambda (command)\n\t\t\t (concat command \" \" filename))\n\t\t\t commands))\n (if (listp minibuffer-default)\n\t(append minibuffer-default commands)\n (cons minibuffer-default commands))))\n\n(declare-function shell-completion-vars \"shell\" ())\n\n(defvar minibuffer-local-shell-command-map\n (let ((map (make-sparse-keymap)))\n (set-keymap-parent map minibuffer-local-map)\n (define-key map \"\\t\" 'completion-at-point)\n map)\n \"Keymap used for completing shell commands in minibuffer.\")\n\n(defun read-shell-command (prompt &optional initial-contents hist &rest args)\n \"Read a shell command from the minibuffer.\nThe arguments are the same as the ones of `read-from-minibuffer',\nexcept READ and KEYMAP are missing and HIST defaults\nto `shell-command-history'.\"\n (require 'shell)\n (minibuffer-with-setup-hook\n (lambda ()\n (shell-completion-vars)\n\t(set (make-local-variable 'minibuffer-default-add-function)\n\t 'minibuffer-default-add-shell-commands))\n (apply 'read-from-minibuffer prompt initial-contents\n\t minibuffer-local-shell-command-map\n\t nil\n\t (or hist 'shell-command-history)\n\t args)))\n\n(defcustom async-shell-command-buffer 'confirm-new-buffer\n \"What to do when the output buffer is used by another shell command.\nThis option specifies how to resolve the conflict where a new command\nwants to direct its output to the buffer `*Async Shell Command*',\nbut this buffer is already taken by another running shell command.\n\nThe value `confirm-kill-process' is used to ask for confirmation before\nkilling the already running process and running a new process\nin the same buffer, `confirm-new-buffer' for confirmation before running\nthe command in a new buffer with a name other than the default buffer name,\n`new-buffer' for doing the same without confirmation,\n`confirm-rename-buffer' for confirmation before renaming the existing\noutput buffer and running a new command in the default buffer,\n`rename-buffer' for doing the same without confirmation.\"\n :type '(choice (const :tag \"Confirm killing of running command\"\n\t\t\tconfirm-kill-process)\n\t\t (const :tag \"Confirm creation of a new buffer\"\n\t\t\tconfirm-new-buffer)\n\t\t (const :tag \"Create a new buffer\"\n\t\t\tnew-buffer)\n\t\t (const :tag \"Confirm renaming of existing buffer\"\n\t\t\tconfirm-rename-buffer)\n\t\t (const :tag \"Rename the existing buffer\"\n\t\t\trename-buffer))\n :group 'shell\n :version \"24.3\")\n\n(defcustom async-shell-command-display-buffer t\n \"Whether to display the command buffer immediately.\nIf t, display the buffer immediately; if nil, wait until there\nis output.\"\n :type '(choice (const :tag \"Display buffer immediately\"\n\t\t\tt)\n\t\t (const :tag \"Display buffer on output\"\n\t\t\tnil))\n :group 'shell\n :version \"26.1\")\n\n(defun shell-command--save-pos-or-erase ()\n \"Store a buffer position or erase the buffer.\nSee `shell-command-dont-erase-buffer'.\"\n (let ((sym shell-command-dont-erase-buffer)\n pos)\n (setq buffer-read-only nil)\n ;; Setting buffer-read-only to nil doesn't suffice\n ;; if some text has a non-nil read-only property,\n ;; which comint sometimes adds for prompts.\n (setq pos\n (cond ((eq sym 'save-point) (point))\n ((eq sym 'beg-last-out) (point-max))\n ((not sym)\n (let ((inhibit-read-only t))\n (erase-buffer) nil))))\n (when pos\n (goto-char (point-max))\n (push (cons (current-buffer) pos)\n shell-command-saved-pos))))\n\n(defun shell-command--set-point-after-cmd (&optional buffer)\n \"Set point in BUFFER after command complete.\nBUFFER is the output buffer of the command; if nil, then defaults\nto the current BUFFER.\nSet point to the `cdr' of the element in `shell-command-saved-pos'\nwhose `car' is BUFFER.\"\n (when shell-command-dont-erase-buffer\n (let* ((sym shell-command-dont-erase-buffer)\n (buf (or buffer (current-buffer)))\n (pos (alist-get buf shell-command-saved-pos)))\n (setq shell-command-saved-pos\n (assq-delete-all buf shell-command-saved-pos))\n (when (buffer-live-p buf)\n (let ((win (car (get-buffer-window-list buf)))\n (pmax (with-current-buffer buf (point-max))))\n (unless (and pos (memq sym '(save-point beg-last-out)))\n (setq pos pmax))\n ;; Set point in the window displaying buf, if any; otherwise\n ;; display buf temporary in selected frame and set the point.\n (if win\n (set-window-point win pos)\n (save-window-excursion\n (let ((win (display-buffer\n buf\n '(nil (inhibit-switch-frame . t)))))\n (set-window-point win pos)))))))))\n\n(defun async-shell-command (command &optional output-buffer error-buffer)\n \"Execute string COMMAND asynchronously in background.\n\nLike `shell-command', but adds `&' at the end of COMMAND\nto execute it asynchronously.\n\nThe output appears in the buffer `*Async Shell Command*'.\nThat buffer is in shell mode.\n\nYou can configure `async-shell-command-buffer' to specify what to do\nwhen the `*Async Shell Command*' buffer is already taken by another\nrunning shell command. To run COMMAND without displaying the output\nin a window you can configure `display-buffer-alist' to use the action\n`display-buffer-no-window' for the buffer `*Async Shell Command*'.\n\nIn Elisp, you will often be better served by calling `start-process'\ndirectly, since it offers more control and does not impose the use of\na shell (with its need to quote arguments).\"\n (interactive\n (list\n (read-shell-command \"Async shell command: \" nil nil\n\t\t\t(let ((filename\n\t\t\t (cond\n\t\t\t\t(buffer-file-name)\n\t\t\t\t((eq major-mode 'dired-mode)\n\t\t\t\t (dired-get-filename nil t)))))\n\t\t\t (and filename (file-relative-name filename))))\n current-prefix-arg\n shell-command-default-error-buffer))\n (unless (string-match \"&[ \\t]*\\\\'\" command)\n (setq command (concat command \" &\")))\n (shell-command command output-buffer error-buffer))\n\n(defun shell-command (command &optional output-buffer error-buffer)\n \"Execute string COMMAND in inferior shell; display output, if any.\nWith prefix argument, insert the COMMAND's output at point.\n\nInteractively, prompt for COMMAND in the minibuffer.\n\nIf COMMAND ends in `&', execute it asynchronously.\nThe output appears in the buffer `*Async Shell Command*'.\nThat buffer is in shell mode. You can also use\n`async-shell-command' that automatically adds `&'.\n\nOtherwise, COMMAND is executed synchronously. The output appears in\nthe buffer `*Shell Command Output*'. If the output is short enough to\ndisplay in the echo area (which is determined by the variables\n`resize-mini-windows' and `max-mini-window-height'), it is shown\nthere, but it is nonetheless available in buffer `*Shell Command\nOutput*' even though that buffer is not automatically displayed.\n\nTo specify a coding system for converting non-ASCII characters\nin the shell command output, use \\\\[universal-coding-system-argument] \\\nbefore this command.\n\nNoninteractive callers can specify coding systems by binding\n`coding-system-for-read' and `coding-system-for-write'.\n\nThe optional second argument OUTPUT-BUFFER, if non-nil,\nsays to put the output in some other buffer.\nIf OUTPUT-BUFFER is a buffer or buffer name, erase that buffer\nand insert the output there; a non-nil value of\n`shell-command-dont-erase-buffer' prevents the buffer from being\nerased. If OUTPUT-BUFFER is not a buffer and not nil, insert the\noutput in current buffer after point leaving mark after it. This\ncannot be done asynchronously.\n\nIf the command terminates without error, but generates output,\nand you did not specify \\\"insert it in the current buffer\\\",\nthe output can be displayed in the echo area or in its buffer.\nIf the output is short enough to display in the echo area\n\\(determined by the variable `max-mini-window-height' if\n`resize-mini-windows' is non-nil), it is shown there.\nOtherwise, the buffer containing the output is displayed.\n\nIf there is output and an error, and you did not specify \\\"insert it\nin the current buffer\\\", a message about the error goes at the end\nof the output.\n\nIf the optional third argument ERROR-BUFFER is non-nil, it is a buffer\nor buffer name to which to direct the command's standard error output.\nIf it is nil, error output is mingled with regular output.\nIn an interactive call, the variable `shell-command-default-error-buffer'\nspecifies the value of ERROR-BUFFER.\n\nIn Elisp, you will often be better served by calling `call-process' or\n`start-process' directly, since they offer more control and do not\nimpose the use of a shell (with its need to quote arguments).\"\n\n (interactive\n (list\n (read-shell-command \"Shell command: \" nil nil\n\t\t\t(let ((filename\n\t\t\t (cond\n\t\t\t\t(buffer-file-name)\n\t\t\t\t((eq major-mode 'dired-mode)\n\t\t\t\t (dired-get-filename nil t)))))\n\t\t\t (and filename (file-relative-name filename))))\n current-prefix-arg\n shell-command-default-error-buffer))\n ;; Look for a handler in case default-directory is a remote file name.\n (let ((handler\n\t (find-file-name-handler (directory-file-name default-directory)\n\t\t\t\t 'shell-command)))\n (if handler\n\t(funcall handler 'shell-command command output-buffer error-buffer)\n (if (and output-buffer\n\t (not (or (bufferp output-buffer) (stringp output-buffer))))\n\t ;; Output goes in current buffer.\n\t (let ((error-file\n\t\t (if error-buffer\n\t\t (make-temp-file\n\t\t (expand-file-name \"scor\"\n\t\t\t\t\t(or small-temporary-file-directory\n\t\t\t\t\t temporary-file-directory)))\n\t\t nil)))\n\t (barf-if-buffer-read-only)\n\t (push-mark nil t)\n\t ;; We do not use -f for csh; we will not support broken use of\n\t ;; .cshrcs. Even the BSD csh manual says to use\n\t ;; \"if ($?prompt) exit\" before things which are not useful\n\t ;; non-interactively. Besides, if someone wants their other\n\t ;; aliases for shell commands then they can still have them.\n\t (call-process shell-file-name nil\n\t\t\t (if error-file\n\t\t\t (list t error-file)\n\t\t\t t)\n\t\t\t nil shell-command-switch command)\n\t (when (and error-file (file-exists-p error-file))\n\t (if (< 0 (nth 7 (file-attributes error-file)))\n\t\t (with-current-buffer (get-buffer-create error-buffer)\n\t\t (let ((pos-from-end (- (point-max) (point))))\n\t\t (or (bobp)\n\t\t\t (insert \"\\f\\n\"))\n\t\t ;; Do no formatting while reading error file,\n\t\t ;; because that can run a shell command, and we\n\t\t ;; don't want that to cause an infinite recursion.\n\t\t (format-insert-file error-file nil)\n\t\t ;; Put point after the inserted errors.\n\t\t (goto-char (- (point-max) pos-from-end)))\n\t\t (display-buffer (current-buffer))))\n\t (delete-file error-file))\n\t ;; This is like exchange-point-and-mark, but doesn't\n\t ;; activate the mark. It is cleaner to avoid activation,\n\t ;; even though the command loop would deactivate the mark\n\t ;; because we inserted text.\n\t (goto-char (prog1 (mark t)\n\t\t\t (set-marker (mark-marker) (point)\n\t\t\t\t (current-buffer)))))\n\t;; Output goes in a separate buffer.\n\t;; Preserve the match data in case called from a program.\n ;; FIXME: It'd be ridiculous for an Elisp function to call\n ;; shell-command and assume that it won't mess the match-data!\n\t(save-match-data\n\t (if (string-match \"[ \\t]*&[ \\t]*\\\\'\" command)\n\t ;; Command ending with ampersand means asynchronous.\n (let* ((buffer (get-buffer-create\n (or output-buffer \"*Async Shell Command*\")))\n (bname (buffer-name buffer))\n (directory default-directory)\n proc)\n\t\t;; Remove the ampersand.\n\t\t(setq command (substring command 0 (match-beginning 0)))\n\t\t;; Ask the user what to do with already running process.\n\t\t(setq proc (get-buffer-process buffer))\n\t\t(when proc\n\t\t (cond\n\t\t ((eq async-shell-command-buffer 'confirm-kill-process)\n\t\t ;; If will kill a process, query first.\n\t\t (if (yes-or-no-p \"A command is running in the default buffer. Kill it? \")\n\t\t\t(kill-process proc)\n\t\t (error \"Shell command in progress\")))\n\t\t ((eq async-shell-command-buffer 'confirm-new-buffer)\n\t\t ;; If will create a new buffer, query first.\n\t\t (if (yes-or-no-p \"A command is running in the default buffer. Use a new buffer? \")\n (setq buffer (generate-new-buffer bname))\n\t\t (error \"Shell command in progress\")))\n\t\t ((eq async-shell-command-buffer 'new-buffer)\n\t\t ;; It will create a new buffer.\n (setq buffer (generate-new-buffer bname)))\n\t\t ((eq async-shell-command-buffer 'confirm-rename-buffer)\n\t\t ;; If will rename the buffer, query first.\n\t\t (if (yes-or-no-p \"A command is running in the default buffer. Rename it? \")\n\t\t\t(progn\n\t\t\t (with-current-buffer buffer\n\t\t\t (rename-uniquely))\n (setq buffer (get-buffer-create bname)))\n\t\t (error \"Shell command in progress\")))\n\t\t ((eq async-shell-command-buffer 'rename-buffer)\n\t\t ;; It will rename the buffer.\n\t\t (with-current-buffer buffer\n\t\t (rename-uniquely))\n (setq buffer (get-buffer-create bname)))))\n\t\t(with-current-buffer buffer\n (shell-command--save-pos-or-erase)\n\t\t (setq default-directory directory)\n\t\t (setq proc (start-process \"Shell\" buffer shell-file-name\n\t\t\t\t\t shell-command-switch command))\n\t\t (setq mode-line-process '(\":%s\"))\n\t\t (require 'shell) (shell-mode)\n\t\t (set-process-sentinel proc 'shell-command-sentinel)\n\t\t ;; Use the comint filter for proper handling of\n\t\t ;; carriage motion (see comint-inhibit-carriage-motion).\n\t\t (set-process-filter proc 'comint-output-filter)\n (if async-shell-command-display-buffer\n ;; Display buffer immediately.\n (display-buffer buffer '(nil (allow-no-window . t)))\n ;; Defer displaying buffer until first process output.\n ;; Use disposable named advice so that the buffer is\n ;; displayed at most once per process lifetime.\n (let ((nonce (make-symbol \"nonce\")))\n (add-function :before (process-filter proc)\n (lambda (proc _string)\n (let ((buf (process-buffer proc)))\n (when (buffer-live-p buf)\n (remove-function (process-filter proc)\n nonce)\n (display-buffer buf))))\n `((name . ,nonce)))))))\n\t ;; Otherwise, command is executed synchronously.\n\t (shell-command-on-region (point) (point) command\n\t\t\t\t output-buffer nil error-buffer)))))))\n\n(defun display-message-or-buffer (message &optional buffer-name action frame)\n \"Display MESSAGE in the echo area if possible, otherwise in a pop-up buffer.\nMESSAGE may be either a string or a buffer.\n\nA pop-up buffer is displayed using `display-buffer' if MESSAGE is too long\nfor maximum height of the echo area, as defined by `max-mini-window-height'\nif `resize-mini-windows' is non-nil.\n\nReturns either the string shown in the echo area, or when a pop-up\nbuffer is used, the window used to display it.\n\nIf MESSAGE is a string, then the optional argument BUFFER-NAME is the\nname of the buffer used to display it in the case where a pop-up buffer\nis used, defaulting to `*Message*'. In the case where MESSAGE is a\nstring and it is displayed in the echo area, it is not specified whether\nthe contents are inserted into the buffer anyway.\n\nOptional arguments ACTION and FRAME are as for `display-buffer',\nand are only used if a pop-up buffer is displayed.\"\n (cond ((and (stringp message) (not (string-match \"\\n\" message)))\n\t ;; Trivial case where we can use the echo area\n\t (message \"%s\" message))\n\t((and (stringp message)\n\t (= (string-match \"\\n\" message) (1- (length message))))\n\t ;; Trivial case where we can just remove single trailing newline\n\t (message \"%s\" (substring message 0 (1- (length message)))))\n\t(t\n\t ;; General case\n\t (with-current-buffer\n\t (if (bufferp message)\n\t\t message\n\t (get-buffer-create (or buffer-name \"*Message*\")))\n\n\t (unless (bufferp message)\n\t (erase-buffer)\n\t (insert message))\n\n\t (let ((lines\n\t\t (if (= (buffer-size) 0)\n\t\t 0\n\t\t (count-screen-lines nil nil nil (minibuffer-window)))))\n\t (cond ((= lines 0))\n\t\t ((and (or (<= lines 1)\n\t\t\t (<= lines\n\t\t\t\t (if resize-mini-windows\n\t\t\t\t (cond ((floatp max-mini-window-height)\n\t\t\t\t\t (* (frame-height)\n\t\t\t\t\t max-mini-window-height))\n\t\t\t\t\t ((integerp max-mini-window-height)\n\t\t\t\t\t max-mini-window-height)\n\t\t\t\t\t (t\n\t\t\t\t\t 1))\n\t\t\t\t 1)))\n\t\t\t ;; Don't use the echo area if the output buffer is\n\t\t\t ;; already displayed in the selected frame.\n\t\t\t (not (get-buffer-window (current-buffer))))\n\t\t ;; Echo area\n\t\t (goto-char (point-max))\n\t\t (when (bolp)\n\t\t (backward-char 1))\n\t\t (message \"%s\" (buffer-substring (point-min) (point))))\n\t\t (t\n\t\t ;; Buffer\n\t\t (goto-char (point-min))\n\t\t (display-buffer (current-buffer) action frame))))))))\n\n\n;; We have a sentinel to prevent insertion of a termination message\n;; in the buffer itself, and to set the point in the buffer when\n;; `shell-command-dont-erase-buffer' is non-nil.\n(defun shell-command-sentinel (process signal)\n (when (memq (process-status process) '(exit signal))\n (shell-command--set-point-after-cmd (process-buffer process))\n (message \"%s: %s.\"\n (car (cdr (cdr (process-command process))))\n (substring signal 0 -1))))\n\n(defun shell-command-on-region (start end command\n\t\t\t\t &optional output-buffer replace\n\t\t\t\t error-buffer display-error-buffer\n\t\t\t\t region-noncontiguous-p)\n \"Execute string COMMAND in inferior shell with region as input.\nNormally display output (if any) in temp buffer `*Shell Command Output*';\nPrefix arg means replace the region with it. Return the exit code of\nCOMMAND.\n\nTo specify a coding system for converting non-ASCII characters\nin the input and output to the shell command, use \\\\[universal-coding-system-argument]\nbefore this command. By default, the input (from the current buffer)\nis encoded using coding-system specified by `process-coding-system-alist',\nfalling back to `default-process-coding-system' if no match for COMMAND\nis found in `process-coding-system-alist'.\n\nNoninteractive callers can specify coding systems by binding\n`coding-system-for-read' and `coding-system-for-write'.\n\nIf the command generates output, the output may be displayed\nin the echo area or in a buffer.\nIf the output is short enough to display in the echo area\n\\(determined by the variable `max-mini-window-height' if\n`resize-mini-windows' is non-nil), it is shown there.\nOtherwise it is displayed in the buffer `*Shell Command Output*'.\nThe output is available in that buffer in both cases.\n\nIf there is output and an error, a message about the error\nappears at the end of the output.\n\nOptional fourth arg OUTPUT-BUFFER specifies where to put the\ncommand's output. If the value is a buffer or buffer name,\nerase that buffer and insert the output there; a non-nil value of\n`shell-command-dont-erase-buffer' prevent to erase the buffer.\nIf the value is nil, use the buffer `*Shell Command Output*'.\nAny other non-nil value means to insert the output in the\ncurrent buffer after START.\n\nOptional fifth arg REPLACE, if non-nil, means to insert the\noutput in place of text from START to END, putting point and mark\naround it.\n\nOptional sixth arg ERROR-BUFFER, if non-nil, specifies a buffer\nor buffer name to which to direct the command's standard error\noutput. If nil, error output is mingled with regular output.\nWhen called interactively, `shell-command-default-error-buffer'\nis used for ERROR-BUFFER.\n\nOptional seventh arg DISPLAY-ERROR-BUFFER, if non-nil, means to\ndisplay the error buffer if there were any errors. When called\ninteractively, this is t.\"\n (interactive (let (string)\n\t\t (unless (mark)\n\t\t (user-error \"The mark is not set now, so there is no region\"))\n\t\t ;; Do this before calling region-beginning\n\t\t ;; and region-end, in case subprocess output\n\t\t ;; relocates them while we are in the minibuffer.\n\t\t (setq string (read-shell-command \"Shell command on region: \"))\n\t\t ;; call-interactively recognizes region-beginning and\n\t\t ;; region-end specially, leaving them in the history.\n\t\t (list (region-beginning) (region-end)\n\t\t string\n\t\t current-prefix-arg\n\t\t current-prefix-arg\n\t\t shell-command-default-error-buffer\n\t\t t\n\t\t (region-noncontiguous-p))))\n (let ((error-file\n\t (if error-buffer\n\t (make-temp-file\n\t (expand-file-name \"scor\"\n\t\t\t\t(or small-temporary-file-directory\n\t\t\t\t temporary-file-directory)))\n\t nil))\n\texit-status)\n ;; Unless a single contiguous chunk is selected, operate on multiple chunks.\n (if region-noncontiguous-p\n (let ((input (concat (funcall region-extract-function 'delete) \"\\n\"))\n output)\n (with-temp-buffer\n (insert input)\n (call-process-region (point-min) (point-max)\n shell-file-name t t\n nil shell-command-switch\n command)\n (setq output (split-string (buffer-string) \"\\n\")))\n (goto-char start)\n (funcall region-insert-function output))\n (if (or replace\n (and output-buffer\n (not (or (bufferp output-buffer) (stringp output-buffer)))))\n ;; Replace specified region with output from command.\n (let ((swap (and replace (< start end))))\n ;; Don't muck with mark unless REPLACE says we should.\n (goto-char start)\n (and replace (push-mark (point) 'nomsg))\n (setq exit-status\n (call-shell-region start end command replace\n (if error-file\n (list t error-file)\n t)))\n ;; It is rude to delete a buffer which the command is not using.\n ;; (let ((shell-buffer (get-buffer \"*Shell Command Output*\")))\n ;; (and shell-buffer (not (eq shell-buffer (current-buffer)))\n ;; \t (kill-buffer shell-buffer)))\n ;; Don't muck with mark unless REPLACE says we should.\n (and replace swap (exchange-point-and-mark)))\n ;; No prefix argument: put the output in a temp buffer,\n ;; replacing its entire contents.\n (let ((buffer (get-buffer-create\n (or output-buffer \"*Shell Command Output*\"))))\n (unwind-protect\n (if (and (eq buffer (current-buffer))\n (or (not shell-command-dont-erase-buffer)\n (and (not (eq buffer (get-buffer \"*Shell Command Output*\")))\n (not (region-active-p)))))\n ;; If the input is the same buffer as the output,\n ;; delete everything but the specified region,\n ;; then replace that region with the output.\n (progn (setq buffer-read-only nil)\n (delete-region (max start end) (point-max))\n (delete-region (point-min) (min start end))\n (setq exit-status\n (call-process-region (point-min) (point-max)\n shell-file-name t\n (if error-file\n (list t error-file)\n t)\n nil shell-command-switch\n command)))\n ;; Clear the output buffer, then run the command with\n ;; output there.\n (let ((directory default-directory))\n (with-current-buffer buffer\n (if (not output-buffer)\n (setq default-directory directory))\n (shell-command--save-pos-or-erase)))\n (setq exit-status\n (call-shell-region start end command nil\n (if error-file\n (list buffer error-file)\n buffer))))\n ;; Report the output.\n (with-current-buffer buffer\n (setq mode-line-process\n (cond ((null exit-status)\n \" - Error\")\n ((stringp exit-status)\n (format \" - Signal [%s]\" exit-status))\n ((not (equal 0 exit-status))\n (format \" - Exit [%d]\" exit-status)))))\n (if (with-current-buffer buffer (> (point-max) (point-min)))\n ;; There's some output, display it\n (progn\n (display-message-or-buffer buffer)\n (shell-command--set-point-after-cmd buffer))\n ;; No output; error?\n (let ((output\n (if (and error-file\n (< 0 (nth 7 (file-attributes error-file))))\n (format \"some error output%s\"\n (if shell-command-default-error-buffer\n (format \" to the \\\"%s\\\" buffer\"\n shell-command-default-error-buffer)\n \"\"))\n \"no output\")))\n (cond ((null exit-status)\n (message \"(Shell command failed with error)\"))\n ((equal 0 exit-status)\n (message \"(Shell command succeeded with %s)\"\n output))\n ((stringp exit-status)\n (message \"(Shell command killed by signal %s)\"\n exit-status))\n (t\n (message \"(Shell command failed with code %d and %s)\"\n exit-status output))))\n ;; Don't kill: there might be useful info in the undo-log.\n ;; (kill-buffer buffer)\n )))))\n\n (when (and error-file (file-exists-p error-file))\n (if (< 0 (nth 7 (file-attributes error-file)))\n\t (with-current-buffer (get-buffer-create error-buffer)\n\t (let ((pos-from-end (- (point-max) (point))))\n\t (or (bobp)\n\t\t (insert \"\\f\\n\"))\n\t ;; Do no formatting while reading error file,\n\t ;; because that can run a shell command, and we\n\t ;; don't want that to cause an infinite recursion.\n\t (format-insert-file error-file nil)\n\t ;; Put point after the inserted errors.\n\t (goto-char (- (point-max) pos-from-end)))\n\t (and display-error-buffer\n\t\t (display-buffer (current-buffer)))))\n (delete-file error-file))\n exit-status))\n\n(defun shell-command-to-string (command)\n \"Execute shell command COMMAND and return its output as a string.\"\n (with-output-to-string\n (with-current-buffer\n standard-output\n (process-file shell-file-name nil t nil shell-command-switch command))))\n\n(defun process-file (program &optional infile buffer display &rest args)\n \"Process files synchronously in a separate process.\nSimilar to `call-process', but may invoke a file handler based on\n`default-directory'. The current working directory of the\nsubprocess is `default-directory'.\n\nFile names in INFILE and BUFFER are handled normally, but file\nnames in ARGS should be relative to `default-directory', as they\nare passed to the process verbatim. (This is a difference to\n`call-process' which does not support file handlers for INFILE\nand BUFFER.)\n\nSome file handlers might not support all variants, for example\nthey might behave as if DISPLAY was nil, regardless of the actual\nvalue passed.\"\n (let ((fh (find-file-name-handler default-directory 'process-file))\n lc stderr-file)\n (unwind-protect\n (if fh (apply fh 'process-file program infile buffer display args)\n (when infile (setq lc (file-local-copy infile)))\n (setq stderr-file (when (and (consp buffer) (stringp (cadr buffer)))\n (make-temp-file \"emacs\")))\n (prog1\n (apply 'call-process program\n (or lc infile)\n (if stderr-file (list (car buffer) stderr-file) buffer)\n display args)\n (when stderr-file (copy-file stderr-file (cadr buffer) t))))\n (when stderr-file (delete-file stderr-file))\n (when lc (delete-file lc)))))\n\n(defvar process-file-side-effects t\n \"Whether a call of `process-file' changes remote files.\n\nBy default, this variable is always set to t, meaning that a\ncall of `process-file' could potentially change any file on a\nremote host. When set to nil, a file handler could optimize\nits behavior with respect to remote file attribute caching.\n\nYou should only ever change this variable with a let-binding;\nnever with `setq'.\")\n\n(defun start-file-process (name buffer program &rest program-args)\n \"Start a program in a subprocess. Return the process object for it.\n\nSimilar to `start-process', but may invoke a file handler based on\n`default-directory'. See Info node `(elisp)Magic File Names'.\n\nThis handler ought to run PROGRAM, perhaps on the local host,\nperhaps on a remote host that corresponds to `default-directory'.\nIn the latter case, the local part of `default-directory' becomes\nthe working directory of the process.\n\nPROGRAM and PROGRAM-ARGS might be file names. They are not\nobjects of file handler invocation. File handlers might not\nsupport pty association, if PROGRAM is nil.\"\n (let ((fh (find-file-name-handler default-directory 'start-file-process)))\n (if fh (apply fh 'start-file-process name buffer program program-args)\n (apply 'start-process name buffer program program-args))))\n\f\n;;;; Process menu\n\n(defvar tabulated-list-format)\n(defvar tabulated-list-entries)\n(defvar tabulated-list-sort-key)\n(declare-function tabulated-list-init-header \"tabulated-list\" ())\n(declare-function tabulated-list-print \"tabulated-list\"\n (&optional remember-pos update))\n\n(defvar process-menu-query-only nil)\n\n(defvar process-menu-mode-map\n (let ((map (make-sparse-keymap)))\n (define-key map [?d] 'process-menu-delete-process)\n map))\n\n(define-derived-mode process-menu-mode tabulated-list-mode \"Process Menu\"\n \"Major mode for listing the processes called by Emacs.\"\n (setq tabulated-list-format [(\"Process\" 15 t)\n\t\t\t (\"PID\" 7 t)\n\t\t\t (\"Status\" 7 t)\n\t\t\t (\"Buffer\" 15 t)\n\t\t\t (\"TTY\" 12 t)\n\t\t\t (\"Command\" 0 t)])\n (make-local-variable 'process-menu-query-only)\n (setq tabulated-list-sort-key (cons \"Process\" nil))\n (add-hook 'tabulated-list-revert-hook 'list-processes--refresh nil t))\n\n(defun process-menu-delete-process ()\n \"Kill process at point in a `list-processes' buffer.\"\n (interactive)\n (let ((pos (point)))\n (delete-process (tabulated-list-get-id))\n (revert-buffer)\n (goto-char (min pos (point-max)))\n (if (eobp)\n (forward-line -1)\n (beginning-of-line))))\n\n(defun list-processes--refresh ()\n \"Recompute the list of processes for the Process List buffer.\nAlso, delete any process that is exited or signaled.\"\n (setq tabulated-list-entries nil)\n (dolist (p (process-list))\n (cond ((memq (process-status p) '(exit signal closed))\n\t (delete-process p))\n\t ((or (not process-menu-query-only)\n\t (process-query-on-exit-flag p))\n\t (let* ((buf (process-buffer p))\n\t\t (type (process-type p))\n\t\t (pid (if (process-id p) (format \"%d\" (process-id p)) \"--\"))\n\t\t (name (process-name p))\n\t\t (status (symbol-name (process-status p)))\n\t\t (buf-label (if (buffer-live-p buf)\n\t\t\t\t `(,(buffer-name buf)\n\t\t\t\t face link\n\t\t\t\t help-echo ,(format-message\n\t\t\t\t\t \"Visit buffer `%s'\"\n\t\t\t\t\t (buffer-name buf))\n\t\t\t\t follow-link t\n\t\t\t\t process-buffer ,buf\n\t\t\t\t action process-menu-visit-buffer)\n\t\t\t \"--\"))\n\t\t (tty (or (process-tty-name p) \"--\"))\n\t\t (cmd\n\t\t (if (memq type '(network serial))\n\t\t (let ((contact (process-contact p t)))\n\t\t\t (if (eq type 'network)\n\t\t\t (format \"(%s %s)\"\n\t\t\t\t (if (plist-get contact :type)\n\t\t\t\t\t \"datagram\"\n\t\t\t\t \"network\")\n\t\t\t\t (if (plist-get contact :server)\n\t\t\t\t\t (format \"server on %s\"\n\t\t\t\t\t\t (or\n\t\t\t\t\t\t (plist-get contact :host)\n\t\t\t\t\t\t (plist-get contact :local)))\n\t\t\t\t (format \"connection to %s\"\n\t\t\t\t\t (plist-get contact :host))))\n\t\t\t (format \"(serial port %s%s)\"\n\t\t\t\t (or (plist-get contact :port) \"?\")\n\t\t\t\t (let ((speed (plist-get contact :speed)))\n\t\t\t\t (if speed\n\t\t\t\t\t (format \" at %s b/s\" speed)\n\t\t\t\t \"\")))))\n\t\t (mapconcat 'identity (process-command p) \" \"))))\n\t (push (list p (vector name pid status buf-label tty cmd))\n\t\t tabulated-list-entries)))))\n (tabulated-list-init-header))\n\n(defun process-menu-visit-buffer (button)\n (display-buffer (button-get button 'process-buffer)))\n\n(defun list-processes (&optional query-only buffer)\n \"Display a list of all processes that are Emacs sub-processes.\nIf optional argument QUERY-ONLY is non-nil, only processes with\nthe query-on-exit flag set are listed.\nAny process listed as exited or signaled is actually eliminated\nafter the listing is made.\nOptional argument BUFFER specifies a buffer to use, instead of\n\\\"*Process List*\\\".\nThe return value is always nil.\n\nThis function lists only processes that were launched by Emacs. To\nsee other processes running on the system, use `list-system-processes'.\"\n (interactive)\n (or (fboundp 'process-list)\n (error \"Asynchronous subprocesses are not supported on this system\"))\n (unless (bufferp buffer)\n (setq buffer (get-buffer-create \"*Process List*\")))\n (with-current-buffer buffer\n (process-menu-mode)\n (setq process-menu-query-only query-only)\n (list-processes--refresh)\n (tabulated-list-print))\n (display-buffer buffer)\n nil)\n\f\n;;;; Prefix commands\n\n(setq prefix-command--needs-update nil)\n(setq prefix-command--last-echo nil)\n\n(defun internal-echo-keystrokes-prefix ()\n ;; BEWARE: Called directly from C code.\n ;; If the return value is non-nil, it means we are in the middle of\n ;; a command with prefix, such as a command invoked with prefix-arg.\n (if (not prefix-command--needs-update)\n prefix-command--last-echo\n (setq prefix-command--last-echo\n (let ((strs nil))\n (run-hook-wrapped 'prefix-command-echo-keystrokes-functions\n (lambda (fun) (push (funcall fun) strs)))\n (setq strs (delq nil strs))\n (when strs (mapconcat #'identity strs \" \"))))))\n\n(defvar prefix-command-echo-keystrokes-functions nil\n \"Abnormal hook which constructs the description of the current prefix state.\nEach function is called with no argument, should return a string or nil.\")\n\n(defun prefix-command-update ()\n \"Update state of prefix commands.\nCall it whenever you change the \\\"prefix command state\\\".\"\n (setq prefix-command--needs-update t))\n\n(defvar prefix-command-preserve-state-hook nil\n \"Normal hook run when a command needs to preserve the prefix.\")\n\n(defun prefix-command-preserve-state ()\n \"Pass the current prefix command state to the next command.\nShould be called by all prefix commands.\nRuns `prefix-command-preserve-state-hook'.\"\n (run-hooks 'prefix-command-preserve-state-hook)\n ;; If the current command is a prefix command, we don't want the next (real)\n ;; command to have `last-command' set to, say, `universal-argument'.\n (setq this-command last-command)\n (setq real-this-command real-last-command)\n (prefix-command-update))\n\n(defun reset-this-command-lengths ()\n (declare (obsolete prefix-command-preserve-state \"25.1\"))\n nil)\n\n;;;;; The main prefix command.\n\n;; FIXME: Declaration of `prefix-arg' should be moved here!?\n\n(add-hook 'prefix-command-echo-keystrokes-functions\n #'universal-argument--description)\n(defun universal-argument--description ()\n (when prefix-arg\n (concat \"C-u\"\n (pcase prefix-arg\n (`(-) \" -\")\n (`(,(and (pred integerp) n))\n (let ((str \"\"))\n (while (and (> n 4) (= (mod n 4) 0))\n (setq str (concat str \" C-u\"))\n (setq n (/ n 4)))\n (if (= n 4) str (format \" %s\" prefix-arg))))\n (_ (format \" %s\" prefix-arg))))))\n\n(add-hook 'prefix-command-preserve-state-hook\n #'universal-argument--preserve)\n(defun universal-argument--preserve ()\n (setq prefix-arg current-prefix-arg))\n\n(defvar universal-argument-map\n (let ((map (make-sparse-keymap))\n (universal-argument-minus\n ;; For backward compatibility, minus with no modifiers is an ordinary\n ;; command if digits have already been entered.\n `(menu-item \"\" negative-argument\n :filter ,(lambda (cmd)\n (if (integerp prefix-arg) nil cmd)))))\n (define-key map [switch-frame]\n (lambda (e) (interactive \"e\")\n (handle-switch-frame e) (universal-argument--mode)))\n (define-key map [?\\C-u] 'universal-argument-more)\n (define-key map [?-] universal-argument-minus)\n (define-key map [?0] 'digit-argument)\n (define-key map [?1] 'digit-argument)\n (define-key map [?2] 'digit-argument)\n (define-key map [?3] 'digit-argument)\n (define-key map [?4] 'digit-argument)\n (define-key map [?5] 'digit-argument)\n (define-key map [?6] 'digit-argument)\n (define-key map [?7] 'digit-argument)\n (define-key map [?8] 'digit-argument)\n (define-key map [?9] 'digit-argument)\n (define-key map [kp-0] 'digit-argument)\n (define-key map [kp-1] 'digit-argument)\n (define-key map [kp-2] 'digit-argument)\n (define-key map [kp-3] 'digit-argument)\n (define-key map [kp-4] 'digit-argument)\n (define-key map [kp-5] 'digit-argument)\n (define-key map [kp-6] 'digit-argument)\n (define-key map [kp-7] 'digit-argument)\n (define-key map [kp-8] 'digit-argument)\n (define-key map [kp-9] 'digit-argument)\n (define-key map [kp-subtract] universal-argument-minus)\n map)\n \"Keymap used while processing \\\\[universal-argument].\")\n\n(defun universal-argument--mode ()\n (prefix-command-update)\n (set-transient-map universal-argument-map nil))\n\n(defun universal-argument ()\n \"Begin a numeric argument for the following command.\nDigits or minus sign following \\\\[universal-argument] make up the numeric argument.\n\\\\[universal-argument] following the digits or minus sign ends the argument.\n\\\\[universal-argument] without digits or minus sign provides 4 as argument.\nRepeating \\\\[universal-argument] without digits or minus sign\n multiplies the argument by 4 each time.\nFor some commands, just \\\\[universal-argument] by itself serves as a flag\nwhich is different in effect from any particular numeric argument.\nThese commands include \\\\[set-mark-command] and \\\\[start-kbd-macro].\"\n (interactive)\n (prefix-command-preserve-state)\n (setq prefix-arg (list 4))\n (universal-argument--mode))\n\n(defun universal-argument-more (arg)\n ;; A subsequent C-u means to multiply the factor by 4 if we've typed\n ;; nothing but C-u's; otherwise it means to terminate the prefix arg.\n (interactive \"P\")\n (prefix-command-preserve-state)\n (setq prefix-arg (if (consp arg)\n (list (* 4 (car arg)))\n (if (eq arg '-)\n (list -4)\n arg)))\n (when (consp prefix-arg) (universal-argument--mode)))\n\n(defun negative-argument (arg)\n \"Begin a negative numeric argument for the next command.\n\\\\[universal-argument] following digits or minus sign ends the argument.\"\n (interactive \"P\")\n (prefix-command-preserve-state)\n (setq prefix-arg (cond ((integerp arg) (- arg))\n ((eq arg '-) nil)\n (t '-)))\n (universal-argument--mode))\n\n(defun digit-argument (arg)\n \"Part of the numeric argument for the next command.\n\\\\[universal-argument] following digits or minus sign ends the argument.\"\n (interactive \"P\")\n (prefix-command-preserve-state)\n (let* ((char (if (integerp last-command-event)\n\t\t last-command-event\n\t\t (get last-command-event 'ascii-character)))\n\t (digit (- (logand char ?\\177) ?0)))\n (setq prefix-arg (cond ((integerp arg)\n (+ (* arg 10)\n\t\t\t (if (< arg 0) (- digit) digit)))\n ((eq arg '-)\n ;; Treat -0 as just -, so that -01 will work.\n (if (zerop digit) '- (- digit)))\n (t\n digit))))\n (universal-argument--mode))\n\f\n\n(defvar filter-buffer-substring-functions nil\n \"This variable is a wrapper hook around `buffer-substring--filter'.\n\\(See `with-wrapper-hook' for details about wrapper hooks.)\")\n(make-obsolete-variable 'filter-buffer-substring-functions\n 'filter-buffer-substring-function \"24.4\")\n\n(defvar filter-buffer-substring-function #'buffer-substring--filter\n \"Function to perform the filtering in `filter-buffer-substring'.\nThe function is called with the same 3 arguments (BEG END DELETE)\nthat `filter-buffer-substring' received. It should return the\nbuffer substring between BEG and END, after filtering. If DELETE is\nnon-nil, it should delete the text between BEG and END from the buffer.\")\n\n(defvar buffer-substring-filters nil\n \"List of filter functions for `buffer-substring--filter'.\nEach function must accept a single argument, a string, and return a string.\nThe buffer substring is passed to the first function in the list,\nand the return value of each function is passed to the next.\nAs a special convention, point is set to the start of the buffer text\nbeing operated on (i.e., the first argument of `buffer-substring--filter')\nbefore these functions are called.\")\n(make-obsolete-variable 'buffer-substring-filters\n 'filter-buffer-substring-function \"24.1\")\n\n(defun filter-buffer-substring (beg end &optional delete)\n \"Return the buffer substring between BEG and END, after filtering.\nIf DELETE is non-nil, delete the text between BEG and END from the buffer.\n\nThis calls the function that `filter-buffer-substring-function' specifies\n\\(passing the same three arguments that it received) to do the work,\nand returns whatever it does. The default function does no filtering,\nunless a hook has been set.\n\nUse `filter-buffer-substring' instead of `buffer-substring',\n`buffer-substring-no-properties', or `delete-and-extract-region' when\nyou want to allow filtering to take place. For example, major or minor\nmodes can use `filter-buffer-substring-function' to extract characters\nthat are special to a buffer, and should not be copied into other buffers.\"\n (funcall filter-buffer-substring-function beg end delete))\n\n(defun buffer-substring--filter (beg end &optional delete)\n \"Default function to use for `filter-buffer-substring-function'.\nIts arguments and return value are as specified for `filter-buffer-substring'.\nAlso respects the obsolete wrapper hook `filter-buffer-substring-functions'\n\\(see `with-wrapper-hook' for details about wrapper hooks),\nand the abnormal hook `buffer-substring-filters'.\nNo filtering is done unless a hook says to.\"\n (subr--with-wrapper-hook-no-warnings\n filter-buffer-substring-functions (beg end delete)\n (cond\n ((or delete buffer-substring-filters)\n (save-excursion\n (goto-char beg)\n (let ((string (if delete (delete-and-extract-region beg end)\n (buffer-substring beg end))))\n (dolist (filter buffer-substring-filters)\n (setq string (funcall filter string)))\n string)))\n (t\n (buffer-substring beg end)))))\n\n\n;;;; Window system cut and paste hooks.\n\n(defvar interprogram-cut-function #'gui-select-text\n \"Function to call to make a killed region available to other programs.\nMost window systems provide a facility for cutting and pasting\ntext between different programs, such as the clipboard on X and\nMS-Windows, or the pasteboard on Nextstep/Mac OS.\n\nThis variable holds a function that Emacs calls whenever text is\nput in the kill ring, to make the new kill available to other\nprograms. The function takes one argument, TEXT, which is a\nstring containing the text which should be made available.\")\n\n(defvar interprogram-paste-function #'gui-selection-value\n \"Function to call to get text cut from other programs.\nMost window systems provide a facility for cutting and pasting\ntext between different programs, such as the clipboard on X and\nMS-Windows, or the pasteboard on Nextstep/Mac OS.\n\nThis variable holds a function that Emacs calls to obtain text\nthat other programs have provided for pasting. The function is\ncalled with no arguments. If no other program has provided text\nto paste, the function should return nil (in which case the\ncaller, usually `current-kill', should use the top of the Emacs\nkill ring). If another program has provided text to paste, the\nfunction should return that text as a string (in which case the\ncaller should put this string in the kill ring as the latest\nkill).\n\nThe function may also return a list of strings if the window\nsystem supports multiple selections. The first string will be\nused as the pasted text, but the other will be placed in the kill\nring for easy access via `yank-pop'.\n\nNote that the function should return a string only if a program\nother than Emacs has provided a string for pasting; if Emacs\nprovided the most recent string, the function should return nil.\nIf it is difficult to tell whether Emacs or some other program\nprovided the current string, it is probably good enough to return\nnil if the string is equal (according to `string=') to the last\ntext Emacs provided.\")\n\f\n\n\n;;;; The kill ring data structure.\n\n(defvar kill-ring nil\n \"List of killed text sequences.\nSince the kill ring is supposed to interact nicely with cut-and-paste\nfacilities offered by window systems, use of this variable should\ninteract nicely with `interprogram-cut-function' and\n`interprogram-paste-function'. The functions `kill-new',\n`kill-append', and `current-kill' are supposed to implement this\ninteraction; you may want to use them instead of manipulating the kill\nring directly.\")\n\n(defcustom kill-ring-max 60\n \"Maximum length of kill ring before oldest elements are thrown away.\"\n :type 'integer\n :group 'killing)\n\n(defvar kill-ring-yank-pointer nil\n \"The tail of the kill ring whose car is the last thing yanked.\")\n\n(defcustom save-interprogram-paste-before-kill nil\n \"Save existing clipboard text into kill ring before replacing it.\nA non-nil value ensures that Emacs kill operations do not\nirrevocably overwrite existing clipboard text by saving it to the\n`kill-ring' prior to the kill. Such text can subsequently be\nretrieved via \\\\[yank] \\\\[yank-pop]].\"\n :type 'boolean\n :group 'killing\n :version \"23.2\")\n\n(defcustom kill-do-not-save-duplicates nil\n \"Do not add a new string to `kill-ring' if it duplicates the last one.\nThe comparison is done using `equal-including-properties'.\"\n :type 'boolean\n :group 'killing\n :version \"23.2\")\n\n(defun kill-new (string &optional replace)\n \"Make STRING the latest kill in the kill ring.\nSet `kill-ring-yank-pointer' to point to it.\nIf `interprogram-cut-function' is non-nil, apply it to STRING.\nOptional second argument REPLACE non-nil means that STRING will replace\nthe front of the kill ring, rather than being added to the list.\n\nWhen `save-interprogram-paste-before-kill' and `interprogram-paste-function'\nare non-nil, save the interprogram paste string(s) into `kill-ring' before\nSTRING.\n\nWhen the yank handler has a non-nil PARAM element, the original STRING\nargument is not used by `insert-for-yank'. However, since Lisp code\nmay access and use elements from the kill ring directly, the STRING\nargument should still be a \\\"useful\\\" string for such uses.\"\n (unless (and kill-do-not-save-duplicates\n\t ;; Due to text properties such as 'yank-handler that\n\t ;; can alter the contents to yank, comparison using\n\t ;; `equal' is unsafe.\n\t (equal-including-properties string (car kill-ring)))\n (if (fboundp 'menu-bar-update-yank-menu)\n\t(menu-bar-update-yank-menu string (and replace (car kill-ring)))))\n (when save-interprogram-paste-before-kill\n (let ((interprogram-paste (and interprogram-paste-function\n (funcall interprogram-paste-function))))\n (when interprogram-paste\n (dolist (s (if (listp interprogram-paste)\n\t\t (nreverse interprogram-paste)\n\t\t (list interprogram-paste)))\n\t (unless (and kill-do-not-save-duplicates\n\t\t (equal-including-properties s (car kill-ring)))\n\t (push s kill-ring))))))\n (unless (and kill-do-not-save-duplicates\n\t (equal-including-properties string (car kill-ring)))\n (if (and replace kill-ring)\n\t(setcar kill-ring string)\n (push string kill-ring)\n (if (> (length kill-ring) kill-ring-max)\n\t (setcdr (nthcdr (1- kill-ring-max) kill-ring) nil))))\n (setq kill-ring-yank-pointer kill-ring)\n (if interprogram-cut-function\n (funcall interprogram-cut-function string)))\n\n;; It has been argued that this should work like `self-insert-command'\n;; which merges insertions in `buffer-undo-list' in groups of 20\n;; (hard-coded in `undo-auto-amalgamate').\n(defcustom kill-append-merge-undo nil\n \"Amalgamate appending kills with the last kill for undo.\nWhen non-nil, appending or prepending text to the last kill makes\n\\\\[undo] restore both pieces of text simultaneously.\"\n :type 'boolean\n :group 'killing\n :version \"25.1\")\n\n(defun kill-append (string before-p)\n \"Append STRING to the end of the latest kill in the kill ring.\nIf BEFORE-P is non-nil, prepend STRING to the kill instead.\nIf `interprogram-cut-function' is non-nil, call it with the\nresulting kill.\nIf `kill-append-merge-undo' is non-nil, remove the last undo\nboundary in the current buffer.\"\n (let* ((cur (car kill-ring)))\n (kill-new (if before-p (concat string cur) (concat cur string))\n\t (or (= (length cur) 0)\n\t\t (equal nil (get-text-property 0 'yank-handler cur))))\n (when (and kill-append-merge-undo (not buffer-read-only))\n (let ((prev buffer-undo-list)\n (next (cdr buffer-undo-list)))\n ;; find the next undo boundary\n (while (car next)\n (pop next)\n (pop prev))\n ;; remove this undo boundary\n (when prev\n (setcdr prev (cdr next)))))))\n\n(defcustom yank-pop-change-selection nil\n \"Whether rotating the kill ring changes the window system selection.\nIf non-nil, whenever the kill ring is rotated (usually via the\n`yank-pop' command), Emacs also calls `interprogram-cut-function'\nto copy the new kill to the window system selection.\"\n :type 'boolean\n :group 'killing\n :version \"23.1\")\n\n(defun current-kill (n &optional do-not-move)\n \"Rotate the yanking point by N places, and then return that kill.\nIf N is zero and `interprogram-paste-function' is set to a\nfunction that returns a string or a list of strings, and if that\nfunction doesn't return nil, then that string (or list) is added\nto the front of the kill ring and the string (or first string in\nthe list) is returned as the latest kill.\n\nIf N is not zero, and if `yank-pop-change-selection' is\nnon-nil, use `interprogram-cut-function' to transfer the\nkill at the new yank point into the window system selection.\n\nIf optional arg DO-NOT-MOVE is non-nil, then don't actually\nmove the yanking point; just return the Nth kill forward.\"\n\n (let ((interprogram-paste (and (= n 0)\n\t\t\t\t interprogram-paste-function\n\t\t\t\t (funcall interprogram-paste-function))))\n (if interprogram-paste\n\t(progn\n\t ;; Disable the interprogram cut function when we add the new\n\t ;; text to the kill ring, so Emacs doesn't try to own the\n\t ;; selection, with identical text.\n\t (let ((interprogram-cut-function nil))\n\t (if (listp interprogram-paste)\n\t (mapc 'kill-new (nreverse interprogram-paste))\n\t (kill-new interprogram-paste)))\n\t (car kill-ring))\n (or kill-ring (error \"Kill ring is empty\"))\n (let ((ARGth-kill-element\n\t (nthcdr (mod (- n (length kill-ring-yank-pointer))\n\t\t\t (length kill-ring))\n\t\t kill-ring)))\n\t(unless do-not-move\n\t (setq kill-ring-yank-pointer ARGth-kill-element)\n\t (when (and yank-pop-change-selection\n\t\t (> n 0)\n\t\t interprogram-cut-function)\n\t (funcall interprogram-cut-function (car ARGth-kill-element))))\n\t(car ARGth-kill-element)))))\n\n\n\n;;;; Commands for manipulating the kill ring.\n\n(defcustom kill-read-only-ok nil\n \"Non-nil means don't signal an error for killing read-only text.\"\n :type 'boolean\n :group 'killing)\n\n(defun kill-region (beg end &optional region)\n \"Kill (\\\"cut\\\") text between point and mark.\nThis deletes the text from the buffer and saves it in the kill ring.\nThe command \\\\[yank] can retrieve it from there.\n\\(If you want to save the region without killing it, use \\\\[kill-ring-save].)\n\nIf you want to append the killed region to the last killed text,\nuse \\\\[append-next-kill] before \\\\[kill-region].\n\nAny command that calls this function is a \\\"kill command\\\".\nIf the previous command was also a kill command,\nthe text killed this time appends to the text killed last time\nto make one entry in the kill ring.\n\nThe killed text is filtered by `filter-buffer-substring' before it is\nsaved in the kill ring, so the actual saved text might be different\nfrom what was killed.\n\nIf the buffer is read-only, Emacs will beep and refrain from deleting\nthe text, but put the text in the kill ring anyway. This means that\nyou can use the killing commands to copy text from a read-only buffer.\n\nLisp programs should use this function for killing text.\n (To delete text, use `delete-region'.)\nSupply two arguments, character positions BEG and END indicating the\n stretch of text to be killed. If the optional argument REGION is\n non-nil, the function ignores BEG and END, and kills the current\n region instead.\"\n ;; Pass mark first, then point, because the order matters when\n ;; calling `kill-append'.\n (interactive (list (mark) (point) 'region))\n (unless (and beg end)\n (user-error \"The mark is not set now, so there is no region\"))\n (condition-case nil\n (let ((string (if region\n (funcall region-extract-function 'delete)\n (filter-buffer-substring beg end 'delete))))\n\t(when string\t\t\t;STRING is nil if BEG = END\n\t ;; Add that string to the kill ring, one way or another.\n\t (if (eq last-command 'kill-region)\n\t (kill-append string (< end beg))\n\t (kill-new string)))\n\t(when (or string (eq last-command 'kill-region))\n\t (setq this-command 'kill-region))\n\t(setq deactivate-mark t)\n\tnil)\n ((buffer-read-only text-read-only)\n ;; The code above failed because the buffer, or some of the characters\n ;; in the region, are read-only.\n ;; We should beep, in case the user just isn't aware of this.\n ;; However, there's no harm in putting\n ;; the region's text in the kill ring, anyway.\n (copy-region-as-kill beg end region)\n ;; Set this-command now, so it will be set even if we get an error.\n (setq this-command 'kill-region)\n ;; This should barf, if appropriate, and give us the correct error.\n (if kill-read-only-ok\n\t (progn (message \"Read only text copied to kill ring\") nil)\n ;; Signal an error if the buffer is read-only.\n (barf-if-buffer-read-only)\n ;; If the buffer isn't read-only, the text is.\n (signal 'text-read-only (list (current-buffer)))))))\n\n;; copy-region-as-kill no longer sets this-command, because it's confusing\n;; to get two copies of the text when the user accidentally types M-w and\n;; then corrects it with the intended C-w.\n(defun copy-region-as-kill (beg end &optional region)\n \"Save the region as if killed, but don't kill it.\nIn Transient Mark mode, deactivate the mark.\nIf `interprogram-cut-function' is non-nil, also save the text for a window\nsystem cut and paste.\n\nThe copied text is filtered by `filter-buffer-substring' before it is\nsaved in the kill ring, so the actual saved text might be different\nfrom what was in the buffer.\n\nWhen called from Lisp, save in the kill ring the stretch of text\nbetween BEG and END, unless the optional argument REGION is\nnon-nil, in which case ignore BEG and END, and save the current\nregion instead.\n\nThis command's old key binding has been given to `kill-ring-save'.\"\n ;; Pass mark first, then point, because the order matters when\n ;; calling `kill-append'.\n (interactive (list (mark) (point)\n\t\t (prefix-numeric-value current-prefix-arg)))\n (let ((str (if region\n (funcall region-extract-function nil)\n (filter-buffer-substring beg end))))\n (if (eq last-command 'kill-region)\n (kill-append str (< end beg))\n (kill-new str)))\n (setq deactivate-mark t)\n nil)\n\n(defun kill-ring-save (beg end &optional region)\n \"Save the region as if killed, but don't kill it.\nIn Transient Mark mode, deactivate the mark.\nIf `interprogram-cut-function' is non-nil, also save the text for a window\nsystem cut and paste.\n\nIf you want to append the killed line to the last killed text,\nuse \\\\[append-next-kill] before \\\\[kill-ring-save].\n\nThe copied text is filtered by `filter-buffer-substring' before it is\nsaved in the kill ring, so the actual saved text might be different\nfrom what was in the buffer.\n\nWhen called from Lisp, save in the kill ring the stretch of text\nbetween BEG and END, unless the optional argument REGION is\nnon-nil, in which case ignore BEG and END, and save the current\nregion instead.\n\nThis command is similar to `copy-region-as-kill', except that it gives\nvisual feedback indicating the extent of the region being copied.\"\n ;; Pass mark first, then point, because the order matters when\n ;; calling `kill-append'.\n (interactive (list (mark) (point)\n\t\t (prefix-numeric-value current-prefix-arg)))\n (copy-region-as-kill beg end region)\n ;; This use of called-interactively-p is correct because the code it\n ;; controls just gives the user visual feedback.\n (if (called-interactively-p 'interactive)\n (indicate-copied-region)))\n\n(defun indicate-copied-region (&optional message-len)\n \"Indicate that the region text has been copied interactively.\nIf the mark is visible in the selected window, blink the cursor\nbetween point and mark if there is currently no active region\nhighlighting.\n\nIf the mark lies outside the selected window, display an\ninformative message containing a sample of the copied text. The\noptional argument MESSAGE-LEN, if non-nil, specifies the length\nof this sample text; it defaults to 40.\"\n (let ((mark (mark t))\n\t(point (point))\n\t;; Inhibit quitting so we can make a quit here\n\t;; look like a C-g typed as a command.\n\t(inhibit-quit t))\n (if (pos-visible-in-window-p mark (selected-window))\n\t;; Swap point-and-mark quickly so as to show the region that\n\t;; was selected. Don't do it if the region is highlighted.\n\t(unless (and (region-active-p)\n\t\t (face-background 'region))\n\t ;; Swap point and mark.\n\t (set-marker (mark-marker) (point) (current-buffer))\n\t (goto-char mark)\n\t (sit-for blink-matching-delay)\n\t ;; Swap back.\n\t (set-marker (mark-marker) mark (current-buffer))\n\t (goto-char point)\n\t ;; If user quit, deactivate the mark\n\t ;; as C-g would as a command.\n\t (and quit-flag (region-active-p)\n\t (deactivate-mark)))\n (let ((len (min (abs (- mark point))\n\t\t (or message-len 40))))\n\t(if (< point mark)\n\t ;; Don't say \"killed\"; that is misleading.\n\t (message \"Saved text until \\\"%s\\\"\"\n\t\t (buffer-substring-no-properties (- mark len) mark))\n\t (message \"Saved text from \\\"%s\\\"\"\n\t\t (buffer-substring-no-properties mark (+ mark len))))))))\n\n(defun append-next-kill (&optional interactive)\n \"Cause following command, if it kills, to add to previous kill.\nIf the next command kills forward from point, the kill is\nappended to the previous killed text. If the command kills\nbackward, the kill is prepended. Kill commands that act on the\nregion, such as `kill-region', are regarded as killing forward if\npoint is after mark, and killing backward if point is before\nmark.\n\nIf the next command is not a kill command, `append-next-kill' has\nno effect.\n\nThe argument is used for internal purposes; do not supply one.\"\n (interactive \"p\")\n ;; We don't use (interactive-p), since that breaks kbd macros.\n (if interactive\n (progn\n\t(setq this-command 'kill-region)\n\t(message \"If the next command is a kill, it will append\"))\n (setq last-command 'kill-region)))\n\n(defvar bidi-directional-controls-chars \"\\x202a-\\x202e\\x2066-\\x2069\"\n \"Character set that matches bidirectional formatting control characters.\")\n\n(defvar bidi-directional-non-controls-chars \"^\\x202a-\\x202e\\x2066-\\x2069\"\n \"Character set that matches any character except bidirectional controls.\")\n\n(defun squeeze-bidi-context-1 (from to category replacement)\n \"A subroutine of `squeeze-bidi-context'.\nFROM and TO should be markers, CATEGORY and REPLACEMENT should be strings.\"\n (let ((pt (copy-marker from))\n\t(limit (copy-marker to))\n\t(old-pt 0)\n\tlim1)\n (setq lim1 limit)\n (goto-char pt)\n (while (< pt limit)\n (if (> pt old-pt)\n\t (move-marker lim1\n\t\t (save-excursion\n\t\t\t ;; L and R categories include embedding and\n\t\t\t ;; override controls, but we don't want to\n\t\t\t ;; replace them, because that might change\n\t\t\t ;; the visual order. Likewise with PDF and\n\t\t\t ;; isolate controls.\n\t\t\t (+ pt (skip-chars-forward\n\t\t\t\tbidi-directional-non-controls-chars\n\t\t\t\tlimit)))))\n ;; Replace any run of non-RTL characters by a single LRM.\n (if (null (re-search-forward category lim1 t))\n\t ;; No more characters of CATEGORY, we are done.\n\t (setq pt limit)\n\t(replace-match replacement nil t)\n\t(move-marker pt (point)))\n (setq old-pt pt)\n ;; Skip directional controls, if any.\n (move-marker\n pt (+ pt (skip-chars-forward bidi-directional-controls-chars limit))))))\n\n(defun squeeze-bidi-context (from to)\n \"Replace characters between FROM and TO while keeping bidi context.\n\nThis function replaces the region of text with as few characters\nas possible, while preserving the effect that region will have on\nbidirectional display before and after the region.\"\n (let ((start (set-marker (make-marker)\n\t\t\t (if (> from 0) from (+ (point-max) from))))\n\t(end (set-marker (make-marker) to))\n\t;; This is for when they copy text with read-only text\n\t;; properties.\n\t(inhibit-read-only t))\n (if (null (marker-position end))\n\t(setq end (point-max-marker)))\n ;; Replace each run of non-RTL characters with a single LRM.\n (squeeze-bidi-context-1 start end \"\\\\CR+\" \"\\x200e\")\n ;; Replace each run of non-LTR characters with a single RLM. Note\n ;; that the \\cR category includes both the Arabic Letter (AL) and\n ;; R characters; here we ignore the distinction between them,\n ;; because that distinction only affects Arabic Number (AN)\n ;; characters, which are weak and don't affect the reordering.\n (squeeze-bidi-context-1 start end \"\\\\CL+\" \"\\x200f\")))\n\n(defun line-substring-with-bidi-context (start end &optional no-properties)\n \"Return buffer text between START and END with its bidi context.\n\nSTART and END are assumed to belong to the same physical line\nof buffer text. This function prepends and appends to the text\nbetween START and END bidi control characters that preserve the\nvisual order of that text when it is inserted at some other place.\"\n (if (or (< start (point-min))\n\t (> end (point-max)))\n (signal 'args-out-of-range (list (current-buffer) start end)))\n (let ((buf (current-buffer))\n\tsubstr para-dir from to)\n (save-excursion\n (goto-char start)\n (setq para-dir (current-bidi-paragraph-direction))\n (setq from (line-beginning-position)\n\t to (line-end-position))\n (goto-char from)\n ;; If we don't have any mixed directional characters in the\n ;; entire line, we can just copy the substring without adding\n ;; any context.\n (if (or (looking-at-p \"\\\\CR*$\")\n\t (looking-at-p \"\\\\CL*$\"))\n\t (setq substr (if no-properties\n\t\t\t (buffer-substring-no-properties start end)\n\t\t\t (buffer-substring start end)))\n\t(setq substr\n\t (with-temp-buffer\n\t\t(if no-properties\n\t\t (insert-buffer-substring-no-properties buf from to)\n\t\t (insert-buffer-substring buf from to))\n\t\t(squeeze-bidi-context 1 (1+ (- start from)))\n\t\t(squeeze-bidi-context (- end to) nil)\n\t\t(buffer-substring 1 (point-max)))))\n\n ;; Wrap the string in LRI/RLI..PDI pair to achieve 2 effects:\n ;; (1) force the string to have the same base embedding\n ;; direction as the paragraph direction at the source, no matter\n ;; what is the paragraph direction at destination; and (2) avoid\n ;; affecting the visual order of the surrounding text at\n ;; destination if there are characters of different\n ;; directionality there.\n (concat (if (eq para-dir 'left-to-right) \"\\x2066\" \"\\x2067\")\n\t substr \"\\x2069\"))))\n\n(defun buffer-substring-with-bidi-context (start end &optional no-properties)\n \"Return portion of current buffer between START and END with bidi context.\n\nThis function works similar to `buffer-substring', but it prepends and\nappends to the text bidi directional control characters necessary to\npreserve the visual appearance of the text if it is inserted at another\nplace. This is useful when the buffer substring includes bidirectional\ntext and control characters that cause non-trivial reordering on display.\nIf copied verbatim, such text can have a very different visual appearance,\nand can also change the visual appearance of the surrounding text at the\ndestination of the copy.\n\nOptional argument NO-PROPERTIES, if non-nil, means copy the text without\nthe text properties.\"\n (let (line-end substr)\n (if (or (< start (point-min))\n\t (> end (point-max)))\n\t(signal 'args-out-of-range (list (current-buffer) start end)))\n (save-excursion\n (goto-char start)\n (setq line-end (min end (line-end-position)))\n (while (< start end)\n\t(setq substr\n\t (concat substr\n\t\t (if substr \"\\n\" \"\")\n\t\t (line-substring-with-bidi-context start line-end\n\t\t\t\t\t\t\tno-properties)))\n\t(forward-line 1)\n\t(setq start (point))\n\t(setq line-end (min end (line-end-position))))\n substr)))\n\f\n;; Yanking.\n\n(defcustom yank-handled-properties\n '((font-lock-face . yank-handle-font-lock-face-property)\n (category . yank-handle-category-property))\n \"List of special text property handling conditions for yanking.\nEach element should have the form (PROP . FUN), where PROP is a\nproperty symbol and FUN is a function. When the `yank' command\ninserts text into the buffer, it scans the inserted text for\nstretches of text that have `eq' values of the text property\nPROP; for each such stretch of text, FUN is called with three\narguments: the property's value in that text, and the start and\nend positions of the text.\n\nThis is done prior to removing the properties specified by\n`yank-excluded-properties'.\"\n :group 'killing\n :type '(repeat (cons (symbol :tag \"property symbol\")\n function))\n :version \"24.3\")\n\n;; This is actually used in subr.el but defcustom does not work there.\n(defcustom yank-excluded-properties\n '(category field follow-link fontified font-lock-face help-echo\n intangible invisible keymap local-map mouse-face read-only\n yank-handler)\n \"Text properties to discard when yanking.\nThe value should be a list of text properties to discard or t,\nwhich means to discard all text properties.\n\nSee also `yank-handled-properties'.\"\n :type '(choice (const :tag \"All\" t) (repeat symbol))\n :group 'killing\n :version \"24.3\")\n\n(defvar yank-window-start nil)\n(defvar yank-undo-function nil\n \"If non-nil, function used by `yank-pop' to delete last stretch of yanked text.\nFunction is called with two parameters, START and END corresponding to\nthe value of the mark and point; it is guaranteed that START <= END.\nNormally set from the UNDO element of a yank-handler; see `insert-for-yank'.\")\n\n(defun yank-pop (&optional arg)\n \"Replace just-yanked stretch of killed text with a different stretch.\nThis command is allowed only immediately after a `yank' or a `yank-pop'.\nAt such a time, the region contains a stretch of reinserted\npreviously-killed text. `yank-pop' deletes that text and inserts in its\nplace a different stretch of killed text.\n\nWith no argument, the previous kill is inserted.\nWith argument N, insert the Nth previous kill.\nIf N is negative, this is a more recent kill.\n\nThe sequence of kills wraps around, so that after the oldest one\ncomes the newest one.\n\nThis command honors the `yank-handled-properties' and\n`yank-excluded-properties' variables, and the `yank-handler' text\nproperty, in the way that `yank' does.\"\n (interactive \"*p\")\n (if (not (eq last-command 'yank))\n (user-error \"Previous command was not a yank\"))\n (setq this-command 'yank)\n (unless arg (setq arg 1))\n (let ((inhibit-read-only t)\n\t(before (< (point) (mark t))))\n (if before\n\t(funcall (or yank-undo-function 'delete-region) (point) (mark t))\n (funcall (or yank-undo-function 'delete-region) (mark t) (point)))\n (setq yank-undo-function nil)\n (set-marker (mark-marker) (point) (current-buffer))\n (insert-for-yank (current-kill arg))\n ;; Set the window start back where it was in the yank command,\n ;; if possible.\n (set-window-start (selected-window) yank-window-start t)\n (if before\n\t;; This is like exchange-point-and-mark, but doesn't activate the mark.\n\t;; It is cleaner to avoid activation, even though the command\n\t;; loop would deactivate the mark because we inserted text.\n\t(goto-char (prog1 (mark t)\n\t\t (set-marker (mark-marker) (point) (current-buffer))))))\n nil)\n\n(defun yank (&optional arg)\n \"Reinsert (\\\"paste\\\") the last stretch of killed text.\nMore precisely, reinsert the most recent kill, which is the\nstretch of killed text most recently killed OR yanked. Put point\nat the end, and set mark at the beginning without activating it.\nWith just \\\\[universal-argument] as argument, put point at beginning, and mark at end.\nWith argument N, reinsert the Nth most recent kill.\n\nThis command honors the `yank-handled-properties' and\n`yank-excluded-properties' variables, and the `yank-handler' text\nproperty, as described below.\n\nProperties listed in `yank-handled-properties' are processed,\nthen those listed in `yank-excluded-properties' are discarded.\n\nIf STRING has a non-nil `yank-handler' property anywhere, the\nnormal insert behavior is altered, and instead, for each contiguous\nsegment of STRING that has a given value of the `yank-handler'\nproperty, that value is used as follows:\n\nThe value of a `yank-handler' property must be a list of one to four\nelements, of the form (FUNCTION PARAM NOEXCLUDE UNDO).\nFUNCTION, if non-nil, should be a function of one argument (the\n object to insert); FUNCTION is called instead of `insert'.\nPARAM, if present and non-nil, is passed to FUNCTION (to be handled\n in whatever way is appropriate; e.g. if FUNCTION is `yank-rectangle',\n PARAM may be a list of strings to insert as a rectangle). If PARAM\n is nil, then the current segment of STRING is used.\nIf NOEXCLUDE is present and non-nil, the normal removal of\n `yank-excluded-properties' is not performed; instead FUNCTION is\n responsible for the removal. This may be necessary if FUNCTION\n adjusts point before or after inserting the object.\nUNDO, if present and non-nil, should be a function to be called\n by `yank-pop' to undo the insertion of the current PARAM. It is\n given two arguments, the start and end of the region. FUNCTION\n may set `yank-undo-function' to override UNDO.\n\nSee also the command `yank-pop' (\\\\[yank-pop]).\"\n (interactive \"*P\")\n (setq yank-window-start (window-start))\n ;; If we don't get all the way thru, make last-command indicate that\n ;; for the following command.\n (setq this-command t)\n (push-mark)\n (insert-for-yank (current-kill (cond\n\t\t\t\t ((listp arg) 0)\n\t\t\t\t ((eq arg '-) -2)\n\t\t\t\t (t (1- arg)))))\n (if (consp arg)\n ;; This is like exchange-point-and-mark, but doesn't activate the mark.\n ;; It is cleaner to avoid activation, even though the command\n ;; loop would deactivate the mark because we inserted text.\n (goto-char (prog1 (mark t)\n\t\t (set-marker (mark-marker) (point) (current-buffer)))))\n ;; If we do get all the way thru, make this-command indicate that.\n (if (eq this-command t)\n (setq this-command 'yank))\n nil)\n\n(defun rotate-yank-pointer (arg)\n \"Rotate the yanking point in the kill ring.\nWith ARG, rotate that many kills forward (or backward, if negative).\"\n (interactive \"p\")\n (current-kill arg))\n\f\n;; Some kill commands.\n\n;; Internal subroutine of delete-char\n(defun kill-forward-chars (arg)\n (if (listp arg) (setq arg (car arg)))\n (if (eq arg '-) (setq arg -1))\n (kill-region (point) (+ (point) arg)))\n\n;; Internal subroutine of backward-delete-char\n(defun kill-backward-chars (arg)\n (if (listp arg) (setq arg (car arg)))\n (if (eq arg '-) (setq arg -1))\n (kill-region (point) (- (point) arg)))\n\n(defcustom backward-delete-char-untabify-method 'untabify\n \"The method for untabifying when deleting backward.\nCan be `untabify' -- turn a tab to many spaces, then delete one space;\n `hungry' -- delete all whitespace, both tabs and spaces;\n `all' -- delete all whitespace, including tabs, spaces and newlines;\n nil -- just delete one character.\"\n :type '(choice (const untabify) (const hungry) (const all) (const nil))\n :version \"20.3\"\n :group 'killing)\n\n(defun backward-delete-char-untabify (arg &optional killp)\n \"Delete characters backward, changing tabs into spaces.\nThe exact behavior depends on `backward-delete-char-untabify-method'.\nDelete ARG chars, and kill (save in kill ring) if KILLP is non-nil.\nInteractively, ARG is the prefix arg (default 1)\nand KILLP is t if a prefix arg was specified.\"\n (interactive \"*p\\nP\")\n (when (eq backward-delete-char-untabify-method 'untabify)\n (let ((count arg))\n (save-excursion\n\t(while (and (> count 0) (not (bobp)))\n\t (if (= (preceding-char) ?\\t)\n\t (let ((col (current-column)))\n\t\t(forward-char -1)\n\t\t(setq col (- col (current-column)))\n\t\t(insert-char ?\\s col)\n\t\t(delete-char 1)))\n\t (forward-char -1)\n\t (setq count (1- count))))))\n (let* ((skip (cond ((eq backward-delete-char-untabify-method 'hungry) \" \\t\")\n ((eq backward-delete-char-untabify-method 'all)\n \" \\t\\n\\r\")))\n (n (if skip\n (let* ((oldpt (point))\n (wh (- oldpt (save-excursion\n (skip-chars-backward skip)\n (constrain-to-field nil oldpt)))))\n (+ arg (if (zerop wh) 0 (1- wh))))\n arg)))\n ;; Avoid warning about delete-backward-char\n (with-no-warnings (delete-backward-char n killp))))\n\n(defun zap-to-char (arg char)\n \"Kill up to and including ARGth occurrence of CHAR.\nCase is ignored if `case-fold-search' is non-nil in the current buffer.\nGoes backward if ARG is negative; error if CHAR not found.\"\n (interactive (list (prefix-numeric-value current-prefix-arg)\n\t\t (read-char \"Zap to char: \" t)))\n ;; Avoid \"obsolete\" warnings for translation-table-for-input.\n (with-no-warnings\n (if (char-table-p translation-table-for-input)\n\t(setq char (or (aref translation-table-for-input char) char))))\n (kill-region (point) (progn\n\t\t\t (search-forward (char-to-string char) nil nil arg)\n\t\t\t (point))))\n\n;; kill-line and its subroutines.\n\n(defcustom kill-whole-line nil\n \"If non-nil, `kill-line' with no arg at start of line kills the whole line.\"\n :type 'boolean\n :group 'killing)\n\n(defun kill-line (&optional arg)\n \"Kill the rest of the current line; if no nonblanks there, kill thru newline.\nWith prefix argument ARG, kill that many lines from point.\nNegative arguments kill lines backward.\nWith zero argument, kills the text before point on the current line.\n\nWhen calling from a program, nil means \\\"no arg\\\",\na number counts as a prefix arg.\n\nTo kill a whole line, when point is not at the beginning, type \\\n\\\\[move-beginning-of-line] \\\\[kill-line] \\\\[kill-line].\n\nIf `show-trailing-whitespace' is non-nil, this command will just\nkill the rest of the current line, even if there are no nonblanks\nthere.\n\nIf option `kill-whole-line' is non-nil, then this command kills the whole line\nincluding its terminating newline, when used at the beginning of a line\nwith no argument. As a consequence, you can always kill a whole line\nby typing \\\\[move-beginning-of-line] \\\\[kill-line].\n\nIf you want to append the killed line to the last killed text,\nuse \\\\[append-next-kill] before \\\\[kill-line].\n\nIf the buffer is read-only, Emacs will beep and refrain from deleting\nthe line, but put the line in the kill ring anyway. This means that\nyou can use this command to copy text from a read-only buffer.\n\\(If the variable `kill-read-only-ok' is non-nil, then this won't\neven beep.)\"\n (interactive \"P\")\n (kill-region (point)\n\t ;; It is better to move point to the other end of the kill\n\t ;; before killing. That way, in a read-only buffer, point\n\t ;; moves across the text that is copied to the kill ring.\n\t ;; The choice has no effect on undo now that undo records\n\t ;; the value of point from before the command was run.\n\t (progn\n\t\t (if arg\n\t\t (forward-visible-line (prefix-numeric-value arg))\n\t\t (if (eobp)\n\t\t (signal 'end-of-buffer nil))\n\t\t (let ((end\n\t\t\t (save-excursion\n\t\t\t (end-of-visible-line) (point))))\n\t\t (if (or (save-excursion\n\t\t\t ;; If trailing whitespace is visible,\n\t\t\t ;; don't treat it as nothing.\n\t\t\t (unless show-trailing-whitespace\n\t\t\t\t (skip-chars-forward \" \\t\" end))\n\t\t\t (= (point) end))\n\t\t\t (and kill-whole-line (bolp)))\n\t\t\t (forward-visible-line 1)\n\t\t (goto-char end))))\n\t\t (point))))\n\n(defun kill-whole-line (&optional arg)\n \"Kill current line.\nWith prefix ARG, kill that many lines starting from the current line.\nIf ARG is negative, kill backward. Also kill the preceding newline.\n\\(This is meant to make \\\\[repeat] work well with negative arguments.)\nIf ARG is zero, kill current line but exclude the trailing newline.\"\n (interactive \"p\")\n (or arg (setq arg 1))\n (if (and (> arg 0) (eobp) (save-excursion (forward-visible-line 0) (eobp)))\n (signal 'end-of-buffer nil))\n (if (and (< arg 0) (bobp) (save-excursion (end-of-visible-line) (bobp)))\n (signal 'beginning-of-buffer nil))\n (unless (eq last-command 'kill-region)\n (kill-new \"\")\n (setq last-command 'kill-region))\n (cond ((zerop arg)\n\t ;; We need to kill in two steps, because the previous command\n\t ;; could have been a kill command, in which case the text\n\t ;; before point needs to be prepended to the current kill\n\t ;; ring entry and the text after point appended. Also, we\n\t ;; need to use save-excursion to avoid copying the same text\n\t ;; twice to the kill ring in read-only buffers.\n\t (save-excursion\n\t (kill-region (point) (progn (forward-visible-line 0) (point))))\n\t (kill-region (point) (progn (end-of-visible-line) (point))))\n\t((< arg 0)\n\t (save-excursion\n\t (kill-region (point) (progn (end-of-visible-line) (point))))\n\t (kill-region (point)\n\t\t (progn (forward-visible-line (1+ arg))\n\t\t\t (unless (bobp) (backward-char))\n\t\t\t (point))))\n\t(t\n\t (save-excursion\n\t (kill-region (point) (progn (forward-visible-line 0) (point))))\n\t (kill-region (point)\n\t\t (progn (forward-visible-line arg) (point))))))\n\n(defun forward-visible-line (arg)\n \"Move forward by ARG lines, ignoring currently invisible newlines only.\nIf ARG is negative, move backward -ARG lines.\nIf ARG is zero, move to the beginning of the current line.\"\n (condition-case nil\n (if (> arg 0)\n\t (progn\n\t (while (> arg 0)\n\t (or (zerop (forward-line 1))\n\t\t (signal 'end-of-buffer nil))\n\t ;; If the newline we just skipped is invisible,\n\t ;; don't count it.\n\t (let ((prop\n\t\t (get-char-property (1- (point)) 'invisible)))\n\t\t(if (if (eq buffer-invisibility-spec t)\n\t\t\tprop\n\t\t (or (memq prop buffer-invisibility-spec)\n\t\t\t (assq prop buffer-invisibility-spec)))\n\t\t (setq arg (1+ arg))))\n\t (setq arg (1- arg)))\n\t ;; If invisible text follows, and it is a number of complete lines,\n\t ;; skip it.\n\t (let ((opoint (point)))\n\t (while (and (not (eobp))\n\t\t\t (let ((prop\n\t\t\t\t (get-char-property (point) 'invisible)))\n\t\t\t (if (eq buffer-invisibility-spec t)\n\t\t\t\tprop\n\t\t\t (or (memq prop buffer-invisibility-spec)\n\t\t\t\t (assq prop buffer-invisibility-spec)))))\n\t\t(goto-char\n\t\t (if (get-text-property (point) 'invisible)\n\t\t (or (next-single-property-change (point) 'invisible)\n\t\t\t (point-max))\n\t\t (next-overlay-change (point)))))\n\t (unless (bolp)\n\t\t(goto-char opoint))))\n\t(let ((first t))\n\t (while (or first (<= arg 0))\n\t (if first\n\t\t(beginning-of-line)\n\t (or (zerop (forward-line -1))\n\t\t (signal 'beginning-of-buffer nil)))\n\t ;; If the newline we just moved to is invisible,\n\t ;; don't count it.\n\t (unless (bobp)\n\t (let ((prop\n\t\t (get-char-property (1- (point)) 'invisible)))\n\t\t(unless (if (eq buffer-invisibility-spec t)\n\t\t\t prop\n\t\t\t (or (memq prop buffer-invisibility-spec)\n\t\t\t (assq prop buffer-invisibility-spec)))\n\t\t (setq arg (1+ arg)))))\n\t (setq first nil))\n\t ;; If invisible text follows, and it is a number of complete lines,\n\t ;; skip it.\n\t (let ((opoint (point)))\n\t (while (and (not (bobp))\n\t\t\t(let ((prop\n\t\t\t (get-char-property (1- (point)) 'invisible)))\n\t\t\t (if (eq buffer-invisibility-spec t)\n\t\t\t prop\n\t\t\t (or (memq prop buffer-invisibility-spec)\n\t\t\t\t(assq prop buffer-invisibility-spec)))))\n\t (goto-char\n\t (if (get-text-property (1- (point)) 'invisible)\n\t\t (or (previous-single-property-change (point) 'invisible)\n\t\t (point-min))\n\t\t (previous-overlay-change (point)))))\n\t (unless (bolp)\n\t (goto-char opoint)))))\n ((beginning-of-buffer end-of-buffer)\n nil)))\n\n(defun end-of-visible-line ()\n \"Move to end of current visible line.\"\n (end-of-line)\n ;; If the following character is currently invisible,\n ;; skip all characters with that same `invisible' property value,\n ;; then find the next newline.\n (while (and (not (eobp))\n\t (save-excursion\n\t\t(skip-chars-forward \"^\\n\")\n\t\t(let ((prop\n\t\t (get-char-property (point) 'invisible)))\n\t\t (if (eq buffer-invisibility-spec t)\n\t\t prop\n\t\t (or (memq prop buffer-invisibility-spec)\n\t\t\t(assq prop buffer-invisibility-spec))))))\n (skip-chars-forward \"^\\n\")\n (if (get-text-property (point) 'invisible)\n\t(goto-char (or (next-single-property-change (point) 'invisible)\n\t\t (point-max)))\n (goto-char (next-overlay-change (point))))\n (end-of-line)))\n\n(defun kill-current-buffer ()\n \"Kill the current buffer.\nWhen called in the minibuffer, get out of the minibuffer\nusing `abort-recursive-edit'.\n\nThis is like `kill-this-buffer', but it doesn't have to be invoked\nvia the menu bar, and pays no attention to the menu-bar's frame.\"\n (interactive)\n (let ((frame (selected-frame)))\n (if (and (frame-live-p frame)\n (not (window-minibuffer-p (frame-selected-window frame))))\n (kill-buffer (current-buffer))\n (abort-recursive-edit))))\n\n\f\n(defun insert-buffer (buffer)\n \"Insert after point the contents of BUFFER.\nPuts mark after the inserted text.\nBUFFER may be a buffer or a buffer name.\"\n (declare (interactive-only insert-buffer-substring))\n (interactive\n (list\n (progn\n (barf-if-buffer-read-only)\n (read-buffer \"Insert buffer: \"\n\t\t (if (eq (selected-window) (next-window))\n\t\t (other-buffer (current-buffer))\n\t\t (window-buffer (next-window)))\n\t\t t))))\n (push-mark\n (save-excursion\n (insert-buffer-substring (get-buffer buffer))\n (point)))\n nil)\n\n(defun append-to-buffer (buffer start end)\n \"Append to specified buffer the text of the region.\nIt is inserted into that buffer before its point.\n\nWhen calling from a program, give three arguments:\nBUFFER (or buffer name), START and END.\nSTART and END specify the portion of the current buffer to be copied.\"\n (interactive\n (list (read-buffer \"Append to buffer: \" (other-buffer (current-buffer) t))\n\t (region-beginning) (region-end)))\n (let* ((oldbuf (current-buffer))\n (append-to (get-buffer-create buffer))\n (windows (get-buffer-window-list append-to t t))\n point)\n (save-excursion\n (with-current-buffer append-to\n (setq point (point))\n (barf-if-buffer-read-only)\n (insert-buffer-substring oldbuf start end)\n (dolist (window windows)\n (when (= (window-point window) point)\n (set-window-point window (point))))))))\n\n(defun prepend-to-buffer (buffer start end)\n \"Prepend to specified buffer the text of the region.\nIt is inserted into that buffer after its point.\n\nWhen calling from a program, give three arguments:\nBUFFER (or buffer name), START and END.\nSTART and END specify the portion of the current buffer to be copied.\"\n (interactive \"BPrepend to buffer: \\nr\")\n (let ((oldbuf (current-buffer)))\n (with-current-buffer (get-buffer-create buffer)\n (barf-if-buffer-read-only)\n (save-excursion\n\t(insert-buffer-substring oldbuf start end)))))\n\n(defun copy-to-buffer (buffer start end)\n \"Copy to specified buffer the text of the region.\nIt is inserted into that buffer, replacing existing text there.\n\nWhen calling from a program, give three arguments:\nBUFFER (or buffer name), START and END.\nSTART and END specify the portion of the current buffer to be copied.\"\n (interactive \"BCopy to buffer: \\nr\")\n (let ((oldbuf (current-buffer)))\n (with-current-buffer (get-buffer-create buffer)\n (barf-if-buffer-read-only)\n (erase-buffer)\n (save-excursion\n\t(insert-buffer-substring oldbuf start end)))))\n\f\n(define-error 'mark-inactive (purecopy \"The mark is not active now\"))\n\n(defvar activate-mark-hook nil\n \"Hook run when the mark becomes active.\nIt is also run at the end of a command, if the mark is active and\nit is possible that the region may have changed.\")\n\n(defvar deactivate-mark-hook nil\n \"Hook run when the mark becomes inactive.\")\n\n(defun mark (&optional force)\n \"Return this buffer's mark value as integer, or nil if never set.\n\nIn Transient Mark mode, this function signals an error if\nthe mark is not active. However, if `mark-even-if-inactive' is non-nil,\nor the argument FORCE is non-nil, it disregards whether the mark\nis active, and returns an integer or nil in the usual way.\n\nIf you are using this in an editing command, you are most likely making\na mistake; see the documentation of `set-mark'.\"\n (if (or force (not transient-mark-mode) mark-active mark-even-if-inactive)\n (marker-position (mark-marker))\n (signal 'mark-inactive nil)))\n\n;; Behind display-selections-p.\n\n(defun deactivate-mark (&optional force)\n \"Deactivate the mark.\nIf Transient Mark mode is disabled, this function normally does\nnothing; but if FORCE is non-nil, it deactivates the mark anyway.\n\nDeactivating the mark sets `mark-active' to nil, updates the\nprimary selection according to `select-active-regions', and runs\n`deactivate-mark-hook'.\n\nIf Transient Mark mode was temporarily enabled, reset the value\nof the variable `transient-mark-mode'; if this causes Transient\nMark mode to be disabled, don't change `mark-active' to nil or\nrun `deactivate-mark-hook'.\"\n (when (or (region-active-p) force)\n (when (and (if (eq select-active-regions 'only)\n\t\t (eq (car-safe transient-mark-mode) 'only)\n\t\t select-active-regions)\n\t (region-active-p)\n\t (display-selections-p))\n ;; The var `saved-region-selection', if non-nil, is the text in\n ;; the region prior to the last command modifying the buffer.\n ;; Set the selection to that, or to the current region.\n (cond (saved-region-selection\n\t (if (gui-backend-selection-owner-p 'PRIMARY)\n\t\t (gui-set-selection 'PRIMARY saved-region-selection))\n\t (setq saved-region-selection nil))\n\t ;; If another program has acquired the selection, region\n\t ;; deactivation should not clobber it (Bug#11772).\n\t ((and (/= (region-beginning) (region-end))\n\t\t (or (gui-backend-selection-owner-p 'PRIMARY)\n\t\t (null (gui-backend-selection-exists-p 'PRIMARY))))\n\t (gui-set-selection 'PRIMARY\n (funcall region-extract-function nil)))))\n (when mark-active (force-mode-line-update)) ;Refresh toolbar (bug#16382).\n (cond\n ((eq (car-safe transient-mark-mode) 'only)\n (setq transient-mark-mode (cdr transient-mark-mode))\n (if (eq transient-mark-mode (default-value 'transient-mark-mode))\n (kill-local-variable 'transient-mark-mode)))\n ((eq transient-mark-mode 'lambda)\n (kill-local-variable 'transient-mark-mode)))\n (setq mark-active nil)\n (run-hooks 'deactivate-mark-hook)\n (redisplay--update-region-highlight (selected-window))))\n\n(defun activate-mark (&optional no-tmm)\n \"Activate the mark.\nIf NO-TMM is non-nil, leave `transient-mark-mode' alone.\"\n (when (mark t)\n (unless (region-active-p)\n (force-mode-line-update) ;Refresh toolbar (bug#16382).\n (setq mark-active t)\n (unless (or transient-mark-mode no-tmm)\n (setq-local transient-mark-mode 'lambda))\n (run-hooks 'activate-mark-hook))))\n\n(defun set-mark (pos)\n \"Set this buffer's mark to POS. Don't use this function!\nThat is to say, don't use this function unless you want\nthe user to see that the mark has moved, and you want the previous\nmark position to be lost.\n\nNormally, when a new mark is set, the old one should go on the stack.\nThis is why most applications should use `push-mark', not `set-mark'.\n\nNovice Emacs Lisp programmers often try to use the mark for the wrong\npurposes. The mark saves a location for the user's convenience.\nMost editing commands should not alter the mark.\nTo remember a location for internal use in the Lisp program,\nstore it in a Lisp variable. Example:\n\n (let ((beg (point))) (forward-line 1) (delete-region beg (point))).\"\n (if pos\n (progn\n (set-marker (mark-marker) pos (current-buffer))\n (activate-mark 'no-tmm))\n ;; Normally we never clear mark-active except in Transient Mark mode.\n ;; But when we actually clear out the mark value too, we must\n ;; clear mark-active in any mode.\n (deactivate-mark t)\n ;; `deactivate-mark' sometimes leaves mark-active non-nil, but\n ;; it should never be nil if the mark is nil.\n (setq mark-active nil)\n (set-marker (mark-marker) nil)))\n\n(defun save-mark-and-excursion--save ()\n (cons\n (let ((mark (mark-marker)))\n (and (marker-position mark) (copy-marker mark)))\n mark-active))\n\n(defun save-mark-and-excursion--restore (saved-mark-info)\n (let ((saved-mark (car saved-mark-info))\n (omark (marker-position (mark-marker)))\n (nmark nil)\n (saved-mark-active (cdr saved-mark-info)))\n ;; Mark marker\n (if (null saved-mark)\n (set-marker (mark-marker) nil)\n (setf nmark (marker-position saved-mark))\n (set-marker (mark-marker) nmark)\n (set-marker saved-mark nil))\n ;; Mark active\n (let ((cur-mark-active mark-active))\n (setq mark-active saved-mark-active)\n ;; If mark is active now, and either was not active or was at a\n ;; different place, run the activate hook.\n (if saved-mark-active\n (when (or (not cur-mark-active)\n (not (eq omark nmark)))\n (run-hooks 'activate-mark-hook))\n ;; If mark has ceased to be active, run deactivate hook.\n (when cur-mark-active\n (run-hooks 'deactivate-mark-hook))))))\n\n(defmacro save-mark-and-excursion (&rest body)\n \"Like `save-excursion', but also save and restore the mark state.\nThis macro does what `save-excursion' did before Emacs 25.1.\"\n (declare (indent 0) (debug t))\n (let ((saved-marker-sym (make-symbol \"saved-marker\")))\n `(let ((,saved-marker-sym (save-mark-and-excursion--save)))\n (unwind-protect\n (save-excursion ,@body)\n (save-mark-and-excursion--restore ,saved-marker-sym)))))\n\n(defcustom use-empty-active-region nil\n \"Whether \\\"region-aware\\\" commands should act on empty regions.\nIf nil, region-aware commands treat the empty region as inactive.\nIf non-nil, region-aware commands treat the region as active as\nlong as the mark is active, even if the region is empty.\n\nRegion-aware commands are those that act on the region if it is\nactive and Transient Mark mode is enabled, and on the text near\npoint otherwise.\"\n :type 'boolean\n :version \"23.1\"\n :group 'editing-basics)\n\n(defun use-region-p ()\n \"Return t if the region is active and it is appropriate to act on it.\nThis is used by commands that act specially on the region under\nTransient Mark mode.\n\nThe return value is t if Transient Mark mode is enabled and the\nmark is active; furthermore, if `use-empty-active-region' is nil,\nthe region must not be empty. Otherwise, the return value is nil.\n\nFor some commands, it may be appropriate to ignore the value of\n`use-empty-active-region'; in that case, use `region-active-p'.\"\n (and (region-active-p)\n (or use-empty-active-region (> (region-end) (region-beginning)))))\n\n(defun region-active-p ()\n \"Return non-nil if Transient Mark mode is enabled and the mark is active.\n\nSome commands act specially on the region when Transient Mark\nmode is enabled. Usually, such commands should use\n`use-region-p' instead of this function, because `use-region-p'\nalso checks the value of `use-empty-active-region'.\"\n (and transient-mark-mode mark-active\n ;; FIXME: Somehow we sometimes end up with mark-active non-nil but\n ;; without the mark being set (e.g. bug#17324). We really should fix\n ;; that problem, but in the mean time, let's make sure we don't say the\n ;; region is active when there's no mark.\n (progn (cl-assert (mark)) t)))\n\n(defun region-bounds ()\n \"Return the boundaries of the region as a pair of positions.\nValue is a list of cons cells of the form (START . END).\"\n (funcall region-extract-function 'bounds))\n\n(defun region-noncontiguous-p ()\n \"Return non-nil if the region contains several pieces.\nAn example is a rectangular region handled as a list of\nseparate contiguous regions for each line.\"\n (> (length (region-bounds)) 1))\n\n(defvar redisplay-unhighlight-region-function\n (lambda (rol) (when (overlayp rol) (delete-overlay rol))))\n\n(defvar redisplay-highlight-region-function\n (lambda (start end window rol)\n (if (not (overlayp rol))\n (let ((nrol (make-overlay start end)))\n (funcall redisplay-unhighlight-region-function rol)\n (overlay-put nrol 'window window)\n (overlay-put nrol 'face 'region)\n ;; Normal priority so that a large region doesn't hide all the\n ;; overlays within it, but high secondary priority so that if it\n ;; ends/starts in the middle of a small overlay, that small overlay\n ;; won't hide the region's boundaries.\n (overlay-put nrol 'priority '(nil . 100))\n nrol)\n (unless (and (eq (overlay-buffer rol) (current-buffer))\n (eq (overlay-start rol) start)\n (eq (overlay-end rol) end))\n (move-overlay rol start end (current-buffer)))\n rol)))\n\n(defun redisplay--update-region-highlight (window)\n (let ((rol (window-parameter window 'internal-region-overlay)))\n (if (not (and (region-active-p)\n (or highlight-nonselected-windows\n (eq window (selected-window))\n (and (window-minibuffer-p)\n (eq window (minibuffer-selected-window))))))\n (funcall redisplay-unhighlight-region-function rol)\n (let* ((pt (window-point window))\n (mark (mark))\n (start (min pt mark))\n (end (max pt mark))\n (new\n (funcall redisplay-highlight-region-function\n start end window rol)))\n (unless (equal new rol)\n (set-window-parameter window 'internal-region-overlay\n new))))))\n\n(defvar pre-redisplay-functions (list #'redisplay--update-region-highlight)\n \"Hook run just before redisplay.\nIt is called in each window that is to be redisplayed. It takes one argument,\nwhich is the window that will be redisplayed. When run, the `current-buffer'\nis set to the buffer displayed in that window.\")\n\n(defun redisplay--pre-redisplay-functions (windows)\n (with-demoted-errors \"redisplay--pre-redisplay-functions: %S\"\n (if (null windows)\n (with-current-buffer (window-buffer (selected-window))\n (run-hook-with-args 'pre-redisplay-functions (selected-window)))\n (dolist (win (if (listp windows) windows (window-list-1 nil nil t)))\n (with-current-buffer (window-buffer win)\n (run-hook-with-args 'pre-redisplay-functions win))))))\n\n(add-function :before pre-redisplay-function\n #'redisplay--pre-redisplay-functions)\n\n\n(defvar-local mark-ring nil\n \"The list of former marks of the current buffer, most recent first.\")\n(put 'mark-ring 'permanent-local t)\n\n(defcustom mark-ring-max 16\n \"Maximum size of mark ring. Start discarding off end if gets this big.\"\n :type 'integer\n :group 'editing-basics)\n\n(defvar global-mark-ring nil\n \"The list of saved global marks, most recent first.\")\n\n(defcustom global-mark-ring-max 16\n \"Maximum size of global mark ring. \\\nStart discarding off end if gets this big.\"\n :type 'integer\n :group 'editing-basics)\n\n(defun pop-to-mark-command ()\n \"Jump to mark, and pop a new position for mark off the ring.\n\\(Does not affect global mark ring).\"\n (interactive)\n (if (null (mark t))\n (user-error \"No mark set in this buffer\")\n (if (= (point) (mark t))\n\t(message \"Mark popped\"))\n (goto-char (mark t))\n (pop-mark)))\n\n(defun push-mark-command (arg &optional nomsg)\n \"Set mark at where point is.\nIf no prefix ARG and mark is already set there, just activate it.\nDisplay `Mark set' unless the optional second arg NOMSG is non-nil.\"\n (interactive \"P\")\n (let ((mark (mark t)))\n (if (or arg (null mark) (/= mark (point)))\n\t(push-mark nil nomsg t)\n (activate-mark 'no-tmm)\n (unless nomsg\n\t(message \"Mark activated\")))))\n\n(defcustom set-mark-command-repeat-pop nil\n \"Non-nil means repeating \\\\[set-mark-command] after popping mark pops it again.\nThat means that C-u \\\\[set-mark-command] \\\\[set-mark-command]\nwill pop the mark twice, and\nC-u \\\\[set-mark-command] \\\\[set-mark-command] \\\\[set-mark-command]\nwill pop the mark three times.\n\nA value of nil means \\\\[set-mark-command]'s behavior does not change\nafter C-u \\\\[set-mark-command].\"\n :type 'boolean\n :group 'editing-basics)\n\n(defun set-mark-command (arg)\n \"Set the mark where point is, and activate it; or jump to the mark.\nSetting the mark also alters the region, which is the text\nbetween point and mark; this is the closest equivalent in\nEmacs to what some editors call the \\\"selection\\\".\n\nWith no prefix argument, set the mark at point, and push the\nold mark position on local mark ring. Also push the new mark on\nglobal mark ring, if the previous mark was set in another buffer.\n\nWhen Transient Mark Mode is off, immediately repeating this\ncommand activates `transient-mark-mode' temporarily.\n\nWith prefix argument (e.g., \\\\[universal-argument] \\\\[set-mark-command]), \\\njump to the mark, and set the mark from\nposition popped off the local mark ring (this does not affect the global\nmark ring). Use \\\\[pop-global-mark] to jump to a mark popped off the global\nmark ring (see `pop-global-mark').\n\nIf `set-mark-command-repeat-pop' is non-nil, repeating\nthe \\\\[set-mark-command] command with no prefix argument pops the next position\noff the local (or global) mark ring and jumps there.\n\nWith \\\\[universal-argument] \\\\[universal-argument] as prefix\nargument, unconditionally set mark where point is, even if\n`set-mark-command-repeat-pop' is non-nil.\n\nNovice Emacs Lisp programmers often try to use the mark for the wrong\npurposes. See the documentation of `set-mark' for more information.\"\n (interactive \"P\")\n (cond ((eq transient-mark-mode 'lambda)\n\t (kill-local-variable 'transient-mark-mode))\n\t((eq (car-safe transient-mark-mode) 'only)\n\t (deactivate-mark)))\n (cond\n ((and (consp arg) (> (prefix-numeric-value arg) 4))\n (push-mark-command nil))\n ((not (eq this-command 'set-mark-command))\n (if arg\n\t(pop-to-mark-command)\n (push-mark-command t)))\n ((and set-mark-command-repeat-pop\n\t (eq last-command 'pop-global-mark)\n\t (not arg))\n (setq this-command 'pop-global-mark)\n (pop-global-mark))\n ((or (and set-mark-command-repeat-pop\n (eq last-command 'pop-to-mark-command))\n arg)\n (setq this-command 'pop-to-mark-command)\n (pop-to-mark-command))\n ((eq last-command 'set-mark-command)\n (if (region-active-p)\n (progn\n (deactivate-mark)\n (message \"Mark deactivated\"))\n (activate-mark)\n (message \"Mark activated\")))\n (t\n (push-mark-command nil))))\n\n(defun push-mark (&optional location nomsg activate)\n \"Set mark at LOCATION (point, by default) and push old mark on mark ring.\nIf the last global mark pushed was not in the current buffer,\nalso push LOCATION on the global mark ring.\nDisplay `Mark set' unless the optional second arg NOMSG is non-nil.\n\nNovice Emacs Lisp programmers often try to use the mark for the wrong\npurposes. See the documentation of `set-mark' for more information.\n\nIn Transient Mark mode, activate mark if optional third arg ACTIVATE non-nil.\"\n (unless (null (mark t))\n (setq mark-ring (cons (copy-marker (mark-marker)) mark-ring))\n (when (> (length mark-ring) mark-ring-max)\n (move-marker (car (nthcdr mark-ring-max mark-ring)) nil)\n (setcdr (nthcdr (1- mark-ring-max) mark-ring) nil)))\n (set-marker (mark-marker) (or location (point)) (current-buffer))\n ;; Now push the mark on the global mark ring.\n (if (and global-mark-ring\n\t (eq (marker-buffer (car global-mark-ring)) (current-buffer)))\n ;; The last global mark pushed was in this same buffer.\n ;; Don't push another one.\n nil\n (setq global-mark-ring (cons (copy-marker (mark-marker)) global-mark-ring))\n (when (> (length global-mark-ring) global-mark-ring-max)\n (move-marker (car (nthcdr global-mark-ring-max global-mark-ring)) nil)\n (setcdr (nthcdr (1- global-mark-ring-max) global-mark-ring) nil)))\n (or nomsg executing-kbd-macro (> (minibuffer-depth) 0)\n (message \"Mark set\"))\n (if (or activate (not transient-mark-mode))\n (set-mark (mark t)))\n nil)\n\n(defun pop-mark ()\n \"Pop off mark ring into the buffer's actual mark.\nDoes not set point. Does nothing if mark ring is empty.\"\n (when mark-ring\n (setq mark-ring (nconc mark-ring (list (copy-marker (mark-marker)))))\n (set-marker (mark-marker) (+ 0 (car mark-ring)) (current-buffer))\n (move-marker (car mark-ring) nil)\n (if (null (mark t)) (ding))\n (setq mark-ring (cdr mark-ring)))\n (deactivate-mark))\n\n;; The parser cannot handle a newline after def*.\n;; This bug is already recorded in\n;; parser-lisp.r/newline-between-tokens.b/\n;; (define-obsolete-function-alias\n;; 'exchange-dot-and-mark 'exchange-point-and-mark \"23.3\")\n(define-obsolete-function-alias 'exchange-dot-and-mark\n 'exchange-point-and-mark \"23.3\")\n\n(defun exchange-point-and-mark (&optional arg)\n \"Put the mark where point is now, and point where the mark is now.\nThis command works even when the mark is not active,\nand it reactivates the mark.\n\nIf Transient Mark mode is on, a prefix ARG deactivates the mark\nif it is active, and otherwise avoids reactivating it. If\nTransient Mark mode is off, a prefix ARG enables Transient Mark\nmode temporarily.\"\n (interactive \"P\")\n (let ((omark (mark t))\n\t(temp-highlight (eq (car-safe transient-mark-mode) 'only)))\n (if (null omark)\n (user-error \"No mark set in this buffer\"))\n (set-mark (point))\n (goto-char omark)\n (cond (temp-highlight\n\t (setq-local transient-mark-mode (cons 'only transient-mark-mode)))\n\t ((or (and arg (region-active-p)) ; (xor arg (not (region-active-p)))\n\t (not (or arg (region-active-p))))\n\t (deactivate-mark))\n\t (t (activate-mark)))\n nil))\n\n(defcustom shift-select-mode t\n \"When non-nil, shifted motion keys activate the mark momentarily.\n\nWhile the mark is activated in this way, any shift-translated point\nmotion key extends the region, and if Transient Mark mode was off, it\nis temporarily turned on. Furthermore, the mark will be deactivated\nby any subsequent point motion key that was not shift-translated, or\nby any action that normally deactivates the mark in Transient Mark mode.\n\nSee `this-command-keys-shift-translated' for the meaning of\nshift-translation.\"\n :type 'boolean\n :group 'editing-basics)\n\n(defun handle-shift-selection ()\n \"Activate/deactivate mark depending on invocation thru shift translation.\nThis function is called by `call-interactively' when a command\nwith a `^' character in its `interactive' spec is invoked, before\nrunning the command itself.\n\nIf `shift-select-mode' is enabled and the command was invoked\nthrough shift translation, set the mark and activate the region\ntemporarily, unless it was already set in this way. See\n`this-command-keys-shift-translated' for the meaning of shift\ntranslation.\n\nOtherwise, if the region has been activated temporarily,\ndeactivate it, and restore the variable `transient-mark-mode' to\nits earlier value.\"\n (cond ((and shift-select-mode this-command-keys-shift-translated)\n (unless (and mark-active\n\t\t (eq (car-safe transient-mark-mode) 'only))\n\t (setq-local transient-mark-mode\n (cons 'only\n (unless (eq transient-mark-mode 'lambda)\n transient-mark-mode)))\n (push-mark nil nil t)))\n ((eq (car-safe transient-mark-mode) 'only)\n (setq transient-mark-mode (cdr transient-mark-mode))\n (if (eq transient-mark-mode (default-value 'transient-mark-mode))\n (kill-local-variable 'transient-mark-mode))\n (deactivate-mark))))\n\n(define-minor-mode transient-mark-mode\n \"Toggle Transient Mark mode.\nWith a prefix argument ARG, enable Transient Mark mode if ARG is\npositive, and disable it otherwise. If called from Lisp, enable\nTransient Mark mode if ARG is omitted or nil.\n\nTransient Mark mode is a global minor mode. When enabled, the\nregion is highlighted with the `region' face whenever the mark\nis active. The mark is \\\"deactivated\\\" by changing the buffer,\nand after certain other operations that set the mark but whose\nmain purpose is something else--for example, incremental search,\n\\\\[beginning-of-buffer], and \\\\[end-of-buffer].\n\nYou can also deactivate the mark by typing \\\\[keyboard-quit] or\n\\\\[keyboard-escape-quit].\n\nMany commands change their behavior when Transient Mark mode is\nin effect and the mark is active, by acting on the region instead\nof their usual default part of the buffer's text. Examples of\nsuch commands include \\\\[comment-dwim], \\\\[flush-lines], \\\\[keep-lines],\n\\\\[query-replace], \\\\[query-replace-regexp], \\\\[ispell], and \\\\[undo].\nTo see the documentation of commands which are sensitive to the\nTransient Mark mode, invoke \\\\[apropos-documentation] and type \\\"transient\\\"\nor \\\"mark.*active\\\" at the prompt.\"\n :global t\n ;; It's defined in C/cus-start, this stops the d-m-m macro defining it again.\n :variable (default-value 'transient-mark-mode))\n\n(defvar widen-automatically t\n \"Non-nil means it is ok for commands to call `widen' when they want to.\nSome commands will do this in order to go to positions outside\nthe current accessible part of the buffer.\n\nIf `widen-automatically' is nil, these commands will do something else\nas a fallback, and won't change the buffer bounds.\")\n\n(defvar non-essential nil\n \"Whether the currently executing code is performing an essential task.\nThis variable should be non-nil only when running code which should not\ndisturb the user. E.g. it can be used to prevent Tramp from prompting the\nuser for a password when we are simply scanning a set of files in the\nbackground or displaying possible completions before the user even asked\nfor it.\")\n\n(defun pop-global-mark ()\n \"Pop off global mark ring and jump to the top location.\"\n (interactive)\n ;; Pop entries which refer to non-existent buffers.\n (while (and global-mark-ring (not (marker-buffer (car global-mark-ring))))\n (setq global-mark-ring (cdr global-mark-ring)))\n (or global-mark-ring\n (error \"No global mark set\"))\n (let* ((marker (car global-mark-ring))\n\t (buffer (marker-buffer marker))\n\t (position (marker-position marker)))\n (setq global-mark-ring (nconc (cdr global-mark-ring)\n\t\t\t\t (list (car global-mark-ring))))\n (set-buffer buffer)\n (or (and (>= position (point-min))\n\t (<= position (point-max)))\n\t(if widen-automatically\n\t (widen)\n\t (error \"Global mark position is outside accessible part of buffer\")))\n (goto-char position)\n (switch-to-buffer buffer)))\n\f\n(defcustom next-line-add-newlines nil\n \"If non-nil, `next-line' inserts newline to avoid `end of buffer' error.\"\n :type 'boolean\n :version \"21.1\"\n :group 'editing-basics)\n\n(defun next-line (&optional arg try-vscroll)\n \"Move cursor vertically down ARG lines.\nInteractively, vscroll tall lines if `auto-window-vscroll' is enabled.\nNon-interactively, use TRY-VSCROLL to control whether to vscroll tall\nlines: if either `auto-window-vscroll' or TRY-VSCROLL is nil, this\nfunction will not vscroll.\n\nARG defaults to 1.\n\nIf there is no character in the target line exactly under the current column,\nthe cursor is positioned after the character in that line which spans this\ncolumn, or at the end of the line if it is not long enough.\nIf there is no line in the buffer after this one, behavior depends on the\nvalue of `next-line-add-newlines'. If non-nil, it inserts a newline character\nto create a line, and moves the cursor to that line. Otherwise it moves the\ncursor to the end of the buffer.\n\nIf the variable `line-move-visual' is non-nil, this command moves\nby display lines. Otherwise, it moves by buffer lines, without\ntaking variable-width characters or continued lines into account.\nSee \\\\[next-logical-line] for a command that always moves by buffer lines.\n\nThe command \\\\[set-goal-column] can be used to create\na semipermanent goal column for this command.\nThen instead of trying to move exactly vertically (or as close as possible),\nthis command moves to the specified goal column (or as close as possible).\nThe goal column is stored in the variable `goal-column', which is nil\nwhen there is no goal column. Note that setting `goal-column'\noverrides `line-move-visual' and causes this command to move by buffer\nlines rather than by display lines.\"\n (declare (interactive-only forward-line))\n (interactive \"^p\\np\")\n (or arg (setq arg 1))\n (if (and next-line-add-newlines (= arg 1))\n (if (save-excursion (end-of-line) (eobp))\n\t ;; When adding a newline, don't expand an abbrev.\n\t (let ((abbrev-mode nil))\n\t (end-of-line)\n\t (insert (if use-hard-newlines hard-newline \"\\n\")))\n\t(line-move arg nil nil try-vscroll))\n (if (called-interactively-p 'interactive)\n\t(condition-case err\n\t (line-move arg nil nil try-vscroll)\n\t ((beginning-of-buffer end-of-buffer)\n\t (signal (car err) (cdr err))))\n (line-move arg nil nil try-vscroll)))\n nil)\n\n(defun previous-line (&optional arg try-vscroll)\n \"Move cursor vertically up ARG lines.\nInteractively, vscroll tall lines if `auto-window-vscroll' is enabled.\nNon-interactively, use TRY-VSCROLL to control whether to vscroll tall\nlines: if either `auto-window-vscroll' or TRY-VSCROLL is nil, this\nfunction will not vscroll.\n\nARG defaults to 1.\n\nIf there is no character in the target line exactly over the current column,\nthe cursor is positioned after the character in that line which spans this\ncolumn, or at the end of the line if it is not long enough.\n\nIf the variable `line-move-visual' is non-nil, this command moves\nby display lines. Otherwise, it moves by buffer lines, without\ntaking variable-width characters or continued lines into account.\nSee \\\\[previous-logical-line] for a command that always moves by buffer lines.\n\nThe command \\\\[set-goal-column] can be used to create\na semipermanent goal column for this command.\nThen instead of trying to move exactly vertically (or as close as possible),\nthis command moves to the specified goal column (or as close as possible).\nThe goal column is stored in the variable `goal-column', which is nil\nwhen there is no goal column. Note that setting `goal-column'\noverrides `line-move-visual' and causes this command to move by buffer\nlines rather than by display lines.\"\n (declare (interactive-only\n \"use `forward-line' with negative argument instead.\"))\n (interactive \"^p\\np\")\n (or arg (setq arg 1))\n (if (called-interactively-p 'interactive)\n (condition-case err\n\t (line-move (- arg) nil nil try-vscroll)\n\t((beginning-of-buffer end-of-buffer)\n\t (signal (car err) (cdr err))))\n (line-move (- arg) nil nil try-vscroll))\n nil)\n\n(defcustom track-eol nil\n \"Non-nil means vertical motion starting at end of line keeps to ends of lines.\nThis means moving to the end of each line moved onto.\nThe beginning of a blank line does not count as the end of a line.\nThis has no effect when the variable `line-move-visual' is non-nil.\"\n :type 'boolean\n :group 'editing-basics)\n\n(defcustom goal-column nil\n \"Semipermanent goal column for vertical motion, as set by \\\\[set-goal-column], or nil.\nA non-nil setting overrides the variable `line-move-visual', which see.\"\n :type '(choice integer\n\t\t (const :tag \"None\" nil))\n :group 'editing-basics)\n(make-variable-buffer-local 'goal-column)\n\n(defvar temporary-goal-column 0\n \"Current goal column for vertical motion.\nIt is the column where point was at the start of the current run\nof vertical motion commands.\n\nWhen moving by visual lines via the function `line-move-visual', it is a cons\ncell (COL . HSCROLL), where COL is the x-position, in pixels,\ndivided by the default column width, and HSCROLL is the number of\ncolumns by which window is scrolled from left margin.\n\nWhen the `track-eol' feature is doing its job, the value is\n`most-positive-fixnum'.\")\n\n(defvar last--line-number-width 0\n \"Last value of width used for displaying line numbers.\nUsed internally by `line-move-visual'.\")\n\n(defcustom line-move-ignore-invisible t\n \"Non-nil means commands that move by lines ignore invisible newlines.\nWhen this option is non-nil, \\\\[next-line], \\\\[previous-line], \\\\[move-end-of-line], and \\\\[move-beginning-of-line] behave\nas if newlines that are invisible didn't exist, and count\nonly visible newlines. Thus, moving across 2 newlines\none of which is invisible will be counted as a one-line move.\nAlso, a non-nil value causes invisible text to be ignored when\ncounting columns for the purposes of keeping point in the same\ncolumn by \\\\[next-line] and \\\\[previous-line].\n\nOutline mode sets this.\"\n :type 'boolean\n :group 'editing-basics)\n\n(defcustom line-move-visual t\n \"When non-nil, `line-move' moves point by visual lines.\nThis movement is based on where the cursor is displayed on the\nscreen, instead of relying on buffer contents alone. It takes\ninto account variable-width characters and line continuation.\nIf nil, `line-move' moves point by logical lines.\nA non-nil setting of `goal-column' overrides the value of this variable\nand forces movement by logical lines.\nA window that is horizontally scrolled also forces movement by logical\nlines.\"\n :type 'boolean\n :group 'editing-basics\n :version \"23.1\")\n\n;; Only used if display-graphic-p.\n(declare-function font-info \"font.c\" (name &optional frame))\n\n(defun default-font-height ()\n \"Return the height in pixels of the current buffer's default face font.\n\nIf the default font is remapped (see `face-remapping-alist'), the\nfunction returns the height of the remapped face.\"\n (let ((default-font (face-font 'default)))\n (cond\n ((and (display-multi-font-p)\n\t ;; Avoid calling font-info if the frame's default font was\n\t ;; not changed since the frame was created. That's because\n\t ;; font-info is expensive for some fonts, see bug #14838.\n\t (not (string= (frame-parameter nil 'font) default-font)))\n (aref (font-info default-font) 3))\n (t (frame-char-height)))))\n\n(defun default-font-width ()\n \"Return the width in pixels of the current buffer's default face font.\n\nIf the default font is remapped (see `face-remapping-alist'), the\nfunction returns the width of the remapped face.\"\n (let ((default-font (face-font 'default)))\n (cond\n ((and (display-multi-font-p)\n\t ;; Avoid calling font-info if the frame's default font was\n\t ;; not changed since the frame was created. That's because\n\t ;; font-info is expensive for some fonts, see bug #14838.\n\t (not (string= (frame-parameter nil 'font) default-font)))\n (let* ((info (font-info (face-font 'default)))\n\t (width (aref info 11)))\n\t(if (> width 0)\n\t width\n\t (aref info 10))))\n (t (frame-char-width)))))\n\n(defun default-line-height ()\n \"Return the pixel height of current buffer's default-face text line.\n\nThe value includes `line-spacing', if any, defined for the buffer\nor the frame.\"\n (let ((dfh (default-font-height))\n\t(lsp (if (display-graphic-p)\n\t\t (or line-spacing\n\t\t (default-value 'line-spacing)\n\t\t (frame-parameter nil 'line-spacing)\n\t\t 0)\n\t 0)))\n (if (floatp lsp)\n\t(setq lsp (truncate (* (frame-char-height) lsp))))\n (+ dfh lsp)))\n\n(defun window-screen-lines ()\n \"Return the number of screen lines in the text area of the selected window.\n\nThis is different from `window-text-height' in that this function counts\nlines in units of the height of the font used by the default face displayed\nin the window, not in units of the frame's default font, and also accounts\nfor `line-spacing', if any, defined for the window's buffer or frame.\n\nThe value is a floating-point number.\"\n (let ((edges (window-inside-pixel-edges))\n\t(dlh (default-line-height)))\n (/ (float (- (nth 3 edges) (nth 1 edges))) dlh)))\n\n;; Returns non-nil if partial move was done.\n(defun line-move-partial (arg noerror &optional _to-end)\n (if (< arg 0)\n ;; Move backward (up).\n ;; If already vscrolled, reduce vscroll\n (let ((vs (window-vscroll nil t))\n\t (dlh (default-line-height)))\n\t(when (> vs dlh)\n\t (set-window-vscroll nil (- vs dlh) t)))\n\n ;; Move forward (down).\n (let* ((lh (window-line-height -1))\n\t (rowh (car lh))\n\t (vpos (nth 1 lh))\n\t (ypos (nth 2 lh))\n\t (rbot (nth 3 lh))\n\t (this-lh (window-line-height))\n\t (this-height (car this-lh))\n\t (this-ypos (nth 2 this-lh))\n\t (dlh (default-line-height))\n\t (wslines (window-screen-lines))\n\t (edges (window-inside-pixel-edges))\n\t (winh (- (nth 3 edges) (nth 1 edges) 1))\n\t py vs last-line)\n (if (> (mod wslines 1.0) 0.0)\n\t (setq wslines (round (+ wslines 0.5))))\n (when (or (null lh)\n\t\t(>= rbot dlh)\n\t\t(<= ypos (- dlh))\n\t\t(null this-lh)\n\t\t(<= this-ypos (- dlh)))\n\t(unless lh\n\t (let ((wend (pos-visible-in-window-p t nil t)))\n\t (setq rbot (nth 3 wend)\n\t\t rowh (nth 4 wend)\n\t\t vpos (nth 5 wend))))\n\t(unless this-lh\n\t (let ((wstart (pos-visible-in-window-p nil nil t)))\n\t (setq this-ypos (nth 2 wstart)\n\t\t this-height (nth 4 wstart))))\n\t(setq py\n\t (or (nth 1 this-lh)\n\t\t (let ((ppos (posn-at-point))\n\t\t\tcol-row)\n\t\t (setq col-row (posn-actual-col-row ppos))\n\t\t (if col-row\n\t\t\t(- (cdr col-row) (window-vscroll))\n\t\t (cdr (posn-col-row ppos))))))\n\t;; VPOS > 0 means the last line is only partially visible.\n\t;; But if the part that is visible is at least as tall as the\n\t;; default font, that means the line is actually fully\n\t;; readable, and something like line-spacing is hidden. So in\n\t;; that case we accept the last line in the window as still\n\t;; visible, and consider the margin as starting one line\n\t;; later.\n\t(if (and vpos (> vpos 0))\n\t (if (and rowh\n\t\t (>= rowh (default-font-height))\n\t\t (< rowh dlh))\n\t\t(setq last-line (min (- wslines scroll-margin) vpos))\n\t (setq last-line (min (- wslines scroll-margin 1) (1- vpos)))))\n\t(cond\n\t ;; If last line of window is fully visible, and vscrolling\n\t ;; more would make this line invisible, move forward.\n\t ((and (or (< (setq vs (window-vscroll nil t)) dlh)\n\t\t (null this-height)\n\t\t (<= this-height dlh))\n\t (or (null rbot) (= rbot 0)))\n\t nil)\n\t ;; If cursor is not in the bottom scroll margin, and the\n\t ;; current line is not too tall, move forward.\n\t ((and (or (null this-height) (<= this-height winh))\n\t vpos\n\t (> vpos 0)\n\t (< py last-line))\n\t nil)\n\t ;; When already vscrolled, we vscroll some more if we can,\n\t ;; or clear vscroll and move forward at end of tall image.\n\t ((> vs 0)\n\t (when (or (and rbot (> rbot 0))\n\t\t (and this-height (> this-height dlh)))\n\t (set-window-vscroll nil (+ vs dlh) t)))\n\t ;; If cursor just entered the bottom scroll margin, move forward,\n\t ;; but also optionally vscroll one line so redisplay won't recenter.\n\t ((and vpos\n\t (> vpos 0)\n\t (= py last-line))\n\t ;; Don't vscroll if the partially-visible line at window\n\t ;; bottom is not too tall (a.k.a. \"just one more text\n\t ;; line\"): in that case, we do want redisplay to behave\n\t ;; normally, i.e. recenter or whatever.\n\t ;;\n\t ;; Note: ROWH + RBOT from the value returned by\n\t ;; pos-visible-in-window-p give the total height of the\n\t ;; partially-visible glyph row at the end of the window. As\n\t ;; we are dealing with floats, we disregard sub-pixel\n\t ;; discrepancies between that and DLH.\n\t (if (and rowh rbot (>= (- (+ rowh rbot) winh) 1))\n\t (set-window-vscroll nil dlh t))\n\t (line-move-1 arg noerror)\n\t t)\n\t ;; If there are lines above the last line, scroll-up one line.\n\t ((and vpos (> vpos 0))\n\t (scroll-up 1)\n\t t)\n\t ;; Finally, start vscroll.\n\t (t\n\t (set-window-vscroll nil dlh t)))))))\n\n\n;; This is like line-move-1 except that it also performs\n;; vertical scrolling of tall images if appropriate.\n;; That is not really a clean thing to do, since it mixes\n;; scrolling with cursor motion. But so far we don't have\n;; a cleaner solution to the problem of making C-n do something\n;; useful given a tall image.\n(defun line-move (arg &optional noerror _to-end try-vscroll)\n \"Move forward ARG lines.\nIf NOERROR, don't signal an error if we can't move ARG lines.\nTO-END is unused.\nTRY-VSCROLL controls whether to vscroll tall lines: if either\n`auto-window-vscroll' or TRY-VSCROLL is nil, this function will\nnot vscroll.\"\n (if noninteractive\n (line-move-1 arg noerror)\n (unless (and auto-window-vscroll try-vscroll\n\t\t ;; Only vscroll for single line moves\n\t\t (= (abs arg) 1)\n\t\t ;; Under scroll-conservatively, the display engine\n\t\t ;; does this better.\n\t\t (zerop scroll-conservatively)\n\t\t ;; But don't vscroll in a keyboard macro.\n\t\t (not defining-kbd-macro)\n\t\t (not executing-kbd-macro)\n\t\t (line-move-partial arg noerror))\n (set-window-vscroll nil 0 t)\n (if (and line-move-visual\n\t ;; Display-based column are incompatible with goal-column.\n\t (not goal-column)\n\t ;; When the text in the window is scrolled to the left,\n\t ;; display-based motion doesn't make sense (because each\n\t ;; logical line occupies exactly one screen line).\n\t (not (> (window-hscroll) 0))\n\t ;; Likewise when the text _was_ scrolled to the left\n\t ;; when the current run of vertical motion commands\n\t ;; started.\n\t (not (and (memq last-command\n\t\t\t `(next-line previous-line ,this-command))\n\t\t\t auto-hscroll-mode\n\t\t\t (numberp temporary-goal-column)\n\t\t\t (>= temporary-goal-column\n\t\t\t (- (window-width) hscroll-margin)))))\n\t (prog1 (line-move-visual arg noerror)\n\t ;; If we moved into a tall line, set vscroll to make\n\t ;; scrolling through tall images more smooth.\n\t (let ((lh (line-pixel-height))\n\t\t (edges (window-inside-pixel-edges))\n\t\t (dlh (default-line-height))\n\t\t winh)\n\t (setq winh (- (nth 3 edges) (nth 1 edges) 1))\n\t (if (and (< arg 0)\n\t\t (< (point) (window-start))\n\t\t (> lh winh))\n\t\t (set-window-vscroll\n\t\t nil\n\t\t (- lh dlh) t))))\n\t(line-move-1 arg noerror)))))\n\n;; Display-based alternative to line-move-1.\n;; Arg says how many lines to move. The value is t if we can move the\n;; specified number of lines.\n(defun line-move-visual (arg &optional noerror)\n \"Move ARG lines forward.\nIf NOERROR, don't signal an error if we can't move that many lines.\"\n (let ((opoint (point))\n\t(hscroll (window-hscroll))\n (lnum-width (line-number-display-width t))\n\ttarget-hscroll)\n ;; Check if the previous command was a line-motion command, or if\n ;; we were called from some other command.\n (if (and (consp temporary-goal-column)\n\t (memq last-command `(next-line previous-line ,this-command)))\n\t;; If so, there's no need to reset `temporary-goal-column',\n\t;; but we may need to hscroll.\n (progn\n (if (or (/= (cdr temporary-goal-column) hscroll)\n (> (cdr temporary-goal-column) 0))\n (setq target-hscroll (cdr temporary-goal-column)))\n ;; Update the COLUMN part of temporary-goal-column if the\n ;; line-number display changed its width since the last\n ;; time.\n (setq temporary-goal-column\n (cons (+ (car temporary-goal-column)\n (/ (float (- lnum-width last--line-number-width))\n (frame-char-width)))\n (cdr temporary-goal-column)))\n (setq last--line-number-width lnum-width))\n ;; Otherwise, we should reset `temporary-goal-column'.\n (let ((posn (posn-at-point))\n\t x-pos)\n\t(cond\n\t ;; Handle the `overflow-newline-into-fringe' case\n\t ;; (left-fringe is for the R2L case):\n\t ((memq (nth 1 posn) '(right-fringe left-fringe))\n\t (setq temporary-goal-column (cons (window-width) hscroll)))\n\t ((car (posn-x-y posn))\n\t (setq x-pos (car (posn-x-y posn)))\n\t ;; In R2L lines, the X pixel coordinate is measured from the\n\t ;; left edge of the window, but columns are still counted\n\t ;; from the logical-order beginning of the line, i.e. from\n\t ;; the right edge in this case. We need to adjust for that.\n\t (if (eq (current-bidi-paragraph-direction) 'right-to-left)\n\t (setq x-pos (- (window-body-width nil t) 1 x-pos)))\n\t (setq temporary-goal-column\n\t\t(cons (/ (float x-pos)\n\t\t\t (frame-char-width))\n hscroll)))\n\t (executing-kbd-macro\n\t ;; When we move beyond the first/last character visible in\n\t ;; the window, posn-at-point will return nil, so we need to\n\t ;; approximate the goal column as below.\n\t (setq temporary-goal-column\n\t\t(mod (current-column) (window-text-width)))))))\n (if target-hscroll\n\t(set-window-hscroll (selected-window) target-hscroll))\n ;; vertical-motion can move more than it was asked to if it moves\n ;; across display strings with newlines. We don't want to ring\n ;; the bell and announce beginning/end of buffer in that case.\n (or (and (or (and (>= arg 0)\n\t\t (>= (vertical-motion\n\t\t\t (cons (or goal-column\n\t\t\t\t (if (consp temporary-goal-column)\n\t\t\t\t\t (car temporary-goal-column)\n\t\t\t\t temporary-goal-column))\n\t\t\t\t arg))\n\t\t\t arg))\n\t\t (and (< arg 0)\n\t\t (<= (vertical-motion\n\t\t\t (cons (or goal-column\n\t\t\t\t (if (consp temporary-goal-column)\n\t\t\t\t\t (car temporary-goal-column)\n\t\t\t\t temporary-goal-column))\n\t\t\t\t arg))\n\t\t\t arg)))\n\t (or (>= arg 0)\n\t\t (/= (point) opoint)\n\t\t ;; If the goal column lies on a display string,\n\t\t ;; `vertical-motion' advances the cursor to the end\n\t\t ;; of the string. For arg < 0, this can cause the\n\t\t ;; cursor to get stuck. (Bug#3020).\n\t\t (= (vertical-motion arg) arg)))\n\t(unless noerror\n\t (signal (if (< arg 0) 'beginning-of-buffer 'end-of-buffer)\n\t\t nil)))))\n\n;; This is the guts of next-line and previous-line.\n;; Arg says how many lines to move.\n;; The value is t if we can move the specified number of lines.\n(defun line-move-1 (arg &optional noerror _to-end)\n ;; Don't run any point-motion hooks, and disregard intangibility,\n ;; for intermediate positions.\n (let ((inhibit-point-motion-hooks t)\n\t(opoint (point))\n\t(orig-arg arg))\n (if (consp temporary-goal-column)\n\t(setq temporary-goal-column (+ (car temporary-goal-column)\n\t\t\t\t (cdr temporary-goal-column))))\n (unwind-protect\n\t(progn\n\t (if (not (memq last-command '(next-line previous-line)))\n\t (setq temporary-goal-column\n\t\t (if (and track-eol (eolp)\n\t\t\t ;; Don't count beg of empty line as end of line\n\t\t\t ;; unless we just did explicit end-of-line.\n\t\t\t (or (not (bolp)) (eq last-command 'move-end-of-line)))\n\t\t\tmost-positive-fixnum\n\t\t (current-column))))\n\n\t (if (not (or (integerp selective-display)\n line-move-ignore-invisible))\n\t ;; Use just newline characters.\n\t ;; Set ARG to 0 if we move as many lines as requested.\n\t (or (if (> arg 0)\n\t\t (progn (if (> arg 1) (forward-line (1- arg)))\n\t\t\t ;; This way of moving forward ARG lines\n\t\t\t ;; verifies that we have a newline after the last one.\n\t\t\t ;; It doesn't get confused by intangible text.\n\t\t\t (end-of-line)\n\t\t\t (if (zerop (forward-line 1))\n\t\t\t\t (setq arg 0)))\n\t\t (and (zerop (forward-line arg))\n\t\t\t (bolp)\n\t\t\t (setq arg 0)))\n\t\t (unless noerror\n\t\t (signal (if (< arg 0)\n\t\t\t\t'beginning-of-buffer\n\t\t\t 'end-of-buffer)\n\t\t\t nil)))\n\t ;; Move by arg lines, but ignore invisible ones.\n\t (let (done)\n\t (while (and (> arg 0) (not done))\n\t\t;; If the following character is currently invisible,\n\t\t;; skip all characters with that same `invisible' property value.\n\t\t(while (and (not (eobp)) (invisible-p (point)))\n\t\t (goto-char (next-char-property-change (point))))\n\t\t;; Move a line.\n\t\t;; We don't use `end-of-line', since we want to escape\n\t\t;; from field boundaries occurring exactly at point.\n\t\t(goto-char (constrain-to-field\n\t\t\t (let ((inhibit-field-text-motion t))\n\t\t\t (line-end-position))\n\t\t\t (point) t t\n\t\t\t 'inhibit-line-move-field-capture))\n\t\t;; If there's no invisibility here, move over the newline.\n\t\t(cond\n\t\t ((eobp)\n\t\t (if (not noerror)\n\t\t (signal 'end-of-buffer nil)\n\t\t (setq done t)))\n\t\t ((and (> arg 1) ;; Use vertical-motion for last move\n\t\t (not (integerp selective-display))\n\t\t (not (invisible-p (point))))\n\t\t ;; We avoid vertical-motion when possible\n\t\t ;; because that has to fontify.\n\t\t (forward-line 1))\n\t\t ;; Otherwise move a more sophisticated way.\n\t\t ((zerop (vertical-motion 1))\n\t\t (if (not noerror)\n\t\t (signal 'end-of-buffer nil)\n\t\t (setq done t))))\n\t\t(unless done\n\t\t (setq arg (1- arg))))\n\t ;; The logic of this is the same as the loop above,\n\t ;; it just goes in the other direction.\n\t (while (and (< arg 0) (not done))\n\t\t;; For completely consistency with the forward-motion\n\t\t;; case, we should call beginning-of-line here.\n\t\t;; However, if point is inside a field and on a\n\t\t;; continued line, the call to (vertical-motion -1)\n\t\t;; below won't move us back far enough; then we return\n\t\t;; to the same column in line-move-finish, and point\n\t\t;; gets stuck -- cyd\n\t\t(forward-line 0)\n\t\t(cond\n\t\t ((bobp)\n\t\t (if (not noerror)\n\t\t (signal 'beginning-of-buffer nil)\n\t\t (setq done t)))\n\t\t ((and (< arg -1) ;; Use vertical-motion for last move\n\t\t (not (integerp selective-display))\n\t\t (not (invisible-p (1- (point)))))\n\t\t (forward-line -1))\n\t\t ((zerop (vertical-motion -1))\n\t\t (if (not noerror)\n\t\t (signal 'beginning-of-buffer nil)\n\t\t (setq done t))))\n\t\t(unless done\n\t\t (setq arg (1+ arg))\n\t\t (while (and ;; Don't move over previous invis lines\n\t\t\t ;; if our target is the middle of this line.\n\t\t\t (or (zerop (or goal-column temporary-goal-column))\n\t\t\t (< arg 0))\n\t\t\t (not (bobp)) (invisible-p (1- (point))))\n\t\t (goto-char (previous-char-property-change (point))))))))\n\t ;; This is the value the function returns.\n\t (= arg 0))\n\n (cond ((> arg 0)\n\t ;; If we did not move down as far as desired, at least go\n\t ;; to end of line. Be sure to call point-entered and\n\t ;; point-left-hooks.\n\t (let* ((npoint (prog1 (line-end-position)\n\t\t\t (goto-char opoint)))\n\t\t (inhibit-point-motion-hooks nil))\n\t (goto-char npoint)))\n\t ((< arg 0)\n\t ;; If we did not move up as far as desired,\n\t ;; at least go to beginning of line.\n\t (let* ((npoint (prog1 (line-beginning-position)\n\t\t\t (goto-char opoint)))\n\t\t (inhibit-point-motion-hooks nil))\n\t (goto-char npoint)))\n\t (t\n\t (line-move-finish (or goal-column temporary-goal-column)\n\t\t\t opoint (> orig-arg 0)))))))\n\n(defun line-move-finish (column opoint forward)\n (let ((repeat t))\n (while repeat\n ;; Set REPEAT to t to repeat the whole thing.\n (setq repeat nil)\n\n (let (new\n\t (old (point))\n\t (line-beg (line-beginning-position))\n\t (line-end\n\t ;; Compute the end of the line\n\t ;; ignoring effectively invisible newlines.\n\t (save-excursion\n\t ;; Like end-of-line but ignores fields.\n\t (skip-chars-forward \"^\\n\")\n\t (while (and (not (eobp)) (invisible-p (point)))\n\t\t (goto-char (next-char-property-change (point)))\n\t\t (skip-chars-forward \"^\\n\"))\n\t (point))))\n\n\t;; Move to the desired column.\n (if (and line-move-visual\n (not (or truncate-lines truncate-partial-width-windows)))\n ;; Under line-move-visual, goal-column should be\n ;; interpreted in units of the frame's canonical character\n ;; width, which is exactly what vertical-motion does.\n (vertical-motion (cons column 0))\n (line-move-to-column (truncate column)))\n\n\t;; Corner case: suppose we start out in a field boundary in\n\t;; the middle of a continued line. When we get to\n\t;; line-move-finish, point is at the start of a new *screen*\n\t;; line but the same text line; then line-move-to-column would\n\t;; move us backwards. Test using C-n with point on the \"x\" in\n\t;; (insert \"a\" (propertize \"x\" 'field t) (make-string 89 ?y))\n\t(and forward\n\t (< (point) old)\n\t (goto-char old))\n\n\t(setq new (point))\n\n\t;; Process intangibility within a line.\n\t;; With inhibit-point-motion-hooks bound to nil, a call to\n\t;; goto-char moves point past intangible text.\n\n\t;; However, inhibit-point-motion-hooks controls both the\n\t;; intangibility and the point-entered/point-left hooks. The\n\t;; following hack avoids calling the point-* hooks\n\t;; unnecessarily. Note that we move *forward* past intangible\n\t;; text when the initial and final points are the same.\n\t(goto-char new)\n\t(let ((inhibit-point-motion-hooks nil))\n\t (goto-char new)\n\n\t ;; If intangibility moves us to a different (later) place\n\t ;; in the same line, use that as the destination.\n\t (if (<= (point) line-end)\n\t (setq new (point))\n\t ;; If that position is \"too late\",\n\t ;; try the previous allowable position.\n\t ;; See if it is ok.\n\t (backward-char)\n\t (if (if forward\n\t\t ;; If going forward, don't accept the previous\n\t\t ;; allowable position if it is before the target line.\n\t\t (< line-beg (point))\n\t\t ;; If going backward, don't accept the previous\n\t\t ;; allowable position if it is still after the target line.\n\t\t (<= (point) line-end))\n\t\t(setq new (point))\n\t ;; As a last resort, use the end of the line.\n\t (setq new line-end))))\n\n\t;; Now move to the updated destination, processing fields\n\t;; as well as intangibility.\n\t(goto-char opoint)\n\t(let ((inhibit-point-motion-hooks nil))\n\t (goto-char\n\t ;; Ignore field boundaries if the initial and final\n\t ;; positions have the same `field' property, even if the\n\t ;; fields are non-contiguous. This seems to be \"nicer\"\n\t ;; behavior in many situations.\n\t (if (eq (get-char-property new 'field)\n\t \t (get-char-property opoint 'field))\n\t new\n\t (constrain-to-field new opoint t t\n\t\t\t\t 'inhibit-line-move-field-capture))))\n\n\t;; If all this moved us to a different line,\n\t;; retry everything within that new line.\n\t(when (or (< (point) line-beg) (> (point) line-end))\n\t ;; Repeat the intangibility and field processing.\n\t (setq repeat t))))))\n\n(defun line-move-to-column (col)\n \"Try to find column COL, considering invisibility.\nThis function works only in certain cases,\nbecause what we really need is for `move-to-column'\nand `current-column' to be able to ignore invisible text.\"\n (if (zerop col)\n (beginning-of-line)\n (move-to-column col))\n\n (when (and line-move-ignore-invisible\n\t (not (bolp)) (invisible-p (1- (point))))\n (let ((normal-location (point))\n\t (normal-column (current-column)))\n ;; If the following character is currently invisible,\n ;; skip all characters with that same `invisible' property value.\n (while (and (not (eobp))\n\t\t (invisible-p (point)))\n\t(goto-char (next-char-property-change (point))))\n ;; Have we advanced to a larger column position?\n (if (> (current-column) normal-column)\n\t ;; We have made some progress towards the desired column.\n\t ;; See if we can make any further progress.\n\t (line-move-to-column (+ (current-column) (- col normal-column)))\n\t;; Otherwise, go to the place we originally found\n\t;; and move back over invisible text.\n\t;; that will get us to the same place on the screen\n\t;; but with a more reasonable buffer position.\n\t(goto-char normal-location)\n\t(let ((line-beg\n ;; We want the real line beginning, so it's consistent\n ;; with bolp below, otherwise we might infloop.\n (let ((inhibit-field-text-motion t))\n (line-beginning-position))))\n\t (while (and (not (bolp)) (invisible-p (1- (point))))\n\t (goto-char (previous-char-property-change (point) line-beg))))))))\n\n(defun move-end-of-line (arg)\n \"Move point to end of current line as displayed.\nWith argument ARG not nil or 1, move forward ARG - 1 lines first.\nIf point reaches the beginning or end of buffer, it stops there.\n\nTo ignore the effects of the `intangible' text or overlay\nproperty, bind `inhibit-point-motion-hooks' to t.\nIf there is an image in the current line, this function\ndisregards newlines that are part of the text on which the image\nrests.\"\n (interactive \"^p\")\n (or arg (setq arg 1))\n (let (done)\n (while (not done)\n (let ((newpos\n\t (save-excursion\n\t (let ((goal-column 0)\n\t\t (line-move-visual nil))\n\t\t (and (line-move arg t)\n\t\t ;; With bidi reordering, we may not be at bol,\n\t\t ;; so make sure we are.\n\t\t (skip-chars-backward \"^\\n\")\n\t\t (not (bobp))\n\t\t (progn\n\t\t\t(while (and (not (bobp)) (invisible-p (1- (point))))\n\t\t\t (goto-char (previous-single-char-property-change\n (point) 'invisible)))\n\t\t\t(backward-char 1)))\n\t\t (point)))))\n\t(goto-char newpos)\n\t(if (and (> (point) newpos)\n\t\t (eq (preceding-char) ?\\n))\n\t (backward-char 1)\n\t (if (and (> (point) newpos) (not (eobp))\n\t\t (not (eq (following-char) ?\\n)))\n\t ;; If we skipped something intangible and now we're not\n\t ;; really at eol, keep going.\n\t (setq arg 1)\n\t (setq done t)))))))\n\n(defun move-beginning-of-line (arg)\n \"Move point to beginning of current line as displayed.\n\\(If there's an image in the line, this disregards newlines\nwhich are part of the text that the image rests on.)\n\nWith argument ARG not nil or 1, move forward ARG - 1 lines first.\nIf point reaches the beginning or end of buffer, it stops there.\n\\(But if the buffer doesn't end in a newline, it stops at the\nbeginning of the last line.)\nTo ignore intangibility, bind `inhibit-point-motion-hooks' to t.\"\n (interactive \"^p\")\n (or arg (setq arg 1))\n\n (let ((orig (point))\n\tfirst-vis first-vis-field-value)\n\n ;; Move by lines, if ARG is not 1 (the default).\n (if (/= arg 1)\n\t(let ((line-move-visual nil))\n\t (line-move (1- arg) t)))\n\n ;; Move to beginning-of-line, ignoring fields and invisible text.\n (skip-chars-backward \"^\\n\")\n (while (and (not (bobp)) (invisible-p (1- (point))))\n (goto-char (previous-char-property-change (point)))\n (skip-chars-backward \"^\\n\"))\n\n ;; Now find first visible char in the line.\n (while (and (< (point) orig) (invisible-p (point)))\n (goto-char (next-char-property-change (point) orig)))\n (setq first-vis (point))\n\n ;; See if fields would stop us from reaching FIRST-VIS.\n (setq first-vis-field-value\n\t (constrain-to-field first-vis orig (/= arg 1) t nil))\n\n (goto-char (if (/= first-vis-field-value first-vis)\n\t\t ;; If yes, obey them.\n\t\t first-vis-field-value\n\t\t ;; Otherwise, move to START with attention to fields.\n\t\t ;; (It is possible that fields never matter in this case.)\n\t\t (constrain-to-field (point) orig\n\t\t\t\t (/= arg 1) t nil)))))\n\n\n;; Many people have said they rarely use this feature, and often type\n;; it by accident. Maybe it shouldn't even be on a key.\n(put 'set-goal-column 'disabled t)\n\n(defun set-goal-column (arg)\n \"Set the current horizontal position as a goal for \\\\[next-line] and \\\\[previous-line].\nThose commands will move to this position in the line moved to\nrather than trying to keep the same horizontal position.\nWith a non-nil argument ARG, clears out the goal column\nso that \\\\[next-line] and \\\\[previous-line] resume vertical motion.\nThe goal column is stored in the variable `goal-column'.\nThis is a buffer-local setting.\"\n (interactive \"P\")\n (if arg\n (progn\n (setq goal-column nil)\n (message \"No goal column\"))\n (setq goal-column (current-column))\n ;; The older method below can be erroneous if `set-goal-column' is bound\n ;; to a sequence containing %\n ;;(message (substitute-command-keys\n ;;\"Goal column %d (use \\\\[set-goal-column] with an arg to unset it)\")\n ;;goal-column)\n (message \"%s\"\n\t (concat\n\t (format \"Goal column %d \" goal-column)\n\t (substitute-command-keys\n\t \"(use \\\\[set-goal-column] with an arg to unset it)\")))\n\n )\n nil)\n\f\n;;; Editing based on visual lines, as opposed to logical lines.\n\n(defun end-of-visual-line (&optional n)\n \"Move point to end of current visual line.\nWith argument N not nil or 1, move forward N - 1 visual lines first.\nIf point reaches the beginning or end of buffer, it stops there.\nTo ignore intangibility, bind `inhibit-point-motion-hooks' to t.\"\n (interactive \"^p\")\n (or n (setq n 1))\n (if (/= n 1)\n (let ((line-move-visual t))\n\t(line-move (1- n) t)))\n ;; Unlike `move-beginning-of-line', `move-end-of-line' doesn't\n ;; constrain to field boundaries, so we don't either.\n (vertical-motion (cons (window-width) 0)))\n\n(defun beginning-of-visual-line (&optional n)\n \"Move point to beginning of current visual line.\nWith argument N not nil or 1, move forward N - 1 visual lines first.\nIf point reaches the beginning or end of buffer, it stops there.\n\\(But if the buffer doesn't end in a newline, it stops at the\nbeginning of the last visual line.)\nTo ignore intangibility, bind `inhibit-point-motion-hooks' to t.\"\n (interactive \"^p\")\n (or n (setq n 1))\n (let ((opoint (point)))\n (if (/= n 1)\n\t(let ((line-move-visual t))\n\t (line-move (1- n) t)))\n (vertical-motion 0)\n ;; Constrain to field boundaries, like `move-beginning-of-line'.\n (goto-char (constrain-to-field (point) opoint (/= n 1)))))\n\n(defun kill-visual-line (&optional arg)\n \"Kill the rest of the visual line.\nWith prefix argument ARG, kill that many visual lines from point.\nIf ARG is negative, kill visual lines backward.\nIf ARG is zero, kill the text before point on the current visual\nline.\n\nIf you want to append the killed line to the last killed text,\nuse \\\\[append-next-kill] before \\\\[kill-line].\n\nIf the buffer is read-only, Emacs will beep and refrain from deleting\nthe line, but put the line in the kill ring anyway. This means that\nyou can use this command to copy text from a read-only buffer.\n\\(If the variable `kill-read-only-ok' is non-nil, then this won't\neven beep.)\"\n (interactive \"P\")\n ;; Like in `kill-line', it's better to move point to the other end\n ;; of the kill before killing.\n (let ((opoint (point))\n\t(kill-whole-line (and kill-whole-line (bolp))))\n (if arg\n\t(vertical-motion (prefix-numeric-value arg))\n (end-of-visual-line 1)\n (if (= (point) opoint)\n\t (vertical-motion 1)\n\t;; Skip any trailing whitespace at the end of the visual line.\n\t;; We used to do this only if `show-trailing-whitespace' is\n\t;; nil, but that's wrong; the correct thing would be to check\n\t;; whether the trailing whitespace is highlighted. But, it's\n\t;; OK to just do this unconditionally.\n\t(skip-chars-forward \" \\t\")))\n (kill-region opoint (if (and kill-whole-line (= (following-char) ?\\n))\n\t\t\t (1+ (point))\n\t\t\t (point)))))\n\n(defun next-logical-line (&optional arg try-vscroll)\n \"Move cursor vertically down ARG lines.\nThis is identical to `next-line', except that it always moves\nby logical lines instead of visual lines, ignoring the value of\nthe variable `line-move-visual'.\"\n (interactive \"^p\\np\")\n (let ((line-move-visual nil))\n (with-no-warnings\n (next-line arg try-vscroll))))\n\n(defun previous-logical-line (&optional arg try-vscroll)\n \"Move cursor vertically up ARG lines.\nThis is identical to `previous-line', except that it always moves\nby logical lines instead of visual lines, ignoring the value of\nthe variable `line-move-visual'.\"\n (interactive \"^p\\np\")\n (let ((line-move-visual nil))\n (with-no-warnings\n (previous-line arg try-vscroll))))\n\n(defgroup visual-line nil\n \"Editing based on visual lines.\"\n :group 'convenience\n :version \"23.1\")\n\n(defvar visual-line-mode-map\n (let ((map (make-sparse-keymap)))\n (define-key map [remap kill-line] 'kill-visual-line)\n (define-key map [remap move-beginning-of-line] 'beginning-of-visual-line)\n (define-key map [remap move-end-of-line] 'end-of-visual-line)\n ;; These keybindings interfere with xterm function keys. Are\n ;; there any other suitable bindings?\n ;; (define-key map \"\\M-[\" 'previous-logical-line)\n ;; (define-key map \"\\M-]\" 'next-logical-line)\n map))\n\n(defcustom visual-line-fringe-indicators '(nil nil)\n \"How fringe indicators are shown for wrapped lines in `visual-line-mode'.\nThe value should be a list of the form (LEFT RIGHT), where LEFT\nand RIGHT are symbols representing the bitmaps to display, to\nindicate wrapped lines, in the left and right fringes respectively.\nSee also `fringe-indicator-alist'.\nThe default is not to display fringe indicators for wrapped lines.\nThis variable does not affect fringe indicators displayed for\nother purposes.\"\n :type '(list (choice (const :tag \"Hide left indicator\" nil)\n\t\t (const :tag \"Left curly arrow\" left-curly-arrow)\n\t\t (symbol :tag \"Other bitmap\"))\n\t (choice (const :tag \"Hide right indicator\" nil)\n\t\t (const :tag \"Right curly arrow\" right-curly-arrow)\n\t\t (symbol :tag \"Other bitmap\")))\n :set (lambda (symbol value)\n\t (dolist (buf (buffer-list))\n\t (with-current-buffer buf\n\t (when (and (boundp 'visual-line-mode)\n\t\t\t(symbol-value 'visual-line-mode))\n\t (setq fringe-indicator-alist\n\t\t (cons (cons 'continuation value)\n\t\t\t (assq-delete-all\n\t\t\t 'continuation\n\t\t\t (copy-tree fringe-indicator-alist)))))))\n\t (set-default symbol value)))\n\n(defvar visual-line--saved-state nil)\n\n(define-minor-mode visual-line-mode\n \"Toggle visual line based editing (Visual Line mode) in the current buffer.\nInteractively, with a prefix argument, enable\nVisual Line mode if the prefix argument is positive,\nand disable it otherwise. If called from Lisp, toggle\nthe mode if ARG is `toggle', disable the mode if ARG is\na non-positive integer, and enable the mode otherwise\n\\(including if ARG is omitted or nil or a positive integer).\n\nWhen Visual Line mode is enabled, `word-wrap' is turned on in\nthis buffer, and simple editing commands are redefined to act on\nvisual lines, not logical lines. See Info node `Visual Line\nMode' for details.\"\n :keymap visual-line-mode-map\n :group 'visual-line\n :lighter \" Wrap\"\n (if visual-line-mode\n (progn\n\t(set (make-local-variable 'visual-line--saved-state) nil)\n\t;; Save the local values of some variables, to be restored if\n\t;; visual-line-mode is turned off.\n\t(dolist (var '(line-move-visual truncate-lines\n\t\t truncate-partial-width-windows\n\t\t word-wrap fringe-indicator-alist))\n\t (if (local-variable-p var)\n\t (push (cons var (symbol-value var))\n\t\t visual-line--saved-state)))\n\t(set (make-local-variable 'line-move-visual) t)\n\t(set (make-local-variable 'truncate-partial-width-windows) nil)\n\t(setq truncate-lines nil\n\t word-wrap t\n\t fringe-indicator-alist\n\t (cons (cons 'continuation visual-line-fringe-indicators)\n\t\t fringe-indicator-alist)))\n (kill-local-variable 'line-move-visual)\n (kill-local-variable 'word-wrap)\n (kill-local-variable 'truncate-lines)\n (kill-local-variable 'truncate-partial-width-windows)\n (kill-local-variable 'fringe-indicator-alist)\n (dolist (saved visual-line--saved-state)\n (set (make-local-variable (car saved)) (cdr saved)))\n (kill-local-variable 'visual-line--saved-state)))\n\n(defun turn-on-visual-line-mode ()\n (visual-line-mode 1))\n\n(define-globalized-minor-mode global-visual-line-mode\n visual-line-mode turn-on-visual-line-mode)\n\n\f\n(defun transpose-chars (arg)\n \"Interchange characters around point, moving forward one character.\nWith prefix arg ARG, effect is to take character before point\nand drag it forward past ARG other characters (backward if ARG negative).\nIf no argument and at end of line, the previous two chars are exchanged.\"\n (interactive \"*P\")\n (when (and (null arg) (eolp) (not (bobp))\n\t (not (get-text-property (1- (point)) 'read-only)))\n (forward-char -1))\n (transpose-subr 'forward-char (prefix-numeric-value arg)))\n\n(defun transpose-words (arg)\n \"Interchange words around point, leaving point at end of them.\nWith prefix arg ARG, effect is to take word before or around point\nand drag it forward past ARG other words (backward if ARG negative).\nIf ARG is zero, the words around or after point and around or after mark\nare interchanged.\"\n ;; FIXME: `foo a!nd bar' should transpose into `bar and foo'.\n (interactive \"*p\")\n (transpose-subr 'forward-word arg))\n\n(defun transpose-sexps (arg)\n \"Like \\\\[transpose-chars] (`transpose-chars'), but applies to sexps.\nUnlike `transpose-words', point must be between the two sexps and not\nin the middle of a sexp to be transposed.\nWith non-zero prefix arg ARG, effect is to take the sexp before point\nand drag it forward past ARG other sexps (backward if ARG is negative).\nIf ARG is zero, the sexps ending at or after point and at or after mark\nare interchanged.\"\n (interactive \"*p\")\n (transpose-subr\n (lambda (arg)\n ;; Here we should try to simulate the behavior of\n ;; (cons (progn (forward-sexp x) (point))\n ;; (progn (forward-sexp (- x)) (point)))\n ;; Except that we don't want to rely on the second forward-sexp\n ;; putting us back to where we want to be, since forward-sexp-function\n ;; might do funny things like infix-precedence.\n (if (if (> arg 0)\n\t (looking-at \"\\\\sw\\\\|\\\\s_\")\n\t (and (not (bobp))\n\t\t(save-excursion (forward-char -1) (looking-at \"\\\\sw\\\\|\\\\s_\"))))\n\t ;; Jumping over a symbol. We might be inside it, mind you.\n\t (progn (funcall (if (> arg 0)\n\t\t\t 'skip-syntax-backward 'skip-syntax-forward)\n\t\t\t \"w_\")\n\t\t(cons (save-excursion (forward-sexp arg) (point)) (point)))\n ;; Otherwise, we're between sexps. Take a step back before jumping\n ;; to make sure we'll obey the same precedence no matter which direction\n ;; we're going.\n (funcall (if (> arg 0) 'skip-syntax-backward 'skip-syntax-forward) \" .\")\n (cons (save-excursion (forward-sexp arg) (point))\n\t (progn (while (or (forward-comment (if (> arg 0) 1 -1))\n\t\t\t (not (zerop (funcall (if (> arg 0)\n\t\t\t\t\t\t\t'skip-syntax-forward\n\t\t\t\t\t\t 'skip-syntax-backward)\n\t\t\t\t\t\t \".\")))))\n\t\t (point)))))\n arg 'special))\n\n(defun transpose-lines (arg)\n \"Exchange current line and previous line, leaving point after both.\nWith argument ARG, takes previous line and moves it past ARG lines.\nWith argument 0, interchanges line point is in with line mark is in.\"\n (interactive \"*p\")\n (transpose-subr (function\n\t\t (lambda (arg)\n\t\t (if (> arg 0)\n\t\t\t (progn\n\t\t\t ;; Move forward over ARG lines,\n\t\t\t ;; but create newlines if necessary.\n\t\t\t (setq arg (forward-line arg))\n\t\t\t (if (/= (preceding-char) ?\\n)\n\t\t\t (setq arg (1+ arg)))\n\t\t\t (if (> arg 0)\n\t\t\t (newline arg)))\n\t\t (forward-line arg))))\n\t\t arg))\n\n;; FIXME seems to leave point BEFORE the current object when ARG = 0,\n;; which seems inconsistent with the ARG /= 0 case.\n;; FIXME document SPECIAL.\n(defun transpose-subr (mover arg &optional special)\n \"Subroutine to do the work of transposing objects.\nWorks for lines, sentences, paragraphs, etc. MOVER is a function that\nmoves forward by units of the given object (e.g. forward-sentence,\nforward-paragraph). If ARG is zero, exchanges the current object\nwith the one containing mark. If ARG is an integer, moves the\ncurrent object past ARG following (if ARG is positive) or\npreceding (if ARG is negative) objects, leaving point after the\ncurrent object.\"\n (let ((aux (if special mover\n\t (lambda (x)\n\t\t (cons (progn (funcall mover x) (point))\n\t\t (progn (funcall mover (- x)) (point))))))\n\tpos1 pos2)\n (cond\n ((= arg 0)\n (save-excursion\n\t(setq pos1 (funcall aux 1))\n\t(goto-char (or (mark) (error \"No mark set in this buffer\")))\n\t(setq pos2 (funcall aux 1))\n\t(transpose-subr-1 pos1 pos2))\n (exchange-point-and-mark))\n ((> arg 0)\n (setq pos1 (funcall aux -1))\n (setq pos2 (funcall aux arg))\n (transpose-subr-1 pos1 pos2)\n (goto-char (car pos2)))\n (t\n (setq pos1 (funcall aux -1))\n (goto-char (car pos1))\n (setq pos2 (funcall aux arg))\n (transpose-subr-1 pos1 pos2)\n (goto-char (+ (car pos2) (- (cdr pos1) (car pos1))))))))\n\n(defun transpose-subr-1 (pos1 pos2)\n (when (> (car pos1) (cdr pos1)) (setq pos1 (cons (cdr pos1) (car pos1))))\n (when (> (car pos2) (cdr pos2)) (setq pos2 (cons (cdr pos2) (car pos2))))\n (when (> (car pos1) (car pos2))\n (let ((swap pos1))\n (setq pos1 pos2 pos2 swap)))\n (if (> (cdr pos1) (car pos2)) (error \"Don't have two things to transpose\"))\n (atomic-change-group\n ;; This sequence of insertions attempts to preserve marker\n ;; positions at the start and end of the transposed objects.\n (let* ((word (buffer-substring (car pos2) (cdr pos2)))\n\t (len1 (- (cdr pos1) (car pos1)))\n\t (len2 (length word))\n\t (boundary (make-marker)))\n (set-marker boundary (car pos2))\n (goto-char (cdr pos1))\n (insert-before-markers word)\n (setq word (delete-and-extract-region (car pos1) (+ (car pos1) len1)))\n (goto-char boundary)\n (insert word)\n (goto-char (+ boundary len1))\n (delete-region (point) (+ (point) len2))\n (set-marker boundary nil))))\n\f\n(defun backward-word (&optional arg)\n \"Move backward until encountering the beginning of a word.\nWith argument ARG, do this that many times.\nIf ARG is omitted or nil, move point backward one word.\n\nThe word boundaries are normally determined by the buffer's\nsyntax table and character script (according to\n`char-script-table'), but `find-word-boundary-function-table',\nsuch as set up by `subword-mode', can change that. If a Lisp\nprogram needs to move by words determined strictly by the syntax\ntable, it should use `backward-word-strictly' instead. See Info\nnode `(elisp) Word Motion' for details.\"\n (interactive \"^p\")\n (forward-word (- (or arg 1))))\n\n(defun mark-word (&optional arg allow-extend)\n \"Set mark ARG words away from point.\nThe place mark goes is the same place \\\\[forward-word] would\nmove to with the same argument.\nInteractively, if this command is repeated\nor (in Transient Mark mode) if the mark is active,\nit marks the next ARG words after the ones already marked.\"\n (interactive \"P\\np\")\n (cond ((and allow-extend\n\t (or (and (eq last-command this-command) (mark t))\n\t\t (region-active-p)))\n\t (setq arg (if arg (prefix-numeric-value arg)\n\t\t (if (< (mark) (point)) -1 1)))\n\t (set-mark\n\t (save-excursion\n\t (goto-char (mark))\n\t (forward-word arg)\n\t (point))))\n\t(t\n\t (push-mark\n\t (save-excursion\n\t (forward-word (prefix-numeric-value arg))\n\t (point))\n\t nil t))))\n\n(defun kill-word (arg)\n \"Kill characters forward until encountering the end of a word.\nWith argument ARG, do this that many times.\"\n (interactive \"p\")\n (kill-region (point) (progn (forward-word arg) (point))))\n\n(defun backward-kill-word (arg)\n \"Kill characters backward until encountering the beginning of a word.\nWith argument ARG, do this that many times.\"\n (interactive \"p\")\n (kill-word (- arg)))\n\n(defun current-word (&optional strict really-word)\n \"Return the word at or near point, as a string.\nThe return value includes no text properties.\n\nIf optional arg STRICT is non-nil, return nil unless point is\nwithin or adjacent to a word, otherwise look for a word within\npoint's line. If there is no word anywhere on point's line, the\nvalue is nil regardless of STRICT.\n\nBy default, this function treats as a single word any sequence of\ncharacters that have either word or symbol syntax. If optional\narg REALLY-WORD is non-nil, only characters of word syntax can\nconstitute a word.\"\n (save-excursion\n (let* ((oldpoint (point)) (start (point)) (end (point))\n\t (syntaxes (if really-word \"w\" \"w_\"))\n\t (not-syntaxes (concat \"^\" syntaxes)))\n (skip-syntax-backward syntaxes) (setq start (point))\n (goto-char oldpoint)\n (skip-syntax-forward syntaxes) (setq end (point))\n (when (and (eq start oldpoint) (eq end oldpoint)\n\t\t ;; Point is neither within nor adjacent to a word.\n\t\t (not strict))\n\t;; Look for preceding word in same line.\n\t(skip-syntax-backward not-syntaxes (line-beginning-position))\n\t(if (bolp)\n\t ;; No preceding word in same line.\n\t ;; Look for following word in same line.\n\t (progn\n\t (skip-syntax-forward not-syntaxes (line-end-position))\n\t (setq start (point))\n\t (skip-syntax-forward syntaxes)\n\t (setq end (point)))\n\t (setq end (point))\n\t (skip-syntax-backward syntaxes)\n\t (setq start (point))))\n ;; If we found something nonempty, return it as a string.\n (unless (= start end)\n\t(buffer-substring-no-properties start end)))))\n\f\n(defcustom fill-prefix nil\n \"String for filling to insert at front of new line, or nil for none.\"\n :type '(choice (const :tag \"None\" nil)\n\t\t string)\n :group 'fill)\n(make-variable-buffer-local 'fill-prefix)\n(put 'fill-prefix 'safe-local-variable 'string-or-null-p)\n\n(defcustom auto-fill-inhibit-regexp nil\n \"Regexp to match lines which should not be auto-filled.\"\n :type '(choice (const :tag \"None\" nil)\n\t\t regexp)\n :group 'fill)\n\n(defun do-auto-fill ()\n \"The default value for `normal-auto-fill-function'.\nThis is the default auto-fill function, some major modes use a different one.\nReturns t if it really did any work.\"\n (let (fc justify give-up\n\t (fill-prefix fill-prefix))\n (if (or (not (setq justify (current-justification)))\n\t (null (setq fc (current-fill-column)))\n\t (and (eq justify 'left)\n\t\t (<= (current-column) fc))\n\t (and auto-fill-inhibit-regexp\n\t\t (save-excursion (beginning-of-line)\n\t\t\t\t (looking-at auto-fill-inhibit-regexp))))\n\tnil ;; Auto-filling not required\n (if (memq justify '(full center right))\n\t (save-excursion (unjustify-current-line)))\n\n ;; Choose a fill-prefix automatically.\n (when (and adaptive-fill-mode\n\t\t (or (null fill-prefix) (string= fill-prefix \"\")))\n\t(let ((prefix\n\t (fill-context-prefix\n\t\t(save-excursion (fill-forward-paragraph -1) (point))\n\t\t(save-excursion (fill-forward-paragraph 1) (point)))))\n\t (and prefix (not (equal prefix \"\"))\n\t ;; Use auto-indentation rather than a guessed empty prefix.\n\t (not (and fill-indent-according-to-mode\n\t\t\t (string-match \"\\\\`[ \\t]*\\\\'\" prefix)))\n\t (setq fill-prefix prefix))))\n\n (while (and (not give-up) (> (current-column) fc))\n ;; Determine where to split the line.\n (let ((fill-point\n (save-excursion\n (beginning-of-line)\n ;; Don't split earlier in the line than the length of the\n ;; fill prefix, since the resulting line would be longer.\n (when fill-prefix\n (move-to-column (string-width fill-prefix)))\n (let ((after-prefix (point)))\n (move-to-column (1+ fc))\n (fill-move-to-break-point after-prefix)\n (point)))))\n\n\t ;; See whether the place we found is any good.\n\t (if (save-excursion\n\t\t(goto-char fill-point)\n\t\t(or (bolp)\n\t\t ;; There is no use breaking at end of line.\n\t\t (save-excursion (skip-chars-forward \" \") (eolp))\n\t\t ;; Don't split right after a comment starter\n\t\t ;; since we would just make another comment starter.\n\t\t (and comment-start-skip\n\t\t\t (let ((limit (point)))\n\t\t\t (beginning-of-line)\n\t\t\t (and (re-search-forward comment-start-skip\n\t\t\t\t\t\t limit t)\n\t\t\t\t(eq (point) limit))))))\n\t ;; No good place to break => stop trying.\n\t (setq give-up t)\n\t ;; Ok, we have a useful place to break the line. Do it.\n\t (let ((prev-column (current-column)))\n\t ;; If point is at the fill-point, do not `save-excursion'.\n\t ;; Otherwise, if a comment prefix or fill-prefix is inserted,\n\t ;; point will end up before it rather than after it.\n\t (if (save-excursion\n\t\t (skip-chars-backward \" \\t\")\n\t\t (= (point) fill-point))\n\t\t (default-indent-new-line t)\n\t\t(save-excursion\n\t\t (goto-char fill-point)\n\t\t (default-indent-new-line t)))\n\t ;; Now do justification, if required\n\t (if (not (eq justify 'left))\n\t\t (save-excursion\n\t\t (end-of-line 0)\n\t\t (justify-current-line justify nil t)))\n\t ;; If making the new line didn't reduce the hpos of\n\t ;; the end of the line, then give up now;\n\t ;; trying again will not help.\n\t (if (>= (current-column) prev-column)\n\t\t (setq give-up t))))))\n ;; Justify last line.\n (justify-current-line justify t t)\n t)))\n\n(defvar comment-line-break-function 'comment-indent-new-line\n \"Mode-specific function which line breaks and continues a comment.\nThis function is called during auto-filling when a comment syntax\nis defined.\nThe function should take a single optional argument, which is a flag\nindicating whether it should use soft newlines.\")\n\n(defun default-indent-new-line (&optional soft)\n \"Break line at point and indent.\nIf a comment syntax is defined, call `comment-indent-new-line'.\n\nThe inserted newline is marked hard if variable `use-hard-newlines' is true,\nunless optional argument SOFT is non-nil.\"\n (interactive)\n (if comment-start\n (funcall comment-line-break-function soft)\n ;; Insert the newline before removing empty space so that markers\n ;; get preserved better.\n (if soft (insert-and-inherit ?\\n) (newline 1))\n (save-excursion (forward-char -1) (delete-horizontal-space))\n (delete-horizontal-space)\n\n (if (and fill-prefix (not adaptive-fill-mode))\n\t;; Blindly trust a non-adaptive fill-prefix.\n\t(progn\n\t (indent-to-left-margin)\n\t (insert-before-markers-and-inherit fill-prefix))\n\n (cond\n ;; If there's an adaptive prefix, use it unless we're inside\n ;; a comment and the prefix is not a comment starter.\n (fill-prefix\n\t(indent-to-left-margin)\n\t(insert-and-inherit fill-prefix))\n ;; If we're not inside a comment, just try to indent.\n (t (indent-according-to-mode))))))\n\n(defun internal-auto-fill ()\n \"The function called by `self-insert-command' to perform auto-filling.\"\n (when (or (not comment-start)\n (not comment-auto-fill-only-comments)\n (nth 4 (syntax-ppss)))\n (funcall auto-fill-function)))\n\n(defvar normal-auto-fill-function 'do-auto-fill\n \"The function to use for `auto-fill-function' if Auto Fill mode is turned on.\nSome major modes set this.\")\n\n(put 'auto-fill-function :minor-mode-function 'auto-fill-mode)\n;; `functions' and `hooks' are usually unsafe to set, but setting\n;; auto-fill-function to nil in a file-local setting is safe and\n;; can be useful to prevent auto-filling.\n(put 'auto-fill-function 'safe-local-variable 'null)\n\n(define-minor-mode auto-fill-mode\n \"Toggle automatic line breaking (Auto Fill mode).\nInteractively, with a prefix argument, enable\nAuto Fill mode if the prefix argument is positive,\nand disable it otherwise. If called from Lisp, toggle\nthe mode if ARG is `toggle', disable the mode if ARG is\na non-positive integer, and enable the mode otherwise\n\\(including if ARG is omitted or nil or a positive integer).\n\nWhen Auto Fill mode is enabled, inserting a space at a column\nbeyond `current-fill-column' automatically breaks the line at a\nprevious space.\n\nWhen `auto-fill-mode' is on, the `auto-fill-function' variable is\nnon-nil.\n\nThe value of `normal-auto-fill-function' specifies the function to use\nfor `auto-fill-function' when turning Auto Fill mode on.\"\n :variable (auto-fill-function\n . (lambda (v) (setq auto-fill-function\n (if v normal-auto-fill-function)))))\n\n;; This holds a document string used to document auto-fill-mode.\n(defun auto-fill-function ()\n \"Automatically break line at a previous space, in insertion of text.\"\n nil)\n\n(defun turn-on-auto-fill ()\n \"Unconditionally turn on Auto Fill mode.\"\n (auto-fill-mode 1))\n\n(defun turn-off-auto-fill ()\n \"Unconditionally turn off Auto Fill mode.\"\n (auto-fill-mode -1))\n\n(custom-add-option 'text-mode-hook 'turn-on-auto-fill)\n\n(defun set-fill-column (arg)\n \"Set `fill-column' to specified argument.\nUse \\\\[universal-argument] followed by a number to specify a column.\nJust \\\\[universal-argument] as argument means to use the current column.\"\n (interactive\n (list (or current-prefix-arg\n ;; We used to use current-column silently, but C-x f is too easily\n ;; typed as a typo for C-x C-f, so we turned it into an error and\n ;; now an interactive prompt.\n (read-number \"Set fill-column to: \" (current-column)))))\n (if (consp arg)\n (setq arg (current-column)))\n (if (not (integerp arg))\n ;; Disallow missing argument; it's probably a typo for C-x C-f.\n (error \"set-fill-column requires an explicit argument\")\n (message \"Fill column set to %d (was %d)\" arg fill-column)\n (setq fill-column arg)))\n\f\n(defun set-selective-display (arg)\n \"Set `selective-display' to ARG; clear it if no arg.\nWhen the value of `selective-display' is a number > 0,\nlines whose indentation is >= that value are not displayed.\nThe variable `selective-display' has a separate value for each buffer.\"\n (interactive \"P\")\n (if (eq selective-display t)\n (error \"selective-display already in use for marked lines\"))\n (let ((current-vpos\n\t (save-restriction\n\t (narrow-to-region (point-min) (point))\n\t (goto-char (window-start))\n\t (vertical-motion (window-height)))))\n (setq selective-display\n\t (and arg (prefix-numeric-value arg)))\n (recenter current-vpos))\n (set-window-start (selected-window) (window-start))\n (princ \"selective-display set to \" t)\n (prin1 selective-display t)\n (princ \".\" t))\n\n(defvaralias 'indicate-unused-lines 'indicate-empty-lines)\n\n(defun toggle-truncate-lines (&optional arg)\n \"Toggle truncating of long lines for the current buffer.\nWhen truncating is off, long lines are folded.\nWith prefix argument ARG, truncate long lines if ARG is positive,\notherwise fold them. Note that in side-by-side windows, this\ncommand has no effect if `truncate-partial-width-windows' is\nnon-nil.\"\n (interactive \"P\")\n (setq truncate-lines\n\t(if (null arg)\n\t (not truncate-lines)\n\t (> (prefix-numeric-value arg) 0)))\n (force-mode-line-update)\n (unless truncate-lines\n (let ((buffer (current-buffer)))\n (walk-windows (lambda (window)\n\t\t (if (eq buffer (window-buffer window))\n\t\t\t (set-window-hscroll window 0)))\n\t\t nil t)))\n (message \"Truncate long lines %s\"\n\t (if truncate-lines \"enabled\" \"disabled\")))\n\n(defun toggle-word-wrap (&optional arg)\n \"Toggle whether to use word-wrapping for continuation lines.\nWith prefix argument ARG, wrap continuation lines at word boundaries\nif ARG is positive, otherwise wrap them at the right screen edge.\nThis command toggles the value of `word-wrap'. It has no effect\nif long lines are truncated.\"\n (interactive \"P\")\n (setq word-wrap\n\t(if (null arg)\n\t (not word-wrap)\n\t (> (prefix-numeric-value arg) 0)))\n (force-mode-line-update)\n (message \"Word wrapping %s\"\n\t (if word-wrap \"enabled\" \"disabled\")))\n\n(defvar overwrite-mode-textual (purecopy \" Ovwrt\")\n \"The string displayed in the mode line when in overwrite mode.\")\n(defvar overwrite-mode-binary (purecopy \" Bin Ovwrt\")\n \"The string displayed in the mode line when in binary overwrite mode.\")\n\n(define-minor-mode overwrite-mode\n \"Toggle Overwrite mode.\nWith a prefix argument ARG, enable Overwrite mode if ARG is\npositive, and disable it otherwise. If called from Lisp, enable\nthe mode if ARG is omitted or nil.\n\nWhen Overwrite mode is enabled, printing characters typed in\nreplace existing text on a one-for-one basis, rather than pushing\nit to the right. At the end of a line, such characters extend\nthe line. Before a tab, such characters insert until the tab is\nfilled in. \\\\[quoted-insert] still inserts characters in\noverwrite mode; this is supposed to make it easier to insert\ncharacters when necessary.\"\n :variable (overwrite-mode\n . (lambda (v) (setq overwrite-mode (if v 'overwrite-mode-textual)))))\n\n(define-minor-mode binary-overwrite-mode\n \"Toggle Binary Overwrite mode.\nWith a prefix argument ARG, enable Binary Overwrite mode if ARG\nis positive, and disable it otherwise. If called from Lisp,\nenable the mode if ARG is omitted or nil.\n\nWhen Binary Overwrite mode is enabled, printing characters typed\nin replace existing text. Newlines are not treated specially, so\ntyping at the end of a line joins the line to the next, with the\ntyped character between them. Typing before a tab character\nsimply replaces the tab with the character typed.\n\\\\[quoted-insert] replaces the text at the cursor, just as\nordinary typing characters do.\n\nNote that Binary Overwrite mode is not its own minor mode; it is\na specialization of overwrite mode, entered by setting the\n`overwrite-mode' variable to `overwrite-mode-binary'.\"\n :variable (overwrite-mode\n . (lambda (v) (setq overwrite-mode (if v 'overwrite-mode-binary)))))\n\n(define-minor-mode line-number-mode\n \"Toggle line number display in the mode line (Line Number mode).\nWith a prefix argument ARG, enable Line Number mode if ARG is\npositive, and disable it otherwise. If called from Lisp, enable\nthe mode if ARG is omitted or nil.\n\nLine numbers do not appear for very large buffers and buffers\nwith very long lines; see variables `line-number-display-limit'\nand `line-number-display-limit-width'.\"\n :init-value t :global t :group 'mode-line)\n\n(define-minor-mode column-number-mode\n \"Toggle column number display in the mode line (Column Number mode).\nWith a prefix argument ARG, enable Column Number mode if ARG is\npositive, and disable it otherwise.\n\nIf called from Lisp, enable the mode if ARG is omitted or nil.\"\n :global t :group 'mode-line)\n\n(define-minor-mode size-indication-mode\n \"Toggle buffer size display in the mode line (Size Indication mode).\nWith a prefix argument ARG, enable Size Indication mode if ARG is\npositive, and disable it otherwise.\n\nIf called from Lisp, enable the mode if ARG is omitted or nil.\"\n :global t :group 'mode-line)\n\n(define-minor-mode auto-save-mode\n \"Toggle auto-saving in the current buffer (Auto Save mode).\nWith a prefix argument ARG, enable Auto Save mode if ARG is\npositive, and disable it otherwise.\n\nIf called from Lisp, enable the mode if ARG is omitted or nil.\"\n :variable ((and buffer-auto-save-file-name\n ;; If auto-save is off because buffer has shrunk,\n ;; then toggling should turn it on.\n (>= buffer-saved-size 0))\n . (lambda (val)\n (setq buffer-auto-save-file-name\n (cond\n ((null val) nil)\n ((and buffer-file-name auto-save-visited-file-name\n (not buffer-read-only))\n buffer-file-name)\n (t (make-auto-save-file-name))))))\n ;; If -1 was stored here, to temporarily turn off saving,\n ;; turn it back on.\n (and (< buffer-saved-size 0)\n (setq buffer-saved-size 0)))\n\f\n(defgroup paren-blinking nil\n \"Blinking matching of parens and expressions.\"\n :prefix \"blink-matching-\"\n :group 'paren-matching)\n\n(defcustom blink-matching-paren t\n \"Non-nil means show matching open-paren when close-paren is inserted.\nIf t, highlight the paren. If `jump', briefly move cursor to its\nposition. If `jump-offscreen', move cursor there even if the\nposition is off screen. With any other non-nil value, the\noff-screen position of the opening paren will be shown in the\necho area.\"\n :type '(choice\n (const :tag \"Disable\" nil)\n (const :tag \"Highlight\" t)\n (const :tag \"Move cursor\" jump)\n (const :tag \"Move cursor, even if off screen\" jump-offscreen))\n :group 'paren-blinking)\n\n(defcustom blink-matching-paren-on-screen t\n \"Non-nil means show matching open-paren when it is on screen.\nIf nil, don't show it (but the open-paren can still be shown\nin the echo area when it is off screen).\n\nThis variable has no effect if `blink-matching-paren' is nil.\n\\(In that case, the open-paren is never shown.)\nIt is also ignored if `show-paren-mode' is enabled.\"\n :type 'boolean\n :group 'paren-blinking)\n\n(defcustom blink-matching-paren-distance (* 100 1024)\n \"If non-nil, maximum distance to search backwards for matching open-paren.\nIf nil, search stops at the beginning of the accessible portion of the buffer.\"\n :version \"23.2\" ; 25->100k\n :type '(choice (const nil) integer)\n :group 'paren-blinking)\n\n(defcustom blink-matching-delay 1\n \"Time in seconds to delay after showing a matching paren.\"\n :type 'number\n :group 'paren-blinking)\n\n(defcustom blink-matching-paren-dont-ignore-comments nil\n \"If nil, `blink-matching-paren' ignores comments.\nMore precisely, when looking for the matching parenthesis,\nit skips the contents of comments that end before point.\"\n :type 'boolean\n :group 'paren-blinking)\n\n(defun blink-matching-check-mismatch (start end)\n \"Return whether or not START...END are matching parens.\nEND is the current point and START is the blink position.\nSTART might be nil if no matching starter was found.\nReturns non-nil if we find there is a mismatch.\"\n (let* ((end-syntax (syntax-after (1- end)))\n (matching-paren (and (consp end-syntax)\n (eq (syntax-class end-syntax) 5)\n (cdr end-syntax))))\n ;; For self-matched chars like \" and $, we can't know when they're\n ;; mismatched or unmatched, so we can only do it for parens.\n (when matching-paren\n (not (and start\n (or\n (eq (char-after start) matching-paren)\n ;; The cdr might hold a new paren-class info rather than\n ;; a matching-char info, in which case the two CDRs\n ;; should match.\n (eq matching-paren (cdr-safe (syntax-after start)))))))))\n\n(defvar blink-matching-check-function #'blink-matching-check-mismatch\n \"Function to check parentheses mismatches.\nThe function takes two arguments (START and END) where START is the\nposition just before the opening token and END is the position right after.\nSTART can be nil, if it was not found.\nThe function should return non-nil if the two tokens do not match.\")\n\n(defvar blink-matching--overlay\n (let ((ol (make-overlay (point) (point) nil t)))\n (overlay-put ol 'face 'show-paren-match)\n (delete-overlay ol)\n ol)\n \"Overlay used to highlight the matching paren.\")\n\n(defun blink-matching-open ()\n \"Momentarily highlight the beginning of the sexp before point.\"\n (interactive)\n (when (and (not (bobp))\n\t blink-matching-paren)\n (let* ((oldpos (point))\n\t (message-log-max nil) ; Don't log messages about paren matching.\n\t (blinkpos\n (save-excursion\n (save-restriction\n (if blink-matching-paren-distance\n (narrow-to-region\n (max (minibuffer-prompt-end) ;(point-min) unless minibuf.\n (- (point) blink-matching-paren-distance))\n oldpos))\n (let ((parse-sexp-ignore-comments\n (and parse-sexp-ignore-comments\n (not blink-matching-paren-dont-ignore-comments))))\n (condition-case ()\n (progn\n\t\t\t(syntax-propertize (point))\n (forward-sexp -1)\n ;; backward-sexp skips backward over prefix chars,\n ;; so move back to the matching paren.\n (while (and (< (point) (1- oldpos))\n (let ((code (syntax-after (point))))\n (or (eq (syntax-class code) 6)\n (eq (logand 1048576 (car code))\n 1048576))))\n (forward-char 1))\n (point))\n (error nil))))))\n (mismatch (funcall blink-matching-check-function blinkpos oldpos)))\n (cond\n (mismatch\n (if blinkpos\n (if (minibufferp)\n (minibuffer-message \"Mismatched parentheses\")\n (message \"Mismatched parentheses\"))\n (if (minibufferp)\n (minibuffer-message \"No matching parenthesis found\")\n (message \"No matching parenthesis found\"))))\n ((not blinkpos) nil)\n ((or\n (eq blink-matching-paren 'jump-offscreen)\n (pos-visible-in-window-p blinkpos))\n ;; Matching open within window, temporarily move to or highlight\n ;; char after blinkpos but only if `blink-matching-paren-on-screen'\n ;; is non-nil.\n (and blink-matching-paren-on-screen\n (not show-paren-mode)\n (if (memq blink-matching-paren '(jump jump-offscreen))\n (save-excursion\n (goto-char blinkpos)\n (sit-for blink-matching-delay))\n (unwind-protect\n (progn\n (move-overlay blink-matching--overlay blinkpos (1+ blinkpos)\n (current-buffer))\n (sit-for blink-matching-delay))\n (delete-overlay blink-matching--overlay)))))\n (t\n (let ((open-paren-line-string\n (save-excursion\n (goto-char blinkpos)\n ;; Show what precedes the open in its line, if anything.\n (cond\n ((save-excursion (skip-chars-backward \" \\t\") (not (bolp)))\n (buffer-substring (line-beginning-position)\n (1+ blinkpos)))\n ;; Show what follows the open in its line, if anything.\n ((save-excursion\n (forward-char 1)\n (skip-chars-forward \" \\t\")\n (not (eolp)))\n (buffer-substring blinkpos\n (line-end-position)))\n ;; Otherwise show the previous nonblank line,\n ;; if there is one.\n ((save-excursion (skip-chars-backward \"\\n \\t\") (not (bobp)))\n (concat\n (buffer-substring (progn\n (skip-chars-backward \"\\n \\t\")\n (line-beginning-position))\n (progn (end-of-line)\n (skip-chars-backward \" \\t\")\n (point)))\n ;; Replace the newline and other whitespace with `...'.\n \"...\"\n (buffer-substring blinkpos (1+ blinkpos))))\n ;; There is nothing to show except the char itself.\n (t (buffer-substring blinkpos (1+ blinkpos)))))))\n (minibuffer-message\n \"Matches %s\"\n (substring-no-properties open-paren-line-string))))))))\n\n(defvar blink-paren-function 'blink-matching-open\n \"Function called, if non-nil, whenever a close parenthesis is inserted.\nMore precisely, a char with closeparen syntax is self-inserted.\")\n\n(defun blink-paren-post-self-insert-function ()\n (when (and (eq (char-before) last-command-event) ; Sanity check.\n (memq (char-syntax last-command-event) '(?\\) ?\\$))\n blink-paren-function\n (not executing-kbd-macro)\n (not noninteractive)\n\t ;; Verify an even number of quoting characters precede the close.\n ;; FIXME: Also check if this parenthesis closes a comment as\n ;; can happen in Pascal and SML.\n\t (= 1 (logand 1 (- (point)\n\t\t\t (save-excursion\n\t\t\t\t (forward-char -1)\n\t\t\t\t (skip-syntax-backward \"/\\\\\")\n\t\t\t\t (point))))))\n (funcall blink-paren-function)))\n\n(put 'blink-paren-post-self-insert-function 'priority 100)\n\n(add-hook 'post-self-insert-hook #'blink-paren-post-self-insert-function\n ;; Most likely, this hook is nil, so this arg doesn't matter,\n ;; but I use it as a reminder that this function usually\n ;; likes to be run after others since it does\n ;; `sit-for'. That's also the reason it get a `priority' prop\n ;; of 100.\n 'append)\n\f\n;; This executes C-g typed while Emacs is waiting for a command.\n;; Quitting out of a program does not go through here;\n;; that happens in the maybe_quit function at the C code level.\n(defun keyboard-quit ()\n \"Signal a `quit' condition.\nDuring execution of Lisp code, this character causes a quit directly.\nAt top-level, as an editor command, this simply beeps.\"\n (interactive)\n ;; Avoid adding the region to the window selection.\n (setq saved-region-selection nil)\n (let (select-active-regions)\n (deactivate-mark))\n (if (fboundp 'kmacro-keyboard-quit)\n (kmacro-keyboard-quit))\n (when completion-in-region-mode\n (completion-in-region-mode -1))\n ;; Force the next redisplay cycle to remove the \"Def\" indicator from\n ;; all the mode lines.\n (if defining-kbd-macro\n (force-mode-line-update t))\n (setq defining-kbd-macro nil)\n (let ((debug-on-quit nil))\n (signal 'quit nil)))\n\n(defvar buffer-quit-function nil\n \"Function to call to \\\"quit\\\" the current buffer, or nil if none.\n\\\\[keyboard-escape-quit] calls this function when its more local actions\n\\(such as canceling a prefix argument, minibuffer or region) do not apply.\")\n\n(defun keyboard-escape-quit ()\n \"Exit the current \\\"mode\\\" (in a generalized sense of the word).\nThis command can exit an interactive command such as `query-replace',\ncan clear out a prefix argument or a region,\ncan get out of the minibuffer or other recursive edit,\ncancel the use of the current buffer (for special-purpose buffers),\nor go back to just one window (by deleting all but the selected window).\"\n (interactive)\n (cond ((eq last-command 'mode-exited) nil)\n\t((region-active-p)\n\t (deactivate-mark))\n\t((> (minibuffer-depth) 0)\n\t (abort-recursive-edit))\n\t(current-prefix-arg\n\t nil)\n\t((> (recursion-depth) 0)\n\t (exit-recursive-edit))\n\t(buffer-quit-function\n\t (funcall buffer-quit-function))\n\t((not (one-window-p t))\n\t (delete-other-windows))\n\t((string-match \"^ \\\\*\" (buffer-name (current-buffer)))\n\t (bury-buffer))))\n\n(defun play-sound-file (file &optional volume device)\n \"Play sound stored in FILE.\nVOLUME and DEVICE correspond to the keywords of the sound\nspecification for `play-sound'.\"\n (interactive \"fPlay sound file: \")\n (let ((sound (list :file file)))\n (if volume\n\t(plist-put sound :volume volume))\n (if device\n\t(plist-put sound :device device))\n (push 'sound sound)\n (play-sound sound)))\n\n\f\n(defcustom read-mail-command 'rmail\n \"Your preference for a mail reading package.\nThis is used by some keybindings which support reading mail.\nSee also `mail-user-agent' concerning sending mail.\"\n :type '(radio (function-item :tag \"Rmail\" :format \"%t\\n\" rmail)\n (function-item :tag \"Gnus\" :format \"%t\\n\" gnus)\n (function-item :tag \"Emacs interface to MH\"\n :format \"%t\\n\" mh-rmail)\n (function :tag \"Other\"))\n :version \"21.1\"\n :group 'mail)\n\n(defcustom mail-user-agent 'message-user-agent\n \"Your preference for a mail composition package.\nVarious Emacs Lisp packages (e.g. Reporter) require you to compose an\noutgoing email message. This variable lets you specify which\nmail-sending package you prefer.\n\nValid values include:\n\n `message-user-agent' -- use the Message package.\n See Info node `(message)'.\n `sendmail-user-agent' -- use the Mail package.\n See Info node `(emacs)Sending Mail'.\n `mh-e-user-agent' -- use the Emacs interface to the MH mail system.\n See Info node `(mh-e)'.\n `gnus-user-agent' -- like `message-user-agent', but with Gnus\n paraphernalia if Gnus is running, particularly\n the Gcc: header for archiving.\n\nAdditional valid symbols may be available; check with the author of\nyour package for details. The function should return non-nil if it\nsucceeds.\n\nSee also `read-mail-command' concerning reading mail.\"\n :type '(radio (function-item :tag \"Message package\"\n\t\t\t :format \"%t\\n\"\n\t\t\t message-user-agent)\n\t\t(function-item :tag \"Mail package\"\n\t\t\t :format \"%t\\n\"\n\t\t\t sendmail-user-agent)\n\t\t(function-item :tag \"Emacs interface to MH\"\n\t\t\t :format \"%t\\n\"\n\t\t\t mh-e-user-agent)\n\t\t(function-item :tag \"Message with full Gnus features\"\n\t\t\t :format \"%t\\n\"\n\t\t\t gnus-user-agent)\n\t\t(function :tag \"Other\"))\n :version \"23.2\" ; sendmail->message\n :group 'mail)\n\n(defcustom compose-mail-user-agent-warnings t\n \"If non-nil, `compose-mail' warns about changes in `mail-user-agent'.\nIf the value of `mail-user-agent' is the default, and the user\nappears to have customizations applying to the old default,\n`compose-mail' issues a warning.\"\n :type 'boolean\n :version \"23.2\"\n :group 'mail)\n\n(defun rfc822-goto-eoh ()\n \"If the buffer starts with a mail header, move point to the header's end.\nOtherwise, moves to `point-min'.\nThe end of the header is the start of the next line, if there is one,\nelse the end of the last line. This function obeys RFC822.\"\n (goto-char (point-min))\n (when (re-search-forward\n\t \"^\\\\([:\\n]\\\\|[^: \\t\\n]+[ \\t\\n]\\\\)\" nil 'move)\n (goto-char (match-beginning 0))))\n\n;; Used by Rmail (e.g., rmail-forward).\n(defvar mail-encode-mml nil\n \"If non-nil, mail-user-agent's `sendfunc' command should mml-encode\nthe outgoing message before sending it.\")\n\n(defun compose-mail (&optional to subject other-headers continue\n\t\t switch-function yank-action send-actions\n\t\t return-action)\n \"Start composing a mail message to send.\nThis uses the user's chosen mail composition package\nas selected with the variable `mail-user-agent'.\nThe optional arguments TO and SUBJECT specify recipients\nand the initial Subject field, respectively.\n\nOTHER-HEADERS is an alist specifying additional\nheader fields. Elements look like (HEADER . VALUE) where both\nHEADER and VALUE are strings.\n\nCONTINUE, if non-nil, says to continue editing a message already\nbeing composed. Interactively, CONTINUE is the prefix argument.\n\nSWITCH-FUNCTION, if non-nil, is a function to use to\nswitch to and display the buffer used for mail composition.\n\nYANK-ACTION, if non-nil, is an action to perform, if and when necessary,\nto insert the raw text of the message being replied to.\nIt has the form (FUNCTION . ARGS). The user agent will apply\nFUNCTION to ARGS, to insert the raw text of the original message.\n\\(The user agent will also run `mail-citation-hook', *after* the\noriginal text has been inserted in this way.)\n\nSEND-ACTIONS is a list of actions to call when the message is sent.\nEach action has the form (FUNCTION . ARGS).\n\nRETURN-ACTION, if non-nil, is an action for returning to the\ncaller. It has the form (FUNCTION . ARGS). The function is\ncalled after the mail has been sent or put aside, and the mail\nbuffer buried.\"\n (interactive\n (list nil nil nil current-prefix-arg))\n\n ;; In Emacs 23.2, the default value of `mail-user-agent' changed\n ;; from sendmail-user-agent to message-user-agent. Some users may\n ;; encounter incompatibilities. This hack tries to detect problems\n ;; and warn about them.\n (and compose-mail-user-agent-warnings\n (eq mail-user-agent 'message-user-agent)\n (let (warn-vars)\n\t (dolist (var '(mail-mode-hook mail-send-hook mail-setup-hook\n\t\t\tmail-yank-hooks mail-archive-file-name\n\t\t\tmail-default-reply-to mail-mailing-lists\n\t\t\tmail-self-blind))\n\t (and (boundp var)\n\t\t(symbol-value var)\n\t\t(push var warn-vars)))\n\t (when warn-vars\n\t (display-warning 'mail\n\t\t\t (format-message \"\\\nThe default mail mode is now Message mode.\nYou have the following Mail mode variable%s customized:\n\\n %s\\n\\nTo use Mail mode, set `mail-user-agent' to sendmail-user-agent.\nTo disable this warning, set `compose-mail-user-agent-warnings' to nil.\"\n\t\t\t\t (if (> (length warn-vars) 1) \"s\" \"\")\n\t\t\t\t (mapconcat 'symbol-name\n\t\t\t\t\t warn-vars \" \"))))))\n\n (let ((function (get mail-user-agent 'composefunc)))\n (funcall function to subject other-headers continue switch-function\n\t yank-action send-actions return-action)))\n\n(defun compose-mail-other-window (&optional to subject other-headers continue\n\t\t\t\t\t yank-action send-actions\n\t\t\t\t\t return-action)\n \"Like \\\\[compose-mail], but edit the outgoing message in another window.\"\n (interactive (list nil nil nil current-prefix-arg))\n (compose-mail to subject other-headers continue\n\t\t'switch-to-buffer-other-window yank-action send-actions\n\t\treturn-action))\n\n(defun compose-mail-other-frame (&optional to subject other-headers continue\n\t\t\t\t\t yank-action send-actions\n\t\t\t\t\t return-action)\n \"Like \\\\[compose-mail], but edit the outgoing message in another frame.\"\n (interactive (list nil nil nil current-prefix-arg))\n (compose-mail to subject other-headers continue\n\t\t'switch-to-buffer-other-frame yank-action send-actions\n\t\treturn-action))\n\n\f\n(defvar set-variable-value-history nil\n \"History of values entered with `set-variable'.\n\nMaximum length of the history list is determined by the value\nof `history-length', which see.\")\n\n(defun set-variable (variable value &optional make-local)\n \"Set VARIABLE to VALUE. VALUE is a Lisp object.\nVARIABLE should be a user option variable name, a Lisp variable\nmeant to be customized by users. You should enter VALUE in Lisp syntax,\nso if you want VALUE to be a string, you must surround it with doublequotes.\nVALUE is used literally, not evaluated.\n\nIf VARIABLE has a `variable-interactive' property, that is used as if\nit were the arg to `interactive' (which see) to interactively read VALUE.\n\nIf VARIABLE has been defined with `defcustom', then the type information\nin the definition is used to check that VALUE is valid.\n\nNote that this function is at heart equivalent to the basic `set' function.\nFor a variable defined with `defcustom', it does not pay attention to\nany :set property that the variable might have (if you want that, use\n\\\\[customize-set-variable] instead).\n\nWith a prefix argument, set VARIABLE to VALUE buffer-locally.\"\n (interactive\n (let* ((default-var (variable-at-point))\n (var (if (custom-variable-p default-var)\n\t\t (read-variable (format \"Set variable (default %s): \" default-var)\n\t\t\t\t default-var)\n\t\t (read-variable \"Set variable: \")))\n\t (minibuffer-help-form '(describe-variable var))\n\t (prop (get var 'variable-interactive))\n (obsolete (car (get var 'byte-obsolete-variable)))\n\t (prompt (format \"Set %s %s to value: \" var\n\t\t\t (cond ((local-variable-p var)\n\t\t\t\t \"(buffer-local)\")\n\t\t\t\t((or current-prefix-arg\n\t\t\t\t (local-variable-if-set-p var))\n\t\t\t\t \"buffer-locally\")\n\t\t\t\t(t \"globally\"))))\n\t (val (progn\n (when obsolete\n (message (concat \"`%S' is obsolete; \"\n (if (symbolp obsolete) \"use `%S' instead\" \"%s\"))\n var obsolete)\n (sit-for 3))\n (if prop\n ;; Use VAR's `variable-interactive' property\n ;; as an interactive spec for prompting.\n (call-interactively `(lambda (arg)\n (interactive ,prop)\n arg))\n (read-from-minibuffer prompt nil\n read-expression-map t\n 'set-variable-value-history\n (format \"%S\" (symbol-value var)))))))\n (list var val current-prefix-arg)))\n\n (and (custom-variable-p variable)\n (not (get variable 'custom-type))\n (custom-load-symbol variable))\n (let ((type (get variable 'custom-type)))\n (when type\n ;; Match with custom type.\n (require 'cus-edit)\n (setq type (widget-convert type))\n (unless (widget-apply type :match value)\n\t(user-error \"Value `%S' does not match type %S of %S\"\n\t\t value (car type) variable))))\n\n (if make-local\n (make-local-variable variable))\n\n (set variable value)\n\n ;; Force a thorough redisplay for the case that the variable\n ;; has an effect on the display, like `tab-width' has.\n (force-mode-line-update))\n\f\n;; Define the major mode for lists of completions.\n\n(defvar completion-list-mode-map\n (let ((map (make-sparse-keymap)))\n (define-key map [mouse-2] 'choose-completion)\n (define-key map [follow-link] 'mouse-face)\n (define-key map [down-mouse-2] nil)\n (define-key map \"\\C-m\" 'choose-completion)\n (define-key map \"\\e\\e\\e\" 'delete-completion-window)\n (define-key map [left] 'previous-completion)\n (define-key map [right] 'next-completion)\n (define-key map [?\\t] 'next-completion)\n (define-key map [backtab] 'previous-completion)\n (define-key map \"q\" 'quit-window)\n (define-key map \"z\" 'kill-current-buffer)\n map)\n \"Local map for completion list buffers.\")\n\n;; Completion mode is suitable only for specially formatted data.\n(put 'completion-list-mode 'mode-class 'special)\n\n(defvar completion-reference-buffer nil\n \"Record the buffer that was current when the completion list was requested.\nThis is a local variable in the completion list buffer.\nInitial value is nil to avoid some compiler warnings.\")\n\n(defvar completion-no-auto-exit nil\n \"Non-nil means `choose-completion-string' should never exit the minibuffer.\nThis also applies to other functions such as `choose-completion'.\")\n\n(defvar completion-base-position nil\n \"Position of the base of the text corresponding to the shown completions.\nThis variable is used in the *Completions* buffers.\nIts value is a list of the form (START END) where START is the place\nwhere the completion should be inserted and END (if non-nil) is the end\nof the text to replace. If END is nil, point is used instead.\")\n\n(defvar completion-list-insert-choice-function #'completion--replace\n \"Function to use to insert the text chosen in *Completions*.\nCalled with three arguments (BEG END TEXT), it should replace the text\nbetween BEG and END with TEXT. Expected to be set buffer-locally\nin the *Completions* buffer.\")\n\n(defvar completion-base-size nil\n \"Number of chars before point not involved in completion.\nThis is a local variable in the completion list buffer.\nIt refers to the chars in the minibuffer if completing in the\nminibuffer, or in `completion-reference-buffer' otherwise.\nOnly characters in the field at point are included.\n\nIf nil, Emacs determines which part of the tail end of the\nbuffer's text is involved in completion by comparing the text\ndirectly.\")\n(make-obsolete-variable 'completion-base-size 'completion-base-position \"23.2\")\n\n(defun delete-completion-window ()\n \"Delete the completion list window.\nGo to the window from which completion was requested.\"\n (interactive)\n (let ((buf completion-reference-buffer))\n (if (one-window-p t)\n\t(if (window-dedicated-p) (delete-frame))\n (delete-window (selected-window))\n (if (get-buffer-window buf)\n\t (select-window (get-buffer-window buf))))))\n\n(defun previous-completion (n)\n \"Move to the previous item in the completion list.\"\n (interactive \"p\")\n (next-completion (- n)))\n\n(defun next-completion (n)\n \"Move to the next item in the completion list.\nWith prefix argument N, move N items (negative N means move backward).\"\n (interactive \"p\")\n (let ((beg (point-min)) (end (point-max)))\n (while (and (> n 0) (not (eobp)))\n ;; If in a completion, move to the end of it.\n (when (get-text-property (point) 'mouse-face)\n\t(goto-char (next-single-property-change (point) 'mouse-face nil end)))\n ;; Move to start of next one.\n (unless (get-text-property (point) 'mouse-face)\n\t(goto-char (next-single-property-change (point) 'mouse-face nil end)))\n (setq n (1- n)))\n (while (and (< n 0) (not (bobp)))\n (let ((prop (get-text-property (1- (point)) 'mouse-face)))\n\t;; If in a completion, move to the start of it.\n\t(when (and prop (eq prop (get-text-property (point) 'mouse-face)))\n\t (goto-char (previous-single-property-change\n\t\t (point) 'mouse-face nil beg)))\n\t;; Move to end of the previous completion.\n\t(unless (or (bobp) (get-text-property (1- (point)) 'mouse-face))\n\t (goto-char (previous-single-property-change\n\t\t (point) 'mouse-face nil beg)))\n\t;; Move to the start of that one.\n\t(goto-char (previous-single-property-change\n\t\t (point) 'mouse-face nil beg))\n\t(setq n (1+ n))))))\n\n(defun choose-completion (&optional event)\n \"Choose the completion at point.\nIf EVENT, use EVENT's position to determine the starting position.\"\n (interactive (list last-nonmenu-event))\n ;; In case this is run via the mouse, give temporary modes such as\n ;; isearch a chance to turn off.\n (run-hooks 'mouse-leave-buffer-hook)\n (with-current-buffer (window-buffer (posn-window (event-start event)))\n (let ((buffer completion-reference-buffer)\n (base-size completion-base-size)\n (base-position completion-base-position)\n (insert-function completion-list-insert-choice-function)\n (choice\n (save-excursion\n (goto-char (posn-point (event-start event)))\n (let (beg end)\n (cond\n ((and (not (eobp)) (get-text-property (point) 'mouse-face))\n (setq end (point) beg (1+ (point))))\n ((and (not (bobp))\n (get-text-property (1- (point)) 'mouse-face))\n (setq end (1- (point)) beg (point)))\n (t (error \"No completion here\")))\n (setq beg (previous-single-property-change beg 'mouse-face))\n (setq end (or (next-single-property-change end 'mouse-face)\n (point-max)))\n (buffer-substring-no-properties beg end)))))\n\n (unless (buffer-live-p buffer)\n (error \"Destination buffer is dead\"))\n (quit-window nil (posn-window (event-start event)))\n\n (with-current-buffer buffer\n (choose-completion-string\n choice buffer\n (or base-position\n (when base-size\n ;; Someone's using old completion code that doesn't know\n ;; about base-position yet.\n (list (+ base-size (field-beginning))))\n ;; If all else fails, just guess.\n (list (choose-completion-guess-base-position choice)))\n insert-function)))))\n\n;; Delete the longest partial match for STRING\n;; that can be found before POINT.\n(defun choose-completion-guess-base-position (string)\n (save-excursion\n (let ((opoint (point))\n len)\n ;; Try moving back by the length of the string.\n (goto-char (max (- (point) (length string))\n (minibuffer-prompt-end)))\n ;; See how far back we were actually able to move. That is the\n ;; upper bound on how much we can match and delete.\n (setq len (- opoint (point)))\n (if completion-ignore-case\n (setq string (downcase string)))\n (while (and (> len 0)\n (let ((tail (buffer-substring (point) opoint)))\n (if completion-ignore-case\n (setq tail (downcase tail)))\n (not (string= tail (substring string 0 len)))))\n (setq len (1- len))\n (forward-char 1))\n (point))))\n\n(defun choose-completion-delete-max-match (string)\n (declare (obsolete choose-completion-guess-base-position \"23.2\"))\n (delete-region (choose-completion-guess-base-position string) (point)))\n\n(defvar choose-completion-string-functions nil\n \"Functions that may override the normal insertion of a completion choice.\nThese functions are called in order with three arguments:\nCHOICE - the string to insert in the buffer,\nBUFFER - the buffer in which the choice should be inserted,\nBASE-POSITION - where to insert the completion.\n\nIf a function in the list returns non-nil, that function is supposed\nto have inserted the CHOICE in the BUFFER, and possibly exited\nthe minibuffer; no further functions will be called.\n\nIf all functions in the list return nil, that means to use\nthe default method of inserting the completion in BUFFER.\")\n\n(defun choose-completion-string (choice &optional\n buffer base-position insert-function)\n \"Switch to BUFFER and insert the completion choice CHOICE.\nBASE-POSITION says where to insert the completion.\nINSERT-FUNCTION says how to insert the completion and falls\nback on `completion-list-insert-choice-function' when nil.\"\n\n ;; If BUFFER is the minibuffer, exit the minibuffer\n ;; unless it is reading a file name and CHOICE is a directory,\n ;; or completion-no-auto-exit is non-nil.\n\n ;; Some older code may call us passing `base-size' instead of\n ;; `base-position'. It's difficult to make any use of `base-size',\n ;; so we just ignore it.\n (unless (consp base-position)\n (message \"Obsolete `base-size' passed to choose-completion-string\")\n (setq base-position nil))\n\n (let* ((buffer (or buffer completion-reference-buffer))\n\t (mini-p (minibufferp buffer)))\n ;; If BUFFER is a minibuffer, barf unless it's the currently\n ;; active minibuffer.\n (if (and mini-p\n (not (and (active-minibuffer-window)\n (equal buffer\n\t\t\t (window-buffer (active-minibuffer-window))))))\n\t(error \"Minibuffer is not active for completion\")\n ;; Set buffer so buffer-local choose-completion-string-functions works.\n (set-buffer buffer)\n (unless (run-hook-with-args-until-success\n\t 'choose-completion-string-functions\n ;; The fourth arg used to be `mini-p' but was useless\n ;; (since minibufferp can be used on the `buffer' arg)\n ;; and indeed unused. The last used to be `base-size', so we\n ;; keep it to try and avoid breaking old code.\n\t choice buffer base-position nil)\n ;; This remove-text-properties should be unnecessary since `choice'\n ;; comes from buffer-substring-no-properties.\n ;;(remove-text-properties 0 (length choice) '(mouse-face nil) choice)\n\t;; Insert the completion into the buffer where it was requested.\n (funcall (or insert-function completion-list-insert-choice-function)\n (or (car base-position) (point))\n (or (cadr base-position) (point))\n choice)\n ;; Update point in the window that BUFFER is showing in.\n\t(let ((window (get-buffer-window buffer t)))\n\t (set-window-point window (point)))\n\t;; If completing for the minibuffer, exit it with this choice.\n\t(and (not completion-no-auto-exit)\n (minibufferp buffer)\n\t minibuffer-completion-table\n\t ;; If this is reading a file name, and the file name chosen\n\t ;; is a directory, don't exit the minibuffer.\n (let* ((result (buffer-substring (field-beginning) (point)))\n (bounds\n (completion-boundaries result minibuffer-completion-table\n minibuffer-completion-predicate\n \"\")))\n (if (eq (car bounds) (length result))\n ;; The completion chosen leads to a new set of completions\n ;; (e.g. it's a directory): don't exit the minibuffer yet.\n (let ((mini (active-minibuffer-window)))\n (select-window mini)\n (when minibuffer-auto-raise\n (raise-frame (window-frame mini))))\n (exit-minibuffer))))))))\n\n(define-derived-mode completion-list-mode nil \"Completion List\"\n \"Major mode for buffers showing lists of possible completions.\nType \\\\\\\\[choose-completion] in the completion list\\\n to select the completion near point.\nOr click to select one with the mouse.\n\n\\\\{completion-list-mode-map}\"\n (set (make-local-variable 'completion-base-size) nil))\n\n(defun completion-list-mode-finish ()\n \"Finish setup of the completions buffer.\nCalled from `temp-buffer-show-hook'.\"\n (when (eq major-mode 'completion-list-mode)\n (setq buffer-read-only t)))\n\n(add-hook 'temp-buffer-show-hook 'completion-list-mode-finish)\n\n\n;; Variables and faces used in `completion-setup-function'.\n\n(defcustom completion-show-help t\n \"Non-nil means show help message in *Completions* buffer.\"\n :type 'boolean\n :version \"22.1\"\n :group 'completion)\n\n;; This function goes in completion-setup-hook, so that it is called\n;; after the text of the completion list buffer is written.\n(defun completion-setup-function ()\n (let* ((mainbuf (current-buffer))\n (base-dir\n ;; FIXME: This is a bad hack. We try to set the default-directory\n ;; in the *Completions* buffer so that the relative file names\n ;; displayed there can be treated as valid file names, independently\n ;; from the completion context. But this suffers from many problems:\n ;; - It's not clear when the completions are file names. With some\n ;; completion tables (e.g. bzr revision specs), the listed\n ;; completions can mix file names and other things.\n ;; - It doesn't pay attention to possible quoting.\n ;; - With fancy completion styles, the code below will not always\n ;; find the right base directory.\n (if minibuffer-completing-file-name\n (file-name-as-directory\n (expand-file-name\n (buffer-substring (minibuffer-prompt-end)\n (- (point) (or completion-base-size 0))))))))\n (with-current-buffer standard-output\n (let ((base-size completion-base-size) ;Read before killing localvars.\n (base-position completion-base-position)\n (insert-fun completion-list-insert-choice-function))\n (completion-list-mode)\n (set (make-local-variable 'completion-base-size) base-size)\n (set (make-local-variable 'completion-base-position) base-position)\n (set (make-local-variable 'completion-list-insert-choice-function)\n\t insert-fun))\n (set (make-local-variable 'completion-reference-buffer) mainbuf)\n (if base-dir (setq default-directory base-dir))\n ;; Maybe insert help string.\n (when completion-show-help\n\t(goto-char (point-min))\n\t(if (display-mouse-p)\n\t (insert \"Click on a completion to select it.\\n\"))\n\t(insert (substitute-command-keys\n\t\t \"In this buffer, type \\\\[choose-completion] to \\\nselect the completion near point.\\n\\n\"))))))\n\n(add-hook 'completion-setup-hook 'completion-setup-function)\n\n(define-key minibuffer-local-completion-map [prior] 'switch-to-completions)\n(define-key minibuffer-local-completion-map \"\\M-v\" 'switch-to-completions)\n\n(defun switch-to-completions ()\n \"Select the completion list window.\"\n (interactive)\n (let ((window (or (get-buffer-window \"*Completions*\" 0)\n\t\t ;; Make sure we have a completions window.\n (progn (minibuffer-completion-help)\n (get-buffer-window \"*Completions*\" 0)))))\n (when window\n (select-window window)\n ;; In the new buffer, go to the first completion.\n ;; FIXME: Perhaps this should be done in `minibuffer-completion-help'.\n (when (bobp)\n\t(next-completion 1)))))\n\f\n;;; Support keyboard commands to turn on various modifiers.\n\n;; These functions -- which are not commands -- each add one modifier\n;; to the following event.\n\n(defun event-apply-alt-modifier (_ignore-prompt)\n \"\\\\Add the Alt modifier to the following event.\nFor example, type \\\\[event-apply-alt-modifier] & to enter Alt-&.\"\n (vector (event-apply-modifier (read-event) 'alt 22 \"A-\")))\n(defun event-apply-super-modifier (_ignore-prompt)\n \"\\\\Add the Super modifier to the following event.\nFor example, type \\\\[event-apply-super-modifier] & to enter Super-&.\"\n (vector (event-apply-modifier (read-event) 'super 23 \"s-\")))\n(defun event-apply-hyper-modifier (_ignore-prompt)\n \"\\\\Add the Hyper modifier to the following event.\nFor example, type \\\\[event-apply-hyper-modifier] & to enter Hyper-&.\"\n (vector (event-apply-modifier (read-event) 'hyper 24 \"H-\")))\n(defun event-apply-shift-modifier (_ignore-prompt)\n \"\\\\Add the Shift modifier to the following event.\nFor example, type \\\\[event-apply-shift-modifier] & to enter Shift-&.\"\n (vector (event-apply-modifier (read-event) 'shift 25 \"S-\")))\n(defun event-apply-control-modifier (_ignore-prompt)\n \"\\\\Add the Ctrl modifier to the following event.\nFor example, type \\\\[event-apply-control-modifier] & to enter Ctrl-&.\"\n (vector (event-apply-modifier (read-event) 'control 26 \"C-\")))\n(defun event-apply-meta-modifier (_ignore-prompt)\n \"\\\\Add the Meta modifier to the following event.\nFor example, type \\\\[event-apply-meta-modifier] & to enter Meta-&.\"\n (vector (event-apply-modifier (read-event) 'meta 27 \"M-\")))\n\n(defun event-apply-modifier (event symbol lshiftby prefix)\n \"Apply a modifier flag to event EVENT.\nSYMBOL is the name of this modifier, as a symbol.\nLSHIFTBY is the numeric value of this modifier, in keyboard events.\nPREFIX is the string that represents this modifier in an event type symbol.\"\n (if (numberp event)\n (cond ((eq symbol 'control)\n\t (if (and (<= (downcase event) ?z)\n\t\t (>= (downcase event) ?a))\n\t\t (- (downcase event) ?a -1)\n\t (if (and (<= (downcase event) ?Z)\n\t\t\t(>= (downcase event) ?A))\n\t\t (- (downcase event) ?A -1)\n\t\t (logior (lsh 1 lshiftby) event))))\n\t ((eq symbol 'shift)\n\t (if (and (<= (downcase event) ?z)\n\t\t (>= (downcase event) ?a))\n\t\t (upcase event)\n\t (logior (lsh 1 lshiftby) event)))\n\t (t\n\t (logior (lsh 1 lshiftby) event)))\n (if (memq symbol (event-modifiers event))\n\tevent\n (let ((event-type (if (symbolp event) event (car event))))\n\t(setq event-type (intern (concat prefix (symbol-name event-type))))\n\t(if (symbolp event)\n\t event-type\n\t (cons event-type (cdr event)))))))\n\n(define-key function-key-map [?\\C-x ?@ ?h] 'event-apply-hyper-modifier)\n(define-key function-key-map [?\\C-x ?@ ?s] 'event-apply-super-modifier)\n(define-key function-key-map [?\\C-x ?@ ?m] 'event-apply-meta-modifier)\n(define-key function-key-map [?\\C-x ?@ ?a] 'event-apply-alt-modifier)\n(define-key function-key-map [?\\C-x ?@ ?S] 'event-apply-shift-modifier)\n(define-key function-key-map [?\\C-x ?@ ?c] 'event-apply-control-modifier)\n\f\n;;;; Keypad support.\n\n;; Make the keypad keys act like ordinary typing keys. If people add\n;; bindings for the function key symbols, then those bindings will\n;; override these, so this shouldn't interfere with any existing\n;; bindings.\n\n;; Also tell read-char how to handle these keys.\n(mapc\n (lambda (keypad-normal)\n (let ((keypad (nth 0 keypad-normal))\n\t (normal (nth 1 keypad-normal)))\n (put keypad 'ascii-character normal)\n (define-key function-key-map (vector keypad) (vector normal))))\n ;; See also kp-keys bound in bindings.el.\n '((kp-space ?\\s)\n (kp-tab ?\\t)\n (kp-enter ?\\r)\n (kp-separator ?,)\n (kp-equal ?=)\n ;; Do the same for various keys that are represented as symbols under\n ;; GUIs but naturally correspond to characters.\n (backspace 127)\n (delete 127)\n (tab ?\\t)\n (linefeed ?\\n)\n (clear ?\\C-l)\n (return ?\\C-m)\n (escape ?\\e)\n ))\n\f\n;;;;\n;;;; forking a twin copy of a buffer.\n;;;;\n\n(defvar clone-buffer-hook nil\n \"Normal hook to run in the new buffer at the end of `clone-buffer'.\")\n\n(defvar clone-indirect-buffer-hook nil\n \"Normal hook to run in the new buffer at the end of `clone-indirect-buffer'.\")\n\n(defun clone-process (process &optional newname)\n \"Create a twin copy of PROCESS.\nIf NEWNAME is nil, it defaults to PROCESS' name;\nNEWNAME is modified by adding or incrementing at the end as necessary.\nIf PROCESS is associated with a buffer, the new process will be associated\n with the current buffer instead.\nReturns nil if PROCESS has already terminated.\"\n (setq newname (or newname (process-name process)))\n (if (string-match \"<[0-9]+>\\\\'\" newname)\n (setq newname (substring newname 0 (match-beginning 0))))\n (when (memq (process-status process) '(run stop open))\n (let* ((process-connection-type (process-tty-name process))\n\t (new-process\n\t (if (memq (process-status process) '(open))\n\t\t(let ((args (process-contact process t)))\n\t\t (setq args (plist-put args :name newname))\n\t\t (setq args (plist-put args :buffer\n\t\t\t\t\t(if (process-buffer process)\n\t\t\t\t\t (current-buffer))))\n\t\t (apply 'make-network-process args))\n\t (apply 'start-process newname\n\t\t (if (process-buffer process) (current-buffer))\n\t\t (process-command process)))))\n (set-process-query-on-exit-flag\n new-process (process-query-on-exit-flag process))\n (set-process-inherit-coding-system-flag\n new-process (process-inherit-coding-system-flag process))\n (set-process-filter new-process (process-filter process))\n (set-process-sentinel new-process (process-sentinel process))\n (set-process-plist new-process (copy-sequence (process-plist process)))\n new-process)))\n\n;; things to maybe add (currently partly covered by `funcall mode'):\n;; - syntax-table\n;; - overlays\n(defun clone-buffer (&optional newname display-flag)\n \"Create and return a twin copy of the current buffer.\nUnlike an indirect buffer, the new buffer can be edited\nindependently of the old one (if it is not read-only).\nNEWNAME is the name of the new buffer. It may be modified by\nadding or incrementing at the end as necessary to create a\nunique buffer name. If nil, it defaults to the name of the\ncurrent buffer, with the proper suffix. If DISPLAY-FLAG is\nnon-nil, the new buffer is shown with `pop-to-buffer'. Trying to\nclone a file-visiting buffer, or a buffer whose major mode symbol\nhas a non-nil `no-clone' property, results in an error.\n\nInteractively, DISPLAY-FLAG is t and NEWNAME is the name of the\ncurrent buffer with appropriate suffix. However, if a prefix\nargument is given, then the command prompts for NEWNAME in the\nminibuffer.\n\nThis runs the normal hook `clone-buffer-hook' in the new buffer\nafter it has been set up properly in other respects.\"\n (interactive\n (progn\n (if buffer-file-name\n\t (error \"Cannot clone a file-visiting buffer\"))\n (if (get major-mode 'no-clone)\n\t (error \"Cannot clone a buffer in %s mode\" mode-name))\n (list (if current-prefix-arg\n\t (read-buffer \"Name of new cloned buffer: \" (current-buffer)))\n\t t)))\n (if buffer-file-name\n (error \"Cannot clone a file-visiting buffer\"))\n (if (get major-mode 'no-clone)\n (error \"Cannot clone a buffer in %s mode\" mode-name))\n (setq newname (or newname (buffer-name)))\n (if (string-match \"<[0-9]+>\\\\'\" newname)\n (setq newname (substring newname 0 (match-beginning 0))))\n (let ((buf (current-buffer))\n\t(ptmin (point-min))\n\t(ptmax (point-max))\n\t(pt (point))\n\t(mk (if mark-active (mark t)))\n\t(modified (buffer-modified-p))\n\t(mode major-mode)\n\t(lvars (buffer-local-variables))\n\t(process (get-buffer-process (current-buffer)))\n\t(new (generate-new-buffer (or newname (buffer-name)))))\n (save-restriction\n (widen)\n (with-current-buffer new\n\t(insert-buffer-substring buf)))\n (with-current-buffer new\n (narrow-to-region ptmin ptmax)\n (goto-char pt)\n (if mk (set-mark mk))\n (set-buffer-modified-p modified)\n\n ;; Clone the old buffer's process, if any.\n (when process (clone-process process))\n\n ;; Now set up the major mode.\n (funcall mode)\n\n ;; Set up other local variables.\n (mapc (lambda (v)\n\t (condition-case ()\t;in case var is read-only\n\t\t (if (symbolp v)\n\t\t (makunbound v)\n\t\t (set (make-local-variable (car v)) (cdr v)))\n\t\t(error nil)))\n\t lvars)\n\n ;; Run any hooks (typically set up by the major mode\n ;; for cloning to work properly).\n (run-hooks 'clone-buffer-hook))\n (if display-flag\n ;; Presumably the current buffer is shown in the selected frame, so\n ;; we want to display the clone elsewhere.\n (let ((same-window-regexps nil)\n (same-window-buffer-names))\n (pop-to-buffer new)))\n new))\n\n\n(defun clone-indirect-buffer (newname display-flag &optional norecord)\n \"Create an indirect buffer that is a twin copy of the current buffer.\n\nGive the indirect buffer name NEWNAME. Interactively, read NEWNAME\nfrom the minibuffer when invoked with a prefix arg. If NEWNAME is nil\nor if not called with a prefix arg, NEWNAME defaults to the current\nbuffer's name. The name is modified by adding a `' suffix to it\nor by incrementing the N in an existing suffix. Trying to clone a\nbuffer whose major mode symbol has a non-nil `no-clone-indirect'\nproperty results in an error.\n\nDISPLAY-FLAG non-nil means show the new buffer with `pop-to-buffer'.\nThis is always done when called interactively.\n\nOptional third arg NORECORD non-nil means do not put this buffer at the\nfront of the list of recently selected ones.\n\nReturns the newly created indirect buffer.\"\n (interactive\n (progn\n (if (get major-mode 'no-clone-indirect)\n\t (error \"Cannot indirectly clone a buffer in %s mode\" mode-name))\n (list (if current-prefix-arg\n\t (read-buffer \"Name of indirect buffer: \" (current-buffer)))\n\t t)))\n (if (get major-mode 'no-clone-indirect)\n (error \"Cannot indirectly clone a buffer in %s mode\" mode-name))\n (setq newname (or newname (buffer-name)))\n (if (string-match \"<[0-9]+>\\\\'\" newname)\n (setq newname (substring newname 0 (match-beginning 0))))\n (let* ((name (generate-new-buffer-name newname))\n\t (buffer (make-indirect-buffer (current-buffer) name t)))\n (with-current-buffer buffer\n (run-hooks 'clone-indirect-buffer-hook))\n (when display-flag\n (pop-to-buffer buffer nil norecord))\n buffer))\n\n\n(defun clone-indirect-buffer-other-window (newname display-flag &optional norecord)\n \"Like `clone-indirect-buffer' but display in another window.\"\n (interactive\n (progn\n (if (get major-mode 'no-clone-indirect)\n\t (error \"Cannot indirectly clone a buffer in %s mode\" mode-name))\n (list (if current-prefix-arg\n\t (read-buffer \"Name of indirect buffer: \" (current-buffer)))\n\t t)))\n (let ((pop-up-windows t))\n (clone-indirect-buffer newname display-flag norecord)))\n\n\f\n;;; Handling of Backspace and Delete keys.\n\n(defcustom normal-erase-is-backspace 'maybe\n \"Set the default behavior of the Delete and Backspace keys.\n\nIf set to t, Delete key deletes forward and Backspace key deletes\nbackward.\n\nIf set to nil, both Delete and Backspace keys delete backward.\n\nIf set to `maybe' (which is the default), Emacs automatically\nselects a behavior. On window systems, the behavior depends on\nthe keyboard used. If the keyboard has both a Backspace key and\na Delete key, and both are mapped to their usual meanings, the\noption's default value is set to t, so that Backspace can be used\nto delete backward, and Delete can be used to delete forward.\n\nIf not running under a window system, customizing this option\naccomplishes a similar effect by mapping C-h, which is usually\ngenerated by the Backspace key, to DEL, and by mapping DEL to C-d\nvia `keyboard-translate'. The former functionality of C-h is\navailable on the F1 key. You should probably not use this\nsetting if you don't have both Backspace, Delete and F1 keys.\n\nSetting this variable with setq doesn't take effect. Programmatically,\ncall `normal-erase-is-backspace-mode' (which see) instead.\"\n :type '(choice (const :tag \"Off\" nil)\n\t\t (const :tag \"Maybe\" maybe)\n\t\t (other :tag \"On\" t))\n :group 'editing-basics\n :version \"21.1\"\n :set (lambda (symbol value)\n\t ;; The fboundp is because of a problem with :set when\n\t ;; dumping Emacs. It doesn't really matter.\n\t (if (fboundp 'normal-erase-is-backspace-mode)\n\t (normal-erase-is-backspace-mode (or value 0))\n\t (set-default symbol value))))\n\n(defun normal-erase-is-backspace-setup-frame (&optional frame)\n \"Set up `normal-erase-is-backspace-mode' on FRAME, if necessary.\"\n (unless frame (setq frame (selected-frame)))\n (with-selected-frame frame\n (unless (terminal-parameter nil 'normal-erase-is-backspace)\n (normal-erase-is-backspace-mode\n (if (if (eq normal-erase-is-backspace 'maybe)\n (and (not noninteractive)\n (or (memq system-type '(ms-dos windows-nt))\n\t\t\t(memq window-system '(w32 ns))\n (and (memq window-system '(x))\n (fboundp 'x-backspace-delete-keys-p)\n (x-backspace-delete-keys-p))\n ;; If the terminal Emacs is running on has erase char\n ;; set to ^H, use the Backspace key for deleting\n ;; backward, and the Delete key for deleting forward.\n (and (null window-system)\n (eq tty-erase-char ?\\^H))))\n normal-erase-is-backspace)\n 1 0)))))\n\n(define-minor-mode normal-erase-is-backspace-mode\n \"Toggle the Erase and Delete mode of the Backspace and Delete keys.\nWith a prefix argument ARG, enable this feature if ARG is\npositive, and disable it otherwise. If called from Lisp, enable\nthe mode if ARG is omitted or nil.\n\nOn window systems, when this mode is on, Delete is mapped to C-d\nand Backspace is mapped to DEL; when this mode is off, both\nDelete and Backspace are mapped to DEL. (The remapping goes via\n`local-function-key-map', so binding Delete or Backspace in the\nglobal or local keymap will override that.)\n\nIn addition, on window systems, the bindings of C-Delete, M-Delete,\nC-M-Delete, C-Backspace, M-Backspace, and C-M-Backspace are changed in\nthe global keymap in accordance with the functionality of Delete and\nBackspace. For example, if Delete is remapped to C-d, which deletes\nforward, C-Delete is bound to `kill-word', but if Delete is remapped\nto DEL, which deletes backward, C-Delete is bound to\n`backward-kill-word'.\n\nIf not running on a window system, a similar effect is accomplished by\nremapping C-h (normally produced by the Backspace key) and DEL via\n`keyboard-translate': if this mode is on, C-h is mapped to DEL and DEL\nto C-d; if it's off, the keys are not remapped.\n\nWhen not running on a window system, and this mode is turned on, the\nformer functionality of C-h is available on the F1 key. You should\nprobably not turn on this mode on a text-only terminal if you don't\nhave both Backspace, Delete and F1 keys.\n\nSee also `normal-erase-is-backspace'.\"\n :variable ((eq (terminal-parameter nil 'normal-erase-is-backspace) 1)\n . (lambda (v)\n (setf (terminal-parameter nil 'normal-erase-is-backspace)\n (if v 1 0))))\n (let ((enabled (eq 1 (terminal-parameter\n nil 'normal-erase-is-backspace))))\n\n (cond ((or (memq window-system '(x w32 ns pc))\n\t (memq system-type '(ms-dos windows-nt)))\n\t (let ((bindings\n\t\t `(([M-delete] [M-backspace])\n\t\t ([C-M-delete] [C-M-backspace])\n\t\t ([?\\e C-delete] [?\\e C-backspace]))))\n\n\t (if enabled\n\t\t (progn\n\t\t (define-key local-function-key-map [delete] [deletechar])\n\t\t (define-key local-function-key-map [kp-delete] [deletechar])\n\t\t (define-key local-function-key-map [backspace] [?\\C-?])\n (dolist (b bindings)\n ;; Not sure if input-decode-map is really right, but\n ;; keyboard-translate-table (used below) only works\n ;; for integer events, and key-translation-table is\n ;; global (like the global-map, used earlier).\n (define-key input-decode-map (car b) nil)\n (define-key input-decode-map (cadr b) nil)))\n\t (define-key local-function-key-map [delete] [?\\C-?])\n\t (define-key local-function-key-map [kp-delete] [?\\C-?])\n\t (define-key local-function-key-map [backspace] [?\\C-?])\n (dolist (b bindings)\n (define-key input-decode-map (car b) (cadr b))\n (define-key input-decode-map (cadr b) (car b))))))\n\t (t\n\t (if enabled\n\t (progn\n\t\t (keyboard-translate ?\\C-h ?\\C-?)\n\t\t (keyboard-translate ?\\C-? ?\\C-d))\n\t (keyboard-translate ?\\C-h ?\\C-h)\n\t (keyboard-translate ?\\C-? ?\\C-?))))\n\n (if (called-interactively-p 'interactive)\n\t(message \"Delete key deletes %s\"\n\t\t (if (eq 1 (terminal-parameter nil 'normal-erase-is-backspace))\n\t\t \"forward\" \"backward\")))))\n\f\n(defvar vis-mode-saved-buffer-invisibility-spec nil\n \"Saved value of `buffer-invisibility-spec' when Visible mode is on.\")\n\n(define-minor-mode read-only-mode\n \"Change whether the current buffer is read-only.\nWith prefix argument ARG, make the buffer read-only if ARG is\npositive, otherwise make it writable. If buffer is read-only\nand `view-read-only' is non-nil, enter view mode.\n\nDo not call this from a Lisp program unless you really intend to\ndo the same thing as the \\\\[read-only-mode] command, including\npossibly enabling or disabling View mode. Also, note that this\ncommand works by setting the variable `buffer-read-only', which\ndoes not affect read-only regions caused by text properties. To\nignore read-only status in a Lisp program (whether due to text\nproperties or buffer state), bind `inhibit-read-only' temporarily\nto a non-nil value.\"\n :variable buffer-read-only\n (cond\n ((and (not buffer-read-only) view-mode)\n (View-exit-and-edit)\n (make-local-variable 'view-read-only)\n (setq view-read-only t))\t\t; Must leave view mode.\n ((and buffer-read-only view-read-only\n ;; If view-mode is already active, `view-mode-enter' is a nop.\n (not view-mode)\n (not (eq (get major-mode 'mode-class) 'special)))\n (view-mode-enter))))\n\n(define-minor-mode visible-mode\n \"Toggle making all invisible text temporarily visible (Visible mode).\nWith a prefix argument ARG, enable Visible mode if ARG is\npositive, and disable it otherwise. If called from Lisp, enable\nthe mode if ARG is omitted or nil.\n\nThis mode works by saving the value of `buffer-invisibility-spec'\nand setting it to nil.\"\n :lighter \" Vis\"\n :group 'editing-basics\n (when (local-variable-p 'vis-mode-saved-buffer-invisibility-spec)\n (setq buffer-invisibility-spec vis-mode-saved-buffer-invisibility-spec)\n (kill-local-variable 'vis-mode-saved-buffer-invisibility-spec))\n (when visible-mode\n (set (make-local-variable 'vis-mode-saved-buffer-invisibility-spec)\n\t buffer-invisibility-spec)\n (setq buffer-invisibility-spec nil)))\n\f\n(defvar messages-buffer-mode-map\n (let ((map (make-sparse-keymap)))\n (set-keymap-parent map special-mode-map)\n (define-key map \"g\" nil) ; nothing to revert\n map))\n\n(define-derived-mode messages-buffer-mode special-mode \"Messages\"\n \"Major mode used in the \\\"*Messages*\\\" buffer.\")\n\n(defun messages-buffer ()\n \"Return the \\\"*Messages*\\\" buffer.\nIf it does not exist, create and it switch it to `messages-buffer-mode'.\"\n (or (get-buffer \"*Messages*\")\n (with-current-buffer (get-buffer-create \"*Messages*\")\n (messages-buffer-mode)\n (current-buffer))))\n\n\f\n;; Minibuffer prompt stuff.\n\n;;(defun minibuffer-prompt-modification (start end)\n;; (error \"You cannot modify the prompt\"))\n;;\n;;\n;;(defun minibuffer-prompt-insertion (start end)\n;; (let ((inhibit-modification-hooks t))\n;; (delete-region start end)\n;; ;; Discard undo information for the text insertion itself\n;; ;; and for the text deletion.above.\n;; (when (consp buffer-undo-list)\n;; (setq buffer-undo-list (cddr buffer-undo-list)))\n;; (message \"You cannot modify the prompt\")))\n;;\n;;\n;;(setq minibuffer-prompt-properties\n;; (list 'modification-hooks '(minibuffer-prompt-modification)\n;;\t'insert-in-front-hooks '(minibuffer-prompt-insertion)))\n\n\f\n;;;; Problematic external packages.\n\n;; rms says this should be done by specifying symbols that define\n;; versions together with bad values. This is therefore not as\n;; flexible as it could be. See the thread:\n;; https://lists.gnu.org/r/emacs-devel/2007-08/msg00300.html\n(defconst bad-packages-alist\n ;; Not sure exactly which semantic versions have problems.\n ;; Definitely 2.0pre3, probably all 2.0pre's before this.\n '((semantic semantic-version \"\\\\`2\\\\.0pre[1-3]\\\\'\"\n \"The version of `semantic' loaded does not work in Emacs 22.\nIt can cause constant high CPU load.\nUpgrade to at least Semantic 2.0pre4 (distributed with CEDET 1.0pre4).\")\n ;; CUA-mode does not work with GNU Emacs version 22.1 and newer.\n ;; Except for version 1.2, all of the 1.x and 2.x version of cua-mode\n ;; provided the `CUA-mode' feature. Since this is no longer true,\n ;; we can warn the user if the `CUA-mode' feature is ever provided.\n (CUA-mode t nil\n\"CUA-mode is now part of the standard GNU Emacs distribution,\nso you can now enable CUA via the Options menu or by customizing `cua-mode'.\n\nYou have loaded an older version of CUA-mode which does not work\ncorrectly with this version of Emacs. You should remove the old\nversion and use the one distributed with Emacs.\"))\n \"Alist of packages known to cause problems in this version of Emacs.\nEach element has the form (PACKAGE SYMBOL REGEXP STRING).\nPACKAGE is either a regular expression to match file names, or a\nsymbol (a feature name), like for `with-eval-after-load'.\nSYMBOL is either the name of a string variable, or t. Upon\nloading PACKAGE, if SYMBOL is t or matches REGEXP, display a\nwarning using STRING as the message.\")\n\n(defun bad-package-check (package)\n \"Run a check using the element from `bad-packages-alist' matching PACKAGE.\"\n (condition-case nil\n (let* ((list (assoc package bad-packages-alist))\n (symbol (nth 1 list)))\n (and list\n (boundp symbol)\n (or (eq symbol t)\n (and (stringp (setq symbol (eval symbol)))\n (string-match-p (nth 2 list) symbol)))\n (display-warning package (nth 3 list) :warning)))\n (error nil)))\n\n(dolist (elem bad-packages-alist)\n (let ((pkg (car elem)))\n (with-eval-after-load pkg\n (bad-package-check pkg))))\n\n\f\n;;; Generic dispatcher commands\n\n;; Macro `define-alternatives' is used to create generic commands.\n;; Generic commands are these (like web, mail, news, encrypt, irc, etc.)\n;; that can have different alternative implementations where choosing\n;; among them is exclusively a matter of user preference.\n\n;; (define-alternatives COMMAND) creates a new interactive command\n;; M-x COMMAND and a customizable variable COMMAND-alternatives.\n;; Typically, the user will not need to customize this variable; packages\n;; wanting to add alternative implementations should use\n;;\n;; ;;;###autoload (push '(\"My impl name\" . my-impl-symbol) COMMAND-alternatives\n\n(defmacro define-alternatives (command &rest customizations)\n \"Define the new command `COMMAND'.\n\nThe argument `COMMAND' should be a symbol.\n\nRunning `M-x COMMAND RET' for the first time prompts for which\nalternative to use and records the selected command as a custom\nvariable.\n\nRunning `C-u M-x COMMAND RET' prompts again for an alternative\nand overwrites the previous choice.\n\nThe variable `COMMAND-alternatives' contains an alist with\nalternative implementations of COMMAND. `define-alternatives'\ndoes not have any effect until this variable is set.\n\nCUSTOMIZATIONS, if non-nil, should be composed of alternating\n`defcustom' keywords and values to add to the declaration of\n`COMMAND-alternatives' (typically :group and :version).\"\n (let* ((command-name (symbol-name command))\n (varalt-name (concat command-name \"-alternatives\"))\n (varalt-sym (intern varalt-name))\n (varimp-sym (intern (concat command-name \"--implementation\"))))\n `(progn\n\n (defcustom ,varalt-sym nil\n ,(format \"Alist of alternative implementations for the `%s' command.\n\nEach entry must be a pair (ALTNAME . ALTFUN), where:\nALTNAME - The name shown at user to describe the alternative implementation.\nALTFUN - The function called to implement this alternative.\"\n command-name)\n :type '(alist :key-type string :value-type function)\n ,@customizations)\n\n (put ',varalt-sym 'definition-name ',command)\n (defvar ,varimp-sym nil \"Internal use only.\")\n\n (defun ,command (&optional arg)\n ,(format \"Run generic command `%s'.\nIf used for the first time, or with interactive ARG, ask the user which\nimplementation to use for `%s'. The variable `%s'\ncontains the list of implementations currently supported for this command.\"\n command-name command-name varalt-name)\n (interactive \"P\")\n (when (or arg (null ,varimp-sym))\n (let ((val (completing-read\n\t\t ,(format-message\n \"Select implementation for command `%s': \"\n command-name)\n\t\t ,varalt-sym nil t)))\n (unless (string-equal val \"\")\n\t (when (null ,varimp-sym)\n\t\t (message\n\t\t \"Use C-u M-x %s RET`to select another implementation\"\n\t\t ,command-name)\n\t\t (sit-for 3))\n\t (customize-save-variable ',varimp-sym\n\t\t\t\t\t(cdr (assoc-string val ,varalt-sym))))))\n (if ,varimp-sym\n (call-interactively ,varimp-sym)\n (message \"%s\" ,(format-message\n \"No implementation selected for command `%s'\"\n command-name)))))))\n\n\f\n;;; Functions for changing capitalization that Do What I Mean\n(defun upcase-dwim (arg)\n \"Upcase words in the region, if active; if not, upcase word at point.\nIf the region is active, this function calls `upcase-region'.\nOtherwise, it calls `upcase-word', with prefix argument passed to it\nto upcase ARG words.\"\n (interactive \"*p\")\n (if (use-region-p)\n (upcase-region (region-beginning) (region-end))\n (upcase-word arg)))\n\n(defun downcase-dwim (arg)\n \"Downcase words in the region, if active; if not, downcase word at point.\nIf the region is active, this function calls `downcase-region'.\nOtherwise, it calls `downcase-word', with prefix argument passed to it\nto downcase ARG words.\"\n (interactive \"*p\")\n (if (use-region-p)\n (downcase-region (region-beginning) (region-end))\n (downcase-word arg)))\n\n(defun capitalize-dwim (arg)\n \"Capitalize words in the region, if active; if not, capitalize word at point.\nIf the region is active, this function calls `capitalize-region'.\nOtherwise, it calls `capitalize-word', with prefix argument passed to it\nto capitalize ARG words.\"\n (interactive \"*p\")\n (if (use-region-p)\n (capitalize-region (region-beginning) (region-end))\n (capitalize-word arg)))\n\n\f\n\n(provide 'simple)\n\n;;; simple.el ends here\n" }, { "path": "Units/parser-erlang.r/crash1.d/input.erl", "content": "% long directives used to possibly crash the parser\n% (and always make Valgrind angry)\n-some_extremely_loooong_directive\n-even_longer_might_crash_more_often_than_not_but_anyway_valgrind_would_not_be_hayyp_either_way\n\n" }, { "path": "Units/parser-flex.r/as-first-token.d/expected.tags", "content": "f1\tinput.as\t/^function f1():void {}$/;\"\tf\n" }, { "path": "Units/parser-flex.r/as-first-token.d/input.as", "content": "function f1():void {}\n" }, { "path": "Units/parser-flex.r/classes.d/args.ctags", "content": "--fields=+Z\n--extras=+q\n" }, { "path": "Units/parser-flex.r/classes.d/expected.tags", "content": "C1\tinput.as\t/^ class C1 {$/;\"\tc\nC1.m1\tinput.as\t/^ public function m1():Boolean { return 0; }$/;\"\tm\tscope:class:C1\nC2\tinput.as\t/^ class C2 extends C1 {}$/;\"\tc\nC3\tinput.as\t/^ class C3 {}$/;\"\tc\nC4\tinput.as\t/^ class C4 implements I1 {}$/;\"\tc\nC5\tinput.as\t/^ class C5 extends C3 implements I1 {}$/;\"\tc\nC6\tinput.as\t/^ class C6 extends C3 implements I1, I2 {}$/;\"\tc\nC7\tinput.as\t/^ dynamic class C7{}$/;\"\tc\nI1\tinput.as\t/^ interface I1 {}$/;\"\ti\nI2\tinput.as\t/^ interface I2 {}$/;\"\ti\nI3\tinput.as\t/^ interface I3 extends I1, I2 {}$/;\"\ti\nI4\tinput.as\t/^ interface I4 extends I3 {}$/;\"\ti\nm1\tinput.as\t/^ public function m1():Boolean { return 0; }$/;\"\tm\tscope:class:C1\n" }, { "path": "Units/parser-flex.r/classes.d/input.as", "content": "package {\n class C1 {\n public function m1():Boolean { return 0; }\n }\n class C2 extends C1 {}\n class C3 {}\n interface I1 {}\n interface I2 {}\n interface I3 extends I1, I2 {}\n interface I4 extends I3 {}\n class C4 implements I1 {}\n class C5 extends C3 implements I1 {}\n class C6 extends C3 implements I1, I2 {}\n\n dynamic class C7{}\n}\n" }, { "path": "Units/parser-flex.r/const.d/args.ctags", "content": "--kinds-flex=+l\n" }, { "path": "Units/parser-flex.r/const.d/expected.tags", "content": "AlarmClock\tinput.as\t/^public class AlarmClock {$/;\"\tc\nMODE_AUDIO\tinput.as\t/^ public static const MODE_AUDIO = 2;$/;\"\tC\tclass:AlarmClock\nMODE_BOTH\tinput.as\t/^ public static const MODE_BOTH = 3;$/;\"\tC\tclass:AlarmClock\nMODE_VISUAL\tinput.as\t/^ public static const MODE_VISUAL = 1;$/;\"\tC\tclass:AlarmClock\nmode\tinput.as\t/^ private var mode = AlarmClock.MODE_AUDIO;$/;\"\tl\tclass:AlarmClock\n" }, { "path": "Units/parser-flex.r/const.d/input.as", "content": "// https://www.oreilly.com/library/view/essential-actionscript-30/0596526946/ch04s02.html\npublic class AlarmClock {\n public static const MODE_VISUAL = 1;\n public static const MODE_AUDIO = 2;\n public static const MODE_BOTH = 3;\n\n private var mode = AlarmClock.MODE_AUDIO;\n}\n" }, { "path": "Units/parser-flex.r/const2.d/expected.tags", "content": "MIN_AGE\tinput.as\t/^const MIN_AGE:int = 21;$/;\"\tC\nproduct_array\tinput.as\t/^const product_array:Array = new Array(\"Studio\", \"Dreamweaver\", \"Flash\", \"ColdFusion\", \"Contribut/;\"\tC\n" }, { "path": "Units/parser-flex.r/const2.d/input.as", "content": "// https://help.adobe.com/en_US/FlashPlatform/reference/actionscript/3/statements.html#const\nconst MIN_AGE:int = 21;\n\nconst product_array:Array = new Array(\"Studio\", \"Dreamweaver\", \"Flash\", \"ColdFusion\", \"Contribute\", \"Breeze\"); \nproduct_array.push(\"Flex\"); // array operations are allowed\nproduct_array = [\"Other\"]; // assignment is an error\ntrace(product_array);\n" }, { "path": "Units/parser-flex.r/flex_comment.mxml.d/expected.tags", "content": "" }, { "path": "Units/parser-flex.r/flex_comment.mxml.d/input.mxml", "content": "\r\n" }, { "path": "Units/parser-flex.r/flex_only_mxml.mxml.d/expected.tags", "content": "form_login_screen\tinput.mxml\t/^\t\t$/;\"\tx\tmxtag:Form\nforms\tinput.mxml\t/^\t$/;\"\tx\tmxtag:Array\nls_bt_log_in_out\tinput.mxml\t/^\t\t\t\t\t$/;\"\tx\tmxtag:Label\nls_ti_passwd\tinput.mxml\t/^\t\t\t\t\t$/;\"\tx\tmxtag:TextInput\nls_ti_username\tinput.mxml\t/^\t\t\t\t\t$/;\"\tx\tmxtag:TextInput\nmyHTTPService\tinput.mxml\t/^\t\tid=\"myHTTPService\"$/;\"\tx\tmxtag:HTTPService\nviewstack1\tinput.mxml\t/^\t\r\n\r\n\r\n\t\r\n\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\t\t\r\n\t\t\t\r\n\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\t\r\n\t\t\t\t\r\n\t\t\t\r\n\t\t\r\n\t\r\n\r\n\t\r\n\r\n\r\n" }, { "path": "Units/parser-flex.r/flex_with_actionscript.mxml.d/expected.tags", "content": "ajaxData\tinput.mxml\t/^\t\tid=\"ajaxData\"$/;\"\tx\tmxtag:HTTPService\ndateToYYYYMMDD\tinput.mxml\t/^\tpublic function dateToYYYYMMDD(aDate:Date):String {$/;\"\tf\n" }, { "path": "Units/parser-flex.r/flex_with_actionscript.mxml.d/input.mxml", "content": "\r\n\r\n\t\r\n\t\r\n\t\r\n\r\n\t\r\n\r\n\r\n\r\n" }, { "path": "Units/parser-flex.r/method-attributes.d/expected.tags", "content": "C\tinput.as\t/^class C {$/;\"\tc\nf1\tinput.as\t/^ public function f1():void {}$/;\"\tm\tclass:C\nf2\tinput.as\t/^ private function f2():void {}$/;\"\tm\tclass:C\nf3\tinput.as\t/^ protected function f3():void {}$/;\"\tm\tclass:C\nf4\tinput.as\t/^ internal function f4():void {}$/;\"\tm\tclass:C\nf5\tinput.as\t/^ public function f5():void {}$/;\"\tm\tclass:C\nf6\tinput.as\t/^ public override function f6():void {}$/;\"\tm\tclass:C\nf7\tinput.as\t/^ final function f7():void {}$/;\"\tm\tclass:C\nf8\tinput.as\t/^ native function f8():void {}$/;\"\tm\tclass:C\n" }, { "path": "Units/parser-flex.r/method-attributes.d/input.as", "content": "/* Not sure it's really valid, but the goal is to check not choking on\n * attributes, so so long as it's valid attributes it's fine */\nclass C {\n public function f1():void {}\n private function f2():void {}\n protected function f3():void {}\n internal function f4():void {}\n public function f5():void {}\n public override function f6():void {}\n final function f7():void {}\n native function f8():void {}\n}\n" }, { "path": "Units/parser-flex.r/packages.d/expected.tags", "content": "C1\tinput.as\t/^ class C1 {}$/;\"\tc\tclass:P3\nP1\tinput.as\t/^package P1 {}$/;\"\tP\nP2\tinput.as\t/^package P2 {$/;\"\tP\nP3\tinput.as\t/^package P3 {$/;\"\tP\nf1\tinput.as\t/^ function f1() {}$/;\"\tf\tfunction:P2\nqualified.test.pkg\tinput.as\t/^package qualified.test . pkg {$/;\"\tP\n" }, { "path": "Units/parser-flex.r/packages.d/input.as", "content": "package P1 {}\npackage P2 {\n function f1() {}\n}\npackage P3 {\n class C1 {}\n}\npackage qualified.test . pkg {\n}\n" }, { "path": "Units/parser-flex.r/sampler.d/args.ctags", "content": "--kinds-flex=+l\n--fields=+rZ\n--extras=+r\n" }, { "path": "Units/parser-flex.r/sampler.d/expected.tags", "content": "assert\tinput.as\t/^ private function assert(e:Boolean, mess:String=null):void {$/;\"\tm\tscope:class:sampleTypes\troles:def\nb\tinput.as\t/^ var b:Boolean = true$/;\"\tl\tscope:class:sampleTypes\troles:def\ncpuSamples\tinput.as\t/^ var cpuSamples:Array=[];$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\ndelSamples\tinput.as\t/^ var delSamples:Array=[];$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\ndos\tinput.as\t/^ var dos = DeleteObjectSample(s);$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\nflash.display.Sprite\tinput.as\t/^ import flash.display.Sprite$/;\"\tI\troles:import\nflash.sampler.*\tinput.as\t/^ import flash.sampler.*$/;\"\tI\troles:import\nflash.system.*\tinput.as\t/^ import flash.system.*$/;\"\tI\troles:import\nflash.utils.*\tinput.as\t/^ import flash.utils.*$/;\"\tI\troles:import\nids\tinput.as\t/^ var ids:Array=[]$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\nlastTime\tinput.as\t/^ var lastTime:Number=0;$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\nnewSamples\tinput.as\t/^ var newSamples:Array=[];$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\nnos\tinput.as\t/^ var nos = NewObjectSample(s);$/;\"\tl\tscope:class:sampleTypes.sampleTypes\troles:def\nsampleTypes\tinput.as\t/^ public function sampleTypes() {$/;\"\tm\tscope:class:sampleTypes\troles:def\nsampleTypes\tinput.as\t/^ public class sampleTypes extends Sprite$/;\"\tc\troles:def\n" }, { "path": "Units/parser-flex.r/sampler.d/input.as", "content": "// https://help.adobe.com/en_US/FlashPlatform/reference/actionscript/3/flash/sampler/Sample.html\npackage \n{\n import flash.sampler.*\n import flash.system.*\n import flash.utils.*\n import flash.display.Sprite\n public class sampleTypes extends Sprite\n {\n var b:Boolean = true\n public function sampleTypes() {\n flash.sampler.startSampling();\n for(var i:int=0;i<10000;i++)\n new Object();\n\n var cpuSamples:Array=[];\n var newSamples:Array=[];\n var delSamples:Array=[];\n var ids:Array=[]\n\n var lastTime:Number=0;\n for each(var s:Sample in getSamples()) {\n \n assert(s.time > 0); // positive\n assert(Math.floor(s.time) == s.time, s.time); // integral\n assert(s.time >= lastTime, s.time + \":\" + lastTime); // ascending\n assert(s.stack == null || s.stack is Array)\n if(s.stack) {\n assert(s.stack[0] is StackFrame);\n assert(s.stack[0].name is String);\n }\n \n if(s is NewObjectSample) {\n var nos = NewObjectSample(s);\n assert(s.id > 0, s.id);\n assert(s.type is Class, getQualifiedClassName(s.type));\n newSamples.push(s);\n ids[s.id] = \"got one\";\n } else if(s is DeleteObjectSample) {\n var dos = DeleteObjectSample(s);\n delSamples.push(s);\n assert(ids[dos.id] == \"got one\");\n } else if(s is Sample)\n cpuSamples.push(s);\n else {\n assert(false);\n }\n lastTime = s.time;\n }\n\n trace(b)\n trace(newSamples.length > 0)\n trace(cpuSamples.length > 0)\n trace(delSamples.length > 0)\n\n }\n\n private function assert(e:Boolean, mess:String=null):void {\n b = e && b;\n if(true && !e) {\n if(mess) trace(mess);\n trace(new Error().getStackTrace());\n } \n } \n }\n}\n" }, { "path": "Units/parser-forth.r/simple-forth.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-forth.r/simple-forth.d/expected.tags", "content": "DUMMY1\tinput.fth\t/^10 constant DUMMY1$/;\"\tc\nDUMMY2\tinput.fth\t/^12 CONSTANT DUMMY2$/;\"\tc\ndummy3\tinput.fth\t/^variable dummy3$/;\"\tv\ndummy4\tinput.fth\t/^variable dummy4$/;\"\tv\ndummy5\tinput.fth\t/^VARIABLE dummy5$/;\"\tv\nfizz?\tinput.fth\t/^: fizz? \\\\ a simple comment $/;\"\tw\nbuzz?\tinput.fth\t/^: buzz? $/;\"\tw\nfizz-buzz?\tinput.fth\t/^: fizz-buzz? $/;\"\tw\ndo-fizz-buzz\tinput.fth\t/^: do-fizz-buzz $/;\"\tw\n" }, { "path": "Units/parser-forth.r/simple-forth.d/input.fth", "content": "\n( https://rosettacode.org/wiki/FizzBuzz#Forth / https://skilldrick.github.io/easyforth/ ) \n\n\\ Works in gforth and other ANS forth. Other Forth may differ.\n\n10 constant DUMMY1\n12 CONSTANT DUMMY2\n\nvariable dummy3\nvariable dummy4\nVARIABLE dummy5\n\n11 dummy3 !\n13 dummy4 !\n\n: fizz? \\ a simple comment \n3 mod 0 = dup if .\" Fizz\" then ;\n: buzz? \n5 mod 0 = dup if .\" Buzz\" then ;\n\n: fizz-buzz? \ndup fizz? swap buzz? or invert ;\n\n: do-fizz-buzz \n25 1 do cr i fizz-buzz? if i . then loop ;\n\ndo-fizz-buzz\ncr\n\nquit\n\\ bye\n" }, { "path": "Units/parser-fortran.r/array-spec.f90.d/expected.tags", "content": "df_mb_data\tinput.f90\t/^ df_mb_data(/;\"\tk\ttype:df_type\ndf_mb_time\tinput.f90\t/^ df_mb_time(/;\"\tk\ttype:df_type\ndf_type\tinput.f90\t/^ TYPE df_type$/;\"\tt\tmodule:inm_df\ndf_wb_data\tinput.f90\t/^ df_mb_data(:,:), df_wb_data(/;\"\tk\ttype:df_type\ndf_wb_time\tinput.f90\t/^ df_mb_time(:), df_wb_time(/;\"\tk\ttype:df_type\ninm_df\tinput.f90\t/^ MODULE inm_df$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/array-spec.f90.d/input.f90", "content": " MODULE inm_df\n IMPLICIT none\n SAVE\n TYPE df_type\n REAL(8), POINTER :: &\n df_mb_time(:), df_wb_time(:)\n REAL(4), POINTER :: &\n df_mb_data(:,:), df_wb_data(:,:)\n END TYPE\n END MODULE inm_df\n" }, { "path": "Units/parser-fortran.r/array_spec.f90.d/expected.tags", "content": "Global_Variables\tinput.f90\t/^module Global_Variables$/;\"\tm\nH\tinput.f90\t/^H /;\"\tv\tmodule:Global_Variables\nH0\tinput.f90\t/^H0(/;\"\tv\tmodule:Global_Variables\nH1\tinput.f90\t/^H1(/;\"\tv\tmodule:Global_Variables\nH2\tinput.f90\t/^H2(/;\"\tv\tmodule:Global_Variables\nH3\tinput.f90\t/^H3(/;\"\tv\tmodule:Global_Variables\nH4\tinput.f90\t/^H4(/;\"\tv\tmodule:Global_Variables\nH5\tinput.f90\t/^H5(/;\"\tv\tmodule:Global_Variables\n" }, { "path": "Units/parser-fortran.r/array_spec.f90.d/input.f90", "content": "! Bug reported by Jim Chen on 31 Dec 2002\nmodule Global_Variables\nimplicit none\n\n! Example of array-spec in entity-decl\nreal*8, save :: &\nH (NDIM, NDIM) = 0.D0, &\nH0(NDIM, NDIM), &\nH1(NDIM, NDIM) = 0.D0, &\nH2(NDIM, NDIM) = 0.D0, &\nH3(NDIM, NDIM) = 0.D0, &\nH4(NDIM, NDIM) = 0.D0, &\nH5(NDIM, NDIM) = 0.D0\n\nend module Global_Variables\n" }, { "path": "Units/parser-fortran.r/auto.f.d/expected.tags", "content": "AUTO_TEST\tinput.f\t/^\tprogram AUTO_TEST$/;\"\tp\nD\tinput.f\t/^\tAUTOMATIC REAL P, D,/;\"\tv\tprogram:AUTO_TEST\nP\tinput.f\t/^\tAUTOMATIC REAL P,/;\"\tv\tprogram:AUTO_TEST\nQ\tinput.f\t/^\tAUTOMATIC REAL P, D, Q /;\"\tv\tprogram:AUTO_TEST\n" }, { "path": "Units/parser-fortran.r/auto.f.d/input.f", "content": "! Provided by Brian Helsinki, 7 March 2003\n\tprogram AUTO_TEST\n\tAUTOMATIC A, B, C \n\tAUTOMATIC REAL P, D, Q \n\t!IMPLICIT AUTOMATIC REAL (X-Z) \n\tEND\n\n" }, { "path": "Units/parser-fortran.r/bug565813.f90.d/expected.tags", "content": "N\tinput.f90\t/^ integer, parameter :: N /;\"\tv\tmodule:ctags_bug\nbar\tinput.f90\t/^ integer :: bar$/;\"\tk\ttype:foo_t\nctags_bug\tinput.f90\t/^module ctags_bug$/;\"\tm\nfoo_getbar\tinput.f90\t/^ integer function foo_getbar /;\"\tf\tmodule:ctags_bug\nfoo_set_bar\tinput.f90\t/^ pure subroutine foo_set_bar /;\"\ts\tmodule:ctags_bug\nfoo_setbar\tinput.f90\t/^ subroutine foo_setbar /;\"\ts\tmodule:ctags_bug\nfoo_t\tinput.f90\t/^ type :: foo_t$/;\"\tt\tmodule:ctags_bug\n" }, { "path": "Units/parser-fortran.r/bug565813.f90.d/input.f90", "content": "module ctags_bug\n\n implicit none\n private\n save\n\n type :: foo_t\n integer :: bar\n end type foo_t\n\n integer, parameter :: N = 1000\n\n public :: foo_t\n public :: foo_setbar\n public :: foo_set_bar\n public :: foo_getbar\n\ncontains\n\n subroutine foo_setbar (f,b)\n type(foo_t), intent(out) :: f\n integer, intent(in) :: b\n\n f%bar = b\n end subroutine foo_setbar\n\n\n pure subroutine foo_set_bar (f,b)\n type(foo_t), intent(out) :: f\n integer, intent(in) :: b\n\n f%bar = b\n end subroutine foo_set_bar\n\n\n integer function foo_getbar (f)\n type(foo_t), intent(in) :: f\n\n foo_getbar = f%bar\n end function foo_getbar\n\nend module ctags_bug\n" }, { "path": "Units/parser-fortran.r/bug620288.f.d/expected.tags", "content": "bar\tinput.f\t/^\tdouble precision function bar(/;\"\tf\nfoo\tinput.f\t/^\tinteger function foo(/;\"\tf\n" }, { "path": "Units/parser-fortran.r/bug620288.f.d/input.f", "content": "C Bugs item #620288, was opened at 2002-10-08 08:15\nC You can respond by visiting: \nC https://sourceforge.net/tracker/?func=detail&atid=106556&aid=620288&group_id=6556\nC \nC Category: None\nC Group: None\nC Status: Open\nC Resolution: None\nC Priority: 5\nC Submitted By: Nobody/Anonymous (nobody)\nC Assigned to: Nobody/Anonymous (nobody)\nC Summary: fortran function definition\nC \nC Initial Comment:\nC \nC System Information:\nC --------------\nC ctags version: \nC Exuberant Ctags 5.3.1, Copyright (C) 1996-2002 Darren \nC Hiebert\nC Compiled: Sep 12 2002, 10:22:42\nC Addresses: , \nC http://ctags.sourceforge.net\nC Optional compiled features: +wildcards, +regex\nC \nC Unix:\nC HP-UX B.11.00 A 9000/800 551726527\nC --------------\nC \nC Symptoms:\nC --------------\nC I have a fortran file that has a single function. This \nC function has a\nC return type of double precision. I type $ctags bar.f . \nC This produces the expected \nC tags file. However, tags does not contain the function \nC definition.\nC \nC This does not occur when the same function's return \nC type has been changed to \nC a integer or character data return type.\nC --------------\nC \nC \nC Examples in which I can repeat the experience with their \nC respective tags files:\nC --------------\nC \nC \nC foo.f\nC --------------\n\tinteger function foo(a)\n\n\tinteger a\n\tfoo = a\n\tend\nC --------------\nC \nC \nC tags\nC --------------\nC !_TAG_FILE_FORMAT\t2\t/extended \nC format; --format=1 will not append ;\" to lines/\nC !_TAG_FILE_SORTED\t1\nC \t/0=unsorted, 1=sorted, 2=foldcase/\nC !_TAG_PROGRAM_AUTHOR\tDarren Hiebert\nC \t/dhiebert@users.sourceforge.net/\nC !_TAG_PROGRAM_NAME\tExuberant Ctags\t//\nC !_TAG_PROGRAM_URL\nC \thttp://ctags.sourceforge.net\t/official site/\nC !_TAG_PROGRAM_VERSION\t5.3.1\t//\nC foo\tfoo.f\t/^\tinteger function foo(/;\"\tf\nC --------------\nC \nC \nC \nC bar.f\t\nC ---------------\n\tdouble precision function bar(a)\n\t\n\tdouble precision a\n\tbar = a\n\tend\nC --------------\t\nC \nC tags\nC ---------------\nC !_TAG_FILE_FORMAT\t2\t/extended \nC format; --format=1 will not append ;\" to lines/\nC !_TAG_FILE_SORTED\t1\nC \t/0=unsorted, 1=sorted, 2=foldcase/\nC !_TAG_PROGRAM_AUTHOR\tDarren Hiebert\nC \t/dhiebert@users.sourceforge.net/\nC !_TAG_PROGRAM_NAME\tExuberant Ctags\t//\nC !_TAG_PROGRAM_URL\nC \thttp://ctags.sourceforge.net\t/official site/\nC !_TAG_PROGRAM_VERSION\t5.3.1\t//\nC ---------------\n" }, { "path": "Units/parser-fortran.r/bug629.d/args.ctags", "content": "--language-force=Fortran\n" }, { "path": "Units/parser-fortran.r/bug629.d/expected.tags", "content": "test_enumeration\tinput.c\t/^enum test_enumeration /;\"\tE\n" }, { "path": "Units/parser-fortran.r/bug629.d/input.c", "content": "enum test_enumeration {\n ENUM_1 = 1,\n ENUM_2,\n ENUM_3\n};\n" }, { "path": "Units/parser-fortran.r/bug670433.f90.d/README", "content": "This test has the truncation issue #333.\n" }, { "path": "Units/parser-fortran.r/bug670433.f90.d/expected.tags", "content": "bar\tinput.f90\t/^ subroutine bar /;\"\ts\tmodule:foobar\nf\tinput.f90\t/^ real function f(/;\"\tf\tfunction:foo\nfoo\tinput.f90\t/^ integer function foo /;\"\tf\tmodule:foobar\nfoobar\tinput.f90\t/^module foobar$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/bug670433.f90.d/input.f90", "content": "! Bugs item #670443, was opened at 2003-01-18 22:44\n! You can respond by visiting: \n! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=670443&group_id=6556\n! \n! Category: None\n! Group: None\n! Status: Open\n! Resolution: None\n! Priority: 5\n! Submitted By: Erik Edelmann (fanerier)\n! Assigned to: Nobody/Anonymous (nobody)\n! Summary: Fortran: Internal procedures causes trouble\n! \n! Initial Comment:\n! If a function in a module has an internal procedure\n! (after a CONTAINS-statement), everything in the module\n! after the parent function will be skipped. I.e. in the\n! attached file, the subroutine 'bar' will not be listed\n! in the 'tags' file. Note that this problem arises only\n! when the parent procedure is a function, if it is a\n! subroutine everything works fine.\n\nmodule foobar\n\ncontains\n\n integer function foo (i)\n\n contains \n \n real function f(x)\n end function f\n\n end function foo\n\n\n subroutine bar (n)\n end subroutine bar\n\nend module foobar\n" }, { "path": "Units/parser-fortran.r/bug726712.f90.d/expected.tags", "content": "sub1\tinput.f90\t/^ subroutine sub1(/;\"\ts\nsub2\tinput.f90\t/^ subroutine sub2(/;\"\ts\ntagstest_ctrl\tinput.f90\t/^ subroutine tagstest_ctrl(/;\"\ts\n" }, { "path": "Units/parser-fortran.r/bug726712.f90.d/input.f90", "content": "! Bugs item #726712, was opened at 2003-04-24 08:36\n! Message generated for change (Comment added) made by schubidu\n! You can respond by visiting: \n! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=726712&group_id=6556\n! \n! Category: None\n! Group: None\n! Status: Open\n! Resolution: None\n! Priority: 5\n! Submitted By: sandra schrdter (schubidu)\n! Assigned to: Darren Hiebert (dhiebert)\n! Summary: ctags 5.5 and f90: \"endsubroutine\" not recognized\n! \n! Initial Comment:\n! Dear Ctags'ers. :)\n! \n! First of all: good tool! :) I stumbled across ctags for\n! my gvim6, wanted to use the nice plugin taglist.\n! \n! My System: HP-Unix and ctags 5.5\n! \n! My problem is the following. The command:\n! \n! \"ctags tagstest.f90\"\n! \n! builds a tagsfile that lacks 1 of the declared 3\n! subroutines. \n! The problem disappears when the declaration of the\n! subroutine ends in \"end subroutine\" and not in\n! \"endsubroutine\", although \"endsubroutine\" is correct\n! Fortran90 syntax, AFAIK.\n! \n! Is there a chance to get this corrected?\n! \n! \n! The example file tagstest.f90:\n\n subroutine tagstest_ctrl()\n real :: a\n a = 0.0\n call sub1( a)\n call sub2( a)\n endsubroutine tagstest_ctrl\n\n subroutine sub1( a)\n real,intent( inout) ::a\n a = 1.1\n endsubroutine sub1\n \n subroutine sub2( a)\n real,intent( inout) ::a\n a = 2.2\n endsubroutine sub2\n\n! ----------------------------------------------------------------------\n! \n! Comment By: sandra schrdter (schubidu)\n! Date: 2003-05-28 13:17\n! \n! Message:\n! Logged In: YES \n! user_id=763447\n! \n! I realized that there are also problems when a subroutine\n! ends only with the keyword\n! end\n! \n! The following subroutine is listed but cannot be selected\n! (that is, the cursor won't go there)\n! \n! ----------------------------------------------------------------------\n" }, { "path": "Units/parser-fortran.r/bug726875.f90.d/expected.tags", "content": "coma\tinput.f90\t19;\"\tc\ncomb\tinput.f90\t22;\"\tc\ncomc\tinput.f90\t24;\"\tc\n" }, { "path": "Units/parser-fortran.r/bug726875.f90.d/input.f90", "content": "! Bugs item #726875, was opened at 2003-04-24 15:30\n! Message generated for change (Tracker Item Submitted) made by Item Submitter\n! You can respond by visiting: \n! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=726875&group_id=6556\n!\n! Category: None\n! Group: None\n! Status: Open\n! Resolution: None\n! Priority: 5\n! Submitted By: sandra schrdter (schubidu)\n! Assigned to: Nobody/Anonymous (nobody)\n! Summary: ctags 5.5 and f90: common and !\n! \n! Initial Comment:\n! ctags won't add a common-block definition to the tags\n! file when the following occurs:\n\n common /coma/ a,b,!foobar\n + c,d\n\n common /comb/ e,f\n\n common /comc/ g,h\n\n! The problem seems to be based on the fact that the\n! comment \"! foobar\" is followed by a continuation line\n! (\"+\" in column 6 shows that)\n" }, { "path": "Units/parser-fortran.r/bug734933.f90.d/expected.tags", "content": "ADD_COMPONENTS\tinput.f90\t/^ SUBROUTINE ADD_COMPONENTS$/;\"\ts\tmodule:MDCOMPONENTS\nCOMP\tinput.f90\t/^ TYPE (COMPONENT), POINTER :: COMP$/;\"\tv\tmodule:MDCOMPONENTS\nCOMPONENT\tinput.f90\t/^ TYPE COMPONENT$/;\"\tt\tmodule:MDCOMPONENTS\nCOMPONENTS\tinput.f90\t/^ TYPE (COMPONENT_POINTER), DIMENSION(LIM_COMPONENTS) :: COMPONENTS, COMPONENTS_/;\"\tv\tmodule:MDCOMPONENTS\nCOMPONENTS_TMP\tinput.f90\t/^ TYPE (COMPONENT_POINTER), DIMENSION(LIM_COMPONENTS) :: COMPONENTS, COMPONENTS_TMP$/;\"\tv\tmodule:MDCOMPONENTS\nCOMPONENT_POINTER\tinput.f90\t/^ TYPE COMPONENT_POINTER /;\"\tt\tmodule:MDCOMPONENTS\nCOMP_TMP\tinput.f90\t/^ TYPE (COMPONENT_POINTER) :: COMP_TMP$/;\"\tv\tmodule:MDCOMPONENTS\nLIM_COMPONENTS\tinput.f90\t/^ INTEGER (INT4), PARAMETER :: LIM_COMPONENTS /;\"\tv\tmodule:MDCOMPONENTS\nMDCOMPONENTS\tinput.f90\t/^ MODULE MDCOMPONENTS$/;\"\tm\nMEMDEALLOC\tinput.f90\t/^ INTERFACE MEMDEALLOC$/;\"\ti\tmodule:MDCOMPONENTS\nNAME\tinput.f90\t/^ CHARACTER (LEN=30) :: NAME$/;\"\tk\ttype:COMPONENT\nNCOMP\tinput.f90\t/^ INTEGER (INT4) :: NUM_COMPONENTS = 0, NCOMP;/;\"\tv\tmodule:MDCOMPONENTS\nNUM_COMPONENTS\tinput.f90\t/^ INTEGER (INT4) :: NUM_COMPONENTS /;\"\tv\tmodule:MDCOMPONENTS\nNUM_PART\tinput.f90\t/^ INTEGER (INT4) :: NUM_PART$/;\"\tk\ttype:COMPONENT\nP\tinput.f90\t/^ TYPE (COMPONENT), POINTER :: P$/;\"\tk\ttype:COMPONENT_POINTER\nPART_LIST\tinput.f90\t/^ REAL (REAL8), DIMENSION(:), POINTER :: PART_LIST$/;\"\tk\ttype:COMPONENT\n" }, { "path": "Units/parser-fortran.r/bug734933.f90.d/input.f90", "content": " MODULE MDCOMPONENTS\n \n USE kindef\n USE memory\n\n IMPLICIT NONE\n\n SAVE\n\n INTEGER (INT4), PARAMETER :: LIM_COMPONENTS = 1000;\n INTEGER (INT4) :: NUM_COMPONENTS = 0, NCOMP;\n TYPE COMPONENT\n CHARACTER (LEN=30) :: NAME\n INTEGER (INT4) :: NUM_PART\n REAL (REAL8), DIMENSION(:), POINTER :: PART_LIST\n END TYPE\n\n TYPE COMPONENT_POINTER \n TYPE (COMPONENT), POINTER :: P\n END TYPE\n\n TYPE (COMPONENT), POINTER :: COMP\n TYPE (COMPONENT_POINTER) :: COMP_TMP\n TYPE (COMPONENT_POINTER), DIMENSION(LIM_COMPONENTS) :: COMPONENTS, COMPONENTS_TMP\n\n INTERFACE MEMDEALLOC\n MODULE PROCEDURE MEMDEALLOC_COMPONENTS_PTR\n END INTERFACE\n \n CONTAINS\n\n SUBROUTINE ADD_COMPONENTS\n\n NUM_COMPONENTS = NUM_COMPONENTS + 1\n CALL MEMALLOC (COMPONENTS(NUM_COMPONENTS)%P, IDALL999)\n\n END SUBROUTINE ADD_COMPONENTS\n\n END MODULE MDCOMPONENTS\n" }, { "path": "Units/parser-fortran.r/bug858165.f90.d/expected.tags", "content": "a\tinput.f90\t/^integer :: a, & !comment on variable a$/;\"\tv\tprogram:test\nb\tinput.f90\t/^ b, & !comment on variable b$/;\"\tv\tprogram:test\nc\tinput.f90\t/^ c, & !comment on variable c$/;\"\tv\tprogram:test\nd\tinput.f90\t/^ d !comment on variable d$/;\"\tv\tprogram:test\ntest\tinput.f90\t/^program test$/;\"\tp\n" }, { "path": "Units/parser-fortran.r/bug858165.f90.d/input.f90", "content": "! Bugs item #858165, was opened at 2003-12-11 10:09\n! Message generated for change (Tracker Item Submitted) made by Item Submitter\n! You can respond by visiting: \n! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=858165&group_id=6556\n! \n! Category: None\n! Group: None\n! Status: Open\n! Resolution: None\n! Priority: 5\n! Submitted By: Blazej Krzeminski (blazk)\n! Assigned to: Nobody/Anonymous (nobody)\n! Summary: Fortran90: comment line after continuation character &\n! \n! Initial Comment:\nprogram test\n\ninteger :: a, & !comment on variable a\n b, & !comment on variable b\n !more comment on variable b, CTAGS STOPS HERE\n c, & !comment on variable c\n d !comment on variable d\nend program test\n\n! ctags will index program test, a,b but not c,d\n" }, { "path": "Units/parser-fortran.r/bug877956.f90.d/args.ctags", "content": "--kinds-Fortran=v\n" }, { "path": "Units/parser-fortran.r/bug877956.f90.d/expected.tags-x", "content": "c2 variable 25 input.f90 INTEGER :: cm1 =-1, c2 = 2\nc2 variable 39 input.f90 INTEGER :: cm1 = -1, c2 = 2\ncm1 variable 25 input.f90 INTEGER :: cm1 =-1, c2 = 2\ncm1 variable 39 input.f90 INTEGER :: cm1 = -1, c2 = 2\n" }, { "path": "Units/parser-fortran.r/bug877956.f90.d/input.f90", "content": "! Bugs item #877956, was opened at 2004-01-15 17:59\n! Message generated for change (Tracker Item Submitted) made by Item Submitter\n! You can respond by visiting: \n! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=877956&group_id=6556\n!\n! Category: None\n! Group: None\n! Status: Open\n! Resolution: None\n! Priority: 5\n! Submitted By: Randy Hood (randy762)\n! Assigned to: Nobody/Anonymous (nobody)\n! Summary: Broken Fortran variable listing after =-1\n!\n! Initial Comment:\n! When I run ctags v5.5.2 on Redhat Linux 9 with the command\n!\n! ctags --kinds-Fortran=v -x test.f90\n! \n! where test.f90 is\n! ----------------------------------\nPROGRAM test\n\n IMPLICIT NONE\n INTEGER :: cm1 =-1, c2 = 2\n\nEND PROGRAM test\n! -------------------------------------\n! \n! I only get this one line of output\n!\n! cm1 variable 4 test.f90 INTEGER :: cm1 =-1, c2 = 2\n! \n! If I change one line of test.f90 so that it is now\n! ----------------------------------------\nPROGRAM test\n\n IMPLICIT NONE\n INTEGER :: cm1 = -1, c2 = 2\n\nEND PROGRAM test\n! -----------------------------------------\n! and run the command\n! \n! ctags --kinds-Fortran=v -x test.f90\n! \n! I get this correct output\n! \n! c2 variable 4 test.f90 INTEGER :: cm1 = -1, c2 = 2\n! cm1 variable 4 test.f90 INTEGER :: cm1 = -1, c2 = 2\n!\n! ----------------------------------------------------------------------\n! You can respond by visiting: \n! https://sourceforge.net/tracker/?func=detail&atid=106556&aid=877956&group_id=6556\n" }, { "path": "Units/parser-fortran.r/byte.f.d/expected.tags", "content": "A\tinput.f\t/^\tBYTE A,/;\"\tv\tprogram:byte_test\nA1\tinput.f\t/^\tBYTE A1,/;\"\tv\tprogram:byte_test\nA2\tinput.f\t/^\tBYTE A2 /;\"\tv\tprogram:byte_test\nB\tinput.f\t/^\tBYTE A, B,/;\"\tv\tprogram:byte_test\nB1\tinput.f\t/^\tBYTE A1, B1,/;\"\tv\tprogram:byte_test\nB2\tinput.f\t/^\tBYTE A2 \\/'x'\\/, B2 /;\"\tv\tprogram:byte_test\nC\tinput.f\t/^\tBYTE A, B, C /;\"\tv\tprogram:byte_test\nC1\tinput.f\t/^\tBYTE A1, B1, C1(/;\"\tv\tprogram:byte_test\nC2\tinput.f\t/^\tBYTE A2 \\/'x'\\/, B2 \\/255\\/, C2(/;\"\tv\tprogram:byte_test\nbyte_test\tinput.f\t/^\tprogram byte_test$/;\"\tp\n" }, { "path": "Units/parser-fortran.r/byte.f.d/input.f", "content": "! Provided by Brian Helsinki, 7 March 2003\n\tprogram byte_test\n\tBYTE A, B, C \n\tBYTE A1, B1, C1(10) \n\tBYTE A2 /'x'/, B2 /255/, C2(10)\n\tEND\n\n" }, { "path": "Units/parser-fortran.r/char-selector.f90.d/expected.tags", "content": "MXDDI\tinput.f90\t/^ INTEGER(4), PRIVATE, PARAMETER :: MXDDI=/;\"\tv\tmodule:OUT_RD5\nOUT_RD5\tinput.f90\t/^ MODULE OUT_RD5$/;\"\tm\nfpshape\tinput.f90\t/^ CHARACTER(1024) :: fpshape$/;\"\tv\tmodule:OUT_RD5\nfpshape2\tinput.f90\t/^ CHARACTER*(1024) :: fpshape2$/;\"\tv\tmodule:OUT_RD5\nlast\tinput.f90\t/^ INTEGER(4), PRIVATE :: last$/;\"\tv\tmodule:OUT_RD5\nlist\tinput.f90\t/^ INTEGER(4), PRIVATE, DIMENSION (MXDDI+1) :: list$/;\"\tv\tmodule:OUT_RD5\nnout\tinput.f90\t/^ INTEGER(4), PRIVATE :: nout$/;\"\tv\tmodule:OUT_RD5\ntemp\tinput.f90\t/^ CHARACTER*(MXPATHLNGTH) temp$/;\"\tv\tmodule:OUT_RD5\ntitles\tinput.f90\t/^ CHARACTER*40 titles(/;\"\tv\tmodule:OUT_RD5\nunits\tinput.f90\t/^ CHARACTER*12 units(/;\"\tv\tmodule:OUT_RD5\n" }, { "path": "Units/parser-fortran.r/char-selector.f90.d/input.f90", "content": "! Test for bug in parsing of char-selector\n MODULE OUT_RD5\n USE inmdmx\n IMPLICIT NONE\n SAVE\n\n CHARACTER*(MXPATHLNGTH) temp\n PRIVATE :: temp\n INTEGER(4), PRIVATE, PARAMETER :: MXDDI=45\n CHARACTER*40 titles(MXDDI)\n PRIVATE :: titles\n CHARACTER*12 units(MXDDI)\n PRIVATE :: units\n INTEGER(4), PRIVATE, DIMENSION (MXDDI+1) :: list\n CHARACTER(1024) :: fpshape\n INTEGER(4), PRIVATE :: nout\n CHARACTER*(1024) :: fpshape2\n INTEGER(4), PRIVATE :: last\n END MODULE OUT_RD5\n" }, { "path": "Units/parser-fortran.r/common-json.f.d/expected.tags-json", "content": "{\"_type\": \"tag\", \"name\": \"common1\", \"path\": \"input.f\", \"pattern\": \"/^ COMMON \\\\/common1\\\\//\", \"kind\": \"common\", \"scope\": \"main\", \"scopeKind\": \"program\"}\n{\"_type\": \"tag\", \"name\": \"common2\", \"path\": \"input.f\", \"pattern\": \"/^ COMMON \\\\/common2\\\\//\", \"kind\": \"common\", \"scope\": \"main\", \"scopeKind\": \"program\"}\n{\"_type\": \"tag\", \"name\": \"common3\", \"path\": \"input.f\", \"pattern\": \"/^ COMMON \\\\/common2\\\\/ c2a (1:3), c2b \\\\/common3\\\\//\", \"kind\": \"common\", \"scope\": \"main\", \"scopeKind\": \"program\"}\n{\"_type\": \"tag\", \"name\": \"main\", \"path\": \"input.f\", \"pattern\": \"/^ PROGRAM main$/\", \"kind\": \"program\"}\n" }, { "path": "Units/parser-fortran.r/common-json.f.d/input.f", "content": " PROGRAM main\n COMMON /common1/ c1a, c1b\n COMMON /common2/ c2a (1:3), c2b /common3/ c3a, c3b\n END\n" }, { "path": "Units/parser-fortran.r/common-xref.f.d/args.ctags", "content": "--_xformat=%-16N %-10K %4n %-16F %P\n" }, { "path": "Units/parser-fortran.r/common-xref.f.d/expected.tags-x", "content": "common1 common 2 input.f /^ COMMON \\/common1\\//\ncommon2 common 3 input.f /^ COMMON \\/common2\\//\ncommon3 common 3 input.f /^ COMMON \\/common2\\/ c2a (1:3), c2b \\/common3\\//\nmain program 1 input.f /^ PROGRAM main$/\n" }, { "path": "Units/parser-fortran.r/common-xref.f.d/input.f", "content": " PROGRAM main\n COMMON /common1/ c1a, c1b\n COMMON /common2/ c2a (1:3), c2b /common3/ c3a, c3b\n END\n" }, { "path": "Units/parser-fortran.r/common.f.d/expected.tags", "content": "common1\tinput.f\t2;\"\tc\tprogram:main\ncommon2\tinput.f\t3;\"\tc\tprogram:main\ncommon3\tinput.f\t3;\"\tc\tprogram:main\nmain\tinput.f\t/^ PROGRAM main$/;\"\tp\n" }, { "path": "Units/parser-fortran.r/common.f.d/input.f", "content": " PROGRAM main\n COMMON /common1/ c1a, c1b\n COMMON /common2/ c2a (1:3), c2b /common3/ c3a, c3b\n END\n" }, { "path": "Units/parser-fortran.r/continuation.f90.d/expected.tags", "content": "para_a\tinput.f90\t/^para_a, & ! para_a /;\"\tv\tmodule:test\npara_b\tinput.f90\t/^para_b, & ! para_b /;\"\tv\tmodule:test\npara_c\tinput.f90\t/^para_c ! para_c /;\"\tv\tmodule:test\ntest\tinput.f90\t/^module test$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/continuation.f90.d/input.f90", "content": "! Problem reported by Jim on 7 Jul 2002\nmodule test\nreal*8 :: &\npara_a, & ! para_a is ...\npara_b, & ! para_b is ...\npara_c ! para_c is ...\n" }, { "path": "Units/parser-fortran.r/debian_432872.f90.d/expected.tags", "content": "FOO\tinput.f90\t/^ subroutine FOO /;\"\ts\tmodule:FOO\nFOO\tinput.f90\t/^module FOO$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/debian_432872.f90.d/input.f90", "content": "! { dg-do compile } \n! PR18923 segfault after subroutine name confusion.\nmodule FOO\ncontains\n subroutine FOO ! { dg-error \"conflicts with PROCEDURE\" }\n character(len=selected_int_kind(0)) :: C ! { dg-error \"data declaration statement\" }\n end subroutine ! { dg-error \"Expecting END MODULE statement\" }\nend ! { dg-warning \"CONTAINS statement without FUNCTION\" }" }, { "path": "Units/parser-fortran.r/dollars-in-names.d/args.ctags", "content": "--sort=no\n--kinds-Fortran=+L\n" }, { "path": "Units/parser-fortran.r/dollars-in-names.d/expected.tags", "content": "name$\tinput.f\t/^ function name$(/;\"\tf\nname$\tinput.f\t/^ integer name\\$$/;\"\tL\tfunction:name$\tfile:\nmain\tinput.f\t/^ program main$/;\"\tp\nret$\tinput.f\t/^ integer ret\\$$/;\"\tv\tprogram:main\n" }, { "path": "Units/parser-fortran.r/dollars-in-names.d/input.f", "content": "C Taken from #4033 submitted by @navinp0304.\n function name$()\n integer name$\n name$ = 42\n end function\n\n program main\n integer ret$\n ret$=name$()\n print *,ret$\n end program\n" }, { "path": "Units/parser-fortran.r/dollars-in-names.d/validator", "content": "fortran+dollar-ok\n" }, { "path": "Units/parser-fortran.r/dopbl2.f.d/expected.tags", "content": "DOPBL2\tinput.f\t/^ DOUBLE PRECISION FUNCTION DOPBL2(/;\"\tf\n" }, { "path": "Units/parser-fortran.r/dopbl2.f.d/input.f", "content": "! Bug reported by Brian Helinski on 4 Feb 2003\n DOUBLE PRECISION FUNCTION DOPBL2( SUBNAM, M, N, KKL, KKU )\n*\n* -- LAPACK timing routine (version 3.0) --\n* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd.,\n* Courant Institute, Argonne National Lab, and Rice University\n* June 30, 1999\n*\n* .. Scalar Arguments ..\n CHARACTER*6 SUBNAM\n INTEGER KKL, KKU, M, N\n* ..\n*\n* Purpose\n* =======\n*\n* DOPBL2 computes an approximation of the number of floating point\n* operations used by a subroutine SUBNAM with the given values\n* of the parameters M, N, KL, and KU.\n*\n* This version counts operations for the Level 2 BLAS.\n*\n* Arguments\n* =========\n*\n* SUBNAM (input) CHARACTER*6\n* The name of the subroutine.\n*\n* M (input) INTEGER\n* The number of rows of the coefficient matrix. M >= 0.\n*\n* N (input) INTEGER\n* The number of columns of the coefficient matrix.\n* If the matrix is square (such as in a solve routine) then\n* N is the number of right hand sides. N >= 0.\n*\n* KKL (input) INTEGER\n* The lower band width of the coefficient matrix.\n* KL is set to max( 0, min( M-1, KKL ) ).\n*\n* KKU (input) INTEGER\n* The upper band width of the coefficient matrix.\n* KU is set to max( 0, min( N-1, KKU ) ).\n*\n* =====================================================================\n*\n* .. Local Scalars ..\n CHARACTER C1\n CHARACTER*2 C2\n CHARACTER*3 C3\n DOUBLE PRECISION ADDS, EK, EM, EN, KL, KU, MULTS\n* ..\n* .. External Functions ..\n LOGICAL LSAME, LSAMEN\n EXTERNAL LSAME, LSAMEN\n* ..\n* .. Intrinsic Functions ..\n INTRINSIC MAX, MIN\n* ..\n* .. Executable Statements ..\n*\n* Quick return if possible\n*\n IF( M.LE.0 .OR. .NOT.( LSAME( SUBNAM, 'S' ) .OR. LSAME( SUBNAM,\n $ 'D' ) .OR. LSAME( SUBNAM, 'C' ) .OR. LSAME( SUBNAM, 'Z' ) ) )\n $ THEN\n DOPBL2 = 0\n RETURN\n END IF\n*\n C1 = SUBNAM( 1: 1 )\n C2 = SUBNAM( 2: 3 )\n C3 = SUBNAM( 4: 6 )\n MULTS = 0\n ADDS = 0\n KL = MAX( 0, MIN( M-1, KKL ) )\n KU = MAX( 0, MIN( N-1, KKU ) )\n EM = M\n EN = N\n EK = KL\n*\n* -------------------------------\n* Matrix-vector multiply routines\n* -------------------------------\n*\n IF( LSAMEN( 3, C3, 'MV ' ) ) THEN\n*\n IF( LSAMEN( 2, C2, 'GE' ) ) THEN\n*\n MULTS = EM*( EN+1.D0 )\n ADDS = EM*EN\n*\n* Assume M <= N + KL and KL < M\n* N <= M + KU and KU < N\n* so that the zero sections are triangles.\n*\n ELSE IF( LSAMEN( 2, C2, 'GB' ) ) THEN\n*\n MULTS = EM*( EN+1.D0 ) - ( EM-1.D0-KL )*( EM-KL ) / 2.D0 -\n $ ( EN-1.D0-KU )*( EN-KU ) / 2.D0\n ADDS = EM*( EN+1.D0 ) - ( EM-1.D0-KL )*( EM-KL ) / 2.D0 -\n $ ( EN-1.D0-KU )*( EN-KU ) / 2.D0\n*\n ELSE IF( LSAMEN( 2, C2, 'SY' ) .OR. LSAMEN( 2, C2, 'SP' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHP' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHP' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 )\n ADDS = EM*EM\n*\n ELSE IF( LSAMEN( 2, C2, 'SB' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHB' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHB' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 ) - ( EM-1.D0-EK )*( EM-EK )\n ADDS = EM*EM - ( EM-1.D0-EK )*( EM-EK )\n*\n ELSE IF( LSAMEN( 2, C2, 'TR' ) .OR. LSAMEN( 2, C2, 'TP' ) )\n $ THEN\n*\n MULTS = EM*( EM+1.D0 ) / 2.D0\n ADDS = ( EM-1.D0 )*EM / 2.D0\n*\n ELSE IF( LSAMEN( 2, C2, 'TB' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 ) / 2.D0 -\n $ ( EM-EK-1.D0 )*( EM-EK ) / 2.D0\n ADDS = ( EM-1.D0 )*EM / 2.D0 -\n $ ( EM-EK-1.D0 )*( EM-EK ) / 2.D0\n*\n END IF\n*\n* ---------------------\n* Matrix solve routines\n* ---------------------\n*\n ELSE IF( LSAMEN( 3, C3, 'SV ' ) ) THEN\n*\n IF( LSAMEN( 2, C2, 'TR' ) .OR. LSAMEN( 2, C2, 'TP' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 ) / 2.D0\n ADDS = ( EM-1.D0 )*EM / 2.D0\n*\n ELSE IF( LSAMEN( 2, C2, 'TB' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 ) / 2.D0 -\n $ ( EM-EK-1.D0 )*( EM-EK ) / 2.D0\n ADDS = ( EM-1.D0 )*EM / 2.D0 -\n $ ( EM-EK-1.D0 )*( EM-EK ) / 2.D0\n*\n END IF\n*\n* ----------------\n* Rank-one updates\n* ----------------\n*\n ELSE IF( LSAMEN( 3, C3, 'R ' ) ) THEN\n*\n IF( LSAMEN( 3, SUBNAM, 'SGE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'DGE' ) ) THEN\n*\n MULTS = EM*EN + MIN( EM, EN )\n ADDS = EM*EN\n*\n ELSE IF( LSAMEN( 2, C2, 'SY' ) .OR. LSAMEN( 2, C2, 'SP' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHP' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHP' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 ) / 2.D0 + EM\n ADDS = EM*( EM+1.D0 ) / 2.D0\n*\n END IF\n*\n ELSE IF( LSAMEN( 3, C3, 'RC ' ) .OR. LSAMEN( 3, C3, 'RU ' ) ) THEN\n*\n IF( LSAMEN( 3, SUBNAM, 'CGE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZGE' ) ) THEN\n*\n MULTS = EM*EN + MIN( EM, EN )\n ADDS = EM*EN\n*\n END IF\n*\n* ----------------\n* Rank-two updates\n* ----------------\n*\n ELSE IF( LSAMEN( 3, C3, 'R2 ' ) ) THEN\n IF( LSAMEN( 2, C2, 'SY' ) .OR. LSAMEN( 2, C2, 'SP' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'CHP' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHE' ) .OR.\n $ LSAMEN( 3, SUBNAM, 'ZHP' ) ) THEN\n*\n MULTS = EM*( EM+1.D0 ) + 2.D0*EM\n ADDS = EM*( EM+1.D0 )\n*\n END IF\n END IF\n*\n* ------------------------------------------------\n* Compute the total number of operations.\n* For real and double precision routines, count\n* 1 for each multiply and 1 for each add.\n* For complex and complex*16 routines, count\n* 6 for each multiply and 2 for each add.\n* ------------------------------------------------\n*\n IF( LSAME( C1, 'S' ) .OR. LSAME( C1, 'D' ) ) THEN\n*\n DOPBL2 = MULTS + ADDS\n*\n ELSE\n*\n DOPBL2 = 6*MULTS + 2*ADDS\n*\n END IF\n*\n RETURN\n*\n* End of DOPBL2\n*\n END\n" }, { "path": "Units/parser-fortran.r/fortran-abstract-implementation.d/args.ctags", "content": "--fields=+m\n" }, { "path": "Units/parser-fortran.r/fortran-abstract-implementation.d/expected.tags", "content": "list_type\tinput.f90\t/^ type, abstract :: list_type$/;\"\tt\tmodule:test_implementation\timplementation:abstract\ntest_implementation\tinput.f90\t/^module test_implementation$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-abstract-implementation.d/input.f90", "content": "module test_implementation\n type, abstract :: list_type\n end type list_type\nend module test_implementation\n" }, { "path": "Units/parser-fortran.r/fortran-abstract-interface.d/args.ctags", "content": "--kinds-Fortran=+PL\n" }, { "path": "Units/parser-fortran.r/fortran-abstract-interface.d/expected.tags", "content": "__anonadfcf4320105\tinput.f90\t/^ abstract interface$/;\"\ti\tmodule:test\nadd\tinput.f90\t/^ procedure(suba), deferred :: add$/;\"\tM\ttype:atype\natype\tinput.f90\t/^ type, abstract :: atype$/;\"\tt\tmodule:test\nb\tinput.f90\t/^ class(atype) :: self, b$/;\"\tL\tprototype:suba\tfile:\nbtype\tinput.f90\t/^ type, abstract, extends(atype) :: btype$/;\"\tt\tmodule:test\nc\tinput.f90\t/^ integer c,/;\"\tL\tprototype:suba\tfile:\nd\tinput.f90\t/^ integer c, d$/;\"\tL\tprototype:suba\tfile:\nself\tinput.f90\t/^ class(atype) :: self,/;\"\tL\tprototype:suba\tfile:\nsuba\tinput.f90\t/^ subroutine suba(/;\"\tP\tinterface:__anonadfcf4320105\ntest\tinput.f90\t/^module test$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-abstract-interface.d/input.f90", "content": "module test\n\n type, abstract :: atype\n contains\n procedure(suba), deferred :: add\n end type\n type, abstract, extends(atype) :: btype\n end type\n\n abstract interface\n subroutine suba(self, b)\n use, intrinsic :: iso_c_binding\n import :: atype\n import btype\n implicit none\n integer c, d\n class(atype) :: self, b\n end subroutine\n end interface\n\nend module test\n" }, { "path": "Units/parser-fortran.r/fortran-associate.d/expected.tags", "content": "a\tinput.f90\t/^ real :: a$/;\"\tv\tmodule:with_associate\ndo_other_stuff\tinput.f90\t/^ subroutine do_other_stuff(/;\"\ts\tmodule:with_associate\ndo_stuff\tinput.f90\t/^ function do_stuff(/;\"\tf\tmodule:with_associate\nwith_associate\tinput.f90\t/^module with_associate$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-associate.d/input.f90", "content": "module with_associate\n real :: a\n\ncontains\n\n function do_stuff(a) result(c)\n real, intent(in) :: a\n\n associate (b => a)\n c = b\n end associate\n end function do_stuff\n\n subroutine do_other_stuff(a)\n real, intent(in out) :: a\n\n a = 2 * a\n end subroutine do_other_stuff\n\nend module with_associate\n" }, { "path": "Units/parser-fortran.r/fortran-bind-c.d/args.ctags", "content": "--kinds-Fortran=+P\n" }, { "path": "Units/parser-fortran.r/fortran-bind-c.d/expected.tags", "content": "__anon73f11bcd0105\tinput.f90\t/^ interface$/;\"\ti\tmodule:test_bind_c\na\tinput.f90\t/^ real(c_double) :: a$/;\"\tk\ttype:atype\natype\tinput.f90\t/^ type, bind(c) :: atype$/;\"\tt\tmodule:test_bind_c\nglobal_flag\tinput.f90\t/^ integer(C_INT), bind(C, name=\"_MyProject_flags\") :: global_flag$/;\"\tv\tmodule:test_bind_c\nprint_c\tinput.f90\t/^ subroutine print_c(/;\"\tP\tinterface:__anon73f11bcd0105\ntest_bind_c\tinput.f90\t/^module test_bind_c$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-bind-c.d/input.f90", "content": "! See https://gcc.gnu.org/onlinedocs/gfortran/Interoperability-with-C.html\nmodule test_bind_c\n use iso_c_binding\n\n ! test derived type\n type, bind(c) :: atype\n real(c_double) :: a\n end type atype\n ! this is\n ! struct {\n ! double a;\n ! } atype;\n ! in C language\n\n ! test interoperable global variable\n integer(C_INT), bind(C, name=\"_MyProject_flags\") :: global_flag\n\n ! test Interoperable Subroutines and Functions\n interface\n subroutine print_c(string) bind(C, name=\"print_C\")\n use iso_c_binding, only: c_char\n character(kind=c_char) :: string(*)\n end subroutine print_c\n end interface\nend module test_bind_c\n" }, { "path": "Units/parser-fortran.r/fortran-block.d/expected.tags", "content": "suba\tinput.f90\t/^ SUBROUTINE suba(/;\"\ts\tmodule:test_block\nsubb\tinput.f90\t/^ subroutine subb$/;\"\ts\tmodule:test_block\ntest_block\tinput.f90\t/^module test_block$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-block.d/input.f90", "content": "module test_block\n\ncontains\n\n SUBROUTINE suba()\n INTEGER :: a\n \n a = 5\n BLOCK\n INTEGER :: b\n b = a + 2\n END BLOCK\n END SUBROUTINE\n\n subroutine subb\n \n end subroutine\n\nend module test_block\n" }, { "path": "Units/parser-fortran.r/fortran-derived-type-params.d/args.ctags", "content": "--fields=+m\n" }, { "path": "Units/parser-fortran.r/fortran-derived-type-params.d/expected.tags", "content": "Members\tinput.f90\t/^module Members$/;\"\tm\nMySubroutine\tinput.f90\t/^ subroutine MySubroutine(/;\"\ts\tmodule:Members\ncoordinates\tinput.f90\t/^ REAL :: coordinates(/;\"\tk\ttype:general_point\nd\tinput.f90\t/^ INTEGER(selected_int_kind(12)), LEN :: d$/;\"\tk\ttype:humongous_matrix\ndim\tinput.f90\t/^ INTEGER, KIND :: dim$/;\"\tk\ttype:general_point\nelement\tinput.f90\t/^ REAL(k) :: element(/;\"\tk\ttype:humongous_matrix\ngeneral_point\tinput.f90\t/^ TYPE general_point(/;\"\tt\tmodule:Members\nhumongous_matrix\tinput.f90\t/^ TYPE humongous_matrix(/;\"\tt\tmodule:Members\nk\tinput.f90\t/^ INTEGER, KIND :: k = ki/;\"\tk\ttype:humongous_matrix\n" }, { "path": "Units/parser-fortran.r/fortran-derived-type-params.d/input.f90", "content": "module Members\n implicit none\n\n TYPE humongous_matrix(k, d)\n !-- Derived-type parameters\n INTEGER, KIND :: k = kind(0.0)\n INTEGER(selected_int_kind(12)), LEN :: d\n REAL(k) :: element(d,d)\n END TYPE\n\n TYPE general_point(dim)\n INTEGER, KIND :: dim\n REAL :: coordinates(dim)\n END TYPE\n\ncontains\n\n subroutine MySubroutine(arg)\n ! ...\n end subroutine MySubroutine\n\nend module Members\n" }, { "path": "Units/parser-fortran.r/fortran-enum.d/expected.tags", "content": "Constants\tinput.f90\t/^module Constants$/;\"\tm\nE_e\tinput.f90\t/^ real, parameter :: E_e /;\"\tv\tmodule:Constants\nNamed1\tinput.f90\t/^ enum :: Named1$/;\"\tE\tmodule:Constants\nNamed2\tinput.f90\t/^ enum Named2$/;\"\tE\tmodule:Constants\nNamed3\tinput.f90\t/^ enum(8) Named3$/;\"\tE\tmodule:Constants\nNamed4\tinput.f90\t/^ enum*8 Named4$/;\"\tE\tmodule:Constants\nNamed5\tinput.f90\t/^ enum(8) :: Named5$/;\"\tE\tmodule:Constants\nNamed6\tinput.f90\t/^ enum*8 :: Named6$/;\"\tE\tmodule:Constants\nNamed7\tinput.f90\t/^ enum, bind(c) :: Named7$/;\"\tE\tmodule:Constants\n__anoncfbded350103\tinput.f90\t/^ enum, bind(c) ! unnamed 1$/;\"\tE\tmodule:Constants\n__anoncfbded350203\tinput.f90\t/^ enum ! unnamed 2$/;\"\tE\tmodule:Constants\na\tinput.f90\t/^ enumerator :: a,/;\"\tN\tenum:__anoncfbded350203\nb\tinput.f90\t/^ enumerator :: a, b,/;\"\tN\tenum:__anoncfbded350203\nblack\tinput.f90\t/^ enumerator :: red =1, blue, black /;\"\tN\tenum:__anoncfbded350103\nblue\tinput.f90\t/^ enumerator :: red =1, blue,/;\"\tN\tenum:__anoncfbded350103\nbronze\tinput.f90\t/^ enumerator gold, silver, bronze$/;\"\tN\tenum:__anoncfbded350103\nc\tinput.f90\t/^ enumerator :: a, b, c$/;\"\tN\tenum:__anoncfbded350203\ngold\tinput.f90\t/^ enumerator gold,/;\"\tN\tenum:__anoncfbded350103\nhc\tinput.f90\t/^ real, parameter :: hc /;\"\tv\tmodule:Constants\nlavender\tinput.f90\t/^ enumerator :: pink, lavender$/;\"\tN\tenum:__anoncfbded350103\npi\tinput.f90\t/^ real, parameter :: pi /;\"\tv\tmodule:Constants\npink\tinput.f90\t/^ enumerator :: pink,/;\"\tN\tenum:__anoncfbded350103\npurple\tinput.f90\t/^ enumerator :: purple$/;\"\tN\tenum:__anoncfbded350103\nred\tinput.f90\t/^ enumerator :: red /;\"\tN\tenum:__anoncfbded350103\nsilver\tinput.f90\t/^ enumerator gold, silver,/;\"\tN\tenum:__anoncfbded350103\nx1\tinput.f90\t/^ enumerator :: x1,/;\"\tN\tenum:Named1\nx2\tinput.f90\t/^ enumerator :: x2,/;\"\tN\tenum:Named2\nx3\tinput.f90\t/^ enumerator :: x3,/;\"\tN\tenum:Named3\nx4\tinput.f90\t/^ enumerator :: x4,/;\"\tN\tenum:Named4\nx5\tinput.f90\t/^ enumerator :: x5,/;\"\tN\tenum:Named5\nx6\tinput.f90\t/^ enumerator :: x6,/;\"\tN\tenum:Named6\nx7\tinput.f90\t/^ enumerator :: x7,/;\"\tN\tenum:Named7\ny1\tinput.f90\t/^ enumerator :: x1, y1,/;\"\tN\tenum:Named1\ny2\tinput.f90\t/^ enumerator :: x2, y2,/;\"\tN\tenum:Named2\ny3\tinput.f90\t/^ enumerator :: x3, y3,/;\"\tN\tenum:Named3\ny4\tinput.f90\t/^ enumerator :: x4, y4,/;\"\tN\tenum:Named4\ny5\tinput.f90\t/^ enumerator :: x5, y5,/;\"\tN\tenum:Named5\ny6\tinput.f90\t/^ enumerator :: x6, y6,/;\"\tN\tenum:Named6\ny7\tinput.f90\t/^ enumerator :: x7, y7,/;\"\tN\tenum:Named7\nyellow\tinput.f90\t/^ enumerator yellow$/;\"\tN\tenum:__anoncfbded350103\nz1\tinput.f90\t/^ enumerator :: x1, y1, z1$/;\"\tN\tenum:Named1\nz2\tinput.f90\t/^ enumerator :: x2, y2, z2$/;\"\tN\tenum:Named2\nz3\tinput.f90\t/^ enumerator :: x3, y3, z3$/;\"\tN\tenum:Named3\nz4\tinput.f90\t/^ enumerator :: x4, y4, z4$/;\"\tN\tenum:Named4\nz5\tinput.f90\t/^ enumerator :: x5, y5, z5$/;\"\tN\tenum:Named5\nz6\tinput.f90\t/^ enumerator :: x6, y6, z6$/;\"\tN\tenum:Named6\nz7\tinput.f90\t/^ enumerator :: x7, y7, z7$/;\"\tN\tenum:Named7\n" }, { "path": "Units/parser-fortran.r/fortran-enum.d/input.f90", "content": "module Constants\n implicit none\n\n real, parameter :: pi = 4 * atan(1.0)\n real, parameter :: E_e = 510998.91013\n\n ! we now have enumerators in F2003/8, for the sake of interop with C\n enum, bind(c) ! unnamed 1\n enumerator :: red =1, blue, black =5\n enumerator yellow\n enumerator gold, silver, bronze\n enumerator :: purple\n enumerator :: pink, lavender\n end enum\n\n enum ! unnamed 2\n enumerator :: a, b, c\n end enum\n\n enum :: Named1\n enumerator :: x1, y1, z1\n end enum\n\n enum Named2\n enumerator :: x2, y2, z2\n end enum\n\n enum(8) Named3\n enumerator :: x3, y3, z3\n end enum\n\n enum*8 Named4\n enumerator :: x4, y4, z4\n end enum\n\n enum(8) :: Named5\n enumerator :: x5, y5, z5\n end enum\n\n enum*8 :: Named6\n enumerator :: x6, y6, z6\n end enum\n\n enum, bind(c) :: Named7\n enumerator :: x7, y7, z7\n end enum\n\n real, parameter :: hc = 12398.4193\n\n public\n\nend module Constants\n" }, { "path": "Units/parser-fortran.r/fortran-extends-qualifier.d/args.ctags", "content": "--fields=+i\n" }, { "path": "Units/parser-fortran.r/fortran-extends-qualifier.d/expected.tags", "content": "color\tinput.f90\t/^ integer :: color$/;\"\tk\ttype:shape\nfilled\tinput.f90\t/^ logical :: filled$/;\"\tk\ttype:shape\nlength\tinput.f90\t/^ integer :: length$/;\"\tk\ttype:rectangle\nrectangle\tinput.f90\t/^ type, extends(shape) :: rectangle$/;\"\tt\tmodule:test_extends\tinherits:shape\nshape\tinput.f90\t/^ type shape$/;\"\tt\tmodule:test_extends\ntest_extends\tinput.f90\t/^module test_extends$/;\"\tm\nwidth\tinput.f90\t/^ integer :: width$/;\"\tk\ttype:rectangle\nx\tinput.f90\t/^ integer :: x$/;\"\tk\ttype:shape\ny\tinput.f90\t/^ integer :: y$/;\"\tk\ttype:shape\n" }, { "path": "Units/parser-fortran.r/fortran-extends-qualifier.d/input.f90", "content": "module test_extends\n type shape\n integer :: color\n logical :: filled\n integer :: x\n integer :: y\n end type shape\n type, extends(shape) :: rectangle\n integer :: length\n integer :: width\n end type rectangle\nend module test_extends\n" }, { "path": "Units/parser-fortran.r/fortran-forall.d/expected.tags", "content": "a\tinput.f90\t/^ real :: a$/;\"\tv\tmodule:with_forall\nsub_with_forall\tinput.f90\t/^ subroutine sub_with_forall(/;\"\ts\tmodule:with_forall\ntwo\tinput.f90\t/^ function two(/;\"\tf\tmodule:with_forall\nwith_forall\tinput.f90\t/^module with_forall$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-forall.d/input.f90", "content": "! a module that uses a forall block\n\nmodule with_forall\n\n real :: a\n\ncontains\n\n subroutine sub_with_forall(x)\n real, intent(inout) :: x(:)\n\n integer :: i\n\n forall(i=1:size(x))\n x(i) = 0.5**i\n end forall\n end subroutine sub_with_forall\n\n\n function two() result(res)\n real :: res\n\n res = 2.0\n end function two\n\nend module with_forall\n" }, { "path": "Units/parser-fortran.r/fortran-interface.d/args.ctags", "content": "--kinds-Fortran=+P\n" }, { "path": "Units/parser-fortran.r/fortran-interface.d/expected.tags", "content": "+\tinput.f90\t/^ interface operator(+)/;\"\ti\tmodule:test_interface\n__anon502b83b10105\tinput.f90\t/^ interface ! anonymous interface$/;\"\ti\tmodule:test_interface\nadd\tinput.f90\t/^ type(atype) function add(/;\"\tP\tmodule:test_interface\natype\tinput.f90\t/^ type atype$/;\"\tt\tmodule:test_interface\nget\tinput.f90\t/^ interface get$/;\"\ti\tmodule:test_interface\nget_1d\tinput.f90\t/^ subroutine get_1d(/;\"\ts\tmodule:test_interface\nget_2d\tinput.f90\t/^ subroutine get_2d(/;\"\ts\tmodule:test_interface\nsuba\tinput.f90\t/^ subroutine suba(/;\"\tP\tinterface:__anon502b83b10105\nsubb\tinput.f90\t/^ subroutine subb(/;\"\tP\tinterface:__anon502b83b10105\ntest_interface\tinput.f90\t/^module test_interface$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-interface.d/input.f90", "content": "module test_interface\n type atype\n end type atype\n ! operator overload\n interface operator(+)\n ! subprogram prototype\n type(atype) function add(a, b)\n import atype\n type(atype), intent(in) :: a, b\n end function add\n end interface operator(+)\n ! wrap subprogram prototypes\n interface ! anonymous interface\n subroutine suba()\n end subroutine suba\n subroutine subb()\n end subroutine subb\n end interface\n ! define generic subprograms\n interface get\n ! subprogram name list\n module procedure get_1d\n module procedure get_2d\n end interface get\ncontains\n ! definition of subprograms\n subroutine get_1d(a)\n real a(:)\n end subroutine get_1d\n subroutine get_2d(a)\n real a(:, :)\n end subroutine get_2d\nend module test_interface\n" }, { "path": "Units/parser-fortran.r/fortran-linkname.d/args.ctags", "content": "--sort=no\n--extras-Fortran={linkName}\n--fields=+{extras}\n" }, { "path": "Units/parser-fortran.r/fortran-linkname.d/expected.tags", "content": "my_mod\tinput.f\t/^ module my_mod$/;\"\tm\n__anon9b9a88660103\tinput.f\t/^ enumerator :: my_constr = 1, my_second_constr = 4$/;\"\tE\tmodule:my_mod\textras:anonymous\nmy_constr\tinput.f\t/^ enumerator :: my_constr /;\"\tN\tenum:__anon9b9a88660103\nmy_second_constr\tinput.f\t/^ enumerator :: my_constr = 1, my_second_constr /;\"\tN\tenum:__anon9b9a88660103\nmy_type\tinput.f\t/^ type my_type$/;\"\tt\tmodule:my_mod\na\tinput.f\t/^ integer a$/;\"\tk\ttype:my_type\nb\tinput.f\t/^ integer b$/;\"\tk\ttype:my_type\nc\tinput.f\t/^ integer c$/;\"\tk\ttype:my_type\nmy_proc\tinput.f\t/^ procedure :: my_proc /;\"\tM\ttype:my_type\nmy_sequence_type\tinput.f\t/^ type my_sequence_type$/;\"\tt\tmodule:my_mod\na\tinput.f\t/^ integer a$/;\"\tk\ttype:my_sequence_type\nb\tinput.f\t/^ integer b$/;\"\tk\ttype:my_sequence_type\nmy_mod_type\tinput.f\t/^ type(my_sequence_type) :: my_mod_type$/;\"\tv\tmodule:my_mod\nmy_mod_common\tinput.f\t23;\"\tc\tmodule:my_mod\nmy_mod_common_\tinput.f\t23;\"\tc\tmodule:my_mod\textras:linkName\nmy_func\tinput.f\t/^ function my_func(/;\"\tf\tmodule:my_mod\nmy_func_\tinput.f\t/^ function my_func(x)$/;\"\tf\tmodule:my_mod\textras:linkName\nmy_block\tinput.f\t/^ block data my_block$/;\"\tb\nmy_block_\tinput.f\t/^ block data my_block$/;\"\tb\textras:linkName\nmy_var\tinput.f\t/^ integer my_var$/;\"\tv\tblockData:my_block\nmy_common\tinput.f\t40;\"\tc\tblockData:my_block\nmy_common_\tinput.f\t40;\"\tc\tblockData:my_block\textras:linkName\nmy_subr\tinput.f\t/^ subroutine my_subr$/;\"\ts\nmy_subr_\tinput.f\t/^ subroutine my_subr$/;\"\ts\textras:linkName\nmy_entry\tinput.f\t/^ entry my_entry$/;\"\te\tsubroutine:my_subr\nmy_entry_\tinput.f\t/^ entry my_entry$/;\"\te\tsubroutine:my_subr\textras:linkName\nmy_main\tinput.f\t/^ program my_main$/;\"\tp\nmy_interface\tinput.f\t/^ interface my_interface$/;\"\ti\tprogram:my_main\nmy_var\tinput.f\t/^ integer my_var$/;\"\tv\tprogram:my_main\nmy_namelist\tinput.f\t/^ namelist \\/my_namelist\\//;\"\tn\tprogram:my_main\nmy_conc_type\tinput.f\t/^ type(my_type) :: my_conc_type$/;\"\tv\tprogram:my_main\nmy_common\tinput.f\t64;\"\tc\tprogram:my_main\nmy_common_\tinput.f\t64;\"\tc\tprogram:my_main\textras:linkName\n" }, { "path": "Units/parser-fortran.r/fortran-linkname.d/input.f", "content": " module my_mod\n\n enum, bind(c)\n enumerator :: my_constr = 1, my_second_constr = 4\n end enum\n\n type my_type\n integer a\n integer b\n integer c\n contains\n procedure :: my_proc => my_func\n end type my_type\n\n type my_sequence_type\n sequence\n integer a\n integer b\n end type\n\n type(my_sequence_type) :: my_mod_type\n\n common /my_mod_common/ my_mod_type\n\n contains\n\n function my_func(x)\n class(my_type), intent(in) :: x\n my_func = x%a\n return\n my_func = 2\n return\n end function my_func\n\n\n end module\n\n block data my_block\n integer my_var\n common /my_common/ my_var\n data my_var/123/\n end\n\n subroutine my_subr\n use my_mod\n integer :: my_enum = my_constr\n print *, my_enum\n return\n entry my_entry\n print *, \"an entry!\"\n end subroutine my_subr\n\n\n program my_main\n use my_mod\n interface my_interface\n subroutine my_subr()\n end subroutine my_subr\n end interface\n\n integer my_var\n namelist /my_namelist/ my_var\n type(my_type) :: my_conc_type\n common /my_common/ my_var\n call my_subr()\n print *, my_conc_type%my_proc()\n end program my_main\n" }, { "path": "Units/parser-fortran.r/fortran-method.d/args.ctags", "content": "--fields=+m\n" }, { "path": "Units/parser-fortran.r/fortran-method.d/expected.tags", "content": "+\tinput.f90\t/^ generic :: operator(+)/;\"\tM\ttype:atype\n=\tinput.f90\t/^ generic :: assignment(=) =>/;\"\tM\ttype:atype\nadd\tinput.f90\t/^ generic :: add => add_/;\"\tM\ttype:atype\nadd_1d\tinput.f90\t/^ procedure, deferred :: add_1d,/;\"\tM\ttype:atype\timplementation:deferred\nadd_2d\tinput.f90\t/^ procedure, deferred :: add_1d, add_2d,/;\"\tM\ttype:atype\timplementation:deferred\nadd_3d\tinput.f90\t/^ procedure, deferred :: add_1d, add_2d, add_3d$/;\"\tM\ttype:atype\timplementation:deferred\nadd_4d\tinput.f90\t/^ procedure, non_overridable :: add_4d$/;\"\tM\ttype:atype\timplementation:non_overridable\natype\tinput.f90\t/^ type :: atype$/;\"\tt\tmodule:test_method\nclean\tinput.f90\t/^ final clean$/;\"\tM\ttype:atype\ntest_method\tinput.f90\t/^module test_method$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-method.d/input.f90", "content": "module test_method\n type :: atype\n contains\n generic :: add => add_1d, &\n add_2d, &\n add_3d\n generic :: operator(+) => add_1d, add_2d\n generic :: assignment(=) => assigns\n procedure, deferred :: add_1d, add_2d, add_3d\n procedure, non_overridable :: add_4d\n final clean\n end type atype\nend module test_method\n" }, { "path": "Units/parser-fortran.r/fortran-pointer.d/expected.tags", "content": "Main\tinput.f90\t/^program Main$/;\"\tp\nMyOtherProc\tinput.f90\t/^ MyOtherProc /;\"\tv\tmodule:Test\nMyProc\tinput.f90\t/^ procedure(ProcOne), pointer :: MyProc /;\"\tv\tmodule:Test\nProcOne\tinput.f90\t/^ function ProcOne(/;\"\tf\tmodule:Test\nProcPointOne\tinput.f90\t/^ procedure(:), pointer :: ProcPointOne /;\"\tv\tprogram:Main\nProcPointTwo\tinput.f90\t/^ => null(), ProcPointTwo /;\"\tv\tprogram:Main\nProcTwo\tinput.f90\t/^ function ProcTwo(/;\"\tf\tmodule:Test\nTest\tinput.f90\t/^module Test$/;\"\tm\nmyparameter\tinput.f90\t/^ real, parameter :: myparameter$/;\"\tv\tmodule:Test\nvariable\tinput.f90\t/^ real :: variable, variable_/;\"\tv\tprogram:Main\nvariable_three\tinput.f90\t/^ integer :: variable_three$/;\"\tv\tprogram:Main\nvariable_two\tinput.f90\t/^ real :: variable, variable_two$/;\"\tv\tprogram:Main\n" }, { "path": "Units/parser-fortran.r/fortran-pointer.d/input.f90", "content": "module Test\n implicit none\n\n procedure(ProcOne), pointer :: MyProc => null(), &\n MyOtherProc => ProcTwo\n real, parameter :: myparameter\n\ncontains\n\n function ProcOne(arg1, optformat)\n ! not relevant\n end function ProcOne\n\n function ProcTwo(arg1, optformat)\n ! not relevant\n end function ProcTwo\n\nend module Test\n\nprogram Main\n implicit none\n\n ! deliberately break up the line to make sure the tagparser doesn't choke on awkward cases\n procedure(:), pointer :: ProcPointOne &\n => null(), ProcPointTwo => &\n null()\n real :: variable, variable_two\n integer :: variable_three\n\n ProcPointOne => ProcTwo\n\nend program Main\n" }, { "path": "Units/parser-fortran.r/fortran-procedure-qualifiers.d/expected.tags", "content": "add\tinput.f90\t/^ procedure, pass :: add$/;\"\tM\ttype:atype\nappend\tinput.f90\t/^ procedure, pass(self) :: append$/;\"\tM\ttype:atype\natype\tinput.f90\t/^ type atype$/;\"\tt\tmodule:test\nlist\tinput.f90\t/^ procedure, deferred :: list$/;\"\tM\ttype:atype\nprint\tinput.f90\t/^ procedure, nopass :: print$/;\"\tM\ttype:atype\ntest\tinput.f90\t/^module test$/;\"\tm\nwrite\tinput.f90\t/^ procedure, non_overridable :: write$/;\"\tM\ttype:atype\n" }, { "path": "Units/parser-fortran.r/fortran-procedure-qualifiers.d/input.f90", "content": "module test\n type atype\n contains\n procedure, pass :: add\n procedure, pass(self) :: append\n procedure, nopass :: print\n procedure, non_overridable :: write\n procedure, deferred :: list\n end type atype\nend module test\n" }, { "path": "Units/parser-fortran.r/fortran-procedure.d/expected.tags", "content": "a\tinput.f90\t/^ real :: a$/;\"\tv\tmodule:proc_pointer\nmy_pointer\tinput.f90\t/^ procedure(sub), pointer :: my_pointer$/;\"\tv\tmodule:proc_pointer\nproc_pointer\tinput.f90\t/^module proc_pointer$/;\"\tm\nsub\tinput.f90\t/^ subroutine sub(/;\"\ts\tmodule:proc_pointer\n" }, { "path": "Units/parser-fortran.r/fortran-procedure.d/input.f90", "content": "! a module that uses procedure pointer\nmodule proc_pointer\n\n real :: a\n procedure(sub), pointer :: my_pointer\n\ncontains\n\n subroutine sub(x)\n real, intent(inout) :: x(:)\n\n integer :: i\n\n do i=1,size(x)\n x(i) = 0.5**i\n end do\n end subroutine sub\n\nend module proc_pointer\n" }, { "path": "Units/parser-fortran.r/fortran-protected.d/expected.tags", "content": "i\tinput.f90\t/^ integer, public, protected :: i$/;\"\tv\tmodule:test_implementation\ntest_implementation\tinput.f90\t/^module test_implementation$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-protected.d/input.f90", "content": "module test_implementation\n integer, public, protected :: i\nend module test_implementation\n" }, { "path": "Units/parser-fortran.r/fortran-signature.d/args.ctags", "content": "--fields=+S \n--kinds-Fortran=+LP\n" }, { "path": "Units/parser-fortran.r/fortran-signature.d/expected.tags", "content": "__anon06616a720105\tinput.f90\t/^ interface$/;\"\ti\tmodule:test_signature\na\tinput.f90\t/^ integer :: a$/;\"\tL\tsubroutine:fnb\tfile:\na\tinput.f90\t/^ integer a,/;\"\tL\tsubroutine:suba\tfile:\narg\tinput.f90\t/^ type(atype) :: arg$/;\"\tL\tprototype:subb\tfile:\nb\tinput.f90\t/^ integer a, b$/;\"\tL\tsubroutine:suba\tfile:\nfna\tinput.f90\t/^ real function fna(/;\"\tf\tmodule:test_signature\nfnb\tinput.f90\t/^ subroutine fnb$/;\"\ts\tmodule:test_signature\nsuba\tinput.f90\t/^ subroutine suba /;\"\ts\tmodule:test_signature\tsignature:(a, b)\nsubb\tinput.f90\t/^ subroutine subb /;\"\tP\tinterface:__anon06616a720105\tsignature:(arg)\ntest_signature\tinput.f90\t/^module test_signature$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/fortran-signature.d/input.f90", "content": "module test_signature\n\n interface\n subroutine subb (arg)\n type(atype) :: arg\n end subroutine\n end interface\n \ncontains\n subroutine suba &\n (a, &\n ! comment\n b)\n integer a, b\n end subroutine\n\n real function fna()\n use, intrinsic :: iso_c_binding\n end function\n\n subroutine fnb\n integer :: a\n end subroutine\n\nend module test_signature\n" }, { "path": "Units/parser-fortran.r/fortran-square-parens.d/expected.tags", "content": "Symmetry\tinput.f90\t/^ type Symmetry$/;\"\tt\tmodule:squaretest\nassignee\tinput.f90\t/^ real, allocatable :: assignee[/;\"\tv\tmodule:squaretest\nexecute\tinput.f90\t/^ subroutine execute(/;\"\ts\tmodule:squaretest\ninvisible\tinput.f90\t/^ integer :: invisible$/;\"\tv\tmodule:squaretest\ninvisible_four\tinput.f90\t/^ integer :: invisible_four$/;\"\tv\tmodule:squaretest\ninvisible_three\tinput.f90\t/^ integer :: invisible_three$/;\"\tv\tmodule:squaretest\ninvisible_two\tinput.f90\t/^ integer :: invisible_two$/;\"\tv\tmodule:squaretest\niterations\tinput.f90\t/^ integer :: matrix(3,3), iterations$/;\"\tk\ttype:Symmetry\nmain\tinput.f90\t/^program main$/;\"\tp\nmatrix\tinput.f90\t/^ integer :: matrix(/;\"\tk\ttype:Symmetry\nsquaretest\tinput.f90\t/^module squaretest$/;\"\tm\nstate\tinput.f90\t/^ real, allocatable :: state(/;\"\tv\tmodule:squaretest\nstate_two\tinput.f90\t/^ real, intent(in), allocatable, dimension(:), codimension[:] :: state_two$/;\"\tv\tmodule:squaretest\nsymmetries\tinput.f90\t/^ type(Symmetry), parameter :: symmetries(/;\"\tv\tmodule:squaretest\n" }, { "path": "Units/parser-fortran.r/fortran-square-parens.d/input.f90", "content": "module squaretest\n implicit none\n\n type Symmetry\n integer :: matrix(3,3), iterations\n end type Symmetry\n\n\n ! make sure F2003 '[]' arrays don't break the symbol list\n type(Symmetry), parameter :: symmetries(14) = &\n [ Symmetry(reshape([1,0,0, 0,1,0, 0,0,1], [3,3]),1), &\n Symmetry(reshape([1,0,0, 0,0,1, 0,-1,0],[3,3]),3), &\n Symmetry(reshape([0,0,-1, 0,1,0, 1,0,0], [3,3]),3) ]\n integer :: invisible\n\n ! make sure coarray syntax doesn't break the symbol list\n real, allocatable :: state(:)[:]\n integer :: invisible_two\n\n ! there are multiple ways to specify `dimension` and `codimension`\n ! a normal dimension and a codimension\n real, intent(in), allocatable, dimension(:), codimension[:] :: state_two\n integer :: invisible_three\n\n ! a 'normal' scalar (no '()'), but with a codimension '[]'\n real, allocatable :: assignee[:]\n integer :: invisible_four\n\ncontains\n\n subroutine execute(state)\n real, intent(in) :: state(:)[:]\n end subroutine execute\n\nend module squaretest\n\nprogram main\n use module squaretest\nend program main\n" }, { "path": "Units/parser-fortran.r/fortran-submodule.d/README", "content": "x, y are tagged because the submodule statement of example_sssmod is\nbroken. Ctags makes garbage from garbage.\n" }, { "path": "Units/parser-fortran.r/fortran-submodule.d/args.ctags", "content": "--sort=no\n--fields=+K{inherits}\n" }, { "path": "Units/parser-fortran.r/fortran-submodule.d/expected.tags", "content": "example_smod\tinput.f90\t/^submodule (example_mod) example_smod$/;\"\tsubmodule\tinherits:example_mod\ng\tinput.f90\t/^ module function g(/;\"\tfunction\tsubmodule:example_smod\nexample_ssmod\tinput.f90\t/^submodule (example_mod:example_smod) example_ssmod$/;\"\tsubmodule\tinherits:example_mod:example_smod\ng2\tinput.f90\t/^ module function g2(/;\"\tfunction\tsubmodule:example_ssmod\nfunction\tinput.f90\t/^ module function /;\"\tmodule\nx\tinput.f90\t/^ integer :: x,/;\"\tvariable\tmodule:function\ny\tinput.f90\t/^ integer :: x,y$/;\"\tvariable\tmodule:function\n" }, { "path": "Units/parser-fortran.r/fortran-submodule.d/input.f90", "content": "!\n! Derived from comment #1616 submitted by @cbcoutinho\n!\nsubmodule (example_mod) example_smod\ncontains\n module function g(x) result(y)\n integer :: x,y\n y = x * 2\n end function g\nend submodule example_smod\n\nsubmodule (example_mod:example_smod) example_ssmod\ncontains\n module function g2(x) result(y)\n integer :: x,y\n y = x * 2\n end function g2\nend submodule example_ssmod\n\nsubmodule (example_mod:example_smod:example_ssmod*broken*) example_sssmod\ncontains\n module function g3(x) result(y)\n integer :: x,y\n y = x * 2\n end function g3\nend submodule example_sssmod\n\n" }, { "path": "Units/parser-fortran.r/implied_program.f.d/expected.tags", "content": "i\tinput.f\t/^\tinteger i$/;\"\tv\n" }, { "path": "Units/parser-fortran.r/implied_program.f.d/input.f", "content": "C Bug reported by Brian Helinski on 28 Feb 2003\n\t! implicit program main\n\tinteger i\n\ti = 5\n\twrite(*,*) i\n\tend\n" }, { "path": "Units/parser-fortran.r/initialization.f90.d/expected.tags", "content": "funcon\tinput.f90\t/^ MODULE funcon$/;\"\tm\nimat\tinput.f90\t/^ imat=/;\"\tv\tmodule:funcon\nimat6\tinput.f90\t/^ imat6=/;\"\tv\tmodule:funcon\n" }, { "path": "Units/parser-fortran.r/initialization.f90.d/input.f90", "content": "! Tests for correct parsing of complicated initialization\n MODULE funcon\n IMPLICIT NONE\n REAL(8),DIMENSION(3,3),PARAMETER :: &\n imat= reshape((/1.d0,0.d0,0.d0, &\n 0.d0,1.d0,0.d0, &\n 0.d0,0.d0,1.d0/),(/3,3/))\n REAL(8),DIMENSION(6,6),PARAMETER :: &\n imat6= reshape((/1.d0,0.d0,0.d0,0.d0,0.d0,0.d0, &\n 0.d0,1.d0,0.d0,0.d0,0.d0,0.d0, &\n\t\t \t 0.d0,0.d0,1.d0,0.d0,0.d0,0.d0, &\n 0.d0,0.d0,0.d0,1.d0,0.d0,0.d0, &\n\t\t\t 0.d0,0.d0,0.d0,0.d0,1.d0,0.d0, &\n 0.d0,0.d0,0.d0,0.d0,0.d0,1.d0/),(/6,6/))\t\t\t \n\n END MODULE funcon\n" }, { "path": "Units/parser-fortran.r/invalid_name.f90.d/expected.tags", "content": "Activity\tinput.f90\t/^ Integer(2) :: Activity$/;\"\tk\ttype:Detection_Record\nDR_Filename\tinput.f90\t/^ Character*1024 DR_Filename$/;\"\tv\tmodule:TR_DetectionRecording\nDR_Lun\tinput.f90\t/^ Integer :: DR_Lun$/;\"\tv\tmodule:TR_DetectionRecording\nDetection_Record\tinput.f90\t/^ Type Detection_Record$/;\"\tt\tmodule:TR_DetectionRecording\nFace\tinput.f90\t/^ Integer(2) :: Face$/;\"\tk\ttype:Detection_Record\nTR_DetectionRecording\tinput.f90\t/^ Module TR_DetectionRecording$/;\"\tm\nType\tinput.f90\t/^ Integer(2) :: Type ! \"Type\"/;\"\tk\ttype:Detection_Record\n" }, { "path": "Units/parser-fortran.r/invalid_name.f90.d/input.f90", "content": "! Test of parsing type with invalid name\n Module TR_DetectionRecording\n Implicit None\n Save\n Integer :: DR_Lun\n Character*1024 DR_Filename\n Type Detection_Record\n Integer(2) :: Activity\n Integer(2) :: Type ! \"Type\" not valid entity name\n Integer(2) :: Face\n End Type Detection_Record\n End Module TR_DetectionRecording\n" }, { "path": "Units/parser-fortran.r/lanus.for.d/expected.tags", "content": "FAC010\tinput.for\t/^ character*5 FAC010 /;\"\tv\nFEC010\tinput.for\t/^ character*6 FEC010 /;\"\tv\nPER010\tinput.for\t/^ character*40 PER010 /;\"\tv\nREM010\tinput.for\t/^ character*5 REM010 /;\"\tv\nURE010\tinput.for\t/^ character*5 URE010 /;\"\tv\n" }, { "path": "Units/parser-fortran.r/lanus.for.d/input.for", "content": "* From jlanus@netscape.net Thu Jan 16 20:38:12 2003\n* Date: Tue, 24 Sep 2002 12:20:07 -0400\n* From: Juan Lanus \n* To: ctags-users@lists.sourceforge.net\n* Subject: [Ctags] seeking for help to set ctags to work with old FORTRAN\n* \n* Hi\n* \n* I'm trying to set ctags to work with some old FORTRAN 77 programs.\n* I'm in Windows 2000, vim 6.1 and exuberant ctags 5.3.1.\n* The programs are for VAX FORTRAN 77 as of 1988. Written with tabs and 132 columns line length.\n* \n* [...]\n* \n* What am I doing wrong? This is my first contact with tags files of any sort and I'm vexed.\n* \n* A sample .DES file is included at the bottom. \n* \n* TIA\n* \n* Juan Lanus\n* TECNOSOL\n* Argentina\n* \n* \n****************\n*********************************************************************\n* *\n* Sistema Personalizado - descripcion de registros - CGA - 1/12/89 *\n* *\n* De tablas generales PERTAB012 - tabla 010 *\n* *\n*********************************************************************\n\n character*6 FEC010 !Fecha de Proceso aa/mm/dd\n character*5 URE010 !Ultimo Numero de Pedido\n character*5 REM010 !Ultimo Numero de Remito\n character*5 FAC010 !Ultimo Numero de Factura\n\n character*40 PER010 !Registro de Fecha\n\n equivalence (PER010(1:1) ,FEC010(1:1))\n equivalence (PER010(7:7) ,URE010(1:1))\n equivalence (PER010(12:12),REM010(1:1))\n equivalence (PER010(17:17),FAC010(1:1))\n\n****************** Fin Registro de Fecha ***********************************\n" }, { "path": "Units/parser-fortran.r/misc_types.f.d/expected.tags", "content": "INFOOBAR\tinput.f\t/^\tINTEGER INFOOBAR$/;\"\tv\tprogram:specs\nM\tinput.f\t/^\tINTEGER M(/;\"\tv\tprogram:specs\nspecs\tinput.f\t/^\tprogram specs$/;\"\tp\n" }, { "path": "Units/parser-fortran.r/misc_types.f.d/input.f", "content": "! Provided by Brian Helsinki, 7 March 2003\n!\tcexternal\n!\tcglobal\n!\tpexternal\n!\tpglobal\n!\tinline \n!\tvirtual\n!\tvolatile\n!\tpascal\n\tprogram specs\n\n\tVIRTUAL M(10,10), Y(100) \n\tVOLATILE V, Z, MAT, /INI/ \n\n\tEXTERNAL ABS ! variations of external and global\n\tCEXTERNAL ABS1 ! not supported\n\tCGLOBAL ABS2 ! not supported\n\tPEXTERNAL ABS3 ! not supported\n$IF DEFINED(MAC_DEP)\n\tPASCAL EXTERNAL ABS3_var2 ! not supported\n$ENDIF\n\tPGLOBAL ABS4\n\t\n\tINTEGER INFOOBAR\n\tINLINE (INFOOBAR=00000) ! not supported\n\n\tINTEGER M(5)\n\tDATA M/5*0/\n\t\n\tCALL INFOOBAR(5,4)\n\tEND\n\n" }, { "path": "Units/parser-fortran.r/misc_types.f90.d/expected.tags", "content": "align_second_16\tinput.f90\t/^\tinteger(2) :: align_second_16$/;\"\tk\ttype:my_struct\nbase_type\tinput.f90\t/^\tinteger base_type$/;\"\tv\tprogram:testalloc\nfirst_byte\tinput.f90\t/^\tinteger(1) :: first_byte$/;\"\tk\ttype:my_struct\ni\tinput.f90\t/^\tinteger i,/;\"\tv\tprogram:testalloc\ni2\tinput.f90\t/^\tinteger i2$/;\"\tv\tprogram:testalloc\ni3\tinput.f90\t/^\tinteger i3$/;\"\tv\tprogram:testalloc\ni4\tinput.f90\t/^\tinteger i4$/;\"\tv\tprogram:testalloc\ni5\tinput.f90\t/^\tinteger i5$/;\"\tv\tprogram:testalloc\ni6\tinput.f90\t/^\tinteger i6$/;\"\tv\tprogram:testalloc\ni7\tinput.f90\t/^\tinteger i7$/;\"\tv\tprogram:testalloc\ni8\tinput.f90\t/^\tinteger i8$/;\"\tv\tprogram:testalloc\nlist\tinput.f90\t/^\treal, dimension (:), allocatable :: list /;\"\tv\tprogram:testalloc\nmy_struct\tinput.f90\t/^\tstructure \\/my_struct\\//;\"\tt\tprogram:testalloc\nstatus\tinput.f90\t/^\tinteger i, status$/;\"\tv\tprogram:testalloc\ntestalloc\tinput.f90\t/^\tprogram testalloc$/;\"\tp\nthe_struct\tinput.f90\t/^\trecord \\/m_struct\\/ the_struct /;\"\tv\tprogram:testalloc\n" }, { "path": "Units/parser-fortran.r/misc_types.f90.d/input.f90", "content": "! Provided by Brian Helsinki, 7 March 2003\n\tprogram testalloc\n\tinteger base_type\n\tautomatic foobar_var \t! automatic breaks parsing\n\tinteger i2\n\tstatic s_var\t\t! static breaks parsing\n\tinteger i3\n\tvolatile v_var\t\t! volatile breaks var parsing\n\tinteger i4\n\t\n\tDLL_IMPORT foobar2\t! break var parsing\n\tDLL_EXPORT foobar\t! breaks var parsing\n\n\tinteger i5\n common foobar_var, s_var, v_var\n\tinteger i6\n\t\n\tstructure /my_struct/\n\tinteger(1) :: first_byte\n\tinteger(1) :: %fill\n\tinteger(2) :: align_second_16\n\tend structure\n\t\n\tinteger i7\n\t\n\trecord /m_struct/ the_struct ! break var parsing\n\tinteger i8\n\t\n\treal, dimension (:), allocatable :: list ! allocatable\n\tinteger i, status\n\t\n\t\n\ti = 99\n\tallocate (list(i), stat=status ) ! create array allocate\n\tlist (1) = 1.2\n\tdeallocate (list) \t! deallocate\n\t\n\tdo i=1,100\n\t\tj=i\n\tend do\n\tstop\n\tend\n\n" }, { "path": "Units/parser-fortran.r/multi-input-fixed-then-free.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-fortran.r/multi-input-fixed-then-free.d/expected.tags", "content": "p1\tinput.f\t/^ program p1$/;\"\tp\ns\tinput.f\t/^ character*5 s$/;\"\tv\tprogram:p1\nr\tinput.f\t/^ character*5 r$/;\"\tv\tprogram:p1\ns1\tinput-0.f90\t/^subroutine s1$/;\"\ts\n" }, { "path": "Units/parser-fortran.r/multi-input-fixed-then-free.d/input-0.f90", "content": "subroutine s1\nreal :: a,b,c,d\nif (a .eq. b .and. &\n c. eq. d) then\n a=0\nendif\nend\n" }, { "path": "Units/parser-fortran.r/multi-input-fixed-then-free.d/input.f", "content": " program p1\n character*5 s\nc\n character*5 r\n r=\"abcde\"\n end\n" }, { "path": "Units/parser-fortran.r/multi-input-free-then-fixed.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-fortran.r/multi-input-free-then-fixed.d/expected.tags", "content": "s1\tinput.f90\t/^subroutine s1$/;\"\ts\np1\tinput-0.f\t/^ program p1$/;\"\tp\ns\tinput-0.f\t/^ character*5 s$/;\"\tv\tprogram:p1\nr\tinput-0.f\t/^ character*5 r$/;\"\tv\tprogram:p1\n" }, { "path": "Units/parser-fortran.r/multi-input-free-then-fixed.d/input-0.f", "content": " program p1\n character*5 s\nc\n character*5 r\n r=\"abcde\"\n end\n" }, { "path": "Units/parser-fortran.r/multi-input-free-then-fixed.d/input.f90", "content": "subroutine s1\nreal :: a,b,c,d\nif (a .eq. b .and. &\n c. eq. d) then\n a=0\nendif\nend\n" }, { "path": "Units/parser-fortran.r/namelist.f.d/expected.tags", "content": "main\tinput.f\t/^ PROGRAM main$/;\"\tp\nnamelist1\tinput.f\t/^ NAMELIST \\/namelist1\\//;\"\tn\tprogram:main\nnamelist2\tinput.f\t/^ NAMELIST \\/namelist2\\//;\"\tn\tprogram:main\nnamelist3\tinput.f\t/^ NAMELIST \\/namelist2\\/ n2a, n2b \\/namelist3\\//;\"\tn\tprogram:main\n" }, { "path": "Units/parser-fortran.r/namelist.f.d/input.f", "content": " PROGRAM main\n NAMELIST /namelist1/ n1a, n1b\n NAMELIST /namelist2/ n2a, n2b /namelist3/ n3a, n3b\n END\n" }, { "path": "Units/parser-fortran.r/numlib.f90.d/args.ctags", "content": "--kinds-Fortran=+P\n" }, { "path": "Units/parser-fortran.r/numlib.f90.d/expected.tags", "content": "__anon1963f93b0305\tinput.f90\t/^ interface$/;\"\ti\tmodule:numerical_libraries\n__anon1963f93b0405\tinput.f90\t/^ interface$/;\"\ti\tprototype:b2lsf\na2ald\tinput.f90\t/^ subroutine a2ald /;\"\tP\tinterface:__anon1963f93b0305\nb2lsf\tinput.f90\t/^ subroutine b2lsf /;\"\tP\tinterface:__anon1963f93b0305\nfcn\tinput.f90\t/^ subroutine fcn(/;\"\tP\tinterface:__anon1963f93b0405\nnumerical_libraries\tinput.f90\t/^ module numerical_libraries$/;\"\tm\n" }, { "path": "Units/parser-fortran.r/numlib.f90.d/input.f90", "content": "! Bug reported by Brian Helinski on 4 Feb 2003\n module numerical_libraries\n interface\n \n subroutine a2ald (nf, nl, y, nrf, indrf, nef, nfef, indef, conper, iprint&\n , model, aov, ems, vc, ldvc, ymeans, wk, iwk, c13ksp) \n integer, intent(in) :: nf \n integer, dimension(*), intent(in) :: nl \n real(kind(1e0)), dimension(*) :: y \n integer, intent(in) :: nrf \n integer, dimension(*), intent(in) :: indrf \n integer, intent(in) :: nef \n integer, dimension(*), intent(in) :: nfef \n integer, dimension(*), intent(in) :: indef \n real(kind(1e0)), intent(in) :: conper \n integer, intent(in) :: iprint \n integer, intent(in) :: model \n real(kind(1e0)), dimension(*), intent(in) :: aov \n real(kind(1e0)), dimension(*), intent(inout) :: ems \n real(kind(1e0)), dimension(ldvc,*), intent(inout) :: vc \n integer, intent(in) :: ldvc \n real(kind(1e0)), dimension(*), intent(in) :: ymeans \n real(kind(1e0)), dimension(*), intent(inout) :: wk \n integer, dimension(*), intent(in) :: iwk \n character (len = 13), dimension(*), intent(out) :: c13ksp \n end subroutine \n\n \n subroutine b2lsf (fcn, m, n, xguess, ibtype, xlb, xub, xscale, fscale&\n , iparam, rparam, x, fvec, fjac, ldfjac, wk, iwk) \n integer, intent(in) :: m \n integer, intent(in) :: n \n real(kind(1e0)), dimension(*) :: xguess \n integer, intent(in) :: ibtype \n real(kind(1e0)), dimension(*), intent(inout) :: xlb \n real(kind(1e0)), dimension(*), intent(inout) :: xub \n real(kind(1e0)), dimension(*) :: xscale \n real(kind(1e0)), dimension(*) :: fscale \n integer, dimension(*) :: iparam \n real(kind(1e0)), dimension(*) :: rparam \n real(kind(1e0)), dimension(*) :: x \n real(kind(1e0)), dimension(*) :: fvec \n real(kind(1e0)), dimension(*) :: fjac \n integer, intent(in) :: ldfjac \n real(kind(1e0)), dimension(*) :: wk \n integer, dimension(*) :: iwk \n interface\n subroutine fcn(m, n, x, f)\n integer, intent(in) :: m, n\n real(kind(1e0)), intent(in) :: x(*)\n real(kind(1e0)), intent(out) :: f(*)\n end subroutine\n end interface\n end subroutine\n \n END INTERFACE \n end module\n" }, { "path": "Units/parser-fortran.r/pure_elem.f95.d/README", "content": "This test has the truncation issue #333.\n" }, { "path": "Units/parser-fortran.r/pure_elem.f95.d/expected.tags", "content": "F\tinput.f95\t/^\tPURE REAL FUNCTION F(x,y) ! pure broken returns 'PURE REAL FU/;\"\tf\nelem_maxabs\tinput.f95\t/^\tELEMENTAL REAL FUNCTION elem_maxabs(/;\"\tf\npure_func\tinput.f95\t/^\tPURE REAL FUNCTION pure_func(/;\"\tf\npure_maxabs2\tinput.f95\t/^\tPURE REAL FUNCTION pure_maxabs2(/;\"\tf\n" }, { "path": "Units/parser-fortran.r/pure_elem.f95.d/input.f95", "content": "!\telemental\n!\n!Pure procedures are procedures declared with the PURE keyword and which \n!satisfy certain constraints that ensure they have no side \n!effects. They can be used in specification expressions and \n!within FORALL constructs and statements. \n\n!Elemental procedures can be written in Fortran 95 using the ELEMENTAL \n!keyword. Elemental procedures are automatically ``pure''. \n\n!Example: \n\n\tPURE REAL FUNCTION pure_func(x,y) ! pure okay\n\t\tIMPLICIT NONE\n\t\tREAL, INTENT(IN) :: x, y\n\t\tpure_func = x*x + y*y + 2*x*y + ASIN(MIN(x/y,y/x))\n\tEND FUNCTION pure_func\n\n\tPURE REAL FUNCTION F(x,y) ! pure broken returns 'PURE REAL FU'\n\t\tIMPLICIT NONE\n\t\tREAL, INTENT(IN) :: x, y\n\t\tF = x*x + y*y + 2*x*y + ASIN(MIN(x/y,y/x))\n\tEND FUNCTION F\n\n\n\tELEMENTAL REAL FUNCTION elem_maxabs(a,b) ! elemental broke\n\t\tIMPLICIT NONE\n\t\tREAL,INTENT(IN) :: a,b\n\t\telem_maxabs = MAX(ABS(a),ABS(b))\n\tEND\n\n\tPURE REAL FUNCTION pure_maxabs2(a,b) ! pure okay\n\t\tIMPLICIT NONE\n\t\tREAL,INTENT(IN) :: a,b\n\t\tpure_maxabs2 = MAX(ABS(a),ABS(b))\n\tEND\n\n" }, { "path": "Units/parser-fortran.r/recursive.f95.d/args.ctags", "content": "--kinds-Fortran=+P\n" }, { "path": "Units/parser-fortran.r/recursive.f95.d/expected.tags", "content": "__anon8fb642160105\tinput.f95\t/^\t\t$/;\"\ti\tmodule:approx\n__anon8fb642160205\tinput.f95\t/^\t$/;\"\ti\tmodule:approx2\napprox\tinput.f95\t/^\tMODULE approx$/;\"\tm\napprox2\tinput.f95\t/^\tMODULE approx2$/;\"\tm\narcsin\tinput.f95\t/^\trecursive function arcsin /;\"\tP\tinterface:__anon8fb642160105\narcsin1\tinput.f95\t/^\trecursive function arcsin1 /;\"\tP\tinterface:__anon8fb642160105\narcsin2\tinput.f95\t/^\tdouble precision recursive function arcsin2 /;\"\tP\tinterface:__anon8fb642160105\narcsin3\tinput.f95\t/^\trecursive double precision function arcsin3 /;\"\tP\tinterface:__anon8fb642160105\nas\tinput.f95\t/^\tdouble precision recursive function as /;\"\tP\tinterface:__anon8fb642160205\nas1\tinput.f95\t/^\trecursive double precision function as1 /;\"\tP\tinterface:__anon8fb642160205\nas2\tinput.f95\t/^\trecursive function as2 /;\"\tP\tinterface:__anon8fb642160205\nas3\tinput.f95\t/^\trecursive function as3 /;\"\tP\tinterface:__anon8fb642160205\nparts\tinput.f95\t/^\tinteger :: parts$/;\"\tv\tmodule:approx\nparts2\tinput.f95\t/^\tinteger :: parts2$/;\"\tv\tmodule:approx2\ny\tinput.f95\t/^\tdouble precision :: y$/;\"\tv\tmodule:approx\nz\tinput.f95\t/^\tdouble precision :: z$/;\"\tv\tmodule:approx2\n" }, { "path": "Units/parser-fortran.r/recursive.f95.d/input.f95", "content": "!\tresult/recursive broken\n\tMODULE approx\n\tinterface\n\t\t\n\trecursive function arcsin (angle, terms) ! no result keyword\n\t\tdouble precision arcsin1\n\t\tdouble precision angle\n\t\tinteger terms\n\tend function arcsin\n\t\t\n\trecursive function arcsin1 (angle, terms) result (value) ! no explicit type\n\t\tdouble precision angle\n\t\tinteger terms\n\t\tdouble precision value\n\tend function arcsin1\n\t\n\tdouble precision recursive function arcsin2 (angle, terms) result (value) ! type + recurs\n\t\tdouble precision angle\n\t\tinteger terms\n\tend function arcsin2\n\t\t\t\n\t\t\t\n\t! only this function seems to be found\n\trecursive double precision function arcsin3 (angle, terms) result (value ) ! recurs + type\n\t\tdouble precision angle\n\t\tinteger terms\n\tend function arcsin3\n\t\n\t\t\n\tend interface\n\tdouble precision :: y\n\tinteger :: parts\n\tEND MODULE\n\n\n\tMODULE approx2\n\tinterface\n\t\n\tdouble precision recursive function as (angle, terms) result (value) ! type + recurs\n\t\tdouble precision angle\n\t\tinteger terms\n\tend function as\n\t\t\t\n\trecursive double precision function as1 (angle, terms) result (value ) ! recurs + type\n\t\tdouble precision angle\n\t\tinteger terms\n\tend function as1\n\t\n\t! but now I can see this one \n\trecursive function as2 (angle, terms) ! no result keyword\n\t\tdouble precision arcsin1\n\t\tdouble precision angle\n\t\tinteger terms\n\tend function as2\n\t\t\n\t! .. and this one!\n\trecursive function as3 (angle, terms) result (value) ! no explicit type\n\t\tdouble precision angle\n\t\tinteger terms\n\t\tdouble precision value\n\tend function as3\n\t\n\t\t\n\tend interface\n\tdouble precision :: z\n\tinteger :: parts2\n\tEND MODULE\n\n" }, { "path": "Units/parser-fortran.r/reset-newline-state.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-fortran.r/reset-newline-state.d/expected.tags", "content": "mod1\tinput-1.f90\t/^ MODULE mod1$/;\"\tm\nvar1\tinput-1.f90\t/^ integer :: var1$/;\"\tv\tmodule:mod1\nmod2\tinput-2.f90\t/^ MODULE mod2$/;\"\tm\nvar2\tinput-2.f90\t/^ integer :: var2$/;\"\tv\tmodule:mod2\n" }, { "path": "Units/parser-fortran.r/reset-newline-state.d/input-1.f90", "content": "#include \"in.fpp\"\n\n MODULE mod1\n implicit none\n integer :: var1\n END MODULE mod1\n" }, { "path": "Units/parser-fortran.r/reset-newline-state.d/input-2.f90", "content": "#include \"in.fpp\"\n\n MODULE mod2\n implicit none\n integer :: var2\n END MODULE\n" }, { "path": "Units/parser-fortran.r/reset-newline-state.d/input.f90", "content": " ! Dummy file\n" }, { "path": "Units/parser-fortran.r/semicolon.f90.d/expected.tags", "content": "SEMI\tinput.f90\t/^ MODULE SEMI$/;\"\tm\nVAR1\tinput.f90\t/^ INTEGER (4) :: VAR1;/;\"\tv\tmodule:SEMI\nVAR2\tinput.f90\t/^ INTEGER (4) :: VAR1; INTEGER (4) VAR2$/;\"\tv\tmodule:SEMI\n" }, { "path": "Units/parser-fortran.r/semicolon.f90.d/input.f90", "content": " MODULE SEMI\n \n INTEGER (4) :: VAR1; INTEGER (4) VAR2\n\n END MODULE SEMI\n" }, { "path": "Units/parser-fortran.r/stdcall.f.d/expected.tags", "content": "20\tinput.f\t/^ 20 CONTINUE$/;\"\tl\tfile:\n40\tinput.f\t/^ 40 CONTINUE$/;\"\tl\tfile:\n60\tinput.f\t/^ 60 CONTINUE$/;\"\tl\tfile:\n80\tinput.f\t/^ 80 CONTINUE$/;\"\tl\tfile:\n99996\tinput.f\t/^99996 FORMAT (1X,F8.2,3F13.5)$/;\"\tl\tfile:\n99997\tinput.f\t/^99997 FORMAT (1X,A,3F13.5)$/;\"\tl\tfile:\n99998\tinput.f\t/^99998 FORMAT (1X,A,F7.3)$/;\"\tl\tfile:\n99999\tinput.f\t/^99999 FORMAT (1X,A,D8.1)$/;\"\tl\tfile:\n99999\tinput.f\t/^99999 FORMAT (1X,F8.2,3F13.5)$/;\"\tl\tsubroutine:OUT\tfile:\nD02CJW\tinput.f\t/^ DOUBLE PRECISION D02CJW,/;\"\tv\nFCN\tinput.f\t/^ STDCALL SUBROUTINE FCN(/;\"\ts\nG\tinput.f\t/^ DOUBLE PRECISION D02CJW, G,/;\"\tv\nG\tinput.f\t/^ STDCALL DOUBLE PRECISION FUNCTION G(T,Y) !CHANGE/;\"\tf\nH\tinput.f\t/^ DOUBLE PRECISION H,/;\"\tv\nI\tinput.f\t/^ INTEGER I, IFAIL/;\"\tv\nIFAIL\tinput.f\t/^ INTEGER I, IFAIL,/;\"\tv\nIW\tinput.f\t/^ INTEGER N, IW$/;\"\tv\nJ\tinput.f\t/^ INTEGER I, IFAIL, J$/;\"\tv\nK\tinput.f\t/^ INTEGER K$/;\"\tv\nN\tinput.f\t/^ INTEGER N,/;\"\tv\nNOUT\tinput.f\t/^ INTEGER NOUT$/;\"\tv\nOUT\tinput.f\t/^ STDCALL SUBROUTINE OUT(/;\"\ts\nPI\tinput.f\t/^ DOUBLE PRECISION PI,/;\"\tv\nRELABS\tinput.f\t/^ CHARACTER RELABS*/;\"\tv\nTOL\tinput.f\t/^ DOUBLE PRECISION PI, TOL,/;\"\tv\nW\tinput.f\t/^ DOUBLE PRECISION W(IW)/;\"\tv\nX\tinput.f\t/^ DOUBLE PRECISION PI, TOL, X$/;\"\tv\nX01AAF\tinput.f\t/^ DOUBLE PRECISION D02CJW, G, X01AAF$/;\"\tv\nXEND\tinput.f\t/^ DOUBLE PRECISION H, XEND$/;\"\tv\nY\tinput.f\t/^ DOUBLE PRECISION W(IW), Y(/;\"\tv\n" }, { "path": "Units/parser-fortran.r/stdcall.f.d/input.f", "content": "* Obtained from http://www.nag.com/local/nagping/np006a3.asp\n* D02CJF Example Program Text\n* Mark 14 Revised. NAG Copyright 1989.\n* .. Parameters ..\n CHARACTER RELABS*15 !NEW\n INTEGER NOUT\n PARAMETER (NOUT=6)\n INTEGER N, IW\n PARAMETER (N=3,IW=21*N+28)\n* .. Scalars in Common ..\n DOUBLE PRECISION H, XEND\n INTEGER K\n* .. Local Scalars ..\n DOUBLE PRECISION PI, TOL, X\n INTEGER I, IFAIL, J\n* .. Local Arrays ..\n DOUBLE PRECISION W(IW), Y(N)\n* .. External Functions ..\n DOUBLE PRECISION D02CJW, G, X01AAF\n STDCALL EXTERNAL D02CJW, G, X01AAF !CHANGE\n* .. External Subroutines ..\n STDCALL EXTERNAL D02CJF, D02CJX, FCN, OUT !CHANGE\n* .. Intrinsic Functions ..\n INTRINSIC DBLE\n* .. Common blocks ..\n COMMON XEND, H, K\n* .. Executable Statements ..\n WRITE (NOUT,*) 'D02CJF Example Program Results'\n RELABS = \"Default\" !NEW\n XEND = 10.0D0\n PI = X01AAF(0.0D0)\n WRITE (NOUT,*)\n WRITE (NOUT,*) 'Case 1: intermediate output, root-finding'\n DO 20 J = 4, 5\n TOL = 10.0D0**(-J)\n WRITE (NOUT,*)\n WRITE (NOUT,99999) ' Calculation with TOL =', TOL\n X = 0.0D0\n Y(1) = 0.5D0\n Y(2) = 0.5D0\n Y(3) = PI/5.0D0\n K = 4\n H = (XEND-X)/DBLE(K+1)\n WRITE (NOUT,*) ' X Y(1) Y(2) Y(3)'\n IFAIL = 0\n*\n CALL D02CJF(X,XEND,N,Y,FCN,TOL,VAL(LOC(RELABS)),VAL(7),OUT,G,W,!CHANGE\n + IFAIL)\n*\n WRITE (NOUT,99998) ' Root of Y(1) = 0.0 at', X\n WRITE (NOUT,99997) ' Solution is', (Y(I),I=1,N)\n 20 CONTINUE\n WRITE (NOUT,*)\n WRITE (NOUT,*)\n WRITE (NOUT,*) 'Case 2: no intermediate output, root-finding'\n DO 40 J = 4, 5\n TOL = 10.0D0**(-J)\n WRITE (NOUT,*)\n WRITE (NOUT,99999) ' Calculation with TOL =', TOL\n X = 0.0D0\n Y(1) = 0.5D0\n Y(2) = 0.5D0\n Y(3) = PI/5.0D0\n IFAIL = 0\n*\n CALL D02CJF(X,XEND,N,Y,FCN,TOL,VAL(LOC(RELABS)),VAL(7),D02CJX, !CHANGE\n + G,W,IFAIL)\n*\n WRITE (NOUT,99998) ' Root of Y(1) = 0.0 at', X\n WRITE (NOUT,99997) ' Solution is', (Y(I),I=1,N)\n 40 CONTINUE\n WRITE (NOUT,*)\n WRITE (NOUT,*)\n WRITE (NOUT,*) 'Case 3: intermediate output, no root-finding'\n DO 60 J = 4, 5\n TOL = 10.0D0**(-J)\n WRITE (NOUT,*)\n WRITE (NOUT,99999) ' Calculation with TOL =', TOL\n X = 0.0D0\n Y(1) = 0.5D0\n Y(2) = 0.5D0\n Y(3) = PI/5.0D0\n K = 4\n H = (XEND-X)/DBLE(K+1)\n WRITE (NOUT,*) ' X Y(1) Y(2) Y(3)'\n IFAIL = 0\n*\n CALL D02CJF(X,XEND,N,Y,FCN,TOL,VAL(LOC(RELABS)),VAL(7),OUT, CHANGE\n + D02CJW,W,IFAIL)\n*\n 60 CONTINUE\n WRITE (NOUT,*)\n WRITE (NOUT,*)\n WRITE (NOUT,*)\n +'Case 4: no intermediate output, no root-finding ( integrate to XE\n +ND)'\n DO 80 J = 4, 5\n TOL = 10.0D0**(-J)\n WRITE (NOUT,*)\n WRITE (NOUT,99999) ' Calculation with TOL =', TOL\n X = 0.0D0\n Y(1) = 0.5D0\n Y(2) = 0.5D0\n Y(3) = PI/5.0D0\n WRITE (NOUT,*) ' X Y(1) Y(2) Y(3)'\n WRITE (NOUT,99996) X, (Y(I),I=1,N)\n IFAIL = 0\n*\n CALL D02CJF(X,XEND,N,Y,FCN,TOL,VAL(LOC(RELABS)),VAL(7),D02CJX, !CHANGE\n + D02CJW,W,IFAIL)\n*\n WRITE (NOUT,99996) X, (Y(I),I=1,N)\n 80 CONTINUE\n STOP\n*\n99999 FORMAT (1X,A,D8.1)\n99998 FORMAT (1X,A,F7.3)\n99997 FORMAT (1X,A,3F13.5)\n99996 FORMAT (1X,F8.2,3F13.5)\n END\n*\n STDCALL SUBROUTINE OUT(X,Y) !CHANGE\n* .. Parameters ..\n INTEGER NOUT\n PARAMETER (NOUT=6)\n INTEGER N\n PARAMETER (N=3)\n* .. Scalar Arguments ..\n DOUBLE PRECISION X\n* .. Array Arguments ..\n DOUBLE PRECISION Y(N)\n* .. Scalars in Common ..\n DOUBLE PRECISION H, XEND\n INTEGER I\n* .. Local Scalars ..\n INTEGER J\n* .. Intrinsic Functions ..\n INTRINSIC DBLE\n* .. Common blocks ..\n COMMON XEND, H, I\n* .. Executable Statements ..\n WRITE (NOUT,99999) X, (Y(J),J=1,N)\n X = XEND - DBLE(I)*H\n I = I - 1\n RETURN\n*\n99999 FORMAT (1X,F8.2,3F13.5)\n END\n*\n STDCALL SUBROUTINE FCN(T,Y,F) !CHANGE\n* .. Parameters ..\n INTEGER N\n PARAMETER (N=3)\n* .. Scalar Arguments ..\n DOUBLE PRECISION T\n* .. Array Arguments ..\n DOUBLE PRECISION F(N), Y(N)\n* .. Intrinsic Functions ..\n INTRINSIC COS, TAN\n* .. Executable Statements ..\n F(1) = TAN(Y(3))\n F(2) = -0.032D0*TAN(Y(3))/Y(2) - 0.02D0*Y(2)/COS(Y(3))\n F(3) = -0.032D0/Y(2)**2\n RETURN\n END\n*\n STDCALL DOUBLE PRECISION FUNCTION G(T,Y) !CHANGE\n* .. Parameters ..\n INTEGER N\n PARAMETER (N=3)\n* .. Scalar Arguments ..\n DOUBLE PRECISION T\n* .. Array Arguments ..\n DOUBLE PRECISION Y(N)\n* .. Executable Statements ..\n G = Y(1)\n RETURN\n END\n" }, { "path": "Units/parser-fortran.r/structure.f.d/expected.tags", "content": "__anon76fabc930106\tinput.f\t/^ structure level3a, level3b$/;\"\tt\ttype:nested\na\tinput.f\t/^ integer a$/;\"\tk\ttype:__anon76fabc930106\nclouds\tinput.f\t/^ character*20 clouds /;\"\tk\ttype:weather\nclouds\tinput.f\t/^ character*20 clouds$/;\"\tk\ttype:weather\nday\tinput.f\t/^ integer*1 month \\/08\\/, day /;\"\tk\ttype:weather\nday\tinput.f\t/^ integer month, day,/;\"\tk\ttype:weather\ninitialized_structure\tinput.f\t/^ program initialized_structure$/;\"\tp\nlatest\tinput.f\t/^ record \\/weather\\/ latest$/;\"\tv\tprogram:initialized_structure\nlatest\tinput.f\t/^ record \\/weather\\/ latest$/;\"\tv\tprogram:uninitialized_structure\nlevel2\tinput.f\t/^ structure \\/nested\\/ level2$/;\"\tk\ttype:top\nlevel3a\tinput.f\t/^ structure level3a,/;\"\tk\ttype:nested\nlevel3b\tinput.f\t/^ structure level3a, level3b$/;\"\tk\ttype:nested\nmonth\tinput.f\t/^ integer*1 month /;\"\tk\ttype:weather\nmonth\tinput.f\t/^ integer month,/;\"\tk\ttype:weather\nnested\tinput.f\t/^ structure \\/nested\\//;\"\tt\ttype:top\nnested_structure\tinput.f\t/^ program nested_structure$/;\"\tp\nrainfall\tinput.f\t/^ real rainfall /;\"\tk\ttype:weather\nrainfall\tinput.f\t/^ real rainfall$/;\"\tk\ttype:weather\ntop\tinput.f\t/^ structure \\/top\\//;\"\tt\tprogram:nested_structure\nuninitialized_structure\tinput.f\t/^ program uninitialized_structure$/;\"\tp\nweather\tinput.f\t/^ structure \\/weather\\//;\"\tt\tprogram:initialized_structure\nweather\tinput.f\t/^ structure \\/weather\\//;\"\tt\tprogram:uninitialized_structure\nyear\tinput.f\t/^ integer*1 month \\/08\\/, day \\/10\\/, year /;\"\tk\ttype:weather\nyear\tinput.f\t/^ integer month, day, year$/;\"\tk\ttype:weather\n" }, { "path": "Units/parser-fortran.r/structure.f.d/input.f", "content": " program uninitialized_structure\n structure /weather/\n integer month, day, year\n character*20 clouds\n real rainfall\n end structure\n record /weather/ latest\n end\n\n program initialized_structure\n structure /weather/\n integer*1 month /08/, day /10/, year /89/\n character*20 clouds /' overcast'/\n real rainfall /3.12/\n end structure\n record /weather/ latest\n print *, latest.month, latest.day, latest.year, \n + latest.clouds, latest.rainfall\n end program\n\n program nested_structure\n structure /top/\n structure /nested/ level2\n structure level3a, level3b\n integer a\n end structure\n end structure\n end structure\n end program\n" }, { "path": "Units/parser-fortran.r/union.f.d/expected.tags", "content": "10\tinput.f\t/^10 format (a)$/;\"\tl\tprogram:writedate\tfile:\ndate\tinput.f\t/^ character*6 date$/;\"\tk\ttype:start\nday\tinput.f\t/^ character*2 day$/;\"\tk\ttype:start\nmonth\tinput.f\t/^ character*2 month$/;\"\tk\ttype:start\nsdate\tinput.f\t/^ record \\/start\\/ sdate$/;\"\tv\tprogram:writedate\nstart\tinput.f\t/^ structure \\/start\\//;\"\tt\tprogram:writedate\nwritedate\tinput.f\t/^ program writedate$/;\"\tp\nyear\tinput.f\t/^ character*2 year$/;\"\tk\ttype:start\n" }, { "path": "Units/parser-fortran.r/union.f.d/input.f", "content": " program writedate\n structure /start/\n union\n map\n character*2 month\n character*2 day\n character*2 year\n end map\n map\n character*6 date\n end map\n end union\n end structure\n record /start/ sdate\n sdate.month = '08'\n sdate.day = '10'\n sdate.year = '89'\n write (*, 10) sdate.date\n10 format (a)\n stop\n end\n" }, { "path": "Units/parser-fortran.r/value.f.d/expected.tags", "content": "aa\tinput.f\t/^\tREAL aa$/;\"\tv\tprogram:figure\nfig\tinput.f\t/^\tinteger fig$/;\"\tv\tprogram:figure\nfigure\tinput.f\t/^\tprogram figure(/;\"\tp\n" }, { "path": "Units/parser-fortran.r/value.f.d/input.f", "content": "! Provided by Brian Helsinki, 7 March 2003\n\tprogram figure(aa)\n\tREAL aa\n\tVALUE aa ! not supported breaks fig; pass by value\n\tinteger fig\n\tcall fig2(aa)\n\tRETURN\n\tEND\t\n\n" }, { "path": "Units/parser-function-parameters.r/perl-fp-test.d/expected.tags", "content": "Jim::Butler\tinput.pl\t/^package Jim::Butler;$/;\"\tp\nmy_function\tinput.pl\t/^fun my_function() {}$/;\"\tf\nmy_method\tinput.pl\t/^method my_method() {}$/;\"\tm\nmy_subroutine\tinput.pl\t/^sub my_subroutine {}$/;\"\ts\n" }, { "path": "Units/parser-function-parameters.r/perl-fp-test.d/input.pl", "content": "package Jim::Butler;\n\nuse Function::Parameters;\n\nmethod my_method() {}\n\nfun my_function() {}\n\nsub my_subroutine {}\n\n1;" }, { "path": "Units/parser-function-parameters.r/simple.d/args.ctags", "content": "--sort=no\n--fields=+lK\n" }, { "path": "Units/parser-function-parameters.r/simple.d/expected.tags", "content": "foo\tinput.pl\t/^fun foo($x, $y, $z = 5) {$/;\"\tfun\tlanguage:FunctionParameters\nbar\tinput.pl\t/^method bar($label, $n) {$/;\"\tmethod\tlanguage:FunctionParameters\ncreate_point\tinput.pl\t/^fun create_point(:$x, :$y, :$color) {$/;\"\tfun\tlanguage:FunctionParameters\nDerived\tinput.pl\t/^package Derived {$/;\"\tpackage\tlanguage:Perl\nDerived\tinput.pl\t/^package Derived {$/;\"\tclass\tlanguage:Moose\ngo_big\tinput.pl\t/^ has 'go_big' => ($/;\"\tattribute\tlanguage:Moose\tclass:Derived\nsize\tinput.pl\t/^ around size($x, $y) {$/;\"\twrapper\tlanguage:Moose\tclass:Derived\twrapping:around\nDerived0\tinput-0.pl\t/^package Derived0 {$/;\"\tpackage\tlanguage:Perl\nDerived0\tinput-0.pl\t/^package Derived0 {$/;\"\tclass\tlanguage:Moose\ngo_big0\tinput-0.pl\t/^ has 'go_big0' => ($/;\"\tattribute\tlanguage:Moose\tclass:Derived0\n" }, { "path": "Units/parser-function-parameters.r/simple.d/input-0.pl", "content": "package Derived0 {\n use Function::Parameters qw(\n\t:std\n\t);\n use Moo;\n\n extends 'Base';\n\n has 'go_big0' => (\n\tis => 'ro',\n );\n\n # \"around\" method with implicit $orig and $self\n around size0_dont_capture_me() {\n\treturn $self->$orig() * 2 if $self->go_big;\n\treturn $self->$orig();\n }\n}\n" }, { "path": "Units/parser-function-parameters.r/simple.d/input.pl", "content": "# Taken from https://metacpan.org/pod/Function::Parameters\nuse Function::Parameters;\n \n# plain function\nfun foo($x, $y, $z = 5) {\n return $x + $y + $z;\n}\nprint foo(1, 2), \"\\n\"; # 8\n \n# method with implicit $self\nmethod bar($label, $n) {\n return \"$label: \" . ($n * $self->scale);\n}\n \n# named arguments: order doesn't matter in the call\nfun create_point(:$x, :$y, :$color) {\n print \"creating a $color point at ($x, $y)\\n\";\n}\ncreate_point(\n color => \"red\",\n x => 10,\n y => 5,\n);\n \npackage Derived {\n use Function::Parameters qw(\n\t:std\n\t:modifiers\n\t);\n use Moo;\n \n extends 'Base';\n \n has 'go_big' => (\n is => 'ro',\n );\n \n # \"around\" method with implicit $orig and $self\n around size($x, $y) {\n return $self->$orig() * 2 if $self->go_big;\n return $self->$orig();\n }\n}\n" }, { "path": "Units/parser-fypp.r/cont.d/args.ctags", "content": "--extras=+g\n" }, { "path": "Units/parser-fypp.r/cont.d/expected.tags", "content": "helloworld\tinput.fy\t/^program helloworld$/;\"\tp\n" }, { "path": "Units/parser-fypp.r/cont.d/input.fy", "content": "#! Taken from https://fypp.readthedocs.io/en/stable/fypp.html#preprocessor-language\n@:assertEqual(size(coords, dim=2), &\n & size(atomtypes))\nprogram helloworld\nprint *, \"Hello, world.\"\nend program helloworld\n" }, { "path": "Units/parser-fypp.r/emptyline.d/README", "content": "input.fy caused a valgrind error.\n\nFor running this test:\n\n $ make units LANGUAGES=Fypp VG=1\n" }, { "path": "Units/parser-fypp.r/emptyline.d/expected.tags", "content": "" }, { "path": "Units/parser-fypp.r/emptyline.d/input.fy", "content": "#:for ind in range(repeat)\n\n#:endfor\n" }, { "path": "Units/parser-fypp.r/first-if-area.d/args.ctags", "content": "--sort=no\n--extras=+g\n" }, { "path": "Units/parser-fypp.r/first-if-area.d/expected.tags", "content": "STRU\tinput.fy\t/^STRUCTURE \\/STRU\\//;\"\tt\nX\tinput.fy\t/^\tINTEGER*4 X$/;\"\tk\ttype:STRU\nA0\tinput.fy\t/^\tINTEGER*4 A0$/;\"\tk\ttype:STRU\nB0\tinput.fy\t/^\tINTEGER*4 B0$/;\"\tk\ttype:STRU\nC\tinput.fy\t/^\tINTEGER*4 C$/;\"\tk\ttype:STRU\nB1\tinput.fy\t/^\tINTEGER*4 B1$/;\"\tk\ttype:STRU\nA1\tinput.fy\t/^\tINTEGER*4 A1$/;\"\tk\ttype:STRU\nY\tinput.fy\t/^\tINTEGER*4 Y$/;\"\tk\ttype:STRU\n" }, { "path": "Units/parser-fypp.r/first-if-area.d/input.fy", "content": "#! Taken from https://github.com/aradi/fypp\nSTRUCTURE /STRU/\n\tINTEGER*4 X\n#:if cA > 0\n\tINTEGER*4 A0\n#:if cB > 0\n\tINTEGER*4 B0\n#:if cC > 0\n\tINTEGER*4 C\n#:elif cCELIF > 0\n\tINTEGER*4 CELIF\n#:else\n\tINTEGER*4 CELSE\n#:endif\n\tINTEGER*4 B1\n#:elif cBELIF > 0\n\tINTEGER*4 BELIF\n#:else\n\tINTEGER*4 BELSE\n#:endif\n\tINTEGER*4 A1\n#:elif cAELIF > 0\n\tINTEGER*4 AELIF\n#:else\n\tINTEGER*4 AELSE\n#:endif\n\tINTEGER*4 Y\nEND STRUCTURE\n" }, { "path": "Units/parser-fypp.r/if-cont.d/args.ctags", "content": "--sort=no\n--extras=+g\n" }, { "path": "Units/parser-fypp.r/if-cont.d/expected.tags", "content": "STRU\tinput.fy\t/^STRUCTURE \\/STRU\\//;\"\tt\nX\tinput.fy\t/^\tINTEGER*4 X$/;\"\tk\ttype:STRU\nA0\tinput.fy\t/^\tINTEGER*4 A0$/;\"\tk\ttype:STRU\nB0\tinput.fy\t/^\tINTEGER*4 B0$/;\"\tk\ttype:STRU\nC\tinput.fy\t/^\tINTEGER*4 C$/;\"\tk\ttype:STRU\nB1\tinput.fy\t/^\tINTEGER*4 B1$/;\"\tk\ttype:STRU\nA1\tinput.fy\t/^\tINTEGER*4 A1$/;\"\tk\ttype:STRU\nY\tinput.fy\t/^\tINTEGER*4 Y$/;\"\tk\ttype:STRU\n" }, { "path": "Units/parser-fypp.r/if-cont.d/input.fy", "content": "STRUCTURE /STRU/\n\tINTEGER*4 X\n#:if cA > 0 &\n DEBUG > 0 &\n TRACE > 0\n\tINTEGER*4 A0\n#:if cB > 0 &\n DEBUG > 0\n\tINTEGER*4 B0\n#:if cC > 0 &\n DEBUG > 0\n\tINTEGER*4 C\n#:elif cCELIF > 0 &\n DEBUG > 0\n\tINTEGER*4 CELIF\n#:else\n\tINTEGER*4 CELSE\n#:endif\n\tINTEGER*4 B1\n#:elif cBELIF > 0 &\n DEBUG > 0\n\tINTEGER*4 BELIF\n#:else\n\tINTEGER*4 BELSE\n#:endif\n\tINTEGER*4 A1\n#:elif cAELIF > 0 &\n DEBUG > 0\n\tINTEGER*4 AELIF\n#:else\n\tINTEGER*4 AELSE\n#:endif\n\tINTEGER*4 Y\nEND STRUCTURE\n" }, { "path": "Units/parser-fypp.r/if-with-no-endif.d/expected.tags", "content": "foo\tinput.fy\t/^#:def foo(cond) cond + 1$/;\"\tm\n" }, { "path": "Units/parser-fypp.r/if-with-no-endif.d/input.fy", "content": "#:if DEBUG\n#:def foo(cond) cond + 1\n#! endif is not given.\n" }, { "path": "Units/parser-fypp.r/run-alt-guest.d/args.ctags", "content": "--fields=+e\n# The next redundant options are for improve the test coverage.\n--param-Fypp.guest=Lisp\n--param-Fypp.guest=NONE\n--param-Fypp.guest=Java\n--extras=+g\n" }, { "path": "Units/parser-fypp.r/run-alt-guest.d/expected.tags", "content": "A\tinput.fy\t/^\tA, \\/\\/ should be 'e', not 'f'$/;\"\te\tenum:e\tfile:\tend:10\nB\tinput.fy\t/^\tB(), \\/\\/ should be 'e', not 'm'$/;\"\te\tenum:e\tfile:\tend:11\nC\tinput.fy\t/^\tC(1), \\/\\/ should be 'e', not missing$/;\"\te\tenum:e\tfile:\tend:12\nD\tinput.fy\t/^\tD, \\/\\/ should be 'e', not 'f'$/;\"\te\tenum:e\tfile:\tend:20\nE\tinput.fy\t/^\tE(), \\/\\/ should be 'e', not 'm'$/;\"\te\tenum:e\tfile:\tend:21\nF\tinput.fy\t/^\tF(1), \\/\\/ should be 'e', not missing$/;\"\te\tenum:e\tfile:\tend:22\ndebug_code\tinput.fy\t/^#:def debug_code(code)$/;\"\tm\tend:8\ne\tinput.fy\t/^ e() {}$/;\"\tm\tclass:e\tend:32\ne\tinput.fy\t/^ e(int x) {}$/;\"\tm\tclass:e\tend:31\ne\tinput.fy\t/^public enum e {$/;\"\tg\tend:51\ngetShape\tinput.fy\t/^\tpublic final Shape getShape() {$/;\"\tm\tclass:e\tend:46\ngetString\tinput.fy\t/^\tpublic String getString() {$/;\"\tm\tclass:e\tend:41\nrepeat_code\tinput.fy\t/^#:def repeat_code(code, repeat)$/;\"\tm\tend:29\nshape\tinput.fy\t/^\tpublic final Shape shape;$/;\"\tf\tclass:e\tend:35\nstring\tinput.fy\t/^\tpublic String string;$/;\"\tf\tclass:e\tend:34\ntwoKeywordsInARow\tinput.fy\t/^\tpublic final boolean twoKeywordsInARow;$/;\"\tf\tclass:e\tend:36\n" }, { "path": "Units/parser-fypp.r/run-alt-guest.d/input.fy", "content": "#! This test case is derived from #1810, a pull request submitted by @p-vitt\n#! and parser-java.r/enum.java.d/input.java\n#! Callable needs only string argument\n#:def debug_code(code)\n #:if DEBUG > 0\n $:code\n #:endif\n#:enddef debug_code\npublic enum e {\n\tA, // should be 'e', not 'f'\n\tB(), // should be 'e', not 'm'\n\tC(1), // should be 'e', not missing\n\n#! Pass code block as first positional argument\n#:call debug_code\n if (size(array) > 100) then\n print *, \"DEBUG: spuriously large array\"x\n end if\n#:endcall debug_code\n\tD, // should be 'e', not 'f'\n\tE(), // should be 'e', not 'm'\n\tF(1), // should be 'e', not missing\n\t;\n#! Callable needs also non-string argument types\n#:def repeat_code(code, repeat)\n #:for ind in range(repeat)\n $:code\n #:endfor\n#:enddef repeat_code\n\n e(int x) {}\n e() {}\n\n\tpublic String string;\n\tpublic final Shape shape;\n\tpublic final boolean twoKeywordsInARow;\n\n#! fypp preprocessor comments here, and\n\tpublic String getString() {\n\t\treturn string;\n\t}\n\n#! there\n\tpublic final Shape getShape() {\n\t\treturn shape;\n\t}\n#! Pass code block as positional argument and 3 as keyword argument \"repeat\"\n#:call repeat_code(repeat=3)\nthis will be repeated 3 times\n#:endcall repeat_code\n}\n" }, { "path": "Units/parser-fypp.r/run-guest.d/args.ctags", "content": "--fields=+ne\n--extras=+g\n--kinds-Fortran=+P\n" }, { "path": "Units/parser-fypp.r/run-guest.d/expected.tags", "content": "+\tinput.fy\t/^ interface operator(+)/;\"\ti\tline:31\tmodule:test_interface\n__anonca2bcf340105\tinput.fy\t/^ interface ! anonymous interface$/;\"\ti\tline:39\tmodule:test_interface\nadd\tinput.fy\t/^ type(atype) function add(/;\"\tP\tline:33\tmodule:test_interface\natype\tinput.fy\t/^ type atype$/;\"\tt\tline:28\tmodule:test_interface\ndebug_code\tinput.fy\t/^#:def debug_code(code)$/;\"\tm\tline:4\tend:8\nget\tinput.fy\t/^ interface get$/;\"\ti\tline:47\tmodule:test_interface\nget_1d\tinput.fy\t/^ subroutine get_1d(/;\"\ts\tline:55\tmodule:test_interface\nget_2d\tinput.fy\t/^ subroutine get_2d(/;\"\ts\tline:62\tmodule:test_interface\nhelloworld\tinput.fy\t/^program helloworld$/;\"\tp\tline:17\nrepeat_code\tinput.fy\t/^#:def repeat_code(code, repeat)$/;\"\tm\tline:23\tend:27\nsuba\tinput.fy\t/^ subroutine suba(/;\"\tP\tline:40\tinterface:__anonca2bcf340105\nsubb\tinput.fy\t/^ subroutine subb(/;\"\tP\tline:42\tinterface:__anonca2bcf340105\ntest_interface\tinput.fy\t/^module test_interface$/;\"\tm\tline:21\n" }, { "path": "Units/parser-fypp.r/run-guest.d/input.fy", "content": "#! This test case is derived from #1810, a pull request submitted by @p-vitt\n#! and parser-fortran.r/fortran-interface.d/input.f90.\n#! Callable needs only string argument\n#:def debug_code(code)\n #:if DEBUG > 0\n $:code\n #:endif\n#:enddef debug_code\n\n#! Pass code block as first positional argument\n#:call debug_code\n if (size(array) > 100) then\n print *, \"DEBUG: spuriously large array\"\n end if\n#:endcall debug_code\n\nprogram helloworld\nprint *, \"Hello, world.\"\nend program helloworld\n\nmodule test_interface\n#! Callable needs also non-string argument types\n#:def repeat_code(code, repeat)\n #:for ind in range(repeat)\n $:code\n #:endfor\n#:enddef repeat_code\n type atype\n end type atype\n ! operator overload\n interface operator(+)\n ! subprogram prototype\n type(atype) function add(a, b)\n import atype\n type(atype), intent(in) :: a, b\n end function add\n end interface operator(+)\n ! wrap subprogram prototypes\n interface ! anonymous interface\n subroutine suba()\n end subroutine suba\n subroutine subb()\n end subroutine subb\n end interface\n ! define generic subprograms\n#! fypp preprocessor comments here, and\n interface get\n#! there\n ! subprogram name list\n module procedure get_1d\n module procedure get_2d\n end interface get\ncontains\n ! definition of subprograms\n subroutine get_1d(a)\n real a(:)\n end subroutine get_1d\n#! Pass code block as positional argument and 3 as keyword argument \"repeat\"\n#:call repeat_code(repeat=3)\nthis will be repeated 3 times\n#:endcall repeat_code\n subroutine get_2d(a)\n real a(:, :)\n end subroutine get_2d\nend module test_interface\n\n\n" }, { "path": "Units/parser-fypp.r/segv.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-fypp.r/segv.d/args.ctags", "content": "--extras=+g\n" }, { "path": "Units/parser-fypp.r/segv.d/input.fy", "content": "\n#:" }, { "path": "Units/parser-fypp.r/simple-fypp.d/args.ctags", "content": "--fields=+Sne\n" }, { "path": "Units/parser-fypp.r/simple-fypp.d/expected.tags", "content": "assertTrue\tinput.fy\t/^#:def assertTrue(cond)$/;\"\tm\tline:2\tsignature:(cond)\tend:7\n" }, { "path": "Units/parser-fypp.r/simple-fypp.d/input.fy", "content": "#! This test case is taken from #1810, a pull request submitted by @p-vitt.\n#:def assertTrue(cond)\nif (.not. ${cond}$) then\n print *, \"Assert failed\"\n error stop\nend if\n#:enddef assertTrue\n" }, { "path": "Units/parser-gdscript.r/broken-input.d/README", "content": "This is a crash test.\n" }, { "path": "Units/parser-gdscript.r/broken-input.d/input.gd", "content": "@foo\nvar\n" }, { "path": "Units/parser-gdscript.r/class_name-extends-no-implicit-class.d/args.ctags", "content": "--sort=no\n--fields=+irKE\n--extras=+r\n--extras-GDScript=-{implicitClass}\n" }, { "path": "Units/parser-gdscript.r/class_name-extends-no-implicit-class.d/expected.tags", "content": "Node\tinput.gd\t/^class_name MyNode extends Node$/;\"\tclass\troles:extended\textras:reference\nMyNode\tinput.gd\t/^class_name MyNode extends Node$/;\"\tclass\tinherits:Node\troles:def\n" }, { "path": "Units/parser-gdscript.r/class_name-extends-no-implicit-class.d/input.gd", "content": "class_name MyNode extends Node\n" }, { "path": "Units/parser-gdscript.r/class_name-extends.d/args.ctags", "content": "--sort=no\n--fields=+irKE\n--extras=+r\n--extras-GDScript=+{implicitClass}\n" }, { "path": "Units/parser-gdscript.r/class_name-extends.d/expected.tags", "content": "MyNode\tinput.gd\t/^class_name MyNode extends Node$/;\"\tclass\tinherits:Node\troles:def\nNode\tinput.gd\t/^class_name MyNode extends Node$/;\"\tclass\troles:extended\textras:reference\n" }, { "path": "Units/parser-gdscript.r/class_name-extends.d/input.gd", "content": "class_name MyNode extends Node\n" }, { "path": "Units/parser-gdscript.r/inner-class.d/args.ctags", "content": "--sort=no\n--fields=+{inherits}{signature}{extras}\n--kinds-GDScript=-{local}\n--kinds-GDScript=-{parameter}\n--extras-GDScript=+{implicitClass}\n" }, { "path": "Units/parser-gdscript.r/inner-class.d/expected.tags", "content": "anon_class_186e00360100\tinput.gd\t/^# Taken from godot-demo-projects\\/networking\\/webrtc_signaling\\/server\\/ws_webrtc_server.gd$/;\"\tc\tinherits:Node\textras:anonymous,implicitClass\nTIMEOUT\tinput.gd\t/^const TIMEOUT = 1000 # Unresponsive clients times out after 1 sec$/;\"\tC\tclass:anon_class_186e00360100\nSEAL_TIME\tinput.gd\t/^const SEAL_TIME = 10000 # A sealed room will be closed after this time$/;\"\tC\tclass:anon_class_186e00360100\nALFNUM\tinput.gd\t/^const ALFNUM = \"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789\"$/;\"\tC\tclass:anon_class_186e00360100\n_alfnum\tinput.gd\t/^var _alfnum = ALFNUM.to_ascii()$/;\"\tv\tclass:anon_class_186e00360100\nrand\tinput.gd\t/^var rand: RandomNumberGenerator = RandomNumberGenerator.new()$/;\"\tv\tclass:anon_class_186e00360100\ttyperef:typename:RandomNumberGenerator\nlobbies\tinput.gd\t/^var lobbies: Dictionary = {}$/;\"\tv\tclass:anon_class_186e00360100\ttyperef:typename:Dictionary\nserver\tinput.gd\t/^var server: WebSocketServer = WebSocketServer.new()$/;\"\tv\tclass:anon_class_186e00360100\ttyperef:typename:WebSocketServer\npeers\tinput.gd\t/^var peers: Dictionary = {}$/;\"\tv\tclass:anon_class_186e00360100\ttyperef:typename:Dictionary\nPeer\tinput.gd\t/^class Peer extends Reference:$/;\"\tc\tclass:anon_class_186e00360100\tinherits:Reference\nid\tinput.gd\t/^\tvar id = -1$/;\"\tv\tclass:anon_class_186e00360100.Peer\nlobby\tinput.gd\t/^\tvar lobby = \"\"$/;\"\tv\tclass:anon_class_186e00360100.Peer\ntime\tinput.gd\t/^\tvar time = OS.get_ticks_msec()$/;\"\tv\tclass:anon_class_186e00360100.Peer\n_init\tinput.gd\t/^\tfunc _init(peer_id):$/;\"\tm\tclass:anon_class_186e00360100.Peer\tsignature:(peer_id)\nLobby\tinput.gd\t/^class Lobby extends Reference:$/;\"\tc\tclass:anon_class_186e00360100\tinherits:Reference\npeers\tinput.gd\t/^\tvar peers: Array = []$/;\"\tv\tclass:anon_class_186e00360100.Lobby\ttyperef:typename:Array\nhost\tinput.gd\t/^\tvar host: int = -1$/;\"\tv\tclass:anon_class_186e00360100.Lobby\ttyperef:typename:int\nsealed\tinput.gd\t/^\tvar sealed: bool = false$/;\"\tv\tclass:anon_class_186e00360100.Lobby\ttyperef:typename:bool\ntime\tinput.gd\t/^\tvar time = 0$/;\"\tv\tclass:anon_class_186e00360100.Lobby\n_init\tinput.gd\t/^\tfunc _init(host_id: int):$/;\"\tm\tclass:anon_class_186e00360100.Lobby\tsignature:(host_id: int)\njoin\tinput.gd\t/^\tfunc join(peer_id, server) -> bool:$/;\"\tm\tclass:anon_class_186e00360100.Lobby\ttyperef:typename:bool\tsignature:(peer_id, server)\nleave\tinput.gd\t/^\tfunc leave(peer_id, server) -> bool:$/;\"\tm\tclass:anon_class_186e00360100.Lobby\ttyperef:typename:bool\tsignature:(peer_id, server)\nseal\tinput.gd\t/^\tfunc seal(peer_id, server) -> bool:$/;\"\tm\tclass:anon_class_186e00360100.Lobby\ttyperef:typename:bool\tsignature:(peer_id, server)\nCircle2D\tinput.gd\t/^class Circle2D:$/;\"\tc\tclass:anon_class_186e00360100\tinherits:Node2D\ncenter\tinput.gd\t/^\tvar center$/;\"\tv\tclass:anon_class_186e00360100.Circle2D\nradius\tinput.gd\t/^\tvar radius$/;\"\tv\tclass:anon_class_186e00360100.Circle2D\ncolor\tinput.gd\t/^\tvar color$/;\"\tv\tclass:anon_class_186e00360100.Circle2D\n_draw\tinput.gd\t/^\tfunc _draw():$/;\"\tm\tclass:anon_class_186e00360100.Circle2D\tsignature:()\n_init\tinput.gd\t/^func _init():$/;\"\tm\tclass:anon_class_186e00360100\tsignature:()\n" }, { "path": "Units/parser-gdscript.r/inner-class.d/input.gd", "content": "# Taken from godot-demo-projects/networking/webrtc_signaling/server/ws_webrtc_server.gd\n# of https://github.com/godotengine/godot-demo-projects.git\n\nextends Node\n\nconst TIMEOUT = 1000 # Unresponsive clients times out after 1 sec\nconst SEAL_TIME = 10000 # A sealed room will be closed after this time\nconst ALFNUM = \"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789\"\n\nvar _alfnum = ALFNUM.to_ascii()\n\nvar rand: RandomNumberGenerator = RandomNumberGenerator.new()\nvar lobbies: Dictionary = {}\nvar server: WebSocketServer = WebSocketServer.new()\nvar peers: Dictionary = {}\n\nclass Peer extends Reference:\n\tvar id = -1\n\tvar lobby = \"\"\n\tvar time = OS.get_ticks_msec()\n\n\tfunc _init(peer_id):\n\t\tid = peer_id\n\n\n\nclass Lobby extends Reference:\n\tvar peers: Array = []\n\tvar host: int = -1\n\tvar sealed: bool = false\n\tvar time = 0\n\n\tfunc _init(host_id: int):\n\t\thost = host_id\n\n\tfunc join(peer_id, server) -> bool:\n\t\tif sealed: return false\n\t\tif not server.has_peer(peer_id): return false\n\t\tvar new_peer: WebSocketPeer = server.get_peer(peer_id)\n\t\tnew_peer.put_packet((\"I: %d\\n\" % (1 if peer_id == host else peer_id)).to_utf8())\n\t\tfor p in peers:\n\t\t\tif not server.has_peer(p):\n\t\t\t\tcontinue\n\t\t\tserver.get_peer(p).put_packet((\"N: %d\\n\" % peer_id).to_utf8())\n\t\t\tnew_peer.put_packet((\"N: %d\\n\" % (1 if p == host else p)).to_utf8())\n\t\tpeers.push_back(peer_id)\n\t\treturn true\n\n\n\tfunc leave(peer_id, server) -> bool:\n\t\tif not peers.has(peer_id): return false\n\t\tpeers.erase(peer_id)\n\t\tvar close = false\n\t\tif peer_id == host:\n\t\t\t# The room host disconnected, will disconnect all peers.\n\t\t\tclose = true\n\t\tif sealed: return close\n\t\t# Notify other peers.\n\t\tfor p in peers:\n\t\t\tif not server.has_peer(p): return close\n\t\t\tif close:\n\t\t\t\t# Disconnect peers.\n\t\t\t\tserver.disconnect_peer(p)\n\t\t\telse:\n\t\t\t\t# Notify disconnection.\n\t\t\t\tserver.get_peer(p).put_packet((\"D: %d\\n\" % peer_id).to_utf8())\n\t\treturn close\n\n\n\tfunc seal(peer_id, server) -> bool:\n\t\t# Only host can seal the room.\n\t\tif host != peer_id: return false\n\t\tsealed = true\n\t\tfor p in peers:\n\t\t\tserver.get_peer(p).put_packet(\"S: \\n\".to_utf8())\n\t\ttime = OS.get_ticks_msec()\n\t\treturn true\n\n\n# Taken from godot-demo-projects/2d/physics_tests/test.gd\nclass Circle2D:\n\textends Node2D\n\tvar center\n\tvar radius\n\tvar color\n\n\tfunc _draw():\n\t\tdraw_circle(center, radius, color)\n\nfunc _init():\n\tserver.connect(\"data_received\", self, \"_on_data\")\n\tserver.connect(\"client_connected\", self, \"_peer_connected\")\n\tserver.connect(\"client_disconnected\", self, \"_peer_disconnected\")\n\n\n# ...\n" }, { "path": "Units/parser-gdscript.r/modifiers.d/args.ctags", "content": "--sort=no\n--kinds-GDScript=+zl\n--fields=+E\n--fields-GDScript={annotations}\n--extras-GDScript=+{implicitClass}\n" }, { "path": "Units/parser-gdscript.r/modifiers.d/expected.tags", "content": "anon_class_025551790100\tinput.gd\t/^# Taken from godot-demo-projects\\/3d\\/voxel\\/world\\/chunk.gd$/;\"\tc\textras:anonymous,implicitClass\n_create_block_collider\tinput.gd\t/^func _create_block_collider(block_sub_position):$/;\"\tm\tclass:anon_class_025551790100\nblock_sub_position\tinput.gd\t/^func _create_block_collider(block_sub_position):$/;\"\tz\tmethod:anon_class_025551790100._create_block_collider\tfile:\ncollider\tinput.gd\t/^ var collider = CollisionShape.new()$/;\"\tl\tmethod:anon_class_025551790100._create_block_collider\tfile:\ncalculate_block_uvs\tinput.gd\t/^static func calculate_block_uvs(block_id):$/;\"\tm\tclass:anon_class_025551790100\tannotations:static\nblock_id\tinput.gd\t/^static func calculate_block_uvs(block_id):$/;\"\tz\tmethod:anon_class_025551790100.calculate_block_uvs\tfile:\nrow\tinput.gd\t/^ var row = block_id \\/ TEXTURE_SHEET_WIDTH$/;\"\tl\tmethod:anon_class_025551790100.calculate_block_uvs\tfile:\ncol\tinput.gd\t/^ var col = block_id % TEXTURE_SHEET_WIDTH$/;\"\tl\tmethod:anon_class_025551790100.calculate_block_uvs\tfile:\nid\tinput.gd\t/^func id(a):$/;\"\tm\tclass:anon_class_025551790100\na\tinput.gd\t/^func id(a):$/;\"\tz\tmethod:anon_class_025551790100.id\tfile:\nr\tinput.gd\t/^remote func r(b):$/;\"\tm\tclass:anon_class_025551790100\tannotations:remote\nb\tinput.gd\t/^remote func r(b):$/;\"\tz\tmethod:anon_class_025551790100.r\tfile:\nx\tinput.gd\t/^remote static func x(c):$/;\"\tm\tclass:anon_class_025551790100\tannotations:remote,static\nc\tinput.gd\t/^remote static func x(c):$/;\"\tz\tmethod:anon_class_025551790100.x\tfile:\n" }, { "path": "Units/parser-gdscript.r/modifiers.d/input.gd", "content": "# Taken from godot-demo-projects/3d/voxel/world/chunk.gd\nfunc _create_block_collider(block_sub_position):\n var collider = CollisionShape.new()\n collider.shape = BoxShape.new()\n collider.shape.extents = Vector3.ONE / 2\n collider.transform.origin = block_sub_position + Vector3.ONE / 2\n add_child(collider)\n\nstatic func calculate_block_uvs(block_id):\n # This method only supports square texture sheets.\n var row = block_id / TEXTURE_SHEET_WIDTH\n var col = block_id % TEXTURE_SHEET_WIDTH\n\n return [\n TEXTURE_TILE_SIZE * Vector2(col, row),\n TEXTURE_TILE_SIZE * Vector2(col, row + 1),\n TEXTURE_TILE_SIZE * Vector2(col + 1, row),\n TEXTURE_TILE_SIZE * Vector2(col + 1, row + 1),\n ]\n\nfunc id(a):\n\treturn a\n\nremote func r(b):\n\treturn b\n\nremote static func x(c):\n\treturn c\n" }, { "path": "Units/parser-gdscript.r/no-implicit-class.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+rEiS\n" }, { "path": "Units/parser-gdscript.r/no-implicit-class.d/expected.tags", "content": "BaseClass\tinput.gd\t/^extends BaseClass$/;\"\tc\troles:extended\textras:reference\nMyClass\tinput.gd\t/^class_name MyClass, \"res:\\/\\/path\\/to\\/optional\\/icon.svg\"$/;\"\tc\troles:def\na\tinput.gd\t/^@export_range(start=0, end=100, step=1) var a = 5$/;\"\tv\troles:def\tannotations:export_range(start=0, end=100, step=1)\ns\tinput.gd\t/^var s = \"Hello\"$/;\"\tv\troles:def\tannotations:export\narr\tinput.gd\t/^@onready var arr = [1, 2, 3]$/;\"\tv\troles:def\tannotations:onready\ndict\tinput.gd\t/^var dict = {\"key\": \"value\", 2: 3}$/;\"\tv\troles:def\ntyped_var\tinput.gd\t/^var typed_var: int$/;\"\tv\ttyperef:typename:int\troles:def\ninferred_type\tinput.gd\t/^inferred_type\\\\$/;\"\tv\troles:def\tannotations:onready,export_multiline\nANSWER\tinput.gd\t/^const ANSWER = 42$/;\"\tC\troles:def\nTHE_NAME\tinput.gd\t/^const THE_NAME:String = \"Charly\"$/;\"\tC\ttyperef:typename:String\troles:def\nanon_enum_84e343bf0104\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\tg\troles:def\textras:anonymous\nUNIT_NEUTRAL\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\te\tenum:anon_enum_84e343bf0104\tfile:\troles:def\nUNIT_ENEMY\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\te\tenum:anon_enum_84e343bf0104\tfile:\troles:def\nUNIT_ALL\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\te\tenum:anon_enum_84e343bf0104\tfile:\troles:def\nNamed\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\tg\troles:def\nTHING_1\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\te\tenum:Named\tfile:\troles:def\nTHING_2\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\te\tenum:Named\tfile:\troles:def\nANOTHER_THING\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\te\tenum:Named\tfile:\troles:def\nv2\tinput.gd\t/^var v2 = Vector2(1, 2)$/;\"\tv\troles:def\nv3\tinput.gd\t/^var v3 = Vector3(1, 2, 3)$/;\"\tv\troles:def\nsome_function\tinput.gd\t/^func some_function(param1: Vector3, param2: int) -> int:$/;\"\tm\ttyperef:typename:int\tsignature:(param1: Vector3, param2: int)\troles:def\tannotations:master\nsomething\tinput.gd\t/^func something(p1, p2):$/;\"\tm\tsignature:(p1, p2)\troles:def\tannotations:puppet\nSomething\tinput.gd\t/^class Something:$/;\"\tc\tinherits:\troles:def\na\tinput.gd\t/^ var a = 10$/;\"\tv\tclass:Something\troles:def\n_private_var\tinput.gd\t/^ const _private_var:String = \"hi\\\\n\\\\\\\\escape\"$/;\"\tC\tclass:Something\ttyperef:typename:String\troles:def\nfoooooooo\tinput.gd\t/^\tfunc foooooooo() -> String:$/;\"\tm\tclass:Something\ttyperef:typename:String\tsignature:()\troles:def\n_init\tinput.gd\t/^func _init():$/;\"\tm\tsignature:()\troles:def\n" }, { "path": "Units/parser-gdscript.r/no-implicit-class.d/input.gd", "content": "# Derived from https://docs.godotengine.org/en/latest/tutorials/scripting/gdscript/gdscript_basics.html\n\n# A file is a class but it has no name. The name is given only when\n# class_name is used.\n\n# Inheritance\n\nextends BaseClass\n\n# (optional) class definition with a custom icon\n\nclass_name MyClass, \"res://path/to/optional/icon.svg\"\n\n\n# Member variables\n\n@export_range(start=0, end=100, step=1) var a = 5\n@export\nvar s = \"Hello\"\n@onready var arr = [1, 2, 3]\nvar dict = {\"key\": \"value\", 2: 3}\nvar typed_var: int\n@onready\n@export_multiline\nvar\\\ninferred_type\\\n:=\\\n\"String\"\n\n# Constants\n\nconst ANSWER = 42\nconst THE_NAME:String = \"Charly\"\n\n# Enums\n\nenum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}\nenum Named {THING_1, THING_2, ANOTHER_THING=1}\n\n# Built-in vector types\n\nvar v2 = Vector2(1, 2)\nvar v3 = Vector3(1, 2, 3)\n\n\n# Function\n\n@master\nfunc some_function(param1: Vector3, param2: int) -> int:\n var local_var = 5\n\n if param1 < local_var:\n print(param1)\n elif param2 > 5:\n print(param2)\n elif param2 == 2:\n print(20)\n elif param2 <= 2:\n print((-20 %\n\n\n\n3) / 5)\n else:\n print(\"Fail!\")\n\n for i in range(20):\n print(i)\n\n while param2 != 0:\n param2 -= 1\n\n var local_var2 = param1 + 3\n return local_var2\n\n\n# Functions override functions with the same name on the base/parent class.\n# If you still want to call them, use '.' (like 'super' in other languages).\n@puppet\nfunc something(p1, p2):\n .something(p1, p2)\n\n\n# Inner class\n\nclass Something:\n var a = 10\n const _private_var:String = \"hi\\n\\\\escape\"\n\tfunc foooooooo() -> String:\n\t\tprint(\"\"\"\n\t\ttest\\\\\n\t\t\n\t\ttest\"\"\")\n return \"\"\n\n# Constructor\n\nfunc _init():\n print(\"Constructed!\")\n var lv = Something.new()\n print(lv.a)\n" }, { "path": "Units/parser-gdscript.r/sample.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+rEiS\n--extras-GDScript=+{implicitClass}\n" }, { "path": "Units/parser-gdscript.r/sample.d/expected.tags", "content": "MyClass\tinput.gd\t/^class_name MyClass, \"res:\\/\\/path\\/to\\/optional\\/icon.svg\"$/;\"\tc\tinherits:BaseClass\troles:def\nBaseClass\tinput.gd\t/^extends BaseClass$/;\"\tc\troles:extended\textras:reference\na\tinput.gd\t/^@export_range(start=0, end=100, step=1) var a = 5$/;\"\tv\tclass:MyClass\troles:def\tannotations:export_range(start=0, end=100, step=1)\ns\tinput.gd\t/^var s = \"Hello\"$/;\"\tv\tclass:MyClass\troles:def\tannotations:export\narr\tinput.gd\t/^@onready var arr = [1, 2, 3]$/;\"\tv\tclass:MyClass\troles:def\tannotations:onready\ndict\tinput.gd\t/^var dict = {\"key\": \"value\", 2: 3}$/;\"\tv\tclass:MyClass\troles:def\ntyped_var\tinput.gd\t/^var typed_var: int$/;\"\tv\tclass:MyClass\ttyperef:typename:int\troles:def\ninferred_type\tinput.gd\t/^inferred_type\\\\$/;\"\tv\tclass:MyClass\troles:def\tannotations:onready,export_multiline\nANSWER\tinput.gd\t/^const ANSWER = 42$/;\"\tC\tclass:MyClass\troles:def\nTHE_NAME\tinput.gd\t/^const THE_NAME:String = \"Charly\"$/;\"\tC\tclass:MyClass\ttyperef:typename:String\troles:def\nanon_enum_e3cc11790204\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\tg\tclass:MyClass\troles:def\textras:anonymous\nUNIT_NEUTRAL\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\te\tenum:MyClass.anon_enum_e3cc11790204\tfile:\troles:def\nUNIT_ENEMY\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\te\tenum:MyClass.anon_enum_e3cc11790204\tfile:\troles:def\nUNIT_ALL\tinput.gd\t/^enum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}$/;\"\te\tenum:MyClass.anon_enum_e3cc11790204\tfile:\troles:def\nNamed\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\tg\tclass:MyClass\troles:def\nTHING_1\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\te\tenum:MyClass.Named\tfile:\troles:def\nTHING_2\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\te\tenum:MyClass.Named\tfile:\troles:def\nANOTHER_THING\tinput.gd\t/^enum Named {THING_1, THING_2, ANOTHER_THING=1}$/;\"\te\tenum:MyClass.Named\tfile:\troles:def\nv2\tinput.gd\t/^var v2 = Vector2(1, 2)$/;\"\tv\tclass:MyClass\troles:def\nv3\tinput.gd\t/^var v3 = Vector3(1, 2, 3)$/;\"\tv\tclass:MyClass\troles:def\nsome_function\tinput.gd\t/^func some_function(param1: Vector3, param2: int) -> int:$/;\"\tm\tclass:MyClass\ttyperef:typename:int\tsignature:(param1: Vector3, param2: int)\troles:def\tannotations:master\nsomething\tinput.gd\t/^func something(p1, p2):$/;\"\tm\tclass:MyClass\tsignature:(p1, p2)\troles:def\tannotations:puppet\nSomething\tinput.gd\t/^class Something:$/;\"\tc\tclass:MyClass\tinherits:\troles:def\na\tinput.gd\t/^ var a = 10$/;\"\tv\tclass:MyClass.Something\troles:def\n_private_var\tinput.gd\t/^ const _private_var:String = \"hi\\\\n\\\\\\\\escape\"$/;\"\tC\tclass:MyClass.Something\ttyperef:typename:String\troles:def\nfoooooooo\tinput.gd\t/^\tfunc foooooooo() -> String:$/;\"\tm\tclass:MyClass.Something\ttyperef:typename:String\tsignature:()\troles:def\n_init\tinput.gd\t/^func _init():$/;\"\tm\tclass:MyClass\tsignature:()\troles:def\n" }, { "path": "Units/parser-gdscript.r/sample.d/input.gd", "content": "# Derived from https://docs.godotengine.org/en/latest/tutorials/scripting/gdscript/gdscript_basics.html\n\n# A file is a class!\n\n# Inheritance\n\nextends BaseClass\n\n# (optional) class definition with a custom icon\n\nclass_name MyClass, \"res://path/to/optional/icon.svg\"\n\n\n# Member variables\n\n@export_range(start=0, end=100, step=1) var a = 5\n@export\nvar s = \"Hello\"\n@onready var arr = [1, 2, 3]\nvar dict = {\"key\": \"value\", 2: 3}\nvar typed_var: int\n@onready\n@export_multiline\nvar\\\ninferred_type\\\n:=\\\n\"String\"\n\n# Constants\n\nconst ANSWER = 42\nconst THE_NAME:String = \"Charly\"\n\n# Enums\n\nenum {UNIT_NEUTRAL, UNIT_ENEMY, UNIT_ALL}\nenum Named {THING_1, THING_2, ANOTHER_THING=1}\n\n# Built-in vector types\n\nvar v2 = Vector2(1, 2)\nvar v3 = Vector3(1, 2, 3)\n\n\n# Function\n\n@master\nfunc some_function(param1: Vector3, param2: int) -> int:\n var local_var = 5\n\n if param1 < local_var:\n print(param1)\n elif param2 > 5:\n print(param2)\n elif param2 == 2:\n print(20)\n elif param2 <= 2:\n print((-20 %\n\n\n\n3) / 5)\n else:\n print(\"Fail!\")\n\n for i in range(20):\n print(i)\n\n while param2 != 0:\n param2 -= 1\n\n var local_var2 = param1 + 3\n return local_var2\n\n\n# Functions override functions with the same name on the base/parent class.\n# If you still want to call them, use '.' (like 'super' in other languages).\n@puppet\nfunc something(p1, p2):\n .something(p1, p2)\n\n\n# Inner class\n\nclass Something:\n var a = 10\n const _private_var:String = \"hi\\n\\\\escape\"\n\tfunc foooooooo() -> String:\n\t\tprint(\"\"\"\n\t\ttest\\\\\n\t\t\n\t\ttest\"\"\")\n return \"\"\n\n# Constructor\n\nfunc _init():\n print(\"Constructed!\")\n var lv = Something.new()\n print(lv.a)\n" }, { "path": "Units/parser-gdscript.r/signal.d/args.ctags", "content": "--sort=no\n--fields=+SKiE\n--kinds-GDScript=+z\n--extras-GDScript=+{implicitClass}\n" }, { "path": "Units/parser-gdscript.r/signal.d/expected.tags", "content": "anon_class_e8da5fd50100\tinput.gd\t/^extends Node$/;\"\tclass\tinherits:Node\textras:anonymous,implicitClass\nfinished\tinput.gd\t/^signal finished(next_state_name)$/;\"\tsignal\tclass:anon_class_e8da5fd50100\tsignature:(next_state_name)\nnext_state_name\tinput.gd\t/^signal finished(next_state_name)$/;\"\tparameter\tsignal:anon_class_e8da5fd50100.finished\tfile:\nenter\tinput.gd\t/^func enter():$/;\"\tmethod\tclass:anon_class_e8da5fd50100\tsignature:()\nexit\tinput.gd\t/^func exit():$/;\"\tmethod\tclass:anon_class_e8da5fd50100\tsignature:()\nhandle_input\tinput.gd\t/^func handle_input(_event):$/;\"\tmethod\tclass:anon_class_e8da5fd50100\tsignature:(_event)\n_event\tinput.gd\t/^func handle_input(_event):$/;\"\tparameter\tmethod:anon_class_e8da5fd50100.handle_input\tfile:\nupdate\tinput.gd\t/^func update(_delta):$/;\"\tmethod\tclass:anon_class_e8da5fd50100\tsignature:(_delta)\n_delta\tinput.gd\t/^func update(_delta):$/;\"\tparameter\tmethod:anon_class_e8da5fd50100.update\tfile:\n_on_animation_finished\tinput.gd\t/^func _on_animation_finished(_anim_name):$/;\"\tmethod\tclass:anon_class_e8da5fd50100\tsignature:(_anim_name)\n_anim_name\tinput.gd\t/^func _on_animation_finished(_anim_name):$/;\"\tparameter\tmethod:anon_class_e8da5fd50100._on_animation_finished\tfile:\nanon_class_88c08fb20100\tinput-0.gd\t/^signal start_game$/;\"\tclass\textras:anonymous,implicitClass\nstart_game\tinput-0.gd\t/^signal start_game$/;\"\tsignal\tclass:anon_class_88c08fb20100\nC\tinput-1.gd\t/^class_name C, \"res:\\/\\/path\\/to\\/optional\\/icon.svg\"$/;\"\tclass\tinherits:B\nsdf\tinput-1.gd\t/^signal sdf$/;\"\tsignal\tclass:C\ns\tinput-1.gd\t/^var s = \"hello\"$/;\"\tvariable\tclass:C\n" }, { "path": "Units/parser-gdscript.r/signal.d/input-0.gd", "content": "signal start_game\n" }, { "path": "Units/parser-gdscript.r/signal.d/input-1.gd", "content": "extends B\n\nsignal sdf\nclass_name C, \"res://path/to/optional/icon.svg\"\n\nvar s = \"hello\"\n" }, { "path": "Units/parser-gdscript.r/signal.d/input.gd", "content": "extends Node\n# Base interface for all states: it doesn't do anything by itself,\n# but forces us to pass the right arguments to the methods below\n# and makes sure every State object had all of these methods.\n\n# warning-ignore:unused_signal\nsignal finished(next_state_name)\n\n# Initialize the state. E.g. change the animation.\nfunc enter():\n\tpass\n\n\n# Clean up the state. Reinitialize values like a timer.\nfunc exit():\n\tpass\n\n\nfunc handle_input(_event):\n\tpass\n\n\nfunc update(_delta):\n\tpass\n\n\nfunc _on_animation_finished(_anim_name):\n\tpass\n\n" }, { "path": "Units/parser-gemspec.r/simple-gemspec.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-gemspec.r/simple-gemspec.d/expected.tags", "content": "rspec/core/version\tinput.gemspec\t/^require \"rspec\\/core\\/version\"$/;\"\tL\troles:required\nrspec-core\tinput.gemspec\t/^ s.name = \"rspec-core\"$/;\"\tg\troles:def\nrspec-support\tinput.gemspec\t/^ s.add_runtime_dependency \"rspec-support\", \"= #{RSpec::Core::Version::STRING}\"$/;\"\tg\troles:runtimeDep\nrspec-support\tinput.gemspec\t/^ s.add_runtime_dependency \"rspec-support\", \"~> #{RSpec::Core::Version::STRING.split('.')[0..1/;\"\tg\troles:runtimeDep\ncucumber\tinput.gemspec\t/^ s.add_development_dependency \"cucumber\", \"~> 1.3\"$/;\"\tg\troles:develDep\nminitest\tinput.gemspec\t/^ s.add_development_dependency \"minitest\", \"~> 5.3\"$/;\"\tg\troles:develDep\naruba\tinput.gemspec\t/^ s.add_development_dependency %q{aruba}, \"~> 0.14.9\"$/;\"\tg\troles:develDep\ncoderay\tinput.gemspec\t/^ s.add_development_dependency %q[coderay], \"~> 1.1.1\"$/;\"\tg\troles:develDep\nmocha\tinput.gemspec\t/^ s.add_development_dependency %q(mocha), \"~> 0.13.0\"$/;\"\tg\troles:develDep\nrr\tinput.gemspec\t/^ s.add_development_dependency %q, \"~> 1.0.4\"$/;\"\tg\troles:develDep\nflexmock\tinput.gemspec\t/^ s.add_development_dependency %q flexmock , \"~> 0.9.0\"$/;\"\tg\troles:develDep\nthread_order\tinput.gemspec\t/^ s.add_development_dependency %q!thread_order!, \"~> 1.1.0\"$/;\"\tg\troles:develDep\nstrange{name}(just){-}{-}{testing}\tinput.gemspec\t/^ s.add_runtime_dependency %q{strange{name}(just){-}{-}{testing}}.freeze, [\">= 1.2.4\".freez/;\"\tg\troles:runtimeDep\nnet-ssh\tinput.gemspec\t/^ s.add_runtime_dependency(\"net-ssh\", \">= 1.0.1\")$/;\"\tg\troles:runtimeDep\ned25519\tinput.gemspec\t/^ s.add_runtime_dependency(%q.freeze, [\">= 1.2.4\".freeze, \"< 1.4\".freeze])$/;\"\tg\troles:runtimeDep\nstrangejust-for-testing\tinput.gemspec\t/^ s.add_runtime_dependency(%qjust-for-testing>.freeze, [\">= 1.2.4\".freeze, \"< 1.4\"/;\"\tg\troles:runtimeDep\nkatello/version\tinput-0.gemspec\t/^require \"katello\\/version\"$/;\"\tL\troles:required\nkatello\tinput-0.gemspec\t/^ gem.name = \"katello\"$/;\"\tg\troles:def\nrails\tinput-0.gemspec\t/^ gem.add_dependency \"rails\"$/;\"\tg\troles:runtimeDep\nG1\tinput-1.gemspec\t/^ gem.name = %q!G1!$/;\"\tg\troles:def\n" }, { "path": "Units/parser-gemspec.r/simple-gemspec.d/input-0.gemspec", "content": "# Derrived from katello/katello.gemspec\n$LOAD_PATH.push File.expand_path(\"../lib\", __FILE__)\n\n# Maintain your gem's version:\nrequire \"katello/version\"\n\n# Describe your gem and declare its dependencies:\nGem::Specification.new do |gem|\n gem.name = \"katello\"\n gem.version = Katello::VERSION\n gem.authors = [\"N/A\"]\n gem.email = [\"katello-devel@redhat.com\"]\n gem.homepage = \"http://www.katello.org\"\n gem.summary = \"\"\n gem.description = \"Content and Subscription Management plugin for Foreman\"\n\n gem.files = Dir[\"{app,vendor,lib,db,ca,config,locale}/**/*\"] + [\"LICENSE.txt\", \"README.md\"]\n gem.files += Dir[\"engines/bastion_katello/{app,vendor,lib,config}/**/*\"]\n gem.files += Dir[\"engines/bastion_katello/{README.md,bastion_katello.gemspec}\"]\n\n gem.require_paths = [\"lib\"]\n\n # Core Dependencies\n gem.add_dependency \"rails\"\n\n # ...\nend\n" }, { "path": "Units/parser-gemspec.r/simple-gemspec.d/input-1.gemspec", "content": "Gem::Specification.new do |gem|\n gem.name = %q!G1!\n # ...\nend\n" }, { "path": "Units/parser-gemspec.r/simple-gemspec.d/input.gemspec", "content": "# Taken from rspec-core/rspec-core.gemspec\n\n# -*- encoding: utf-8 -*-\n$LOAD_PATH.unshift File.expand_path(\"../lib\", __FILE__)\nrequire \"rspec/core/version\"\n\nGem::Specification.new do |s|\n s.name = \"rspec-core\"\n s.version = RSpec::Core::Version::STRING\n s.platform = Gem::Platform::RUBY\n s.license = \"MIT\"\n s.authors = [\"Steven Baker\", \"David Chelimsky\", \"Chad Humphries\", \"Myron Marston\"]\n s.email = \"rspec@googlegroups.com\"\n s.homepage = \"https://github.com/rspec/rspec-core\"\n s.summary = \"rspec-core-#{RSpec::Core::Version::STRING}\"\n s.description = \"BDD for Ruby. RSpec runner and example groups.\"\n\n s.metadata = {\n 'bug_tracker_uri' => 'https://github.com/rspec/rspec-core/issues',\n 'changelog_uri' => \"https://github.com/rspec/rspec-core/blob/v#{s.version}/Changelog.md\",\n 'documentation_uri' => 'https://rspec.info/documentation/',\n 'mailing_list_uri' => 'https://groups.google.com/forum/#!forum/rspec',\n 'source_code_uri' => 'https://github.com/rspec/rspec-core',\n }\n\n s.files = `git ls-files -- lib/*`.split(\"\\n\")\n s.files += %w[README.md LICENSE.md Changelog.md .yardopts .document]\n s.test_files = []\n s.bindir = 'exe'\n s.executables = `git ls-files -- exe/*`.split(\"\\n\").map{ |f| File.basename(f) }\n s.rdoc_options = [\"--charset=UTF-8\"]\n s.require_path = \"lib\"\n\n s.required_ruby_version = '>= 1.8.7'\n\n private_key = File.expand_path('~/.gem/rspec-gem-private_key.pem')\n if File.exist?(private_key)\n s.signing_key = private_key\n s.cert_chain = [File.expand_path('~/.gem/rspec-gem-public_cert.pem')]\n end\n\n if RSpec::Core::Version::STRING =~ /[a-zA-Z]+/\n # rspec-support is locked to our version when running pre,rc etc\n s.add_runtime_dependency \"rspec-support\", \"= #{RSpec::Core::Version::STRING}\"\n else\n # rspec-support must otherwise match our major/minor version\n s.add_runtime_dependency \"rspec-support\", \"~> #{RSpec::Core::Version::STRING.split('.')[0..1].concat(['0']).join('.')}\"\n end\n\n s.add_development_dependency \"cucumber\", \"~> 1.3\"\n s.add_development_dependency \"minitest\", \"~> 5.3\"\n s.add_development_dependency %q{aruba}, \"~> 0.14.9\"\n\n s.add_development_dependency %q[coderay], \"~> 1.1.1\"\n\n s.add_development_dependency %q(mocha), \"~> 0.13.0\"\n s.add_development_dependency %q, \"~> 1.0.4\"\n s.add_development_dependency %q flexmock , \"~> 0.9.0\"\n s.add_development_dependency %q!thread_order!, \"~> 1.1.0\"\n s.add_development_dependency %qadonttagmea, \"~> 1.1.0\"\n s.add_runtime_dependency %q{strange{name}(just){-}{-}{testing}}.freeze, [\">= 1.2.4\".freeze, \"< 1.4\".freeze]\n s.add_runtime_dependency(\"net-ssh\", \">= 1.0.1\")\n s.add_runtime_dependency(%q.freeze, [\">= 1.2.4\".freeze, \"< 1.4\".freeze])\n s.add_runtime_dependency(%qjust-for-testing>.freeze, [\">= 1.2.4\".freeze, \"< 1.4\".freeze])\nend\n" }, { "path": "Units/parser-go.r/github-issue-2430.d/README", "content": "THis is a carsh test.\nSpecifying --kinds-Go=f makes tags output empty.\n\n" }, { "path": "Units/parser-go.r/github-issue-2430.d/args.ctags", "content": "--kinds-GO=f\n" }, { "path": "Units/parser-go.r/github-issue-2430.d/expected.tags", "content": "main\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\n" }, { "path": "Units/parser-go.r/github-issue-2430.d/input.go", "content": "// Taken from an issue #2430 opened by @aleb\npackage main\n\ntype Interval struct {\n Start, Stop string\n}\n\nfunc main() {\n}\n" }, { "path": "Units/parser-go.r/github-issue-2430.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-anonmember.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-go.r/go-anonmember.d/expected.tags", "content": "X\tinput.go\t/^type X struct {$/;\"\ts\nT1\tinput.go\t/^\tT1$/;\"\tM\tstruct:X\ttyperef:typename:T1\nT2\tinput.go\t/^\t*T2$/;\"\tM\tstruct:X\ttyperef:typename:*T2\nT3\tinput.go\t/^\tP.T3$/;\"\tM\tstruct:X\ttyperef:typename:P.T3\nT4\tinput.go\t/^\t*P.T4$/;\"\tM\tstruct:X\ttyperef:typename:*P.T4\nage\tinput.go\t/^\tage T5$/;\"\tm\tstruct:X\ttyperef:typename:T5\nskill\tinput.go\t/^\tskill *T6$/;\"\tm\tstruct:X\ttyperef:typename:*T6\naddress\tinput.go\t/^\taddress, hometown T7$/;\"\tm\tstruct:X\ttyperef:typename:T7\nhometown\tinput.go\t/^\taddress, hometown T7$/;\"\tm\tstruct:X\ttyperef:typename:T7\nnatualLang\tinput.go\t/^\tnatualLang,programmingLang *T8$/;\"\tm\tstruct:X\ttyperef:typename:*T8\nprogrammingLang\tinput.go\t/^\tnatualLang,programmingLang *T8$/;\"\tm\tstruct:X\ttyperef:typename:*T8\nperson\tinput.go\t/^\tperson P.T9$/;\"\tm\tstruct:X\ttyperef:typename:P.T9\nparent\tinput.go\t/^\tparent *P.T10$/;\"\tm\tstruct:X\ttyperef:typename:*P.T10\nlang1\tinput.go\t/^\tlang1, lang2 P.LANG$/;\"\tm\tstruct:X\ttyperef:typename:P.LANG\nlang2\tinput.go\t/^\tlang1, lang2 P.LANG$/;\"\tm\tstruct:X\ttyperef:typename:P.LANG\nlang3\tinput.go\t/^\tlang3, lang4 *P.LANG$/;\"\tm\tstruct:X\ttyperef:typename:*P.LANG\nlang4\tinput.go\t/^\tlang3, lang4 *P.LANG$/;\"\tm\tstruct:X\ttyperef:typename:*P.LANG\nQ\tinput.go\t/^\tP.Q$/;\"\tM\tstruct:X\ttyperef:typename:P.Q\nQ\tinput.go\t/^\t*P.Q$/;\"\tM\tstruct:X\ttyperef:typename:*P.Q\nY\tinput.go\t/^type Y struct {$/;\"\ts\nbyte\tinput.go\t/^\tbyte$/;\"\tM\tstruct:Y\ttyperef:typename:byte\nb\tinput.go\t/^\tb byte$/;\"\tm\tstruct:Y\ttyperef:typename:byte\nss\tinput.go\t/^\tss []string$/;\"\tm\tstruct:Y\ttyperef:typename:[]string\nbss\tinput.go\t/^\tbss [][]byte$/;\"\tm\tstruct:Y\ttyperef:typename:[][]byte\nf\tinput.go\t/^\tf func() error$/;\"\tm\tstruct:Y\ttyperef:typename:func() error\nifaces\tinput.go\t/^\tifaces []interface{}$/;\"\tm\tstruct:Y\ttyperef:typename:[]interface{}\ntags\tinput.go\t/^\ttags map[string]struct{}$/;\"\tm\tstruct:Y\ttyperef:typename:map[string]struct{}\nnotify\tinput.go\t/^\tnotify chan<- struct{}$/;\"\tm\tstruct:Y\ttyperef:typename:chan<- struct{}\np\tinput.go\t/^\tp *struct {$/;\"\tm\tstruct:Y\ttyperef:typename:*struct { x int; y int; z int; }\n" }, { "path": "Units/parser-go.r/go-anonmember.d/input.go", "content": "type X struct {\n\tT1\n\t*T2\n\tP.T3\n\t*P.T4\n\tage T5\n\tskill *T6\n\taddress, hometown T7\n\tnatualLang,programmingLang *T8\n\tperson P.T9\n\tparent *P.T10\n\tlang1, lang2 P.LANG\n\tlang3, lang4 *P.LANG\n\tP.Q\n\t*P.Q\n}\n\ntype Y struct {\n\tbyte\n\tb byte\n\tss []string\n\tbss [][]byte\n\tf func() error\n\tifaces []interface{}\n\ttags map[string]struct{}\n\tnotify chan<- struct{}\n\tp *struct {\n\t\tx int\n\t\ty int\n\t\tz int\n\t}\n}\n" }, { "path": "Units/parser-go.r/go-crash-issue-2220.d/args.ctags", "content": "--fields=nksSaf\n--file-scope=yes\n--sort=no\n--kinds-go=picsmtfv\n" }, { "path": "Units/parser-go.r/go-crash-issue-2220.d/expected.tags", "content": "temp\tinput.go\t/^package temp$/;\"\tp\tline:2\n" }, { "path": "Units/parser-go.r/go-crash-issue-2220.d/input.go", "content": "// Taken fro #2220 reported by @epheien\npackage temp\ntype Symbol = int\n" }, { "path": "Units/parser-go.r/go-crash-issue-2220.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-dont-solve-type-for-underscore-var.d/expected.tags", "content": "main\tinput.go\t/^func main () {$/;\"\tf\tpackage:main\nmain\tinput.go\t/^package main$/;\"\tp\n" }, { "path": "Units/parser-go.r/go-dont-solve-type-for-underscore-var.d/input.go", "content": "package main\n\nvar (\n\t_ int = 1\n)\n\nfunc main () {\n}\n" }, { "path": "Units/parser-go.r/go-dont-solve-type-for-underscore-var.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-end-field-for-types.d/args.ctags", "content": "--sort=no\n--fields=+{end}\n" }, { "path": "Units/parser-go.r/go-end-field-for-types.d/expected.tags", "content": "A\tinput.go\t/^package A$/;\"\tp\nPoint\tinput.go\t/^\tPoint struct {$/;\"\ts\tpackage:A\tend:7\nX\tinput.go\t/^\t\tX int$/;\"\tm\tstruct:A.Point\ttyperef:typename:int\nY\tinput.go\t/^\t\tY int$/;\"\tm\tstruct:A.Point\ttyperef:typename:int\nPoint3D\tinput.go\t/^\tPoint3D struct {$/;\"\ts\tpackage:A\tend:12\nX\tinput.go\t/^\t\tX int$/;\"\tm\tstruct:A.Point3D\ttyperef:typename:int\nY\tinput.go\t/^\t\tY int$/;\"\tm\tstruct:A.Point3D\ttyperef:typename:int\nZ\tinput.go\t/^\t\tZ int$/;\"\tm\tstruct:A.Point3D\ttyperef:typename:int\nRange\tinput.go\t/^type Range struct {$/;\"\ts\tpackage:A\tend:18\nstart\tinput.go\t/^\tstart int$/;\"\tm\tstruct:A.Range\ttyperef:typename:int\nend\tinput.go\t/^\tend int$/;\"\tm\tstruct:A.Range\ttyperef:typename:int\ns\tinput.go\t/^var s, t =$/;\"\tv\tpackage:A\nt\tinput.go\t/^var s, t =$/;\"\tv\tpackage:A\n" }, { "path": "Units/parser-go.r/go-end-field-for-types.d/input.go", "content": "package A\n\ntype (\n\tPoint struct {\n\t\tX int\n\t\tY int\n\t}\n\tPoint3D struct {\n\t\tX int\n\t\tY int\n\t\tZ int\n\t}\n)\n\ntype Range struct {\n\tstart int\n\tend int\n}\n\nvar s, t =\n\tPoint {X: 3, Y: 8},\n\tPoint {X: 3, Y: 8}\n" }, { "path": "Units/parser-go.r/go-end-field-for-types.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-funcs.d/args.ctags", "content": "--fields=+Se\n--kinds-Go=+R\n--fields-Go=+{receiver}\n" }, { "path": "Units/parser-go.r/go-funcs.d/expected.tags", "content": "T\tinput.go\t/^type T int$/;\"\tt\tpackage:main\ttyperef:typename:int\tend:19\nf1\tinput.go\t/^func f1() {$/;\"\tf\tpackage:main\tsignature:()\tend:6\nf2\tinput.go\t/^func f2(a int) {$/;\"\tf\tpackage:main\tsignature:(a int)\tend:9\nf3\tinput.go\t/^func f3(a int) string {$/;\"\tf\tpackage:main\ttyperef:typename:string\tsignature:(a int)\tend:13\nf4\tinput.go\t/^func f4(a, b, c <-chan int, d, e, f string) (A, B, C int, D string) {$/;\"\tf\tpackage:main\ttyperef:typename:(A, B, C int, D string)\tsignature:(a, b, c <-chan int, d, e, f string)\tend:17\nf5\tinput.go\t/^func (t *T) f5(\\/* comment *\\/ a, \\/*comment*\\/ \\/*comment*\\/ b string, $/;\"\tf\ttype:main.T\ttyperef:typename:(int, string)\tsignature:(a, b string, c []int)\tend:24\treceiver:t\nf6\tinput.go\t/^func (t *(T)) f6(r struct {a int `foo`; b string `bar`}) net.IP {$/;\"\tf\ttype:main.T\ttyperef:typename:net.IP\tsignature:(r struct {a int `foo`; b string `bar`})\tend:28\treceiver:t\nmain\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tsignature:()\tend:31\nmain\tinput.go\t/^package main$/;\"\tp\nt\tinput.go\t/^func (t *(T)) f6(r struct {a int `foo`; b string `bar`}) net.IP {$/;\"\tR\tfunc:main.T.f6\ttyperef:typename:T\nt\tinput.go\t/^func (t *T) f5(\\/* comment *\\/ a, \\/*comment*\\/ \\/*comment*\\/ b string, $/;\"\tR\tfunc:main.T.f5\ttyperef:typename:T\n" }, { "path": "Units/parser-go.r/go-funcs.d/input.go", "content": "package main\n\nimport \"net\"\n\nfunc f1() {\n}\n\nfunc f2(a int) {\n}\n\nfunc f3(a int) string {\n\treturn \"\"\n}\n\nfunc f4(a, b, c <-chan int, d, e, f string) (A, B, C int, D string) {\n\treturn 1, 2, 3, \"\"\n}\n\ntype T int\n\nfunc (t *T) f5(/* comment */ a, /*comment*/ /*comment*/ b string, \n\tc \t\t[]int) ( /* */ int, string ) {\n\treturn 1, \"\"\n}\n\nfunc (t *(T)) f6(r struct {a int `foo`; b string `bar`}) net.IP {\n\treturn net.IP{}\n}\n\nfunc main() {\n}\n" }, { "path": "Units/parser-go.r/go-funcs.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-goroutines.d/args.ctags", "content": "--fields=+S\n" }, { "path": "Units/parser-go.r/go-goroutines.d/expected.tags", "content": "f\tinput.go\t/^func f(from string) {$/;\"\tf\tpackage:main\tsignature:(from string)\nmain\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tsignature:()\nmain\tinput.go\t/^package main$/;\"\tp\n" }, { "path": "Units/parser-go.r/go-goroutines.d/input.go", "content": "/* https://gobyexample.com/goroutines\n * Copyright (C) Mark McGranaghan CC-BY 3.0\n * https://github.com/mmcgrana/gobyexample#license */\n// A _goroutine_ is a lightweight thread of execution.\n\npackage main\n\nimport \"fmt\"\n\nfunc f(from string) {\n for i := 0; i < 3; i++ {\n fmt.Println(from, \":\", i)\n }\n}\n\nfunc main() {\n\n // Suppose we have a function call `f(s)`. Here's how\n // we'd call that in the usual way, running it\n // synchronously.\n f(\"direct\")\n\n // To invoke this function in a goroutine, use\n // `go f(s)`. This new goroutine will execute\n // concurrently with the calling one.\n go f(\"goroutine\")\n\n // You can also start a goroutine for an anonymous\n // function call.\n go func(msg string) {\n fmt.Println(msg)\n }(\"going\")\n\n // Our two goroutines are running asynchronously in\n // separate goroutines now, so execution falls through\n // to here. This `Scanln` code requires we press a key\n // before the program exits.\n var input string\n fmt.Scanln(&input)\n fmt.Println(\"done\")\n}\n" }, { "path": "Units/parser-go.r/go-goroutines.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-helloworld.d/args.ctags", "content": "--fields=+S\n" }, { "path": "Units/parser-go.r/go-helloworld.d/expected.tags", "content": "main\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tsignature:()\nmain\tinput.go\t/^package main$/;\"\tp\n" }, { "path": "Units/parser-go.r/go-helloworld.d/input.go", "content": "/* from https://gobyexample.com/hello-world\n * Copyright (C) Mark McGranaghan CC-BY 3.0\n * https://github.com/mmcgrana/gobyexample#license */\npackage main\n\nimport \"fmt\"\n\nfunc main() {\n fmt.Println(\"hello world\")\n}\n" }, { "path": "Units/parser-go.r/go-helloworld.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-ignore-underscore-var.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-go.r/go-ignore-underscore-var.d/expected.tags", "content": "main\tinput.go\t/^package main$/;\"\tp\nF\tinput.go\t/^func F() (int, int) {$/;\"\tf\tpackage:main\ttyperef:typename:(int, int)\nx0\tinput.go\t/^var x0, y0 = F()$/;\"\tv\tpackage:main\ny0\tinput.go\t/^var x0, y0 = F()$/;\"\tv\tpackage:main\nx\tinput.go\t/^var x, _ = F()$/;\"\tv\tpackage:main\nmain\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\n" }, { "path": "Units/parser-go.r/go-ignore-underscore-var.d/input.go", "content": "package main\n\nfunc F() (int, int) {\n\treturn 1, 2\n}\n\nvar x0, y0 = F()\nvar x, _ = F()\nfunc main() {\n\tprint (x)\n\treturn\n}\n" }, { "path": "Units/parser-go.r/go-ignore-underscore-var.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-import.d/args.ctags", "content": "--fields=+rK\n--extras=+r\n--fields-Go=+{howImported}\n--sort=no\n\n" }, { "path": "Units/parser-go.r/go-import.d/expected.tags", "content": "main\tinput.go\t/^package main$/;\"\tpackage\troles:def\nfmt\tinput.go\t/^import \"fmt\"$/;\"\tpackage\troles:imported\nmain\tinput.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-0.go\t/^package main$/;\"\tpackage\troles:def\nf\tinput-0.go\t/^import f \"fmt\"$/;\"\tpackageName\troles:def\tpackage:fmt\nfmt\tinput-0.go\t/^import f \"fmt\"$/;\"\tpackage\troles:imported\tpackageName:f\nmain\tinput-0.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-1.go\t/^package main$/;\"\tpackage\troles:def\nfmt\tinput-1.go\t/^\t\"fmt\"$/;\"\tpackage\troles:imported\nmain\tinput-1.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-2.go\t/^package main$/;\"\tpackage\troles:def\nf\tinput-2.go\t/^\tf \"fmt\"$/;\"\tpackageName\troles:def\tpackage:fmt\nfmt\tinput-2.go\t/^\tf \"fmt\"$/;\"\tpackage\troles:imported\tpackageName:f\nmain\tinput-2.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-3.go\t/^package main$/;\"\tpackage\troles:def\ntime\tinput-3.go\t/^\t\"time\"$/;\"\tpackage\troles:imported\nfmt\tinput-3.go\t/^\t\"fmt\"$/;\"\tpackage\troles:imported\nmain\tinput-3.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-4.go\t/^package main$/;\"\tpackage\troles:def\nt\tinput-4.go\t/^\tt \"time\"$/;\"\tpackageName\troles:def\tpackage:time\ntime\tinput-4.go\t/^\tt \"time\"$/;\"\tpackage\troles:imported\tpackageName:t\nfmt\tinput-4.go\t/^\t\"fmt\"$/;\"\tpackage\troles:imported\nmain\tinput-4.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-5.go\t/^package main$/;\"\tpackage\troles:def\ntime\tinput-5.go\t/^\t\"time\"$/;\"\tpackage\troles:imported\nf\tinput-5.go\t/^\tf \"fmt\"$/;\"\tpackageName\troles:def\tpackage:fmt\nfmt\tinput-5.go\t/^\tf \"fmt\"$/;\"\tpackage\troles:imported\tpackageName:f\nmain\tinput-5.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-6.go\t/^package main$/;\"\tpackage\troles:def\nt\tinput-6.go\t/^\tt \"time\"$/;\"\tpackageName\troles:def\tpackage:time\ntime\tinput-6.go\t/^\tt \"time\"$/;\"\tpackage\troles:imported\tpackageName:t\nf\tinput-6.go\t/^\tf \"fmt\"$/;\"\tpackageName\troles:def\tpackage:fmt\nfmt\tinput-6.go\t/^\tf \"fmt\"$/;\"\tpackage\troles:imported\tpackageName:f\nmain\tinput-6.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\nmain\tinput-7.go\t/^package main$/;\"\tpackage\troles:def\nfmt\tinput-7.go\t/^\t. \"fmt\"$/;\"\tpackage\troles:imported\thowImported:inline\ntime\tinput-7.go\t/^\t_ \"time\"$/;\"\tpackage\troles:imported\thowImported:init\nmain\tinput-7.go\t/^func main() {$/;\"\tfunc\tpackage:main\troles:def\n" }, { "path": "Units/parser-go.r/go-import.d/input-0.go", "content": "package main\nimport f \"fmt\"\nfunc main() {\n\tf.Println(\"Hello, World!\")\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-1.go", "content": "package main\nimport (\n\t\"fmt\"\n)\n\nfunc main() {\n\tfmt.Println(\"Hello, World!\")\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-2.go", "content": "package main\nimport (\n\tf \"fmt\"\n)\n\nfunc main() {\n\tf.Println(\"Hello, World!\")\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-3.go", "content": "package main\nimport (\n\t\"time\"\n\t\"fmt\"\n)\nfunc main() {\n\tfmt.Println(\"<%s> Hello, World!\", t.Now(()\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-4.go", "content": "package main\nimport (\n\tt \"time\"\n\t\"fmt\"\n)\nfunc main() {\n\tfmt.Println(\"<%s> Hello, World!\", t.Now(()\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-5.go", "content": "package main\nimport (\n\t\"time\"\n\tf \"fmt\"\n)\nfunc main() {\n\tf.Println(\"<%s> Hello, World!\", time.Now(()\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-6.go", "content": "package main\nimport (\n\tt \"time\"\n\tf \"fmt\"\n)\nfunc main() {\n\tf.Println(\"<%s> Hello, World!\", t.Now(()\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input-7.go", "content": "package main\nimport (\n\t. \"fmt\"\n\t_ \"time\"\n)\n\nfunc main() {\n\tPrintln(\"Hello, World!\")\n}\n\n" }, { "path": "Units/parser-go.r/go-import.d/input.go", "content": "package main\nimport \"fmt\"\nfunc main() {\n\tfmt.Println(\"Hello, World!\")\n}\n\n" }, { "path": "Units/parser-go.r/go-incomplete-func.d/input.go", "content": "func ()\n" }, { "path": "Units/parser-go.r/go-incomplete-input.d/args.ctags", "content": "--fields=+S\n" }, { "path": "Units/parser-go.r/go-incomplete-input.d/input.go", "content": "var (a," }, { "path": "Units/parser-go.r/go-interface.d/README", "content": "File(s) under \"src\" directory is/are used as a test input for ctags.\nThe file(s) is/are needed to compile \"input.go\".\n\n" }, { "path": "Units/parser-go.r/go-interface.d/args.ctags", "content": "--sort=no\n--fields=+{typeref}{inherits}{signature}{scope}{kind}{end}K\n" }, { "path": "Units/parser-go.r/go-interface.d/expected.tags", "content": "main\tinput.go\t/^package main$/;\"\tkind:package\nBuffer\tinput.go\t/^type Buffer interface {$/;\"\tkind:interface\tscope:package:main\tend:11\nLocker\tinput.go\t/^type Locker interface {$/;\"\tkind:interface\tscope:package:main\tend:16\nLock\tinput.go\t/^\tLock()$/;\"\tkind:methodSpec\tscope:interface:main.Locker\tsignature:()\nUnlock\tinput.go\t/^\tUnlock()$/;\"\tkind:methodSpec\tscope:interface:main.Locker\tsignature:()\nReadWriter\tinput.go\t/^type ReadWriter interface {$/;\"\tkind:interface\tscope:package:main\tend:21\nRead\tinput.go\t/^\tRead(b Buffer) bool$/;\"\tkind:methodSpec\tscope:interface:main.ReadWriter\ttyperef:typename:bool\tsignature:(b Buffer)\nWrite\tinput.go\t/^\tWrite(b Buffer) bool$/;\"\tkind:methodSpec\tscope:interface:main.ReadWriter\ttyperef:typename:bool\tsignature:(b Buffer)\nFile\tinput.go\t/^type File interface {$/;\"\tkind:interface\tscope:package:main\tinherits:ReadWriter,Locker,ext.Processor\tend:29\nClose\tinput.go\t/^\tClose()$/;\"\tkind:methodSpec\tscope:interface:main.File\tsignature:()\nListAttr\tinput.go\t/^\tListAttr() ([][]byte, error)$/;\"\tkind:methodSpec\tscope:interface:main.File\ttyperef:typename:([][]byte, error)\tsignature:()\nmain\tinput.go\t/^func main () {$/;\"\tkind:func\tscope:package:main\tsignature:()\tend:32\n" }, { "path": "Units/parser-go.r/go-interface.d/input.go", "content": "//\n// Taken from https://golang.org/ref/spec#Interface_types\n//\n// GOPATH=$SOMEWHERE/ctags/Units/parser-go.r/go-interface.d go run $SOMEWHERE/ctags/Units/parser-go.r/go-interface.d/input.go\n//\npackage main\n\nimport \"ext\"\n\ntype Buffer interface {\n}\n\ntype Locker interface {\n\tLock()\n\tUnlock()\n}\n\ntype ReadWriter interface {\n\tRead(b Buffer) bool\n\tWrite(b Buffer) bool\n}\n\ntype File interface {\n\tReadWriter // same as adding the methods of ReadWriter\n\tLocker // same as adding the methods of Locker\n\text.Processor\n\tClose()\n\tListAttr() ([][]byte, error)\n}\n\nfunc main () {\n}\n" }, { "path": "Units/parser-go.r/go-interface.d/src/ext/iface.go", "content": "package ext\n\ntype Processor interface {\n}\n" }, { "path": "Units/parser-go.r/go-op-less-than.d/args.ctags", "content": "--fields=+S\n" }, { "path": "Units/parser-go.r/go-op-less-than.d/expected.tags", "content": "f1\tinput.go\t/^func f1(a int, b int) int {$/;\"\tf\tpackage:test\ttyperef:typename:int\tsignature:(a int, b int)\nf2\tinput.go\t/^func f2(a int, b int) int {$/;\"\tf\tpackage:test\ttyperef:typename:int\tsignature:(a int, b int)\nf3\tinput.go\t/^func f3() {}$/;\"\tf\tpackage:test\tsignature:()\ntest\tinput.go\t/^package test$/;\"\tp\n" }, { "path": "Units/parser-go.r/go-op-less-than.d/input.go", "content": "package test\n\nfunc f1(a int, b int) int {\n if a \\n\", p.X, p.Y)\n}\n\nfunc main() {\n\tp := &Point{X: 5, Y: 12}\n\tp.Render()\n}\n\nfunc (*Point) doNothing0() {\n}\n\nfunc (Point) doNothing1() {\n}\n\nfunc () wrongSyntax0() {\n}\n\nfunc (+) wrongSyntax1() {\n}\n\nfunc (a-) wrongSyntax2() {\n}\n\nfunc (brokenInput\n" }, { "path": "Units/parser-go.r/go-timeouts.d/args.ctags", "content": "--fields=+S\n" }, { "path": "Units/parser-go.r/go-timeouts.d/expected.tags", "content": "main\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tsignature:()\nmain\tinput.go\t/^package main$/;\"\tp\n" }, { "path": "Units/parser-go.r/go-timeouts.d/input.go", "content": "/* from https://gobyexample.com/timeouts\n * Copyright (C) Mark McGranaghan CC-BY 3.0\n * https://github.com/mmcgrana/gobyexample#license */\n// _Timeouts_ are important for programs that connect to\n// external resources or that otherwise need to bound\n// execution time. Implementing timeouts in Go is easy and\n// elegant thanks to channels and `select`.\n\npackage main\n\nimport \"time\"\nimport \"fmt\"\n\nfunc main() {\n\n // For our example, suppose we're executing an external\n // call that returns its result on a channel `c1`\n // after 2s.\n c1 := make(chan string, 1)\n go func() {\n time.Sleep(time.Second * 2)\n c1 <- \"result 1\"\n }()\n\n // Here's the `select` implementing a timeout.\n // `res := <-c1` awaits the result and `<-Time.After`\n // awaits a value to be sent after the timeout of\n // 1s. Since `select` proceeds with the first\n // receive that's ready, we'll take the timeout case\n // if the operation takes more than the allowed 1s.\n select {\n case res := <-c1:\n fmt.Println(res)\n case <-time.After(time.Second * 1):\n fmt.Println(\"timeout 1\")\n }\n\n // If we allow a longer timeout of 3s, then the receive\n // from `c2` will succeed and we'll print the result.\n c2 := make(chan string, 1)\n go func() {\n time.Sleep(time.Second * 2)\n c2 <- \"result 2\"\n }()\n select {\n case res := <-c2:\n fmt.Println(res)\n case <-time.After(time.Second * 3):\n fmt.Println(\"timeout 2\")\n }\n}\n\n// todo: cancellation?\n\n" }, { "path": "Units/parser-go.r/go-timeouts.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-torture.d/args.ctags", "content": "--fields=+Se\n" }, { "path": "Units/parser-go.r/go-torture.d/expected.tags", "content": "A\tinput.go\t/^const (A = iota;B;C;$/;\"\tc\tpackage:main\nB\tinput.go\t/^const (A = iota;B;C;$/;\"\tc\tpackage:main\nC\tinput.go\t/^const (A = iota;B;C;$/;\"\tc\tpackage:main\nD\tinput.go\t/^\tD = iota << (1 + iota*2)$/;\"\tc\tpackage:main\nE\tinput.go\t/^\tE$/;\"\tc\tpackage:main\nF\tinput.go\t/^\tF=3.14*(1+2*3)\\/34e7;I=1)$/;\"\tc\tpackage:main\nG\tinput.go\t/^const ignored int*\\/const (G=6); var g int$/;\"\tc\tpackage:main\nH\tinput.go\t/^func (tt * T7) f4(a func () func ()) (func (), int) {return func (){}, 1};func f5(){};const H=1$/;\"\tc\tpackage:main\nI\tinput.go\t/^\tF=3.14*(1+2*3)\\/34e7;I=1)$/;\"\tc\tpackage:main\nReader\tinput.go\t/^\t\tReader()$/;\"\tn\tinterface:main.T5\tsignature:()\nT1\tinput.go\t/^\tT1 `annotation`$/;\"\tM\tstruct:main.T6\ttyperef:typename:T1\nT1\tinput.go\t/^\tT1 map[string]int$/;\"\tt\tpackage:main\ttyperef:typename:map[string]int\tend:6\nT2\tinput.go\t/^\t*T2$/;\"\tM\tstruct:main.T6\ttyperef:typename:*T2\nT2\tinput.go\t/^\tT2 <-chan float32$/;\"\tt\tpackage:main\ttyperef:typename:<-chan float32\tend:7\nT3\tinput.go\t/^\tT3 chan []string$/;\"\tt\tpackage:main\ttyperef:typename:chan []string\tend:8\nT4\tinput.go\t/^\tT4 chan<- *[12]string$/;\"\tt\tpackage:main\ttyperef:typename:chan<- *[12]string\tend:9\nT5\tinput.go\t/^\tT5 interface {$/;\"\ti\tpackage:main\tend:14\nT6\tinput.go\t/^type T6 struct {$/;\"\ts\tpackage:main\tend:24\nT7\tinput.go\t/^type (T7 func (a struct{_ int; _ float32}, b int) (int, map[string]int);T8 float32)$/;\"\tt\tpackage:main\ttyperef:typename:func (a struct{_ int; _ float32}, b int) (int, map[string]int)\tend:31\nT8\tinput.go\t/^type (T7 func (a struct{_ int; _ float32}, b int) (int, map[string]int);T8 float32)$/;\"\tt\tpackage:main\ttyperef:typename:float32\tend:31\nT9\tinput.go\t/^func f1() {};func f2() {};type\\/*no newline here*\\/T9 int\\/*var ignored int$/;\"\tt\tpackage:main\ttyperef:typename:int\tend:39\nWriter\tinput.go\t/^\t\tWriter()$/;\"\tn\tinterface:main.T5\tsignature:()\n_a\tinput.go\t/^\t_a, _b, _c, _d int$/;\"\tm\tstruct:main.T6\ttyperef:typename:int\n_b\tinput.go\t/^\t_a, _b, _c, _d int$/;\"\tm\tstruct:main.T6\ttyperef:typename:int\n_c\tinput.go\t/^\t_a, _b, _c, _d int$/;\"\tm\tstruct:main.T6\ttyperef:typename:int\n_d\tinput.go\t/^\t_a, _b, _c, _d int$/;\"\tm\tstruct:main.T6\ttyperef:typename:int\n_e\tinput.go\t/^\t_e float32$/;\"\tm\tstruct:main.T6\ttyperef:typename:float32\na\tinput.go\t/^var (a, b, c int$/;\"\tv\tpackage:main\ttyperef:typename:int\nb\tinput.go\t/^var (a, b, c int$/;\"\tv\tpackage:main\ttyperef:typename:int\nc\tinput.go\t/^var (a, b, c int$/;\"\tv\tpackage:main\ttyperef:typename:int\nd\tinput.go\t/^d T5$/;\"\tv\tpackage:main\ttyperef:interface:T5\ne\tinput.go\t/^e T4$/;\"\tv\tpackage:main\ttyperef:type:T4\nf\tinput.go\t/^f interface{})$/;\"\tv\tpackage:main\ttyperef:typename:interface{}\nf1\tinput.go\t/^func f1() {};func f2() {};type\\/*no newline here*\\/T9 int\\/*var ignored int$/;\"\tf\tpackage:main\tsignature:()\tend:38\nf2\tinput.go\t/^func f1() {};func f2() {};type\\/*no newline here*\\/T9 int\\/*var ignored int$/;\"\tf\tpackage:main\tsignature:()\tend:38\nf3\tinput.go\t/^func (t *T1) f3() (a, b int){$/;\"\tf\ttype:main.T1\ttyperef:typename:(a, b int)\tsignature:()\tend:43\nf4\tinput.go\t/^func (tt * T7) f4(a func () func ()) (func (), int) {return func (){}, 1};func f5(){};const H=1$/;\"\tf\ttype:main.T7\ttyperef:typename:(func (), int)\tsignature:(a func () func ())\tend:45\nf5\tinput.go\t/^func (tt * T7) f4(a func () func ()) (func (), int) {return func (){}, 1};func f5(){};const H=1$/;\"\tf\tpackage:main\tsignature:()\tend:45\nfoo\tinput.go\t/^\t\tfoo()$/;\"\tn\tinterface:main.T5\tsignature:()\ng\tinput.go\t/^const ignored int*\\/const (G=6); var g int$/;\"\tv\tpackage:main\ttyperef:typename:int\nh\tinput.go\t/^}; var h int$/;\"\tv\tpackage:main\ttyperef:typename:int\nint\tinput.go\t/^\tint$/;\"\tM\tstruct:main.T6\ttyperef:typename:int\nmain\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tsignature:()\tend:50\nmain\tinput.go\t/^package main$/;\"\tp\n" }, { "path": "Units/parser-go.r/go-torture.d/input.go", "content": "package main\n\nimport \"fmt\"\n\ntype (\n\tT1 map[string]int\n\tT2 <-chan float32\n\tT3 chan []string\n\tT4 chan<- *[12]string\n\tT5 interface {\n\t\tReader()\n\t\tWriter()\n\t\tfoo()\n\t}\n)\n\ntype T6 struct {\n\t_a, _b, _c, _d int\n\tint\n\tT1 `annotation`\n\t*T2\n\t_e float32\n\t//ignored int\n}\n\nconst (A = iota;B;C;\n\tD = iota << (1 + iota*2)\n\tE\n\tF=3.14*(1+2*3)/34e7;I=1)\n\ntype (T7 func (a struct{_ int; _ float32}, b int) (int, map[string]int);T8 float32)\n\nvar (a, b, c int\nd T5\ne T4\nf interface{})\n\nfunc f1() {};func f2() {};type/*no newline here*/T9 int/*var ignored int\nconst ignored int*/const (G=6); var g int\n\nfunc (t *T1) f3() (a, b int){\n\treturn 1, 2\n}; var h int\n\nfunc (tt * T7) f4(a func () func ()) (func (), int) {return func (){}, 1};func f5(){};const H=1\n\nfunc main() {\n\tgo func (){}()\n\tfmt.Println(\"Hello, 世界\")\n}\n" }, { "path": "Units/parser-go.r/go-torture.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-type-aliases.d/args.ctags", "content": "--sort=no\n--fields=+e\n\n" }, { "path": "Units/parser-go.r/go-type-aliases.d/expected.tags", "content": "main\tinput.go\t/^package main$/;\"\tp\ny\tinput.go\t/^type y int$/;\"\tt\tpackage:main\ttyperef:typename:int\tend:4\nT2\tinput.go\t/^type T2 int$/;\"\tt\tpackage:main\ttyperef:typename:int\tend:5\nt\tinput.go\t/^type t y$/;\"\tt\tpackage:main\ttyperef:typename:y\tend:7\nT1\tinput.go\t/^type T1 = T2$/;\"\ta\tpackage:main\ttyperef:typename:T2\tend:8\nName1\tinput.go\t/^type Name1 map[string]string$/;\"\tt\tpackage:main\ttyperef:typename:map[string]string\tend:9\nName2\tinput.go\t/^type Name2 map[string]string$/;\"\tt\tpackage:main\ttyperef:typename:map[string]string\tend:10\nAlias\tinput.go\t/^type Alias = map[string]string$/;\"\ta\tpackage:main\ttyperef:typename:map[string]string\tend:11\nX\tinput.go\t/^type X =$/;\"\ta\tpackage:main\ttyperef:typename:map [ string;] string\tend:16\nmain\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tend:20\n" }, { "path": "Units/parser-go.r/go-type-aliases.d/input.go", "content": "// Taken from https://go.googlesource.com/proposal/+/master/design/18130-type-alias.md\npackage main\n\ntype y int\ntype T2 int\n\ntype t y\ntype T1 = T2\ntype Name1 map[string]string\ntype Name2 map[string]string\ntype Alias = map[string]string\n\ntype X =\n\tmap [\n\tstring\n] string\n\nfunc main() {\n\treturn;\n}\n" }, { "path": "Units/parser-go.r/go-variadic-dots-broken.d/args.ctags", "content": "--sort=no\n--fields=+S\n" }, { "path": "Units/parser-go.r/go-variadic-dots-broken.d/input.go", "content": "package main\n\nfunc f0(nums..int) {\n\treturn\n}\n\nfunc f1(nums ..\tinterface{}) {\n\treturn\n}\n\nfunc f10(nums..\tinterface{}) {\n\treturn\n}\n\nfunc f11(nums ..interface{}) {\n\treturn\n}\n\nfunc f2(o int, nums ..int) {\n\treturn\n}\n\nfunc f3(o int, nums.. /* .. */\t\tint) {\n\treturn\n}\n\nfunc f4(o int, p int) {\n}\n\nfunc main() {\n}\n" }, { "path": "Units/parser-go.r/go-variadic-dots.d/args.ctags", "content": "--sort=no\n--fields=+S\n" }, { "path": "Units/parser-go.r/go-variadic-dots.d/expected.tags", "content": "main\tinput.go\t/^package main$/;\"\tp\nf0\tinput.go\t/^func f0(nums...int) {$/;\"\tf\tpackage:main\tsignature:(nums ...int)\nf1\tinput.go\t/^func f1(nums ...\tinterface{}) {$/;\"\tf\tpackage:main\tsignature:(nums ...interface{})\nf10\tinput.go\t/^func f10(nums...\tinterface{}) {$/;\"\tf\tpackage:main\tsignature:(nums ...interface{})\nf11\tinput.go\t/^func f11(nums ...interface{}) {$/;\"\tf\tpackage:main\tsignature:(nums ...interface{})\nf2\tinput.go\t/^func f2(o int, nums ...int) {$/;\"\tf\tpackage:main\tsignature:(o int, nums ...int)\nf3\tinput.go\t/^func f3(o int, nums... \\/* ... *\\/\t\tint) {$/;\"\tf\tpackage:main\tsignature:(o int, nums ...int)\nf4\tinput.go\t/^func f4(o int, p int) {$/;\"\tf\tpackage:main\tsignature:(o int, p int)\nmain\tinput.go\t/^func main() {$/;\"\tf\tpackage:main\tsignature:()\n" }, { "path": "Units/parser-go.r/go-variadic-dots.d/input.go", "content": "package main\n\nfunc f0(nums...int) {\n\treturn\n}\n\nfunc f1(nums ...\tinterface{}) {\n\treturn\n}\n\nfunc f10(nums...\tinterface{}) {\n\treturn\n}\n\nfunc f11(nums ...interface{}) {\n\treturn\n}\n\nfunc f2(o int, nums ...int) {\n\treturn\n}\n\nfunc f3(o int, nums... /* ... */\t\tint) {\n\treturn\n}\n\nfunc f4(o int, p int) {\n}\n\nfunc main() {\n}\n" }, { "path": "Units/parser-go.r/go-variadic-dots.d/validator", "content": "go\n" }, { "path": "Units/parser-go.r/go-vars.d/args.ctags", "content": "--sort=no\n--fields=+t\n" }, { "path": "Units/parser-go.r/go-vars.d/expected.tags", "content": "x\tinput.go\t/^var x, y, z int$/;\"\tv\ttyperef:typename:int\ny\tinput.go\t/^var x, y, z int$/;\"\tv\ttyperef:typename:int\nz\tinput.go\t/^var x, y, z int$/;\"\tv\ttyperef:typename:int\na\tinput.go\t/^\ta, b int$/;\"\tv\ttyperef:typename:int\nb\tinput.go\t/^\ta, b int$/;\"\tv\ttyperef:typename:int\nn\tinput.go\t/^\tn = 0$/;\"\tv\ns\tinput.go\t/^\ts string$/;\"\tv\ttyperef:typename:string\ni\tinput.go\t/^\ti interface{}$/;\"\tv\ttyperef:typename:interface{}\nc\tinput.go\t/^const c int$/;\"\tc\ttyperef:typename:int\n" }, { "path": "Units/parser-go.r/go-vars.d/input.go", "content": "var x, y, z int\nvar (\n\ta, b int\n\tn = 0\n\ts string\n\ti interface{}\n)\nconst c int\n" }, { "path": "Units/parser-gperf.r/simple.d/args.ctags", "content": "--sort=no\n--extras=+rg\n" }, { "path": "Units/parser-gperf.r/simple.d/expected.tags", "content": "resolved_gperf_hash\tinput.perf\t/^%define hash-function-name resolved_gperf_hash$/;\"\th\nresolved_gperf_lookup\tinput.perf\t/^%define lookup-function-name resolved_gperf_lookup$/;\"\tl\nMyNameSpace::MyClass\tinput.perf\t/^%define class-name MyNameSpace::MyClass$/;\"\tc\nHUP\tinput.perf\t/^HUP, 1$/;\"\tk\nINT\tinput.perf\t/^INT, 2$/;\"\tk\nQUIT\tinput.perf\t/^QUIT, 3$/;\"\tk\nILL\tinput.perf\t/^ILL, 4$/;\"\tk\nTRAP\tinput.perf\t/^TRAP, 5$/;\"\tk\nABRT\tinput.perf\t/^ABRT, 6$/;\"\tk\nBUS\tinput.perf\t/^BUS, 7$/;\"\tk\nFPE\tinput.perf\t/^FPE, 8$/;\"\tk\nKILL\tinput.perf\t/^KILL, 9$/;\"\tk\nUSR1\tinput.perf\t/^USR1, 10$/;\"\tk\nSEGV\tinput.perf\t/^SEGV, 11$/;\"\tk\nUSR2\tinput.perf\t/^USR2, 12$/;\"\tk\nPIPE\tinput.perf\t/^PIPE, 13$/;\"\tk\nALRM\tinput.perf\t/^ALRM, 14$/;\"\tk\nTERM\tinput.perf\t/^TERM, 15$/;\"\tk\nSTKFLT\tinput.perf\t/^STKFLT, 16$/;\"\tk\nCHLD\tinput.perf\t/^CHLD, 17$/;\"\tk\nCONT\tinput.perf\t/^CONT, 18$/;\"\tk\nSTOP\tinput.perf\t/^STOP, 19$/;\"\tk\nTSTP\tinput.perf\t/^TSTP, 20$/;\"\tk\nTTIN\tinput.perf\t/^TTIN, 21$/;\"\tk\nTTOU\tinput.perf\t/^TTOU, 22$/;\"\tk\nURG\tinput.perf\t/^URG, 23$/;\"\tk\nXCPU\tinput.perf\t/^XCPU, 24$/;\"\tk\nXFSZ\tinput.perf\t/^XFSZ, 25$/;\"\tk\nVTALRM\tinput.perf\t/^VTALRM, 26$/;\"\tk\nPROF\tinput.perf\t/^PROF, 27$/;\"\tk\nWINCH\tinput.perf\t/^WINCH, 28$/;\"\tk\nIO\tinput.perf\t/^IO, 29$/;\"\tk\nPWR\tinput.perf\t/^PWR, 30$/;\"\tk\nSYS\tinput.perf\t/^SYS, 31$/;\"\tk\nRTMIN\tinput.perf\t/^RTMIN, 34$/;\"\tk\nRTMIN+1\tinput.perf\t/^RTMIN+1, 35$/;\"\tk\nRTMIN+2\tinput.perf\t/^RTMIN+2, 36$/;\"\tk\nRTMIN+3\tinput.perf\t/^RTMIN+3, 37$/;\"\tk\nRTMIN+4\tinput.perf\t/^RTMIN+4, 38$/;\"\tk\nRTMIN+5\tinput.perf\t/^RTMIN+5, 39$/;\"\tk\nRTMIN+6\tinput.perf\t/^RTMIN+6, 40$/;\"\tk\nRTMIN+7\tinput.perf\t/^RTMIN+7, 41$/;\"\tk\nRTMIN+8\tinput.perf\t/^RTMIN+8, 42$/;\"\tk\nRTMIN+9\tinput.perf\t/^RTMIN+9, 43$/;\"\tk\nRTMIN+10\tinput.perf\t/^RTMIN+10, 44$/;\"\tk\nRTMIN+11\tinput.perf\t/^RTMIN+11, 45$/;\"\tk\nRTMIN+12\tinput.perf\t/^RTMIN+12, 46$/;\"\tk\nRTMIN+13\tinput.perf\t/^RTMIN+13, 47$/;\"\tk\nRTMIN+14\tinput.perf\t/^RTMIN+14, 48$/;\"\tk\nRTMIN+15\tinput.perf\t/^RTMIN+15, 49$/;\"\tk\nRTMAX-14\tinput.perf\t/^RTMAX-14, 50$/;\"\tk\nRTMAX-13\tinput.perf\t/^RTMAX-13, 51$/;\"\tk\nRTMAX-12\tinput.perf\t/^RTMAX-12, 52$/;\"\tk\nRTMAX-11\tinput.perf\t/^RTMAX-11, 53$/;\"\tk\nRTMAX-10\tinput.perf\t/^RTMAX-10, 54$/;\"\tk\nRTMAX-9\tinput.perf\t/^RTMAX-9, 55$/;\"\tk\nRTMAX-8\tinput.perf\t/^RTMAX-8, 56$/;\"\tk\nRTMAX-7\tinput.perf\t/^RTMAX-7, 57$/;\"\tk\nRTMAX-6\tinput.perf\t/^RTMAX-6, 58$/;\"\tk\nRTMAX-5\tinput.perf\t/^RTMAX-5, 59$/;\"\tk\nRTMAX-4\tinput.perf\t/^RTMAX-4, 60$/;\"\tk\nRTMAX-3\tinput.perf\t/^RTMAX-3, 61$/;\"\tk\nRTMAX-2\tinput.perf\t/^RTMAX-2, 62$/;\"\tk\nRTMAX-1\tinput.perf\t/^RTMAX-1, 63$/;\"\tk\nRTMAX\tinput.perf\t/^RTMAX, 64$/;\"\tk\n_GNU_SOURCE\tinput.perf\t/^#define _GNU_SOURCE$/;\"\td\tfile:\nconfig.h\tinput.perf\t/^#include /;\"\th\nstddef.h\tinput.perf\t/^#include /;\"\th\nstdlib.h\tinput.perf\t/^#include /;\"\th\nutils.h\tinput.perf\t/^#include \"utils.h\"/;\"\th\nsignal_s\tinput.perf\t/^struct signal_s$/;\"\ts\tfile:\nname\tinput.perf\t/^ int name;$/;\"\tm\tstruct:signal_s\ttyperef:typename:int\tfile:\nvalue\tinput.perf\t/^ int value;$/;\"\tm\tstruct:signal_s\ttyperef:typename:int\tfile:\nsender_s\tinput.perf\t/^ struct sender_s {$/;\"\ts\tstruct:signal_s\tfile:\npid\tinput.perf\t/^ pid_t pid; \\/*$/;\"\tm\tstruct:signal_s::sender_s\ttyperef:typename:pid_t\tfile:\ncomm\tinput.perf\t/^ char comm[16];$/;\"\tm\tstruct:signal_s::sender_s\ttyperef:typename:char[16]\tfile:\nsender\tinput.perf\t/^ } sender;$/;\"\tm\tstruct:signal_s\ttyperef:struct:signal_s::sender_s\tfile:\nstr2sig\tinput.perf\t/^str2sig (const char *name)$/;\"\tf\ttyperef:typename:int\nkconf_id_hash\tinput-0.gperf\t/^%define hash-function-name kconf_id_hash$/;\"\th\nkconf_id_lookup\tinput-0.gperf\t/^%define lookup-function-name kconf_id_lookup$/;\"\tl\nkconf_id_strings\tinput-0.gperf\t/^%define string-pool-name kconf_id_strings$/;\"\ts\nmainmenu\tinput-0.gperf\t/^mainmenu,\tT_MAINMENU,\tTF_COMMAND$/;\"\tk\nmenu\tinput-0.gperf\t/^menu,\t\tT_MENU,\t\tTF_COMMAND$/;\"\tk\nEXPORT_SYMBOL\tinput-1.perf\t/^EXPORT_SYMBOL, EXPORT_SYMBOL_KEYW$/;\"\tk\nresword\tinput-1.perf\t/^struct resword { const char *name; int token; }$/;\"\ts\tfile:\nname\tinput-1.perf\t/^struct resword { const char *name; int token; }$/;\"\tm\tstruct:resword\ttyperef:typename:const char *\tfile:\ntoken\tinput-1.perf\t/^struct resword { const char *name; int token; }$/;\"\tm\tstruct:resword\ttyperef:typename:int\tfile:\n" }, { "path": "Units/parser-gperf.r/simple.d/input-0.gperf", "content": "/* Taken from\n https://kernel.googlesource.com/pub/scm/linux/kernel/git/konrad/xen/+/stable/for-linus-3.10-rc5-tag/scripts/kconfig/zconf.gperf */\n%language=ANSI-C\n%define hash-function-name kconf_id_hash\n%define lookup-function-name kconf_id_lookup\n%define string-pool-name kconf_id_strings\n%compare-strncmp\n%enum\n%pic\n%struct-type\nstruct kconf_id;\nstatic const struct kconf_id *kconf_id_lookup(register const char *str, register unsigned int len);\n%%\nmainmenu,\tT_MAINMENU,\tTF_COMMAND\nmenu,\t\tT_MENU,\t\tTF_COMMAND\n%%\n" }, { "path": "Units/parser-gperf.r/simple.d/input-1.perf", "content": "/* Derrived from\n https://kernel.googlesource.com/pub/scm/linux/kernel/git/dhowells/linux-asm_system/+/refs/tags/v2.6.15-rc7/scripts/genksyms/keywords.gperf */\n%{\n%}\nstruct resword { const char *name; int token; }\n%%\nEXPORT_SYMBOL, EXPORT_SYMBOL_KEYW\n" }, { "path": "Units/parser-gperf.r/simple.d/input.perf", "content": "/* Derrived FROM crun-1.4.4/src/libcrun/signals.perf\n and systemd/src/resolve/resolved-gperf.gperf */\n/*\n * crun - OCI runtime written in C\n *\n * Copyright (C) 2017, 2018, 2019 Giuseppe Scrivano \n * crun is free software; you can redistribute it and/or modify\n * it under the terms of the GNU Lesser General Public License as published by\n * the Free Software Foundation; either version 2 of the License, or\n * (at your option) any later version.\n *\n * crun is distributed in the hope that it will be useful,\n * but WITHOUT ANY WARRANTY; without even the implied warranty of\n * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n * GNU Lesser General Public License for more details.\n *\n * You should have received a copy of the GNU Lesser General Public License\n * along with crun. If not, see .\n */\n\n%{\n#define _GNU_SOURCE\n\n#include \n#include \n#include \n#include \"utils.h\"\n%}\nstruct signal_s\n{\n int name;\n int value;\n struct sender_s {\n pid_t pid; /*\n}\n%%\n*/\n char comm[16];\n } sender;\n};\n%null_strings\n%language=ANSI-C\n%define slot-name section_and_lvalue\n%define hash-function-name resolved_gperf_hash\n%define lookup-function-name resolved_gperf_lookup\n%define class-name MyNameSpace::MyClass\n%readonly-tables\n%omit-struct-type\n%struct-type\n%includes\n%%\nHUP, 1\nINT, 2\nQUIT, 3\nILL, 4\nTRAP, 5\nABRT, 6\nBUS, 7\nFPE, 8\nKILL, 9\nUSR1, 10\nSEGV, 11\nUSR2, 12\nPIPE, 13\n#IGNOREME\nALRM, 14\nTERM, 15\nSTKFLT, 16\nCHLD, 17\nCONT, 18\nSTOP, 19\nTSTP, 20\nTTIN, 21\nTTOU, 22\nURG, 23\nXCPU, 24\nXFSZ, 25\nVTALRM, 26\nPROF, 27\nWINCH, 28\nIO, 29\nPWR, 30\nSYS, 31\nRTMIN, 34\nRTMIN+1, 35\nRTMIN+2, 36\nRTMIN+3, 37\nRTMIN+4, 38\nRTMIN+5, 39\nRTMIN+6, 40\nRTMIN+7, 41\nRTMIN+8, 42\nRTMIN+9, 43\nRTMIN+10, 44\nRTMIN+11, 45\nRTMIN+12, 46\nRTMIN+13, 47\nRTMIN+14, 48\nRTMIN+15, 49\nRTMAX-14, 50\nRTMAX-13, 51\nRTMAX-12, 52\nRTMAX-11, 53\nRTMAX-10, 54\nRTMAX-9, 55\nRTMAX-8, 56\nRTMAX-7, 57\nRTMAX-6, 58\nRTMAX-5, 59\nRTMAX-4, 60\nRTMAX-3, 61\nRTMAX-2, 62\nRTMAX-1, 63\nRTMAX, 64\n%%\nint\nstr2sig (const char *name)\n{\n const struct signal_s *s;\n\n if (has_prefix (name, \"SIG\"))\n name += 3;\n\n s = libcrun_signal_in_word_set (name, strlen (name));\n if (s == NULL)\n {\n long int value;\n\n errno = 0;\n value = strtol (name, NULL, 10);\n if (errno == 0)\n return value;\n\n errno = ENOENT;\n return -1;\n }\n\n return s->value;\n}\n" }, { "path": "Units/parser-haskell.r/literate-haskell1.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-haskell.r/literate-haskell1.d/expected.tags", "content": "main\tinput.lhs\t/^> main = do putStr \"Enter a number: \"$/;\"\tf\nfact\tinput.lhs\t/^> fact 0 = 1$/;\"\tf\nfact\tinput.lhs\t/^> fact n = n * fact (n-1)$/;\"\tf\n" }, { "path": "Units/parser-haskell.r/literate-haskell1.d/input.lhs", "content": ">Without space, this is just a comment\n\n This literate program prompts the user for a number\n and prints the factorial of that number:\n\n> main :: IO ()\n\n> main = do putStr \"Enter a number: \"\n> l <- readLine\n> putStr \"n!= \"\n> print (fact (read l))\n \n This is the factorial function.\n\n> fact :: Integer -> Integer\n> fact 0 = 1\n> fact n = n * fact (n-1)\n\n" }, { "path": "Units/parser-haskell.r/literate-haskell2.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-haskell.r/literate-haskell2.d/expected.tags", "content": "main\tinput.lhs\t/^main = print [ (n, product [1..n]) | n <- [1..20]]$/;\"\tf\n" }, { "path": "Units/parser-haskell.r/literate-haskell2.d/input.lhs", "content": "\\documentstyle{article}\n\n\\begin{document}\n\n\\section{Introduction}\n\nThis is a trivial program that prints the first 20 factorials.\n\n\\begin{code}\nmain :: IO ()\nmain = print [ (n, product [1..n]) | n <- [1..20]]\n\\end{code}\n\n\\end{document}\n\n" }, { "path": "Units/parser-haskell.r/multi-line-type-signature.d/README", "content": "Taken from #4013 submitted by Robin Palotai (@robinp).\n" }, { "path": "Units/parser-haskell.r/multi-line-type-signature.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-haskell.r/multi-line-type-signature.d/expected.tags", "content": "Foo\tinput.hs\t/^module Foo () where$/;\"\tm\nthing\tinput.hs\t/^thing x = pure x$/;\"\tf\n" }, { "path": "Units/parser-haskell.r/multi-line-type-signature.d/input.hs", "content": "module Foo () where\n\n\nthing\n :: App m\n => Int\n -> m Int\nthing x = pure x\n\n" }, { "path": "Units/parser-haskell.r/simple-haskell.d/args.ctags", "content": "--sort=no\n" }, { "path": "Units/parser-haskell.r/simple-haskell.d/expected.tags", "content": "Cards\tinput.hs\t/^module Cards where$/;\"\tm\nInt\tinput.hs\t/^data Int = -2147483648 | -2147483647 | ... | -1 | 0 | 1 | 2 | ... | 2147483647$/;\"\tt\nFd\tinput.hs\t/^newtype Fd = Fd CInt$/;\"\tt\nFd\tinput.hs\t/^newtype Fd = Fd CInt$/;\"\tc\nBool\tinput.hs\t/^data Bool $/;\"\tt\nTrue\tinput.hs\t/^ = True | False$/;\"\tc\nFalse\tinput.hs\t/^ = True | False$/;\"\tc\nName\tinput.hs\t/^type Name = String$/;\"\tt\ngetSpareBuffer\tinput.hs\t/^getSpareBuffer Handle__{haCharBuffer=ref, $/;\"\tf\nadd\tinput.hs\t/^add x y = x + y$/;\"\tf\n" }, { "path": "Units/parser-haskell.r/simple-haskell.d/input.hs", "content": "module Cards where\n\ndata Int = -2147483648 | -2147483647 | ... | -1 | 0 | 1 | 2 | ... | 2147483647\nnewtype Fd = Fd CInt\ndata Bool \n = True | False\ntype Name = String\n\n\ngetSpareBuffer :: Handle__ -> IO (BufferMode, CharBuffer)\ngetSpareBuffer Handle__{haCharBuffer=ref, \n haBuffers=spare_ref,\n haBufferMode=mode}\n = do\n case mode of\n NoBuffering -> return (mode, error \"no buffer!\")\n _ -> do\n bufs <- readIORef spare_ref\n buf <- readIORef ref\n case bufs of\n BufferListCons b rest -> do\n writeIORef spare_ref rest\n return ( mode, emptyBuffer b (bufSize buf) WriteBuffer)\n BufferListNil -> do\n new_buf <- newCharBuffer (bufSize buf) WriteBuffer\n return (mode, new_buf)\n\n\n{-|\n This is a docstring\n-}\nadd :: Integer -> Integer -> Integer\nadd x y = x + y\n" }, { "path": "Units/parser-html.r/class-and-id.d/args.ctags", "content": "--sort=no\n--extras=+r\n--fields=+r\n" }, { "path": "Units/parser-html.r/class-and-id.d/expected.tags", "content": "Home · Universal Ctags\tinput.html\t/^ <\\/title>$/;\"\tj\troles:def\n/public/css/poole.css\tinput.html\t/^$/;\"\tC\troles:extFile\n/public/css/syntax.css\tinput.html\t/^$/;\"\tC\troles:extFile\n/public/css/hyde.css\tinput.html\t/^$/;\"\tC\troles:extFile\nhttp://fonts.googleapis.com/css?family=PT+Sans:400,400italic,700|Abril+Fatface\tinput.html\t/^$/;\"\tc\troles:attribute\nsidebar\tinput.html\t/^
$/;\"\tc\troles:attribute\ncontainer\tinput.html\t/^
$/;\"\tc\troles:attribute\nsidebar-sticky\tinput.html\t/^
$/;\"\tc\troles:attribute\nsidebar-about\tinput.html\t/^
$/;\"\tc\troles:attribute\nUniversal Ctags\tinput.html\t/^

Universal Ctags<\\/h1>$/;\"\th\troles:def\nlead\tinput.html\t/^

A maintained ctags implementation<\\/p>$/;\"\tc\troles:attribute\nsidebar-nav\tinput.html\t/^