home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / heath / szofrm.c < prev    next >
Encoding:
Text File  |  1983-09-09  |  170 b   |  16 lines
  1.     
  2. /*
  3.  *    szofram - return the maximum number of bytes that
  4.  *          alloc() could allow.
  5.  */
  6.  
  7. szofram() {
  8. #asm
  9.     LHLD    $LM##
  10.     CALL    c.neg##
  11.     DAD    SP
  12.     LXI    D,-500
  13.     DAD    D
  14. #endasm
  15. }
  16.