SCM Repository
Diff of /sml/trunk/src/cm/bootstrap/cmb-slave-hook.sml
Parent Directory
| 
Revision Log
| 
Patch
| revision 456, Wed Oct 27 15:09:58 1999 UTC | revision 457, Thu Oct 28 05:58:19 1999 UTC | |
|---|---|---|
| # | Line 9 | Line 9 |
| 9 | local | local |
| 10 | type slave = | type slave = |
| 11 | (string * string) -> | (string * string) -> |
| 12 | (GroupGraph.group * (DependencyGraph.sbnode -> bool)) option | (GroupGraph.group * (DependencyGraph.sbnode -> bool) * |
| 13 | PathConfig.mode) option | |
| 14 | val m = ref (StringMap.empty: slave StringMap.map) | val m = ref (StringMap.empty: slave StringMap.map) |
| 15 | in | in |
| 16 | fun init arch f = m := StringMap.insert (!m, arch, f) | fun init arch f = m := StringMap.insert (!m, arch, f) |
|
||||||||
| root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
| Powered by ViewVC 1.0.0 |
