diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-06-29 03:38:15 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-06-29 03:38:15 +0200 |
| commit | e11afef1e7ffbf22bf0aaac0a7166b0aeee9fd2f (patch) | |
| tree | 728b3fb552a982205563bb36242fc1f7aecfcfa0 /src/ghdldrv/ghdlcomp.ads | |
| parent | ec43db0fb7543b62ab9d326e978cceb70defe58e (diff) | |
| download | ghdl-e11afef1e7ffbf22bf0aaac0a7166b0aeee9fd2f.tar.gz ghdl-e11afef1e7ffbf22bf0aaac0a7166b0aeee9fd2f.tar.bz2 ghdl-e11afef1e7ffbf22bf0aaac0a7166b0aeee9fd2f.zip | |
ghdldrv: refactoring - share more code, isolate ghdlsynth from ghdlsimul.
Diffstat (limited to 'src/ghdldrv/ghdlcomp.ads')
| -rw-r--r-- | src/ghdldrv/ghdlcomp.ads | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlcomp.ads b/src/ghdldrv/ghdlcomp.ads index d20a480a2..c87676d20 100644 --- a/src/ghdldrv/ghdlcomp.ads +++ b/src/ghdldrv/ghdlcomp.ads @@ -81,6 +81,18 @@ package Ghdlcomp is -- hr => 'h' Time_Resolution: Character := 'f'; + -- Common action to perform before analysis: library setup. + procedure Common_Compile_Init (Analyze_Only : Boolean); + + -- Common action to perform before elaboration: + -- * extract PRIM_NAME and SEC_NAME from ARGS. + -- * configure + -- * Check top entity. + procedure Common_Compile_Elab (Cmd_Name : String; + Args : Argument_List; + Opt_Arg : out Natural; + Config : out Iir); + -- Functionnal interface. -- Must be first initialized by Compile_Init procedure Compile_Analyze_Init (Load_Work : Boolean := True); |