head	1.1;
access;
symbols
	pkgsrc-2026Q3:1.1.0.2
	pkgsrc-2026Q3-base:1.1;
locks; strict;
comment	@ * @;


1.1
date	2026.09.21.11.37.52;	author bouyer;	state Exp;
branches;
next	;
commitid	XjMVy697paXiWtWG;


desc
@@


1.1
log
@devel/openocd: fix build with jimtcl 0.84
@
text
@$NetBSD: patch-src_openocd.c,v 1.1 2025/04/06 10:07:06 adam Exp $

Fix build with jimtcl 0.84.

--- src/helper/command.c.orig	2026-09-20 23:24:01.082032876 +0200
+++ src/helper/command.c	2026-09-20 23:26:01.586476179 +0200
@@@@ -48,17 +48,18 @@@@
 /* set of functions to wrap jimtcl internal data */
 static inline bool jimcmd_is_proc(Jim_Cmd *cmd)
 {
-	return cmd->isproc;
+	return ((cmd->flags & JIM_CMD_ISPROC) != 0);
+
 }
 
 bool jimcmd_is_oocd_command(Jim_Cmd *cmd)
 {
-	return !cmd->isproc && cmd->u.native.cmdProc == jim_command_dispatch;
+	return !jimcmd_is_proc(cmd) && cmd->u.native.cmdProc == jim_command_dispatch;
 }
 
 void *jimcmd_privdata(Jim_Cmd *cmd)
 {
-	return cmd->isproc ? NULL : cmd->u.native.privData;
+	return jimcmd_is_proc(cmd) ? NULL : cmd->u.native.privData;
 }
 
 static void tcl_output(void *privData, const char *file, unsigned line,
@