Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
19 lines (14 sloc) 515 Bytes
#|
This file is a part of Modularize-Interfaces
(c) 2014 Shirakumo http://tymoon.eu (shinmera@tymoon.eu)
Author: Nicolas Hafner <shinmera@tymoon.eu>
|#
(in-package #:modularize-user)
(define-module #:interfaces-test-implementation
(:use #:cl #:interfaces)
(:export #:greet)
(:implements #:interfaces-test-interface))
(in-package #:interfaces-test-implementation)
(i-defun interfaces-test-interface:greet (&optional name)
(format T "~&Hello, ~a!~%" (or name "you")))
(interfaces-test-interface:greet)