Differenze tra le versioni di "Floor ()"

Da Gambas-it.org - Wikipedia.
Riga 7: Riga 7:
  
 
Dunque avremo ad esempio:  
 
Dunque avremo ad esempio:  
  Private <FONT color=#B22222>Extern floor_C</font>(xF As Float) As Float In "<FONT color=#B22222>libm</font>" <FONT color=#B22222>'''Exec "floor"'''</font>
+
  Private <FONT color=#B22222>Extern floor_C</font>(xF As Float) As Float In "<FONT color=#B22222>libm:6</font>" <FONT color=#B22222>'''Exec "floor"'''</font>
  
  
  
 
Semplice esempio di uso in Gambas:
 
Semplice esempio di uso in Gambas:
  <FONT color=Gray>' ''double floor(double x)''</font>
+
  <FONT color=Gray>' ''double floor(double x)''
  Private <FONT color=#B22222>Extern floor_C</font>(xF As Float) As Float In "<FONT color=#B22222>libm</font>" <FONT color=#B22222>'''Exec "floor"'''</font>
+
' ''Largest integer not greater than X.''</font>
 +
  Private <FONT color=#B22222>Extern floor_C</font>(xF As Float) As Float In "<FONT color=#B22222>libm:6</font>" <FONT color=#B22222>'''Exec "floor"'''</font>
 
   
 
   
 
   
 
   

Versione delle 16:11, 28 nov 2016

La funzione della libreria di Math

double floor(double x)

ritorna x arrotondato all'intero più grande uguale o non maggiore di x.


Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con Extern, nonché dichiarare la libreria Math: libm.so, nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C "floor" è omonima alla funzione di Gambas "Floor", bisognerà assegnarle un nome a piacere, ma si dovrà anche richiamare il suo vero nome con il comando Exec.

Dunque avremo ad esempio:

Private Extern floor_C(xF As Float) As Float In "libm:6" Exec "floor"


Semplice esempio di uso in Gambas:

' double floor(double x)
' Largest integer not greater than X.
Private Extern floor_C(xF As Float) As Float In "libm:6" Exec "floor"


Public Sub Main()

 Dim fl As Float

  fl = floor_C(3.456)

  Print fl
 
End