There is gls package  https://github.com/Kalimehtar/gls/tree/master

It is even more generic (you may use any predicate as a `type')

Your case is 

#lang racket
(require gls)
(defgeneric dup)
(add-method dup 
  (method ((a string?))
     (string-append a a)))
(add-method dup 
   (method ((a exact-integer?))
      (list a a))) For more CL-like approach (with defmethod, type-of and so 
on) you may use `swindle' (package or language).



Wed, 02 Apr 2014 20:53:58 +0200 от Alejandro Zamora Fonseca <ter...@ltu.sld.cu>:
>Hello everybody!
>
>I have a newbie question.
>
>¿How can I create generic-functions in Racket?
>
>Something like
>this samples in CL:
>
>(defmethod dup ((a string))
>      (concatenate 'string a a))
>
>(defmethod dup ((a integer))
>       (list a a))
>
>Cheers,
>
>    Alejandro
>
>
>--
>
>Este mensaje le ha llegado mediante el servicio de correo electronico que 
>ofrece Infomed para respaldar el cumplimiento de las misiones del Sistema 
>Nacional de Salud. La persona que envia este correo asume el compromiso de 
>usar el servicio a tales fines y cumplir con las regulaciones establecidas
>
>Infomed:  http://www.sld.cu/
>
>____________________
>  Racket Users list:
>   http://lists.racket-lang.org/users
>


-- 
Roman Klochkov
____________________
  Racket Users list:
  http://lists.racket-lang.org/users

Reply via email to