aboutsummaryrefslogtreecommitdiff
path: root/sucl/dnc.dcl
blob: 2b262b6d692d9bb7e8547c14fc3e1040afb8b303 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
definition module dnc

// $Id$

from graph import Graph,Node
from cleanversion import String
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