This page showcases the progress of an early Scheme-to-Javascript translator.

Simple clock structure and corresponding function in Scheme:

(define-struct clock (hours mins secs)) (define (tick a) (make-clock (cond [(or (< (clock-secs a) 59) (< (clock-mins a) 59))(clock-hours a)] [else (remainder (+ (clock-hours a) 1) 24)]) (cond [(< (clock-secs a) 59) (clock-mins a)] [else (remainder (+ (clock-mins a) 1) 60)]) (remainder (+ (clock-secs a) 1) 60)))
Generated Javascript code:
function make_clock(hours, mins, secs, other) { if (other == undefined) return function() { return new make_clock(hours, mins, secs, 1); }; this.hours = hours; this.mins = mins; this.secs = secs; this._type = "clock"; } function clock_hours(struct) { return struct().hours; } function clock_mins(struct) { return struct().mins; } function clock_secs(struct) { return struct().secs; } make_clock.prototype.equals = function(other) { other = other(); return ((this.hours().equals(other.hours)) && (this.mins().equals(other.mins)) && (this.secs().equals(other.secs))); } function tick (a) { return function() { return new make_clock(cond_scheme([or_scheme(less_than(clock_secs(a), new scheme_number(59,1)), less_than(clock_mins(a), new scheme_number(59,1))), clock_hours(a)], [create_func(true), remainder(add(clock_hours(a), new scheme_number(1,1)), new scheme_number(24,1))]), cond_scheme([less_than(clock_secs(a), new scheme_number(59,1)), clock_mins(a)], [create_func(true), remainder(add(clock_mins(a), new scheme_number(1,1)), new scheme_number(60,1))]), remainder(add(clock_secs(a), new scheme_number(1,1)), new scheme_number(60,1)))(); }; }
Execute (tick (make-clock 11 59 59)).

Basic implementation of recursion:

(define (fib n) (if (equal? n 0) 0 (if (equal? n 1) 1 (+ (fib (- n 2)) (fib (- n 1))))))
Javascript code:
function fib (n) { return function() { return if_scheme(equal_pred(n, new scheme_number(0,1)), new scheme_number(1,1), if_scheme(equal_pred(n, new scheme_number(1,1)), new scheme_number(1,1), add(fib(sub(n, new scheme_number(2,1))), fib(sub(n, new scheme_number(1,1))))))(); }; }
(fib 5) (fib 15) (fib 25)

Various sources: Javascript to Scheme translator, Scheme test file