*** fileio.c.orig	2007-12-21 08:53:40.000000000 -0500
--- fileio.c	2008-02-11 12:51:17.000000000 -0500
*************** sequential_write (cob_file *f, int opt)
*** 1067,1073 ****
  	if (f->record_min != f->record_max) {
  #if	WITH_VARSEQ == 2
  		if (unlikely(fwrite (&f->record->size, sizeof (f->record->size), 1, (FILE *)f->file) != 1)) {
! #elif	WITH_VARSEQ == 1
  #ifdef WORDS_BIGENDIAN
  		recsize.sint = f->record->size;
  #else
--- 1067,1074 ----
  	if (f->record_min != f->record_max) {
  #if	WITH_VARSEQ == 2
  		if (unlikely(fwrite (&f->record->size, sizeof (f->record->size), 1, (FILE *)f->file) != 1)) {
! #else
! #if	WITH_VARSEQ == 1
  #ifdef WORDS_BIGENDIAN
  		recsize.sint = f->record->size;
  #else
*************** sequential_write (cob_file *f, int opt)
*** 1080,1085 ****
--- 1081,1087 ----
  #else
  		recsize.sshort[0] = COB_BSWAP_16 ((unsigned short)f->record->size);
  #endif
+ #endif
  #if	WITH_VARSEQ == 3
  		if (unlikely(fwrite (recsize.sbuff, 2, 1, (FILE *)f->file) != 1)) {
  #else