Чтобы загрузить свеженаписанный код на Lisp в компьютер PDP-1, сначала нужно прочитать с перфоленты функцию для сохранения кода на ту же ленту — встроенной такой возможности в Basic Lisp нет. Это стандартный способ загрузки любого кода в этой среде.
Берём алфавитно-цифровую ленту lisp-defs.pt, устанавливаем переключатель SS5 в нижнее положение — лента сразу читается. На печатающем устройстве появляются имена загруженных функций: zerop, pdef, count. После этого возвращаем SS5 в верхнее положение (режим ввода с клавиатуры), нажимаем START, затем CONTINUE — и проверяем, что адресные переключатели стоят на 4. Так загружается любой Lisp-код.
Чтобы создать свою тестовую ленту, готовим файл test.lisp на ноутбуке. В него помещаем такой код:
(rplacd (quote tt) (quote
(expr (lambda ()
(prog ()
(print (quote hello))
(terpri)
(return 5))))))
После закрывающей скобки обязателен пробел — он завершает функцию. Затем конвертируем текстовый файл в образ перфоленты командой encode_fiodec test.lisp test.pt. Монтируем полученную ленту test.pt, снова опускаем SS5 — лента читается. На выводе видим:
tt
hello
5
Возвращаем SS5 в верхнее положение, снова нажимаем START и CONTINUE (адресные переключатели на 4). Чтобы убедиться, что программа загружена, печатаем (print (cdr (quote tt))).