Statistics
| Branch: | Tag: | Revision:

root / tools / perl / lib / auto / POSIX / sleep.al @ fa47cac2

History | View | Annotate | Download (341 Bytes)

1 
# NOTE: Derived from ..\..\lib\POSIX.pm.
2 
# Changes made here will be lost when autosplit is run again.
3 
# See AutoSplit.pm.
4 
package POSIX;
5 

    		
  

  

  

    
      6
    
    
      
#line 744 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sleep.al)"


    		
  

  

  

    
      7
    
    
      
sub sleep {


    		
  

  

  

    
      8
    
    
      
    usage "sleep(seconds)" if @_ != 1;


    		
  

  

  

    
      9
    
    
      
    $_[0] - CORE::sleep($_[0]);


    		
  

  

  

    
      10
    
    
      
}


    		
  

  

  

    
      11
    
    
      

    		
  

  

  

    
      12
    
    
      
# end of POSIX::sleep


    		
  

  

  

    
      13
    
    
      
1;