Description
platform_dos can be compared with the value returned by the built-in function platform to determine whether the current platform is DOS (i.e. the interpreter running your program is from the DOS edition of Irie Pascal).
Example
The following simple program displays the current platform.
program ShowPlatform(output);
begin
case platform of
platform_dos: writeln('DOS');
platform_os2: writeln('OS/2');
platform_win32: writeln('Windows');
platform_linux: writeln('Linux');
platform_fbsd: writeln('FreeBSD');
platform_solaris: writeln('Solaris/x86');
platform_solaris_sparc: writeln('Solaris/Sparc');
platform_error: writeln('Unknown Platform');
end
end.Portability
Operating Systems: All
Standard Pascal: No