Учебники

Rexx — Переносимость

Переносимость является важным аспектом в любом языке программирования. Как известно, 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 

Выход будет варьироваться в зависимости от операционной системы. Пример вывода приведен ниже.