/*
	Revises a `C' source code
	The default Port of KCommodity is assumed to be KComm.1.
	This script was written for use from within the Shell.

	Written by : Kai Iske
			 Brucknerstrasse 18
			 6450 Hanau 1
			 GERMANY
			 Tel.: +49-(0)6181-850181

	THIS SCRIPT IS PUBLIC DOMAIN
*/

OPTIONS RESULTS
ADDRESS 'KComm.1' REVISE Arg(1) C
RevDone = RESULT
IF RevDone = 1 THEN
	say 'No errors occured... Sourced revised.'
ELSE
	say 'Error occured during revision...'

EXIT