diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-05-04 16:49:19 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-05-04 19:24:20 +0200 |
commit | fc028b5d21727da66dc8e146b3dbcfc870c64f90 (patch) | |
tree | 59462a5173067a24482976035564e135ce4303c0 /src/options.adb | |
parent | 7cee2ba98f47f6ee7b7ffbe0d9555a972c8afc8b (diff) | |
download | ghdl-fc028b5d21727da66dc8e146b3dbcfc870c64f90.tar.gz ghdl-fc028b5d21727da66dc8e146b3dbcfc870c64f90.tar.bz2 ghdl-fc028b5d21727da66dc8e146b3dbcfc870c64f90.zip |
vhdl: move scanner under vhdl hierarchy.
Diffstat (limited to 'src/options.adb')
-rw-r--r-- | src/options.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/options.adb b/src/options.adb index a627bde04..e2da44919 100644 --- a/src/options.adb +++ b/src/options.adb @@ -23,7 +23,7 @@ with Std_Names; with PSL.Nodes; with PSL.Dump_Tree; with Disp_Tree; -with Scanner; +with Vhdl.Scanner; with Back_End; use Back_End; with Flags; use Flags; with Files_Map; @@ -121,7 +121,7 @@ package body Options is Name : String (1 .. Opt'Last - 8 + 1); begin Name := Opt (8 .. Opt'Last); - Scanner.Convert_Identifier (Name); + Vhdl.Scanner.Convert_Identifier (Name); Libraries.Work_Library_Name := Get_Identifier (Name); end; elsif Opt = "-C" or else Opt = "--mb-comments" then @@ -167,8 +167,8 @@ package body Options is elsif Opt = "--vital-checks" then Flag_Vital_Checks := True; elsif Opt = "-fpsl" then - Scanner.Flag_Psl_Comment := True; - Scanner.Flag_Comment_Keyword := True; + Vhdl.Scanner.Flag_Psl_Comment := True; + Vhdl.Scanner.Flag_Comment_Keyword := True; elsif Opt = "-dp" then Dump_Parse := True; elsif Opt = "-ds" then |