mode = (reserved "linear" >> return makeLinear)
       <|>
       (reserved "local" >> return makeLocal)
       <|>
       (reserved "active" >> return makeActive)
       <|>
       (reserved "shared" >> return makeShared)
       <|>
       (reserved "sharable" >> return makeSharable)
       <|>
       (reserved "unsafe" >> return makeUnsafe)