|
libsim Versione 8.0.0
|
◆ l4f_launcher()
Ritorna un messaggio caratteristico delle priorità standard. Routine specifica per il SIM. Cattura le variabili di ambiente LOG4_APPLICATION_NAME,LOG4_APPLICATION_ID e compone il nome univoco per il logging. Se le variabili di ambiente non sono impostate ritorna un nome definito dal nome del processo e da un timestamp.
Definizione alla linea 500 del file log4fortran.F90. 501END FUNCTION l4f_category_exist_f
502
503!> Return true if the corresponding category handle exists
504!! (is associated with a category).
505!! Legacy Fortran version that receives an integer instead of a C
506!! pointer.
507FUNCTION l4f_category_exist_legacy(a_category) RESULT(exist)
508INTEGER,INTENT(in):: a_category !< category
509LOGICAL :: exist
510
511IF (a_category <= 0 .OR. a_category > l4f_global_ptr%arraysize) THEN
512 exist = .false.
513ELSE
514 exist = l4f_category_exist(l4f_global_ptr%array(a_category))
515ENDIF
516
517END FUNCTION l4f_category_exist_legacy
518
519#endif
520
|