added: '$' in front of polymorphic variables

diff --git a/compiler/include/astnodes.h b/compiler/include/astnodes.h
index 0282cb0e01c2f8c8a441dc3d8e01ad756098853d..6fcdab57c2079c393e08c3f41a6cc02136da28f1 100644 (file)
--- a/compiler/include/astnodes.h
+++ b/compiler/include/astnodes.h
@@ -287,6 +287,8 @@ typedef enum AstFlags {
     Ast_Flag_Dead                  = BH_BIT(22),
 
     Ast_Flag_Extra_Field_Access    = BH_BIT(23),
+
+    Ast_Flag_Symbol_Is_PolyVar     = BH_BIT(24),
 } AstFlags;
 
 typedef enum UnaryOp {

diff --git a/compiler/src/doc.c b/compiler/src/doc.c
index 5c56d8c6632b68cd9ae2937d2ddc95debcb547a2..2bdff0e8cc9d3184e2b00e2398d1883c72db0cf5 100644 (file)
--- a/compiler/src/doc.c
+++ b/compiler/src/doc.c
@@ -294,6 +294,9 @@ static void write_type_node(bh_buffer *buffer, void *vnode) {
 
         case Ast_Kind_Symbol:
         case Ast_Kind_Param:
+            if (node->flags & Ast_Flag_Symbol_Is_PolyVar)
+                bh_buffer_write_byte(buffer, '$');
+                
             bh_buffer_append(buffer, node->token->text, node->token->length);
             return;
     }

diff --git a/compiler/src/parser.c b/compiler/src/parser.c
index 679fc79b5dc351fcc26e662596c2c547b4a1c247..422927ab317ab1e1243896c8e3f3b4ae2daea807 100644 (file)
--- a/compiler/src/parser.c
+++ b/compiler/src/parser.c
@@ -1799,6 +1799,7 @@ static void parse_polymorphic_variable(OnyxParser* parser, AstType*** next_inser
 
     AstNode* symbol_node = make_node(AstNode, Ast_Kind_Symbol);
     symbol_node->token = expect_token(parser, Token_Type_Symbol);
+    symbol_node->flags |= Ast_Flag_Symbol_Is_PolyVar;
 
     AstNode *implicit_interface = NULL;
     if (consume_token_if_next(parser, '/')) {