diff options
| author | Zhu Qun-Ying <zhu.qunying@gmail.com> | 2024-12-14 07:36:02 +0700 |
|---|---|---|
| committer | Willy Sudiarto Raharjo <willysr@slackbuilds.org> | 2024-12-14 07:59:46 +0700 |
| commit | 6f91d8c71d71abe7c9d299c211b645f159d1d5fe (patch) | |
| tree | b4d8cc170d617750ab57cefc82d7ac1187e882e6 /libraries/gnatcoll-core/compiler-error.patch | |
| parent | 71a2fae72241b69f35b8452524a6717ff4db2d71 (diff) | |
libraries/gnatcoll-core: Added (GNAT Core Packages).
Signed-off-by: Willy Sudiarto Raharjo <willysr@slackbuilds.org>
Diffstat (limited to 'libraries/gnatcoll-core/compiler-error.patch')
| -rw-r--r-- | libraries/gnatcoll-core/compiler-error.patch | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/libraries/gnatcoll-core/compiler-error.patch b/libraries/gnatcoll-core/compiler-error.patch new file mode 100644 index 0000000000..8930ce7585 --- /dev/null +++ b/libraries/gnatcoll-core/compiler-error.patch @@ -0,0 +1,28 @@ +commit 4a037b06e349a3ec0c6ad5e1dcf0814c4b44e6de +Author: Zhu Qun-Ying <zhu.qunying@gmail.com> +Date: Thu Dec 5 21:09:56 2024 -0800 + + fix compile error + +diff --git a/core/src/gnatcoll-json.adb b/core/src/gnatcoll-json.adb +index 64b4217c..e4753312 100644 +--- a/core/src/gnatcoll-json.adb ++++ b/core/src/gnatcoll-json.adb +@@ -666,7 +666,7 @@ package body GNATCOLL.JSON is + + Deallocate (Current_Key); + Free (Read_States); +- return (Success => True, Value => Result); ++ return R_Result : constant Read_Result := (Success => True, Value => Result); + exception + when E : Invalid_JSON_Stream => + Free (Read_States); +@@ -675,7 +675,7 @@ package body GNATCOLL.JSON is + begin + Data.Current_Text_Position (Line, Column); + +- return (Success => False, ++ return R_Result : constant Read_Result:= (Success => False, + Error => (Line, Column, + To_Unbounded_String + (Ada.Exceptions.Exception_Message (E)))); |