4 |
|
#include "MakeStamps.hpp" |
5 |
|
#include "MoleculeStamp.hpp" |
6 |
|
#include "simError.h" |
7 |
+ |
#ifdef IS_MPI |
8 |
|
#include "mpiBASS.h" |
9 |
+ |
#endif // is_mpi |
10 |
|
|
11 |
|
LinkedMolStamp::~LinkedMolStamp(){ |
12 |
|
if( mol_stamp != NULL ) delete mol_stamp; |
113 |
|
switch( the_event->evt.asmt.asmt_type ){ |
114 |
|
|
115 |
|
case STRING: |
116 |
< |
return current_mol->assignString( the_event->evt.asmt.lhs, |
116 |
> |
the_event->err_msg = current_mol->assignString( the_event->evt.asmt.lhs, |
117 |
|
the_event->evt.asmt.rhs.sval ); |
118 |
|
break; |
119 |
|
|
120 |
|
case DOUBLE: |
121 |
< |
return current_mol->assignDouble( the_event->evt.asmt.lhs, |
121 |
> |
the_event->err_msg = current_mol->assignDouble( the_event->evt.asmt.lhs, |
122 |
|
the_event->evt.asmt.rhs.dval ); |
123 |
|
break; |
124 |
|
|
125 |
|
case INT: |
126 |
< |
return current_mol->assignInt( the_event->evt.asmt.lhs, |
126 |
> |
the_event->err_msg = current_mol->assignInt( the_event->evt.asmt.lhs, |
127 |
|
the_event->evt.asmt.rhs.ival ); |
128 |
|
break; |
129 |
|
|
133 |
|
return 0; |
134 |
|
break; |
135 |
|
} |
136 |
< |
return 0; |
136 |
> |
if( the_event->err_msg != NULL ) return 0; |
137 |
> |
return 1; |
138 |
|
} |
139 |
|
|
140 |
|
int MakeStamps::moleculeEnd( event* the_event ){ |
179 |
|
switch( the_event->evt.asmt.asmt_type ){ |
180 |
|
|
181 |
|
case STRING: |
182 |
< |
the_event->err_msg = current_atom->assignString( the_event->evt.asmt.lhs, |
183 |
< |
the_event->evt.asmt.rhs.sval ); |
182 |
> |
the_event->err_msg = |
183 |
> |
current_atom->assignString( the_event->evt.asmt.lhs, |
184 |
> |
the_event->evt.asmt.rhs.sval ); |
185 |
|
if( the_event->err_msg != NULL ) return 0; |
186 |
|
return 1; |
187 |
|
break; |
188 |
|
|
189 |
|
case DOUBLE: |
190 |
< |
the_event->err_msg = current_atom->assignDouble( the_event->evt.asmt.lhs, |
191 |
< |
the_event->evt.asmt.rhs.dval ); |
190 |
> |
the_event->err_msg = |
191 |
> |
current_atom->assignDouble( the_event->evt.asmt.lhs, |
192 |
> |
the_event->evt.asmt.rhs.dval ); |
193 |
|
if( the_event->err_msg != NULL ) return 0; |
194 |
|
return 1; |
195 |
|
break; |
196 |
|
|
197 |
|
case INT: |
198 |
< |
the_event->err_msg = current_atom->assignInt( the_event->evt.asmt.lhs, |
199 |
< |
the_event->evt.asmt.rhs.ival ); |
198 |
> |
the_event->err_msg = |
199 |
> |
current_atom->assignInt( the_event->evt.asmt.lhs, |
200 |
> |
the_event->evt.asmt.rhs.ival ); |
201 |
|
if( the_event->err_msg != NULL ) return 0; |
202 |
|
return 1; |
203 |
|
break; |