;;;----- 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 (gethash value *module-type-map*)
+ (gethash value *declspec-map*)
+ (error "Unknown type `~A'." value)))
+
;;;--------------------------------------------------------------------------
;;; Property sets.