#lang scheme (require "expandify.ss" "get-xs.ss") (expandify (get-two-ys)) ; => ((20 20)) (expandify (get-two-xs)) ; => ((10 10)) (expandify (syntax/loc #'3 3)) ; => (#'3)