Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /trunk/src/compiler/common/paths_sml.in
ViewVC logotype

Diff of /trunk/src/compiler/common/paths_sml.in

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

revision 1989, Fri Aug 3 01:54:21 2012 UTC revision 1990, Fri Aug 3 18:09:06 2012 UTC
# Line 54  Line 54 
54      val cc = let      val cc = let
55            val (cmd::args) = String.tokens Char.isSpace "@CC@"            val (cmd::args) = String.tokens Char.isSpace "@CC@"
56            val cmd = findExe (PATH, cmd)            val cmd = findExe (PATH, cmd)
57            val args = if ("@CFLAG_M64@" <> "") then "@CFLAG_M64@" :: args else args            val args = if ("@CFLAG_MXX@" <> "") then "@CFLAG_MXX@" :: args else args
58            in            in
59              String.concatWith " " (cmd::args)              String.concatWith " " (cmd::args)
60            end            end

Legend:
Removed from v.1989  
changed lines
  Added in v.1990

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