% Copyright (C) 2003-2019 Olivier Boudeville % % This file is part of the Ceylan-WOOPER library. % % This library is free software: you can redistribute it and/or modify % it under the terms of the GNU Lesser General Public License or % the GNU General Public License, as they are published by the Free Software % Foundation, either version 3 of these Licenses, or (at your option) % any later version. % You can also redistribute it and/or modify it under the terms of the % Mozilla Public License, version 1.1 or later. % % This library is distributed in the hope that it will be useful, % but WITHOUT ANY WARRANTY; without even the implied warranty of % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the % GNU Lesser General Public License and the GNU General Public License % for more details. % % You should have received a copy of the GNU Lesser General Public % License, of the GNU General Public License and of the Mozilla Public License % along with this library. % If not, see and % . % % Author: Olivier Boudeville [olivier (dot) boudeville (at) esperide (dot) com] % Uncomment to enable WOOPER-level traces: %-define( enable_wooper_traces, ). -ifdef(enable_wooper_traces). -define( display_trace( S ), trace_utils:trace( "[WOOPER] " ++ S ) ). -define( display_trace( S, F ), ast_utils:trace_fmt( "[WOOPER] " ++ S, F ) ). -else. % enable_wooper_traces % To avoid variables being reported as unused depending on the mode: -define( display_trace( S ), basic_utils:ignore_unused( { wooper_trace_disabled, S } ) ). -define( display_trace( S, F ), basic_utils:ignore_unused({ wooper_trace_disabled, S, F } ) ). -endif. % enable_wooper_traces