/unmaintained/ppc/linux/linux.factor

http://github.com/abeaumont/factor · Factor · 28 lines · 18 code · 8 blank · 2 comment · 0 complexity · cb37c66b777b1e395814e51cde3b7bbf MD5 · raw file 

    

  1. ! Copyright (C) 2008 Slava Pestov.
    2. 

  2. ! See http://factorcode.org/license.txt for BSD license.
    3. 

  3. USING: accessors system kernel layouts
    4. 

  4. alien.c-types cpu.architecture cpu.ppc ;
    5. 

  5. IN: cpu.ppc.linux
    6. 

  6. 

  7. <<
    8. 

  8. t "longlong" c-type stack-align?<<
    9. 

  9. t "ulonglong" c-type stack-align?<<
    10. 

  10. >>
    11. 

  11. 

  12. M: linux reserved-area-size 2 cells ;
    13. 

  13. 

  14. M: linux lr-save 1 cells ;
    15. 

  15. 

  16. M: ppc param-regs
    17. 

  17.     drop {
    18. 

  18.         { int-regs { 3 4 5 6 7 8 9 10 } }
    19. 

  19.         { float-regs { 1 2 3 4 5 6 7 8 } }
    20. 

  20.     } ;
    21. 

  21. 

  22. M: ppc value-struct? drop f ;
    23. 

  23. 

  24. M: ppc dummy-stack-params? f ;
    25. 

  25. 

  26. M: ppc dummy-int-params? f ;
    27. 

  27. 

  28. M: ppc dummy-fp-params? f ;
    29.