home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s038 / 1.ddi / SUPP.LIF / CONVRT.EXT < prev    next >
Encoding:
Text File  |  1992-07-06  |  299 b   |  14 lines
  1. $save nolist
  2.  
  3. convert$decimal:  PROCEDURE(destination$p,destination$max,dec$number,
  4.                             number$of$digits,excep$p)    EXTERNAL;
  5.     DECLARE
  6.         destination$p        POINTER,
  7.         destination$max        WORD,
  8.         dec$number            WORD,
  9.         number$of$digits    BYTE,
  10.         excep$p                POINTER;
  11. END convert$decimal;
  12.  
  13. $restore
  14.