platform_dos

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