mirror of https://codeberg.org/cage/tinmop/
45 lines
2.2 KiB
Common Lisp
45 lines
2.2 KiB
Common Lisp
(in-package :idn)
|
|
|
|
(include "idn2.h")
|
|
|
|
(cenum (idn2-rc :define-constants t)
|
|
((:ok "IDN2_OK"))
|
|
((:malloc "IDN2_MALLOC"))
|
|
((:no-codeset "IDN2_NO_CODESET"))
|
|
((:iconv-fail "IDN2_ICONV_FAIL"))
|
|
((:encoding-error "IDN2_ENCODING_ERROR"))
|
|
((:nfc "IDN2_NFC"))
|
|
((:punycode-bad-input "IDN2_PUNYCODE_BAD_INPUT"))
|
|
((:punycode-big-output "IDN2_PUNYCODE_BIG_OUTPUT"))
|
|
((:punycode-overflow "IDN2_PUNYCODE_OVERFLOW"))
|
|
((:too-big-domain "IDN2_TOO_BIG_DOMAIN"))
|
|
((:too-big-label "IDN2_TOO_BIG_LABEL"))
|
|
((:invalid-alabel "IDN2_INVALID_ALABEL"))
|
|
((:ualabel-mismatch "IDN2_UALABEL_MISMATCH"))
|
|
((:invalid-flags "IDN2_INVALID_FLAGS"))
|
|
((:not-nfc "IDN2_NOT_NFC"))
|
|
((:2hyphen "IDN2_2HYPHEN"))
|
|
((:hyphen-startend "IDN2_HYPHEN_STARTEND"))
|
|
((:leading-combining "IDN2_LEADING_COMBINING"))
|
|
((:disallowed "IDN2_DISALLOWED"))
|
|
((:contextj "IDN2_CONTEXTJ"))
|
|
((:contextj-no-rule "IDN2_CONTEXTJ_NO_RULE"))
|
|
((:contexto "IDN2_CONTEXTO"))
|
|
((:contexto-no-rule "IDN2_CONTEXTO_NO_RULE"))
|
|
((:unassigned "IDN2_UNASSIGNED"))
|
|
((:bidi "IDN2_BIDI"))
|
|
((:dot-in-label "IDN2_DOT_IN_LABEL"))
|
|
((:invalid-transitional "IDN2_INVALID_TRANSITIONAL"))
|
|
((:invalid-nontransitional "IDN2_INVALID_NONTRANSITIONAL"))
|
|
((:alabel-roundtrip-failed "IDN2_ALABEL_ROUNDTRIP_FAILED")))
|
|
|
|
(cenum (flags :define-constants t)
|
|
((:nfc-input "IDN2_NFC_INPUT"))
|
|
((:alabel-roundtrip "IDN2_ALABEL_ROUNDTRIP"))
|
|
((:transitional "IDN2_TRANSITIONAL"))
|
|
((:nontransitional "IDN2_NONTRANSITIONAL"))
|
|
((:allow-unassigned "IDN2_ALLOW_UNASSIGNED"))
|
|
((:use-std3-ascii-rules "IDN2_USE_STD3_ASCII_RULES"))
|
|
((:no-tr46 "IDN2_NO_TR46"))
|
|
((:no-alabel-roundtrip "IDN2_NO_ALABEL_ROUNDTRIP")))
|