proc pgCols pghand { 
# $Header: /home/cvsroot/tcldb/ucodb/Tlib/pgCols,v 1.6 1997/05/28 02:07:05 de Exp $

#	PG95 user, use this line
#	pre Postgres 6, required my libpgtcl hack to get triple result
#	set cols [pg_result $pghand -attributes]

#	PostgreSQL user, use this line
#	post Postgres 6 -lAttributes gets triple col/type/len
	set cols [pg_result $pghand -lAttributes]

#	puts stderr "pgCols returning $cols"
	return $cols

}
