Skip to content

Fixed singleton labeled tuple in function application #6051

Fixed singleton labeled tuple in function application

Fixed singleton labeled tuple in function application #6051

GitHub Actions / Test Report failed Nov 4, 2024 in 0s

123 passed, 4 failed and 0 skipped

Tests failed

❌ junit_tests.xml

127 tests were completed in 0ms with 123 passed, 4 failed and 0 skipped.

Test suite Passed Failed Skipped Time
HazelTests 123✅ 4❌ 0ms

❌ HazelTests

HazelTests.Elaboration
  ✅ Single integer
  ✅ Empty hole
  ✅ Free variable
  ✅ Let expression
  ✅ Inconsistent binary operation
  ✅ Consistent if statement
  ✅ An unapplied function
  ✅ Application of function on free variable
  ✅ Inconsistent case statement
  ✅ Let expression for a function
  ✅ Function application with a deferred argument
  ✅ Labeled tuple elaboration
  ✅ Rearranged labeled tuple
  ✅ Singleton labeled tuple adds labels
  ✅ Singleton labeled tuple
  ✅ Singleton labeld tuple analysis adds label
  ✅ Singleton labeld tuple analysis adds label with type alias
  ✅ Singleton labeld tuple analysis adds label with type alias
  ✅ Singleton labeled argument function application with known type
  ✅ Singleton labeled argument function application with no label in ap
  ✅ Failed cast inside labeled tuple
  ✅ nested different singleton labeled arguments
  ❌ Singleton labeled argument function application with unknown type
	Alcotest assertion failure
  ❌ Singleton labeled argument let with unknown type
	Alcotest assertion failure
  ✅ Function application with a single remaining argument after deferral
  ❌ Function application with a deferral of a hole
	Alcotest assertion failure
HazelTests.LabeledTuple
  ✅ Singleton unlabeled
  ✅ Singleton labeled
  ✅ unlabeled remains same order
  ✅ fully labeled retains ordering
  ✅ Missing labels get added
  ✅ Present labels get reordered
  ✅ Partial labels get reordered
  ✅ Extra labels get reordered
  ✅ pair labeled, unlabled
  ✅ Independent label sets with some overlap
HazelTests.Statics
  ✅ Function with unknown param
  ✅ Function with known param
  ✅ Function with labeled param
  ✅ bifunction
  ✅ bifunction
  ✅ Typechecking fails for unlabeled variable being assigned to labeled tuple
  ✅ Typechecking fails for unlabeled variable being assigned to labeled tuple
  ✅ Assigning labeled tuple to variable
  ✅ Singleton Labled Tuple ascription in let
  ✅ Singleton Labled Tuple ascription in let with wrong type should fail
  ✅ Singleton Labled Tuple with specified label
  ✅ Labeled tuple with multiple labels
  ✅ Let statement that adds labels during elaboration
  ✅ Duplicate singleton labels
  ✅ Reconstructed labeled tuple without values
  ✅ Singleton labeled argument let with unknown type
  ✅ nested different singleton labeled arguments
  ✅ nested different singleton labeled arguments
  ✅ Singleton labeled argument function application with unknown type
  ❌ Singleton labeled argument function application with no labeled param
	Alcotest assertion failure
HazelTests.Evaluator
  ✅ Integer literal
  ✅ Integer sum
  ✅ Labeled tuple projection
  ✅ Function application
  ✅ Function deferral
  ✅ Deferral applied to hole
HazelTests.ListUtil
  ✅ rev_if with false
  ✅ rev_if with true
  ✅ dedup
  ✅ dedup_f
  ✅ group_by with constant function preserves list
  ✅ group_by groups into evens/odds
  ✅ range generates sequential integers [1,6)
  ✅ range defaults lower bound to 0
  ✅ range lo = hi is empty
  ✅ Invalid range raises error
  ✅ mk_frame creates a frame from the beginning
  ✅ mk_frame creates a frame from the end
  ✅ mk_frame raises when making a frame past the end
  ✅ mk_frame raises when making a frame before the beginning
  ✅ mk_frame makes a frame splitting the list
  ✅ mk_frame makes a frame splitting the list
  ✅ split with no found element returns the original list
  ✅ split with first found returns the head and tail
  ✅ splits on the middle element
  ✅ combine_opt
  ✅ is_empty with empty list
  ✅ is_empty with non-empty list
  ✅ flat_map with empty list
  ✅ flat_map with non-empty list
  ✅ flat_map with non-empty list and empty result
  ✅ join with empty list
  ✅ join with single element list
  ✅ join with multiple element list
  ✅ hd_opt with empty list
  ✅ hd_opt with non-empty list
  ✅ nth_opt with empty list
  ✅ nth_opt with non-empty list
  ✅ nth_opt with out of bounds index
  ✅ split_n_opt with empty list
  ✅ split_n_opt with non-empty list
  ✅ split_n_opt with out of bounds index
  ✅ split_n_opt with zero index
  ✅ split_n with empty list
  ✅ split_n with non-empty list
  ✅ split_n with out of bounds index
  ✅ split_n with zero index
  ✅ split_sublist_opt with empty list
  ✅ split_sublist_opt with non-empty list
  ✅ split_sublist_opt with out of bounds index
  ✅ split_sublist_opt with zero index
  ✅ split_sublist with empty list
  ✅ split_sublist with non-empty list
  ✅ split_sublist with out of bounds index
  ✅ split_sublist with zero index
  ✅ sublist with empty list
  ✅ sublist with non-empty list
  ✅ sublist with out of bounds index
HazelTests.MakeTerm
  ✅ Singleton Labled Tuple ascription in let
  ✅ Assigning labeled tuple to variable
  ✅ Multiple labels in tuple
  ✅ Integer Literal
  ✅ Empty Hole
  ✅ Free Variable
  ✅ Parenthesized Expression
  ✅ Let Expression
  ✅ Function Application
  ✅ Named Function Definition
  ✅ Incomplete Function Definition
  ✅ Constructor
  ✅ Type Alias

Annotations

Check failure on line 0 in junit_tests.xml

See this annotation in the file changed.

@github-actions github-actions / Test Report

HazelTests ► HazelTests.Elaboration ► Singleton labeled argument function application with unknown type

Failed test found in:
  junit_tests.xml
Error:
  Alcotest assertion failure
Raw output
Alcotest assertion failure
FAIL (fun a=x->x)(a=1)

   Expected: `{ ids = <opaque>; copied = <opaque>;
  term =
  (Ap (Forward,
     { ids = <opaque>; copied = <opaque>;
       term =
       (Fun (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Tuple
               [{ ids = <opaque>; copied = <opaque>;
                  term =
                  (TupLabel (
                     { ids = <opaque>; copied = <opaque>; term = (Label "a")
                       },
                     { ids = <opaque>; copied = <opaque>; term = (Var "x") }
                     ))
                  }
                 ])
            },
          { ids = <opaque>; copied = <opaque>; term = (Var "x") }, <opaque>,
          None))
       },
     { ids = <opaque>; copied = <opaque>;
       term =
       (Tuple
          [{ ids = <opaque>; copied = <opaque>;
             term =
             (TupLabel (
                { ids = <opaque>; copied = <opaque>; term = (Label "a") },
                { ids = <opaque>; copied = <opaque>; term = (Int 1) }))
             }
            ])
       }
     ))
  }'

   Received: `{ ids = <opaque>; copied = <opaque>;
  term =
  (Ap (Forward,
     { ids = <opaque>; copied = <opaque>;
       term =
       (Fun (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Tuple
               [{ ids = <opaque>; copied = <opaque>;
                  term =
                  (TupLabel (
                     { ids = <opaque>; copied = <opaque>; term = (Label "a")
                       },
                     { ids = <opaque>; copied = <opaque>; term = (Var "x") }
                     ))
                  }
                 ])
            },
          { ids = <opaque>; copied = <opaque>; term = (Var "x") }, <opaque>,
          None))
       },
     { ids = <opaque>; copied = <opaque>;
       term =
       (Cast (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Cast (
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Cast (
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Cast (
                         { ids = <opaque>; copied = <opaque>;
                           term =
                           (Tuple
                              [{ ids = <opaque>; copied = <opaque>;
                                 term =
                                 (TupLabel (
                                    { ids = <opaque>; copied = <opaque>;
                                      term = (Label "a") },
                                    { ids = <opaque>; copied = <opaque>;
                                      term =
                                      (Cast (
                                         { ids = <opaque>; copied = <opaque>;
                                           term = (Int 1) },
                                         { ids = <opaque>; copied = <opaque>;
                                           term = Int },
                                         { ids = <opaque>; copied = <opaque>;
                                           term = (Unknown Internal) }
                                         ))
                                      }
                                    ))
                                 }
                                ])
                           },
                         { ids = <opaque>; copied = <opaque>;
                           term =
                           (Prod
                              [{ ids = <opaque>; copied = <opaque>;
                                 term =
                                 (TupLabel (
                                    { ids = <opaque>; copied = <opaque>;
                                      term = (Label "a") },
                                    { ids = <opaque>; copied = <opaque>;
                                      term = (Unknown Internal) }
                                    ))
                                 }
                                ])
                           },
                         { ids = <opaque>; copied = <opaque>;
                           term =
                           (Prod
                              [{ ids = <opaque>; copied = <opaque>;
                                 term = (Unknown Internal) }
                                ])
                           }
                         ))
                      },
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Prod
                         [{ ids = <opaque>; copied = <opaque>;
                            term = (Unknown Internal) }
                           ])
                      },
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Prod
                         [{ ids = <opaque>; copied = <opaque>;
                            term =
                            (TupLabel (
                               { ids = <opaque>; copied = <opaque>;
                                 term = (Label "a") },
                               { ids = <opaque>; copied = <opaque>;
                                 term = Int }
                               ))
                            }
                           ])
                      }
                    ))
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term =
                       (TupLabel (
                          { ids = <opaque>; copied = <opaque>;
                            term = (Label "a") },
                          { ids = <opaque>; copied = <opaque>; term = Int }))
                       }
                      ])
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term = (Unknown Internal) }
                      ])
                 }
               ))
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>;
                  term = (Unknown Internal) }
                 ])
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>;
                  term =
                  (TupLabel (
                     { ids = <opaque>; copied = <opaque>; term = (Label "a")
                       },
                     { ids = <opaque>; copied = <opaque>;
                       term = (Unknown Internal) }
                     ))
                  }
                 ])
            }
          ))
       }
     ))
  }'

Check failure on line 0 in junit_tests.xml

See this annotation in the file changed.

@github-actions github-actions / Test Report

HazelTests ► HazelTests.Elaboration ► Singleton labeled argument let with unknown type

Failed test found in:
  junit_tests.xml
Error:
  Alcotest assertion failure
Raw output
Alcotest assertion failure
FAIL let x : (a=?) = (a=1) in x

   Expected: `{ ids = <opaque>; copied = <opaque>;
  term =
  (Let ({ ids = <opaque>; copied = <opaque>; term = (Var "x") },
     { ids = <opaque>; copied = <opaque>;
       term =
       (Tuple
          [{ ids = <opaque>; copied = <opaque>;
             term =
             (TupLabel (
                { ids = <opaque>; copied = <opaque>; term = (Label "a") },
                { ids = <opaque>; copied = <opaque>; term = (Int 1) }))
             }
            ])
       },
     { ids = <opaque>; copied = <opaque>; term = (Var "x") }))
  }'

   Received: `{ ids = <opaque>; copied = <opaque>;
  term =
  (Let (
     { ids = <opaque>; copied = <opaque>;
       term =
       (Cast (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Cast ({ ids = <opaque>; copied = <opaque>; term = (Var "x") },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Parens
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Prod
                         [{ ids = <opaque>; copied = <opaque>;
                            term =
                            (TupLabel (
                               { ids = <opaque>; copied = <opaque>;
                                 term = (Label "a") },
                               { ids = <opaque>; copied = <opaque>;
                                 term = (Unknown (Hole EmptyHole)) }
                               ))
                            }
                           ])
                      })
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term = (Unknown Internal) }
                      ])
                 }
               ))
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>;
                  term = (Unknown Internal) }
                 ])
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>;
                  term =
                  (TupLabel (
                     { ids = <opaque>; copied = <opaque>; term = (Label "a")
                       },
                     { ids = <opaque>; copied = <opaque>; term = Int }))
                  }
                 ])
            }
          ))
       },
     { ids = <opaque>; copied = <opaque>;
       term =
       (Cast (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Cast (
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Tuple
                    [{ ids = <opaque>; copied = <opaque>;
                       term =
                       (TupLabel (
                          { ids = <opaque>; copied = <opaque>;
                            term = (Label "a") },
                          { ids = <opaque>; copied = <opaque>;
                            term =
                            (Cast (
                               { ids = <opaque>; copied = <opaque>;
                                 term = (Int 1) },
                               { ids = <opaque>; copied = <opaque>;
                                 term = Int },
                               { ids = <opaque>; copied = <opaque>;
                                 term = (Unknown Internal) }
                               ))
                            }
                          ))
                       }
                      ])
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term =
                       (TupLabel (
                          { ids = <opaque>; copied = <opaque>;
                            term = (Label "a") },
                          { ids = <opaque>; copied = <opaque>;
                            term = (Unknown (Hole EmptyHole)) }
                          ))
                       }
                      ])
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term = (Unknown Internal) }
                      ])
                 }
               ))
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>;
                  term = (Unknown Internal) }
                 ])
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Parens
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term =
                       (TupLabel (
                          { ids = <opaque>; copied = <opaque>;
                            term = (Label "a") },
                          { ids = <opaque>; copied = <opaque>; term = Int }))
                       }
                      ])
                 })
            }
          ))
       },
     { ids = <opaque>; copied = <opaque>; term = (Var "x") }))
  }'

Check failure on line 0 in junit_tests.xml

See this annotation in the file changed.

@github-actions github-actions / Test Report

HazelTests ► HazelTests.Elaboration ► Function application with a deferral of a hole

Failed test found in:
  junit_tests.xml
Error:
  Alcotest assertion failure
Raw output
Alcotest assertion failure
FAIL ?(_, _, 3)(1., true)

   Expected: `{ ids = <opaque>; copied = <opaque>;
  term =
  (Ap (Forward,
     { ids = <opaque>; copied = <opaque>;
       term =
       (DeferredAp (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Cast (
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Cast (
                    { ids = <opaque>; copied = <opaque>; term = EmptyHole },
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) },
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Arrow (
                         { ids = <opaque>; copied = <opaque>;
                           term = (Unknown Internal) },
                         { ids = <opaque>; copied = <opaque>;
                           term = (Unknown Internal) }
                         ))
                      }
                    ))
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Arrow (
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) },
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) }
                    ))
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Arrow (
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Prod
                         [{ ids = <opaque>; copied = <opaque>;
                            term = (Unknown Internal) };
                           { ids = <opaque>; copied = <opaque>;
                             term = (Unknown Internal) };
                           { ids = <opaque>; copied = <opaque>;
                             term = (Unknown Internal) }
                           ])
                      },
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) }
                    ))
                 }
               ))
            },
          [{ ids = <opaque>; copied = <opaque>; term = (Deferral InAp) };
            { ids = <opaque>; copied = <opaque>; term = (Deferral InAp) };
            { ids = <opaque>; copied = <opaque>;
              term =
              (Cast ({ ids = <opaque>; copied = <opaque>; term = (Int 3) },
                 { ids = <opaque>; copied = <opaque>; term = Int },
                 { ids = <opaque>; copied = <opaque>;
                   term = (Unknown Internal) }
                 ))
              }
            ]
          ))
       },
     { ids = <opaque>; copied = <opaque>;
       term =
       (Tuple
          [{ ids = <opaque>; copied = <opaque>;
             term =
             (Cast ({ ids = <opaque>; copied = <opaque>; term = (Float 1.) },
                { ids = <opaque>; copied = <opaque>; term = Float },
                { ids = <opaque>; copied = <opaque>;
                  term = (Unknown Internal) }
                ))
             };
            { ids = <opaque>; copied = <opaque>;
              term =
              (Cast (
                 { ids = <opaque>; copied = <opaque>; term = (Bool true) },
                 { ids = <opaque>; copied = <opaque>; term = Bool },
                 { ids = <opaque>; copied = <opaque>;
                   term = (Unknown Internal) }
                 ))
              }
            ])
       }
     ))
  }'

   Received: `{ ids = <opaque>; copied = <opaque>;
  term =
  (Ap (Forward,
     { ids = <opaque>; copied = <opaque>;
       term =
       (DeferredAp (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Cast (
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Cast (
                    { ids = <opaque>; copied = <opaque>; term = EmptyHole },
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) },
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Arrow (
                         { ids = <opaque>; copied = <opaque>;
                           term = (Unknown Internal) },
                         { ids = <opaque>; copied = <opaque>;
                           term = (Unknown Internal) }
                         ))
                      }
                    ))
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Arrow (
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) },
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) }
                    ))
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Arrow (
                    { ids = <opaque>; copied = <opaque>;
                      term =
                      (Prod
                         [{ ids = <opaque>; copied = <opaque>;
                            term = (Unknown Internal) };
                           { ids = <opaque>; copied = <opaque>;
                             term = (Unknown Internal) };
                           { ids = <opaque>; copied = <opaque>;
                             term = (Unknown Internal) }
                           ])
                      },
                    { ids = <opaque>; copied = <opaque>;
                      term = (Unknown Internal) }
                    ))
                 }
               ))
            },
          [{ ids = <opaque>; copied = <opaque>; term = (Deferral InAp) };
            { ids = <opaque>; copied = <opaque>; term = (Deferral InAp) };
            { ids = <opaque>; copied = <opaque>;
              term =
              (Cast ({ ids = <opaque>; copied = <opaque>; term = (Int 3) },
                 { ids = <opaque>; copied = <opaque>; term = Int },
                 { ids = <opaque>; copied = <opaque>;
                   term = (Unknown Internal) }
                 ))
              }
            ]
          ))
       },
     { ids = <opaque>; copied = <opaque>;
       term =
       (Cast (
          { ids = <opaque>; copied = <opaque>;
            term =
            (Cast (
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Tuple
                    [{ ids = <opaque>; copied = <opaque>;
                       term =
                       (Cast (
                          { ids = <opaque>; copied = <opaque>;
                            term = (Float 1.) },
                          { ids = <opaque>; copied = <opaque>; term = Float },
                          { ids = <opaque>; copied = <opaque>;
                            term = (Unknown Internal) }
                          ))
                       };
                      { ids = <opaque>; copied = <opaque>;
                        term =
                        (Cast (
                           { ids = <opaque>; copied = <opaque>;
                             term = (Bool true) },
                           { ids = <opaque>; copied = <opaque>; term = Bool },
                           { ids = <opaque>; copied = <opaque>;
                             term = (Unknown Internal) }
                           ))
                        }
                      ])
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>;
                       term = (Unknown Internal) };
                      { ids = <opaque>; copied = <opaque>;
                        term = (Unknown Internal) }
                      ])
                 },
               { ids = <opaque>; copied = <opaque>;
                 term =
                 (Prod
                    [{ ids = <opaque>; copied = <opaque>; term = Float };
                      { ids = <opaque>; copied = <opaque>; term = Bool }])
                 }
               ))
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>; term = Float };
                 { ids = <opaque>; copied = <opaque>; term = Bool }])
            },
          { ids = <opaque>; copied = <opaque>;
            term =
            (Prod
               [{ ids = <opaque>; copied = <opaque>;
                  term = (Unknown Internal) };
                 { ids = <opaque>; copied = <opaque>;
                   term = (Unknown Internal) }
                 ])
            }
          ))
       }
     ))
  }'

Check failure on line 0 in junit_tests.xml

See this annotation in the file changed.

@github-actions github-actions / Test Report

HazelTests ► HazelTests.Statics ► Singleton labeled argument function application with no labeled param

Failed test found in:
  junit_tests.xml
Error:
  Alcotest assertion failure
Raw output
Alcotest assertion failure
FAIL (fun a=x->x)(1)

   Expected: `Some { ids = <opaque>; copied = <opaque>; term = Int }'
   Received: `Some
                { ids = <opaque>; copied = <opaque>; term = (Unknown Internal) }'