From 2016974e956052bd74f97d965cca5e5c336ec65d Mon Sep 17 00:00:00 2001
From: Emery Hemingway <ehmry@posteo.net>
Date: Mon, 6 Sep 2021 16:15:09 +0200
Subject: [PATCH] Replace prsFoo() with foo()

---
 src/preserves/private/preserves_schema_nim.nim | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/src/preserves/private/preserves_schema_nim.nim b/src/preserves/private/preserves_schema_nim.nim
index c8a3723..a63e33d 100644
--- a/src/preserves/private/preserves_schema_nim.nim
+++ b/src/preserves/private/preserves_schema_nim.nim
@@ -360,14 +360,20 @@ proc generateProcs(result: var seq[PNode]; name: string; sn: SchemaNode) =
           newEmpty())
         initRecordCall.add(
           nn(nkCall, ident"toPreserve", id, ident"EmbeddedType"))
+    var procId = name
+    procId[0] = procId[0].toLowerAscii
     result.add nn(nkProcDef,
-      exportIdent("prs" & name),
+      exportIdent(procId),
       newEmpty(),
       newEmpty(),
       params,
       newEmpty(),
       newEmpty(),
-      nn(nkStmtList, initRecordCall))
+      nn(nkStmtList,
+        PNode(
+          kind: nkCommentStmt,
+          comment: "Preserves constructor for ``" & name & "``."),
+        initRecordCall))
   else: discard
 
 proc generateNimFile*(scm: Schema; path: string) =