Usleep (): differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
Nessun oggetto della modifica
Nessun oggetto della modifica
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 13: Riga 13:
  Private Extern <FONT color=#B22222>usleep</font>(usec As Integer) As Integer In "<FONT color=#B22222>libc:6</font>"
  Private Extern <FONT color=#B22222>usleep</font>(usec As Integer) As Integer In "<FONT color=#B22222>libc:6</font>"
   
   
  '''Public''' Sub Main()
  Public Sub Main()
   
   
   Dim i As Integer
   Dim i As Integer
   
   
   While True
   Do
  <FONT color=Gray>' ''Sospende l'esecuzione per 500 milionesimi di secondo:''</font>
  <FONT color=Gray>' ''Sospende l'esecuzione per 500 milionesimi di secondo:''</font>
     <FONT color=#B22222>usleep</font>(500)
     <FONT color=#B22222>usleep</font>(500)
     Inc i
     Inc i
     Print i
     Print i
   Wend
   Loop
   
   
  '''End'''
  End

Versione attuale delle 11:56, 13 giu 2024

La funzione della libreria di C

int usleep (__useconds_t __useconds)

sospende l'esecuzione del programma per intervalli di microsecondi (milionesimi di secondo).

Volendola utilizzare in Gambas, bisognerà dichiararla con Extern, nonché dichiarare la libreria di C: libc.so.6, nella quale la funzione è contenuta:

Private Extern usleep(usec As Integer) As Integer In "libc:6"


Semplice esempio di uso in Gambas:

' int usleep (__useconds_t __useconds)
' Sleep USECONDS microseconds.
Private Extern usleep(usec As Integer) As Integer In "libc:6"

Public Sub Main()

 Dim i As Integer

 Do
' Sospende l'esecuzione per 500 milionesimi di secondo:
   usleep(500)
   Inc i
   Print i
 Loop

End