File: var.proc.ask

package info (click to toggle)
wims 2%3A4.29a%2Bdfsg1-3
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 185,704 kB
  • sloc: xml: 366,687; javascript: 120,570; ansic: 62,341; java: 62,170; sh: 7,744; perl: 3,937; yacc: 3,217; cpp: 1,915; lex: 1,805; makefile: 1,084; lisp: 914; pascal: 601; python: 520; php: 318; asm: 7
file content (19 lines) | stat: -rw-r--r-- 315 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
ask=!item 1 of $ask
!if $ask notitemof $remlist
  ask=
  !exit
!endif

comment=
!read $deffile info
!if $(weight$ask)<0
  badask=yes
  badname=!line 1 of $(parm$ask)
  !default comment=!line 4 of $(parm$ask)
  ask=
  !exit
!endif

gotlist=!append item $ask to $gotlist
remlist=!listcomplement $ask in $remlist
ask=