Host introspection: Difference between revisions
Added FreeBASIC
(Added FreeBASIC) |
|||
Line 253:
WRITE(*,*) "Little Endian"
END IF</lang>
=={{header|FreeBASIC}}==
<lang freebasic>' 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</lang>
{{out}}
<pre>
Host has an 8 byte word size
Host is little endian
</pre>
=={{header|Frink}}==
|