     pstyle.removeTabStop(NSTextTab(textAlignment: alignment, location: location))
     return .void
   }
+  
+  private func paragraphStyleTabstopsClear(style: Expr) throws -> Expr {
+    let pstyle = try self.paragraphStyle(from: style).value
+    pstyle.tabStops.removeAll()
+    return .void
+  }
 }
 
 public final class StyledText: AnyNativeObject<NSMutableAttributedString> {

    self.define(Procedure("styled-text?", isStyledText))
    self.define(Procedure("styled-text", styledText))
    self.define(Procedure("make-styled-text", makeStyledText))
    self.define(Procedure("load-styled-text", loadStyledText))
    self.define(Procedure("copy-styled-text", copyStyledText))
    self.define(Procedure("save-styled-text", saveStyledText))

    self.define(Procedure("paragraph-style-tabstops", paragraphStyleTabstops))
    self.define(Procedure("paragraph-style-tabstop-add!", paragraphStyleTabstopAdd))
    self.define(Procedure("paragraph-style-tabstop-remove!", paragraphStyleTabstopRemove))
    self.define(Procedure("paragraph-style-tabstops-clear!", paragraphStyleTabstopsClear))
  }
  
  // MARK: - Utilities
