12 lines
201 B
Text
12 lines
201 B
Text
|
integer fn
|
||
|
|
|
||
|
|
-- In the current working directory
|
||
|
|
system("mkdir docs",2)
|
||
|
|
fn = open("output.txt","w")
|
||
|
|
close(fn)
|
||
|
|
|
||
|
|
-- In the filesystem root
|
||
|
|
system("mkdir \\docs",2)
|
||
|
|
fn = open("\\output.txt","w")
|
||
|
|
close(fn)
|