diff --git a/core/cpu/ppc/architecture/architecture.factor b/core/cpu/ppc/architecture/architecture.factor index bb0e6cda62..43a2428d42 100755 --- a/core/cpu/ppc/architecture/architecture.factor +++ b/core/cpu/ppc/architecture/architecture.factor @@ -295,7 +295,7 @@ M: ppc-backend %cleanup ( alien-node -- ) drop ; M: ppc-backend value-structs? #! On Linux/PPC, value structs are passed in the same way #! as reference structs, we just have to make a copy first. - os "linux" = not ; + linux? not ; M: ppc-backend fp-shadows-int? ( -- ? ) macosx? ; diff --git a/core/cpu/ppc/ppc.factor b/core/cpu/ppc/ppc.factor old mode 100644 new mode 100755 index 72c4ab335c..0c677cbe51 --- a/core/cpu/ppc/ppc.factor +++ b/core/cpu/ppc/ppc.factor @@ -6,7 +6,7 @@ namespaces alien.c-types kernel system combinators ; 4 "longlong" c-type set-c-type-align 4 "ulonglong" c-type set-c-type-align ] } - { [ os "linux" = ] [ + { [ linux? ] [ t "longlong" c-type set-c-type-stack-align? t "ulonglong" c-type set-c-type-stack-align? ] }