diff --git a/alliance/src/mbkvhdl/src/mvl_scomp_l.l b/alliance/src/mbkvhdl/src/mvl_scomp_l.l
index 1c866d59..42016371 100644
--- a/alliance/src/mbkvhdl/src/mvl_scomp_l.l
+++ b/alliance/src/mbkvhdl/src/mvl_scomp_l.l
@@ -110,7 +110,7 @@ char  *key;
     addhtitem (pt_hash, namealloc("others")       , OTHERS       );
     addhtitem (pt_hash, namealloc("out")          , _OUT         );
 
-    addhtitem (pt_hash, namealloc("package")      , PACKAGE      );
+    addhtitem (pt_hash, namealloc("package")      , _PACKAGE      );
     addhtitem (pt_hash, namealloc("port")         , PORT         );
     addhtitem (pt_hash, namealloc("procedure")    , PROCEDURE    );
     addhtitem (pt_hash, namealloc("process")      , PROCESS      );
diff --git a/alliance/src/mbkvhdl/src/mvl_scomp_y.y b/alliance/src/mbkvhdl/src/mvl_scomp_y.y
index 0d3cad3b..fe5c8270 100644
--- a/alliance/src/mbkvhdl/src/mvl_scomp_y.y
+++ b/alliance/src/mbkvhdl/src/mvl_scomp_y.y
@@ -135,7 +135,7 @@ static struct lofig *MVL_CHDHED = NULL;	/* childs list                  */
 %token        _OR
 %token        OTHERS
 %token        _OUT
-%token        PACKAGE
+%token        _PACKAGE
 %token        PORT
 %token        PROCEDURE
 %token        PROCESS