===================================================================
RCS file: /cvs/pod2mdoc/pod2mdoc.c,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -p -r1.40 -r1.41
--- pod2mdoc/pod2mdoc.c	2015/02/13 18:01:53	1.40
+++ pod2mdoc/pod2mdoc.c	2015/02/13 18:44:04	1.41
@@ -1,4 +1,4 @@
-/*	$Id: pod2mdoc.c,v 1.40 2015/02/13 18:01:53 schwarze Exp $	*/
+/*	$Id: pod2mdoc.c,v 1.41 2015/02/13 18:44:04 schwarze Exp $	*/
 /*
  * Copyright (c) 2014 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2014, 2015 Ingo Schwarze <schwarze@openbsd.org>
@@ -1093,9 +1093,19 @@ again:
 				start++;
 			if (start < end && '\n' == buf[start])
 				start++;
-			if (start < end) 
-				goto again;
-			return;
+			goto again;
+		}
+
+		/* Other preprocessor directives. */
+		if ('#' == buf[i]) {
+			fputs(".Fd ", stdout);
+			start = i;
+			while(start < end && '\n' != buf[start])
+				putchar(buf[start++]);
+			putchar('\n');
+			if (start < end && '\n' == buf[start])
+				start++;
+			goto again;
 		}
 
 		/* Parse function declaration. */