fix markup

[ghc-hetmet.git] / docs / users_guide / win32-dlls.xml

diff --git a/docs/users_guide/win32-dlls.xml b/docs/users_guide/win32-dlls.xml
index eaa3d38..bf243a2 100644 (file)
--- a/docs/users_guide/win32-dlls.xml
+++ b/docs/users_guide/win32-dlls.xml
@@ -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>