summaryrefslogtreecommitdiff
path: root/abstract/transform.ml
diff options
context:
space:
mode:
authorAlex Auvolat <alex.auvolat@ansys.com>2014-07-02 10:27:30 +0200
committerAlex Auvolat <alex.auvolat@ansys.com>2014-07-02 10:27:30 +0200
commit08096254ecf8c2341320e255ad74a7d99fb46d47 (patch)
tree383b7710c1a82d50a527b367581128f158cc445b /abstract/transform.ml
parentcbd88f9238dbd66acacb782bdc0fd3aa9a82b804 (diff)
downloadscade-analyzer-08096254ecf8c2341320e255ad74a7d99fb46d47.tar.gz
scade-analyzer-08096254ecf8c2341320e255ad74a7d99fb46d47.zip
More verbosity ; adapt rfollow so that it can be proved
Diffstat (limited to 'abstract/transform.ml')
-rw-r--r--abstract/transform.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/abstract/transform.ml b/abstract/transform.ml
index ff2374e..7ae54ad 100644
--- a/abstract/transform.ml
+++ b/abstract/transform.ml
@@ -494,5 +494,5 @@ and guarantees_of_prog rp =
consts = I.consts rp;
} in
- g_of_scope td rp.root_scope "" (BConst true)
+ g_of_scope td rp.root_scope (clock_scope_here rp.root_scope) (BConst true)