Diff of /sml/trunk/src/cm/main/preload.sml

Parent Directory | Revision Log | Patch

	revision 651, Thu Jun 1 18:34:03 2000 UTC	revision 879, Thu Jul 19 18:59:38 2001 UTC
#	Line 23	Line 23
23	| line =>	| line =>
24	if isComment line then loop ()	if isComment line then loop ()
25	else (case String.tokens Char.isSpace line of	else (case String.tokens Char.isSpace line of
26	["make", f] => load make f	[] => loop ()(* ignore empty lines *)
27		| ["make", f] => load make f
28	| ["autoload", f] => load autoload f	| ["autoload", f] => load autoload f
29	| _ => (Say.say ["Illegal line in ", specfile,	| _ => (Say.say ["Illegal line in ", specfile,
30	": ", line];	": ", line];

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.651   changed lines   Added in v.879

---

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