1 files changed, 5 insertions, 1 deletions
diff --git a/6/main.pl b/6/main.pl
index 5256ac0..dc525bb 100644
--- a/6/main.pl
+++ b/6/main.pl
@@ -9,7 +9,10 @@ print_warnings([W|Ws]) :- format("Warning: ~w~n", [W]), print_warnings(Ws).
 print_warnings :-
   findall(W, bgp:warning(W), BgpWs),
   findall(W, firewall:warning(W), FwWs),
-  concat(BgpWs, FwWs, Ws),
+  append(BgpWs, FwWs, Ws),
+  writeln(BgpWs),
+  writeln(FwWs),
+  writeln(Ws),
   length(Ws, L),
   ( L > 0
   ->format("Found ~w warning(s):~n", [L]),
@@ -18,6 +21,7 @@ print_warnings :-
   ).
 
 main :-
+  print_warnings,
   bgp:create_firewall(),
   bgp:bird_config(BirdDict),
   yaml_write(current_output, BirdDict).