This instance will be upgraded to Heptapod 0.17.2 on 2020-12-03 at 14:00 UTC+1 (a few minutes of down time)

Commit 85f605a2 authored by Jesse McGrew's avatar Jesse McGrew

Fixed a couple LIST-OBJECTS bugs.

parent 52f663a1fa42
......@@ -520,9 +520,9 @@ Returns:
<COND (<SET MAX <GETB .O 0>>
<DO (I 1 .MAX)
<SET J <GET/B .O .I>>
<COND (<OR <NOT .FILTER> <APPLY .FILTER .I>>
<COND (<0? .F> <SET F .I>)
(<0? .S> <SET S .I>)>
<COND (<OR <NOT .FILTER> <APPLY .FILTER .J>>
<COND (<0? .F> <SET F .J>)
(<0? .S> <SET S .J>)>
<SET N <+ .N 1>>)>>)>)
(ELSE
<MAP-CONTENTS (I .O)
......@@ -556,7 +556,7 @@ Returns:
<AND <BTST .FLAGS ,L-SUFFIX> <TELL " are">>)
(ELSE
<COND (<AND <BTST .FLAGS ,L-ISARE>
<BTST .FLAGS ,L-SUFFIX>>
<NOT <BTST .FLAGS ,L-SUFFIX>>>
<COND (<OR <NOT <BTST .FLAGS ,L-ISMANY>>
<FSET? .F ,PLURALBIT>>
<TELL "are ">)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment