diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-09-10 11:11:44 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-09-10 11:11:44 +0200 |
| commit | 2bc58d4d59d22e8e8dacd5ab60d802e32fd2954c (patch) | |
| tree | e9db542574c4a4d75693d85a4208e89280d3d4b9 /gcc/ada/g-pehage.ads | |
| parent | 2b74262bfcb6002f9cff86d0b6546967a32d96cf (diff) | |
| download | gcc-2bc58d4d59d22e8e8dacd5ab60d802e32fd2954c.zip gcc-2bc58d4d59d22e8e8dacd5ab60d802e32fd2954c.tar.gz gcc-2bc58d4d59d22e8e8dacd5ab60d802e32fd2954c.tar.bz2 | |
[multiple changes]
2010-09-10 Robert Dewar <dewar@adacore.com>
* einfo.adb: Minor code cleanup: Add assertion to
Set_Corresponding_Protected_Entry.
2010-09-10 Bob Duff <duff@adacore.com>
* g-pehage.ads, g-pehage.adb (Produce): Add a new flag to allow sending
the output to standard output.
From-SVN: r164145
Diffstat (limited to 'gcc/ada/g-pehage.ads')
| -rw-r--r-- | gcc/ada/g-pehage.ads | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/gcc/ada/g-pehage.ads b/gcc/ada/g-pehage.ads index dfe926e..c195479 100644 --- a/gcc/ada/g-pehage.ads +++ b/gcc/ada/g-pehage.ads @@ -131,11 +131,13 @@ package GNAT.Perfect_Hash_Generators is -- Raise Too_Many_Tries if the algorithm does not succeed within Tries -- attempts (see Initialize). - procedure Produce (Pkg_Name : String := Default_Pkg_Name); + procedure Produce + (Pkg_Name : String := Default_Pkg_Name; Use_Stdout : Boolean := False); -- Generate the hash function package Pkg_Name. This package includes the - -- minimal perfect Hash function. The output is placed in the current - -- directory, in files X.ads and X.adb, where X is the standard GNAT file - -- name for a package named Pkg_Name. + -- minimal perfect Hash function. The output is normally placed in the + -- current directory, in files X.ads and X.adb, where X is the standard + -- GNAT file name for a package named Pkg_Name. If Use_Stdout is True, the + -- output goes to standard output, and no files are written. ---------------------------------------------------------------- |