petrolifero

SeqFromAVL(avl)
{
  if (empty(avl))
  {
    return []
  }
  else
  {
    left = SeqFromAVL(avl->left)
    right = SeqFromAVL(avl->right)

petrolifero

pipeline
{
    agent any;
    parameters
    {
        choice(name: 'resolution', choices: ['a', 'b'], description: '')
        booleanParam(name: 'debug', defaultValue: true, description: '')
    }
    stages
    {

petrolifero

#lang racket
; Implementations and examples are inspired by Matt Might's blog posts:
; http://matt.might.net/articles/programming-with-continuations--exceptions-backtracking-search-threads-generators-coroutines/
; Note I didn't just copy the code. I implemented it independently, so it looks a lot different from Matt's code.

(define (current-continuation)
  (call/cc (lambda (k)
             (k k))))

(define (exception)