PageRenderTime 24ms CodeModel.GetById 16ms app.highlight 5ms RepoModel.GetById 1ms app.codeStats 0ms

/unmaintained/ppc/macosx/macosx.factor

http://github.com/abeaumont/factor
text | 23 lines | 16 code | 7 blank | 0 comment | 0 complexity | a17a49ab63f37ffb646def474e22f1a8 MD5 | raw file
 1! Copyright (C) 2008 Slava Pestov.
 2! See http://factorcode.org/license.txt for BSD license.
 3USING: accessors system kernel layouts
 4alien.c-types cpu.architecture cpu.ppc ;
 5IN: cpu.ppc.macosx
 6
 7M: macosx reserved-area-size 6 cells ;
 8
 9M: macosx lr-save 2 cells ;
10
11M: ppc param-regs
12    drop {
13        { int-regs { 3 4 5 6 7 8 9 10 } }
14        { float-regs { 1 2 3 4 5 6 7 8 9 10 11 12 13 } }
15    } ;
16
17M: ppc value-struct? drop t ;
18
19M: ppc dummy-stack-params? t ;
20
21M: ppc dummy-int-params? t ;
22
23M: ppc dummy-fp-params? f ;