[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/poke 224e283c86 27/76: poke.el: transmit flags in a str
From: |
ELPA Syncer |
Subject: |
[elpa] externals/poke 224e283c86 27/76: poke.el: transmit flags in a string to poke-ios-open |
Date: |
Tue, 5 Apr 2022 14:59:34 -0400 (EDT) |
branch: externals/poke
commit 224e283c864afb1609adc1ee84f22d50cd7e66c2
Author: Jose E. Marchesi <jose.marchesi@oracle.com>
Commit: Jose E. Marchesi <jose.marchesi@oracle.com>
poke.el: transmit flags in a string to poke-ios-open
---
poke.el | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/poke.el b/poke.el
index f5a6028adb..a5a234ed01 100644
--- a/poke.el
+++ b/poke.el
@@ -712,7 +712,7 @@ fun plet_elval = (string s) void:
;; XXX interpret flags.
(list ios-id (vector (number-to-string ios-id)
ios-handler
- (number-to-string ios-flags)
+ ios-flags
(concat (number-to-string
ios-size) "#B")))))
poke-ios-alist)))
(setq tabulated-list-format headers)
@@ -742,8 +742,13 @@ fun poke_el_banner = void:
fun poke_el_ios_open = (int<32> ios) void:
{
- var cmd = format (\"(poke-ios-open %i32d %v %u64d %u64d)\",
- ios, iohandler (ios), ioflags (ios), iosize (ios)/#B);
+ var flags = ioflags (ios);
+ var flags_str = \"\";
+
+ flags_str += flags & IOS_F_READ ? \"r\" : \" \";
+ flags_str += flags & IOS_F_WRITE ? \"w\" : \" \";
+ var cmd = format (\"(poke-ios-open %i32d %v \\\"%s\\\" %u64d)\",
+ ios, iohandler (ios), flags_str, iosize (ios)/#B);
plet_elval (cmd);
}
- [elpa] externals/poke 72c5ec9ba3 10/76: poke.el: new function `quit', (continued)
- [elpa] externals/poke 72c5ec9ba3 10/76: poke.el: new function `quit', ELPA Syncer, 2022/04/05
- [elpa] externals/poke d9e55b8d64 03/76: poke.el: several fixes, ELPA Syncer, 2022/04/05
- [elpa] externals/poke e85c5fdcea 08/76: poke.el: accummulate output in poke-vu, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 4e7d779635 13/76: poke.el: convert poke-vu to new infrastructure, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 157431f80e 15/76: emacs.el: remove global state from poke-out, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 7851b82ef7 19/76: poke.el: require subr-ex, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 7bca885bb1 20/76: poke.el: use hooks ios_open_hook and ios_close_hook, ELPA Syncer, 2022/04/05
- [elpa] externals/poke f457341424 22/76: poke.el: command for setting the current IOS in the poke-ios, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 923ec644ba 24/76: poke.el: add size to poke-ios, ELPA Syncer, 2022/04/05
- [elpa] externals/poke e71f9cea1a 26/76: pkl: immutable declarations in compiler bootstrapping, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 224e283c86 27/76: poke.el: transmit flags in a string to poke-ios-open,
ELPA Syncer <=
- [elpa] externals/poke 2e6411d56a 29/76: poke.el: improvs, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 84ae4121b9 30/76: poke.el: get unibyte strings in pokelet processes, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 4743725592 34/76: poke.el: poke-code send command, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 14a8f278b1 37/76: poke.el: poke-settings buffer, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 0c410f656e 39/76: poke.el: factor settings code a bit, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 468f631988 43/76: poke.el: editor with values, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 47a7d4f84d 46/76: poke.el: window placement improvements, ELPA Syncer, 2022/04/05
- [elpa] externals/poke bb294de5b3 52/76: poke.el: select a line when creating IOS menu, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 66fb149542 56/76: poke.el: command C-cV in repl to refresh the VU, ELPA Syncer, 2022/04/05
- [elpa] externals/poke 902b4dd575 59/76: poke.el: docstrings, ELPA Syncer, 2022/04/05