1#!/bin/sh 2 3# Copyright: 2020 Masatake YAMATO 4# License: GPL-2 5 6READTAGS=$3 7#V="valgrind --leak-check=full --track-origins=yes -v" 8V= 9 10. ../utils.sh 11 12if ! [ -x "${READTAGS}" ]; then 13 skip "no readtags" 14fi 15 16if ! ( "${READTAGS}" -h | grep -q -e -Q ); then 17 skip "no qualifier function in readtags" 18fi 19 20echo '!_ -Q #t point3d' 21${V} ${READTAGS} -t output.tags -Q '#t' point3d 22 23echo '!_ -Q true point3d' 24${V} ${READTAGS} -t output.tags -Q 'true' point3d 25 26echo '!_ -Q #f point3d' 27${V} ${READTAGS} -t output.tags -Q '#f' point3d 28 29echo '!_ -Q false point3d' 30${V} ${READTAGS} -t output.tags -Q 'false' point3d 31 32echo '!_ -Q #t -l' 33${V} ${READTAGS} -t output.tags -Q '#t' -l 34 35echo '!_ -Q true -l' 36${V} ${READTAGS} -t output.tags -Q 'true' -l 37 38echo '!_ -Q #f -l' 39${V} ${READTAGS} -t output.tags -Q '#f' -l 40 41echo '!_ -Q false -l' 42${V} ${READTAGS} -t output.tags -Q 'false' -l 43 44echo '!_ -Q (null? nil) -l' 45${V} ${READTAGS} -t output.tags -Q '(null? nil)' -l 46 47echo '!_ -Q (null? ()) -l' 48${V} ${READTAGS} -t output.tags -Q '(null? ())' -l 49 50echo '!_ -Q (null? false) -l' 51${V} ${READTAGS} -t output.tags -Q '(null? false)' -l 52