STB3 1.15 KB
Newer Older
Steve Revill's avatar
Steve Revill committed
1
; Copyright 2002 Pace Micro Technology plc
Neil Turton's avatar
Neil Turton committed
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
;
; 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.
;
; -*-As-*-
;
Steve Revill's avatar
Steve Revill committed
17
; > riscos.s.STB3
Neil Turton's avatar
Neil Turton committed
18 19 20 21 22 23 24 25 26 27 28 29
;
; Copyright (c) 1994 Acorn Computers Ltd., Cambridge, England.
;
; Assembler source for FPA support code and emulator
; ==================================================
; Header file for the riscos veneer.
;

;
; Controls for veneer sources
;
	GBLS	Flavour
Steve Revill's avatar
Steve Revill committed
30
Flavour	SETS	"HardOnly"
Neil Turton's avatar
Neil Turton committed
31 32

	GBLL	Arm600
Steve Revill's avatar
Steve Revill committed
33 34 35 36 37 38 39
Arm600	SETL	{TRUE}

    [ {CONFIG} = 32
        GBLL            EnableInterrupts
EnableInterrupts        SETL    {FALSE}
        ! 0, "Warning: Interrupts being disabled to allow 32bit operation on older OS"
    ]
Neil Turton's avatar
Neil Turton committed
40 41

        LNK     $CoreDir.main$FileExt