使用 GNU dc 更改为水平堆栈显示？

【问题标题】：Changing to a horizontal stack display with GNU dc?使用 GNU dc 更改为水平堆栈显示？
【发布时间】：2018-08-18 14:02:22
【问题描述】：

GNU DC 垂直显示堆栈，（f 显示堆栈）

1 2 3 4
f  # to display the stack
4
3
2
1

有没有办法让它更像 FORTH？而 GNU FORTH 水平显示堆栈，（.s 显示堆栈）

1 2 3 4  ok
.s <4> 1 2 3 4  ok

【问题讨论】：

我不这么认为
你为什么要这样做？ dc 按它的方式工作。我想你可以找到源并更改它。但是，为什么您要解决的问题很重要或很全面？
如果需要，您可以随时重新定义f。

标签： forth dc

【解决方案1】：

您可以在 ~/.dcrc 中创建自定义函数，每次 dc 启动时都会读取该函数。

猫 ~/.dcrc

[
# if the stack is empty
[ 2 + [stack empty] p 0 :- Q ]s-
z d 0 =- 0 :-
# keep the stack in indexed array -
[ z :- z 0 <- ]s-
l-x
# restore the stack
[ 0 ;- 1 + d ;- ;- r d ;- 1 + r :- 0 ;- d 1 + ;- r !<- ]s-
1 0 ;- 1 + :-
l-x
# displays the stack horizontally
[ 0 ;- d 1 + d ;- ;- n [ ] n d d ;- 1 + r :- ;- !>- ]s-
1 0 ;- 1 + :- l-x [ ok] p 0 :-
]s-

你这样称呼它：

echo '7 16 8 9' | dc -f - -e 'l-x f'

你会得到：

7 16 8 9  ok
9
8
16
7

你不能使用注册 -

【讨论】：