diff --git a/basis/alien/c-types/c-types.factor b/basis/alien/c-types/c-types.factor
index 123abb5298..02ab2dcafa 100755
--- a/basis/alien/c-types/c-types.factor
+++ b/basis/alien/c-types/c-types.factor
@@ -79,11 +79,9 @@ M: string c-type ( name -- type )
     CHAR: ] over member? [
         parse-array-type prefix
     ] [
-        dup c-types get at [
-            resolve-typedef
-        ] [
+        dup c-types get at [ ] [
             "*" ?tail [ resolve-pointer-type ] [ no-c-type ] if
-        ] ?if
+        ] ?if resolve-typedef
     ] if ;
 
 M: word c-type