version 1.2, 2025/03/10 00:38:15
|
version 1.3, 2025/03/22 03:39:23
|
Line 1
|
Line 1
|
%ZREVQRY ;V4W/DLW-REVERSE QUERY POLYFILL; 03/09/25 06:36 PM |
%ZREVQRY ;V4W/DLW-REVERSE QUERY POLYFILL; 03/21/25 09:36 PM |
;0.0;FreeM;****FREEM**;David Wicksell @2025 |
;0.0;FreeM;****FREEM**;David Wicksell @2025 |
; |
; |
; $Id$ |
; $Id$ |
Line 26
|
Line 26
|
; along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
; along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
; |
; |
; $Log$ |
; $Log$ |
|
; Revision 1.3 2025/03/22 03:39:23 snw |
|
; Fix reverse query polyfill call-in from C side and make NAME exprs silently truncate long names in obsolete MDC dialects |
|
; |
; Revision 1.2 2025/03/10 00:38:15 snw |
; Revision 1.2 2025/03/10 00:38:15 snw |
; Phase 3 of REUSE compliance and header reformatting |
; Phase 3 of REUSE compliance and header reformatting |
; |
; |
Line 33
|
Line 36
|
; SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC |
; SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC |
; SPDX-License-Identifier: AGPL-3.0-or-later |
; SPDX-License-Identifier: AGPL-3.0-or-later |
N RESULT,PREV |
N RESULT,PREV |
S RESULT=$$REVQUERY^%SYSPOLY(%INT.REVQ,.PREV) |
S RESULT=$$REVQUERY^%SYSPOLY(%INTREVQ,.PREV) |
K %INT.REVQ |
K %INTREVQ |
Q PREV |
Q PREV |