/*
 *  test_setconnections_threads.sli
 *
 *  This file is part of NEST.
 *
 *  Copyright (C) 2004 The NEST Initiative
 *
 *  NEST is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation, either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  NEST is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with NEST.  If not, see <http://www.gnu.org/licenses/>.
 *
 */


% test SetStatus for connections
%
% we interpret GID as the gid of the source (pre-synaptic) neuron
%
% 090406, Morrison Diesmann


(unittest) run
/unittest using

/num_threads is_threaded { 2 } { 1 } ifelse def

ResetKernel

0 << /local_num_threads num_threads >> SetStatus

/iaf_neuron Create /source Set
/iaf_neuron Create /target Set

source target /stdp_synapse Connect

<< /source [source] /synapse_model /stdp_synapse >> GetConnections 0 get /conn Set

{ conn /weight get 1.0 eq} assert_or_die
{ conn /synapse_model get /stdp_synapse eq} assert_or_die
conn << /weight 2.0 >> SetStatus

{ conn /weight get 2.0 eq} assert_or_die



