home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_122 / 10.ddi / IOSTRSRC.ZIP / STBTALC.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1992-06-10  |  910 b   |  31 lines

  1. /*[]------------------------------------------------------------[]*/
  2. /*|                                                              |*/
  3. /*|     stbtalc.cpp                                              |*/
  4. /*|                                                              |*/
  5. /*|     Class ios                                                |*/
  6. /*|          long ios::bitalloc()                                |*/
  7. /*|                                                              |*/
  8. /*[]------------------------------------------------------------[]*/
  9.  
  10. /*
  11.  *      C/C++ Run Time Library - Version 5.0
  12.  *
  13.  *      Copyright (c) 1990, 1992 by Borland International
  14.  *      All Rights Reserved.
  15.  *
  16.  */
  17.  
  18. #include <ioconfig.h>
  19. #include <iostream.h>
  20.  
  21. // supply a new flags bit
  22. long ios::bitalloc()
  23. {
  24.     if( nextbit >= 31 )
  25.         return 0;
  26.     else
  27.         return 1L << ++nextbit;
  28. }
  29.  
  30.  
  31.