17 lines
191 B
Plaintext
17 lines
191 B
Plaintext
|
/*
|
||
|
* File: main.pls
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* Procedure: Motd
|
||
|
* Program entry point
|
||
|
*/
|
||
|
Motd: PROC OPTIONS(MAIN);
|
||
|
DCL in FILE;
|
||
|
OPEN FILE(in) TITLE('/etc/motd') INPUT;
|
||
|
DO ;
|
||
|
|
||
|
END;
|
||
|
CLOSE FILE(in);
|
||
|
END;
|