Ignore:
Timestamp:
Jan 23, 2008, 6:08:49 AM (12 years ago)
Author:
gb
Message:

Move some macros to before the code that uses them.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/linux-files.lisp

    r7951 r8241  
    808808
    809809
     810(defmacro wtermsig (status)
     811  `(ldb (byte 7 0) ,status))
     812
     813(defmacro wexitstatus (status)
     814  `(ldb (byte 8 8) (the fixnum ,status)))
     815
     816(defmacro wstopsig (status)
     817  `(wexitstatus ,status))
     818
     819(defmacro wifexited (status)
     820  `(eql (wtermsig ,status) 0))
     821
     822(defmacro wifstopped (status)
     823  `(eql #x7f (ldb (byte 7 0) (the fixnum ,status))))
    810824
    811825(defun monitor-external-process (p)
     
    964978
    965979
    966 (defmacro wtermsig (status)
    967   `(ldb (byte 7 0) ,status))
    968 
    969 (defmacro wexitstatus (status)
    970   `(ldb (byte 8 8) (the fixnum ,status)))
    971 
    972 (defmacro wstopsig (status)
    973   `(wexitstatus ,status))
    974 
    975 (defmacro wifexited (status)
    976   `(eql (wtermsig ,status) 0))
    977 
    978 (defmacro wifstopped (status)
    979   `(eql #x7f (ldb (byte 7 0) (the fixnum ,status))))
     980
    980981
    981982(defmacro wifsignaled (status)
Note: See TracChangeset for help on using the changeset viewer.