RosettaCodeData/Task/Inheritance-Single/Comal/inheritance-single-4.comal

10 lines
253 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
;;; ASN.1 serialization logic specialized for animal class
(defmethod serialize-to-asn-1 ((a animal))
#| ... |#
)
;;; casually introduce the method over strings too; no relation to animal
(defmethod serialize-to-asn-1 ((s string))
#| ... #|
)