File: ok_longcode_indentation.xml

package info (click to toggle)
pasdoc 0.16.0-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 33,536 kB
  • sloc: pascal: 28,894; javascript: 7,665; xml: 2,597; makefile: 519; sh: 417
file content (45 lines) | stat: -rw-r--r-- 1,497 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
<unit name="ok_longcode_indentation.pas">
  <function name="Foo1" type="procedure" declaration="procedure Foo1;">
    <description><detailed>Should cut nothing: one
  two
    three</detailed></description>
  </function>
  <function name="Foo2" type="procedure" declaration="procedure Foo2;">
    <description><detailed>Should cut 4 spaces: 
one
two
three</detailed></description>
  </function>
  <function name="Foo3" type="procedure" declaration="procedure Foo3;">
    <description><detailed>Should cut 2 spaces: 
  one
two
  three</detailed></description>
  </function>
  <function name="Foo4" type="procedure" declaration="procedure Foo4;">
    <description><detailed>Should cut nothing (there's a tab here): 
    one
	two
    three</detailed></description>
  </function>
  <function name="Foo5" type="procedure" declaration="procedure Foo5;">
    <description><detailed>Should cut tab + 2 spaces: 
one
  two
three</detailed></description>
  </function>
  <function name="Foo6" type="procedure" declaration="procedure Foo6;">
    <description><detailed>Should cut 4 spaces (there's trailing whitespace in 1st lines here, that should be ignored): 
                 
                  
one</detailed></description>
  </function>
  <function name="Foo7" type="procedure" declaration="procedure Foo7;">
    <description><detailed>Should cut 4 spaces (empty line doesn't shorten IndentationPrefix): 
if something then
begin
  // empty line below

end;</detailed></description>
  </function>
</unit>