Nuova funzionalità - FPC - Delphi

[DragoRosso]

Ciao a tutti.

E' stata annunciata una nuova funzionalità (la funzione "ternaria" IF) su Delphi (sarà operativa in Delphi 13 Florence): https://blogs.embarcadero.com/coming-in-rad-studio-13-a-conditional-ternary-operator-for-the-delphi-language/

Immediatamente anche FPC ha deciso di applicare la stessa funzionalità (non sò da quale versione di FPC) che era in discussione da diverso tempo con la stessa sintassi: https://forum.lazarus.freepascal.org/index.php/topic,71398.msg562029/topicseen.html?#new

Per quello che riguarda Delphi, la funzionalità nuova insieme ad altre ulteriori saranno disponibili solo in fase di rilascio pubblico (e solo in quella fase verranno confermate).

Questa funzione in pratica simula quella del C con l'istruzione tipo:

Codice: [Seleziona]

x := if (expressione booleana) then (espressione se vera) else (espressione se falsa);
//dove x  e (espressione se vera) e (espressione se falsa) devono essere comapatibili.

[Avogadro]

Ciao a tutti .

Interessante si, ma non corredata da esempi pratici;
in ogni caso nelle librerie a corredo di Lazarus  vi sono decine di funzioni e procedure che in pratica fanno la stessa in vari ambiti, stringe, numeri, etc ;
in ogni caso il costrutto "case x of ..." è un appprocio "piu' robusto" e sopratutto piu' leggibile rispetto all "if... then...else ".


 

[DragoRosso]

Concettualmente è un pò diversa: il case consente solo di eseguire dei blocchi "diversificati", mentre la nuova istruzione ternaria consente di assegnare direttamente un valore (o il risultato di una espressione).
Nulla che non si possa fare con il classico IF.
Questa ha come ulteriore possibilità di essere inserita come un parametro o anche dentro una espressione diretta.

Non penso però che nessuno la userà così, prima di tutto per la leggibilità del programma, che normalmente è cosa cara a chi programma in Pascal.

Nel caso di Delphi invece risulta molto interessante l'uso con le variabili inline.

[Avogadro]

Concordo.

Il concetto che pero' cerco di far passare è semplice: se ci sono un po' di esempi concreti, per semplici che siano,  che illutrino queste novità ben vengano; magari la nuova funzionalità  ci puo' semlificare la vita in diverse circostanze ma magari ci manca il "la" per partire.

Se qualcuno li puo illustrare ...

Ciao

[DragoRosso]

Ti posso fare un esempio in Delphi veramente banale, su base delle variabili in linea:

Codice: [Seleziona]

//Stato precedente
var stato: boolean;
begin
   //Il compilatore non può usare l'inference su x in quanto
   //è necessario assegnare in tutti i due i rami la variabile (ed essendo inline può essere definita solo una volta).
   var x: cardinal;
   if stato then
     x := 0
   else
     x := 1;
end;

//Stato attuale
var stato: boolean;
begin
   //Il compilatore esegue l'inference su x senza alcuna dichiarazione.
   //Inoltre si evita di fare assegnazioni errate (tipo x nel ramo true e y nel ramo false)
   var x := if stato then 0 else 1;
end;

Poi ci sono molteplici usi su ciò. Ripeto, nulla che non si possa fare con un case od un IF classico.

Sull'uso della IF come parametro (ad esempio di funzioni) per adesso sono scettico rispetto alla leggibilità e alla complessità ... non vorrei arrivare a quelle MACRO infinite tipo C dove un parametro è composto in realtà da una "funzione nascosta" di mille elementi (che io ODIO profondamente).

[Avogadro]

Grazie per l'esempio 


Ciao