14 | | It is possible to use the same machinery for your own programmer purposes: |
| 14 | It is possible to use the same machinery for your own programmer purposes.[[BR]] |
| 15 | It is also possible, to emit an error message just as a warning and return to the calling routines. |
| 16 | |
| 17 | See also: Ifort documentation, TraceBackQQ |
| 18 | |
| 19 | |
| 20 | ---- |
| 21 | '''Using GiBUU:''' |
| 22 | |
| 23 | Insert at the beginning of your module: |
| 24 | {{{ |
| 25 | USE CallStack |
| 26 | }}} |
| 27 | and at the position, where you want to get the error message: |
| 28 | {{{ |
| 29 | call TRACEBACK([string],[user_exit_code]) |
| 30 | }}} |
| 31 | |
| 32 | The both optional arguments are: |
| 33 | |
| 34 | * ''string'': Text to be written |
| 35 | * ''user_exit_code'': By specifying a user exit code of -1, control returns to the calling program. Specifying a user exit |
| 36 | code with a positive value requests that specified value be returned to the operating system. The default |
| 37 | value is 0, which causes the application to abort execution. |
| 38 | |
| 39 | If you are not compiling with ifort: the behavior of the module stays the same, just without printing the call stack; text is written or not, code stops or not. |
| 40 | |
| 41 | ---- |
| 42 | '''In General:''' |