Parse - Fix a few cases where tokens were copied instead of cloned

1 files changed, 14 insertions, 0 deletions

diff --git a/src/parse/token.cpp b/src/parse/token.cpp
index 3c4d68ac..6e32f958 100644
--- a/src/parse/token.cpp
+++ b/src/parse/token.cpp
@@ -142,6 +142,20 @@ Token::Token(TagTakeIP, InterpolatedFragment frag)
     }
 }
 
+Token::Token(const Token& t):
+    m_type(t.m_type),
+    m_data( Data::make_None({}) ),
+    m_pos( t.m_pos )
+{
+    assert( t.m_data.tag() != Data::TAGDEAD );
+    TU_MATCH(Data, (t.m_data), (e),
+    (None,  ),
+    (String,    m_data = Data::make_String(e); ),
+    (Integer,   m_data = Data::make_Integer(e);),
+    (Float, m_data = Data::make_Float(e);),
+    (Fragment, BUG(t.m_pos, "Attempted to copy a fragment - " << t);)
+    )
+}
 Token Token::clone() const
 {
     Token   rv(m_type);