add missing methods (needed to handle callbacks)

jecisc · Oct 10, 2019 · 2eb6b0e · 2eb6b0e
1 parent 7ade1e1
commit 2eb6b0e
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 1 deletion.
diff --git a/src/UnifiedFFI/FFIFunctionArgument.class.st b/src/UnifiedFFI/FFIFunctionArgument.class.st
@@ -15,6 +15,12 @@ FFIFunctionArgument >> asOldArraySpec [
 	self subclassResponsibility
 ]
 
+{ #category : #accessing }
+FFIFunctionArgument >> defaultReturnOnError [
+
+	^ self resolvedType defaultReturnOnError
+]
+
 { #category : #resolution }
 FFIFunctionArgument >> emitReturnArgument: anIRBuilder context: aContext [
 

diff --git a/src/UnifiedFFI/FFITypeDeclaration.class.st b/src/UnifiedFFI/FFITypeDeclaration.class.st
@@ -38,13 +38,19 @@ FFITypeDeclaration >> asOldArraySpec [
 	^ { name . arity }
 ]
 
+{ #category : #accessing }
+FFITypeDeclaration >> defaultReturnOnError [
+
+	^ self resolvedType defaultReturnOnError
+]
+
 { #category : #'emitting code' }
 FFITypeDeclaration >> emitReturn: anIRBuilder resultTempVar: aString context: aContext [
 
 	^ resolvedType emitReturn: anIRBuilder resultTempVar: aString context: aContext
 ]
 
-{ #category : #'as yet unclassified' }
+{ #category : #accessing }
 FFITypeDeclaration >> externalTypeWithArity [
 
 	^ resolvedType externalTypeWithArity