Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/cm/paths/abspath.sml
ViewVC logotype

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

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 285, Wed May 19 23:31:25 1999 UTC revision 286, Fri May 21 07:47:16 1999 UTC
# Line 218  Line 218 
218          in          in
219              case String.fields delim spec of              case String.fields delim spec of
220                  "" :: arcs => mk (true, arcs, context)                  "" :: arcs => mk (true, arcs, context)
221                | [] => mk (false, [], context)                | [] => mk (false, [], context) (* shouldn't happen *)
222                  | [arc] => mk (false, [arc], context)
223                | arcs as (arc1 :: arcn) =>                | arcs as (arc1 :: arcn) =>
224                      (case PathConfig.configAnchor arc1 of                      (case PathConfig.configAnchor arc1 of
225                           NONE => mk (false, arcs, context)                           NONE => mk (false, arcs, context)

Legend:
Removed from v.285  
changed lines
  Added in v.286

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