#!/bin/rc

if(! ~ $#* 1){
	echo usage: mkmisclist file >[2=1]
	exit 1
}

fn mkextract{
	
	sed '/^$/d; /^#/d' $2 | awk '
	BEGIN { doprint=0 }
	doprint && /^[^	]/	{ doprint=0 }
	doprint			{ print $1 "'.$O'" }
	$0 ~ field		{ doprint=1; next }
	' 'field=^'$1
}

mkextract misc $1
