diff --git a/src/compiler/lexer.c b/src/compiler/lexer.c
index 300677eef..499041a34 100644
--- a/src/compiler/lexer.c
+++ b/src/compiler/lexer.c
@@ -18,7 +18,7 @@ typedef enum
 	DOC_END_ERROR,
 } DocEnd;
 
-#pragma mark --- Lexing general methods.
+// --- Lexing general methods.
 
 static bool lexer_scan_token_inner(Lexer *lexer, LexMode mode);
 
@@ -82,7 +82,7 @@ static inline bool match(Lexer *lexer, char expected)
 	return true;
 }
 
-#pragma mark --- Token creation
+// --- Token creation
 
 /**
  * Allocate data for a token, including source location.
@@ -179,7 +179,7 @@ static bool add_token(Lexer *lexer, TokenType type, const char *string)
 
 
 
-#pragma mark --- Comment parsing
+// --- Comment parsing
 
 /**
  * Parsing of the "//" line comment,
@@ -279,7 +279,7 @@ static void skip_whitespace(Lexer *lexer, LexMode lex_type)
 
 
 
-#pragma mark --- Identifier scanning
+// --- Identifier scanning
 
 
 // Parses identifiers. Note that this is a bit complicated here since
@@ -349,7 +349,7 @@ static inline bool scan_ident(Lexer *lexer, TokenType normal, TokenType const_to
 	return add_token(lexer, type, interned_string);
 }
 
-#pragma mark --- Number scanning
+// --- Number scanning
 
 static bool scan_number_suffix(Lexer *lexer, bool *is_float)
 {
@@ -592,7 +592,7 @@ static inline bool scan_digit(Lexer *lexer)
 	return scan_dec(lexer);
 }
 
-#pragma mark --- Character & string scan
+// --- Character & string scan
 
 static inline int64_t scan_hex_literal(Lexer *lexer, int positions)
 {
@@ -1294,7 +1294,7 @@ static inline bool scan_base64(Lexer *lexer)
 
 
 
-#pragma mark --- Lexer doc lexing
+// --- Lexer doc lexing
 
 /**
  * Skip any stars until we either have no more * or we find '* /'
@@ -1580,7 +1580,7 @@ static bool parse_doc_comment(Lexer *lexer)
 	}
 }
 
-#pragma mark --- Lexer public functions
+// --- Lexer public functions
 
 
 Token lexer_advance(Lexer *lexer)
diff --git a/src/compiler/parse_global.c b/src/compiler/parse_global.c
index d97ababdb..87d6a5627 100644
--- a/src/compiler/parse_global.c
+++ b/src/compiler/parse_global.c
@@ -106,7 +106,7 @@ void recover_top_level(Context *context)
 	}
 }
 
-#pragma mark --- Parse CT conditional code
+// --- Parse CT conditional code
 
 static inline bool parse_top_level_block(Context *context, Decl ***decls, TokenType end1, TokenType end2, TokenType end3)
 {
@@ -222,7 +222,7 @@ static inline Decl *parse_ct_switch_top_level(Context *context)
 }
 
 
-#pragma mark --- Parse paths
+// --- Parse paths
 
 /**
  * module_path ::= IDENT (SCOPE IDENT)*
@@ -271,7 +271,7 @@ static inline Path *parse_module_path(Context *context)
 }
 
 
-#pragma mark --- Parse import and module
+// --- Parse import and module
 
 /**
  *
@@ -514,7 +514,7 @@ Path *parse_path_prefix(Context *context, bool *had_error)
 	return path;
 }
 
-#pragma mark --- Type parsing
+// --- Type parsing
 
 /**
  * base_type
@@ -746,7 +746,7 @@ TypeInfo *parse_failable_type(Context *context)
 }
 
 
-#pragma mark --- Decl parsing
+// --- Decl parsing
 
 /**
  * Parse ident ('=' expr)?
@@ -924,7 +924,7 @@ bool parse_next_is_case_type(Context *context)
 
 
 
-#pragma mark --- Parse parameters & throws & attributes
+// --- Parse parameters & throws & attributes
 
 
 /**
@@ -1211,7 +1211,7 @@ static inline bool parse_parameter_list(Context *context, Visibility parent_visi
 	return true;
 }
 
-#pragma mark --- Parse types
+// --- Parse types
 
 
 /**
@@ -1979,7 +1979,7 @@ static inline Decl *parse_enum_declaration(Context *context, Visibility visibili
 	return decl;
 }
 
-#pragma mark --- Parse function
+// --- Parse function
 
 
 
diff --git a/src/compiler/parse_stmt.c b/src/compiler/parse_stmt.c
index 4ae202d0e..a30873af6 100644
--- a/src/compiler/parse_stmt.c
+++ b/src/compiler/parse_stmt.c
@@ -10,7 +10,7 @@ Ast *parse_unreachable_stmt(Context *context);
 
 Ast *parse_scoping_stmt(Context *context);
 
-#pragma mark --- Internal functions
+// --- Internal functions
 
 
 /**
@@ -750,7 +750,7 @@ static inline Ast *parse_assert_stmt(Context *context)
 	return ast;
 }
 
-#pragma mark --- External functions
+// --- External functions
 
 /**
  * ct_assert_stmt ::= CT_ASSERT '(' constant_expression (',' constant_expression) ')' ';'
diff --git a/src/compiler/parser.c b/src/compiler/parser.c
index 4d0867d16..49aefa4c1 100644
--- a/src/compiler/parser.c
+++ b/src/compiler/parser.c
@@ -5,7 +5,7 @@
 #include "compiler_internal.h"
 #include "parser_internal.h"
 
-#pragma mark --- Parser base methods
+// --- Parser base methods
 
 /**
  * Advance to the next non-comment token.
@@ -103,7 +103,7 @@ bool consume(Context *context, TokenType type, const char *message, ...)
 }
 
 
-#pragma mark --- Extern functions
+// --- Extern functions
 
 /**
  * module? imports top_level_statement*
diff --git a/src/compiler/sema_stmts.c b/src/compiler/sema_stmts.c
index 3c358e101..473a94163 100644
--- a/src/compiler/sema_stmts.c
+++ b/src/compiler/sema_stmts.c
@@ -4,7 +4,7 @@
 
 #include "sema_internal.h"
 
-#pragma mark --- Helper functions
+// --- Helper functions
 
 static bool sema_analyse_compound_stmt(Context *context, Ast *statement);
 
@@ -44,7 +44,7 @@ static void sema_unwrappable_from_catch_in_else(Context *c, Expr *cond)
 }
 
 
-#pragma mark --- Sema analyse stmts
+// --- Sema analyse stmts