Extern "C" Declare Function readline(Byval As Const Zstring Ptr) As Zstring Ptr Declare Sub add_history(Byval As Const Zstring Ptr) End Extern