beat-structure function errors

Input:

```
\version "2.24.0"

%% This is the documentation of the beat-structure function in 2.24.4:
%%
%%     (beat-structure base-length time-signature
%%                     time-signature-settings)
%%
%%     Get beatStructure value in base-length units for time-signature
%%     from time-signature-settings.

{
   #(display "\n")

   %% Case 1: The time signature is found in the settings.
   %% Failure mode: the base-length argument is ignored.
   #(display (beat-structure 1/8 '(8 . 8)
              default-time-signature-settings))
   #(display "\n")
   #(display (beat-structure 1/16 '(8 . 8)
              default-time-signature-settings))
   #(display "\n")

   %% Case 2: The time signature is not found in the settings.
   %% Failure mode: The base-length argument doesn't merely
   %% rescale the elements of the returned beat structure; it
   %% changes the beat structure.
   #(display (beat-structure 1/4 '(4 . 4)
              default-time-signature-settings))
   #(display "\n")
   #(display (beat-structure 1/8 '(4 . 4)
              default-time-signature-settings))
   #(display "\n")

   s
}
```

Actual output (excerpt) from 2.24.4:

     (3 3 2)
     (3 3 2)
     (1 1 1 1)
     (1 1 1 1 1 1 1 1)

Expected output:

     (3 3 2)
     (6 6 4)
     (1 1 1 1)
     (2 2 2 2)

Does anyone disagree?

Thanks,
-- 
Dan