aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sprint.adb
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2018-11-14 11:40:20 +0000
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>2018-11-14 11:40:20 +0000
commite3548b69ad7ce76aa9e9aecf6a707ab0f88114ae (patch)
tree6130aa2cacf62b88c98eecbc61ba7e61e15f632a /gcc/ada/sprint.adb
parentae93ccb2af09fa4158a3bb531aecbd58cacdfa6c (diff)
downloadgcc-e3548b69ad7ce76aa9e9aecf6a707ab0f88114ae.zip
gcc-e3548b69ad7ce76aa9e9aecf6a707ab0f88114ae.tar.gz
gcc-e3548b69ad7ce76aa9e9aecf6a707ab0f88114ae.tar.bz2
[Ada] Use Cancel_Special_Output instead of Set_Special_Output with null
I believe Cancel_Special_Output is easier to read and thus preferred; otherwise, it wouldn't be introduced, so let's use it where possible. 2018-11-14 Piotr Trojanek <trojanek@adacore.com> gcc/ada/ * bindgen.adb, exp_cg.adb, repinfo.adb, sprint.adb: Minor reuse Cancel_Special_Output where possible. From-SVN: r266110
Diffstat (limited to 'gcc/ada/sprint.adb')
-rw-r--r--gcc/ada/sprint.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sprint.adb b/gcc/ada/sprint.adb
index ab7eecb..a1dbb3c 100644
--- a/gcc/ada/sprint.adb
+++ b/gcc/ada/sprint.adb
@@ -660,7 +660,7 @@ package body Sprint is
Write_Source_Lines (Last_Source_Line (Current_Source_File));
Write_Eol;
Close_Debug_Source;
- Set_Special_Output (null);
+ Cancel_Special_Output;
-- Normal output to standard output file