Add a test for FFI decl parsing

We were parsing "staticfoo" as "static foo".

testsuite/tests/ffi/should_run/all.T

@@ -201,3 +201,8 @@ test('Capi_Ctype_002',
      run_command,
      ['$MAKE -s --no-print-directory Capi_Ctype_002'])
 
+test('ffi_parsing_001',
+     extra_clean(['ffi_parsing_001_c.o']),
+     compile_and_run,
+     ['ffi_parsing_001_c.c'])
+

testsuite/tests/ffi/should_run/ffi_parsing_001.hs

+
+import Foreign.C
+
+-- This should not be parsed as "static foo", importing "foo"
+foreign import ccall "staticfoo" x :: CInt
+
+main :: IO ()
+main = print x

testsuite/tests/ffi/should_run/ffi_parsing_001.stdout

+5

testsuite/tests/ffi/should_run/ffi_parsing_001_c.c

+
+int staticfoo(void) {
+    return 5;
+}
+
+int foo(void) {
+    return 8;
+}