#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Tue, 06 Feb 2018 20:26:29 +0100
changeset 4215 f09ab48915cc
parent 4214 dc215f1e6323
child 4216 47e3ba508648
#FEATURE by cg class: Parser::PrimitiveSpecParser changed: #typeMappingFor: +voidFunctionPointer
Parser.st
--- a/Parser.st	Mon Feb 05 19:31:31 2018 +0100
+++ b/Parser.st	Tue Feb 06 20:26:29 2018 +0100
@@ -12597,7 +12597,11 @@
         (SWORD           int16          )
         (LPSTR           charPointer    )
         (HANDLE          voidPointer    )
-        (HRESULT         hresult         )
+        (HRESULT         hresult        )
+        (CALLBACK        voidFunctionPointer )
+        (voidFunc        voidFunctionPointer )
+        (funcPtr         voidFunctionPointer )
+        (functionPtr     voidFunctionPointer )
     ) detect:[:p | p first = aTypeSymbol] ifNone:nil.
 
     e notNil ifTrue:[ ^ e second ].