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/main/cm-boot.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/main/cm-boot.sml

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

revision 644, Fri May 12 09:18:31 2000 UTC revision 645, Mon May 15 07:17:30 2000 UTC
# Line 146  Line 146 
146            val fnpolicy = FilenamePolicy.colocate            val fnpolicy = FilenamePolicy.colocate
147                { os = os, arch = HostMachDepVC.architecture }                { os = os, arch = HostMachDepVC.architecture }
148    
           val pcmode = PathConfig.new ()  
   
149            val theValues = ref (NONE: kernelValues option)            val theValues = ref (NONE: kernelValues option)
150    
151        in        in
152              val pcmode = PathConfig.new ()
153    
154            (* cancelling anchors cannot affect the order of existing paths            (* cancelling anchors cannot affect the order of existing paths
155             * (it may invalidate some paths; but all other ones stay as             * (it may invalidate some paths; but all other ones stay as
156             * they are) *)             * they are) *)
# Line 581  Line 581 
581      end      end
582    
583      structure Tools = ToolsFn (val load_plugin = cwd_load_plugin      structure Tools = ToolsFn (val load_plugin = cwd_load_plugin
584                                 val mkStdSrcPath = mkStdSrcPath)                                 val pcmode = pcmode)
585    
586      val load_plugin = load_plugin      val load_plugin = load_plugin
587    end    end

Legend:
Removed from v.644  
changed lines
  Added in v.645

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