#525521619

Committed 08 Jul 2025 03:15PM UTC coverage: 82.357% (-0.03%) from 82.387%

Build # #525521619

Build Type

push

github

Committed by

hurricup

Commit Message

#2842 Migrated do expression to the stub serializing factory

Run Details

15 of 16 new or added lines in 5 files covered. (93.75%)

19 existing lines in 8 files now uncovered.

30907 of 37528 relevant lines covered (82.36%)

0.82 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

83.33

/plugin/backend/src/main/java/com/perl5/lang/perl/psi/PerlGlobVariable.java

/*
 * Copyright 2015-2025 Alexandr Evstigneev
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

package com.perl5.lang.perl.psi;

import com.perl5.lang.perl.util.PerlPackageUtil;
import org.jetbrains.annotations.Nullable;

public interface PerlGlobVariable extends PerlCallable {
  /**
   * Checks if this typeglob is left part of assignment
   *
   * @return result
   */
  boolean isLeftSideOfAssignment();

  @Nullable String getGlobName();

  @Override
  default String getCallableName() {
    return getGlobName();
  }

  @Override
  default boolean isDeprecated() { return false; }

  /**
   * Returns canonical name PackageName::SubName
   *
   * @return name
   */
  @Override
  default String getCanonicalName() {
    String packageName = getNamespaceName();
    if (packageName == null) {
      return null;
    }

    return packageName + PerlPackageUtil.NAMESPACE_SEPARATOR + getGlobName();
  }
}

1	/*
2	* Copyright 2015-2025 Alexandr Evstigneev
3	*
4	* Licensed under the Apache License, Version 2.0 (the "License");
5	* you may not use this file except in compliance with the License.
6	* You may obtain a copy of the License at
7	*
8	* http://www.apache.org/licenses/LICENSE-2.0
9	*
10	* Unless required by applicable law or agreed to in writing, software
11	* distributed under the License is distributed on an "AS IS" BASIS,
12	* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13	* See the License for the specific language governing permissions and
14	* limitations under the License.
15	*/
16
17	package com.perl5.lang.perl.psi;
18
19	import com.perl5.lang.perl.util.PerlPackageUtil;
20	import org.jetbrains.annotations.Nullable;
21
22	public interface PerlGlobVariable extends PerlCallable {
23	/**
24	* Checks if this typeglob is left part of assignment
25	*
26	* @return result
27	*/
28	boolean isLeftSideOfAssignment();
29
30	@Nullable String getGlobName();
31
32	@Override
33	default String getCallableName() {
34	return getGlobName();	1✔
35	}
36
37	@Override
38	default boolean isDeprecated() { return false; }	1✔
39
40	/**
41	* Returns canonical name PackageName::SubName
42	*
43	* @return name
44	*/
45	@Override
46	default String getCanonicalName() {
47	String packageName = getNamespaceName();	1✔
48	if (packageName == null) {	1✔
UNCOV 49	return null;	×
50	}
51
52	return packageName + PerlPackageUtil.NAMESPACE_SEPARATOR + getGlobName();	1✔
53	}
54	}

Camelcade / Perl5-IDEA / #525521619

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous