The old BONJOUR project

supsysr

Source

.proc,supsysr*i,
  avant"=fichier de references original"=(*n=sysr,*f),
  apres"=fichier de reférences épuré   "=(*n=sysr2,*f),
  direc=(*n=#data).
.help
Cette procédure épure le fichier de références SYSR.
.endhelp
supref,avant,apres,direc.
.data
a, adresse, b, booleen, c, de, debut, des,
e, ecrire, ecrireln, en, erreur, fin, fonction,
ligne, lire, mot, nil, nom, ou, p, par, pas,
s, t, table, texte, v, var