Персональная редакция (Personal Edition)

• Возможности и ограничения персональной редакции
• Автоматическая загрузка файла инициализации LWW

Возможности и ограничения персональной редакции

Персональная редакция — это пробная версия LispWorks. Она доступна для скачивания с сайта компании, является вполне функциональной. Её можно рекомендовать не только для учебных целей. Она вполне сгодится для разработки прототипов промышленных систем. (Автор использовал её в течение двух первых лет для собственных библиотек и программ весьма внушительных размеров.)

Искусственные ограничения

• Ограниченный на размер кучи, т.е. пространства, где храняться все объекты Лисп, подверженного сборке мусора. При приближению к порогу выдаётся предупреждение, но, фактически, это приводит к завершению работы лисп-системы.
• Длительность одной рабочей сессии не превышает 5 часов, после чего система автоматически завершает работу. Через 4 часа выдаётся предупреждающее сообщение.
• Отсутствуют возможность генерации exe- и dll-файлов, а также функции сохранения образа и загрузки заплат.
• Файлы инициализации не поддерживаются:
  • в диалоге Global Preferences отсутствует поле Ititialization File,
  • указанные в командной строке параметры -siteinit file и -init file игнорируются.
  См. способ преодоления этого ограничения ниже.

Автоматическая загрузка файла инициализации LWW

Можно обойти ограничение и обеспечить автоматическую загрузку .lispworks или другого файла инициализации сразу после запуска системы. Это делается хаком посредством Windows Scripting Host.

1. Создайте файл с расширением vbs, например, lwp50.vbs.
2. Скопируйте в него следующий код, подправив пути.
3. Запускайте данный файл на выполнение вместо исходного ярлыка LisWorks Personal→LispWorks.

rem Based on the idea of Bill Clementson http://bc.tech.coop/blog/040315.html
Dim wsh
Set wsh = Wscript.CreateObject("Wscript.Shell")

rem Start LispWorks
wsh.Run("D:\Lispworks\lispworks-personal-5-0-1-x86-win32.exe")

rem Wait for a few seconds for it to start
WScript.Sleep(5000)

rem Press the OK button on the splash screen
wsh.AppActivate "Upgrade LispWorks"
wsh.SendKeys "{ENTER}"

rem Toggle to the Podium
wsh.AppActivate "LispWorks Personal Edition 5.0.1"
WScript.Sleep(100)

rem Toggle to the Listener
wsh.SendKeys "%{TAB}"
WScript.Sleep(100)

rem Load the initialization file
str = "load " & """D:/Lispworks/.lispworks"""
wsh.SendKeys (str)
wsh.SendKeys "{ENTER}"