From dec1ebfa4f2ab67419e8f6827e4913944cc97ee9 Mon Sep 17 00:00:00 2001
From: Adam Sampson <ats@offog.org>
Date: Sat, 29 Aug 2020 03:51:09 +0100
Subject: [PATCH] XUNAME is a builtin in Muddle 56.

---
 src/lcf/{rooms.394 => rooms.395} | 11 -----------
 1 file changed, 11 deletions(-)
 rename src/lcf/{rooms.394 => rooms.395} (99%)

diff --git a/src/lcf/rooms.394 b/src/lcf/rooms.395
similarity index 99%
rename from src/lcf/rooms.394
rename to src/lcf/rooms.395
index e040a813..803ee124 100644
--- a/src/lcf/rooms.394
+++ b/src/lcf/rooms.395
@@ -118,17 +118,6 @@
 
 <OFF ,GC-HAND>
 
-<DEFINE XUNAME ()
-  #DECL ((VALUE) STRING)
-  <MAPF ,STRING
-	<FUNCTION (X)
-	   #DECL ((X) CHARACTER)
-	   <COND (<OR <0? <ASCII .X>>
-		      <==? <ASCII .X> 32>>
-		  <MAPSTOP>)
-		 (T .X)>>
-	<GXUNAME>>>
-
 <DEFINE ITS-GET-NAME (UNAME "AUX" (NM <LSR-ENTRY .UNAME>) CMA JR LFST LLST
 		      TLEN TSTR STR)
 	#DECL ((STR TSTR UNAME) STRING (NM CMA JR) <OR STRING FALSE>