13 lines
298 B
Text
13 lines
298 B
Text
$ include "seed7_05.s7i";
|
|
include "cc_conf.s7i";
|
|
|
|
const proc: main is func
|
|
begin
|
|
writeln("Word size: " <& ccConf.POINTER_SIZE);
|
|
write("Endianness: ");
|
|
if ccConf.LITTLE_ENDIAN_INTTYPE then
|
|
writeln("Little endian");
|
|
else
|
|
writeln("Big endian");
|
|
end if;
|
|
end func;
|