Subversion Repositories wimsdev

Rev

Rev 14109 | Rev 14128 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14109 Rev 14113
Line 30... Line 30...
30 
list_=!replace item number $source_ by $empty in $list_
 30 
list_=!replace item number $source_ by $empty in $list_
31 
!if $target_!=$empty
 31 
!if $target_!=$empty
32 
  !if $target_=0
 32 
  !if $target_=0
33 
    list_=$source_,$list_
 33 
    list_=$source_,$list_
34 
  !else
 34 
  !else
- 
 
 35 
    !if $target_=$[$ecnt_+1]
- 
 
 36 
      list_=$list_,$source_
- 
 
 37 
    !else
35 
    list_=!replace item $target_ by $target_,$source_ in $list_
 38 
      list_=!replace item $target_ by $target_,$source_ in $list_
- 
 
 39 
    !endif
36 
  !endif
 40 
  !endif
37 
!endif
 41 
!endif
38 
list_=!nonempty item $list_
 42 
list_=!nonempty item $list_
39 
mlist_=$empty
 43 
mlist_=$empty
40 
!for i_=1 to $ecnt_
 44 
!for i_=1 to $ecnt_