Home modules.gotpike.org
Username: Password: [Create Account]
[Forgot Password?]

Modules

ADT
Database
GTK2
GUI
IP
PiJAX
Public
Sql
Stdio
Subversion
System
Tools
Xosd
lua
v4l2
wx

Recent Changes

Public.Parser.XML2 1.50
Public.ZeroMQ 1.1
Public.Template.Mustache 1.0
Public.Protocols.XMPP 1.4
Sql.Provider.jdbc 1.0

Popular Downloads

Public.Parser.JSON2 1.0
Public.Parser.JSON 0.2
GTK2 2.23
Public.Web.FCGI 1.8
Public.Parser.XML2 1.48


Module Information
Public.Tools.Language.Hyphenate
Viewing contents of Public_Tools_Language_Hyphenate-1.3/testsuite.in

START_MARKER

// verify that we have all of the expected classes and objects
test_true(objectp(Public.Tools.Language.Hyphenate))
test_true(programp(Public.Tools.Language.Hyphenate.Hyphenate))

// we pass a non-existent dictionary
test_true(catch(Public.Tools.Language.Hyphenate.Hyphenate("foo")))

// we pass a good dictionary
test_true(objectp(Public.Tools.Language.Hyphenate.Hyphenate("hyphen-2.8.6/hyph_en_US.dic")))

test_true(functionp(Public.Tools.Language.Hyphenate.Hyphenate("hyphen-2.8.6/hyph_en_US.dic")->hyphenate))

test_eq(Public.Tools.Language.Hyphenate.Hyphenate("hyphen-2.8.6/hyph_en_US.dic")->hyphenate(""), "")
test_eq(Public.Tools.Language.Hyphenate.Hyphenate("hyphen-2.8.6/hyph_en_US.dic")->hyphenate("foo"), "foo")
test_eq(Public.Tools.Language.Hyphenate.Hyphenate("hyphen-2.8.6/hyph_en_US.dic")->hyphenate("apple"), "ap-ple")
test_eq(Public.Tools.Language.Hyphenate.Hyphenate("hyphen-2.8.6/hyph_en_US.dic")->hyphenate("app-le"), "app-le")

// TODO need to add tests for wide-strings

END_MARKER



gotpike.org | Copyright © 2004 - 2019 | Pike is a trademark of Department of Computer and Information Science, Linköping University