anchor.diff:  
     (defcommand "AU REVOIR" nil ()
       "Efface les fichiers temporaires, et passe à l'état dormant."
  +    #+lse-unix "La commande AU REVOIR annonce au système qu'il
  +peut effacer les fichiers temporaires, et quitter le système L.S.E."
       (au-revoir))
   
     (defcommand "ABREGER"     nil ()
  
positive.code:     (poursuivre-jusqu-en linum))
  
  
    (defcommand "PRENDRE ETAT CONSOLE"  un-numero (consnum)
      "Copie le programme courant et les fichiers temporaires de la console indiquée."
      (prendre-etat-console consnum))
  
  
  
negative.code: 
    (defcommand "LISTER A PARTIR DE"   deux-numeros-optionels (from to)
      "Affiche le programme courant."
      
      (lister-a-partir-de from to))
  
  
  