@JavaType "org.simantics.scl.compiler.module.debug.SymbolReference"
data SymbolReference =
@JavaType "org.simantics.scl.compiler.module.debug.SymbolReference"
@FieldNames [referred, referrer, referenceLocation]
@JavaType "org.simantics.scl.compiler.module.debug.SymbolReference"
data SymbolReference =
@JavaType "org.simantics.scl.compiler.module.debug.SymbolReference"
@FieldNames [referred, referrer, referenceLocation]
whoCalls :: String -> String -> <Proc> [(String, String, Long)]
whoCalls moduleName valueName =
whoCalls :: String -> String -> <Proc> [(String, String, Long)]
whoCalls moduleName valueName =
| callerModuleName <- sclModuleNames
, Just callerModule = moduleByName callerModuleName
, Just debugInfo = debugInfo callerModule
| callerModuleName <- sclModuleNames
, Just callerModule = moduleByName callerModuleName
, Just debugInfo = debugInfo callerModule