summaryrefslogtreecommitdiff
path: root/6/main.pl
diff options
context:
space:
mode:
Diffstat (limited to '6/main.pl')
-rw-r--r--6/main.pl16
1 files changed, 16 insertions, 0 deletions
diff --git a/6/main.pl b/6/main.pl
new file mode 100644
index 0000000..cd9f807
--- /dev/null
+++ b/6/main.pl
@@ -0,0 +1,16 @@
+:- use_module(bgp).
+% :- use_module(tnet).
+
+% H=knot,
+% bgp:bgp_connections(H, BgpConnections),
+% maplist(bgp:to_dict(), BgpConnections, BgpConnectionDicts),
+% yaml_write(current_output, _{bgp_connections:BgpConnectionDicts}).
+
+warnings :-
+ bgp:warning(Ws),
+ writeln("Warnings: ~w", [length(Ws)]).
+
+main :-
+ bgp:bird_config(BirdDict),
+ yaml_write(current_output, BirdDict),
+ true.