routine RemoveDirectoryA
   module=KERNEL32
   minarg=1
   maxarg=1
   stackpop=called
   returns=short
;

arg 1 input char format=$cstr200.;  * directory to remove;