perl: Fix comments outside of a C code block.

Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org>
Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>

diff --git a/src/perl/Location/Location.xs b/src/perl/Location/Location.xs
index 9e98aed600909461196a002440fdb850b1be4541..f94ca3136daec76640092fba5f0c98b822fd6efd 100644 (file)
--- a/src/perl/Location/Location.xs
+++ b/src/perl/Location/Location.xs
@@ -56,9 +56,9 @@ init(file)
        OUTPUT:
                RETVAL
 
-/*
- * Database functions
- */
+#
+# Database functions
+#
 const char*
 get_vendor(db)
        struct loc_database* db;
@@ -69,9 +69,9 @@ get_vendor(db)
        OUTPUT:
                RETVAL
 
-/*
- * Lookup functions
- */
+#
+# Lookup functions
+#
 char*
 lookup_country_code(db, address)
        struct loc_database* db;