RosettaCodeData/Task/Read-entire-file/OxygenBasic/read-entire-file.basic

8 lines
74 B
Plaintext

string s
'AS FUNCTION
s=GetFile "t.txt"
'AS PROCEDURE
Getfile "t.txt",s