DELETE as a function


        er = FDEL(<file name>)

Where file name is a string containing a file name or an S*BASIC name (ie
a quoted or unquoted file name).

Note: In SMSQ/E (at least) no Not Found error is returned in the event
of the file being non-existent, as the trap does not return any error in
such cases either.

A slightly more advanced version of this function is already included with
SMSQ/E (as of V3.34).

Contains PD code (stos) from Tony Tebby.

V0.01, pjw, April 29th 2019

pjwitte at googlemail dot c0m