File: moveup.proc

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 (11 lines) | stat: -rw-r--r-- 654 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
!if $moveup>1 and $moveup<=$seq_cnt
  x_=!record 1 of wimshome/log/classes/$wims_class/seq/.sequence$[$moveup-1]
  y_=!record 1 of wimshome/log/classes/$wims_class/seq/.sequence$moveup
  !writefile wimshome/log/classes/$wims_class/seq/.sequence$[$moveup-1] :$y_
  !writefile wimshome/log/classes/$wims_class/seq/.sequence$[$moveup] :$x_
  !sh mv $wims_home/log/classes/$wims_class/.S$[$moveup-1] $wims_home/log/classes/$wims_class/.Stmp;\
    mv $wims_home/log/classes/$wims_class/.S$moveup $wims_home/log/classes/$wims_class/.S$[$moveup-1];\
    mv $wims_home/log/classes/$wims_class/.Stmp $wims_home/log/classes/$wims_class/.S$moveup;
!endif

job=show