-- Copyright 2019 Stanford University
--
-- Licensed under the Apache License, Version 2.0 (the "License");
-- you may not use this file except in compliance with the License.
-- You may obtain a copy of the License at
--
--     http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing, software
-- distributed under the License is distributed on an "AS IS" BASIS,
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-- See the License for the specific language governing permissions and
-- limitations under the License.

-- fails-with:
-- privilege_call4.rg:45: invalid privileges in argument 1: reads($s.g.d)
--   return f(s)
--          ^

import "regent"

struct s {
  a : int,
  b : int,
  c : int,
}

struct t {
  d : s,
  e : s,
  f : s,
}

struct u {
  g : t,
  h : t,
}

task f(r : region(u))
where reads writes(r.g.d) do
end

task g(s : region(u))
where reads writes(s.g.d.a) do
  return f(s)
end
g:compile()


Make the test actually fail
-- Copyright 2019 Stanford University
--
-- Licensed under the Apache License, Version 2.0 (the "License");
-- you may not use this file except in compliance with the License.
-- You may obtain a copy of the License at
--
--     http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing, software
-- distributed under the License is distributed on an "AS IS" BASIS,
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-- See the License for the specific language governing permissions and
-- limitations under the License.

-- fails-with:
-- privilege_call4.rg:45: invalid privileges in argument 1: reads($s.g.d)
--   return f(s)
--          ^

import "regent"

fspace s {
  a : int,
  b : int,
  c : int,
}

fspace t {
  d : s,
  e : s,
  f : s,
}

fspace u {
  g : t,
  h : t,
}

task f(r : region(u))
where reads writes(r.g.d) do
end

task g(s : region(u))
where reads writes(s.g.d.a) do
  return f(s)
end
g:compile()