anchor.diff:                     , ErrStat, ErrMsg, RoutineName )
            RETURN
         END IF
  -
  -      ALLOCATE ( Words( AryLen ) , STAT=ErrStatLcl )
  -      IF ( ErrStatLcl /= 0 )  THEN
  -         CALL SetErrStat ( ErrID_Fatal, 'Fatal error allocating memory for the Words array.',ErrStat,ErrMsg,RoutineName )
  -         CALL Cleanup()
  -         RETURN
  -      ENDIF
   
   
         READ (FileInfo%Lines(LineNum),*,IOSTAT=ErrStatLcl)  Ary
  
positive.code: 
           IW        = IW + 1
           Words(IW) = Line(Ch+1:Ch+NextWhite-1)
  
           IF ( IW == NumWords )  EXIT
  
  
negative.code:                    , ErrStat, ErrMsg, RoutineName )
           RETURN
        END IF
  
  
        READ (FileInfo%Lines(LineNum),*,IOSTAT=ErrStatLcl)  Ary
  