Differenze tra le versioni di "Ceil ()"

Da Gambas-it.org - Wikipedia.
 
Riga 3: Riga 3:
 
ritorna x arrotondato all'intero più piccolo non minore di x.
 
ritorna x arrotondato all'intero più piccolo non minore di x.
  
 
+
Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con ''Extern'', nonché dichiarare la libreria ''Math'': ''libm.so.6'', nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C "ceil" è omonima alla funzione di Gambas ''Ceil'', bisognerà assegnarle un nome a piacere, ma si dovrà anche richiamare il suo vero nome con il comando Exec.
Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con ''Extern'', nonché dichiarare la libreria ''Math'': ''libm.so.6'', nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C "''ceil''" è omonima alla funzione di Gambas "''Ceil''", bisognerà assegnarle un nome a piacere, ma si dovrà anche richiamare il suo vero nome con il comando Exec.
 
  
 
Dunque avremo ad esempio:  
 
Dunque avremo ad esempio:  
Riga 17: Riga 16:
 
   
 
   
 
   
 
   
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim fl As Float
 
   Dim fl As Float
 
   
 
   
  fl = <FONT color=#B22222>ceil_C</font>(3.456)
+
  fl = <FONT color=#B22222>ceil_C</font>(3.456)
 
   
 
   
  Print fl
+
  Print fl
 
    
 
    
  '''End'''
+
  End

Versione attuale delle 08:13, 13 giu 2024

La funzione della libreria di Math

double ceil(double x)

ritorna x arrotondato all'intero più piccolo non minore di x.

Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con Extern, nonché dichiarare la libreria Math: libm.so.6, nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C "ceil" è omonima alla funzione di Gambas Ceil, 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 ceil_C(xF As Float) As Float In "libm:6" Exec "ceil"


Semplice esempio di uso in Gambas:

' double ceil(double x)
' Smallest integral value not less than X.
Private Extern ceil_C(xF As Float) As Float In "libm:6" Exec "ceil"


Public Sub Main()

 Dim fl As Float

 fl = ceil_C(3.456)

 Print fl
 
End