Предикат file_str/2

Предикат file_str читает символы из файла и переносит их в перемен-

ную, или создает файл и записывает в этот файл строку. Использует формат:

file_str(Filename, Text) /* (i,o), (i,i) */

Если перед вызовом file_str переменная Text свободна, file_str чита-

ет символы из файла Filename, пока не встретится символ конца файла (

обычно Ctrl-Z ). Содержимое файла Filename пересылается в переменную

Text. Например, вызов:

file_str("t.dat", Myext)

свяжет Myext с содержимым файла T.DAT. При этом строка может содержать

символы возврата каретки. Читаемый файл не может превышать 64 Кбайт в

длину. Если файл имеет объем более 64 Кбайт, file_str возвратит сообщение

об ошибке.

Если Myext связана с текстом из "t.dat", file_str("t.bak", Myext)

создаст файл с именем T.BAK, который содержит текст из "t. dat".