home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Examples / p1-332 < prev    next >
Encoding:
Text File  |  1994-05-25  |  611 b   |  27 lines
  1. #include "os.h"
  2.  
  3. void read_variable (void)
  4.  
  5. {  char value [255];
  6.    int context, len;
  7.  
  8.    context = 0;
  9.    while (xos_read_var_val ("Sys$*", value, sizeof value - 1,
  10.          context, os_VARTYPE_EXPANDED, &len, &context, NULL) == NULL)
  11.    {  os_writen (value, len);
  12.       os_new_line ();
  13.    }
  14. }
  15.  
  16. extern void Code_Veneer (void);
  17. extern int Code_Size;
  18.  
  19. void create_code_variable (void)
  20.  
  21.    /*Must be done in assembler. The creation part could be done like this,
  22.       assuming Code_Veneer is the assembler code.*/
  23.  
  24. {  os_set_var_val ("Mode", (void *) &Code_Veneer, Code_Size, 0,
  25.          os_VARTYPE_CODE, NULL);
  26. }
  27.