Commit 12f7b865 authored by Simon Marlow's avatar Simon Marlow
Browse files

fix markup

parent 529281f2
......@@ -427,7 +427,7 @@ foreign export stdcall adder :: Int -> Int -> IO Int
</para>
<programlisting>
// StartEnd.c
#include <Rts.h>
#include &lt;Rts.h&gt;
extern void __stginit_Adder(void);
......@@ -438,7 +438,7 @@ void HsStart()
// Initialize Haskell runtime
char** args = argv;
hs_init(&argc, &args);
hs_init(&amp;argc, &amp;args);
// Tell Haskell about all root modules
hs_add_root(__stginit_Adder);
......@@ -499,7 +499,7 @@ HsStart
End Sub
Public Sub Test()
MsgBox "12 + 5 = " & Adder(12, 5)
MsgBox "12 + 5 = " &amp; Adder(12, 5)
End Sub
</programlisting>
<para>
......@@ -522,7 +522,7 @@ End Sub
// Tester.cpp
#include "HsFFI.h"
#include "Adder_stub.h"
#include <stdio.h>
#include &lt;stdio.h&gt;
extern "C" {
void HsStart();
......@@ -547,6 +547,8 @@ $ tester
12 + 5 = 17
</screen>
</sect3>
</sect2>
</sect1>
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment