Commit 8f1fe1f8 by Arnaud Charlet

Minor reformatting.

From-SVN: r244697
parent ce06d641
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- S p e c -- -- 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 -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -44,8 +44,8 @@ package Scn is ...@@ -44,8 +44,8 @@ package Scn is
-- source index for reading the configuration pragma file. -- source index for reading the configuration pragma file.
function Determine_Token_Casing return Casing_Type; function Determine_Token_Casing return Casing_Type;
-- Determines the casing style of the current token, which is -- Determines the casing style of the current token, which is either a
-- either a keyword or an identifier. See also package Casing. -- keyword or an identifier. See also package Casing.
procedure Post_Scan; procedure Post_Scan;
-- Create nodes for tokens: Char_Literal, Identifier, Real_Literal, -- Create nodes for tokens: Char_Literal, Identifier, Real_Literal,
......
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