Skip to content

Instantly share code, notes, and snippets.

View keenbug's full-sized avatar

Daniel Krüger keenbug

  • region Karlsruhe/Heidelberg, Germany
View GitHub Profile
@keenbug
keenbug / homs.scm
Created March 9, 2012 16:12 — forked from ijp/homs.scm
added fast and dirty import
;;; higher order modules for guile
(define-syntax-parameter provide ; an "export" for `module' forms
(lambda (stx)
(syntax-violation 'provide "provide used outside a module form" stx)))
(define-syntax module
(lambda (stx)
(syntax-case stx (import)
((module (import lib libs ...) (params ...) body ...)
#lang racket
(require plot)
(plot (line sin)
#:x-min (- pi)
#:x-max pi
#:title "y = sin(x)")