18 lines
317 B
Plaintext
18 lines
317 B
Plaintext
' FB 1.05.0 Win64
|
|
|
|
#If __FB_VERSION__ < "1.06.0"
|
|
#Error "Compiler version is too old - needs to be 1.06.0 or later"
|
|
#EndIf
|
|
|
|
Dim bloop As Integer = -15
|
|
#IfDef bloop
|
|
#IfDef Abs
|
|
Print "Abs(bloop) = "; Abs(bloop)
|
|
#Else
|
|
Print "Abs is not available"
|
|
#EndIf
|
|
#Else
|
|
Print "bloop does not exist"
|
|
#EndIf
|
|
Sleep
|