From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: jao Newsgroups: gmane.comp.gnu.mdk.bugs,gmane.emacs.bugs Subject: Synchronising mixal-mode with GNU MDK's latest release Date: Fri, 16 Oct 2020 19:13:38 +0100 Message-ID: <87eelyujhp.fsf@gnus.jao.io> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="19433"; mail-complaints-to="usenet@ciao.gmane.io" Cc: bug-mdk@gnu.org, Stefan Kangas To: bug-gnu-emacs@gnu.org Original-X-From: bug-mdk-bounces+gnu-bug-mdk=m.gmane-mx.org@gnu.org Fri Oct 16 20:13:48 2020 Return-path: Envelope-to: gnu-bug-mdk@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1kTUEd-0004v4-Ap for gnu-bug-mdk@m.gmane-mx.org; Fri, 16 Oct 2020 20:13:47 +0200 Original-Received: from localhost ([::1]:56772 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kTUEc-0003NF-DA for gnu-bug-mdk@m.gmane-mx.org; Fri, 16 Oct 2020 14:13:46 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:49444) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kTUEY-0003Lg-3Z; Fri, 16 Oct 2020 14:13:42 -0400 Original-Received: from fencepost.gnu.org ([2001:470:142:3::e]:38958) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kTUEX-0006pe-PT; Fri, 16 Oct 2020 14:13:41 -0400 Original-Received: from cpc103058-sgyl39-2-0-cust254.18-2.cable.virginm.net ([94.173.216.255]:39262 helo=osgiliath.local) by fencepost.gnu.org with esmtpsa (TLS1.2:DHE_RSA_AES_256_CBC_SHA256:256) (Exim 4.82) (envelope-from ) id 1kTUEX-0007nP-AB; Fri, 16 Oct 2020 14:13:41 -0400 Original-Received: by osgiliath.local (Postfix, from userid 1000) id E9A954028F; Fri, 16 Oct 2020 19:13:38 +0100 (BST) X-Attribution: jao X-Clacks-Overhead: GNU Terry Pratchett X-URL: X-BeenThere: bug-mdk@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: MIX Development Kit bug list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-mdk-bounces+gnu-bug-mdk=m.gmane-mx.org@gnu.org Original-Sender: "bug-mdk" Xref: news.gmane.io gmane.comp.gnu.mdk.bugs:470 gmane.emacs.bugs:190731 Archived-At: --=-=-= Content-Type: text/plain Tags: patch thanks Please find attached a patch that updates mixal-mode.el with latest changes in GNU MDK. I should have papers in place for emacs. Do you think it'd be better if i just dropped that file from MDK's tarball and maintain it by submitting patches here instead? Thanks a lot! jao In GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, cairo version 1.16.0) of 2020-10-16 built on osgiliath Repository revision: 6a2f56db4e602372e33f35326a73cffa03586479 Repository branch: master Windowing system distributor 'The X.Org Foundation', version 11.0.12009000 System Description: Debian GNU/Linux bullseye/sid Configured using: 'configure --prefix=/usr/local/stow/emacs --with-x-toolkit=no --with-imagemagick' --=-=-= Content-Type: text/patch Content-Disposition: attachment; filename=0001-mixal-mode-add-missed-instructions.patch >From 5bc3fbf661b895e665f7a07eb5b43d25bad83ad1 Mon Sep 17 00:00:00 2001 From: "Jose A. Ortega Ruiz" Date: Fri, 16 Oct 2020 18:56:46 +0100 Subject: [PATCH] mixal-mode: add missed instructions Synchronises with latest released GNU MDK 1.2.11 * mixal-mode.el (mixal-operation-codes-alist): Add missed instructions: SLB,SRB,JAE,JAO,JXE,JXO --- lisp/progmodes/mixal-mode.el | 42 ++++++++++++++++++++++++++++++++---- 1 file changed, 38 insertions(+), 4 deletions(-) diff --git a/lisp/progmodes/mixal-mode.el b/lisp/progmodes/mixal-mode.el index 468c116b67..9354af2085 100644 --- a/lisp/progmodes/mixal-mode.el +++ b/lisp/progmodes/mixal-mode.el @@ -5,7 +5,7 @@ ;; Author: Pieter E.J. Pareit ;; Maintainer: emacs-devel@gnu.org ;; Created: 09 Nov 2002 -;; Version: 0.1 +;; Version: 0.4 ;; Keywords: languages, Knuth, mix, mixal, asm, mixvm, The Art Of Computer Programming ;; This file is part of GNU Emacs. @@ -45,6 +45,9 @@ ;; Have fun. ;;; History: +;; Version 0.4: +;; 16/10/20: Jose A Ortega Ruiz +;; Add missed instructions: SLB,SRB,JAE,JAO,JXE,JXO ;; Version 0.3: ;; 12/10/05: Stefan Monnier ;; Use font-lock-syntactic-keywords to detect/mark comments. @@ -683,6 +686,18 @@ mixal-operation-codes-alist been executed when there was no jump." 1) + (JAE jump "jump A even" 40 + "Jump if the content of rA is even. +Register J is set to the value of the next instruction that would have +been executed when there was no jump." + 1) + + (JAO jump "jump A odd" 40 + "Jump if the content of rA is odd. +Register J is set to the value of the next instruction that would have +been executed when there was no jump." + 1) + (JXN jump "jump X negative" 47 "Jump if the content of rX is negative. Register J is set to the value of the next instruction that would have @@ -719,12 +734,24 @@ mixal-operation-codes-alist been executed when there was no jump." 1) - (J1N jump "jump I1 negative" 41 - "Jump if the content of rI1 is negative. + (JXE jump "jump X even" 47 + "Jump if the content of rX is even. +Register J is set to the value of the next instruction that would have +been executed when there was no jump." + 1) + + (JXO jump "jump X odd" 47 + "Jump if the content of rX is odd. Register J is set to the value of the next instruction that would have been executed when there was no jump." 1) + (J1N jump "jump I1 negative" 41 + "Jump if the content of rI1 is negative. +Register J is set to the value of the next instruction that would have +been executed when there was no jump." + 1) + (J1Z jump "jump I1 zero" 41 "Jump if the content of rI1 is zero. Register J is set to the value of the next instruction that would have @@ -950,7 +977,6 @@ mixal-operation-codes-alist Zeros will be added to the right." 2) - (SRAX miscellaneous "shift right AX" 6 "Shift AX, M bytes right. Zeros will be added to the left." @@ -966,6 +992,14 @@ mixal-operation-codes-alist The bytes that fall off to the right will be added to the left." 2) + (SLB miscellaneous "shift left AX binary" 6 + "Shift AX, M binary places left." + 2) + + (SRB miscellaneous "shift right AX binary" 6 + "Shift AX, M binary places right." + 2) + (MOVE miscellaneous "move" 7 number "Move MOD words from M to the location stored in rI1." (+ 1 (* 2 number))) -- 2.28.0 --=-=-= Content-Type: text/plain -- They are ill discoverers that think there is no land, when they can see nothing but sea. -Francis Bacon, philosopher (1561-1626) --=-=-=--