hastype() had forgotten the Division type

diff --git a/src/fundb.c b/src/fundb.c
index b6665d9869e9e90244b000d3c47d9c952c982ea6..0cdcfbdf42c52627102ef4f074c1107e2427bc90 100644 (file)
--- a/src/fundb.c
+++ b/src/fundb.c
@@ -1026,6 +1026,11 @@ FUNCTION(fun_hastype)
       if (IsThing(it))
       found = 1;
       break;
+    case 'd':
+    case 'D':
+      if (IsDivision(it))
+      found = 1;
+      break;
     case 'g':
     case 'G':
       if (IsGarbage(it))