"{ Package: 'jv:dragonfly/asm' }"

"{ NameSpace: Smalltalk }"

AJStackInstruction subclass:#AJCallCleanup
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'AsmJit-StackManagement'
!

!AJCallCleanup methodsFor:'accessing'!

name
    ^ 'call cleanup'
! !

!AJCallCleanup methodsFor:'function calls'!

prepareCallAlignments

    callInfo callCleanup: self
! !

!AJCallCleanup methodsFor:'visitor'!

accept: anObject
    ^ anObject visitCallCleanup: self
! !