Futhark 21 compat

Snektron · Nov 8, 2021 · 6b52f43 · 6b52f43
1 parent 71382ab
commit 6b52f43
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/compiler/passes/fns_and_assigns.fut b/src/compiler/passes/fns_and_assigns.fut
@@ -255,7 +255,7 @@ let insert_derefs [n] (node_types: [n]production.t) (parents: [n]i32) (prev_sibl
                 || node_types[parent] == production_param)
             is_first_child
             parents
-        |> map (!)
+        |> map (\x -> !x)
         |> map2 (&&) result_is_lvalue
     -- Count the number of dereference nodes to insert
     let m =

diff --git a/src/compiler/passes/tokenize.fut b/src/compiler/passes/tokenize.fut
@@ -86,7 +86,7 @@ local let link_names [n] (input: []u8) (tokens: [n]tokenref): [n]u32 =
         |> map (\i -> if i == 0 then false else str_eq order[i] order[i - 1])
         -- Invert this mapping, so that we get a mask whether this string is the first of a
         -- sequence of equal strings.
-        |> map (!)
+        |> map (\x -> !x)
         -- Perform an (exclusive) scan to get the IDs.
         |> map u32.bool
         |> scan (+) 0