Truncate a file: Difference between revisions

<lang elena>#import system'io.

#class(extension:(file_path) fileOp

#method set &length:length

#var(type:stream) stream := FileStream openForEdit &path:self.

#symbol program =

if ('program'arguments length != 3)?

[ console << "Please provide the path to the file and a new length". #throw AbortException new raise. ].

#var fileName := 'program'arguments@1.

#var length := ('program'arguments@2) toInt.

ifnot (fileName file_path is &available)

! [ console writeLine:"File ":fileName:" does not exist". #throw AbortException new raise. ].