; Copyright 2008 Castle Technology Ltd
;
; Licensed under the Apache License, Version 2.0 (the "License");
; you may not use this file except in compliance with the License.
; You may obtain a copy of the License at
;
;     http://www.apache.org/licenses/LICENSE-2.0
;
; Unless required by applicable law or agreed to in writing, software
; distributed under the License is distributed on an "AS IS" BASIS,
; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
; See the License for the specific language governing permissions and
; limitations under the License.
;
        SUBT    Definition of the user interface

OldOpt  SETA    {OPT}
        OPT     OptNoList+OptNoP1List

 [ :LNOT: :DEF: Included_Hdr_UserIF_UserIF
        GBLL    Included_Hdr_UserIF_UserIF
Included_Hdr_UserIF_UserIF SETL {TRUE}

; ***********************************
; ***    C h a n g e   L i s t    ***
; ***********************************
;
; Date       Name          Description
; ----       ----          -----------
; 23-Feb-01  SBF           New header file specifically for user interface options

; Define boolean variables for each user interface.  NEVER use these outside
; this header file.

                GBLL    UI_Iyonix
                GBLL    UI_Lazarus
                GBLL    UI_Morris4
                GBLL    UI_NC2
                GBLL    UI_Raspberry
                GBLL    UI_Sovereign
                GBLL    UI_STB22
                GBLL    UI_STB3
                GBLL    UI_STB400
                GBLL    UI_Ursula
UI_Iyonix       SETL    UserIF="Iyonix"
UI_Lazarus      SETL    UserIF="Lazarus"
UI_Morris4      SETL    UserIF="Morris4"
UI_NC2          SETL    UserIF="NC2"
UI_Raspberry    SETL    UserIF="Raspberry"
UI_Sovereign    SETL    UserIF="Sovereign"
UI_STB22        SETL    UserIF="STB22"
UI_STB3         SETL    UserIF="STB3"
UI_STB400       SETL    UserIF="STB400"
UI_Ursula       SETL    UserIF="Ursula"

; ------------------------------------------------------------------------------

                GBLL    Embedded_UI
Embedded_UI     SETL    UI_STB22 :LOR: UI_STB3 :LOR: UI_STB400 :LOR: UI_NC2 :LOR: UI_Lazarus

                GBLS    UserIF_Type
        [ Embedded_UI
UserIF_Type     SETS    "Embedded"
        |
UserIF_Type     SETS    "Desktop"
        ]

        ! 0, "Assembling with user interface type = $UserIF_Type"

 ] ; :LNOT: :DEF: Included_Hdr_UserIF_UserIF

        OPT     OldOpt
        END
