RosettaCodeData/Task/Host-introspection/FreeBASIC/host-introspection.basic

18 lines
329 B
Plaintext

' FB 1.05.0 Win64 (so little endian, 8 byte word size, expected)
' uses intrinsic defines, set by the compiler
#Ifdef __FB_64BIT__
Print "Host has an 8 byte word size"
#Else
Print "Host has a 4 byte word size"
#EndIf
#Ifdef __FB_BIGENDIAN__
Print "Host is big endian"
#Else
Print "Host is little endian"
#EndIf
Sleep