search

ghcjs / ghcjs-base

base library for GHCJS for JavaScript interaction and marshalling, used by higher level libraries like JSC
MIT License
45 stars 67 forks source link

Fix `js_indexOf1` in `Data/JSString/Raw.hs` #78

Closed crocket closed 7 years ago

crocket commented 7 years ago

Here's the diff.

modified   Data/JSString/Raw.hs
@@ -140,7 +140,7 @@ foreign import javascript unsafe
 foreign import javascript unsafe
   "$3.indexOf($1,$2)" js_indexOf :: JSString -> Int# -> JSString -> Int#
 foreign import javascript unsafe
-  "$3.indexOf($1)" js_indexOf1 :: JSString -> JSString -> Int#
+  "$2.indexOf($1)" js_indexOf1 :: JSString -> JSString -> Int#
 foreign import javascript unsafe
   "$2.charCodeAt($1)" js_charCodeAt :: Int# -> JSString -> Int#
 foreign import javascript unsafe