Index: trunk/Ohana/src/libautocode/def/autocode.c
===================================================================
--- trunk/Ohana/src/libautocode/def/autocode.c	(revision 4863)
+++ trunk/Ohana/src/libautocode/def/autocode.c	(revision 4864)
@@ -27,5 +27,6 @@
 
 /*** add test of EXTNAME and header-defined columns? ***/
-$STRUCT *fits_table_get_$STRUCT (FTable *ftable, int *Ndata) {
+/* return internal structure representation */
+$STRUCT *fits_table_get_$STRUCT (FTable *ftable, int *Ndata, int *swapped) {
 
   $STRUCT *data;
@@ -33,6 +34,8 @@
   *Ndata = ftable[0].header[0].Naxis[1];
   data = ($STRUCT *) ftable[0].buffer;
-  fits_convert_$STRUCT (data, sizeof ($STRUCT), *Ndata);
-  
+  if ((swapped == NULL) || (*swapped == FALSE)) {
+    fits_convert_$STRUCT (data, sizeof ($STRUCT), *Ndata);
+    if (swapped != NULL) *swapped = TRUE;
+  }
   return (data);
 }
Index: trunk/Ohana/src/libautocode/def/autocode.h
===================================================================
--- trunk/Ohana/src/libautocode/def/autocode.h	(revision 4863)
+++ trunk/Ohana/src/libautocode/def/autocode.h	(revision 4864)
@@ -2,5 +2,5 @@
 /** STRUCT DEFINITION **/
 
-$STRUCT *fits_table_get_$STRUCT (FTable *table, int *Ndata);
+$STRUCT *fits_table_get_$STRUCT (FTable *table, int *Ndata, int *swapped);
 int      fits_table_set_$STRUCT (FTable *ftable, $STRUCT *data, int Ndata);
 int      fits_table_mkheader_$STRUCT (Header *header);