From 162995e9a6cf56332038db4df43aa980d4e39db9 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 22 Feb 2023 08:06:49 -0600 Subject: [PATCH] compiler/vm: Allow words made of curry/compose to compile put back the `[ ] like` fixes #2763 --- basis/compiler/compiler.factor | 2 +- vm/code_heap.cpp | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/basis/compiler/compiler.factor b/basis/compiler/compiler.factor index 485a923d7c..c2a786412a 100644 --- a/basis/compiler/compiler.factor +++ b/basis/compiler/compiler.factor @@ -74,7 +74,7 @@ M: word combinator? inline? ; swap [ finish-compilation ] [ compiled get set-at ] bi return ; : not-compiled-def ( word error -- def ) - '[ _ _ not-compiled ] ; + '[ _ _ not-compiled ] [ ] like ; : deoptimize* ( word -- * ) dup def>> deoptimize-with ; diff --git a/vm/code_heap.cpp b/vm/code_heap.cpp index 77aa7ae287..686b0c7208 100644 --- a/vm/code_heap.cpp +++ b/vm/code_heap.cpp @@ -143,6 +143,7 @@ void factor_vm::primitive_modify_code_heap() { switch (data.type()) { case QUOTATION_TYPE: + case TUPLE_TYPE: // for curry/compose, see issue #2763 jit_compile_word(word.value(), data.value(), false); break; case ARRAY_TYPE: { -- 2.34.1