home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 5 / FreshFish_July-August1994.bin / bbs / dev / ace-2.0.lha / ACE-2.0 / prgs / ExternFunc / func2.b < prev    next >
Encoding:
Text File  |  1994-01-16  |  263 b   |  17 lines
  1. {*
  2. ** A test of external function use.
  3. ** sub2.s (assembled to produce sub2.o) 
  4. ** is used in conjunction with this:
  5. **
  6. ** bas -O func2 sub2.o
  7. *}
  8.   
  9. defint x,y
  10.  
  11. external function subtract%
  12.  
  13. input "enter x: ",x
  14. input "enter y: ",y
  15.  
  16. print x;"-";y;"=";subtract(x,y)
  17.