Skip to content

R
riscv-gcc-1
Commit 8f1fe1f8 by Arnaud Charlet
Options

Minor reformatting. 

From-SVN: r244697
parent ce06d641
Showing with 4 additions and 4 deletions
gcc/ada/scn.ads
......@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
-- Copyright (C) 1992-2010, Free Software Foundation, Inc. --
-- Copyright (C) 1992-2016, 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- --
......@@ -44,8 +44,8 @@ package Scn is
-- source index for reading the configuration pragma file.
function Determine_Token_Casing return Casing_Type;
-- Determines the casing style of the current token, which is
-- either a keyword or an identifier. See also package Casing.
-- Determines the casing style of the current token, which is either a
-- keyword or an identifier. See also package Casing.
procedure Post_Scan;
-- Create nodes for tokens: Char_Literal, Identifier, Real_Literal,
......
gcc/ada/sem_prag.adb
......@@ -21348,7 +21348,7 @@ package body Sem_Prag is
procedure Set_SPARK_Context is
begin
SPARK_Mode := Mode_Id;
SPARK_Mode := Mode_Id;
SPARK_Mode_Pragma := N;
end Set_SPARK_Context;
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment