% Usage: mf '\mode=what_ever_mode; \input modename' let myexit = primitive_end_; mode_setup; message "MODENAME = " & mode_name[mode]; fontmaking := 0; myexit;