mirror of
https://github.com/kanaka/mal.git
synced 2024-09-20 01:57:09 +03:00
make: fix sapply to address self-host test failures.
sapply has a strip in the wrong position and was allowing a space at the beginning of the arugment to sneak in. This was breaking most sequence functions like (empty? (list 7 8)), (count [7 8]), (first [7 8]), etc.
This commit is contained in:
parent
75fed11f03
commit
edda92c85b
@ -159,10 +159,9 @@ srest = $(word 1,$(foreach new_list,$(call _list),\
|
||||
|
||||
# Takes a space separated arguments and invokes the first argument
|
||||
# (function object) using the remaining arguments.
|
||||
sapply = $(call $(word 1,$(1))_value,\
|
||||
$(strip \
|
||||
$(wordlist 2,$(call int_sub,$(words $(1)),1),$(1)) \
|
||||
$($(word $(words $(1)),$(1))_value)))
|
||||
sapply = $(call $(word 1,$(1))_value,$(strip \
|
||||
$(wordlist 2,$(call int_sub,$(words $(1)),1),$(1)) \
|
||||
$($(word $(words $(1)),$(1))_value)))
|
||||
|
||||
# Map a function object over a list object
|
||||
smap = $(strip\
|
||||
|
Loading…
Reference in New Issue
Block a user