📌  相关文章
📜  Rexx-可移植性

📅  最后修改于: 2020-11-02 04:05:44             🧑  作者: Mango

在任何编程语言中，可移植性都是重要的方面。众所周知，Rexx可用于多种操作系统，例如Windows和Linux。因此，需要确保在Windows平台上开发程序时，如果在Linux平台上运行相同的程序，则必须采取必要的预防措施。

Rexx可以运行系统级命令。有一些命令可用于了解其运行所在的操作系统。然后，基于输出，它可以采取适当的操作来查看可以在此操作系统上运行的命令。

例

下面的示例显示如何使用解析函数来获取运行程序的操作系统的详细信息。

/* Main program */ 
parse version language level date month year. 
parse source system invocation filename. 
language = translate(language) 

if pos('REGINA',language) = 0 then 
   say 'Error , the default interpreter is not Regina' language 
   say 'The Interpreter version/release date is:' date month year 
   say 'The Language level is: ' level say 'The Operating System is'  

   select 
when system = 'WIN32' then 
   'ver'
when system = 'UNIX' | system = 'LINUX' then 
   'uname -a' 
   otherwise 
   say 'Unknown System:' system 
end 
if rc <> 0 then 
   say 'Error :' rc

输出将取决于操作系统。下面给出了示例输出。

The Interpreter version/release date: 5 Apr 2015 
The Language level is:  5.00 
The Operating System is 
Unknown System: WIN64 
Bad return code: RC