Allow IsManagedType intrinsic to accept values

Previously it only accepted type references.

Author: cirras

CHANGELOG.md

@@ -7,6 +7,10 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ## [Unreleased]
 
+### Fixed
+
+- The `IsManagedType` intrinsic would only accept type references - it now accepts values.
+
 ## [1.16.0] - 2025-05-09
 
 ### Added

delphi-frontend/src/main/java/au/com/integradev/delphi/type/intrinsic/IntrinsicsInjector.java

@@ -243,7 +243,7 @@ private void buildRoutines() {
         .varParam(LIKE_DYNAMIC_ARRAY)
         .param(dynamicArraySizeType());
     routine("IsConstValue").param(TypeFactory.untypedType()).returns(type(BOOLEAN));
-    routine("IsManagedType").param(ANY_CLASS_REFERENCE).returns(type(BOOLEAN));
+    routine("IsManagedType").param(TypeFactory.untypedType()).returns(type(BOOLEAN));
     routine("Length").param(type(SHORTSTRING)).returns(IntrinsicReturnType.length(typeFactory));
     routine("Length").param(type(ANSISTRING)).returns(IntrinsicReturnType.length(typeFactory));
     routine("Length").param(type(UNICODESTRING)).returns(IntrinsicReturnType.length(typeFactory));