blob: 4d0fc5473c4c9d056b568bb57e2540b05a70973c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
-- Binding to GNU readline
with Grt.Types; use Grt.Types;
package Grt.Readline_Gnu 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_Gnu;
|