justinethier / husk-scheme

A full implementation of the Scheme programming language for the Haskell Platform.
http://justinethier.github.io/husk-scheme
MIT License
309 stars 28 forks source link

Hardcoded quote #210

Open SaitoAtsushi opened 8 years ago

SaitoAtsushi commented 8 years ago

Non Imported name does not have special meaning.

I expect that following program print 2. But Husk print 1.

(import (except (scheme base) quote)
        (scheme write))

(define (quote x)
  (+ x 1))

(display (quote 1))