QPQ-AG/sophia
10
0
Fork 0
Code Issues 41 Pull Requests 5 Actions Packages Projects Releases 16 Wiki Activity

[......]

Browse Source 
Co-Authored-By: Ulf Norell <ulf.norell@gmail.com>
This commit is contained in:
Radosław Rowicki 2019-08-30 13:44:26 +02:00 committed by GitHub
parent 076d635dbe
commit 256aadd575
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
priv/stdlib/List.aes
View File

@ -57,7 +57,7 @@ namespace List =
_::t => length_(t, acc + 1)
function from_to(a : int, b : int) : list(int) = from_to_(a, b, [])
function from_to(a : int, b : int) : list(int) = [a..b]
private function from_to_(a, b, acc) =
if (a > b) acc else from_to_(a, b - 1, b :: acc)