1#!/bin/sh 2 3# Copyright: 2020 Masatake YAMATO 4# License: GPL-2 5 6READTAGS=$3 7 8. ../utils.sh 9 10#V="valgrind --leak-check=full -v" 11V= 12 13if ! [ -x "${READTAGS}" ]; then 14 skip "no readtags" 15fi 16 17if ! ( "${READTAGS}" -h | grep -q -e -Q ); then 18 skip "no qualifier function in readtags" 19fi 20 21echo '# (eq? "c" (downcase $name))' 22${V} ${READTAGS} -t output.tags -Q '(eq? "c" (downcase $name))' -l 23 24echo '# (and $inherits (#/(^|,)a(,|$)/ (downcase $inherits)))' 25${V} ${READTAGS} -t output.tags -Q '(and $inherits (#/(^|,)a(,|$)/ (downcase $inherits)))' -l 26 27echo '# (and $inherits (#/(^|,)b(,|$)/ (downcase $inherits)))' 28${V} ${READTAGS} -t output.tags -Q '(and $inherits (#/(^|,)b(,|$)/ (downcase $inherits)))' -l 29 30echo '# (and $inherits (#/(^|,)d(,|$)/ (downcase $inherits)))' 31${V} ${READTAGS} -t output.tags -Q '(and $inherits (#/(^|,)d(,|$)/ (downcase $inherits)))' -l 32 33echo '# (eq? "F" (upcase $name))' 34${V} ${READTAGS} -t output.tags -Q '(eq? "F" (upcase $name))' -l 35 36echo '# (eq? "G" (upcase $name))' 37${V} ${READTAGS} -t output.tags -Q '(eq? "G" (upcase $name))' -l 38 39echo '# (eq? "J" (upcase $name))' 40${V} ${READTAGS} -t output.tags -Q '(eq? "J" (upcase $name))' -l 41