2:- module(errors,[warning/2,error/2,inform/2,gold/2]). 3 4:- use_module(semlib(options),[option/2]). 5 6warning(S,V):- 7 option('--warnings',true), !, 8 format(user_error,'\033[33mWARNING: ',[]), 9 format(user_error,S,V), 10 format(user_error,'\033[0m~n',[]). 11 12warning(_S,_V):- 13 option('--warnings',false). 14 15gold(S,V):- 16 option('--warnings',true), !, 17 format(user_error,'GOLD: ',[]), 18 format(user_error,S,V), 19 format(user_error,'~n',[]). 20 21gold(_S,_V):- 22 option('--warnings',false). 23 24inform(S,V):- 25 option('--info',true), !, 26 format(user_error,'\033[34mINFO: ',[]), 27 format(user_error,S,V), 28 format(user_error,'\033[0m~n',[]). 29 30inform(_S,_V):- 31 option('--info',false). 32 33error(S,V):- 34 format(user_error,'\033[31mERROR: ',[]), 35 format(user_error,S,V), 36 format(user_error,'\033[0m~n',[])