anchor.diff:          checkCode command "LocalMemory.int [].gen" "LocalMemory.int [].cl"
   ]
   
  -let localMemoryAllocationTests = ptestList "Translation of local memory allocation functions." [
  +let localMemoryAllocationTests = ptestList "Translation of local memory allocation functions" [
       testCase "Constant array translation. Local copy test 1" <| fun _ ->
           let cArray1 = [| 1; 2; 3 |]
   
  
positive.code: 
          checkCode command "Nested.Function.Carring.gen" "Nested.Function.Carring.cl"
  
      testCase "Nested functions. Currying 2." <| fun _ ->
          let command =
              <@ fun (range: Range1D) (buf: int clarray) ->
                  let f x y =
  
negative.code:         checkCode command "Nested.Function.Carring2.gen" "Nested.Function.Carring2.cl"
  ]
  
  let localMemoryTests = ptestList "Test of local memory declaration functions" [
      testCase "Local int" <| fun _ ->
          let command =
              <@ fun (range: Range1D) ->
  