Changeset 9925


Ignore:
Timestamp:
Jul 7, 2008, 8:33:01 PM (11 years ago)
Author:
gz
Message:

Just some formatting cleanup

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/lib/pprint.lisp

    r9578 r9925  
    181181;the number of entries in the OTHERS list that have a higher priority.
    182182
    183 (progn
    184 
    185 
    186183(defun make-entry (&key test fn full-spec)
    187184  (%istruct 'entry test fn full-spec))
    188 )
    189185
    190186(defun copy-pprint-dispatch (&optional (table *print-pprint-dispatch*))
     
    376372
    377373(progn
    378   (eval-when (:compile-toplevel :execute)
    379    
    380     )
    381 
    382374  (setf (symbol-function 'xp-stream-stream) #'(lambda (s) (xp-stream s)))
    383375
Note: See TracChangeset for help on using the changeset viewer.