Changeset 8888 in project


Ignore:
Timestamp:
02/25/08 02:29:45 (12 years ago)
Author:
Kon Lovett
Message:

Save.

Location:
release/3/osprocess
Files:
2 added
2 copied
9 moved

Legend:

Unmodified
Added
Removed
  • release/3/osprocess/trunk/osprocess-common.scm

    r8885 r8888  
    158158;;; Argument Checking
    159159
    160 #;(define-inline (check-boolean loc obj)
     160#; ; Unused
     161(define-inline (check-boolean loc obj)
    161162  (unless (boolean? obj)
    162163    (error loc "invalid boolean" obj)) )
     
    164165;;; Misc
    165166
    166 #;(define-inline (->boolean obj)
    167   (not (not obj)) )
     167#; ; Unused
     168(define-inline (->boolean obj)
     169  (and obj
     170       #t) )
    168171
    169172#+windows
  • release/3/osprocess/trunk/osprocess.html

    r8886 r8888  
    420420<h3>Version</h3>
    421421<ul>
    422 <li>1.3 .</li>
     422<li>1.3 Use of misc-extn 3.1 procedures.</li>
    423423<li>1.2 Added collect?, search? &amp; exact? option keywords. Added automatic input stream draining. Made osprocess result values order like osprocess-run result</li>
    424424<li>1.1 Added fileno redirection</li>
  • release/3/osprocess/trunk/tests/osprocess-test.scm

    r8887 r8888  
    205205;
    206206(define-test process-list-test "List of active processes"
    207   (side-effect (thread-sleep! 15.0)) ; Give the reaper some time
     207  (side-effect (thread-sleep! 5.0)) ; Give the reaper some time
    208208  (expect-null "No more processes" (osprocess-list))
    209209)
Note: See TracChangeset for help on using the changeset viewer.