{Portable Prolog Site Dependent Setup}

{Comment Flags:  VAX APM EMAS}

%constant %integer N Stacks = 6

!     The sizes (STKLEN) are in Byte amounts.

{All Sizes in 1K units}

!VAX!%external %integer %array Stk Len (1:N Stacks) = 64, {Atom}
!VAX!                                                 32, {Aux Stack}
!VAX!                                                 128, {Trail}
!VAX!                                                 128, {Heap} 
!VAX!                                                 128, {Global Stack}
!VAX!                                                 64  {Local Stack}

{APM}%external %integer %array Stk Len (1:N Stacks) = 30, { Was 32, {Atom}
{APM}                                                 14, { Was 16, {Aux Stack}
{APM}                                                 38, { Was 40, {Trail}
{APM}                                                 58, { Was 60, {Skel Heap} 
{APM}                                                 70, { Was 75, {Global Stack}
{APM}                                                 38  { Was 40  {Local Stack}

!EMAS!%external %integer %array Stk Len (1:N Stacks) = 64, {Atom}
!EMAS!                                                 64, {Aux Stack}
!EMAS!                                                 128, {Trail}
!EMAS!                                                 128, {Heap} 
!EMAS!                                                 128, {Global Stack}
!EMAS!                                                 64  {Local Stack}

%external %string (10) %array Stack Id (1:N Stacks) = %c
   "ATOM", "AUX", "TRAIL", "SKEL", "GLOBAL", "LOCAL"

!     These files (STKNAME) will be (re)created at the
!     start of every Prolog run and then they will be
!     store mapped into the address space to be used
!     as the work spaces for the interpreter.

!EMAS!%external %string (7) %array Stk Name (1:N Stacks) =  %C
!EMAS!   "T#ATOM", "T#AUX", "T#TR", "T#HEAP", "T#GLB", "T#LCL"


! Version number of system

!     There are two different version numbers. VERSION
!     is incremented every time the system is changed
!     in some way so we can tell where we are. 
!     SAVE VERSION is only incremented when some change
!     means that old save states will not be able to be
!     restored in the new system.

!VAX! %EXTERNAL %INTEGER  Version      = 1
!VAX! %EXTERNAL %INTEGER  Save Version = 1

{APM} %EXTERNAL %INTEGER  Version      = 1
{APM} %EXTERNAL %INTEGER  Save Version = 1

!EMAS!%external %integer Version = 6
!EMAS!%external %integer Save Version = 6

{Default command options}

%external %integer Options = 0

!  Important files used to
!     - boot from during booting sessions
!     - restore at start of normal sessions

!  NB At new sites you will certainly have to change
!  these. The BOOTFILE won't matter if you are not
!  going to be booting from scratch.

!VAX!%external %string (127)  Boot File        = "Prolog_Library:Init.Pro"
!VAX!%external %string (127)  Standard Startup = "Prolog_Dir:Prolog.PSS"

{APM}%external %string (127)  Boot File        = "IPlog:Init.Pro"
{APM}%external %string (127)  Standard Startup = "IPlog:Prolog"

!EMAS!%external %string (127) Boot File = "ECSC56.INIT"
!EMAS!%external %string (127) Standard Startup = "ECSC56.PL#SYS"

{APM} %external %routine Hamish Cant Compile Data Modules
{APM}    Print String ("Waaaaah!"); New Line
{APM}    %stop
{APM} %end

%end %of %file