From 0c09f8394149afdd7cca5908e08e2bb69971b50b Mon Sep 17 00:00:00 2001
From: David Robillard <d@drobilla.net>
Date: Thu, 27 Dec 2012 18:18:54 +0000
Subject: def-type => define-type

git-svn-id: http://svn.drobilla.net/resp/trunk@453 ad02d1e2-f140-0410-9f75-f8b11f17cedd
---
 test/match.scm | 2 +-
 test/quote.scm | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

(limited to 'test')

diff --git a/test/match.scm b/test/match.scm
index db19be1..0cf0efc 100644
--- a/test/match.scm
+++ b/test/match.scm
@@ -1,5 +1,5 @@
 ; A Shape is either a Circle (w/ radius) or a Rectangle (w/ width/height)
-(def-type (Shape)
+(define-type (Shape)
   (Circle Float)
   (Rectangle Float Float))
 
diff --git a/test/quote.scm b/test/quote.scm
index 4895d2e..817f812 100644
--- a/test/quote.scm
+++ b/test/quote.scm
@@ -1,10 +1,9 @@
-(def-type (Expr)
+(define-type (Expr)
   (Symbol Symbol)
   (Int Int)
   (List Expr Expr)
   (Empty))
 
-
 (define list (quote (2 a b c)))
 
 (define (len l)
-- 
cgit v1.2.1