SCM Repository
Diff of /branches/cuda/src/compiler/driver/backend.sml
Parent Directory
|
Revision Log
|
Patch
revision 1676, Wed Dec 14 19:00:02 2011 UTC | revision 1677, Fri Dec 16 22:17:33 2011 UTC | |
---|---|---|
# | Line 13 | Line 13 |
13 | fun pickBackend target = (case target | fun pickBackend target = (case target |
14 | of TargetUtil.TARGET_C => CBackEnd.generate | of TargetUtil.TARGET_C => CBackEnd.generate |
15 | | TargetUtil.TARGET_CL => CLBackEnd.generate | | TargetUtil.TARGET_CL => CLBackEnd.generate |
16 | | TargetUtil.TARGET_CUDA => raise Fail "CUDA not supported yet" | | TargetUtil.TARGET_CUDA => CUDABackEnd.generate |
17 | (* end case *)) | (* end case *)) |
18 | ||
19 | fun generate {target, parallel, double, debug} = let | fun generate {target, parallel, double, debug} = let |
|
root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
Powered by ViewVC 1.0.0 |