From ac34182833cbe01dc2a7920c265f7edf3d405908 Mon Sep 17 00:00:00 2001 From: Phil Freeman Date: Wed, 30 Apr 2014 16:16:49 -0700 Subject: [PATCH 1/2] Add indexOf' --- README.md | 14 ++++++++------ src/Data/String.purs | 9 +++++++++ 2 files changed, 17 insertions(+), 6 deletions(-) diff --git a/README.md b/README.md index 68a79fb..3e343cf 100644 --- a/README.md +++ b/README.md @@ -6,11 +6,17 @@ charAt :: Prim.Number -> Prim.String -> Prim.String + charCodeAt :: Prim.Number -> Prim.String -> Prim.Number + + drop :: Prim.Number -> Prim.String -> Prim.String + fromCharCode :: Prim.Number -> Prim.String indexOf :: Prim.String -> Prim.String -> Prim.Number - joinWith :: [Prim.String] -> Prim.String -> Prim.String + indexOf' :: Prim.String -> Prim.Number -> Prim.String -> Prim.Number + + joinWith :: Prim.String -> [Prim.String] -> Prim.String lastIndexOf :: Prim.String -> Prim.String -> Prim.Number @@ -20,13 +26,9 @@ replace :: Prim.String -> Prim.String -> Prim.String -> Prim.String - slice :: Prim.Number -> Prim.Number -> Prim.String -> Prim.String - split :: Prim.String -> Prim.String -> [Prim.String] - substr :: Prim.Number -> Prim.Number -> Prim.String -> Prim.String - - substring :: Prim.Number -> Prim.Number -> Prim.String -> Prim.String + take :: Prim.Number -> Prim.String -> Prim.String toLower :: Prim.String -> Prim.String diff --git a/src/Data/String.purs b/src/Data/String.purs index bd968d6..5b61d5e 100644 --- a/src/Data/String.purs +++ b/src/Data/String.purs @@ -26,6 +26,15 @@ foreign import indexOf \ }; \ \}" :: String -> String -> Number +foreign import indexOf' + "function indexOf$prime(x) {\ + \ return function(startAt) {\ + \ return function(s) {\ + \ return s.indexOf(x, startAt);\ + \ }; \ + \ }; \ + \}" :: String -> Number -> String -> Number + foreign import lastIndexOf "function lastIndexOf(x) {\ \ return function(s) {\ From 6b14667b6c1a93501cc121614ac533b06f69042b Mon Sep 17 00:00:00 2001 From: Phil Freeman Date: Wed, 30 Apr 2014 16:25:05 -0700 Subject: [PATCH 2/2] Add lastIndexOf' --- README.md | 2 ++ src/Data/String.purs | 9 +++++++++ 2 files changed, 11 insertions(+) diff --git a/README.md b/README.md index 3e343cf..af7f382 100644 --- a/README.md +++ b/README.md @@ -20,6 +20,8 @@ lastIndexOf :: Prim.String -> Prim.String -> Prim.Number + lastIndexOf' :: Prim.String -> Prim.Number -> Prim.String -> Prim.Number + length :: Prim.String -> Prim.Number localeCompare :: Prim.String -> Prim.String -> Prim.Number diff --git a/src/Data/String.purs b/src/Data/String.purs index 5b61d5e..f451151 100644 --- a/src/Data/String.purs +++ b/src/Data/String.purs @@ -42,6 +42,15 @@ foreign import lastIndexOf \ };\ \}" :: String -> String -> Number +foreign import lastIndexOf' + "function lastIndexOf$prime(x) {\ + \ return function(startAt) {\ + \ return function(s) {\ + \ return s.lastIndexOf(x, startAt);\ + \ }; \ + \ }; \ + \}" :: String -> Number -> String -> Number + foreign import length "function length(s) {\ \ return s.length;\