Commit fcfd3be9 authored by Martin Beseda's avatar Martin Beseda
Browse files

FIX: Compilation fixed

parent 8b54fa0e
......@@ -2,6 +2,7 @@ program connection_mem_leak_test
use connection_m
use neuron_m
use normal_m
use data_kinds_4neuro_m
type(mock_neuron_t), pointer :: n1_p
type(mock_neuron_t), pointer :: n2_p
......@@ -20,7 +21,7 @@ program connection_mem_leak_test
con2 => connection_t(input_neuron=n1_p, output_neuron=n2_p)
print *, 'Creating an instance of the class interval_connection_t with 3-parameters constructor...'
con1 => connection_t(input_neuron=n1_p, output_neuron=n2_p, weight=5.25)
con1 => connection_t(input_neuron=n1_p, output_neuron=n2_p, weight=real(5.25, real_4neuro))
deallocate(con1)
deallocate(con2)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment