#!/bin/rc

flagfmt=''
args='type files ...'
if(! ifs=() eval `{aux/getflags $*} || ~ $#* 0) {
	aux/usage
	exit usage
}

type=$1 ; shift
if(~ $#* 0) {
	aux/usage
	exit usage
}

{
	for(x in $*)
		tag/read $x
} | grep '^'^$type | sed '
	s/^'^$type^'	//
	s/(^|[^''])''([^'']|$)/\1\2/g
	s/''''/''/g
'