tcldot myiddisc_idregister: squash a spurious -Wswitch-default compiler warning

diff --git a/tclpkg/tcldot/tcldot-id.c b/tclpkg/tcldot/tcldot-id.c
index 29424e37f122ccd112a85f4265fd9ea66fcf19e0..85f783fcc1e08c1e2c7f7be6907dce107fd5656b 100644 (file)
--- a/tclpkg/tcldot/tcldot-id.c
+++ b/tclpkg/tcldot/tcldot-id.c
@@ -8,7 +8,7 @@
  * Contributors: Details at https://graphviz.org
  *************************************************************************/
 
-
+#include <cgraph/unreachable.h>
 #include "tcldot.h"
 
 // Agiddisc functions
@@ -90,6 +90,7 @@ static void myiddisc_idregister(void *state, int objtype, void *obj) {
         case AGNODE: proc=nodecmd; break;
         case AGINEDGE:
         case AGOUTEDGE: proc=edgecmd; break;
+        default: UNREACHABLE();
     }
 #ifndef TCLOBJ
     Tcl_CreateCommand(interp, obj2cmd(obj), proc, (ClientData) gctx, (Tcl_CmdDeleteProc *) NULL);