Avviare con l'appoggio di una libreria esterna un semplice sorgente C senza compilarlo

E' possibile lanciare un codice sorgente semplice, scritto in linguaggio C e non compilato, attraverso l'ausilio di un'apposita libreria esterna, la quale provvede ad invocare la routine "main()" del predetto sorgente.

Mostriamo un esempio pratico, ove il codice dell'applicativo Gambas sarà il seguente:

Private Extern LanciaCodice(st As String) In "/tmp/libadhoc"


Public Sub Main()

' Va a generare il semplice codice sorgente scritto in C:
 CreaSorgenteC()

' Va a generare la libreria esterna condivisa "libadhoc.so":
 Creaso()
 
' Mettiamo in moto l'intera procedura per lanciare il codice sorgente C non compilato:
 LanciaCodice("Testo qualsiasi")

End


Private Procedure CreaSorgenteC()

 File.Save("/tmp/sorgente_C.c", "#include <stdio.h>\n\n" &
                                "int main() {\n" &
                                "   printf(\"Questa è una prova !\");\n}")

End


Private Procedure Creaso()

' La libreria esterna, che chiameremo "libadhoc.c" e che dovrà lanciare il codice sorgente C, avrà il solo compito di chiamare la routine "main()" del codice sorgente in C, e pertanto avrà il seguente tenore:
 File.Save("/tmp/libadhoc.c", "#include \"/tmp/sorgente_C.c\"\n\n" &
                              "void LanciaCodice(char *s) {\n" &
                              "   main(0, &s);\n}")

 Shell "gcc -o /tmp/libadhoc.so /tmp/libadhoc.c -shared -fPIC" Wait

End