END_TEST START_TEST (test_Reaction_removeModifier) { SpeciesReference_t *o1, *o2, *o3; o1 = Reaction_createModifier(R); o2 = Reaction_createModifier(R); o3 = Reaction_createModifier(R); SpeciesReference_setSpecies(o3, "test"); fail_unless( Reaction_removeModifier(R, 0) == o1 ); fail_unless( Reaction_getNumModifiers(R) == 2 ); fail_unless( Reaction_removeModifier(R, 0) == o2 ); fail_unless( Reaction_getNumModifiers(R) == 1 ); fail_unless( Reaction_removeModifierBySpecies(R,"test") == o3 ); fail_unless( Reaction_getNumModifiers(R) == 0 ); SpeciesReference_free(o1); SpeciesReference_free(o2); SpeciesReference_free(o3); }
END_TEST START_TEST (test_Reaction_createModifier) { Reaction_t *m = Reaction_create(2, 2); SpeciesReference_t *p = Reaction_createModifier(m); fail_unless( Reaction_getNumModifiers(m) == 1); fail_unless( SBase_getLevel((SBase_t *) (p)) == 2 ); fail_unless( SBase_getVersion((SBase_t *) (p)) == 2 ); Reaction_free(m); }