blob: 5eb1b5c7f16aecc2f52382745bad557834de3ec3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
-- Although being part of GRT, the readline binding should be independent of
-- it (for easier reuse).
with Grt.Types; use Grt.Types;
package Grt.Readline is
function Readline (Prompt : Ghdl_C_String) return Ghdl_C_String;
pragma Import (C, Readline);
procedure Add_History (Line : Ghdl_C_String);
pragma Import (C, Add_History);
pragma Linker_Options ("-lreadline");
end Grt.Readline;
|