@@ -708,6 +708,90 @@ map_tests() -> .
708708% ^ - meta.mapping
709709% ^ punctuation.section.mapping.end.erlang
710710
711+
712+ map_comprehension_tests () ->
713+
714+ #{ => || }
715+ % ^^ meta.mapping.erlang punctuation.section.mapping.begin.erlang
716+ % ^ meta.mapping.key.erlang
717+ % ^^ meta.mapping.erlang punctuation.separator.key-value.erlang
718+ % ^ meta.mapping.value.erlang
719+ % ^^ meta.mapping.erlang keyword.operator.comprehension.erlang
720+ % ^ meta.mapping.filter.erlang
721+ % ^ meta.mapping.erlang punctuation.section.mapping.end.erlang
722+
723+ #{K => K || K <- List }
724+ % ^^ meta.mapping.erlang punctuation.section.mapping.begin.erlang
725+ % ^^ meta.mapping.key.erlang
726+ % ^ variable.other.readwrite.erlang
727+ % ^^ meta.mapping.erlang punctuation.separator.key-value.erlang
728+ % ^^^ meta.mapping.value.erlang
729+ % ^ variable.other.readwrite.erlang
730+ % ^^ meta.mapping.erlang keyword.operator.comprehension.erlang
731+ % ^^^^^^^^^^ meta.mapping.filter.erlang
732+ % ^ variable.other.readwrite.erlang
733+ % ^^ keyword.operator.generator.erlang
734+ % ^^^^ variable.other.readwrite.erlang
735+ % ^ meta.mapping.erlang punctuation.section.mapping.end.erlang
736+
737+ #{K => V || <<K , V >> <= Binary }
738+ % ^^ meta.mapping.erlang punctuation.section.mapping.begin.erlang
739+ % ^^ meta.mapping.key.erlang
740+ % ^ variable.other.readwrite.erlang
741+ % ^^ meta.mapping.erlang punctuation.separator.key-value.erlang
742+ % ^^^ meta.mapping.value.erlang
743+ % ^ variable.other.readwrite.erlang
744+ % ^^ meta.mapping.erlang keyword.operator.comprehension.erlang
745+ % ^^^^^^^^^^^^^^^^^^^ meta.mapping.filter.erlang
746+ % ^^^^^^^^ meta.sequence.binary.erlang
747+ % ^^ punctuation.definition.sequence.begin.erlang
748+ % ^ variable.other.readwrite.erlang
749+ % ^ punctuation.separator.sequence.erlang
750+ % ^ variable.other.readwrite.erlang
751+ % ^^ punctuation.definition.sequence.end.erlang
752+ % ^^ keyword.operator.generator.erlang
753+ % ^^^^^^ variable.other.readwrite.erlang
754+ % ^ meta.mapping.erlang punctuation.section.mapping.end.erlang
755+
756+ #{ || {K , V } <- maps :to_list (Map )}
757+ % ^^ meta.mapping.erlang punctuation.section.mapping.begin.erlang
758+ % ^ meta.mapping.key.erlang
759+ % ^^ meta.mapping.erlang keyword.operator.comprehension.erlang
760+ % ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ meta.mapping.filter.erlang
761+ % ^^^^^^ meta.sequence.tuple.erlang
762+ % ^ punctuation.section.sequence.begin.erlang
763+ % ^ variable.other.readwrite.erlang
764+ % ^ punctuation.separator.sequence.erlang
765+ % ^ variable.other.readwrite.erlang
766+ % ^ punctuation.section.sequence.end.erlang
767+ % ^^ keyword.operator.generator.erlang
768+ % ^^^^^^^^^^^^ meta.path.erlang
769+ % ^^^^ meta.atom.erlang variable.namespace.erlang
770+ % ^ punctuation.accessor.double-colon.erlang
771+ % ^^^^^^^ meta.function-call.identifier.erlang meta.atom.erlang variable.function.erlang
772+ % ^^^^^ meta.function-call.arguments.erlang
773+ % ^ punctuation.section.arguments.begin.erlang
774+ % ^^^ variable.other.readwrite.erlang
775+ % ^ punctuation.section.arguments.end.erlang
776+ % ^ meta.mapping.erlang punctuation.section.mapping.end.erlang
777+
778+ [{Key , Value } || Key := Value <- MapOrIterator ]
779+ % ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ meta.sequence.list.erlang
780+ % ^ punctuation.section.sequence.begin.erlang
781+ % ^^^^^^^^^^^^ meta.sequence.tuple.erlang
782+ % ^ punctuation.section.sequence.begin.erlang
783+ % ^^^ variable.other.readwrite.erlang
784+ % ^ punctuation.separator.sequence.erlang
785+ % ^^^^^ variable.other.readwrite.erlang
786+ % ^ punctuation.section.sequence.end.erlang
787+ % ^^ keyword.operator.comprehension.erlang
788+ % ^^^ variable.other.readwrite.erlang
789+ % ^^ punctuation.separator.key-value.erlang
790+ % ^^^^^ variable.other.readwrite.erlang
791+ % ^^ keyword.operator.generator.erlang
792+ % ^^^^^^^^^^^^^ variable.other.readwrite.erlang
793+ % ^ punctuation.section.sequence.end.erlang
794+
711795% Number tests
712796
713797numbers_test () -> .
0 commit comments