Skip to content

GitLab

Commit 366b6809 authored by Steffen Michels's avatar Steffen Michels
Browse files
Options

adapt to changed Data.Set module

parent 560b1ec4
Pipeline #16540 failed with stages
      in 1 minute and 6 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 2 additions and 6 deletions
      src/Sapl/Transform/Let.icl
      View file @ 366b6809
      ......@@ -4,7 +4,7 @@ import StdList, StdFunc, StdTuple, StdBool
      import Sapl.SaplStruct
      from Data.Set import qualified newSet, fromList, toList, member, difference, insert, filter, delete, null
      from Data.Set import :: Set
      from Data.Set import :: Set, instance Foldable Set
      from Data.Map import qualified fromList, get
      instance == SaplVar
      ......@@ -52,5 +52,3 @@ where
      | 'Data.Set'.null ('Data.Set'.filter (\e = snd e == m) edges)
      = (edges, [m:out])
      = (edges, out)
      \ No newline at end of file
      src/Sapl/Transform/TailRecursion.icl
      View file @ 366b6809
      ......@@ -4,7 +4,7 @@ import StdList, StdFunc, StdTuple, StdBool
      import Sapl.SaplStruct
      from Data.Set import qualified newSet, fromList, toList, member, difference, insert, filter, delete, null
      from Data.Set import :: Set
      from Data.Set import :: Set, instance Foldable Set
      from Data.Map import qualified fromList, get
      instance == SaplVar
      ......@@ -52,5 +52,3 @@ where
      | 'Data.Set'.null ('Data.Set'.filter (\e = snd e == m) edges)
      = (edges, [m:out])
      = (edges, out)
      \ No newline at end of file
      Markdown is supported
      0% or .
      You are about to add 0 people to the discussion. Proceed with caution.
      Finish editing this message first!
      Please register or to comment