3 lines
67 B
Text
3 lines
67 B
Text
procedure main(A)
|
|
write(open(\A[1]|"afile","w"),"a string")
|
|
end
|
procedure main(A)
|
|
write(open(\A[1]|"afile","w"),"a string")
|
|
end
|