From 7875a1c0242f24d200a6c9a124ea26e19fb039e2 Mon Sep 17 00:00:00 2001
From: zweije
Date: Fri, 10 Aug 2001 14:36:10 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r605, which included commits to RCS files with non-trunk default branches.

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@606 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 sucl/dnc.dcl | 2 +-
 sucl/dnc.icl | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'sucl')

diff --git a/sucl/dnc.dcl b/sucl/dnc.dcl
index 30853e7..081dc97 100644
--- a/sucl/dnc.dcl
+++ b/sucl/dnc.dcl
@@ -8,4 +8,4 @@ from StdOverloaded import ==
 
 // dnc is like varcontents, but can give a more reasonable error message
 // when the contents is used when undefined.
-dnc :: (var->.String) !(Graph .sym var) var -> (.Bool,Node .sym var) | == var
+dnc :: (var->.String) !.(Graph sym var) var -> (.Bool,Node sym var) | == var
diff --git a/sucl/dnc.icl b/sucl/dnc.icl
index 400c5b2..3c644de 100644
--- a/sucl/dnc.icl
+++ b/sucl/dnc.icl
@@ -7,7 +7,7 @@ import StdEnv
 
 // dnc is like varcontents, but can give a more reasonable error message
 // when the contents is used when undefined.
-dnc :: (var->.String) !(Graph .sym var) var -> (.Bool,Node .sym var) | == var
+dnc :: (var->.String) !.(Graph sym var) var -> (.Bool,Node sym var) | == var
 dnc makemessage graph var
 | fst vc = vc
          = (False,(wrong "symbol",wrong "arguments"))
-- 
cgit v1.2.3