Changeset 3596

Show
Ignore:
Timestamp:
07/23/08 20:55:53 (4 months ago)
Author:
ksprotte
Message:

indentation

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/projects/bos/test/allocation.lisp

    r3573 r3596  
    215215(test allocation.disconnected-m2s.1 
    216216  (with-fixture initial-bos-store () 
    217     (let ((area (make-allocation-area #((7193 . 5195) (7351 . 5193) (7340 . 5377) (7185 . 5390) (7174 . 5385) 
    218                                         (7166 . 5387) (7156 . 5381) (7150 . 5379) (7143 . 5374) (7136 . 5368) 
    219                                         (7135 . 5364) (7135 . 5359) (7140 . 5347) (7145 . 5342) (7148 . 5329) 
    220                                         (7156 . 5329) (7157 . 5334) (7166 . 5331) (7170 . 5329) (7171 . 5327) 
    221                                         (7174 . 5316) (7184 . 5306) (7185 . 5291) (7196 . 5286) (7197 . 5287) 
    222                                         (7200 . 5287) (7201 . 5284) (7203 . 5275) (7201 . 5264) (7191 . 5249) 
    223                                         (7203 . 5237) (7199 . 5235) (7195 . 5233) (7198 . 5222) (7202 . 5219) 
    224                                         (7202 . 5214) (7204 . 5205) (7195 . 5197)))) 
     217    (let ((area (make-allocation-area                                   
     218                 #((7193 . 5195) (7351 . 5193) 
     219                   (7340 . 5377) (7185 . 5390) 
     220                   (7174 . 5385) (7166 . 5387) 
     221                   (7156 . 5381) (7150 . 5379) 
     222                   (7143 . 5374) (7136 . 5368)                    
     223                   (7135 . 5364) (7135 . 5359) 
     224                   (7140 . 5347) (7145 . 5342) 
     225                   (7148 . 5329) (7156 . 5329) 
     226                   (7157 . 5334) (7166 . 5331) 
     227                   (7170 . 5329) (7171 . 5327)                    
     228                   (7174 . 5316) (7184 . 5306) 
     229                   (7185 . 5291) (7196 . 5286) 
     230                   (7197 . 5287) (7200 . 5287) 
     231                   (7201 . 5284) (7203 . 5275) 
     232                   (7201 . 5264) (7191 . 5249) 
     233                   (7203 . 5237) (7199 . 5235) 
     234                   (7195 . 5233) (7198 . 5222) 
     235                   (7202 . 5219) (7202 . 5214) 
     236                   (7204 . 5205) (7195 . 5197))))           
    225237          (sponsor (make-sponsor :login "test-sponsor")) 
    226238          (m2-counts '(12 43 29 3)))