Bryan O'Sullivan avatar Bryan O'Sullivan committed 06e407b Merge


Comments (0)

Files changed (2)

 cons c t = unstream (S.cons (safe c) (stream t))
 {-# INLINE cons #-}
+infixr 5 cons
 -- | /O(n)/ Adds a character to the end of a 'Text'.  This copies the
 -- entire array in the process, unless fused.  Subject to fusion.
 -- Performs replacement on invalid scalar values.


 cons c t = Chunk (T.singleton c) t
 {-# INLINE [1] cons #-}
+infixr 5 cons
 {-# RULES
 "LAZY TEXT cons -> fused" [~1] forall c t.
     cons c t = unstream (S.cons c (stream t))
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.