only check against shadowing base types when declaring types

spec/declaration/local_spec.lua

@@ -540,4 +540,15 @@ describe("local", function()
 
       kk = {}
    ]]))
+
+   it("using a base type name in a regular variable produces no warnings", util.check_warnings([[
+      local any = true
+      print(any)
+
+      local record integer
+      end
+   ]], {
+      { tag = "redeclaration", msg = "variable shadows previous declaration of 'integer'" },
+      { tag = "unused", msg = "unused type integer" },
+   }))
 end)

tl.lua

@@ -7459,9 +7459,9 @@ do
    end
 
 
-   function TypeChecker:check_if_redeclaration(new_name, node)
+   function TypeChecker:check_if_redeclaration(new_name, node, t)
       local old = self:find_var(new_name, "check_only")
-      if old or simple_types[new_name] then
+      if old or (t.typename == "typedecl" and simple_types[new_name]) then
          local var_name = node.tk
          local var_kind = "variable"
          if node.kind == "local_function" or node.kind == "record_function" then
@@ -7546,7 +7546,7 @@ do
          name ~= "..." and
          name:sub(1, 1) ~= "@" then
 
-         self:check_if_redeclaration(name, node)
+         self:check_if_redeclaration(name, node, t)
       end
 
       if var and not var.used then

tl.tl

@@ -7459,9 +7459,9 @@ do
    end
 
 
-   function TypeChecker:check_if_redeclaration(new_name: string, node: Node)
+   function TypeChecker:check_if_redeclaration(new_name: string, node: Node, t: Type)
       local old <const> = self:find_var(new_name, "check_only")
-      if old or simple_types[new_name as TypeName] then
+      if old or (t is TypeDeclType and simple_types[new_name as TypeName]) then
          local var_name = node.tk
          local var_kind = "variable"
          if node.kind == "local_function" or node.kind == "record_function" then
@@ -7546,7 +7546,7 @@ do
          and name ~= "..."
          and name:sub(1, 1) ~= "@"
       then
-         self:check_if_redeclaration(name, node)
+         self:check_if_redeclaration(name, node, t)
       end
 
       if var and not var.used then