From 05e895773206ab89a543c897a8973af7770cb765 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Sun, 4 Aug 2019 08:27:21 -0700 Subject: [PATCH] windows.uniscribe: re-commit the &dispose removal. --- basis/windows/uniscribe/uniscribe.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/windows/uniscribe/uniscribe.factor b/basis/windows/uniscribe/uniscribe.factor index 1f609246a5..252163e332 100644 --- a/basis/windows/uniscribe/uniscribe.factor +++ b/basis/windows/uniscribe/uniscribe.factor @@ -18,7 +18,7 @@ CONSTANT: ssa-dwFlags flags{ SSA_GLYPHS SSA_FALLBACK SSA_TAB } :: >codepoint-index ( str utf16-index -- codepoint-index ) 0 utf16-index 2 * str utf16n encode subseq utf16n decode length ; - + :: >utf16-index ( str codepoint-index -- utf16-index ) 0 codepoint-index str subseq utf16n encode length 2 / >integer ; @@ -169,5 +169,5 @@ SYMBOL: cached-script-strings ] with-memory-dc ] unless image>> ; -[ &dispose cached-script-strings set-global ] +[ cached-script-strings set-global ] "windows.uniscribe" add-startup-hook -- 2.34.1