From d08e43f70d7482543c9bb2ba548bcd31e7eba978 Mon Sep 17 00:00:00 2001
From: lemon <lsof@mailbox.org>
Date: Fri, 26 Aug 2022 07:42:27 +0200
Subject: gensym fix, offset fix, str statics

---
 src/parse.cff | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/parse.cff')

diff --git a/src/parse.cff b/src/parse.cff
index e1b5f58..b0b96cb 100644
--- a/src/parse.cff
+++ b/src/parse.cff
@@ -733,7 +733,7 @@ fn parseagg(P *Parser, loc Loc, kind AggKind, name *const u8, retdecl **Decl) *c
       let size = 0z, align = 1z;
       let flds Vec<AggField> = {};
       let havedecls = #f;
-      let f0align = -1zs;
+      let f0align = 0zs;
       while !lexmatch(P, &tok, '}') {
          if isdecltokt(lexpeek(P).t) {
             havedecls = #t;
@@ -2745,7 +2745,7 @@ fn parsemacro(P *Parser, loc Loc, name *const u8) *Decl {
                gs.tok.t = :ident;
                gs.tok.loc = tok.loc;
                let s [300]u8 = {};
-               snprintf(s, sizeof(s) - 1, "#<gensym %s %d>", tok.u.ident, gensymid++); 
+               snprintf(s, sizeof(s) - 1, ".gensym.%s.%d", tok.u.ident, gensymid++); 
                gs.tok.u.ident = internstr(s);
                tok = gs.tok;
                gs.next = gensyms;
-- 
cgit v1.2.3