Les unités de Pure Pascal (langage Pascal pour les ordinateurs de la gamme Atari ST), compatible Turbo Pascal.
Unité System : Procédure New
Déclaration
procedure New( var p : Pointer [, Init : Constructor ])Description
La procédure New réserve de la mémoire pour une variable. La taille de la zone mémoire est implicitement déterminée par le type référencé par p. L'adresse de début de la zone mémoire est affectée à p. S'il n'y a pas assez de mémoire libre, une erreur d'exécution est générée (pour éviter les erreurs d'exécution, voir gestion de la mémoire). Si p pointe vers un type Objet, un constructeur peut être passé en tant que paramètre Init supplémentaire.New peut également être utilisé comme fonction. Il délivre alors un pointeur du même type que p comme résultat :
n := New( p );
Références croisées FreeMem GetMem Mark New Release
Exemple
type CharacterPtr = ^Character; Character = record next : CharacterPtr; prev : CharacterPtr; c : Char; end; var t : String; p, n : CharacterPtr; i : Integer; begin Write( 'Tapez le texte: ' ); Readln( t ); p := NIL; for i := 0 to Integer(t[0]) do begin New( n ); n^.prev := p; n^.next := NIL; n^.c := t[i]; if p <> NIL then p^.next := n; p := n; end; while p <> NIL do begin Write( p^.c ); n := p^.prev; Dispose( p ); p := n; end; end.
Vous trouverez dans cette zone la liste de toutes les Unités (équivalent des "Librairies" en C) de Pure Pascal. Les Unités indiqués comme standards existent dans la majorité des compilateurs Pascal existant sur ordinateurs 16 bits et au dela (dont Turbo Pascal 3 mini). Les unités indiqués comme Atari sont spécifiques aux systèmes d'exploitation des Atari ST (TOS n.n).
Accès aux unités
Les menus déroulants de chaque unité sont des accès directs aux procédures et fonctions, classés alphabétiquement (sans tenir compte de la casse, puisque le langage Pascal ne tient pas compte de la casse!)Cette page Unités est issu du fichier UNIT.HLP de la documentation de Pure Pascal (d'Application Systems Heidelberg), qui a été convertie en format TXT puis traduite de l'Allemand grâce à Google Translator : des milliers de copier/coller de et vers Google translator ont été nécessaires, ne connaissant pas un mot d'Allemand!