Differenze tra le versioni di "Avviare con l'appoggio di una libreria esterna un semplice sorgente C senza compilarlo"
Da Gambas-it.org - Wikipedia.
| Riga 6: | Riga 6: | ||
'''Public''' Sub Main() | '''Public''' Sub Main() | ||
| − | + | ||
| + | <FONT color=gray>' ''Va a generare il semplice codice sorgente scritto in C:''</font> | ||
| + | CreaSorgenteC() | ||
| + | |||
<FONT color=gray>' ''Va a generare la libreria esterna condivisa "libadhoc.so":''</font> | <FONT color=gray>' ''Va a generare la libreria esterna condivisa "libadhoc.so":''</font> | ||
Creaso() | Creaso() | ||
| Riga 12: | Riga 15: | ||
<FONT color=gray>' ''Mettiamo in moto l'intera procedura per lanciare il codice sorgente C non compilato:''</font> | <FONT color=gray>' ''Mettiamo in moto l'intera procedura per lanciare il codice sorgente C non compilato:''</font> | ||
LanciaCodice("Testo qualsiasi") | LanciaCodice("Testo qualsiasi") | ||
| + | |||
| + | '''End''' | ||
| + | |||
| + | '''Private''' Procedure CreaSorgenteC() | ||
| + | |||
| + | File.Save("/tmp/sorgente_C.c", "#include <stdio.h>\n" & | ||
| + | "int main() {\n" & | ||
| + | " printf(\"Questa è una prova !\");\n}") | ||
'''End''' | '''End''' | ||
| Riga 18: | Riga 29: | ||
<FONT color=gray>' ''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:''</font> | <FONT color=gray>' ''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:''</font> | ||
| − | File.Save("/tmp/libadhoc.c", "#include \" | + | File.Save("/tmp/libadhoc.c", "#include \"/tmp/sorgente_C.c\"\n\n" & |
"void LanciaCodice(char *s) {\n" & | "void LanciaCodice(char *s) {\n" & | ||
" main(0, &s);\n}") | " main(0, &s);\n}") | ||
Versione delle 21:04, 28 dic 2021
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" &
"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
