src/method-impl.lisp: There's a handy definition `c-type-void', so use it.
[sod] / src / method-impl.lisp
index 3fd6f08..8de19da 100644 (file)
 
       ;; Generate the method body.  We'll work out what to do with it later.
       (codegen-push codegen)
-      (let* ((result (if (eq return-type (c-type void)) nil
+      (let* ((result (if (eq return-type c-type-void) nil
                         (temporary-var codegen return-type)))
             (emf-target (or result :void)))
        (compute-effective-method-body method codegen emf-target)