... 总而言之，理论就是这样，大家去实践吧，也没啥好讲的了...
就是字符流字符流字符流... 啊，一般都是用解析组合子好了

解析子程序的话怎么组织，一般都是传 lhs 和 lhs_precednece，当然只传 lhs 也是可以
我这个性能痴每次看到一个 char 一个 char 的处理甚至判断都想死... 感觉要慢炸了，其实那些自动生成的还应该反而慢一些呢...（何况那题解根本不可接受）

其实写代码调试的时候 大概也是可以看的出具体情况的，重要的是要写出来...

虽然可能没啥意思了... 也不是很成功

这个抄 Lua 的问题在于没有做到判断左右是否一致，Lua 给两边的都一个 (n, n-1) 实现了『同优先级』左右递归，这里的是错的... 我开始也给 rhsprec 加上了 !leftrec 的赠优先级，然后默认是左递归(+1) 开始没有写上，害得我以为我的思路是错了又瞎改...

关于计算表达式终止的问题，我就的确没有考虑到，也导致了这次我没有完全成功...

实际上，我不知道 infix chain 表达式应该何时终止，我以为其中也可以包含换行的，但那样就和 REPL 的『执行』键冲突了，其他语言语法上可能支持的原因是他们有对应的终结符（比如，Java 里二元表达式链肯定是在诸如函数调用参数的地方，而那些地方有对应终结符(Terminator)）

然后我写的语法树推导，就没有终结符... 我开始没有考虑到这个问题，之前的 BinOps 是正确处理了冲突的（表达式只能写在一行内）

有时候单单考虑一个知识点不难，难在 all together 而且还不能错...

正确的优先级和 infixl/r 处理

比如：lhs / rhs
infixl + = (2-1)-1 = 1 / infixr ^ = (1-1) = 0
最终右结合

infixl - = (1-1)-1 = 0 / infixl - = (1-1) = 1
最终左结合

infixr ^ = (1-0)-1 = -1 / infixr ^ = 1-1 = -1
最终右结合

关键在对 infixr 右边赠优先级的添加上，等号右边最终比左边高一个等级（把默认的 -1 infixl 赠优先级抵消了）
然后会进到下面 if (lhsprec < rhsprec) ... else 的 else branch 里

最终 不负泽抛弃的版本（

#acg #life 今天突然想到两首歌：《中华美食颂》和《投食歌》 🤔

噢 不 是 千年食谱颂

... 第一件对于这周的我有点硬核了，从 1 开始吧（

#sysadmin #linux #Haskell 灵魂 Shell 迫真堆砌... 这都能编程...
虽然最终的代码根本不能看，但这居然可以编程...

for i in `ldd /bin/pandoc |grep not|awk '{print $1}'`; do name=`echo $i | awk -F- '{print $1}'`; echo -e "Mapping $i (\e[35m$name\e[0m) to \\n \\e[34m" found=`find /usr/lib64/$name*`; printf "\e[0m"; [ "$found" == "" ] || sudo ln -s $found $i; done

for i in `ldd /bin/pandoc |grep not|awk '{print $1}'`; do name=`echo $i | awk -F- '{print $1}'`; found=`find /usr/lib64/$name* | head -n1`; echo -e "Mapping $i (\e[35m$name\e[0m) to \\n \\e[34m$found\\e[0m"; [ "$found" == "" ] || echo sudo ln -s $found /usr/lib64/$i; done

目前准确度很辣鸡，在修改

for i in `ldd /bin/pandoc |grep not|awk '{print $1}'`; do name=`echo $i | awk '{ gsub("-", "\n", $1); print $1 }' | grep -E '^[A-Za-z]*$' | xargs | sed 's/ /-/'`; found=`find /usr/lib64/$name* | head -n1`; echo -e "Mapping $i (\e[35m$name\e[0m) to \\n \\e[34m$found\\e[0m"; [ "$found" == "" ] || echo sudo ln -s $found /usr/lib64/$i; done

这个方法实在是太危险了...

#linux #sysadmin #Haskell

你那里 pandoc 可以用吗？

帮我转换个 HTML 文档到 Markdown 行不行...

这里修的万分淡疼、Bash、AWK、SED、Coreutils，我马上 perl 都要用上了，可是我已经花了一个小时了，干脆不要用 Pandoc 算了