Diff of /sml/branches/idlbasis-devel/src/system/Basis/Implementation/OS/os-path-fn.sml

Parent Directory | Revision Log | Patch

	revision 866, Mon Jul 2 16:33:10 2001 UTC	revision 867, Mon Jul 2 20:14:11 2001 UTC
#	Line 38	Line 38
38	structure SS = Substring	structure SS = Substring
39
40	exception Path = P.Path	exception Path = P.Path
41		exception InvalidArc        (* FIXME: use this exception where appropriate! *)
42
43	val arcSepStr = String.str P.arcSepChar	val arcSepStr = String.str P.arcSepChar
44
#	Line 233	Line 234
234	else raise Path	else raise Path
235	(* end case *))	(* end case *))
236
237		fun fromUnixPath _ = raise Fail "fromUnixPath not yet implemented"
238		fun toUnixPath _ = raise Fail "toUnixPath not yet implemented"
239
240	end	end
241	end	end
242

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.866   changed lines   Added in v.867

---

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