Ignore:
Timestamp:
May 6, 2011, 12:47:14 AM (10 years ago)
Author:
Sam Hocevar
Message:

data: remove \r and trailing spaces and tabs from all Lisp sources.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/data-abuse/lisp/explo.lsp

    r54 r582  
    1313               T))))
    1414
    15 (defun do_small_explo (radius amount) 
     15(defun do_small_explo (radius amount)
    1616  (add_object EXPLODE3 (+ (x) (random 5)) (+ (y) (random 5)) 0)
    1717  (add_object EXPLODE2 (+ (x) (random 5)) (+ (y) (random 5)) 2)
     
    5050
    5151(def_char EXP_LIGHT
    52   (funs (ai_fun   explo_light) 
     52  (funs (ai_fun   explo_light)
    5353        (draw_fun dev_draw))
    5454  (flags (unlistable T))
     
    5858
    5959
    60 (defun exp_ai () 
    61   (if (eq (aitype) 0) (next_picture) 
     60(defun exp_ai ()
     61  (if (eq (aitype) 0) (next_picture)
    6262    (progn (set_aitype (- (aitype) 1))
    6363           T)))
     
    6565
    6666(defun exp_draw ()
    67   (if (eq (aitype) 0) 
     67  (if (eq (aitype) 0)
    6868      (middle_draw)))
    6969
Note: See TracChangeset for help on using the changeset viewer.