summaryrefslogtreecommitdiff
path: root/gcc/ada/prj-pars.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/prj-pars.adb')
-rw-r--r--gcc/ada/prj-pars.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/prj-pars.adb b/gcc/ada/prj-pars.adb
index fb277b4bc0f..0cdd9ad3604 100644
--- a/gcc/ada/prj-pars.adb
+++ b/gcc/ada/prj-pars.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 2001-2007, Free Software Foundation, Inc. --
+-- Copyright (C) 2001-2008, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -70,7 +70,7 @@ package body Prj.Pars is
-- If there were no error, process the tree
- if Project_Node /= Empty_Node then
+ if Present (Project_Node) then
Prj.Proc.Process
(In_Tree => In_Tree,
Project => The_Project,