mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-17 13:27:30 +03:00
11 lines
141 B
Plaintext
11 lines
141 B
Plaintext
id x = x
|
|
|
|
x = id ("\n")
|
|
|
|
find : Text -> Text
|
|
find s = match (Text.take 1 s) with
|
|
"\n" -> "found"
|
|
_ -> "not found"
|
|
|
|
> (x, find "\nbar")
|