Repatch (from linux) of OSX IRAF

1 files changed, 45 insertions, 0 deletions

diff --git a/noao/nproto/ace/cat.h b/noao/nproto/ace/cat.h
new file mode 100644
index 00000000..39a7ed8a
--- /dev/null
+++ b/noao/nproto/ace/cat.h
@@ -0,0 +1,45 @@
+# Catalog structure.
+define	CAT_SZSTR	99		# Length of catalog string
+define	CAT_LEN		160		# Length of catalog structure
+define	CAT_OBJS	Memi[$1]	# Array of objects (ptr)
+define	CAT_APFLUX	Memi[$1+1]	# Array of aperture fluxes (ptr)
+define	CAT_NOBJS	Memi[$1+2]	# Number of objects
+define	CAT_NUMMAX	Memi[$1+3]	# Maximum object number
+define	CAT_FLAGS	Memi[$1+4]	# Catalog flags
+define	CAT_HDR		Memi[$1+5]	# Header structure
+define	CAT_INTBL	Memi[$1+6]	# Input table structure
+define	CAT_OUTTBL	Memi[$1+7]	# Output table structure
+define	CAT_MAGZERO	Memr[P2R($1+8)]	# Magnitude zero
+define	CAT_CATALOG	Memc[P2C($1+10)]	# Catalog name
+define	CAT_OBJID	Memc[P2C($1+60)]	# Default ID
+define	CAT_STRPTR	P2C($1+110)		# Working string buffer
+define	CAT_STR		Memc[CAT_STRPTR($1)]	# Working string buffer
+
+# Table structure.
+define	TBL_LEN		2
+define	TBL_TP		Memi[$1]	# Table pointer
+define	TBL_STP		Memi[$1+1]	# Symbol table of entries
+
+# Entry structure.
+define	ENTRY_ULEN	19			# Length of units string
+define	ENTRY_FLEN	19			# Length of format string
+define	ENTRY_DLEN	99			# Length of description string
+define	ENTRY_LEN	95			# Length of entry structure
+define	ENTRY_CDEF	Memi[$1]		# Column descriptor
+define	ENTRY_ID	Memi[$1+1]		# Entry id
+define	ENTRY_TYPE	Memi[$1+2]		# Datatype in object record
+define	ENTRY_CTYPE	Memi[$1+3]		# Datatype in catalog
+define	ENTRY_FUNC	Memi[$1+4]		# Entry function
+define	ENTRY_RAP	Memr[P2R($1+5)]		# Entry aperture radius
+define	ENTRY_UNITS	Memc[P2C($1+6)]		# Entry units (19)
+define	ENTRY_FORMAT	Memc[P2C($1+26)]	# Entry format (19)
+define	ENTRY_DESC	Memc[P2C($1+46)]	# Entry description (99)
+
+define	FUNCS		"|MAG|"
+define	FUNC_MAG	1		# Magnitude
+
+# Catalog extensions.
+define	CATEXTNS	"|fits|tab|"
+
+# Catalog Parameters.
+define	CATPARAMS	"|image|mask|objid|catalog|nobjects|magzero|"