From 30e62139d6ba655bfc98c13267735b3f3f7a8826 Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@hashcollision.org>
Date: Tue, 16 Apr 2013 16:26:05 -0600
Subject: [PATCH] Fixing printing of continuation prompt tags.

---
 .../runtime-src/baselib-contmarks.js          | 19 +++++++++++++++++--
 1 file changed, 17 insertions(+), 2 deletions(-)

diff --git a/whalesong/js-assembler/runtime-src/baselib-contmarks.js b/whalesong/js-assembler/runtime-src/baselib-contmarks.js
index 23c1f5f..7ea8996 100644
--- a/whalesong/js-assembler/runtime-src/baselib-contmarks.js
+++ b/whalesong/js-assembler/runtime-src/baselib-contmarks.js
@@ -88,11 +88,26 @@
 
     };
 
+    ContinuationPromptTag.prototype.toDomNode = function(params) {
+        var dom = document.createElement("span");
+        dom.appendChild(document.createTextNode('#<continuation-prompt-tag:' + this.name + '>'));
+        return dom;
+    };
+
+    ContinuationPromptTag.prototype.toWrittenString = function(cache) {
+        return '#<continuation-prompt-tag' + this.name + '>';
+    };
+
+    ContinuationPromptTag.prototype.toDisplayedString = function(cache) {
+        return '#<continuation-prompt-tag' + this.name + '>';
+    };
+
+
 
     var isContinuationPromptTag = baselib.makeClassPredicate(ContinuationPromptTag);
 
     var DEFAULT_CONTINUATION_PROMPT_TAG =
-        new ContinuationPromptTag("default-continuation-prompt-tag");
+        new ContinuationPromptTag("default");
 
 
     exports.ContinuationMarkSet = ContinuationMarkSet;
@@ -101,4 +116,4 @@
 
     exports.isContinuationPromptTag = isContinuationPromptTag;
     exports.DEFAULT_CONTINUATION_PROMPT_TAG = DEFAULT_CONTINUATION_PROMPT_TAG;
-}(this.plt.baselib));
\ No newline at end of file
+}(this.plt.baselib));