Small formatting fix

2016-04-08 23:31:13 +10:00
parent b250d599b9
commit 87b65d1dda
1 changed files with 1 additions and 1 deletions
--- a/bindings/haskell/samples/SampleArm64.hs
+++ b/bindings/haskell/samples/SampleArm64.hs
@ -61,7 +61,7 @@ testArm64 = do
        blockHookAdd uc hookBlock () 1 0

        -- Tracing one instruction at address with customized callback
-        codeHookAdd uc hookCode ()address address
+        codeHookAdd uc hookCode () address address

        -- Emulate machine code in infinite time (last param = Nothing), or
        -- when finishing all the code