phlopsi
phlopsi
/ ComplexTrampoline.ceylon
Created
September 17, 2017 08:56
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| import ceylon.collection { | |
| ArrayList, | |
| Stack | |
| } | |
| shared abstract class ComplexTrampoline<Type>() | |
| of ComplexReturn<Type> | ComplexCall<Type> { | |
| shared formal Type result; | |
| } |
phlopsi
/ Trampoline.ceylon
Last active
September 15, 2017 15:46
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /* Usage Example: | |
| Whole fibonacci(Whole n) { | |
| Trampoline<Whole> fibonacciHelper(Whole n) { | |
| if (n==zero || n==one) { | |
| return Return(n); | |
| } else { | |
| return Call<Whole>(() => fibonacciHelper(n - one), [[fibonacciHelper(n - two), Whole.plus]]); | |
| } | |
| } | |