[commit: ghc] master: Update list of primops that don't get wrappers (#10191) (af45feb)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/af45feba476af0b5a12f3a1ac36854f2cf44f993/ghc

>---------------------------------------------------------------

commit af45feba476af0b5a12f3a1ac36854f2cf44f993
Author: Reid Barton <rwbarton at gmail.com>
Date:   Fri Mar 27 00:09:23 2015 -0400

    Update list of primops that don't get wrappers (#10191)
    
    Summary:
    The list was 14 years old, and there don't seem to be any problems
    with seq# or par#; the other par*# primops were not actually
    implemented at all and were removed in D758.
    
    Test Plan:
    validate; will also try to locally validate an unregisterised build
    in case there was some truth to the deleted comment
    
    Reviewers: austin
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D759
    
    GHC Trac Issues: #10191


>---------------------------------------------------------------

af45feba476af0b5a12f3a1ac36854f2cf44f993
 utils/genprimopcode/Main.hs | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/utils/genprimopcode/Main.hs b/utils/genprimopcode/Main.hs
index 7ade0b1..803323f 100644
--- a/utils/genprimopcode/Main.hs
+++ b/utils/genprimopcode/Main.hs
@@ -567,12 +567,10 @@ gen_wrappers (Info _ entries)
 
         dodgy spec
            = name spec `elem` 
-             [-- C code generator can't handle these
-              "seq#", 
-              "tagToEnum#",
-              -- not interested in parallel support
-              "par#", "parGlobal#", "parLocal#", "parAt#", 
-              "parAtAbs#", "parAtRel#", "parAtForNow#" 
+             [-- tagToEnum# is really magical, and can't have
+              -- a wrapper since its implementation depends on
+              -- the type of its result
+              "tagToEnum#"
              ]
 
         is_llvm_only :: Entry -> Bool