From 159f088d9a59488216c87fe633db02fe5e2fbc3c Mon Sep 17 00:00:00 2001
From: Tim Mackinnon <macta@pobox.com>
Date: Wed, 6 Mar 2019 16:29:18 +0000
Subject: [PATCH] Added runnable doc

---
 src/Collections-Unordered/Bag.class.st | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Collections-Unordered/Bag.class.st b/src/Collections-Unordered/Bag.class.st
index 2eb4ce90d7d..9f2b7961c0a 100644
--- a/src/Collections-Unordered/Bag.class.st
+++ b/src/Collections-Unordered/Bag.class.st
@@ -79,6 +79,7 @@ Bag >> asBag [
 { #category : #converting }
 Bag >> asDictionary [
 	"Answer a Dictionary with values and counts (a copy)"
+	"(Bag newFrom: 'aabbbc') asDictionary >>> { 'a'->2. 'b'->3. 'c'->1 }"
  
 	^self valuesAndCounts copy
 ]