implement function `words`

1 files changed, 9 insertions, 0 deletions

diff --git a/src/makefile/functions.rs b/src/makefile/functions.rs
index f1d43de..6e9d3cb 100644
--- a/src/makefile/functions.rs
+++ b/src/makefile/functions.rs
@@ -36,6 +36,10 @@ pub fn expand_call(
             assert_eq!(args.len(), 1);
             text::sort(macros, &args[0])
         }
+        "words" => {
+            assert_eq!(args.len(), 1);
+            text::words(macros, &args[0])
+        }
         "lastword" => {
             assert_eq!(args.len(), 1);
             text::lastword(macros, &args[0])
@@ -186,6 +190,11 @@ mod text {
         Ok(words.join(" "))
     }
 
+    pub fn words(macros: &MacroSet, words: &TokenString) -> Result<String> {
+        let words = macros.expand(words)?;
+        Ok(words.split_whitespace().count().to_string())
+    }
+
     pub fn lastword(macros: &MacroSet, words: &TokenString) -> Result<String> {
         let words = macros.expand(words)?;
         Ok(words.split_whitespace().last().unwrap_or("").to_owned())