select - Error: symbol `__fileimporter_class_MOD___copy_character_1' is already defined -


i have bit of code:

    subroutine readchartovariable(self,format,varout)     implicit none      ! declaring part     class(fileimporter) :: self     character(len=25) :: defaultvalue = 'null'     character(len=25), intent(out) :: varout     character (len=*) :: format     class(*), allocatable :: value      ! executing part     allocate(value,source = defaultvalue)     call self%readvaluetovariable(format,value)      select type(value)     type (character(*))         varout = value     end select     end subroutine readchartovariable 

what is, calls readvaluetovariable value being character type. readvaluetovariable reads character file , returns in value. compiling (gcc 4.8.5) leads error

/tmp/cc5juib6.s: assembler messages: /tmp/cc5juib6.s:156: error: symbol `__fileimporter_class_mod___copy_character_1' defined 

the error caused type (character(*)) line (without character functionality compiles). don't understand what's wrong here, maybe can me?

this compiler bug. related to, or directly 1 https://gcc.gnu.org/bugzilla/show_bug.cgi?id=60359, fixed in gfortran 4.9. note 4.8 not supported quite time , think release 4.9.4 last 1 4.9. supported versions 5 , 6.


Comments

Popular posts from this blog

python - How to insert QWidgets in the middle of a Layout? -

python - serve multiple gunicorn django instances under nginx ubuntu -

module - Prestashop displayPaymentReturn hook url -