From 2b66db1e02bc11de1b1efcf1ea8335b36e69f4fc Mon Sep 17 00:00:00 2001 From: drewc Date: Wed, 7 Jan 2009 18:34:08 -0800 Subject: [PATCH] Add LOL component Ignore-this: 90cb8901749f588f36b12703a3652d01 darcs-hash:20090108023408-39164-3242410a170c5738c33176b191a80eb79fdf144f.gz --- src/ucw/lol-components.lisp | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/ucw/lol-components.lisp diff --git a/src/ucw/lol-components.lisp b/src/ucw/lol-components.lisp new file mode 100644 index 0000000..3a502c4 --- /dev/null +++ b/src/ucw/lol-components.lisp @@ -0,0 +1,14 @@ +(in-package :lol-ucw) + +(defcomponent lol-component () + ()) + +(defmethod output-component ((self lol-component)) + self) + +(defmethod render ((self lol-component)) + (display (output-component self) self)) + + + + -- 2.20.1