File: ctr.zmm

package info (click to toggle)
zoem 07-333-3
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 2,700 kB
  • ctags: 2,050
  • sloc: ansic: 17,942; sh: 790; makefile: 228
file content (43 lines) | stat: -rw-r--r-- 750 bytes parent folder | download | duplicates (6)
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


\'if{\'defined{data}{pud::load::counters}}{
   \'done
}{
   \'def{%{pud::load::counters}}{1}
}

\'def{ctrdec#1}{\ctradd{\1}{-1}}

\'formatted{

\'def{ctrset#2}{
   \'setx{%{pud::ctr::entry::\1}}{\2}
}

\'def{ctradd#2}{
   \'if{\'defined{data}{pud::ctr::entry::\1}}{
      \'setx{%{pud::ctr::entry::\1}}{\'f{+}{\%{pud::ctr::entry::\1}}{\2}}
   }{
      \'setx{%{pud::ctr::entry::\1}}{\2}
   }
}

\'def{ctrinc#1}{
   \'if{\'defined{data}{pud::ctr::entry::\1}}{
      \'setx{%{pud::ctr::entry::\1}}{\'f{+}{\%{pud::ctr::entry::\1}}{1}}
   }{
      \'setx{%{pud::ctr::entry::\1}}{1}
   }
}

\'def{ctrput#1}{
   \'if{\'defined{data}{pud::ctr::entry::\1}}{\%{pud::ctr::entry::\1}}{0}
}

\'def{ctrdefined#1}{
   \'defined{data}{pud::ctr::entry::\1}
}

}