;;;----- Licensing notice ---------------------------------------------------
;;;
-;;; This file is part of the Sensble Object Design, an object system for C.
+;;; This file is part of the Sensible Object Design, an object system for C.
;;;
;;; SOD is free software; you can redistribute it and/or modify
;;; it under the terms of the GNU General Public License as published by
((value symbol) (type (eql :symbol)) (wanted (eql :id)))
(frob-identifier (symbol-name value)))
+;;; Types.
+
+(defmethod coerce-property-value
+ ((value string) (type (eql :id)) (wanted (eql :type)))
+ (or (and (boundp '*module-type-map*)
+ (gethash value *module-type-map*))
+ (find-simple-c-type value)
+ (error "Unknown type `~A'" value)))
+
;;;--------------------------------------------------------------------------
;;; Property sets.