Anonymous user
Execute a system command: Difference between revisions
m
→{{header|Ada}}: formatting
m (→{{header|PHP}}: formatting) |
m (→{{header|Ada}}: formatting) |
||
Line 4:
=={{header|Ada}}==
<lang ada>with Interfaces.C; use Interfaces.C;
▲ procedure Execute_System is
function Sys (Arg : Char_Array) return Integer;
pragma Import(C, Sys, "system");
Ret_Val : Integer;
Ret_Val := Sys(To_C("ls"));
=={{header|ALGOL 68}}==
| |||