home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / ada / Examples / c / proc
Encoding:
Text File  |  1994-06-23  |  337 b   |  22 lines

  1. /*
  2.  * Source file proc.c contains procedures PRINTA and PRINTS1 called by
  3.  * the Ada program above.
  4.  */
  5. void printa(int ara[])
  6. {
  7.    int i;
  8.    for (i=0;i<10;i++) {
  9.       printf("%d ",ara[i]);
  10.    }
  11.    printf("\n");
  12. }
  13.  
  14. void prints1(int ara[], int len)
  15. {
  16.    int i;
  17.    for (i=0;i<len;i++) {
  18.       printf("%c",ara[i]);
  19.    }
  20.    printf("\n");
  21. }
  22.