anchor.diff:     !-------------------------------------------------------------------------------------------------
   
         ! Read in 2 header/comment lines
  -   CALL ReadCom( UnIn, FilName, 'Re vs CD Properties header 1', ErrStat )
  +   CALL ReadCom( UnIn, FilName, 'Re vs CD Properties header 1', ErrStat, ErrMess )
      IF ( ErrStat /= ErrID_None ) RETURN
   
  -   CALL ReadCom( UnIn, FilName, 'Re vs CD Properties header 2', ErrStat )
  +   CALL ReadCom( UnIn, FilName, 'Re vs CD Properties header 2', ErrStat, ErrMess )
      IF ( ErrStat /= ErrID_None ) RETURN
   
      Fmt = '('//TRIM(Int2Lstr(p%TwrProps%NTwrCD+1))//'(2X,ES11.4e2))'
  
positive.code:    ! section contains 2 heading lines in addition to NTwrHt rows of data with 3 columns
     !-------------------------------------------------------------------------------------------------
        ! Read in 2 header/comment lines
     CALL ReadCom( UnIn, FilName, 'Distributed Tower Properties header 1', ErrStat )
     IF ( ErrStat /= ErrID_None ) RETURN
  
     CALL ReadCom( UnIn, FilName, 'Distributed Tower Properties header 2', ErrStat )
     IF ( ErrStat /= ErrID_None ) RETURN
  
  
  
negative.code:          RETURN
        ELSE
           READ (Line,*,IOSTAT=ErrStat)  P%TwrProps%TwrShad
           CALL CheckIOS ( ErrStat, InitInp%ADFileName, 'TwrShad', NumType, ErrStat, ErrMess )
  !bjj: is this aborting?
           IF ( p%Echo )  THEN
              WRITE (p%UnEc,"( 2X, ES11.4e2, 2X, A, T30, ' - ', A )")  P%TwrProps%TwrShad, "TwrShad", 'Tower shadow deficit'
  