1 /* Awrite_long.c 1.1 86/07/20 */ 2 3 #include "../tahoealign/align.h" 4 5 write_longword (infop, longword, where) 6 process_info *infop; 7 long longword; 8 struct oprnd *where; 9 /* 10 /* Put the longword at the given address in 11 /* tahoe's memory. 12 /* 13 /**************************************************/ 14 { 15 if (! (where->mode & W)) exception(infop, ILL_ADDRMOD); 16 switch (where->mode & ADDFIELD) /* Mask out R/W bits */ 17 { 18 case Add: 19 case SPmode: 20 put_longword (infop, longword, where->address); 21 break; 22 case Dir: 23 Replace (infop, where->reg_number, longword); 24 break; 25 default: 26 printf("Unknown destination in write_long (alignment code)\n"); 27 }; 28 } 29