Gestire un Puntatore con le funzioni esterne del API di Glib
Da Gambas-it.org - Wikipedia.
Con alcune risorse della libreria di Glib-2.0 è possibile gestire le variabili di tipo Puntatore.
Creare e Dereferenziare un Puntatore
E' possibile creare e dereferenziare una variabile di tipo Puntatore che punta ad una variabile di tipo Intero (Integer), nonché modificare il valore contenuto da una varibile di tipo Intero puntata da un Puntatore.
E' necessario avere installata e richiamare nel programma Gambas la libreria condivisa: "libglib-2.0.so.0.8200.4 ".
Mostriamo un esempio pratico, nel quale viene modificato il valore contenuto dalla variabile di tipo Intero puntata da un "Puntatore":
Library "libglib-2.0:0.8200.4"
' void g_atomic_int_set (volatile gint *atomic, gint newval)
' Sets the value of atomic to newval.
Private Extern g_atomic_int_set(atomic As Pointer, newval As Integer)
' gint g_atomic_int_get (const volatile gint *atomic)
' Gets the current value of atomic.
Private Extern g_atomic_int_get(atomic As Pointer) As Integer
Public Sub Main()
Dim p As Pointer
Dim i As Integer
p = Alloc(SizeOf(gb.Pointer), 1)
' Modifica il valore contenuto dalla variabile di tipo Intero puntata dal "Puntatore":
g_atomic_int_set(p, 99999)
' Dereferenzia il "Puntatore" con la funzione di Glib:
i = g_atomic_int_get(p)
Print i
' Per verifica, dereferenzia il "Puntatore" con la funzione propria di Gambas:
Print Int@(p)
' Dealloca il "Puntatore" e si assicura che esso non punti a un'area rilevante di memoria:
Free(p)
p = 0
End
Impostare a NULL il contenuto dell'area di memoria puntata da un Puntatore
E' possibile impostare a NULL il contenuto dell'area di memoria puntata da una variabile di tipo Puntatore con la funzione esterna "g_nullify_pointer()".
Mostriamo un esempio:
Library "libglib-2.0:0.8200.4"
' void g_nullify_pointer (gpointer *nullify_location)
' Set the pointer at the specified location to NULL.
Private Extern g_nullify_pointer(nullify_location As Pointer)
Public Sub Main()
Dim p As Pointer
p = Alloc("Questa è una prova.")
' Verifica "prima" dell'uso della funzione "g_nullify_pointer()":
Print String@(p), p
g_nullify_pointer(p)
' Verifica "dopo" l'uso della funzione "g_nullify_pointer()":
Print String@(p), p
' Dealloca l'area di memoria precedentemente allocata e garantisce che il Puntatore non punti a un indirizzo rilevante di memoria:
Free(p)
p = 0
End
