Avoid use of nqp::time_n() if --stable-sc was provided

Raku · Oct 8, 2015 · c0c31bf · c0c31bf
1 parent a19dab8
commit c0c31bf
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/QAST/Block.nqp b/src/QAST/Block.nqp
@@ -37,7 +37,7 @@ class QAST::Block is QAST::Node does QAST::Children {
     }
 
     my $cur_cuid := 0;
-    my $cuid_suffix := ~nqp::time_n();
+    my $cuid_suffix := %*COMPILING<%?OPTIONS><stable-sc> || ~nqp::time_n();
 
     method cuid($value = NO_VALUE) {
         if !($value =:= NO_VALUE) {