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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/target-cpu/gen.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/target-cpu/gen.sml

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

revision 3912, Wed May 25 14:53:50 2016 UTC revision 3914, Wed May 25 15:47:42 2016 UTC
# Line 68  Line 68 
68      fun compile (spec : TargetSpec.t, basename) = let      fun compile (spec : TargetSpec.t, basename) = let
69          (* generate the C compiler flags *)          (* generate the C compiler flags *)
70            val cflags = ["-I" ^ Paths.diderotInclude(), "-I" ^ Paths.teemInclude()]            val cflags = ["-I" ^ Paths.diderotInclude(), "-I" ^ Paths.teemInclude()]
71            val cflags = condCons (TargetSpec.isParallel spec, #pthread Paths.cflags, cflags)            val cflags = condCons (TargetSpec.isParallel spec, #pthread Paths.cxxflags, cflags)
72            val cflags = if #debug spec            val cflags = if #debug spec
73                  then #debug Paths.cflags :: cflags                  then #debug Paths.cxxflags :: cflags
74                  else #ndebug Paths.cflags :: cflags                  else #ndebug Paths.cxxflags :: cflags
75            val cflags = #base Paths.cflags :: cflags            val cflags = #base Paths.cxxflags :: cflags
76            in            in
77              RunCC.compile (basename, cflags)              RunCC.compile (basename, cflags)
78            end            end
# Line 83  Line 83 
83              val extraLibs = Paths.teemLinkFlags() @ #base Paths.extraLibs :: extraLibs              val extraLibs = Paths.teemLinkFlags() @ #base Paths.extraLibs :: extraLibs
84              val rtLib = TargetSpec.runtimeLibName spec              val rtLib = TargetSpec.runtimeLibName spec
85              in              in
86                condCons (TargetSpec.isParallel spec, #pthread Paths.cflags, rtLib :: extraLibs)                condCons (TargetSpec.isParallel spec, #pthread Paths.cxxflags, rtLib :: extraLibs)
87              end              end
88            else [TargetSpec.runtimeLibName spec]            else [TargetSpec.runtimeLibName spec]
89    

Legend:
Removed from v.3912  
changed lines
  Added in v.3914

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