From 5344ca7cce72850e1b80fbe24ff23dc935676112 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Tue, 24 Mar 2020 20:50:54 +0100
Subject: [PATCH] (Kor) Add linrefs to V* cats

---
 src/korean/CatKor.gf   |   3 +++
 src/korean/ParamKor.gf | Bin 4482 -> 4513 bytes
 src/korean/ResKor.gf   |   2 ++
 3 files changed, 5 insertions(+)

diff --git a/src/korean/CatKor.gf b/src/korean/CatKor.gf
index 0038c46f8..4f5608bb5 100644
--- a/src/korean/CatKor.gf
+++ b/src/korean/CatKor.gf
@@ -117,4 +117,7 @@ concrete CatKor of Cat = CommonX ** open ResKor, Prelude in {
     N2 = ResKor.Noun2 ;
     N3 = ResKor.Noun3 ;
     PN = ResKor.PNoun ;
+
+linref
+  V, V2, V3, VP = linVerb ;
 }
diff --git a/src/korean/ParamKor.gf b/src/korean/ParamKor.gf
index 0eea49fd88b5a300eade5af5fc506f347a1bbcb2..8921172f2786597c88459cfb3b92a6faa27b0396 100644
GIT binary patch
delta 43
ycmZotUZ}jmpGPjgAhn1~K_MqIFU(EBRw2wyAs{~|vm{j^Air3_db1yo2`d08-3<!>

delta 12
TcmZ3e+@!q0pJ#I(k1;C%9UlYQ

diff --git a/src/korean/ResKor.gf b/src/korean/ResKor.gf
index 9d61d7fc5..d0d7c159e 100644
--- a/src/korean/ResKor.gf
+++ b/src/korean/ResKor.gf
@@ -248,4 +248,6 @@ oper
 --------------------------------------------------------------------------------
 -- linrefs
 
+linVerb : Verb -> Str = \v -> v.s ! linVF ;
+
 }