diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-11-16 08:05:59 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-11-16 08:05:59 +0100 |
commit | 706fd3a64ca9d55591542d0488b87698e3835c21 (patch) | |
tree | 08673255458c20801c8d77a0149538935203220f /src/grt/grt-files_operations.ads | |
parent | 2d50cc903f5cf5eb55ebdc082c9ccb7168e75987 (diff) | |
download | ghdl-706fd3a64ca9d55591542d0488b87698e3835c21.tar.gz ghdl-706fd3a64ca9d55591542d0488b87698e3835c21.tar.bz2 ghdl-706fd3a64ca9d55591542d0488b87698e3835c21.zip |
synth: handle untruncated_text_read.
Diffstat (limited to 'src/grt/grt-files_operations.ads')
-rw-r--r-- | src/grt/grt-files_operations.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/grt/grt-files_operations.ads b/src/grt/grt-files_operations.ads index c6ee8751d..176d4f06c 100644 --- a/src/grt/grt-files_operations.ads +++ b/src/grt/grt-files_operations.ads @@ -133,8 +133,8 @@ package Grt.Files_Operations is Length : out Std_Integer); procedure Ghdl_Untruncated_Text_Read (File : Ghdl_File_Index; - Str : Std_String_Ptr; - Len : out Std_Integer; + Buf : Ghdl_C_String; + Len : in out Std_Integer; Status : out Op_Status); procedure Ghdl_Text_File_Close (File : Ghdl_File_Index; |