source: project/release/5/unitex-named-chars/trunk/tests/unitex-named-chars-test.scm @ 39828

Last change on this file since 39828 was 39828, checked in by Kon Lovett, 5 weeks ago

fix test runner fail exit pass-thru, add test runner config

File size: 602 bytes
Line 
1;;;; unitex-named-chars-test.scm  -*- Scheme -*-
2;;;; Kon Lovett, Sep '20
3
4(import test)
5
6(include "test-gloss.incl")
7
8(test-begin "Unicode & LaTeX Named Chars")
9
10;;;
11
12(import (only (chicken base) char-name))
13(import unitex-named-chars)
14
15;;
16
17(test #\exclamdown (char-name '|exclamdown|))
18(test #x000A1 (char->integer (char-name '|exclamdown|)))
19
20(test #\:blue_car: (char-name '|:blue_car:|))
21(test #x1F699 (char->integer (char-name '|:blue_car:|)))
22
23;--> ????  -- umm, yeah, ?????
24(gloss #\:no_pedestrians: #\Vdash #\:smoking: #\:speedboat:)
25
26;;;
27
28(test-end "Unicode & LaTeX Named Chars")
29
30(test-exit)
Note: See TracBrowser for help on using the repository browser.