163 |
*) |
*) |
164 |
method out module_name msg = |
method out module_name msg = |
165 |
let str = |
let str = |
166 |
("[LibNN]: <" ^ module_name ^ "> " ^ msg) in |
("[LibNN] (" ^ module_name ^ "): " ^ msg) in |
167 |
Printf.fprintf _outChannel " %s\n" str |
Printf.fprintf _outChannel " %s\n" str |
168 |
|
|
169 |
(** |
(** |
192 |
*) |
*) |
193 |
method err module_name msg = |
method err module_name msg = |
194 |
let str = |
let str = |
195 |
("[LibNN]: <" ^ module_name ^ "> (ERROR) " ^ msg) in |
("[LibNN] (" ^ module_name ^ "): ERROR: " ^ msg) in |
196 |
Printf.fprintf _errChannel " %s\n" str |
Printf.fprintf _errChannel " %s\n" str |
197 |
|
|
198 |
(** |
(** |