From 78e6d003bb262eabd953b0f23bf146d2ba706eda Mon Sep 17 00:00:00 2001
From: Gareth Rees <gdr@ravenbrook.com>
Date: Thu, 14 Jun 2018 16:58:24 +0100
Subject: [PATCH] Fix ansi build.

Copied from Perforce
 Change: 193769
---
 mps/code/lockan.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mps/code/lockan.c b/mps/code/lockan.c
index 1c75024fda4..c832032efc7 100644
--- a/mps/code/lockan.c
+++ b/mps/code/lockan.c
@@ -110,8 +110,8 @@ void LockInitGlobal(void)
 {
   globalLock->claims = 0;
   LockInit(globalLock);
-  globalRecursiveLock->claims = 0;
-  LockInit(globalRecursiveLock);
+  globalRecLock->claims = 0;
+  LockInit(globalRecLock);
 }
 
 void (LockClaimGlobalRecursive)(void)