distorted.lisp, hosts.lisp: Entries for the new switches.

[zones] / distorted.lisp

diff --git a/distorted.lisp b/distorted.lisp
index b0d0d593a40b8cc4206847298c2a4ac8e60e66d3..06090b40e33d06f94248b2d90d977496e7a60dc8 100644 (file)
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -226,6 +226,11 @@ (defzone distorted.org.uk
   (evolution (safe :addr evolution.safe))
   (evolution :alias evo)
 
+  ;; Switches.
+  (tp0 (safe :addr tp0.safe))
+  (tp1 (safe :addr tp1.safe))
+  (tp2 (safe :addr tp2.safe))
+
   ;; Wired ethernet.
   (unsafe :net unsafe)
   (safe :net safe)