Reinstate return(_comp)

McStasMcXtrace · Nov 24, 2023 · 162e778 · 162e778
1 parent 6a12956
commit 162e778
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/mcstas/src/cogen.c.in b/mcstas/src/cogen.c.in
@@ -1574,7 +1574,7 @@ void def_trace_section(struct instr_def *instr)
   coutf("#define %s (_particle->%s)", "ABSORBED" , "_absorbed");
   /* define mcget_run_num within trace scope to refer to the particle */
   coutf("#define mcget_run_num() _particle->_uid");
-  cout( "#define ABSORB0 do { DEBUG_STATE(); DEBUG_ABSORB(); MAGNET_OFF; ABSORBED++; } while(0)");
+  cout( "#define ABSORB0 do { DEBUG_STATE(); DEBUG_ABSORB(); MAGNET_OFF; ABSORBED++; return(_comp); } while(0)");
   cout( "#define ABSORB ABSORB0");
 } /* def_trace_section */