https://sources.debian.org/data/main/p/picprog/1.9.1-3/debian/patches/20_iopl.patch

Description: Avoid some functions in some architectures
 Upstream uses iopl() function and other architecture-dependent
 codes. This patch adds building switches to avoid them in
 some architectures.
Author: Koichi Akabe <vbkaisetsu@gmail.com>
Last-Update: 2011-11-30

--- picprog-1.9.1.orig/picport.cc
+++ picprog-1.9.1/picport.cc
@@ -38,7 +38,12 @@
 #include <ctime>
 
 #include <sys/ioctl.h>
-#include <sys/io.h>
+
+#if defined(__i386__) || defined(__x86_64__)
+  #include <sys/io.h>
+  #define HAVE_IOPL
+#endif
+
 #include <fcntl.h>
 #include <sys/time.h>
 #include <unistd.h>
@@ -160,8 +165,12 @@
     // Not root.  Cannot use realtime scheduling.
     use_nanosleep = 0;
   }
+#ifdef HAVE_IOPL
   if (iopl (3))
     disable_interrupts = 0;
+#else
+  disable_interrupts = 0;
+#endif
 
 #ifdef CPU_SETSIZE
   // When computing the delay loops, we do not want the cp</td></tr></table>
<table class='tabs'><tr><td>
<a href='/guix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>refs</a><a class='active' href='/guix/log/tests/sets.scm'>log</a><a href='/guix/tree/tests/sets.scm?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>tree</a><a href='/guix/commit/tests/sets.scm?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>commit</a><a href='/guix/diff/tests/sets.scm?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/sets.scm'>
<input type='hidden' name='id' value='13a4368b46e57d25c6a1804733337c4e26fe99fe'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>root</a>/<a href='/guix/log/tests?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>tests</a>/<a href='/guix/log/tests/sets.scm?id=13a4368b46e57d25c6a1804733337c4e26fe99fe'>sets.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/sets.scm?id=13a4368b46e57d25c6a1804733337c4e26fe99fe&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
ge (<a href='/guix/log/tests/git.scm?id=0ce685c65f226f23ce4ca2cc49d7b745b74ea5c7'>Collapse</a>)</th><th class='left'>Author</th></tr>
<tr class='logheader'><td><span title='2020-06-09 00:34:52 +0200'>2020-06-09</span></td><td class='logsubject'><a href='/guix/commit/tests/git.scm?id=72357e2170e88f73c11ff089f87a744cee8606ec'>git: 'commit-difference' really excludes the ancestors of #:excluded.</a></td><td>Ludovic Courtès</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
* guix/git.scm (commit-difference): Initialize VISITED to the closure of
OLD and EXCLUDED, as written in the docstring.
* tests/git.scm ("commit-difference, excluded commits"): Adjust
accordingly.


</td></tr>
<tr class='logheader'><td><span title='2020-05-25 00:00:28 +0200'>2020-05-25</span></td><td class='logsubject'><a href='/guix/commit/tests/git.scm?id=c098c11be8eb9e0c12be42640721e3cb21c37628'>git: Add 'commit-relation'.</a></td><td>Ludovic Courtès</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
* guix/git.scm (commit-relation): New procedure.
* tests/git.scm ("commit-relation"): New test.


</td></tr>
<tr class='logheader'><td><span title='2019-12-27 13:52:49 +0100'>2019-12-27</span></td><td class='logsubject'><a href='/guix/commit/tests/git.scm?id=785af04a7574867dc940c791daa938a2432d0450'>git: 'commit-difference' takes a list of excluded commits.</a></td><td>Ludovic Courtès</td></tr>
<tr class='nohover-highlight'><td/><td colspan='3' class='logmsg'>
* guix/git.scm (commit-closure): Add 'visited' optional parameter.
(commit-difference): Add 'excluded' optional parameter; pass second
argument to 'commit-closure'.
* tests/git.scm ("commit-difference, excluded commits"): New test.


</td></tr>