summaryrefslogtreecommitdiff
path: root/t/t4018/scheme-class
diff options
context:
space:
mode:
Diffstat (limited to 't/t4018/scheme-class')
-rw-r--r--t/t4018/scheme-class7
1 files changed, 7 insertions, 0 deletions
diff --git a/t/t4018/scheme-class b/t/t4018/scheme-class
new file mode 100644
index 0000000..e5e07b4
--- /dev/null
+++ b/t/t4018/scheme-class
@@ -0,0 +1,7 @@
+(define book-class%
+ (class* () object% RIGHT
+ (field (pages 5))
+ (field (ChangeMe 5))
+ (define/public (letters)
+ (* pages 500))
+ (super-new)))