This function will be replaced by a longer function using gWidgets if the package 'stacomiR' is loaded. It is provided there to avoid to pointing to an undefined global function. Normally the program tests for the existence of and environment envir_stacomi which indicates that the messages are to be displayed in the gWidget interface, so this code is to avoid notes in R.check.
funout(text,arret=FALSE,wash=FALSE)
The text to display
If true calls the program to stop and the message to be displayed
Only used when called from within 'stacomiR', and there is a widget interface, kept there for consistency