From a3c55238f5fe89c0120bb31230536527a2cb02fe Mon Sep 17 00:00:00 2001 From: Emery Hemingway Date: Sat, 19 Mar 2022 09:13:23 -0500 Subject: [PATCH] Generate `data` fields for anonymous patterns --- src/preserves/preserves_schema_nim.nim | 5 ++--- src/preserves/schemaparse.nim | 2 +- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/src/preserves/preserves_schema_nim.nim b/src/preserves/preserves_schema_nim.nim index 586d3d5..750708e 100644 --- a/src/preserves/preserves_schema_nim.nim +++ b/src/preserves/preserves_schema_nim.nim @@ -10,7 +10,7 @@ import std/[hashes, sequtils, strutils, sets, tables] import compiler/[ast, idents, renderer, lineinfos] -import ../preserves, ./schema, ./parse +import ../preserves, ./schema type Bundle = schema.Bundle[void] @@ -487,8 +487,7 @@ proc addFields(recList: PNode; scm: Schema; known: var TypeTable; cp: CompoundPa proc addFields(recList: PNode; scm: Schema; known: var TypeTable; pat: Pattern; parentName: string): PNode {.discardable.} = case pat.orKind of PatternKind.SimplePattern: - raiseAssert "addFields called with SimplePattern " #& $pat.simplePattern - # addField(recList, scm, known, pat.simplePattern, "data") + addField(recList, scm, known, pat.simplePattern, "data") of PatternKind.CompoundPattern: discard addFields(recList, scm, known, pat.compoundPattern, parentName) reclist diff --git a/src/preserves/schemaparse.nim b/src/preserves/schemaparse.nim index cb01c4d..caeda65 100644 --- a/src/preserves/schemaparse.nim +++ b/src/preserves/schemaparse.nim @@ -6,7 +6,7 @@ from std/os import absolutePath, isAbsolute, getCurrentDir, parentDir import npeg -import ../preserves, ./schema, ./parse, ./pegs +import ../preserves, ./schema, ./pegs type Value = Preserve[void]