Subversion Repositories wimsdev

Rev

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

Rev 4330 Rev 7692
Line 58... Line 58...
58 
		 slib_dat=!item $slib_i of $slib_v
 58 
		 slib_dat=!item $slib_i of $slib_v
59 
		 !if $slib_dat<$slib_end or ($slib_dat=$slib_max and $slib_wpointer=$slib_cntw)
 59 
		 !if $slib_dat<$slib_end or ($slib_dat=$slib_max and $slib_wpointer=$slib_cntw)
60 
  # On est toujours dans le meme intervalle
 60 
  # On est toujours dans le meme intervalle
61 
 			 !advance slib_cpt
 61 
 			 !advance slib_cpt
62 
 		!else
 62 
 		!else
63 
  # Le point de separation franchi
63 
  # Le point de separation franchi
64 
  # creer un nouveau point de separation
 64 
  # creer un nouveau point de separation
65 
:point
 65 
:point
66 
  			!advance slib_wpointer
66 
  			!advance slib_wpointer
67 
 			slib_end=!item $slib_wpointer of $slib_w
 67 
 			slib_end=!item $slib_wpointer of $slib_w
68 
 			!if $slib_wpointer < $slib_cntw
 68 
 			!if $slib_wpointer < $slib_cntw
69 
 				slib_end1=!item $[$slib_wpointer+1] of $slib_w
 69 
 				slib_end1=!item $[$slib_wpointer+1] of $slib_w
70 
 			!else
70 
 			!else
71 
				 slib_end1=$slib_end+2
 71 
				 slib_end1=$slib_end+2
72 
			 !endif
 72 
			 !endif
73 
				 slib_result=!append item $[$slib_cpt/$slib_cnt] to $slib_result
 73 
				 slib_result=!append item $[$slib_cpt/$slib_cnt] to $slib_result
74 
			!if $slib_dat>=$slib_end1
 74 
			!if $slib_dat>=$slib_end1
75 
 				slib_cpt=0
 75 
 				slib_cpt=0