If you need just a static ad-hook tonality you can make it inline (SCOM 6.5). No need to define a tonality in this case.
(activate-tonality
(melodic-minor c 5) (c 4 f# 4 g# 4 a 4 b 4))
--> ((c 5 d 5 d# 5 f 5 g 5 a 5 b 5) (c 4 f# 4 g# 4 a 4 b 4))
Inline function works too, here is ad-hook scale with degree 2.
(activate-tonality
(melodic-minor c 5) (offset-tonality 2 '(c 4 f# 4 g# 4 a 4 b 4)))
--> ((c 5 d 5 d# 5 f 5 g 5 a 5 b 5) (g# 4 a 4 b 4 c 5 f# 5))
Using scale definition
(create-tonality my-scale '(c 4 f# 4 g# 4 a 4 b 4))
(activate-tonality
(melodic-minor c 5) (my-scale c 4))
--> ((c 5 d 5 d# 5 f 5 g 5 a 5 b 5) (c 4 f# 4 g# 4 a 4 b 4))
and the degree variant
(activate-tonality
(melodic-minor c 5) (2 my-scale c 4))
--> ((c 5 d 5 d# 5 f 5 g 5 a 5 b 5) (g# 4 a 4 b 4 c 5 f# 5))
Peter