2 <!-- This file adds support for the style_checker utility to GPS. -->
5 <action name="Style_Checker" output="none" category="Style_Checker">
6 <description>Check source code style.</description>
8 <shell>MDI.save_all</shell>
9 <shell>Locations.remove_category "Style Checker"</shell>
10 <shell>Project %p</shell>
11 <shell>Project.get_tool_switches_as_string %1 Style_Checker</shell>
12 <external output="">style_checker %1 "%F"</external>
14 <shell>Locations.parse """%1 """ "Style Checker"</shell>
20 <menu action="Style_Checker" before="Unit Testing" >
21 <title>Check for style errors</title>
25 <tool name="Style_Checker" package="Style_Checker" index="Style_Checker" >
26 <language>Ada</language>
28 <title line="1" >Simple switches</title>
29 <title line="2" >Line ending</title>
30 <title line="3" >Copyright</title>
33 <check label="Allow trailing spaces"
34 switch="-T" line="1"/>
36 <check label="Allow duplicate blank lines"
37 switch="-B" line="1"/>
39 <check label="Allow single space after comment characters"
40 switch="-C" line="1"/>
42 <check label="Forbid single comment line ending with dot"
43 switch="-d" line="1"/>
45 <check label="Disable Ada syntax check"
46 switch="-S" line="1"/>
48 <spin label="Maximum line length" min="50" max="120" default="79"
51 <check label="Do not check for header size"
52 switch="-H" line="1"/>
54 <spin label="Header size" min="0" max="40" default="20"
57 <dependency master-page="Style_Checker" slave-page="Style_Checker"
60 master-status="on" slave-status="20" />
62 <dependency master-page="Style_Checker" slave-page="Style_Checker"
65 master-status="21" slave-status="off" />
67 <dependency master-page="Style_Checker" slave-page="Style_Checker"
70 master-status="19" slave-status="off" />
74 <radio-entry label="Do not check line ending" switch="-E" />
75 <radio-entry label="DOS line ending" switch="-eDOS" />
76 <radio-entry label="UNIX line ending" switch="-eUNIX" />
80 <check label="Check for copyright presence"
81 switch="-cp" line="3"/>
83 <check label="Check for copyright year"
84 switch="-cy" line="3"/>
86 <field label="Copyright pattern" switch="-cf"
87 separator=" " line="3"/>