晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。 林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。 见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝) 既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。 南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。
| DIR:/opt/alt/ruby31/include/ruby/internal/intern/ |
| Current File : //opt/alt/ruby31/include/ruby/internal/intern/parse.h |
#ifndef RBIMPL_INTERN_PARSE_H /*-*-C++-*-vi:se ft=cpp:*/ #define RBIMPL_INTERN_PARSE_H /** * @file * @author Ruby developers <ruby-core@ruby-lang.org> * @copyright This file is a part of the programming language Ruby. * Permission is hereby granted, to either redistribute and/or * modify this file, provided that the conditions mentioned in the * file COPYING are met. Consult the file for details. * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are * implementation details. Don't take them as canon. They could * rapidly appear then vanish. The name (path) of this header file * is also an implementation detail. Do not expect it to persist * at the place it is now. Developers are free to move it anywhere * anytime at will. * @note To ruby-core: remember that this header can be possibly * recursively included from extension libraries written in C++. * Do not expect for instance `__VA_ARGS__` is always available. * We assume C99 for ruby itself but we don't assume languages of * extension libraries. They could be written in C++98. * @brief Public APIs related to ::rb_cSymbol. */ #include "ruby/internal/attr/const.h" #include "ruby/internal/attr/nonnull.h" #include "ruby/internal/dllexport.h" #include "ruby/internal/value.h" RBIMPL_SYMBOL_EXPORT_BEGIN() /* symbol.c */ /** * Calculates an ID of attribute writer. For instance it returns `:foo=` when * passed `:foo`. * * @param[in] id An id. * @exception rb_eNameError `id` is not for attributes (e.g. operator). * @return Calculated name of attribute writer. */ ID rb_id_attrset(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is a constant. In case an ID is in * Unicode (likely), its "constant"-ness is determined if its first character * is either upper case or title case. Otherwise it is detected if case- * folding the first character changes its case or not. * * @param[in] id An id to classify. * @retval 1 It is a constant. * @retval 0 It isn't. */ int rb_is_const_id(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is a global variable. A global * variable must start with `$`. * * @param[in] id An id to classify. * @retval 1 It is a global variable. * @retval 0 It isn't. */ int rb_is_global_id(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is an instance variable. An * instance variable must start with `@`, but not `@@`. * * @param[in] id An id to classify. * @retval 1 It is an instance variable. * @retval 0 It isn't. */ int rb_is_instance_id(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is an attribute writer. An * attribute writer is otherwise a local variable, except it ends with `=`. * * @param[in] id An id to classify. * @retval 1 It is an attribute writer. * @retval 0 It isn't. */ int rb_is_attrset_id(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is a class variable. A class * variable is must start with `@@`. * * @param[in] id An id to classify. * @retval 1 It is a class variable. * @retval 0 It isn't. */ int rb_is_class_id(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is a local variable. A local * variable starts with a lowercase character, followed by some alphanumeric * characters or `_`, then ends with anything other than `!`, `?`, or `=`. * * @param[in] id An id to classify. * @retval 1 It is a local variable. * @retval 0 It isn't. */ int rb_is_local_id(ID id); RBIMPL_ATTR_CONST() /** * Classifies the given ID, then sees if it is a junk ID. An ID with no * special syntactic structure is considered junk. This category includes for * instance punctuation. * * @param[in] id An id to classify. * @retval 1 It is a junk. * @retval 0 It isn't. */ int rb_is_junk_id(ID); RBIMPL_ATTR_NONNULL(()) /** * Sees if the passed C string constructs a valid syntactic symbol. Invalid * ones for instance includes whitespaces. * * @param[in] str A C string to check. * @retval 1 It is a valid symbol name. * @retval 0 It is invalid as a symbol name. */ int rb_symname_p(const char *str); /* vm.c */ /** * Queries the last match, or `Regexp.last_match`, or the `$~`. You don't have * to use it, because in reality you can get `$~` using rb_gv_get() as usual. * * @retval RUBY_Qnil The method has not ran a regular expression. * @retval otherwise An instance of ::rb_cMatch. */ VALUE rb_backref_get(void); /** * Updates `$~`. You don't have to use it, because in reality you can set `$~` * using rb_gv_set() as usual. * * @param[in] md Arbitrary Ruby object. * @post The passed object is assigned to `$~`. * * @internal * * Yes, this function bypasses the Check_Type() that would normally prevent * evil souls from assigning evil objects to `$~`. Use of this function is a * really bad smell. */ void rb_backref_set(VALUE md); /** * Queries the last line, or the `$_`. You don't have to use it, because in * reality you can get `$_` using rb_gv_get() as usual. * * @retval RUBY_Qnil There has never been a "line" yet. * @retval otherwise The last set `$_` value. */ VALUE rb_lastline_get(void); /** * Updates `$_`. You don't have to use it, because in reality you can set `$_` * using rb_gv_set() as usual. * * @param[in] str Arbitrary Ruby object. * @post The passed object is assigned to `$_`. * * @internal * * Unlike `$~`, you can assign non-strings to `$_`, even from ruby scripts. */ void rb_lastline_set(VALUE str); /* symbol.c */ /** * Collects every single bits of symbols that have ever interned in the entire * history of the current process. * * @return An array that contains all symbols that have ever existed. */ VALUE rb_sym_all_symbols(void); RBIMPL_SYMBOL_EXPORT_END() #endif /* RBIMPL_INTERN_PARSE_H */ |