diff options
author | Tristan Gingold <tgingold@free.fr> | 2013-12-17 06:25:53 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2013-12-17 06:25:53 +0100 |
commit | 48448a12ef628218db298d8b7c6879e28cdd019a (patch) | |
tree | 7e612d41dc01c435cf32e3cee029b429c9362bb9 /options.adb | |
parent | 04ad1cd54d99fc3ac3d82c69ee5f7c2db7e2275a (diff) | |
download | ghdl-48448a12ef628218db298d8b7c6879e28cdd019a.tar.gz ghdl-48448a12ef628218db298d8b7c6879e28cdd019a.tar.bz2 ghdl-48448a12ef628218db298d8b7c6879e28cdd019a.zip |
Sync tree: add parsing of AMS-VHDL, add Darwin syntax in asm files.
Diffstat (limited to 'options.adb')
-rw-r--r-- | options.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/options.adb b/options.adb index e95456f9c..a62b76da1 100644 --- a/options.adb +++ b/options.adb @@ -89,6 +89,8 @@ package body Options is else return False; end if; + elsif Opt'Length = 5 and then Opt (Beg .. Beg + 4) = "--ams" then + AMS_Vhdl := True; elsif Opt'Length > 2 and then Opt (Beg .. Beg + 1) = "-P" then Libraries.Add_Library_Path (Opt (Beg + 2 .. Opt'Last)); elsif Opt'Length > 10 and then Opt (Beg .. Beg + 9) = "--workdir=" then |