1 files changed, 3 insertions, 0 deletions
diff --git a/nodes.adb b/nodes.adb
index 9547fb043..3ee0afe77 100644
--- a/nodes.adb
+++ b/nodes.adb
@@ -45,10 +45,13 @@ package body Nodes is
 
    Free_Chain : Node_Type := Null_Node;
 
+   --  Just to have the default value.
+   pragma Warnings (Off);
    Init_Short  : Node_Record (Format_Short);
    Init_Medium : Node_Record (Format_Medium);
    Init_Fp     : Node_Record (Format_Fp);
    Init_Int    : Node_Record (Format_Int);
+   pragma Warnings (On);
 
    function Create_Node (Format : Format_Type) return Node_Type
    is