|
|
1.1 ! root 1: (* Copyright 1989 by AT&T Bell Laboratories *) ! 2: (* sigmatch.sig *) ! 3: ! 4: signature SIGMATCH = ! 5: sig ! 6: structure Basics: BASICS ! 7: ! 8: val match0 : {mapstr1: int*Basics.Structure->unit, ! 9: maptyc: int*Basics.tycon->unit, ! 10: mapstr: Basics.Structure*Basics.Structure->unit} ! 11: -> bool * Basics.Symbol.symbol list * Stampset.stampsets ! 12: * Basics.Structure * Basics.Structure * Basics.Structure ! 13: -> Basics.Structure * Basics.thinning ! 14: ! 15: val match : bool * Basics.Symbol.symbol list * Stampset.stampsets ! 16: * Basics.Structure * Basics.Structure * Basics.Structure ! 17: -> Basics.Structure * Basics.thinning ! 18: ! 19: val realize : bool * Basics.Symbol.symbol list * Stampset.stampsets * Basics.stamp ! 20: * Basics.Structure * Basics.Structure ! 21: -> Basics.Structure * Basics.trans list ! 22: end ! 23:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.