Discussion :

[bvsud]

Bonjour à tous

J'ai souvent recours au type Pointer, correspondant au pointeurs de type void en C, je présume. Je suis obligé de passer par là, faute de pouvoir transtyper le type Pointer sur tout autre pointeur, par exemple ^Ptr_String .

Ca donne ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
 
asm  // Affectation illicite de Ptr_Source
      mov EAX, Ptr_Source
      mov ECX, Ptr_Dest
      mov Ptr_Source, ECX
end;  // asm
 
move(Ptr_Source, Ptr_Dest, Longueur); // Longueur = integer

Question : existe-t-il une technique ou une syntaxe permettant une telle affectation illicite MAIS par voie d'un transtypage classique ?

Merci

[Paul TOTH]

je ne comprend pas tout mais il suffit de transtyper correctement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
var
 a: ^TypeA;
 b: ^TypeB;
 VarA: TypeA;
begin
  a := @VarA;
  b := Pointer(a);
end;

d'autre part, l'instruction move en Pascal n'attend pas des pointeurs c'est donc

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
  move(a, b, SizeOf(Pointer)); // copie du pointeur
  move(a^, b^, SizeOf(TypeA)); // copie des données pointées

[bvsud]

je ne comprend pas tout mais il suffit de transtyper correctement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
var
 a: ^TypeA;
 b: ^TypeB;
 VarA: TypeA;
begin
  a := @VarA;
  b := Pointer(a);
end;

d'autre part, l'instruction move en Pascal n'attend pas des pointeurs c'est donc

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
  move(a, b, SizeOf(Pointer)); // copie du pointeur
  move(a^, b^, SizeOf(TypeA)); // copie des données pointées

Ben voilà !! C'était syntaxique

Merci :hello: