308afa955ad6 — Tero Koskinen 6 years ago 
Use Elaborate_All instead of Elaborate.

Reported by Jacob Sparre Andersen.
patch browse 
1 files changed, 1 insertions(+), 1 deletions(-)

M src/parser.adb

M src/parser.adb +1 -1
@@ 22,7 22,7 @@ with Input;
 with Ada.Exceptions;
 with Multi_precision_integers.IO; use Multi_precision_integers.IO;
 
-pragma Elaborate (JSON.Data);
+pragma Elaborate_All (JSON.Data);
 
 procedure Parser is
    procedure Tracebackinfo(E : Ada.Exceptions.Exception_Occurrence) is