Scrivere una libreria esterna per verificare se una variabile di tipo stringa è nulla

Da Gambas-it.org - Wikipedia.
Versione del 30 nov 2014 alle 12:12 di Vuott (Discussione | contributi) (Creata pagina con 'Se si vuole far verificare da una funzione di una libreria esterna, da noi scritta in C, se una variabile di tipo stringa è ''nulla'', potremo operare come segue: La librer...')

(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)

Se si vuole far verificare da una funzione di una libreria esterna, da noi scritta in C, se una variabile di tipo stringa è nulla, potremo operare come segue:


La libreria esterna in C da noi appositamente scritta può essere:

#include <stdio.h>


int Verifica(char * s) {

  if (s == NULL) {
    return -1;
  }else{
    return 0;
  }

}


La parte principale in Gambas può essere:

Private Extern Verifica(testo As String) As Integer In "/tmp/lib_C"


Public Sub Main()

 Dim s As String
 Dim i As Integer
 
  Shell "gcc -o /tmp/lib_C.so " & Application.Path &/ "lib_C.c -shared -fPIC" Wait
 
  i = Verifica(s)
  If i = -1 then Print "La variabile 's' è nulla !"

End