Télécharger SMTEXTE.INC

Retour à la liste

Numérotation des lignes :

  1. C=======================================================================
  2. C OBJET DE TYPE 'TEXT','E '
  3. SEGMENT, MTEXTE
  4. CHARACTER MTEXT*(LOCHAI)
  5. INTEGER NCART
  6. INTEGER MTRADC
  7.  
  8. C MTEXT : Chaine contenant le TEXTE a interpreter
  9. C NCART : Longueur de la chaine contenue dans MTEXT
  10. C MTRADC : Pointeur vers SEGMENT MTRADU
  11. ENDSEGMENT
  12. POINTEUR MTEXT1.MTEXTE, MTEXT2.MTEXTE
  13.  
  14. SEGMENT, MTRADU
  15. INTEGER MTRAD(0)
  16.  
  17. C MTRAD : Tableau d'entier extensible contenant la position dans la pile
  18. C de l'objet decode
  19. ENDSEGMENT
  20. C=======================================================================
  21.  

© Cast3M 2003 - Tous droits réservés.
Mentions légales