Diff of /sml/trunk/src/cm/paths/pathconfig.sml

Parent Directory | Revision Log | Patch

	revision 405, Thu Sep 2 03:35:24 1999 UTC	revision 406, Thu Sep 2 09:13:19 1999 UTC
#	Line 83	Line 83
83	[a, d] => (set (m, a, d); loop ())	[a, d] => (set (m, a, d); loop ())
84	| ["-"] => (reset m; loop ())	| ["-"] => (reset m; loop ())
85	| [a] => (cancel (m, a); loop ())	| [a] => (cancel (m, a); loop ())
86		| [] => loop ()       (* ignore empty lines *)
87	| _ => (Say.say [f, ": malformed line (ignored)\n"]; loop ())	| _ => (Say.say [f, ": malformed line (ignored)\n"]; loop ())
88	end	end
89	in	in

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.405   changed lines   Added in v.406

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0