From 3d2fa265c3cd320d8fa497582e0eebba30d2d1b5 Mon Sep 17 00:00:00 2001 From: "Brian T. Rice" Date: Fri, 19 Mar 2010 23:29:21 -0700 Subject: [PATCH] Fixed an ill-considered implementation of Platform family checking. --- src/lib/platform.slate | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/lib/platform.slate b/src/lib/platform.slate index 38efa6a..2693a13 100644 --- a/src/lib/platform.slate +++ b/src/lib/platform.slate @@ -30,11 +30,11 @@ Platform traits define: #WindowsNames -> #(Win32 Win64). p@(Platform traits) isPosix "Whether the underlying platform implements (enough of?) the POSIX API." -[p PosixNames includes: p name]. +[p PosixNames anySatisfy: [| :name | (name as: p name) = p name]]. p@(Platform traits) isWindows "Whether the underlying platform implements (enough of?) the POSIX API." -[p WindowsNames includes: p name]. +[p WindowsNames anySatisfy: [| :name | (name as: p name) = p name]]. p@(Platform traits) lineEnding [ -- 2.11.4.GIT