aboutsummaryrefslogtreecommitdiffstats
path: root/src/psl/psl-rewrites.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/psl/psl-rewrites.adb')
-rw-r--r--src/psl/psl-rewrites.adb4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/psl/psl-rewrites.adb b/src/psl/psl-rewrites.adb
index 173f4da94..de88939de 100644
--- a/src/psl/psl-rewrites.adb
+++ b/src/psl/psl-rewrites.adb
@@ -294,6 +294,10 @@ package body PSL.Rewrites is
return Rewrite_Equal_Repeat_Seq (N);
when N_Braced_SERE =>
return Rewrite_SERE (Get_SERE (N));
+ when N_Clocked_SERE =>
+ Set_SERE (N, Rewrite_SERE (Get_SERE (N)));
+ Set_Boolean (N, Rewrite_Boolean (Get_Boolean (N)));
+ return N;
when N_Within_SERE =>
Set_Left (N, Rewrite_SERE (Get_Left (N)));
Set_Right (N, Rewrite_SERE (Get_Right (N)));