From c56584724049a609a31f49890c5dd9bec2a085b4 Mon Sep 17 00:00:00 2001
From: Scott Percival
Date: Thu, 9 Jan 2020 20:20:52 +0800
Subject: DIRECTOR: LINGO: Allow b_length to cast from reference

---
 engines/director/lingo/lingo-builtins.cpp | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'engines/director/lingo')

diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp
index b7c32dd05e..e02ac63e6f 100644
--- a/engines/director/lingo/lingo-builtins.cpp
+++ b/engines/director/lingo/lingo-builtins.cpp
@@ -495,6 +495,8 @@ void LB::b_hilite(int nargs) {
 
 void LB::b_length(int nargs) {
 	Datum d = g_lingo->pop();
+	if (d.type == REFERENCE)
+		d.toString();
 
 	if (d.type != STRING)
 		error("Incorrect type for 'length' function: %s", d.type2str());
-- 
cgit v1.2.3