eeva/tensorflow-haskell
1
0
Fork 0
mirror of https://github.com/tensorflow/haskell.git synced 2024-11-27 13:29:44 +01:00
Code Issues Releases Wiki Activity

Minor fix to codegen of INLINE pragma. (#85)

Browse source
This commit is contained in:
Judah Jacobson 2017-04-03 20:25:55 -07:00 committed by Christian Berentsen
parent 719a715e90
commit b827612c71
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
tensorflow-opgen/src/TensorFlow/OpGen.hs
View file

@ -177,7 +177,7 @@ renderOp pOp = stack $
-- to stack calling "-dump-hi" which (unnecessarily) includes the -- to stack calling "-dump-hi" which (unnecessarily) includes the
-- inlining information, and is large for ops with many arguments. -- inlining information, and is large for ops with many arguments.
#if __GLASGOW_HASKELL__ < 800 #if __GLASGOW_HASKELL__ < 800
, "{-# NOINLINE " <> n <> "#-}" , "{-# NOINLINE" <+> n <+> "#-}"
#endif #endif
, n <+> "::" <+> hang 0 (typeSig empty pOp) , n <+> "::" <+> hang 0 (typeSig empty pOp)
, n <+> "=" <+> n <> "' id" , n <+> "=" <+> n <> "' id"