home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / ada / Examples / demos / c / screen_io
Encoding:
Text File  |  1994-10-15  |  214 b   |  13 lines
  1. #include "kernel.h"
  2.  
  3. /*
  4.  * Source file screen_io.c for calling from Ada
  5.  * provide a simple Ada interface to OS_WriteI+n
  6.  */
  7.  
  8. void ada_writei(int n)
  9. {
  10.    _kernel_swi_regs in, out;
  11.    _kernel_swi(n+256,&in,&out);
  12. }
  13.