Emulare i Puntatori a Funzione del linguaggio C mediante gli Oggetti
È possibile emulare in Gambas i Puntatori a Funzioni del linguaggio C tramite Oggetti.
In tal modo è possibile in pratica invocare una Funzione attraverso il nome di una variabile di tipo Oggetto.
A seconda di come è strutturato il set di Funzioni e di quante ve ne sono nel codice, si possono adottare almeno due modalità. [nota 1]
Uso del Metodo speciale "_call()"
Si definisce una Classe (usando le parole-chiave: Create Static ) che rappresenti la Funzione, e si implementa poi la Funzione nel suo Metodo speciale "_call()".
Così è possibile passare quella Classe (che in realtà è un Oggetto singleton) come una sorta di Puntatore a Funzione surrogato.
Di seguito un esempio pratico in cui si crea la Classe "secondaria" che emula il Puntatore a Funzione e che chiameremo "Class1.class":
Create Static Public Sub _call(Variabile As String) Print Variabile End
Nella Classe o Modulo "principale" avremo:
Public Sub Main()
PassaUnPuntatoreAFunzione(Class1)
End
Public Sub PassaUnPuntatoreAFunzione(Funz As Object)
Funz("testo qualsiasi")
End
Uso di nomi noti delle Funzioni a cui fare riferimento
2) Definire una Classe (usando le parole-chiave: Create Static ) che rappresenti l'intero set di Funzioni. Quella Classe deve implementare funzioni di nomi noti a cui fare riferimento in seguito nlla Classe o nel Modulo principale.
Esempio pratico in cui si crea la Classe "secondaria", contenente tre Funzioni, e che chiameremo "Class1.class":
Create Static Public Sub Funzione1(Messaggio As String) Print Messaggio End Public Sub Funzione2(Messaggio As String) Print Messaggio End Public Sub Funzione3(Messaggio As String) Print Messaggio End
Nella Classe o Modulo "principale" invece avremo:
Public Sub Main() PassaUnSetDiFunzioni(Class1, ["Funzione1", "Funzione2", "Funzione3"]) End Public Sub PassaUnSetDiFunzioni(Set As Object, Funzioni As String[]) Dim funz As String Dim indice As Integer For Each funz In Funzioni Object.Call(Set, funz, [funz & " #" & indice]) Inc indice Next End
Va fatto notare che il 3° parametro formale del Metodo "Object.Call()" richiede comunque che il tipo di dato o l'Oggetto passato sia ridotto a un array, e ciò anche se esso è già un array. In tal senso dunque, se si passa al 3° argomento un array, bisognerà inserire la variabile di tale Oggetto array nelle parentesi quadre per renderlo così un array di array.
Note
[1] Vedere anche queste pagine analoghe:
