- (is (eq (gtype "gint") (gtype "gint")))
- (is (eq (gtype "GObject") (gtype "GObject")))
- (is (not (eq (gtype "gint") (gtype "GObject"))))
- (is (eq (gtype "gchararray") (gtype +g-type-string+))))
+ (is (eq (%gtype "gint") (%gtype "gint")))
+ (is (eq (%gtype "GObject") (%gtype "GObject")))
+ (is (not (eq (%gtype "gint") (%gtype "GObject"))))
+ (is (eq (%gtype "gchararray") (%gtype +g-type-string+))))