diff options
Diffstat (limited to 'src/interp/define.boot')
| -rw-r--r-- | src/interp/define.boot | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot index 88ef628d..b607cd4b 100644 --- a/src/interp/define.boot +++ b/src/interp/define.boot @@ -1207,6 +1207,11 @@ compile u == else putInLocalDomainReferences optimizedBody $doNotCompileJustPrint=true => (PRETTYPRINT stuffToCompile; op') $macroIfTrue => constructMacro stuffToCompile + + -- Let the backend know about this function's type + if $insideCapsuleFunctionIfTrue and $optProclaim then + proclaimCapsuleFunction(op',$signatureOfForm) + result:= spadCompileOrSetq stuffToCompile functionStats:=[0,elapsedTime()] $functionStats:= addStats($functionStats,functionStats) |