Method code for $classification.set_classification()

[Turn off line numbering]

---

  1: arg name, definer, value;
  2: 
  3: switch (value[1]) {
  4:     case 'set:
  5:         classification = value[2];
  6:     case 'add:
  7:         classification = setadd(classification, value[2]);
  8:     case 'del:
  9:         classification = setremove(classification, value[2]);
 10:     default:
 11:         throw(~type, "Unknown action: " + value[1]);
 12: }
 13: 
 14: // $#Edited: 24 Sep 99 13:23 $user_stephen

---

[]