Add package body and declaration remaining functionality

Author: Chris44442

vhdl_lang/src/analysis/declarative.rs

@@ -614,11 +614,11 @@ impl<'a, 't> AnalyzeContext<'a, 't> {
                     scope.add(ent, diagnostics);
                 }
             }
-            Declaration::PackageDeclaration(..) => {
-                // TODO
+            Declaration::PackageDeclaration(ref mut unit) => {
+                self.analyze_package(unit, diagnostics)?;
             }
-            Declaration::PackageBody(..) => {
-                // TODO
+            Declaration::PackageBody(ref mut unit) => {
+                self.analyze_package_body(unit, diagnostics)?;
             }
             Declaration::Configuration(..) => {}
             Declaration::View(view) => {

vhdl_lang/src/analysis/design_unit.rs

@@ -132,7 +132,7 @@ impl<'a, 't> AnalyzeContext<'a, 't> {
         Ok(())
     }
 
-    fn analyze_package(
+    pub fn analyze_package(
         &self,
         unit: &mut PackageDeclaration,
         diagnostics: &mut dyn DiagnosticHandler,
@@ -297,7 +297,7 @@ impl<'a, 't> AnalyzeContext<'a, 't> {
         Ok(())
     }
 
-    fn analyze_package_body(
+    pub fn analyze_package_body(
         &self,
         unit: &mut PackageBody,
         diagnostics: &mut dyn DiagnosticHandler,

vhdl_lang/src/ast/search.rs

@@ -1075,19 +1075,15 @@ impl Search for Declaration {
                 return_if_found!(open_info.search(ctx, searcher));
                 return_if_found!(file_name.search(ctx, searcher));
             }
-
             Declaration::Package(ref package_instance) => {
                 return_if_found!(package_instance.search(ctx, searcher));
             }
-
-            Declaration::PackageDeclaration(ref package_instance) => {
-                return_if_found!(package_instance.search(ctx, searcher)); // @TODO
+            Declaration::PackageDeclaration(ref decl) => {
+                return_if_found!(decl.search(ctx, searcher));
             }
-
-            Declaration::PackageBody(ref package_instance) => {
-                return_if_found!(package_instance.search(ctx, searcher)); // @TODO
+            Declaration::PackageBody(ref body) => {
+                return_if_found!(body.search(ctx, searcher));
             }
-
             Declaration::Configuration(_) => {
                 // @TODO
             }

vhdl_lang/src/named_entity.rs

@@ -9,7 +9,8 @@ use crate::ast::{
     AttributeDeclaration, AttributeSpecification, ComponentDeclaration, Declaration, Designator,
     FileDeclaration, HasIdent, Ident, InterfaceFileDeclaration, InterfacePackageDeclaration,
     ModeViewDeclaration, ObjectClass, ObjectDeclaration, PackageInstantiation, SubprogramBody,
-    SubprogramInstantiation, SubprogramSpecification, TypeDeclaration, WithDecl,
+    SubprogramInstantiation, SubprogramSpecification, TypeDeclaration, WithDecl, PackageDeclaration,
+    PackageBody
 };
 use crate::ast::{ExternalObjectClass, InterfaceDeclaration, InterfaceObjectDeclaration};
 use crate::data::*;
@@ -631,8 +632,8 @@ impl HasEntityId for Declaration {
             Declaration::SubprogramBody(body) => body.ent_id(),
             Declaration::SubprogramInstantiation(decl) => decl.ent_id(),
             Declaration::Package(pkg) => pkg.ent_id(),
-            Declaration::PackageDeclaration(_) => None, // @TODO
-            Declaration::PackageBody(_) => None,        // @TODO
+            Declaration::PackageDeclaration(pkg) => pkg.ent_id(),
+            Declaration::PackageBody(pkg) => pkg.ent_id(),
             Declaration::Use(_) => None,
             Declaration::Configuration(_) => None,
             Declaration::View(decl) => decl.ent_id(),
@@ -652,6 +653,18 @@ impl HasEntityId for PackageInstantiation {
     }
 }
 
+impl HasEntityId for PackageDeclaration {
+    fn ent_id(&self) -> Option<EntityId> {
+        self.ident.decl.get()
+    }
+}
+
+impl HasEntityId for PackageBody {
+    fn ent_id(&self) -> Option<EntityId> {
+        self.ident.decl.get()
+    }
+}
+
 impl HasEntityId for SubprogramBody {
     fn ent_id(&self) -> Option<EntityId> {
         self.specification.ent_id()