summaryrefslogtreecommitdiff
path: root/appl/cmd/limbo/typecheck.b
diff options
context:
space:
mode:
authorCharles Forsyth <charles.forsyth@gmail.com>2015-10-31 11:07:44 +0000
committerCharles Forsyth <charles.forsyth@gmail.com>2015-10-31 11:07:44 +0000
commit756ebaf1609599e480446606839dffc2a001e5e6 (patch)
tree4fbeff7517f45f8d4af8b0692b464766c7be17ee /appl/cmd/limbo/typecheck.b
parented0a362fdec52ad7e0710af7a5ed7bae59e0bbad (diff)
suppress cyclic diagnostic by default; -y option to enable it; switch to Crypt from Keyring
Diffstat (limited to 'appl/cmd/limbo/typecheck.b')
-rw-r--r--appl/cmd/limbo/typecheck.b4
1 files changed, 2 insertions, 2 deletions
diff --git a/appl/cmd/limbo/typecheck.b b/appl/cmd/limbo/typecheck.b
index ae5604b0..5629500b 100644
--- a/appl/cmd/limbo/typecheck.b
+++ b/appl/cmd/limbo/typecheck.b
@@ -1875,7 +1875,7 @@ circlval(n, lval: ref Node): int
Oname =>
break;
Odot =>
- if(n.right.decl.cycle != byte 0 && n.right.decl.cyc == byte 0){
+ if(oldcycles && n.right.decl.cycle != byte 0 && n.right.decl.cyc == byte 0){
nerror(lval, "cannot assign to "+expconv(lval)+" because field '"+n.right.decl.sym.name
+"' of "+expconv(n.left)+" could complete a cycle to "+expconv(n.left));
return -1;
@@ -1883,7 +1883,7 @@ circlval(n, lval: ref Node): int
return 1;
Oind =>
for(id := n.ty.ids; id != nil; id = id.next){
- if(id.cycle != byte 0 && id.cyc == byte 0){
+ if(oldcycles && id.cycle != byte 0 && id.cyc == byte 0){
nerror(lval, "cannot assign to "+expconv(lval)+" because field '"+id.sym.name
+"' of "+expconv(n)+" could complete a cycle to "+expconv(n));
return -1;